Return to pcheck.c CVS log

Up to [Research Unix] / researchv10dc / 630 / src

Annotation of researchv10dc/630/src/pcheck.c, revision 1.1.1.1

1.1       root        1: /*
                      2: **     Packet check bytes calculation
                      3: */
                      4: 
                      5: #ifdef vax
                      6: /*
                      7: **     Vax "crc" instruction look-up table for polynomial = 0120001
                      8: */
                      9: 
                     10: unsigned long  crc16t[] = 
                     11: {
                     12:        0, 0146001, 0154001,  012000, 0170001,  036000,  024000, 0162001
                     13:        , 0120001,  066000,  074000, 0132001,  050000, 0116001, 0104001,  042000
                     14: };
                     15: 
                     16: 
                     17: /*ARGSUSED*/
                     18: int
                     19: crc(s, n)
                     20:        unsigned char   *s;
                     21:        int     n;
                     22: {
                     23:        asm("   crc     _crc16t,$0,8(ap),*4(ap) ");
                     24:        asm("   cmpw    r0,(r3)                 ");
                     25:        asm("   beqlu   OK                      ");
                     26:        asm("   movw    r0,(r3)                 ");
                     27:        asm("   movl    $1,r0                   ");
                     28:        asm("   ret                             ");
                     29:        asm("OK:movw    r0,(r3)                 ");
                     30:        return (0);
                     31: }
                     32: 
                     33: 
                     34: #else  vax
                     35: 
                     36: 
                     37: /*
                     38: **     crc-16:  x**16 + x**15 + x**2 + 1
                     39: */
                     40: 
                     41: typedef unsigned char  uchar;
                     42: typedef unsigned short ushort;
                     43: 
                     44: #define        lobyte(X)       (X&0xff)
                     45: #define        hibyte(X)       ((X>>8)&0xff)
                     46: 
                     47: #ifdef ROMCRC
                     48: extern ushort crc16t_32[2] [16];
                     49: #else
                     50: ushort crc16t_32[2][16]        = 
                     51: {
                     52:        0, 0140301, 0140601, 0500, 0141401, 01700, 01200, 0141101,
                     53:            0143001, 03300, 003600, 0143501, 02400, 0142701, 0142201, 02100,
                     54:            0, 0146001, 0154001, 012000, 0170001, 036000, 024000, 0162001,
                     55:            0120001, 066000, 074000, 0132001, 050000, 0116001, 0104001, 042000
                     56: };
                     57: #endif
                     58: 
                     59: int
                     60: crc(buffer, nbytes)
                     61:        register uchar *buffer;
                     62:        int     nbytes;
                     63: {
                     64:        register ushort tcrc = 0;
                     65:        register int    temp;
                     66:        register int    i;
                     67: 
                     68:        if ( (i = nbytes) > 0 )
                     69:                do {
                     70:                        temp = tcrc ^ *buffer++;
                     71:                        tcrc = crc16t_32[0][temp & 017]
                     72:                             ^ crc16t_32[1][(temp>>4) & 017]
                     73:                             ^ (tcrc >> 8);
                     74:                } while ( --i > 0 );
                     75: 
                     76:        if ( lobyte(tcrc) != *buffer )
                     77:                i++;
                     78:        *buffer++ = lobyte(tcrc);
                     79: 
                     80:        if ( hibyte(tcrc) != *buffer )
                     81:                i++;
                     82:        *buffer++ = hibyte(tcrc);
                     83: 
                     84:        return(i);
                     85: }
                     86: 
                     87: 
                     88: #endif vax

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.