MD5 hash API - closes #135
[vlc.git] / src / misc / md5.c
1 /*****************************************************************************
2  * md5.c: not so strong MD5 hashing
3  *****************************************************************************
4  * Copyright (C) 2004-2005 VideoLAN
5  * $Id: drms.c 10101 2005-03-02 16:47:31Z robux4 $
6  *
7  * Authors: Jon Lech Johansen <jon-vl@nanocrew.net>
8  *          Sam Hocevar <sam@zoy.org>
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; either version 2 of the License, or
13  * (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
23  *****************************************************************************/
24
25 #include <string.h>
26 #include <vlc/vlc.h>
27 #include "vlc_md5.h"
28
29 #ifdef WORDS_BIGENDIAN
30 /*****************************************************************************
31  * Reverse: reverse byte order
32  *****************************************************************************/
33 static inline void Reverse( uint32_t *p_buffer, int n )
34 {
35     int i;
36
37     for( i = 0; i < n; i++ )
38     {
39         p_buffer[ i ] = GetDWLE(&p_buffer[ i ]);
40     }
41 }
42 #    define REVERSE( p, n ) Reverse( p, n )
43 #else
44 #    define REVERSE( p, n )
45 #endif
46
47 #define F1( x, y, z ) ((z) ^ ((x) & ((y) ^ (z))))
48 #define F2( x, y, z ) F1((z), (x), (y))
49 #define F3( x, y, z ) ((x) ^ (y) ^ (z))
50 #define F4( x, y, z ) ((y) ^ ((x) | ~(z)))
51
52 #define MD5_DO( f, w, x, y, z, data, s ) \
53     ( w += f(x, y, z) + data,  w = w<<s | w>>(32-s),  w += x )
54
55 /*****************************************************************************
56  * Digest: update the MD5 digest with 64 bytes of data
57  *****************************************************************************/
58 void Digest( struct md5_s *p_md5, uint32_t *p_input )
59 {
60     uint32_t a, b, c, d;
61
62     REVERSE( p_input, 16 );
63
64     a = p_md5->p_digest[ 0 ];
65     b = p_md5->p_digest[ 1 ];
66     c = p_md5->p_digest[ 2 ];
67     d = p_md5->p_digest[ 3 ];
68
69     MD5_DO( F1, a, b, c, d, p_input[  0 ] + 0xd76aa478,  7 );
70     MD5_DO( F1, d, a, b, c, p_input[  1 ] + 0xe8c7b756, 12 );
71     MD5_DO( F1, c, d, a, b, p_input[  2 ] + 0x242070db, 17 );
72     MD5_DO( F1, b, c, d, a, p_input[  3 ] + 0xc1bdceee, 22 );
73     MD5_DO( F1, a, b, c, d, p_input[  4 ] + 0xf57c0faf,  7 );
74     MD5_DO( F1, d, a, b, c, p_input[  5 ] + 0x4787c62a, 12 );
75     MD5_DO( F1, c, d, a, b, p_input[  6 ] + 0xa8304613, 17 );
76     MD5_DO( F1, b, c, d, a, p_input[  7 ] + 0xfd469501, 22 );
77     MD5_DO( F1, a, b, c, d, p_input[  8 ] + 0x698098d8,  7 );
78     MD5_DO( F1, d, a, b, c, p_input[  9 ] + 0x8b44f7af, 12 );
79     MD5_DO( F1, c, d, a, b, p_input[ 10 ] + 0xffff5bb1, 17 );
80     MD5_DO( F1, b, c, d, a, p_input[ 11 ] + 0x895cd7be, 22 );
81     MD5_DO( F1, a, b, c, d, p_input[ 12 ] + 0x6b901122,  7 );
82     MD5_DO( F1, d, a, b, c, p_input[ 13 ] + 0xfd987193, 12 );
83     MD5_DO( F1, c, d, a, b, p_input[ 14 ] + 0xa679438e, 17 );
84     MD5_DO( F1, b, c, d, a, p_input[ 15 ] + 0x49b40821, 22 );
85
86     MD5_DO( F2, a, b, c, d, p_input[  1 ] + 0xf61e2562,  5 );
87     MD5_DO( F2, d, a, b, c, p_input[  6 ] + 0xc040b340,  9 );
88     MD5_DO( F2, c, d, a, b, p_input[ 11 ] + 0x265e5a51, 14 );
89     MD5_DO( F2, b, c, d, a, p_input[  0 ] + 0xe9b6c7aa, 20 );
90     MD5_DO( F2, a, b, c, d, p_input[  5 ] + 0xd62f105d,  5 );
91     MD5_DO( F2, d, a, b, c, p_input[ 10 ] + 0x02441453,  9 );
92     MD5_DO( F2, c, d, a, b, p_input[ 15 ] + 0xd8a1e681, 14 );
93     MD5_DO( F2, b, c, d, a, p_input[  4 ] + 0xe7d3fbc8, 20 );
94     MD5_DO( F2, a, b, c, d, p_input[  9 ] + 0x21e1cde6,  5 );
95     MD5_DO( F2, d, a, b, c, p_input[ 14 ] + 0xc33707d6,  9 );
96     MD5_DO( F2, c, d, a, b, p_input[  3 ] + 0xf4d50d87, 14 );
97     MD5_DO( F2, b, c, d, a, p_input[  8 ] + 0x455a14ed, 20 );
98     MD5_DO( F2, a, b, c, d, p_input[ 13 ] + 0xa9e3e905,  5 );
99     MD5_DO( F2, d, a, b, c, p_input[  2 ] + 0xfcefa3f8,  9 );
100     MD5_DO( F2, c, d, a, b, p_input[  7 ] + 0x676f02d9, 14 );
101     MD5_DO( F2, b, c, d, a, p_input[ 12 ] + 0x8d2a4c8a, 20 );
102
103     MD5_DO( F3, a, b, c, d, p_input[  5 ] + 0xfffa3942,  4 );
104     MD5_DO( F3, d, a, b, c, p_input[  8 ] + 0x8771f681, 11 );
105     MD5_DO( F3, c, d, a, b, p_input[ 11 ] + 0x6d9d6122, 16 );
106     MD5_DO( F3, b, c, d, a, p_input[ 14 ] + 0xfde5380c, 23 );
107     MD5_DO( F3, a, b, c, d, p_input[  1 ] + 0xa4beea44,  4 );
108     MD5_DO( F3, d, a, b, c, p_input[  4 ] + 0x4bdecfa9, 11 );
109     MD5_DO( F3, c, d, a, b, p_input[  7 ] + 0xf6bb4b60, 16 );
110     MD5_DO( F3, b, c, d, a, p_input[ 10 ] + 0xbebfbc70, 23 );
111     MD5_DO( F3, a, b, c, d, p_input[ 13 ] + 0x289b7ec6,  4 );
112     MD5_DO( F3, d, a, b, c, p_input[  0 ] + 0xeaa127fa, 11 );
113     MD5_DO( F3, c, d, a, b, p_input[  3 ] + 0xd4ef3085, 16 );
114     MD5_DO( F3, b, c, d, a, p_input[  6 ] + 0x04881d05, 23 );
115     MD5_DO( F3, a, b, c, d, p_input[  9 ] + 0xd9d4d039,  4 );
116     MD5_DO( F3, d, a, b, c, p_input[ 12 ] + 0xe6db99e5, 11 );
117     MD5_DO( F3, c, d, a, b, p_input[ 15 ] + 0x1fa27cf8, 16 );
118     MD5_DO( F3, b, c, d, a, p_input[  2 ] + 0xc4ac5665, 23 );
119
120     MD5_DO( F4, a, b, c, d, p_input[  0 ] + 0xf4292244,  6 );
121     MD5_DO( F4, d, a, b, c, p_input[  7 ] + 0x432aff97, 10 );
122     MD5_DO( F4, c, d, a, b, p_input[ 14 ] + 0xab9423a7, 15 );
123     MD5_DO( F4, b, c, d, a, p_input[  5 ] + 0xfc93a039, 21 );
124     MD5_DO( F4, a, b, c, d, p_input[ 12 ] + 0x655b59c3,  6 );
125     MD5_DO( F4, d, a, b, c, p_input[  3 ] + 0x8f0ccc92, 10 );
126     MD5_DO( F4, c, d, a, b, p_input[ 10 ] + 0xffeff47d, 15 );
127     MD5_DO( F4, b, c, d, a, p_input[  1 ] + 0x85845dd1, 21 );
128     MD5_DO( F4, a, b, c, d, p_input[  8 ] + 0x6fa87e4f,  6 );
129     MD5_DO( F4, d, a, b, c, p_input[ 15 ] + 0xfe2ce6e0, 10 );
130     MD5_DO( F4, c, d, a, b, p_input[  6 ] + 0xa3014314, 15 );
131     MD5_DO( F4, b, c, d, a, p_input[ 13 ] + 0x4e0811a1, 21 );
132     MD5_DO( F4, a, b, c, d, p_input[  4 ] + 0xf7537e82,  6 );
133     MD5_DO( F4, d, a, b, c, p_input[ 11 ] + 0xbd3af235, 10 );
134     MD5_DO( F4, c, d, a, b, p_input[  2 ] + 0x2ad7d2bb, 15 );
135     MD5_DO( F4, b, c, d, a, p_input[  9 ] + 0xeb86d391, 21 );
136
137     p_md5->p_digest[ 0 ] += a;
138     p_md5->p_digest[ 1 ] += b;
139     p_md5->p_digest[ 2 ] += c;
140     p_md5->p_digest[ 3 ] += d;
141 }
142
143 /*****************************************************************************
144  * InitMD5: initialise an MD5 message
145  *****************************************************************************
146  * The MD5 message-digest algorithm is described in RFC 1321
147  *****************************************************************************/
148 void InitMD5( struct md5_s *p_md5 )
149 {
150     p_md5->p_digest[ 0 ] = 0x67452301;
151     p_md5->p_digest[ 1 ] = 0xefcdab89;
152     p_md5->p_digest[ 2 ] = 0x98badcfe;
153     p_md5->p_digest[ 3 ] = 0x10325476;
154
155     memset( p_md5->p_data, 0, 64 );
156     p_md5->i_bits = 0;
157 }
158
159 /*****************************************************************************
160  * AddMD5: add i_len bytes to an MD5 message
161  *****************************************************************************/
162 void AddMD5( struct md5_s *p_md5, const uint8_t *p_src, uint32_t i_len )
163 {
164     unsigned int i_current; /* Current bytes in the spare buffer */
165     unsigned int i_offset = 0;
166
167     i_current = (p_md5->i_bits / 8) & 63;
168
169     p_md5->i_bits += 8 * i_len;
170
171     /* If we can complete our spare buffer to 64 bytes, do it and add the
172      * resulting buffer to the MD5 message */
173     if( i_len >= (64 - i_current) )
174     {
175         memcpy( ((uint8_t *)p_md5->p_data) + i_current, p_src,
176                 (64 - i_current) );
177         Digest( p_md5, p_md5->p_data );
178
179         i_offset += (64 - i_current);
180         i_len -= (64 - i_current);
181         i_current = 0;
182     }
183
184     /* Add as many entire 64 bytes blocks as we can to the MD5 message */
185     while( i_len >= 64 )
186     {
187         uint32_t p_tmp[ 16 ];
188         memcpy( p_tmp, p_src + i_offset, 64 );
189         Digest( p_md5, p_tmp );
190         i_offset += 64;
191         i_len -= 64;
192     }
193
194     /* Copy our remaining data to the message's spare buffer */
195     memcpy( ((uint8_t *)p_md5->p_data) + i_current, p_src + i_offset, i_len );
196 }
197
198 /*****************************************************************************
199  * EndMD5: finish an MD5 message
200  *****************************************************************************
201  * This function adds adequate padding to the end of the message, and appends
202  * the bit count so that we end at a block boundary.
203  *****************************************************************************/
204 void EndMD5( struct md5_s *p_md5 )
205 {
206     unsigned int i_current;
207
208     i_current = (p_md5->i_bits / 8) & 63;
209
210     /* Append 0x80 to our buffer. No boundary check because the temporary
211      * buffer cannot be full, otherwise AddMD5 would have emptied it. */
212     ((uint8_t *)p_md5->p_data)[ i_current++ ] = 0x80;
213
214     /* If less than 8 bytes are available at the end of the block, complete
215      * this 64 bytes block with zeros and add it to the message. We'll add
216      * our length at the end of the next block. */
217     if( i_current > 56 )
218     {
219         memset( ((uint8_t *)p_md5->p_data) + i_current, 0, (64 - i_current) );
220         Digest( p_md5, p_md5->p_data );
221         i_current = 0;
222     }
223
224     /* Fill the unused space in our last block with zeroes and put the
225      * message length at the end. */
226     memset( ((uint8_t *)p_md5->p_data) + i_current, 0, (56 - i_current) );
227     p_md5->p_data[ 14 ] = p_md5->i_bits & 0xffffffff;
228     p_md5->p_data[ 15 ] = (p_md5->i_bits >> 32);
229     REVERSE( &p_md5->p_data[ 14 ], 2 );
230
231     Digest( p_md5, p_md5->p_data );
232 }
233
234