git.gag.com Git - debian/cc1111/blob - device/lib/pic16/libc/stdlib/crc16.c

   1 /*
   2  * crc16.c - CRC16 checksum generation
   3  *
   4  * this source is part of the linux kernel distribution
   5  *
   6  * modified for SDCC/pic16 by Vangelis Rokas, 2005 <vrokas AT users.sourceforge.net>
   7  *
   8  *
   9  * PURPOSE
  10  *      Routines to generate, calculate, and test a 16-bit CRC.
  11  *
  12  * DESCRIPTION
  13  *      The CRC code was devised by Don P. Mitchell of AT&T Bell Laboratories
  14  *      and Ned W. Rhodes of Software Systems Group. It has been published in
  15  *      "Design and Validation of Computer Protocols", Prentice Hall,
  16  *      Englewood Cliffs, NJ, 1991, Chapter 3, ISBN 0-13-539925-4.
  17  *
  18  *      Copyright is held by AT&T.
  19  *
  20  *      AT&T gives permission for the free use of the CRC source code.
  21  *
  22  * CONTACTS
  23  *      E-mail regarding any portion of the Linux UDF file system should be
  24  *      directed to the development team mailing list (run by majordomo):
  25  *              linux_udf@hpesjro.fc.hp.com
  26  *
  27  * COPYRIGHT
  28  *      This file is distributed under the terms of the GNU General Public
  29  *      License (GPL). Copies of the GPL can be obtained from:
  30  *              ftp://prep.ai.mit.edu/pub/gnu/GPL
  31  *      Each contributing author retains all rights to their own work.
  32  *
  33  *
  34  * $Id: crc16.c 3721 2005-04-06 20:09:07Z maartenbrock $
  35  */
  36
  37 #include <stdint.h>
  38
  39 __code uint16_t crc_table[256] = {
  40         0x0000U, 0x1021U, 0x2042U, 0x3063U, 0x4084U, 0x50a5U, 0x60c6U, 0x70e7U,
  41         0x8108U, 0x9129U, 0xa14aU, 0xb16bU, 0xc18cU, 0xd1adU, 0xe1ceU, 0xf1efU,
  42         0x1231U, 0x0210U, 0x3273U, 0x2252U, 0x52b5U, 0x4294U, 0x72f7U, 0x62d6U,
  43         0x9339U, 0x8318U, 0xb37bU, 0xa35aU, 0xd3bdU, 0xc39cU, 0xf3ffU, 0xe3deU,
  44         0x2462U, 0x3443U, 0x0420U, 0x1401U, 0x64e6U, 0x74c7U, 0x44a4U, 0x5485U,
  45         0xa56aU, 0xb54bU, 0x8528U, 0x9509U, 0xe5eeU, 0xf5cfU, 0xc5acU, 0xd58dU,
  46         0x3653U, 0x2672U, 0x1611U, 0x0630U, 0x76d7U, 0x66f6U, 0x5695U, 0x46b4U,
  47         0xb75bU, 0xa77aU, 0x9719U, 0x8738U, 0xf7dfU, 0xe7feU, 0xd79dU, 0xc7bcU,
  48         0x48c4U, 0x58e5U, 0x6886U, 0x78a7U, 0x0840U, 0x1861U, 0x2802U, 0x3823U,
  49         0xc9ccU, 0xd9edU, 0xe98eU, 0xf9afU, 0x8948U, 0x9969U, 0xa90aU, 0xb92bU,
  50         0x5af5U, 0x4ad4U, 0x7ab7U, 0x6a96U, 0x1a71U, 0x0a50U, 0x3a33U, 0x2a12U,
  51         0xdbfdU, 0xcbdcU, 0xfbbfU, 0xeb9eU, 0x9b79U, 0x8b58U, 0xbb3bU, 0xab1aU,
  52         0x6ca6U, 0x7c87U, 0x4ce4U, 0x5cc5U, 0x2c22U, 0x3c03U, 0x0c60U, 0x1c41U,
  53         0xedaeU, 0xfd8fU, 0xcdecU, 0xddcdU, 0xad2aU, 0xbd0bU, 0x8d68U, 0x9d49U,
  54         0x7e97U, 0x6eb6U, 0x5ed5U, 0x4ef4U, 0x3e13U, 0x2e32U, 0x1e51U, 0x0e70U,
  55         0xff9fU, 0xefbeU, 0xdfddU, 0xcffcU, 0xbf1bU, 0xaf3aU, 0x9f59U, 0x8f78U,
  56         0x9188U, 0x81a9U, 0xb1caU, 0xa1ebU, 0xd10cU, 0xc12dU, 0xf14eU, 0xe16fU,
  57         0x1080U, 0x00a1U, 0x30c2U, 0x20e3U, 0x5004U, 0x4025U, 0x7046U, 0x6067U,
  58         0x83b9U, 0x9398U, 0xa3fbU, 0xb3daU, 0xc33dU, 0xd31cU, 0xe37fU, 0xf35eU,
  59         0x02b1U, 0x1290U, 0x22f3U, 0x32d2U, 0x4235U, 0x5214U, 0x6277U, 0x7256U,
  60         0xb5eaU, 0xa5cbU, 0x95a8U, 0x8589U, 0xf56eU, 0xe54fU, 0xd52cU, 0xc50dU,
  61         0x34e2U, 0x24c3U, 0x14a0U, 0x0481U, 0x7466U, 0x6447U, 0x5424U, 0x4405U,
  62         0xa7dbU, 0xb7faU, 0x8799U, 0x97b8U, 0xe75fU, 0xf77eU, 0xc71dU, 0xd73cU,
  63         0x26d3U, 0x36f2U, 0x0691U, 0x16b0U, 0x6657U, 0x7676U, 0x4615U, 0x5634U,
  64         0xd94cU, 0xc96dU, 0xf90eU, 0xe92fU, 0x99c8U, 0x89e9U, 0xb98aU, 0xa9abU,
  65         0x5844U, 0x4865U, 0x7806U, 0x6827U, 0x18c0U, 0x08e1U, 0x3882U, 0x28a3U,
  66         0xcb7dU, 0xdb5cU, 0xeb3fU, 0xfb1eU, 0x8bf9U, 0x9bd8U, 0xabbbU, 0xbb9aU,
  67         0x4a75U, 0x5a54U, 0x6a37U, 0x7a16U, 0x0af1U, 0x1ad0U, 0x2ab3U, 0x3a92U,
  68         0xfd2eU, 0xed0fU, 0xdd6cU, 0xcd4dU, 0xbdaaU, 0xad8bU, 0x9de8U, 0x8dc9U,
  69         0x7c26U, 0x6c07U, 0x5c64U, 0x4c45U, 0x3ca2U, 0x2c83U, 0x1ce0U, 0x0cc1U,
  70         0xef1fU, 0xff3eU, 0xcf5dU, 0xdf7cU, 0xaf9bU, 0xbfbaU, 0x8fd9U, 0x9ff8U,
  71         0x6e17U, 0x7e36U, 0x4e55U, 0x5e74U, 0x2e93U, 0x3eb2U, 0x0ed1U, 0x1ef0U
  72 };
  73
  74 /*
  75  * udf_crc
  76  *
  77  * PURPOSE
  78  *      Calculate a 16-bit CRC checksum using ITU-T V.41 polynomial.
  79  *
  80  * DESCRIPTION
  81  *      The OSTA-UDF(tm) 1.50 standard states that using CRCs is mandatory.
  82  *      The polynomial used is: x^16 + x^12 + x^5 + 1
  83  *
  84  * PRE-CONDITIONS
  85  *      data            Pointer to the data block.
  86  *      size            Size of the data block.
  87  *
  88  * POST-CONDITIONS
  89  *      <return>        CRC of the data block.
  90  *
  91  * HISTORY
  92  *      July 21, 1997 - Andrew E. Mileski
  93  *      Adapted from OSTA-UDF(tm) 1.50 standard.
  94  */
  95 uint16_t crc16(uint8_t *data, uint32_t size, uint16_t crc)
  96 {
  97   while (size--)
  98     crc = crc_table[(crc >> 8 ^ *(data++)) & 0xffU] ^ (crc << 8);
  99
 100   return crc;
 101 }
 102
 103 /****************************************************************************/
 104 #if defined(CRCTEST)
 105
 106 /*
 107  * PURPOSE
 108  *  Test udf_crc()
 109  *
 110  * HISTORY
 111  *  July 21, 1997 - Andrew E. Mileski
 112  *  Adapted from OSTA-UDF(tm) 1.50 standard.
 113  */
 114
 115 #include <stdio.h>
 116
 117 unsigned char bytes[] = { 0x70U, 0x6AU, 0x77U };
 118
 119 void dump_table(void)
 120 {
 121   int i, j;
 122
 123     for(i=j=0;i<256;i++) {
 124       printf("0x%ux  ", crc_table[i]);
 125       j++;
 126       if(j % 8 == 0)printf("\n");
 127   }
 128 }
 129
 130
 131 int main(void)
 132 {
 133   unsigned int x;
 134
 135
 136   stdout = STREAM_GPSIM;
 137
 138   dump_table();
 139
 140   x = crc16(bytes, sizeof(bytes), 0);
 141   printf("crc16: calculated = %ux, correct = %ux\n", x, 0x3299U);
 142
 143   printf("test value = %d\n", -45);
 144
 145   return 0;
 146 }
 147
 148 #endif /* defined(CRCTEST) */
 149
 150 /****************************************************************************/
 151 #if defined(CRCGENERATE)
 152
 153 /*
 154  * PURPOSE
 155  *  Generate a table for fast 16-bit CRC calculations (any polynomial).
 156  *
 157  * DESCRIPTION
 158  *  The ITU-T V.41 polynomial is 010041.
 159  *
 160  * HISTORY
 161  *  July 21, 1997 - Andrew E. Mileski
 162  *  Adapted from OSTA-UDF(tm) 1.50 standard.
 163  */
 164
 165 #include <stdio.h>
 166
 167 int main(int argc, char **argv)
 168 {
 169   unsigned long crc, poly;
 170   int n, i;
 171
 172   /* Get the polynomial */
 173   sscanf(argv[1], "%lo", &poly);
 174   if (poly & 0xffff0000U){
 175     fprintf(stderr, "polynomial is too large\en");
 176     exit(1);
 177   }
 178
 179   printf("/* CRC %d 0%o 0x%x */\n", poly, poly, poly);
 180
 181   /* Create a table */
 182   printf("static unsigned short crc_table[256] = {\n");
 183   for (n = 0; n < 256; n++){
 184     if (n % 8 == 0)
 185       printf("\t");
 186     crc = n << 8;
 187     for (i = 0; i < 8; i++){
 188       if(crc & 0x8000U)
 189         crc = (crc << 1) ^ poly;
 190       else
 191         crc <<= 1;
 192     crc &= 0xFFFFU;
 193     }
 194     if (n == 255)
 195       printf("0x%04xU ", crc);
 196     else
 197       printf("0x%04xU, ", crc);
 198     if(n % 8 == 7)
 199       printf("\n");
 200   }
 201   printf("};\n");
 202
 203   return 0;
 204 }
 205
 206 #endif /* defined(CRCGENERATE) */