00001
00063 #define md5_INCLUDED_C
00064 #include "md5.h"
00065
00066
00067
00068 #include "dkcOSIndependent.h"
00069
00070 #undef BYTE_ORDER
00071 #ifdef ARCH_IS_BIG_ENDIAN
00072 # define BYTE_ORDER (ARCH_IS_BIG_ENDIAN ? 1 : -1)
00073 #else
00074 # define BYTE_ORDER 0
00075 #endif
00076 #define T_MASK ((md5_word_t)~0)
00077 #define T1 (T_MASK ^ 0x28955b87)
00078 #define T2 (T_MASK ^ 0x173848a9)
00079 #define T3 0x242070db
00080 #define T4 (T_MASK ^ 0x3e423111)
00081 #define T5 (T_MASK ^ 0x0a83f050)
00082 #define T6 0x4787c62a
00083 #define T7 (T_MASK ^ 0x57cfb9ec)
00084 #define T8 (T_MASK ^ 0x02b96afe)
00085 #define T9 0x698098d8
00086 #define T10 (T_MASK ^ 0x74bb0850)
00087 #define T11 (T_MASK ^ 0x0000a44e)
00088 #define T12 (T_MASK ^ 0x76a32841)
00089 #define T13 0x6b901122
00090 #define T14 (T_MASK ^ 0x02678e6c)
00091 #define T15 (T_MASK ^ 0x5986bc71)
00092 #define T16 0x49b40821
00093 #define T17 (T_MASK ^ 0x09e1da9d)
00094 #define T18 (T_MASK ^ 0x3fbf4cbf)
00095 #define T19 0x265e5a51
00096 #define T20 (T_MASK ^ 0x16493855)
00097 #define T21 (T_MASK ^ 0x29d0efa2)
00098 #define T22 0x02441453
00099 #define T23 (T_MASK ^ 0x275e197e)
00100 #define T24 (T_MASK ^ 0x182c0437)
00101 #define T25 0x21e1cde6
00102 #define T26 (T_MASK ^ 0x3cc8f829)
00103 #define T27 (T_MASK ^ 0x0b2af278)
00104 #define T28 0x455a14ed
00105 #define T29 (T_MASK ^ 0x561c16fa)
00106 #define T30 (T_MASK ^ 0x03105c07)
00107 #define T31 0x676f02d9
00108 #define T32 (T_MASK ^ 0x72d5b375)
00109 #define T33 (T_MASK ^ 0x0005c6bd)
00110 #define T34 (T_MASK ^ 0x788e097e)
00111 #define T35 0x6d9d6122
00112 #define T36 (T_MASK ^ 0x021ac7f3)
00113 #define T37 (T_MASK ^ 0x5b4115bb)
00114 #define T38 0x4bdecfa9
00115 #define T39 (T_MASK ^ 0x0944b49f)
00116 #define T40 (T_MASK ^ 0x4140438f)
00117 #define T41 0x289b7ec6
00118 #define T42 (T_MASK ^ 0x155ed805)
00119 #define T43 (T_MASK ^ 0x2b10cf7a)
00120 #define T44 0x04881d05
00121 #define T45 (T_MASK ^ 0x262b2fc6)
00122 #define T46 (T_MASK ^ 0x1924661a)
00123 #define T47 0x1fa27cf8
00124 #define T48 (T_MASK ^ 0x3b53a99a)
00125 #define T49 (T_MASK ^ 0x0bd6ddbb)
00126 #define T50 0x432aff97
00127 #define T51 (T_MASK ^ 0x546bdc58)
00128 #define T52 (T_MASK ^ 0x036c5fc6)
00129 #define T53 0x655b59c3
00130 #define T54 (T_MASK ^ 0x70f3336d)
00131 #define T55 (T_MASK ^ 0x00100b82)
00132 #define T56 (T_MASK ^ 0x7a7ba22e)
00133 #define T57 0x6fa87e4f
00134 #define T58 (T_MASK ^ 0x01d3191f)
00135 #define T59 (T_MASK ^ 0x5cfebceb)
00136 #define T60 0x4e0811a1
00137 #define T61 (T_MASK ^ 0x08ac817d)
00138 #define T62 (T_MASK ^ 0x42c50dca)
00139 #define T63 0x2ad7d2bb
00140 #define T64 (T_MASK ^ 0x14792c6e)
00141
00142
00143 static void
00144 md5_process(md5_state_t *pms, const md5_byte_t *data )
00145 {
00146 md5_word_t
00147 a = pms->abcd[0], b = pms->abcd[1],
00148 c = pms->abcd[2], d = pms->abcd[3];
00149 md5_word_t t;
00150 #if BYTE_ORDER > 0
00151
00152 md5_word_t X[16];
00153 #else
00154
00155 md5_word_t xbuf[16];
00156 const md5_word_t *X;
00157 #endif
00158 {
00159 #if BYTE_ORDER == 0
00160
00161
00162
00163
00164
00165 static const int w = 1;
00166 if (*((const md5_byte_t *)&w))
00167 #endif
00168 #if BYTE_ORDER <= 0
00169 {
00170
00171
00172
00173
00174 if (!((data - (const md5_byte_t *)0) & 3)) {
00175
00176 X = (const md5_word_t *)data;
00177 } else {
00178
00179 memcpy(xbuf, data, 64);
00180 X = xbuf;
00181 }
00182 }
00183 #endif
00184 #if BYTE_ORDER == 0
00185 else
00186 #endif
00187 #if BYTE_ORDER >= 0
00188 {
00189
00190
00191
00192
00193 const md5_byte_t *xp = data;
00194 int i;
00195 # if BYTE_ORDER == 0
00196 X = xbuf;
00197 # else
00198 # define xbuf X
00199 # endif
00200 for (i = 0; i < 16; ++i, xp += 4)
00201 xbuf[i] = xp[0] + (xp[1] << 8) + (xp[2] << 16) + (xp[3] << 24);
00202 }
00203 #endif
00204 }
00205 #define ROTATE_LEFT(x, n) (((x) << (n)) | ((x) >> (32 - (n))))
00206
00207
00208
00209 #define F(x, y, z) (((x) & (y)) | (~(x) & (z)))
00210 #define SET(a, b, c, d, k, s, Ti)\
00211 t = a + F(b,c,d) + X[k] + Ti;\
00212 a = ROTATE_LEFT(t, s) + b
00213
00214 SET(a, b, c, d, 0, 7, T1);
00215 SET(d, a, b, c, 1, 12, T2);
00216 SET(c, d, a, b, 2, 17, T3);
00217 SET(b, c, d, a, 3, 22, T4);
00218 SET(a, b, c, d, 4, 7, T5);
00219 SET(d, a, b, c, 5, 12, T6);
00220 SET(c, d, a, b, 6, 17, T7);
00221 SET(b, c, d, a, 7, 22, T8);
00222 SET(a, b, c, d, 8, 7, T9);
00223 SET(d, a, b, c, 9, 12, T10);
00224 SET(c, d, a, b, 10, 17, T11);
00225 SET(b, c, d, a, 11, 22, T12);
00226 SET(a, b, c, d, 12, 7, T13);
00227 SET(d, a, b, c, 13, 12, T14);
00228 SET(c, d, a, b, 14, 17, T15);
00229 SET(b, c, d, a, 15, 22, T16);
00230 #undef SET
00231
00232
00233
00234 #define G(x, y, z) (((x) & (z)) | ((y) & ~(z)))
00235 #define SET(a, b, c, d, k, s, Ti)\
00236 t = a + G(b,c,d) + X[k] + Ti;\
00237 a = ROTATE_LEFT(t, s) + b
00238
00239 SET(a, b, c, d, 1, 5, T17);
00240 SET(d, a, b, c, 6, 9, T18);
00241 SET(c, d, a, b, 11, 14, T19);
00242 SET(b, c, d, a, 0, 20, T20);
00243 SET(a, b, c, d, 5, 5, T21);
00244 SET(d, a, b, c, 10, 9, T22);
00245 SET(c, d, a, b, 15, 14, T23);
00246 SET(b, c, d, a, 4, 20, T24);
00247 SET(a, b, c, d, 9, 5, T25);
00248 SET(d, a, b, c, 14, 9, T26);
00249 SET(c, d, a, b, 3, 14, T27);
00250 SET(b, c, d, a, 8, 20, T28);
00251 SET(a, b, c, d, 13, 5, T29);
00252 SET(d, a, b, c, 2, 9, T30);
00253 SET(c, d, a, b, 7, 14, T31);
00254 SET(b, c, d, a, 12, 20, T32);
00255 #undef SET
00256
00257
00258
00259 #define H(x, y, z) ((x) ^ (y) ^ (z))
00260 #define SET(a, b, c, d, k, s, Ti)\
00261 t = a + H(b,c,d) + X[k] + Ti;\
00262 a = ROTATE_LEFT(t, s) + b
00263
00264 SET(a, b, c, d, 5, 4, T33);
00265 SET(d, a, b, c, 8, 11, T34);
00266 SET(c, d, a, b, 11, 16, T35);
00267 SET(b, c, d, a, 14, 23, T36);
00268 SET(a, b, c, d, 1, 4, T37);
00269 SET(d, a, b, c, 4, 11, T38);
00270 SET(c, d, a, b, 7, 16, T39);
00271 SET(b, c, d, a, 10, 23, T40);
00272 SET(a, b, c, d, 13, 4, T41);
00273 SET(d, a, b, c, 0, 11, T42);
00274 SET(c, d, a, b, 3, 16, T43);
00275 SET(b, c, d, a, 6, 23, T44);
00276 SET(a, b, c, d, 9, 4, T45);
00277 SET(d, a, b, c, 12, 11, T46);
00278 SET(c, d, a, b, 15, 16, T47);
00279 SET(b, c, d, a, 2, 23, T48);
00280 #undef SET
00281
00282
00283
00284 #define I(x, y, z) ((y) ^ ((x) | ~(z)))
00285 #define SET(a, b, c, d, k, s, Ti)\
00286 t = a + I(b,c,d) + X[k] + Ti;\
00287 a = ROTATE_LEFT(t, s) + b
00288
00289 SET(a, b, c, d, 0, 6, T49);
00290 SET(d, a, b, c, 7, 10, T50);
00291 SET(c, d, a, b, 14, 15, T51);
00292 SET(b, c, d, a, 5, 21, T52);
00293 SET(a, b, c, d, 12, 6, T53);
00294 SET(d, a, b, c, 3, 10, T54);
00295 SET(c, d, a, b, 10, 15, T55);
00296 SET(b, c, d, a, 1, 21, T56);
00297 SET(a, b, c, d, 8, 6, T57);
00298 SET(d, a, b, c, 15, 10, T58);
00299 SET(c, d, a, b, 6, 15, T59);
00300 SET(b, c, d, a, 13, 21, T60);
00301 SET(a, b, c, d, 4, 6, T61);
00302 SET(d, a, b, c, 11, 10, T62);
00303 SET(c, d, a, b, 2, 15, T63);
00304 SET(b, c, d, a, 9, 21, T64);
00305 #undef SET
00306
00307
00308
00309 pms->abcd[0] += a;
00310 pms->abcd[1] += b;
00311 pms->abcd[2] += c;
00312 pms->abcd[3] += d;
00313 }
00314 void
00315 md5_init(md5_state_t *pms)
00316 {
00317 pms->count[0] = pms->count[1] = 0;
00318 pms->abcd[0] = 0x67452301;
00319 pms->abcd[1] = T_MASK ^ 0x10325476;
00320 pms->abcd[2] = T_MASK ^ 0x67452301;
00321 pms->abcd[3] = 0x10325476;
00322 }
00323 void
00324 md5_append(md5_state_t *pms, const md5_byte_t *data, int nbytes)
00325 {
00326 const md5_byte_t *p = data;
00327 int left = nbytes;
00328 int offset = (pms->count[0] >> 3) & 63;
00329 md5_word_t nbits = (md5_word_t)(nbytes << 3);
00330
00331 if (nbytes <= 0)
00332 return;
00333
00334 pms->count[1] += nbytes >> 29;
00335 pms->count[0] += nbits;
00336 if (pms->count[0] < nbits)
00337 pms->count[1]++;
00338
00339 if (offset) {
00340 int copy = (offset + nbytes > 64 ? 64 - offset : nbytes);
00341 memcpy(pms->buf + offset, p, copy);
00342 if (offset + copy < 64)
00343 return;
00344 p += copy;
00345 left -= copy;
00346 md5_process(pms, pms->buf);
00347 }
00348
00349 for (; left >= 64; p += 64, left -= 64)
00350 md5_process(pms, p);
00351
00352 if (left)
00353 memcpy(pms->buf, p, left);
00354 }
00355
00356
00357 void
00358 md5_finish(md5_state_t *pms, md5_byte_t digest[16])
00359 {
00360 md5_finalize(pms);
00361 md5_get_digest(pms,digest);
00362 }
00363
00364
00365
00366
00367
00368 void md5_finalize(md5_state_t *pms){
00369 static const md5_byte_t pad[64] = {
00370 0x80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
00371 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
00372 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
00373 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
00374 };
00375 md5_byte_t data[8];
00376 int i;
00377
00378 for (i = 0; i < 8; ++i){
00379 data[i] = (md5_byte_t)(pms->count[i >> 2] >> ((i & 3) << 3));
00380 }
00381
00382 md5_append(pms, pad, ((55 - (pms->count[0] >> 3)) & 63) + 1);
00383
00384 md5_append(pms, data, 8);
00385 }
00386
00387 void md5_get_digest(md5_state_t *pms,md5_byte_t digest[16]){
00388 int i;
00389 for (i = 0; i < 16; ++i){
00390 digest[i] = (md5_byte_t)(pms->abcd[i >> 2] >> ((i & 3) << 3));
00391 }
00392 }
00393
00394 void md5_get_str_digest(md5_state_t *pms,char digest[32 + 1]){
00395 md5_byte_t temp[16];
00396 int i;
00397
00398 md5_get_digest(pms,temp);
00399
00400
00401 for (i=0; i<16; i++){
00402
00403 sprintf(digest+i*2,"%02x", temp[i]);
00404 }
00405 digest[32]='\0';
00406 }
00407
00408 #if 0
00409 void
00410 md5_finish(md5_state_t *pms, md5_byte_t digest[16])
00411 {
00412 static const md5_byte_t pad[64] = {
00413 0x80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
00414 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
00415 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
00416 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
00417 };
00418 md5_byte_t data[8];
00419 int i;
00420
00421 for (i = 0; i < 8; ++i){
00422 data[i] = (md5_byte_t)(pms->count[i >> 2] >> ((i & 3) << 3));
00423 }
00424
00425 md5_append(pms, pad, ((55 - (pms->count[0] >> 3)) & 63) + 1);
00426
00427 md5_append(pms, data, 8);
00428 for (i = 0; i < 16; ++i){
00429 digest[i] = (md5_byte_t)(pms->abcd[i >> 2] >> ((i & 3) << 3));
00430 }
00431 }
00432 #endif
00433
00434