1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
|
/*
This file is part of GNUnet.
Copyright (C) 2001, 2002, 2003, 2004, 2006 GNUnet e.V.
GNUnet is free software: you can redistribute it and/or modify it
under the terms of the GNU Affero General Public License as published
by the Free Software Foundation, either version 3 of the License,
or (at your option) any later version.
GNUnet is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Affero General Public License for more details.
You should have received a copy of the GNU Affero General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>.
For the actual CRC-32 code:
Copyright abandoned; this code is in the public domain.
Provided to GNUnet by peter@horizon.com
*/
/**
* @file util/crypto_crc.c
* @brief implementation of CRC16 and CRC32
* @author Christian Grothoff
*/
#include "platform.h"
#include "gnunet_crypto_lib.h"
#define LOG(kind,...) GNUNET_log_from (kind, "util-crypto-crc", __VA_ARGS__)
/* Avoid wasting space on 8-byte longs. */
#if UINT_MAX >= 0xffffffff
typedef unsigned int GNUNET_uLong;
#elif ULONG_MAX >= 0xffffffff
typedef unsigned long GNUNET_uLong;
#else
#error This compiler is not ANSI-compliant!
#endif
#define Z_NULL 0
#define POLYNOMIAL (GNUNET_uLong)0xedb88320
static GNUNET_uLong crc_table[256];
/*
* This routine writes each crc_table entry exactly once,
* with the correct final value. Thus, it is safe to call
* even on a table that someone else is using concurrently.
*/
static void
crc_init ()
{
static int once;
unsigned int i, j;
GNUNET_uLong h = 1;
if (once)
return;
once = 1;
crc_table[0] = 0;
for (i = 128; i; i >>= 1)
{
h = (h >> 1) ^ ((h & 1) ? POLYNOMIAL : 0);
/* h is now crc_table[i] */
for (j = 0; j < 256; j += 2 * i)
crc_table[i + j] = crc_table[j] ^ h;
}
}
/*
* This computes the standard preset and inverted CRC, as used
* by most networking standards. Start by passing in an initial
* chaining value of 0, and then pass in the return value from the
* previous crc32() call. The final return value is the CRC.
* Note that this is a little-endian CRC, which is best used with
* data transmitted lsbit-first, and it should, itself, be appended
* to data in little-endian byte and bit order to preserve the
* property of detecting all burst errors of length 32 bits or less.
*/
static GNUNET_uLong
crc32 (GNUNET_uLong crc, const char *buf, size_t len)
{
crc_init ();
GNUNET_assert (crc_table[255] != 0);
crc ^= 0xffffffff;
while (len--)
crc = (crc >> 8) ^ crc_table[(crc ^ *buf++) & 0xff];
return crc ^ 0xffffffff;
}
/**
* Compute the CRC32 checksum for the first len bytes of the buffer.
*
* @param buf the data over which we're taking the CRC
* @param len the length of the buffer
* @return the resulting CRC32 checksum
*/
int32_t
GNUNET_CRYPTO_crc32_n (const void *buf, size_t len)
{
GNUNET_uLong crc;
crc = crc32 (0L, Z_NULL, 0);
crc = crc32 (crc, (char *) buf, len);
return crc;
}
/**
* Perform an incremental step in a CRC16 (for TCP/IP) calculation.
*
* @param sum current sum, initially 0
* @param buf buffer to calculate CRC over (must be 16-bit aligned)
* @param len number of bytes in hdr, must be multiple of 2
* @return updated crc sum (must be subjected to #GNUNET_CRYPTO_crc16_finish() to get actual crc16)
*/
uint32_t
GNUNET_CRYPTO_crc16_step (uint32_t sum, const void *buf, size_t len)
{
const uint16_t *hdr = buf;
for (; len >= 2; len -= 2)
sum += *(hdr++);
if (len == 1)
sum += (*hdr) & ntohs(0xFF00);
return sum;
}
/**
* Convert results from #GNUNET_CRYPTO_crc16_step() to final crc16.
*
* @param sum cummulative sum
* @return crc16 value
*/
uint16_t
GNUNET_CRYPTO_crc16_finish (uint32_t sum)
{
sum = (sum >> 16) + (sum & 0xFFFF);
sum += (sum >> 16);
return ~sum;
}
/**
* Calculate the checksum of a buffer in one step.
*
* @param buf buffer to calculate CRC over (must be 16-bit aligned)
* @param len number of bytes in hdr, must be multiple of 2
* @return crc16 value
*/
uint16_t
GNUNET_CRYPTO_crc16_n (const void *buf, size_t len)
{
const uint16_t *hdr = buf;
uint32_t sum = GNUNET_CRYPTO_crc16_step (0, hdr, len);
return GNUNET_CRYPTO_crc16_finish (sum);
}
/**
* @ingroup hash
* Calculate the checksum of a buffer in one step.
*
* @param buf buffer to calculate CRC over
* @param len number of bytes in @a buf
* @return crc8 value
*/
uint8_t
GNUNET_CRYPTO_crc8_n (const void *buf,
size_t len)
{
const uint8_t *data = buf;
unsigned int crc = 0;
int i;
int j;
for (j = len; 0 != j; j--)
{
crc ^= (*data++ << 8);
for (i = 8; 0 != i; i--)
{
if (0 != (crc & 0x8000))
crc ^= (0x1070 << 3);
crc <<= 1;
}
}
return (uint8_t) (crc >> 8);
}
/* end of crypto_crc.c */
|
