PageRenderTime 72ms CodeModel.GetById 37ms RepoModel.GetById 0ms app.codeStats 0ms

/opensource.apple.com/source/apache_mod_php/apache_mod_php-44.2/php/ext/standard/md5.c

#
C | 465 lines | 353 code | 57 blank | 55 comment | 2 complexity | a827e92dbc49739eaa658b61eac4f6e1 MD5 | raw file
Possible License(s): LGPL-2.0, MPL-2.0, GPL-2.0, ISC, LGPL-2.1, Apache-2.0, MPL-2.0-no-copyleft-exception, BSD-3-Clause, WTFPL, MIT, AGPL-1.0, AGPL-3.0 
    

  1. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
    2. 

  2.     "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
    3. 

  3. <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
    4. 

  4. <head>
    5. 

  5. <title>md5.c</title>
    6. 

  6. <style type="text/css">
    7. 

  7. .enscript-comment { font-style: italic; color: rgb(178,34,34); }
    8. 

  8. .enscript-function-name { font-weight: bold; color: rgb(0,0,255); }
    9. 

  9. .enscript-variable-name { font-weight: bold; color: rgb(184,134,11); }
    10. 

  10. .enscript-keyword { font-weight: bold; color: rgb(160,32,240); }
    11. 

  11. .enscript-reference { font-weight: bold; color: rgb(95,158,160); }
    12. 

  12. .enscript-string { font-weight: bold; color: rgb(188,143,143); }
    13. 

  13. .enscript-builtin { font-weight: bold; color: rgb(218,112,214); }
    14. 

  14. .enscript-type { font-weight: bold; color: rgb(34,139,34); }
    15. 

  15. .enscript-highlight { text-decoration: underline; color: 0; }
    16. 

  16. </style>
    17. 

  17. </head>
    18. 

  18. <body id="top">
    19. 

  19. <h1 style="margin:8px;" id="f1">md5.c&nbsp;&nbsp;&nbsp;<span style="font-weight: normal; font-size: 0.5em;">[<a href="?txt">plain text</a>]</span></h1>
    20. 

  20. <hr/>
    21. 

  21. <div></div>
    22. 

  22. <pre>
    23. 

  23. <span class="enscript-comment">/*
    24. 

  24.    +----------------------------------------------------------------------+
    25. 

  25.    | PHP Version 5                                                        |
    26. 

  26.    +----------------------------------------------------------------------+
    27. 

  27.    | Copyright (c) 1997-2008 The PHP Group                                |
    28. 

  28.    +----------------------------------------------------------------------+
    29. 

  29.    | This source file is subject to version 3.01 of the PHP license,      |
    30. 

  30.    | that is bundled with this package in the file LICENSE, and is        |
    31. 

  31.    | available through the world-wide-web at the following url:           |
    32. 

  32.    | <a href="http://www.php.net/license/3_01.txt">http://www.php.net/license/3_01.txt</a>                                  |
    33. 

  33.    | If you did not receive a copy of the PHP license and are unable to   |
    34. 

  34.    | obtain it through the world-wide-web, please send a note to          |
    35. 

  35.    | <a href="mailto:license@php.net">license@php.net</a> so we can mail you a copy immediately.               |
    36. 

  36.    +----------------------------------------------------------------------+
    37. 

  37.    | Author: Lachlan Roche                                                |
    38. 

  38.    +----------------------------------------------------------------------+
    39. 

  39. */</span>
    40. 

  40. 

  41. <span class="enscript-comment">/* $Id: md5.c,v 1.39.2.1.2.5 2007/12/31 07:20:13 sebastian Exp $ */</span>
    42. 

  42. 

  43. <span class="enscript-comment">/* 
    44. 

  44.  * md5.c - Copyright 1997 Lachlan Roche 
    45. 

  45.  * md5_file() added by Alessandro Astarita &lt;<a href="mailto:aleast@capri.it">aleast@capri.it</a>&gt;
    46. 

  46.  */</span>
    47. 

  47. 

  48. #<span class="enscript-reference">include</span> <span class="enscript-string">&quot;php.h&quot;</span>
    49. 

  49. #<span class="enscript-reference">include</span> <span class="enscript-string">&quot;md5.h&quot;</span>
    50. 

  50. 

  51. PHPAPI <span class="enscript-type">void</span> <span class="enscript-function-name">make_digest</span>(<span class="enscript-type">char</span> *md5str, <span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> *digest)
    52. 

  52. {
    53. 

  53. 	make_digest_ex(md5str, digest, 16);
    54. 

  54. }
    55. 

  55. 

  56. PHPAPI <span class="enscript-type">void</span> <span class="enscript-function-name">make_digest_ex</span>(<span class="enscript-type">char</span> *md5str, <span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> *digest, <span class="enscript-type">int</span> len)
    57. 

  57. {
    58. 

  58. 	<span class="enscript-type">static</span> <span class="enscript-type">const</span> <span class="enscript-type">char</span> hexits[17] = <span class="enscript-string">&quot;0123456789abcdef&quot;</span>;
    59. 

  59. 	<span class="enscript-type">int</span> i;
    60. 

  60. 

  61. 	<span class="enscript-keyword">for</span> (i = 0; i &lt; len; i++) {
    62. 

  62. 		md5str[i * 2]       = hexits[digest[i] &gt;&gt; 4];
    63. 

  63. 		md5str[(i * 2) + 1] = hexits[digest[i] &amp;  0x0F];
    64. 

  64. 	}
    65. 

  65. 	md5str[len * 2] = <span class="enscript-string">'\0'</span>;
    66. 

  66. }
    67. 

  67. 

  68. <span class="enscript-comment">/* {{{ proto string md5(string str, [ bool raw_output])
    69. 

  69.    Calculate the md5 hash of a string */</span>
    70. 

  70. <span class="enscript-function-name">PHP_NAMED_FUNCTION</span>(php_if_md5)
    71. 

  71. {
    72. 

  72. 	<span class="enscript-type">char</span> *arg;
    73. 

  73. 	<span class="enscript-type">int</span> arg_len;
    74. 

  74. 	zend_bool raw_output = 0;
    75. 

  75. 	<span class="enscript-type">char</span> md5str[33];
    76. 

  76. 	PHP_MD5_CTX context;
    77. 

  77. 	<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> digest[16];
    78. 

  78. 	
    79. 

  79. 	<span class="enscript-keyword">if</span> (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, <span class="enscript-string">&quot;s|b&quot;</span>, &amp;arg, &amp;arg_len, &amp;raw_output) == FAILURE) {
    80. 

  80. 		<span class="enscript-keyword">return</span>;
    81. 

  81. 	}
    82. 

  82. 	
    83. 

  83. 	md5str[0] = <span class="enscript-string">'\0'</span>;
    84. 

  84. 	PHP_MD5Init(&amp;context);
    85. 

  85. 	PHP_MD5Update(&amp;context, arg, arg_len);
    86. 

  86. 	PHP_MD5Final(digest, &amp;context);
    87. 

  87. 	<span class="enscript-keyword">if</span> (raw_output) {
    88. 

  88. 		RETURN_STRINGL(digest, 16, 1);
    89. 

  89. 	} <span class="enscript-keyword">else</span> {
    90. 

  90. 		make_digest_ex(md5str, digest, 16);
    91. 

  91. 		RETVAL_STRING(md5str, 1);
    92. 

  92. 	}
    93. 

  93. 

  94. }
    95. 

  95. <span class="enscript-comment">/* }}} */</span>
    96. 

  96. 

  97. <span class="enscript-comment">/* {{{ proto string md5_file(string filename [, bool raw_output])
    98. 

  98.    Calculate the md5 hash of given filename */</span>
    99. 

  99. <span class="enscript-function-name">PHP_NAMED_FUNCTION</span>(php_if_md5_file)
    100. 

  100. {
    101. 

  101. 	<span class="enscript-type">char</span>          *arg;
    102. 

  102. 	<span class="enscript-type">int</span>           arg_len;
    103. 

  103. 	zend_bool raw_output = 0;
    104. 

  104. 	<span class="enscript-type">char</span>          md5str[33];
    105. 

  105. 	<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> buf[1024];
    106. 

  106. 	<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> digest[16];
    107. 

  107. 	PHP_MD5_CTX   context;
    108. 

  108. 	<span class="enscript-type">int</span>           n;
    109. 

  109. 	php_stream    *stream;
    110. 

  110. 

  111. 	<span class="enscript-keyword">if</span> (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, <span class="enscript-string">&quot;s|b&quot;</span>, &amp;arg, &amp;arg_len, &amp;raw_output) == FAILURE) {
    112. 

  112. 		<span class="enscript-keyword">return</span>;
    113. 

  113. 	}
    114. 

  114. 	
    115. 

  115. 	stream = php_stream_open_wrapper(arg, <span class="enscript-string">&quot;rb&quot;</span>, REPORT_ERRORS | ENFORCE_SAFE_MODE, NULL);
    116. 

  116. 	<span class="enscript-keyword">if</span> (!stream) {
    117. 

  117. 		RETURN_FALSE;
    118. 

  118. 	}
    119. 

  119. 

  120. 	PHP_MD5Init(&amp;context);
    121. 

  121. 

  122. 	<span class="enscript-keyword">while</span> ((n = php_stream_read(stream, buf, <span class="enscript-keyword">sizeof</span>(buf))) &gt; 0) {
    123. 

  123. 		PHP_MD5Update(&amp;context, buf, n);
    124. 

  124. 	}
    125. 

  125. 

  126. 	PHP_MD5Final(digest, &amp;context);
    127. 

  127. 

  128. 	php_stream_close(stream);
    129. 

  129. 

  130. 	<span class="enscript-keyword">if</span> (n&lt;0) {
    131. 

  131. 		RETURN_FALSE;
    132. 

  132. 	}
    133. 

  133. 

  134. 	<span class="enscript-keyword">if</span> (raw_output) {
    135. 

  135. 		RETURN_STRINGL(digest, 16, 1);
    136. 

  136. 	} <span class="enscript-keyword">else</span> {
    137. 

  137. 		make_digest_ex(md5str, digest, 16);
    138. 

  138. 		RETVAL_STRING(md5str, 1);
    139. 

  139. 	}
    140. 

  140. }
    141. 

  141. <span class="enscript-comment">/* }}} */</span>
    142. 

  142. 

  143. <span class="enscript-comment">/*
    144. 

  144.  * The remaining code is the reference MD5 code (md5c.c) from rfc1321
    145. 

  145.  */</span>
    146. 

  146. <span class="enscript-comment">/* MD5C.C - RSA Data Security, Inc., MD5 message-digest algorithm
    147. 

  147.  */</span>
    148. 

  148. 

  149. <span class="enscript-comment">/* Copyright (C) 1991-2, RSA Data Security, Inc. Created 1991. All
    150. 

  150.    rights reserved.
    151. 

    152. 

  152.    License to copy and use this software is granted provided that it
    153. 

  153.    is identified as the &quot;RSA Data Security, Inc. MD5 Message-Digest
    154. 

  154.    Algorithm&quot; in all material mentioning or referencing this software
    155. 

  155.    or this function.
    156. 

    157. 

  157.    License is also granted to make and use derivative works provided
    158. 

  158.    that such works are identified as &quot;derived from the RSA Data
    159. 

  159.    Security, Inc. MD5 Message-Digest Algorithm&quot; in all material
    160. 

  160.    mentioning or referencing the derived work.
    161. 

    162. 

  162.    RSA Data Security, Inc. makes no representations concerning either
    163. 

  163.    the merchantability of this software or the suitability of this
    164. 

  164.    software for any particular purpose. It is provided &quot;as is&quot;
    165. 

  165.    without express or implied warranty of any kind.
    166. 

    167. 

  167.    These notices must be retained in any copies of any part of this
    168. 

  168.    documentation and/or software.
    169. 

  169.  */</span>
    170. 

  170. 

  171. <span class="enscript-comment">/* Constants for MD5Transform routine.
    172. 

  172.  */</span>
    173. 

  173. 

  174. 

  175. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S11</span> 7
    176. 

  176. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S12</span> 12
    177. 

  177. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S13</span> 17
    178. 

  178. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S14</span> 22
    179. 

  179. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S21</span> 5
    180. 

  180. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S22</span> 9
    181. 

  181. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S23</span> 14
    182. 

  182. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S24</span> 20
    183. 

  183. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S31</span> 4
    184. 

  184. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S32</span> 11
    185. 

  185. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S33</span> 16
    186. 

  186. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S34</span> 23
    187. 

  187. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S41</span> 6
    188. 

  188. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S42</span> 10
    189. 

  189. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S43</span> 15
    190. 

  190. #<span class="enscript-reference">define</span> <span class="enscript-variable-name">S44</span> 21
    191. 

  191. 

  192. <span class="enscript-type">static</span> <span class="enscript-type">void</span> <span class="enscript-function-name">MD5Transform</span>(php_uint32[4], <span class="enscript-type">const</span> <span class="enscript-type">unsigned</span> <span class="enscript-type">char</span>[64]);
    193. 

  193. <span class="enscript-type">static</span> <span class="enscript-type">void</span> <span class="enscript-function-name">Encode</span>(<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> *, php_uint32 *, <span class="enscript-type">unsigned</span> <span class="enscript-type">int</span>);
    194. 

  194. <span class="enscript-type">static</span> <span class="enscript-type">void</span> <span class="enscript-function-name">Decode</span>(php_uint32 *, <span class="enscript-type">const</span> <span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> *, <span class="enscript-type">unsigned</span> <span class="enscript-type">int</span>);
    195. 

  195. 

  196. <span class="enscript-type">static</span> <span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> PADDING[64] =
    197. 

  197. {
    198. 

  198. 	0x80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    199. 

  199. 	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
    200. 

  200. 	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
    201. 

  201. };
    202. 

  202. 

  203. <span class="enscript-comment">/* F, G, H and I are basic MD5 functions.
    204. 

  204.  */</span>
    205. 

  205. #<span class="enscript-reference">define</span> <span class="enscript-function-name">F</span>(x, y, z) (((x) &amp; (y)) | ((~x) &amp; (z)))
    206. 

  206. #<span class="enscript-reference">define</span> <span class="enscript-function-name">G</span>(x, y, z) (((x) &amp; (z)) | ((y) &amp; (~z)))
    207. 

  207. #<span class="enscript-reference">define</span> <span class="enscript-function-name">H</span>(x, y, z) ((x) ^ (y) ^ (z))
    208. 

  208. #<span class="enscript-reference">define</span> <span class="enscript-function-name">I</span>(x, y, z) ((y) ^ ((x) | (~z)))
    209. 

  209. 

  210. <span class="enscript-comment">/* ROTATE_LEFT rotates x left n bits.
    211. 

  211.  */</span>
    212. 

  212. #<span class="enscript-reference">define</span> <span class="enscript-function-name">ROTATE_LEFT</span>(x, n) (((x) &lt;&lt; (n)) | ((x) &gt;&gt; (32-(n))))
    213. 

  213. 

  214. <span class="enscript-comment">/* FF, GG, HH, and II transformations for rounds 1, 2, 3, and 4.
    215. 

  215.    Rotation is separate from addition to prevent recomputation.
    216. 

  216.  */</span>
    217. 

  217. #<span class="enscript-reference">define</span> <span class="enscript-function-name">FF</span>(a, b, c, d, x, s, ac) { \
    218. 

  218.  (a) += F ((b), (c), (d)) + (x) + (php_uint32)(ac); \
    219. 

  219.  (a) = ROTATE_LEFT ((a), (s)); \
    220. 

  220.  (a) += (b); \
    221. 

  221.   }
    222. 

  222. #<span class="enscript-reference">define</span> <span class="enscript-function-name">GG</span>(a, b, c, d, x, s, ac) { \
    223. 

  223.  (a) += G ((b), (c), (d)) + (x) + (php_uint32)(ac); \
    224. 

  224.  (a) = ROTATE_LEFT ((a), (s)); \
    225. 

  225.  (a) += (b); \
    226. 

  226.   }
    227. 

  227. #<span class="enscript-reference">define</span> <span class="enscript-function-name">HH</span>(a, b, c, d, x, s, ac) { \
    228. 

  228.  (a) += H ((b), (c), (d)) + (x) + (php_uint32)(ac); \
    229. 

  229.  (a) = ROTATE_LEFT ((a), (s)); \
    230. 

  230.  (a) += (b); \
    231. 

  231.   }
    232. 

  232. #<span class="enscript-reference">define</span> <span class="enscript-function-name">II</span>(a, b, c, d, x, s, ac) { \
    233. 

  233.  (a) += I ((b), (c), (d)) + (x) + (php_uint32)(ac); \
    234. 

  234.  (a) = ROTATE_LEFT ((a), (s)); \
    235. 

  235.  (a) += (b); \
    236. 

  236.   }
    237. 

  237. 

  238. <span class="enscript-comment">/* {{{ PHP_MD5Init
    239. 

  239.  * MD5 initialization. Begins an MD5 operation, writing a new context.
    240. 

  240.  */</span>
    241. 

  241. PHPAPI <span class="enscript-type">void</span> <span class="enscript-function-name">PHP_MD5Init</span>(PHP_MD5_CTX * context)
    242. 

  242. {
    243. 

  243. 	context-&gt;count[0] = context-&gt;count[1] = 0;
    244. 

  244. 	<span class="enscript-comment">/* Load magic initialization constants.
    245. 

  245. 	 */</span>
    246. 

  246. 	context-&gt;state[0] = 0x67452301;
    247. 

  247. 	context-&gt;state[1] = 0xefcdab89;
    248. 

  248. 	context-&gt;state[2] = 0x98badcfe;
    249. 

  249. 	context-&gt;state[3] = 0x10325476;
    250. 

  250. }
    251. 

  251. <span class="enscript-comment">/* }}} */</span>
    252. 

  252. 

  253. <span class="enscript-comment">/* {{{ PHP_MD5Update
    254. 

  254.    MD5 block update operation. Continues an MD5 message-digest
    255. 

  255.    operation, processing another message block, and updating the
    256. 

  256.    context.
    257. 

  257.  */</span>
    258. 

  258. PHPAPI <span class="enscript-type">void</span> <span class="enscript-function-name">PHP_MD5Update</span>(PHP_MD5_CTX * context, <span class="enscript-type">const</span> <span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> *input,
    259. 

  259. 			   <span class="enscript-type">unsigned</span> <span class="enscript-type">int</span> inputLen)
    260. 

  260. {
    261. 

  261. 	<span class="enscript-type">unsigned</span> <span class="enscript-type">int</span> i, index, partLen;
    262. 

  262. 

  263. 	<span class="enscript-comment">/* Compute number of bytes mod 64 */</span>
    264. 

  264. 	index = (<span class="enscript-type">unsigned</span> <span class="enscript-type">int</span>) ((context-&gt;count[0] &gt;&gt; 3) &amp; 0x3F);
    265. 

  265. 

  266. 	<span class="enscript-comment">/* Update number of bits */</span>
    267. 

  267. 	<span class="enscript-keyword">if</span> ((context-&gt;count[0] += ((php_uint32) inputLen &lt;&lt; 3))
    268. 

  268. 		&lt; ((php_uint32) inputLen &lt;&lt; 3))
    269. 

  269. 		context-&gt;count[1]++;
    270. 

  270. 	context-&gt;count[1] += ((php_uint32) inputLen &gt;&gt; 29);
    271. 

  271. 

  272. 	partLen = 64 - index;
    273. 

  273. 

  274. 	<span class="enscript-comment">/* Transform as many times as possible.
    275. 

  275. 	 */</span>
    276. 

  276. 	<span class="enscript-keyword">if</span> (inputLen &gt;= partLen) {
    277. 

  277. 		memcpy
    278. 

  278. 			((<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span>*) &amp; context-&gt;buffer[index], (<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span>*) input, partLen);
    279. 

  279. 		MD5Transform(context-&gt;state, context-&gt;buffer);
    280. 

  280. 

  281. 		<span class="enscript-keyword">for</span> (i = partLen; i + 63 &lt; inputLen; i += 64)
    282. 

  282. 			MD5Transform(context-&gt;state, &amp;input[i]);
    283. 

  283. 

  284. 		index = 0;
    285. 

  285. 	} <span class="enscript-keyword">else</span>
    286. 

  286. 		i = 0;
    287. 

  287. 

  288. 	<span class="enscript-comment">/* Buffer remaining input */</span>
    289. 

  289. 	memcpy
    290. 

  290. 		((<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span>*) &amp; context-&gt;buffer[index], (<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span>*) &amp; input[i],
    291. 

  291. 		 inputLen - i);
    292. 

  292. }
    293. 

  293. <span class="enscript-comment">/* }}} */</span>
    294. 

  294. 

  295. <span class="enscript-comment">/* {{{ PHP_MD5Final
    296. 

  296.    MD5 finalization. Ends an MD5 message-digest operation, writing the
    297. 

  297.    the message digest and zeroizing the context.
    298. 

  298.  */</span>
    299. 

  299. PHPAPI <span class="enscript-type">void</span> <span class="enscript-function-name">PHP_MD5Final</span>(<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> digest[16], PHP_MD5_CTX * context)
    300. 

  300. {
    301. 

  301. 	<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> bits[8];
    302. 

  302. 	<span class="enscript-type">unsigned</span> <span class="enscript-type">int</span> index, padLen;
    303. 

  303. 

  304. 	<span class="enscript-comment">/* Save number of bits */</span>
    305. 

  305. 	Encode(bits, context-&gt;count, 8);
    306. 

  306. 

  307. 	<span class="enscript-comment">/* Pad out to 56 mod 64.
    308. 

  308. 	 */</span>
    309. 

  309. 	index = (<span class="enscript-type">unsigned</span> <span class="enscript-type">int</span>) ((context-&gt;count[0] &gt;&gt; 3) &amp; 0x3f);
    310. 

  310. 	padLen = (index &lt; 56) ? (56 - index) : (120 - index);
    311. 

  311. 	PHP_MD5Update(context, PADDING, padLen);
    312. 

  312. 

  313. 	<span class="enscript-comment">/* Append length (before padding) */</span>
    314. 

  314. 	PHP_MD5Update(context, bits, 8);
    315. 

  315. 

  316. 	<span class="enscript-comment">/* Store state in digest */</span>
    317. 

  317. 	Encode(digest, context-&gt;state, 16);
    318. 

  318. 

  319. 	<span class="enscript-comment">/* Zeroize sensitive information.
    320. 

  320. 	 */</span>
    321. 

  321. 	memset((<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span>*) context, 0, <span class="enscript-keyword">sizeof</span>(*context));
    322. 

  322. }
    323. 

  323. <span class="enscript-comment">/* }}} */</span>
    324. 

  324. 

  325. <span class="enscript-comment">/* {{{ MD5Transform
    326. 

  326.  * MD5 basic transformation. Transforms state based on block.
    327. 

  327.  */</span>
    328. 

  328. <span class="enscript-type">static</span> <span class="enscript-type">void</span> <span class="enscript-function-name">MD5Transform</span>(state, block)
    329. 

  329. php_uint32 state[4];
    330. 

  330. <span class="enscript-type">const</span> <span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> block[64];
    331. 

  331. {
    332. 

  332. 	php_uint32 a = state[0], b = state[1], c = state[2], d = state[3], x[16];
    333. 

  333. 

  334. 	Decode(x, block, 64);
    335. 

  335. 

  336. 	<span class="enscript-comment">/* Round 1 */</span>
    337. 

  337. 	FF(a, b, c, d, x[0], S11, 0xd76aa478);	<span class="enscript-comment">/* 1 */</span>
    338. 

  338. 	FF(d, a, b, c, x[1], S12, 0xe8c7b756);	<span class="enscript-comment">/* 2 */</span>
    339. 

  339. 	FF(c, d, a, b, x[2], S13, 0x242070db);	<span class="enscript-comment">/* 3 */</span>
    340. 

  340. 	FF(b, c, d, a, x[3], S14, 0xc1bdceee);	<span class="enscript-comment">/* 4 */</span>
    341. 

  341. 	FF(a, b, c, d, x[4], S11, 0xf57c0faf);	<span class="enscript-comment">/* 5 */</span>
    342. 

  342. 	FF(d, a, b, c, x[5], S12, 0x4787c62a);	<span class="enscript-comment">/* 6 */</span>
    343. 

  343. 	FF(c, d, a, b, x[6], S13, 0xa8304613);	<span class="enscript-comment">/* 7 */</span>
    344. 

  344. 	FF(b, c, d, a, x[7], S14, 0xfd469501);	<span class="enscript-comment">/* 8 */</span>
    345. 

  345. 	FF(a, b, c, d, x[8], S11, 0x698098d8);	<span class="enscript-comment">/* 9 */</span>
    346. 

  346. 	FF(d, a, b, c, x[9], S12, 0x8b44f7af);	<span class="enscript-comment">/* 10 */</span>
    347. 

  347. 	FF(c, d, a, b, x[10], S13, 0xffff5bb1);		<span class="enscript-comment">/* 11 */</span>
    348. 

  348. 	FF(b, c, d, a, x[11], S14, 0x895cd7be);		<span class="enscript-comment">/* 12 */</span>
    349. 

  349. 	FF(a, b, c, d, x[12], S11, 0x6b901122);		<span class="enscript-comment">/* 13 */</span>
    350. 

  350. 	FF(d, a, b, c, x[13], S12, 0xfd987193);		<span class="enscript-comment">/* 14 */</span>
    351. 

  351. 	FF(c, d, a, b, x[14], S13, 0xa679438e);		<span class="enscript-comment">/* 15 */</span>
    352. 

  352. 	FF(b, c, d, a, x[15], S14, 0x49b40821);		<span class="enscript-comment">/* 16 */</span>
    353. 

  353. 

  354. 	<span class="enscript-comment">/* Round 2 */</span>
    355. 

  355. 	GG(a, b, c, d, x[1], S21, 0xf61e2562);	<span class="enscript-comment">/* 17 */</span>
    356. 

  356. 	GG(d, a, b, c, x[6], S22, 0xc040b340);	<span class="enscript-comment">/* 18 */</span>
    357. 

  357. 	GG(c, d, a, b, x[11], S23, 0x265e5a51);		<span class="enscript-comment">/* 19 */</span>
    358. 

  358. 	GG(b, c, d, a, x[0], S24, 0xe9b6c7aa);	<span class="enscript-comment">/* 20 */</span>
    359. 

  359. 	GG(a, b, c, d, x[5], S21, 0xd62f105d);	<span class="enscript-comment">/* 21 */</span>
    360. 

  360. 	GG(d, a, b, c, x[10], S22, 0x2441453);	<span class="enscript-comment">/* 22 */</span>
    361. 

  361. 	GG(c, d, a, b, x[15], S23, 0xd8a1e681);		<span class="enscript-comment">/* 23 */</span>
    362. 

  362. 	GG(b, c, d, a, x[4], S24, 0xe7d3fbc8);	<span class="enscript-comment">/* 24 */</span>
    363. 

  363. 	GG(a, b, c, d, x[9], S21, 0x21e1cde6);	<span class="enscript-comment">/* 25 */</span>
    364. 

  364. 	GG(d, a, b, c, x[14], S22, 0xc33707d6);		<span class="enscript-comment">/* 26 */</span>
    365. 

  365. 	GG(c, d, a, b, x[3], S23, 0xf4d50d87);	<span class="enscript-comment">/* 27 */</span>
    366. 

  366. 	GG(b, c, d, a, x[8], S24, 0x455a14ed);	<span class="enscript-comment">/* 28 */</span>
    367. 

  367. 	GG(a, b, c, d, x[13], S21, 0xa9e3e905);		<span class="enscript-comment">/* 29 */</span>
    368. 

  368. 	GG(d, a, b, c, x[2], S22, 0xfcefa3f8);	<span class="enscript-comment">/* 30 */</span>
    369. 

  369. 	GG(c, d, a, b, x[7], S23, 0x676f02d9);	<span class="enscript-comment">/* 31 */</span>
    370. 

  370. 	GG(b, c, d, a, x[12], S24, 0x8d2a4c8a);		<span class="enscript-comment">/* 32 */</span>
    371. 

  371. 

  372. 	<span class="enscript-comment">/* Round 3 */</span>
    373. 

  373. 	HH(a, b, c, d, x[5], S31, 0xfffa3942);	<span class="enscript-comment">/* 33 */</span>
    374. 

  374. 	HH(d, a, b, c, x[8], S32, 0x8771f681);	<span class="enscript-comment">/* 34 */</span>
    375. 

  375. 	HH(c, d, a, b, x[11], S33, 0x6d9d6122);		<span class="enscript-comment">/* 35 */</span>
    376. 

  376. 	HH(b, c, d, a, x[14], S34, 0xfde5380c);		<span class="enscript-comment">/* 36 */</span>
    377. 

  377. 	HH(a, b, c, d, x[1], S31, 0xa4beea44);	<span class="enscript-comment">/* 37 */</span>
    378. 

  378. 	HH(d, a, b, c, x[4], S32, 0x4bdecfa9);	<span class="enscript-comment">/* 38 */</span>
    379. 

  379. 	HH(c, d, a, b, x[7], S33, 0xf6bb4b60);	<span class="enscript-comment">/* 39 */</span>
    380. 

  380. 	HH(b, c, d, a, x[10], S34, 0xbebfbc70);		<span class="enscript-comment">/* 40 */</span>
    381. 

  381. 	HH(a, b, c, d, x[13], S31, 0x289b7ec6);		<span class="enscript-comment">/* 41 */</span>
    382. 

  382. 	HH(d, a, b, c, x[0], S32, 0xeaa127fa);	<span class="enscript-comment">/* 42 */</span>
    383. 

  383. 	HH(c, d, a, b, x[3], S33, 0xd4ef3085);	<span class="enscript-comment">/* 43 */</span>
    384. 

  384. 	HH(b, c, d, a, x[6], S34, 0x4881d05);	<span class="enscript-comment">/* 44 */</span>
    385. 

  385. 	HH(a, b, c, d, x[9], S31, 0xd9d4d039);	<span class="enscript-comment">/* 45 */</span>
    386. 

  386. 	HH(d, a, b, c, x[12], S32, 0xe6db99e5);		<span class="enscript-comment">/* 46 */</span>
    387. 

  387. 	HH(c, d, a, b, x[15], S33, 0x1fa27cf8);		<span class="enscript-comment">/* 47 */</span>
    388. 

  388. 	HH(b, c, d, a, x[2], S34, 0xc4ac5665);	<span class="enscript-comment">/* 48 */</span>
    389. 

  389. 

  390. 	<span class="enscript-comment">/* Round 4 */</span>
    391. 

  391. 	II(a, b, c, d, x[0], S41, 0xf4292244);	<span class="enscript-comment">/* 49 */</span>
    392. 

  392. 	II(d, a, b, c, x[7], S42, 0x432aff97);	<span class="enscript-comment">/* 50 */</span>
    393. 

  393. 	II(c, d, a, b, x[14], S43, 0xab9423a7);		<span class="enscript-comment">/* 51 */</span>
    394. 

  394. 	II(b, c, d, a, x[5], S44, 0xfc93a039);	<span class="enscript-comment">/* 52 */</span>
    395. 

  395. 	II(a, b, c, d, x[12], S41, 0x655b59c3);		<span class="enscript-comment">/* 53 */</span>
    396. 

  396. 	II(d, a, b, c, x[3], S42, 0x8f0ccc92);	<span class="enscript-comment">/* 54 */</span>
    397. 

  397. 	II(c, d, a, b, x[10], S43, 0xffeff47d);		<span class="enscript-comment">/* 55 */</span>
    398. 

  398. 	II(b, c, d, a, x[1], S44, 0x85845dd1);	<span class="enscript-comment">/* 56 */</span>
    399. 

  399. 	II(a, b, c, d, x[8], S41, 0x6fa87e4f);	<span class="enscript-comment">/* 57 */</span>
    400. 

  400. 	II(d, a, b, c, x[15], S42, 0xfe2ce6e0);		<span class="enscript-comment">/* 58 */</span>
    401. 

  401. 	II(c, d, a, b, x[6], S43, 0xa3014314);	<span class="enscript-comment">/* 59 */</span>
    402. 

  402. 	II(b, c, d, a, x[13], S44, 0x4e0811a1);		<span class="enscript-comment">/* 60 */</span>
    403. 

  403. 	II(a, b, c, d, x[4], S41, 0xf7537e82);	<span class="enscript-comment">/* 61 */</span>
    404. 

  404. 	II(d, a, b, c, x[11], S42, 0xbd3af235);		<span class="enscript-comment">/* 62 */</span>
    405. 

  405. 	II(c, d, a, b, x[2], S43, 0x2ad7d2bb);	<span class="enscript-comment">/* 63 */</span>
    406. 

  406. 	II(b, c, d, a, x[9], S44, 0xeb86d391);	<span class="enscript-comment">/* 64 */</span>
    407. 

  407. 

  408. 	state[0] += a;
    409. 

  409. 	state[1] += b;
    410. 

  410. 	state[2] += c;
    411. 

  411. 	state[3] += d;
    412. 

  412. 

  413. 	<span class="enscript-comment">/* Zeroize sensitive information. */</span>
    414. 

  414. 	memset((<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span>*) x, 0, <span class="enscript-keyword">sizeof</span>(x));
    415. 

  415. }
    416. 

  416. <span class="enscript-comment">/* }}} */</span>
    417. 

  417. 

  418. <span class="enscript-comment">/* {{{ Encode
    419. 

  419.    Encodes input (php_uint32) into output (unsigned char). Assumes len is
    420. 

  420.    a multiple of 4.
    421. 

  421.  */</span>
    422. 

  422. <span class="enscript-type">static</span> <span class="enscript-type">void</span> <span class="enscript-function-name">Encode</span>(output, input, len)
    423. 

  423. <span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> *output;
    424. 

  424. php_uint32 *input;
    425. 

  425. <span class="enscript-type">unsigned</span> <span class="enscript-type">int</span> len;
    426. 

  426. {
    427. 

  427. 	<span class="enscript-type">unsigned</span> <span class="enscript-type">int</span> i, j;
    428. 

  428. 

  429. 	<span class="enscript-keyword">for</span> (i = 0, j = 0; j &lt; len; i++, j += 4) {
    430. 

  430. 		output[j] = (<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span>) (input[i] &amp; 0xff);
    431. 

  431. 		output[j + 1] = (<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span>) ((input[i] &gt;&gt; 8) &amp; 0xff);
    432. 

  432. 		output[j + 2] = (<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span>) ((input[i] &gt;&gt; 16) &amp; 0xff);
    433. 

  433. 		output[j + 3] = (<span class="enscript-type">unsigned</span> <span class="enscript-type">char</span>) ((input[i] &gt;&gt; 24) &amp; 0xff);
    434. 

  434. 	}
    435. 

  435. }
    436. 

  436. <span class="enscript-comment">/* }}} */</span>
    437. 

  437. 

  438. <span class="enscript-comment">/* {{{ Decode
    439. 

  439.    Decodes input (unsigned char) into output (php_uint32). Assumes len is
    440. 

  440.    a multiple of 4.
    441. 

  441.  */</span>
    442. 

  442. <span class="enscript-type">static</span> <span class="enscript-type">void</span> <span class="enscript-function-name">Decode</span>(output, input, len)
    443. 

  443. php_uint32 *output;
    444. 

  444. <span class="enscript-type">const</span> <span class="enscript-type">unsigned</span> <span class="enscript-type">char</span> *input;
    445. 

  445. <span class="enscript-type">unsigned</span> <span class="enscript-type">int</span> len;
    446. 

  446. {
    447. 

  447. 	<span class="enscript-type">unsigned</span> <span class="enscript-type">int</span> i, j;
    448. 

  448. 

  449. 	<span class="enscript-keyword">for</span> (i = 0, j = 0; j &lt; len; i++, j += 4)
    450. 

  450. 		output[i] = ((php_uint32) input[j]) | (((php_uint32) input[j + 1]) &lt;&lt; 8) |
    451. 

  451. 			(((php_uint32) input[j + 2]) &lt;&lt; 16) | (((php_uint32) input[j + 3]) &lt;&lt; 24);
    452. 

  452. }
    453. 

  453. <span class="enscript-comment">/* }}} */</span>
    454. 

  454. 

  455. <span class="enscript-comment">/*
    456. 

  456.  * Local variables:
    457. 

  457.  * tab-width: 4
    458. 

  458.  * c-basic-offset: 4
    459. 

  459.  * End:
    460. 

  460.  * vim600: sw=4 ts=4 fdm=marker
    461. 

  461.  * vim&lt;600: sw=4 ts=4
    462. 

  462.  */</span>
    463. 

  463. </pre>
    464. 

  464. <hr />
    465. 

  465. </body></html>
    466.