开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 加密解密 > CA认证 > 查看源码
md5.c
资源名称：nss-3.1.1.tar.gz　[点击查看]
上传用户：lyxiangda
上传日期：2007-01-12
资源大小：3042k
文件大小：14k
源码类别：

CA认证

开发平台：

WINDOWS

md5.c：源码内容
  1. /*
  2.  * The contents of this file are subject to the Mozilla Public
  3.  * License Version 1.1 (the "License"); you may not use this file
  4.  * except in compliance with the License. You may obtain a copy of
  5.  * the License at http://www.mozilla.org/MPL/
  6.  * 
  7.  * Software distributed under the License is distributed on an "AS
  8.  * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
  9.  * implied. See the License for the specific language governing
  10.  * rights and limitations under the License.
  11.  * 
  12.  * The Original Code is the Netscape security libraries.
  13.  * 
  14.  * The Initial Developer of the Original Code is Netscape
  15.  * Communications Corporation. Portions created by Netscape are 
  16.  * Copyright (C) 1994-2000 Netscape Communications Corporation.  All
  17.  * Rights Reserved.
  18.  * 
  19.  * Contributor(s):
  20.  * 
  21.  * Alternatively, the contents of this file may be used under the
  22.  * terms of the GNU General Public License Version 2 or later (the
  23.  * "GPL"), in which case the provisions of the GPL are applicable 
  24.  * instead of those above. If you wish to allow use of your 
  25.  * version of this file only under the terms of the GPL and not to
  26.  * allow others to use your version of this file under the MPL,
  27.  * indicate your decision by deleting the provisions above and
  28.  * replace them with the notice and other provisions required by
  29.  * the GPL.  If you do not delete the provisions above, a recipient
  30.  * may use your version of this file under either the MPL or the
  31.  * GPL.
  32.  */
  34. #include "prerr.h"
  35. #include "secerr.h"
  37. #include "prtypes.h"
  38. #include "prlong.h"
  40. #include "blapi.h"
  42. #define MD5_HASH_LEN 16
  43. #define MD5_BUFFER_SIZE 64
  44. #define MD5_END_BUFFER (MD5_BUFFER_SIZE - 8)
  46. #define CV0_1 0x67452301
  47. #define CV0_2 0xefcdab89
  48. #define CV0_3 0x98badcfe
  49. #define CV0_4 0x10325476
  51. #define T1_0  0xd76aa478
  52. #define T1_1  0xe8c7b756
  53. #define T1_2  0x242070db
  54. #define T1_3  0xc1bdceee
  55. #define T1_4  0xf57c0faf
  56. #define T1_5  0x4787c62a
  57. #define T1_6  0xa8304613
  58. #define T1_7  0xfd469501
  59. #define T1_8  0x698098d8
  60. #define T1_9  0x8b44f7af
  61. #define T1_10 0xffff5bb1
  62. #define T1_11 0x895cd7be
  63. #define T1_12 0x6b901122
  64. #define T1_13 0xfd987193
  65. #define T1_14 0xa679438e
  66. #define T1_15 0x49b40821
  68. #define T2_0  0xf61e2562
  69. #define T2_1  0xc040b340
  70. #define T2_2  0x265e5a51
  71. #define T2_3  0xe9b6c7aa
  72. #define T2_4  0xd62f105d
  73. #define T2_5  0x02441453
  74. #define T2_6  0xd8a1e681
  75. #define T2_7  0xe7d3fbc8
  76. #define T2_8  0x21e1cde6
  77. #define T2_9  0xc33707d6
  78. #define T2_10 0xf4d50d87
  79. #define T2_11 0x455a14ed
  80. #define T2_12 0xa9e3e905
  81. #define T2_13 0xfcefa3f8
  82. #define T2_14 0x676f02d9
  83. #define T2_15 0x8d2a4c8a
  85. #define T3_0  0xfffa3942
  86. #define T3_1  0x8771f681
  87. #define T3_2  0x6d9d6122
  88. #define T3_3  0xfde5380c
  89. #define T3_4  0xa4beea44
  90. #define T3_5  0x4bdecfa9
  91. #define T3_6  0xf6bb4b60
  92. #define T3_7  0xbebfbc70
  93. #define T3_8  0x289b7ec6
  94. #define T3_9  0xeaa127fa
  95. #define T3_10 0xd4ef3085
  96. #define T3_11 0x04881d05
  97. #define T3_12 0xd9d4d039
  98. #define T3_13 0xe6db99e5
  99. #define T3_14 0x1fa27cf8
  100. #define T3_15 0xc4ac5665
  102. #define T4_0  0xf4292244
  103. #define T4_1  0x432aff97
  104. #define T4_2  0xab9423a7
  105. #define T4_3  0xfc93a039
  106. #define T4_4  0x655b59c3
  107. #define T4_5  0x8f0ccc92
  108. #define T4_6  0xffeff47d
  109. #define T4_7  0x85845dd1
  110. #define T4_8  0x6fa87e4f
  111. #define T4_9  0xfe2ce6e0
  112. #define T4_10 0xa3014314
  113. #define T4_11 0x4e0811a1
  114. #define T4_12 0xf7537e82
  115. #define T4_13 0xbd3af235
  116. #define T4_14 0x2ad7d2bb
  117. #define T4_15 0xeb86d391
  119. #define R1B0  0
  120. #define R1B1  1
  121. #define R1B2  2
  122. #define R1B3  3
  123. #define R1B4  4
  124. #define R1B5  5
  125. #define R1B6  6
  126. #define R1B7  7
  127. #define R1B8  8
  128. #define R1B9  9
  129. #define R1B10 10
  130. #define R1B11 11
  131. #define R1B12 12
  132. #define R1B13 13
  133. #define R1B14 14
  134. #define R1B15 15
  136. #define R2B0  1
  137. #define R2B1  6
  138. #define R2B2  11
  139. #define R2B3  0
  140. #define R2B4  5
  141. #define R2B5  10
  142. #define R2B6  15
  143. #define R2B7  4
  144. #define R2B8  9
  145. #define R2B9  14
  146. #define R2B10 3 
  147. #define R2B11 8 
  148. #define R2B12 13
  149. #define R2B13 2 
  150. #define R2B14 7 
  151. #define R2B15 12
  153. #define R3B0  5
  154. #define R3B1  8
  155. #define R3B2  11
  156. #define R3B3  14
  157. #define R3B4  1
  158. #define R3B5  4
  159. #define R3B6  7
  160. #define R3B7  10
  161. #define R3B8  13
  162. #define R3B9  0
  163. #define R3B10 3 
  164. #define R3B11 6 
  165. #define R3B12 9 
  166. #define R3B13 12
  167. #define R3B14 15
  168. #define R3B15 2 
  170. #define R4B0  0
  171. #define R4B1  7
  172. #define R4B2  14
  173. #define R4B3  5
  174. #define R4B4  12
  175. #define R4B5  3
  176. #define R4B6  10
  177. #define R4B7  1
  178. #define R4B8  8
  179. #define R4B9  15
  180. #define R4B10 6 
  181. #define R4B11 13
  182. #define R4B12 4 
  183. #define R4B13 11
  184. #define R4B14 2 
  185. #define R4B15 9 
  187. #define S1_0 7
  188. #define S1_1 12
  189. #define S1_2 17
  190. #define S1_3 22
  192. #define S2_0 5
  193. #define S2_1 9
  194. #define S2_2 14
  195. #define S2_3 20
  197. #define S3_0 4
  198. #define S3_1 11
  199. #define S3_2 16
  200. #define S3_3 23
  202. #define S4_0 6
  203. #define S4_1 10
  204. #define S4_2 15
  205. #define S4_3 21
  207. struct MD5ContextStr {
  208. PRUint32      lsbInput;
  209. PRUint32      msbInput;
  210. PRUint32      cv[4];
  211. union {
  212. PRUint8 b[64];
  213. PRUint32 w[16];
  214. } u;
  215. };
  217. #define inBuf u.b
  219. SECStatus 
  220. MD5_Hash(unsigned char *dest, const char *src)
  221. {
  222. return MD5_HashBuf(dest, (unsigned char *)src, PL_strlen(src));
  223. }
  225. SECStatus 
  226. MD5_HashBuf(unsigned char *dest, const unsigned char *src, uint32 src_length)
  227. {
  228. unsigned int len;
  229. MD5Context *cx = MD5_NewContext();
  230. if (cx == NULL) {
  231. PORT_SetError(PR_OUT_OF_MEMORY_ERROR);
  232. return SECFailure;
  233. }
  234. MD5_Begin(cx);
  235. MD5_Update(cx, src, src_length);
  236. MD5_End(cx, dest, &len, MD5_HASH_LEN);
  237. MD5_DestroyContext(cx, PR_TRUE);
  238. return SECSuccess;
  239. }
  241. MD5Context *
  242. MD5_NewContext(void)
  243. {
  244. MD5Context *cx = (MD5Context *)PORT_ZAlloc(sizeof(MD5Context));
  245. if (cx == NULL) {
  246. PORT_SetError(PR_OUT_OF_MEMORY_ERROR);
  247. return NULL;
  248. }
  249. return cx;
  250. }
  252. void 
  253. MD5_DestroyContext(MD5Context *cx, PRBool freeit)
  254. {
  255. if (freeit) {
  256. PORT_ZFree(cx, sizeof(MD5Context));
  257. }
  258. }
  260. void 
  261. MD5_Begin(MD5Context *cx)
  262. {
  263. cx->lsbInput = 0;
  264. cx->msbInput = 0;
  265. memset(cx->inBuf, 0, sizeof(cx->inBuf));
  266. cx->cv[0] = CV0_1;
  267. cx->cv[1] = CV0_2;
  268. cx->cv[2] = CV0_3;
  269. cx->cv[3] = CV0_4;
  270. }
  272. #define cls(i32, s) (tmp = i32, tmp << s | tmp >> (32 - s))
  274. #define MASK 0x00ff00ff
  275. #ifdef IS_LITTLE_ENDIAN
  276. #define lendian(i32) 
  277. (i32)
  278. #else
  279. #define lendian(i32) 
  280. (tmp = i32 >> 16 | i32 << 16, (tmp & MASK) << 8 | tmp >> 8 & MASK)
  281. #endif
  283. #if defined(SOLARIS) || defined(HPUX)
  284. #define addto64(sumhigh, sumlow, addend) 
  285. sumlow += addend; sumhigh += (sumlow < addend);
  286. #else
  287. #define addto64(sumhigh, sumlow, addend) 
  288. sumlow += addend; if (sumlow < addend) ++sumhigh;
  289. #endif
  291. #define F(X, Y, Z) 
  292. ((X & Y) | ((~X) & Z))
  294. #define G(X, Y, Z) 
  295. ((X & Z) | (Y & (~Z)))
  297. #define H(X, Y, Z) 
  298. (X ^ Y ^ Z)
  300. #define I(X, Y, Z) 
  301. (Y ^ (X | (~Z)))
  303. #define FF(a, b, c, d, bufint, s, ti) 
  304. a = b + cls(a + F(b, c, d) + bufint + ti, s)
  306. #define GG(a, b, c, d, bufint, s, ti) 
  307. a = b + cls(a + G(b, c, d) + bufint + ti, s)
  309. #define HH(a, b, c, d, bufint, s, ti) 
  310. a = b + cls(a + H(b, c, d) + bufint + ti, s)
  312. #define II(a, b, c, d, bufint, s, ti) 
  313. a = b + cls(a + I(b, c, d) + bufint + ti, s)
  315. static void
  316. md5_compress(MD5Context *cx)
  317. {
  318. PRUint32 a, b, c, d;
  319. PRUint32 tmp;
  320. a = cx->cv[0];
  321. b = cx->cv[1];
  322. c = cx->cv[2];
  323. d = cx->cv[3];
  324. #ifndef IS_LITTLE_ENDIAN
  325. cx->u.w[0] = lendian(cx->u.w[0]);
  326. cx->u.w[1] = lendian(cx->u.w[1]);
  327. cx->u.w[2] = lendian(cx->u.w[2]);
  328. cx->u.w[3] = lendian(cx->u.w[3]);
  329. cx->u.w[4] = lendian(cx->u.w[4]);
  330. cx->u.w[5] = lendian(cx->u.w[5]);
  331. cx->u.w[6] = lendian(cx->u.w[6]);
  332. cx->u.w[7] = lendian(cx->u.w[7]);
  333. cx->u.w[8] = lendian(cx->u.w[8]);
  334. cx->u.w[9] = lendian(cx->u.w[9]);
  335. cx->u.w[10] = lendian(cx->u.w[10]);
  336. cx->u.w[11] = lendian(cx->u.w[11]);
  337. cx->u.w[12] = lendian(cx->u.w[12]);
  338. cx->u.w[13] = lendian(cx->u.w[13]);
  339. cx->u.w[14] = lendian(cx->u.w[14]);
  340. cx->u.w[15] = lendian(cx->u.w[15]);
  341. #endif
  342. FF(a, b, c, d, cx->u.w[R1B0 ], S1_0, T1_0);
  343. FF(d, a, b, c, cx->u.w[R1B1 ], S1_1, T1_1);
  344. FF(c, d, a, b, cx->u.w[R1B2 ], S1_2, T1_2);
  345. FF(b, c, d, a, cx->u.w[R1B3 ], S1_3, T1_3);
  346. FF(a, b, c, d, cx->u.w[R1B4 ], S1_0, T1_4);
  347. FF(d, a, b, c, cx->u.w[R1B5 ], S1_1, T1_5);
  348. FF(c, d, a, b, cx->u.w[R1B6 ], S1_2, T1_6);
  349. FF(b, c, d, a, cx->u.w[R1B7 ], S1_3, T1_7);
  350. FF(a, b, c, d, cx->u.w[R1B8 ], S1_0, T1_8);
  351. FF(d, a, b, c, cx->u.w[R1B9 ], S1_1, T1_9);
  352. FF(c, d, a, b, cx->u.w[R1B10], S1_2, T1_10);
  353. FF(b, c, d, a, cx->u.w[R1B11], S1_3, T1_11);
  354. FF(a, b, c, d, cx->u.w[R1B12], S1_0, T1_12);
  355. FF(d, a, b, c, cx->u.w[R1B13], S1_1, T1_13);
  356. FF(c, d, a, b, cx->u.w[R1B14], S1_2, T1_14);
  357. FF(b, c, d, a, cx->u.w[R1B15], S1_3, T1_15);
  358. GG(a, b, c, d, cx->u.w[R2B0 ], S2_0, T2_0);
  359. GG(d, a, b, c, cx->u.w[R2B1 ], S2_1, T2_1);
  360. GG(c, d, a, b, cx->u.w[R2B2 ], S2_2, T2_2);
  361. GG(b, c, d, a, cx->u.w[R2B3 ], S2_3, T2_3);
  362. GG(a, b, c, d, cx->u.w[R2B4 ], S2_0, T2_4);
  363. GG(d, a, b, c, cx->u.w[R2B5 ], S2_1, T2_5);
  364. GG(c, d, a, b, cx->u.w[R2B6 ], S2_2, T2_6);
  365. GG(b, c, d, a, cx->u.w[R2B7 ], S2_3, T2_7);
  366. GG(a, b, c, d, cx->u.w[R2B8 ], S2_0, T2_8);
  367. GG(d, a, b, c, cx->u.w[R2B9 ], S2_1, T2_9);
  368. GG(c, d, a, b, cx->u.w[R2B10], S2_2, T2_10);
  369. GG(b, c, d, a, cx->u.w[R2B11], S2_3, T2_11);
  370. GG(a, b, c, d, cx->u.w[R2B12], S2_0, T2_12);
  371. GG(d, a, b, c, cx->u.w[R2B13], S2_1, T2_13);
  372. GG(c, d, a, b, cx->u.w[R2B14], S2_2, T2_14);
  373. GG(b, c, d, a, cx->u.w[R2B15], S2_3, T2_15);
  374. HH(a, b, c, d, cx->u.w[R3B0 ], S3_0, T3_0);
  375. HH(d, a, b, c, cx->u.w[R3B1 ], S3_1, T3_1);
  376. HH(c, d, a, b, cx->u.w[R3B2 ], S3_2, T3_2);
  377. HH(b, c, d, a, cx->u.w[R3B3 ], S3_3, T3_3);
  378. HH(a, b, c, d, cx->u.w[R3B4 ], S3_0, T3_4);
  379. HH(d, a, b, c, cx->u.w[R3B5 ], S3_1, T3_5);
  380. HH(c, d, a, b, cx->u.w[R3B6 ], S3_2, T3_6);
  381. HH(b, c, d, a, cx->u.w[R3B7 ], S3_3, T3_7);
  382. HH(a, b, c, d, cx->u.w[R3B8 ], S3_0, T3_8);
  383. HH(d, a, b, c, cx->u.w[R3B9 ], S3_1, T3_9);
  384. HH(c, d, a, b, cx->u.w[R3B10], S3_2, T3_10);
  385. HH(b, c, d, a, cx->u.w[R3B11], S3_3, T3_11);
  386. HH(a, b, c, d, cx->u.w[R3B12], S3_0, T3_12);
  387. HH(d, a, b, c, cx->u.w[R3B13], S3_1, T3_13);
  388. HH(c, d, a, b, cx->u.w[R3B14], S3_2, T3_14);
  389. HH(b, c, d, a, cx->u.w[R3B15], S3_3, T3_15);
  390. II(a, b, c, d, cx->u.w[R4B0 ], S4_0, T4_0);
  391. II(d, a, b, c, cx->u.w[R4B1 ], S4_1, T4_1);
  392. II(c, d, a, b, cx->u.w[R4B2 ], S4_2, T4_2);
  393. II(b, c, d, a, cx->u.w[R4B3 ], S4_3, T4_3);
  394. II(a, b, c, d, cx->u.w[R4B4 ], S4_0, T4_4);
  395. II(d, a, b, c, cx->u.w[R4B5 ], S4_1, T4_5);
  396. II(c, d, a, b, cx->u.w[R4B6 ], S4_2, T4_6);
  397. II(b, c, d, a, cx->u.w[R4B7 ], S4_3, T4_7);
  398. II(a, b, c, d, cx->u.w[R4B8 ], S4_0, T4_8);
  399. II(d, a, b, c, cx->u.w[R4B9 ], S4_1, T4_9);
  400. II(c, d, a, b, cx->u.w[R4B10], S4_2, T4_10);
  401. II(b, c, d, a, cx->u.w[R4B11], S4_3, T4_11);
  402. II(a, b, c, d, cx->u.w[R4B12], S4_0, T4_12);
  403. II(d, a, b, c, cx->u.w[R4B13], S4_1, T4_13);
  404. II(c, d, a, b, cx->u.w[R4B14], S4_2, T4_14);
  405. II(b, c, d, a, cx->u.w[R4B15], S4_3, T4_15);
  406. cx->cv[0] += a;
  407. cx->cv[1] += b;
  408. cx->cv[2] += c;
  409. cx->cv[3] += d;
  410. }
  412. void 
  413. MD5_Update(MD5Context *cx, const unsigned char *input, unsigned int inputLen)
  414. {
  415. PRUint32 bytesToConsume;
  416. PRUint32 inBufIndex = cx->lsbInput & 63;
  418. /* Add the number of input bytes to the 64-bit input counter. */
  419. addto64(cx->msbInput, cx->lsbInput, inputLen);
  420. if (inBufIndex) {
  421. /* There is already data in the buffer.  Fill with input. */
  422. bytesToConsume = PR_MIN(inputLen, MD5_BUFFER_SIZE - inBufIndex);
  423. memcpy(&cx->inBuf[inBufIndex], input, bytesToConsume);
  424. if (inBufIndex + bytesToConsume >= MD5_BUFFER_SIZE)
  425. /* The buffer is filled.  Run the compression function. */
  426. md5_compress(cx);
  427. /* Remaining input. */
  428. inputLen -= bytesToConsume;
  429. input += bytesToConsume;
  430. }
  432. /* Iterate over 64-byte chunks of the message. */
  433. while (inputLen >= MD5_BUFFER_SIZE) {
  434. memcpy(cx->inBuf, input, MD5_BUFFER_SIZE);
  435. md5_compress(cx);
  436. inputLen -= MD5_BUFFER_SIZE;
  437. input += MD5_BUFFER_SIZE;
  438. }
  440. /* Tail of message (message bytes mod 64). */
  441. if (inputLen)
  442. memcpy(cx->inBuf, input, inputLen);
  443. }
  445. static const unsigned char padbytes[] = {
  446. 0x80, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  447. 0x00, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  448. 0x00, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  449. 0x00, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  450. 0x00, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  451. 0x00, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  452. 0x00, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  453. 0x00, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  454. 0x00, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  455. 0x00, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  456. 0x00, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,
  457. 0x00, 0x00, 0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00,  0x00
  458. };
  460. void 
  461. MD5_End(MD5Context *cx, unsigned char *digest,
  462.         unsigned int *digestLen, unsigned int maxDigestLen)
  463. {
  464. PRUint32 tmp;
  465. PRUint32 lowInput, highInput;
  466. PRUint32 inBufIndex = cx->lsbInput & 63;
  468. if (maxDigestLen < MD5_HASH_LEN) {
  469. PORT_SetError(SEC_ERROR_INVALID_ARGS);
  470. return;
  471. }
  473. /* Copy out the length of bits input before padding. */
  474. lowInput = cx->lsbInput; 
  475. highInput = (cx->msbInput << 3) | (lowInput >> 29);
  476. lowInput <<= 3;
  478. if (inBufIndex < MD5_END_BUFFER) {
  479. MD5_Update(cx, padbytes, MD5_END_BUFFER - inBufIndex);
  480. } else {
  481. MD5_Update(cx, padbytes, 
  482.            MD5_END_BUFFER + MD5_BUFFER_SIZE - inBufIndex);
  483. }
  485. /* Store the number of bytes input (before padding) in final 64 bits. */
  486. cx->u.w[14] = lendian(lowInput);
  487. cx->u.w[15] = lendian(highInput);
  489. /* Final call to compress. */
  490. md5_compress(cx);
  492. /* Copy the resulting values out of the chain variables into return buf. */
  493. *digestLen = MD5_HASH_LEN;
  494. #ifndef IS_LITTLE_ENDIAN
  495. cx->cv[0] = lendian(cx->cv[0]);
  496. cx->cv[1] = lendian(cx->cv[1]);
  497. cx->cv[2] = lendian(cx->cv[2]);
  498. cx->cv[3] = lendian(cx->cv[3]);
  499. #endif
  500. memcpy(digest, cx->cv, MD5_HASH_LEN);
  501. }
  503. unsigned int 
  504. MD5_FlattenSize(MD5Context *cx)
  505. {
  506. return sizeof(*cx);
  507. }
  509. SECStatus 
  510. MD5_Flatten(MD5Context *cx, unsigned char *space)
  511. {
  512. memcpy(space, cx, sizeof(*cx));
  513. return SECSuccess;
  514. }
  516. MD5Context * 
  517. MD5_Resurrect(unsigned char *space, void *arg)
  518. {
  519. MD5Context *cx = MD5_NewContext();
  520. if (cx)
  521. memcpy(cx, space, sizeof(*cx));
  522. return cx;
  523. }
  525. void 
  526. MD5_TraceState(MD5Context *cx)
  527. {
  528. PORT_SetError(PR_NOT_IMPLEMENTED_ERROR);
  529. }