home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #6 / amigamamagazinepolishissue1998.iso / packery / unsit1.5c.amiga / src / updcrc.c < prev   
Text File  |  2005-05-06  |  4KB  |  95 lines
  1. /* updcrc(3), crc(1) - calculate crc polynomials
  2.  *
  3.  * Calculate, intelligently, the CRC of a dataset incrementally given a 
  4.  * buffer full at a time.
  5.  * 
  6.  * Usage:
  7.  *     newcrc = updcrc( oldcrc, bufadr, buflen )
  8.  *         unsigned int oldcrc, buflen;
  9.  *         char *bufadr;
  10.  *
  11.  * Compiling with -DTEST creates a program to print the CRC of stdin to stdout.
  12.  * Compile with -DMAKETAB to print values for crctab to stdout.  If you change
  13.  *    the CRC polynomial parameters, be sure to do this and change
  14.  *    crctab's initial value.
  15.  *
  16.  * Notes:
  17.  *  Regards the data stream as an integer whose MSB is the MSB of the first
  18.  *  byte recieved.  This number is 'divided' (using xor instead of subtraction)
  19.  *  by the crc-polynomial P.
  20.  *  XMODEM does things a little differently, essentially treating the LSB of
  21.  * the first data byte as the MSB of the integer. Define SWAPPED to make
  22.  * things behave in this manner.
  23.  *
  24.  * Author:    Mark G. Mendel, 7/86
  25.  *        UUCP: ihnp4!umn-cs!hyper!mark, GEnie: mgm
  26.  */
  27.  
  28. /* The CRC polynomial.
  29.  * These 4 values define the crc-polynomial.
  30.  * If you change them, you must change crctab[]'s initial value to what is
  31.  * printed by initcrctab() [see 'compile with -DMAKETAB' above].
  32.  */
  33.     /* Value used by:                CITT    XMODEM    ARC      */
  34. #define    P     0xA001     /* the poly:    0x1021    0x1021    A001    */
  35. #define INIT_CRC 0L     /* init value:    -1    0    0    */
  36. #define SWAPPED         /* bit order:    undef    defined    defined */
  37. #define W    16     /* bits in CRC:16    16    16    */
  38.  
  39.     /* data type that holds a W-bit unsigned integer */
  40. #if W <= 16
  41. #  define WTYPE    unsigned short
  42. #else
  43. #  define WTYPE   unsigned long
  44. #endif
  45.  
  46.     /* the number of bits per char: don't change it. */
  47. #define B    8
  48.  
  49. static WTYPE crctab[1<<B] = {
  50.      0x0000,  0xc0c1,  0xc181,  0x0140,  0xc301,  0x3c0,   0x0280,  0xc241,
  51.      0xc601,  0x06c0,  0x0780,  0xc741,  0x0500,  0xc5c1,  0xc481,  0x0440,
  52.      0xcc01,  0x0cc0,  0x0d80,  0xcd41,  0x0f00,  0xcfc1,  0xce81,  0x0e40,
  53.      0x0a00,  0xcac1,  0xcb81,  0x0b40,  0xc901,  0x09c0,  0x0880,  0xc841,
  54.      0xd801,  0x18c0,  0x1980,  0xd941,  0x1b00,  0xdbc1,  0xda81,  0x1a40,
  55.      0x1e00,  0xdec1,  0xdf81,  0x1f40,  0xdd01,  0x1dc0,  0x1c80,  0xdc41,
  56.      0x1400,  0xd4c1,  0xd581,  0x1540,  0xd701,  0x17c0,  0x1680,  0xd641,
  57.      0xd201,  0x12c0,  0x1380,  0xd341,  0x1100,  0xd1c1,  0xd081,  0x1040,
  58.      0xf001,  0x30c0,  0x3180,  0xf141,  0x3300,  0xf3c1,  0xf281,  0x3240,
  59.      0x3600,  0xf6c1,  0xf781,  0x3740,  0xf501,  0x35c0,  0x3480,  0xf441,
  60.      0x3c00,  0xfcc1,  0xfd81,  0x3d40,  0xff01,  0x3fc0,  0x3e80,  0xfe41,
  61.      0xfa01,  0x3ac0,  0x3b80,  0xfb41,  0x3900,  0xf9c1,  0xf881,  0x3840,
  62.      0x2800,  0xe8c1,  0xe981,  0x2940,  0xeb01,  0x2bc0,  0x2a80,  0xea41,
  63.      0xee01,  0x2ec0,  0x2f80,  0xef41,  0x2d00,  0xedc1,  0xec81,  0x2c40,
  64.      0xe401,  0x24c0,  0x2580,  0xe541,  0x2700,  0xe7c1,  0xe681,  0x2640,
  65.      0x2200,  0xe2c1,  0xe381,  0x2340,  0xe101,  0x21c0,  0x2080,  0xe041,
  66.      0xa001,  0x60c0,  0x6180,  0xa141,  0x6300,  0xa3c1,  0xa281,  0x6240,
  67.      0x6600,  0xa6c1,  0xa781,  0x6740,  0xa501,  0x65c0,  0x6480,  0xa441,
  68.      0x6c00,  0xacc1,  0xad81,  0x6d40,  0xaf01,  0x6fc0,  0x6e80,  0xae41,
  69.      0xaa01,  0x6ac0,  0x6b80,  0xab41,  0x6900,  0xa9c1,  0xa881,  0x6840,
  70.      0x7800,  0xb8c1,  0xb981,  0x7940,  0xbb01,  0x7bc0,  0x7a80,  0xba41,
  71.      0xbe01,  0x7ec0,  0x7f80,  0xbf41,  0x7d00,  0xbdc1,  0xbc81,  0x7c40,
  72.      0xb401,  0x74c0,  0x7580,  0xb541,  0x7700,  0xb7c1,  0xb681,  0x7640,
  73.      0x7200,  0xb2c1,  0xb381,  0x7340,  0xb101,  0x71c0,  0x7080,  0xb041,
  74.      0x5000,  0x90c1,  0x9181,  0x5140,  0x9301,  0x53c0,  0x5280,  0x9241,
  75.      0x9601,  0x56c0,  0x5780,  0x9741,  0x5500,  0x95c1,  0x9481,  0x5440,
  76.      0x9c01,  0x5cc0,  0x5d80,  0x9d41,  0x5f00,  0x9fc1,  0x9e81,  0x5e40,
  77.      0x5a00,  0x9ac1,  0x9b81,  0x5b40,  0x9901,  0x59c0,  0x5880,  0x9841,
  78.      0x8801,  0x48c0,  0x4980,  0x8941,  0x4b00,  0x8bc1,  0x8a81,  0x4a40,
  79.      0x4e00,  0x8ec1,  0x8f81,  0x4f40,  0x8d01,  0x4dc0,  0x4c80,  0x8c41,
  80.      0x4400,  0x84c1,  0x8581,  0x4540,  0x8701,  0x47c0,  0x4680,  0x8641,
  81.      0x8201,  0x42c0,  0x4380,  0x8341,  0x4100,  0x81c1,  0x8081,  0x4040,
  82. };
  83.  
  84.  
  85. WTYPE updcrc(WTYPE icrc, unsigned char *icp, int icnt ) {
  86.      register WTYPE crc = icrc;
  87.      register unsigned char *cp = icp;
  88.      register int cnt = icnt;
  89.  
  90.      while( cnt-- )
  91.           crc = (crc>>B) ^ crctab[(crc & ((1<<B)-1)) ^ *cp++];
  92.  
  93.      return( crc );
  94. }
  95.