git.sesse.net Git - ffmpeg/blob - libavutil/crc.c

   1 /*
   2  * copyright (c) 2006 Michael Niedermayer <michaelni@gmx.at>
   3  *
   4  * This file is part of Libav.
   5  *
   6  * Libav is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * Libav is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with Libav; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  19  */
  20
  21 #include "config.h"
  22 #include "common.h"
  23 #include "bswap.h"
  24 #include "crc.h"
  25
  26 #if CONFIG_HARDCODED_TABLES
  27 #include "crc_data.h"
  28 #else
  29 static struct {
  30     uint8_t  le;
  31     uint8_t  bits;
  32     uint32_t poly;
  33 } av_crc_table_params[AV_CRC_MAX] = {
  34     [AV_CRC_8_ATM]      = { 0,  8,       0x07 },
  35     [AV_CRC_16_ANSI]    = { 0, 16,     0x8005 },
  36     [AV_CRC_16_CCITT]   = { 0, 16,     0x1021 },
  37     [AV_CRC_32_IEEE]    = { 0, 32, 0x04C11DB7 },
  38     [AV_CRC_32_IEEE_LE] = { 1, 32, 0xEDB88320 },
  39 };
  40 static AVCRC av_crc_table[AV_CRC_MAX][257];
  41 #endif
  42
  43 int av_crc_init(AVCRC *ctx, int le, int bits, uint32_t poly, int ctx_size)
  44 {
  45     unsigned i, j;
  46     uint32_t c;
  47
  48     if (bits < 8 || bits > 32 || poly >= (1LL << bits))
  49         return -1;
  50     if (ctx_size != sizeof(AVCRC) * 257 && ctx_size != sizeof(AVCRC) * 1024)
  51         return -1;
  52
  53     for (i = 0; i < 256; i++) {
  54         if (le) {
  55             for (c = i, j = 0; j < 8; j++)
  56                 c = (c >> 1) ^ (poly & (-(c & 1)));
  57             ctx[i] = c;
  58         } else {
  59             for (c = i << 24, j = 0; j < 8; j++)
  60                 c = (c << 1) ^ ((poly << (32 - bits)) & (((int32_t) c) >> 31));
  61             ctx[i] = av_bswap32(c);
  62         }
  63     }
  64     ctx[256] = 1;
  65 #if !CONFIG_SMALL
  66     if (ctx_size >= sizeof(AVCRC) * 1024)
  67         for (i = 0; i < 256; i++)
  68             for (j = 0; j < 3; j++)
  69                 ctx[256 *(j + 1) + i] =
  70                     (ctx[256 * j + i] >> 8) ^ ctx[ctx[256 * j + i] & 0xFF];
  71 #endif
  72
  73     return 0;
  74 }
  75
  76 const AVCRC *av_crc_get_table(AVCRCId crc_id)
  77 {
  78 #if !CONFIG_HARDCODED_TABLES
  79     if (!av_crc_table[crc_id][FF_ARRAY_ELEMS(av_crc_table[crc_id]) - 1])
  80         if (av_crc_init(av_crc_table[crc_id],
  81                         av_crc_table_params[crc_id].le,
  82                         av_crc_table_params[crc_id].bits,
  83                         av_crc_table_params[crc_id].poly,
  84                         sizeof(av_crc_table[crc_id])) < 0)
  85             return NULL;
  86 #endif
  87     return av_crc_table[crc_id];
  88 }
  89
  90 uint32_t av_crc(const AVCRC *ctx, uint32_t crc,
  91                 const uint8_t *buffer, size_t length)
  92 {
  93     const uint8_t *end = buffer + length;
  94
  95 #if !CONFIG_SMALL
  96     if (!ctx[256]) {
  97         while (((intptr_t) buffer & 3) && buffer < end)
  98             crc = ctx[((uint8_t) crc) ^ *buffer++] ^ (crc >> 8);
  99
 100         while (buffer < end - 3) {
 101             crc ^= av_le2ne32(*(const uint32_t *) buffer); buffer += 4;
 102             crc = ctx[3 * 256 + ( crc        & 0xFF)] ^
 103                   ctx[2 * 256 + ((crc >> 8 ) & 0xFF)] ^
 104                   ctx[1 * 256 + ((crc >> 16) & 0xFF)] ^
 105                   ctx[0 * 256 + ((crc >> 24)       )];
 106         }
 107     }
 108 #endif
 109     while (buffer < end)
 110         crc = ctx[((uint8_t) crc) ^ *buffer++] ^ (crc >> 8);
 111
 112     return crc;
 113 }
 114
 115 #ifdef TEST
 116 int main(void)
 117 {
 118     uint8_t buf[1999];
 119     int i;
 120     int p[4][3] = { { AV_CRC_32_IEEE_LE, 0xEDB88320, 0x3D5CDD04 },
 121                     { AV_CRC_32_IEEE   , 0x04C11DB7, 0xC0F5BAE0 },
 122                     { AV_CRC_16_ANSI   , 0x8005    , 0x1FBB     },
 123                     { AV_CRC_8_ATM     , 0x07      , 0xE3       }
 124     };
 125     const AVCRC *ctx;
 126
 127     for (i = 0; i < sizeof(buf); i++)
 128         buf[i] = i + i * i;
 129
 130     for (i = 0; i < 4; i++) {
 131         ctx = av_crc_get_table(p[i][0]);
 132         printf("crc %08X = %X\n", p[i][1], av_crc(ctx, 0, buf, sizeof(buf)));
 133     }
 134     return 0;
 135 }
 136 #endif