OpenSDE Framework (without history before r20070)
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

282 lines
8.7 KiB

  1. /*
  2. * --- T2-COPYRIGHT-NOTE-BEGIN ---
  3. * This copyright note is auto-generated by ./scripts/Create-CopyPatch.
  4. *
  5. * T2 SDE: misc/isomd5sum/md5.c
  6. * Copyright (C) 2004 - 2006 The T2 SDE Project
  7. *
  8. * More information can be found in the files COPYING and README.
  9. *
  10. * This program is free software; you can redistribute it and/or modify
  11. * it under the terms of the GNU General Public License as published by
  12. * the Free Software Foundation; version 2 of the License. A copy of the
  13. * GNU General Public License can be found in the file COPYING.
  14. * --- T2-COPYRIGHT-NOTE-END ---
  15. */
  16. /*
  17. * $Id: md5.c,v 1.3 2003/06/23 19:02:38 katzj Exp $
  18. *
  19. * This code implements the MD5 message-digest algorithm.
  20. * The algorithm is due to Ron Rivest. This code was
  21. * written by Colin Plumb in 1993, no copyright is claimed.
  22. * This code is in the public domain; do with it what you wish.
  23. *
  24. * Equivalent code is available from RSA Data Security, Inc.
  25. * This code has been tested against that, and is equivalent,
  26. * except that you don't need to include two pages of legalese
  27. * with every copy.
  28. *
  29. * To compute the message digest of a chunk of bytes, declare an
  30. * MD5Context structure, pass it to MD5Init, call MD5Update as
  31. * needed on buffers full of bytes, and then call MD5Final, which
  32. * will fill a supplied 16-byte array with the digest.
  33. *
  34. * Modified 12 June 2003 Jeremy Katz <katzj@redhat.com> to handle
  35. * endianness better
  36. *
  37. */
  38. #include <string.h>
  39. #include <endian.h>
  40. #include "md5.h"
  41. void MD5_Transform(uint32 *buf, uint32 const *in);
  42. #define IS_BIG_ENDIAN() (__BYTE_ORDER == __BIG_ENDIAN)
  43. #define IS_LITTLE_ENDIAN() (__BYTE_ORDER == __LITTLE_ENDIAN)
  44. static void byteReverse(unsigned char *buf, unsigned longs);
  45. #ifndef ASM_MD5
  46. /*
  47. * Note: this code is harmless on little-endian machines.
  48. */
  49. static void byteReverse(unsigned char *buf, unsigned longs)
  50. {
  51. uint32 t;
  52. do {
  53. t = (uint32) ((unsigned) buf[3] << 8 | buf[2]) << 16 |
  54. ((unsigned) buf[1] << 8 | buf[0]);
  55. *(uint32 *) buf = t;
  56. buf += 4;
  57. } while (--longs);
  58. }
  59. #endif
  60. /*
  61. * Start MD5 accumulation. Set bit count to 0 and buffer to mysterious
  62. * initialization constants.
  63. */
  64. void MD5_Init(struct MD5Context *ctx)
  65. {
  66. ctx->buf[0] = 0x67452301U;
  67. ctx->buf[1] = 0xefcdab89U;
  68. ctx->buf[2] = 0x98badcfeU;
  69. ctx->buf[3] = 0x10325476U;
  70. ctx->bits[0] = 0;
  71. ctx->bits[1] = 0;
  72. if (IS_BIG_ENDIAN())
  73. ctx->doByteReverse = 1;
  74. else
  75. ctx->doByteReverse = 0;
  76. }
  77. /*
  78. * Update context to reflect the concatenation of another buffer full
  79. * of bytes.
  80. */
  81. void MD5_Update(struct MD5Context *ctx, unsigned const char *buf, unsigned len)
  82. {
  83. uint32 t;
  84. /* Update bitcount */
  85. t = ctx->bits[0];
  86. if ((ctx->bits[0] = t + ((uint32) len << 3)) < t)
  87. ctx->bits[1]++; /* Carry from low to high */
  88. ctx->bits[1] += len >> 29;
  89. t = (t >> 3) & 0x3f; /* Bytes already in shsInfo->data */
  90. /* Handle any leading odd-sized chunks */
  91. if (t) {
  92. unsigned char *p = (unsigned char *) ctx->in + t;
  93. t = 64 - t;
  94. if (len < t) {
  95. memcpy(p, buf, len);
  96. return;
  97. }
  98. memcpy(p, buf, t);
  99. if (ctx->doByteReverse) byteReverse(ctx->in, 16);
  100. MD5_Transform(ctx->buf, (uint32 *) ctx->in);
  101. buf += t;
  102. len -= t;
  103. }
  104. /* Process data in 64-byte chunks */
  105. while (len >= 64) {
  106. memcpy(ctx->in, buf, 64);
  107. if (ctx->doByteReverse) byteReverse(ctx->in, 16);
  108. MD5_Transform(ctx->buf, (uint32 *) ctx->in);
  109. buf += 64;
  110. len -= 64;
  111. }
  112. /* Handle any remaining bytes of data. */
  113. memcpy(ctx->in, buf, len);
  114. }
  115. /*
  116. * Final wrapup - pad to 64-byte boundary with the bit pattern
  117. * 1 0* (64-bit count of bits processed, MSB-first)
  118. */
  119. void MD5_Final(unsigned char digest[16], struct MD5Context *ctx)
  120. {
  121. unsigned count;
  122. unsigned char *p;
  123. /* Compute number of bytes mod 64 */
  124. count = (ctx->bits[0] >> 3) & 0x3F;
  125. /* Set the first char of padding to 0x80. This is safe since there is
  126. always at least one byte free */
  127. p = ctx->in + count;
  128. *p++ = 0x80;
  129. /* Bytes of padding needed to make 64 bytes */
  130. count = 64 - 1 - count;
  131. /* Pad out to 56 mod 64 */
  132. if (count < 8) {
  133. /* Two lots of padding: Pad the first block to 64 bytes */
  134. memset(p, 0, count);
  135. if (ctx->doByteReverse) byteReverse(ctx->in, 16);
  136. MD5_Transform(ctx->buf, (uint32 *) ctx->in);
  137. /* Now fill the next block with 56 bytes */
  138. memset(ctx->in, 0, 56);
  139. } else {
  140. /* Pad block to 56 bytes */
  141. memset(p, 0, count - 8);
  142. }
  143. if (ctx->doByteReverse) byteReverse(ctx->in, 14);
  144. /* Append length in bits and transform */
  145. ((uint32 *) ctx->in)[14] = ctx->bits[0];
  146. ((uint32 *) ctx->in)[15] = ctx->bits[1];
  147. MD5_Transform(ctx->buf, (uint32 *) ctx->in);
  148. if (ctx->doByteReverse) byteReverse((unsigned char *) ctx->buf, 4);
  149. memcpy(digest, ctx->buf, 16);
  150. memset(ctx, 0, sizeof(ctx)); /* In case it's sensitive */
  151. }
  152. #ifndef ASM_MD5
  153. /* The four core functions - F1 is optimized somewhat */
  154. /* #define F1(x, y, z) (x & y | ~x & z) */
  155. #define F1(x, y, z) (z ^ (x & (y ^ z)))
  156. #define F2(x, y, z) F1(z, x, y)
  157. #define F3(x, y, z) (x ^ y ^ z)
  158. #define F4(x, y, z) (y ^ (x | ~z))
  159. /* This is the central step in the MD5 algorithm. */
  160. #define MD5STEP(f, w, x, y, z, data, s) \
  161. ( w += f(x, y, z) + data, w = w<<s | w>>(32-s), w += x )
  162. /*
  163. * The core of the MD5 algorithm, this alters an existing MD5 hash to
  164. * reflect the addition of 16 longwords of new data. MD5Update blocks
  165. * the data and converts bytes into longwords for this routine.
  166. */
  167. void MD5_Transform(uint32 buf[4], uint32 const in[16])
  168. {
  169. register uint32 a, b, c, d;
  170. a = buf[0];
  171. b = buf[1];
  172. c = buf[2];
  173. d = buf[3];
  174. MD5STEP(F1, a, b, c, d, in[0] + 0xd76aa478U, 7);
  175. MD5STEP(F1, d, a, b, c, in[1] + 0xe8c7b756U, 12);
  176. MD5STEP(F1, c, d, a, b, in[2] + 0x242070dbU, 17);
  177. MD5STEP(F1, b, c, d, a, in[3] + 0xc1bdceeeU, 22);
  178. MD5STEP(F1, a, b, c, d, in[4] + 0xf57c0fafU, 7);
  179. MD5STEP(F1, d, a, b, c, in[5] + 0x4787c62aU, 12);
  180. MD5STEP(F1, c, d, a, b, in[6] + 0xa8304613U, 17);
  181. MD5STEP(F1, b, c, d, a, in[7] + 0xfd469501U, 22);
  182. MD5STEP(F1, a, b, c, d, in[8] + 0x698098d8U, 7);
  183. MD5STEP(F1, d, a, b, c, in[9] + 0x8b44f7afU, 12);
  184. MD5STEP(F1, c, d, a, b, in[10] + 0xffff5bb1U, 17);
  185. MD5STEP(F1, b, c, d, a, in[11] + 0x895cd7beU, 22);
  186. MD5STEP(F1, a, b, c, d, in[12] + 0x6b901122U, 7);
  187. MD5STEP(F1, d, a, b, c, in[13] + 0xfd987193U, 12);
  188. MD5STEP(F1, c, d, a, b, in[14] + 0xa679438eU, 17);
  189. MD5STEP(F1, b, c, d, a, in[15] + 0x49b40821U, 22);
  190. MD5STEP(F2, a, b, c, d, in[1] + 0xf61e2562U, 5);
  191. MD5STEP(F2, d, a, b, c, in[6] + 0xc040b340U, 9);
  192. MD5STEP(F2, c, d, a, b, in[11] + 0x265e5a51U, 14);
  193. MD5STEP(F2, b, c, d, a, in[0] + 0xe9b6c7aaU, 20);
  194. MD5STEP(F2, a, b, c, d, in[5] + 0xd62f105dU, 5);
  195. MD5STEP(F2, d, a, b, c, in[10] + 0x02441453U, 9);
  196. MD5STEP(F2, c, d, a, b, in[15] + 0xd8a1e681U, 14);
  197. MD5STEP(F2, b, c, d, a, in[4] + 0xe7d3fbc8U, 20);
  198. MD5STEP(F2, a, b, c, d, in[9] + 0x21e1cde6U, 5);
  199. MD5STEP(F2, d, a, b, c, in[14] + 0xc33707d6U, 9);
  200. MD5STEP(F2, c, d, a, b, in[3] + 0xf4d50d87U, 14);
  201. MD5STEP(F2, b, c, d, a, in[8] + 0x455a14edU, 20);
  202. MD5STEP(F2, a, b, c, d, in[13] + 0xa9e3e905U, 5);
  203. MD5STEP(F2, d, a, b, c, in[2] + 0xfcefa3f8U, 9);
  204. MD5STEP(F2, c, d, a, b, in[7] + 0x676f02d9U, 14);
  205. MD5STEP(F2, b, c, d, a, in[12] + 0x8d2a4c8aU, 20);
  206. MD5STEP(F3, a, b, c, d, in[5] + 0xfffa3942U, 4);
  207. MD5STEP(F3, d, a, b, c, in[8] + 0x8771f681U, 11);
  208. MD5STEP(F3, c, d, a, b, in[11] + 0x6d9d6122U, 16);
  209. MD5STEP(F3, b, c, d, a, in[14] + 0xfde5380cU, 23);
  210. MD5STEP(F3, a, b, c, d, in[1] + 0xa4beea44U, 4);
  211. MD5STEP(F3, d, a, b, c, in[4] + 0x4bdecfa9U, 11);
  212. MD5STEP(F3, c, d, a, b, in[7] + 0xf6bb4b60U, 16);
  213. MD5STEP(F3, b, c, d, a, in[10] + 0xbebfbc70U, 23);
  214. MD5STEP(F3, a, b, c, d, in[13] + 0x289b7ec6U, 4);
  215. MD5STEP(F3, d, a, b, c, in[0] + 0xeaa127faU, 11);
  216. MD5STEP(F3, c, d, a, b, in[3] + 0xd4ef3085U, 16);
  217. MD5STEP(F3, b, c, d, a, in[6] + 0x04881d05U, 23);
  218. MD5STEP(F3, a, b, c, d, in[9] + 0xd9d4d039U, 4);
  219. MD5STEP(F3, d, a, b, c, in[12] + 0xe6db99e5U, 11);
  220. MD5STEP(F3, c, d, a, b, in[15] + 0x1fa27cf8U, 16);
  221. MD5STEP(F3, b, c, d, a, in[2] + 0xc4ac5665U, 23);
  222. MD5STEP(F4, a, b, c, d, in[0] + 0xf4292244U, 6);
  223. MD5STEP(F4, d, a, b, c, in[7] + 0x432aff97U, 10);
  224. MD5STEP(F4, c, d, a, b, in[14] + 0xab9423a7U, 15);
  225. MD5STEP(F4, b, c, d, a, in[5] + 0xfc93a039U, 21);
  226. MD5STEP(F4, a, b, c, d, in[12] + 0x655b59c3U, 6);
  227. MD5STEP(F4, d, a, b, c, in[3] + 0x8f0ccc92U, 10);
  228. MD5STEP(F4, c, d, a, b, in[10] + 0xffeff47dU, 15);
  229. MD5STEP(F4, b, c, d, a, in[1] + 0x85845dd1U, 21);
  230. MD5STEP(F4, a, b, c, d, in[8] + 0x6fa87e4fU, 6);
  231. MD5STEP(F4, d, a, b, c, in[15] + 0xfe2ce6e0U, 10);
  232. MD5STEP(F4, c, d, a, b, in[6] + 0xa3014314U, 15);
  233. MD5STEP(F4, b, c, d, a, in[13] + 0x4e0811a1U, 21);
  234. MD5STEP(F4, a, b, c, d, in[4] + 0xf7537e82U, 6);
  235. MD5STEP(F4, d, a, b, c, in[11] + 0xbd3af235U, 10);
  236. MD5STEP(F4, c, d, a, b, in[2] + 0x2ad7d2bbU, 15);
  237. MD5STEP(F4, b, c, d, a, in[9] + 0xeb86d391U, 21);
  238. buf[0] += a;
  239. buf[1] += b;
  240. buf[2] += c;
  241. buf[3] += d;
  242. }
  243. #endif