crc32.c File Reference

#include "zutil.h"
#include "crc32.h"

Include dependency graph for crc32.c:

Macros
#define	local   static
#define	TBLS   1
#define	DO1   crc = crc_table[0][((int)crc ^ (*buf++)) & 0xff] ^ (crc >> 8)
#define	DO8   DO1; DO1; DO1; DO1; DO1; DO1; DO1; DO1
#define	GF2_DIM   32 /* dimension of GF(2) vectors (length of CRC) */

Functions
static unsigned long gf2_matrix_times	OF ((unsigned long *mat, unsigned long vec))
static void gf2_matrix_square	OF ((unsigned long *square, unsigned long *mat))
static uLong crc32_combine_	OF ((uLong crc1, uLong crc2, z_off64_t len2))
const z_crc_t FAR *ZEXPORT	get_crc_table ()
unsigned long ZEXPORT	crc32 (unsigned long crc, const unsigned char FAR *buf, uInt len)
static unsigned long	gf2_matrix_times (unsigned long *mat, unsigned long vec)
static void	gf2_matrix_square (unsigned long *square, unsigned long *mat)
static uLong	crc32_combine_ (uLong crc1, uLong crc2, z_off64_t len2)
uLong ZEXPORT	crc32_combine (uLong crc1, uLong crc2, z_off_t len2)
uLong ZEXPORT	crc32_combine64 (uLong crc1, uLong crc2, z_off64_t len2)

Macro Definition Documentation

#define local   static

#define TBLS   1

#define DO1   crc = crc_table[0][((int)crc ^ (*buf++)) & 0xff] ^ (crc >> 8)

#define DO8   DO1; DO1; DO1; DO1; DO1; DO1; DO1; DO1

#define GF2_DIM   32 /* dimension of GF(2) vectors (length of CRC) */

Function Documentation

static unsigned long gf2_matrix_times OF ( (unsigned long *mat, unsigned long vec)  )

static

static void gf2_matrix_square OF ( (unsigned long *square, unsigned long *mat)  )

static

static uLong crc32_combine_ OF ( (uLong crc1, uLong crc2, z_off64_t len2)  )

static

const z_crc_t FAR* ZEXPORT get_crc_table

(

)

{
#ifdef DYNAMIC_CRC_TABLE
    if (crc_table_empty)
        make_crc_table();
#endif /* DYNAMIC_CRC_TABLE */
    return (const z_crc_t FAR *)crc_table;
}

unsigned long ZEXPORT crc32	(	unsigned long	crc,
		const unsigned char FAR *	buf,
		uInt	len
	)

{
    if (buf == Z_NULL) return 0UL;

#ifdef DYNAMIC_CRC_TABLE
    if (crc_table_empty)
        make_crc_table();
#endif /* DYNAMIC_CRC_TABLE */

#ifdef BYFOUR
    if (sizeof(void *) == sizeof(ptrdiff_t)) {
        z_crc_t endian;

        endian = 1;
        if (*((unsigned char *)(&endian)))
            return crc32_little(crc, buf, len);
        else
            return crc32_big(crc, buf, len);
    }
#endif /* BYFOUR */
    crc = crc ^ 0xffffffffUL;
    while (len >= 8) {
        DO8;
        len -= 8;
    }
    if (len) do {
        DO1;
    } while (--len);
    return crc ^ 0xffffffffUL;
}

static unsigned long gf2_matrix_times ( unsigned long *  mat, unsigned long  vec  )

static

{
    unsigned long sum;

    sum = 0;
    while (vec) {
        if (vec & 1)
            sum ^= *mat;
        vec >>= 1;
        mat++;
    }
    return sum;
}

static void gf2_matrix_square ( unsigned long *  square, unsigned long *  mat  )

static

{
    int n;

    for (n = 0; n < GF2_DIM; n++)
        square[n] = gf2_matrix_times(mat, mat[n]);
}

static uLong crc32_combine_ ( uLong  crc1, uLong  crc2, z_off64_t  len2  )

static

{
    int n;
    unsigned long row;
    unsigned long even[GF2_DIM];    /* even-power-of-two zeros operator */
    unsigned long odd[GF2_DIM];     /* odd-power-of-two zeros operator */

    /* degenerate case (also disallow negative lengths) */
    if (len2 <= 0)
        return crc1;

    /* put operator for one zero bit in odd */
    odd[0] = 0xedb88320UL;          /* CRC-32 polynomial */
    row = 1;
    for (n = 1; n < GF2_DIM; n++) {
        odd[n] = row;
        row <<= 1;
    }

    /* put operator for two zero bits in even */
    gf2_matrix_square(even, odd);

    /* put operator for four zero bits in odd */
    gf2_matrix_square(odd, even);

    /* apply len2 zeros to crc1 (first square will put the operator for one
       zero byte, eight zero bits, in even) */
    do {
        /* apply zeros operator for this bit of len2 */
        gf2_matrix_square(even, odd);
        if (len2 & 1)
            crc1 = gf2_matrix_times(even, crc1);
        len2 >>= 1;

        /* if no more bits set, then done */
        if (len2 == 0)
            break;

        /* another iteration of the loop with odd and even swapped */
        gf2_matrix_square(odd, even);
        if (len2 & 1)
            crc1 = gf2_matrix_times(odd, crc1);
        len2 >>= 1;

        /* if no more bits set, then done */
    } while (len2 != 0);

    /* return combined crc */
    crc1 ^= crc2;
    return crc1;
}

uLong ZEXPORT crc32_combine	(	uLong	crc1,
		uLong	crc2,
		z_off_t	len2
	)

{
    return crc32_combine_(crc1, crc2, len2);
}

uLong ZEXPORT crc32_combine64	(	uLong	crc1,
		uLong	crc2,
		z_off64_t	len2
	)

{
    return crc32_combine_(crc1, crc2, len2);
}