Blame


1 a25e7f2f 2004-04-21 devnull /*
2 a25e7f2f 2004-04-21 devnull * rfc1321 requires that I include this. The code is new. The constants
3 a25e7f2f 2004-04-21 devnull * all come from the rfc (hence the copyright). We trade a table for the
4 a25e7f2f 2004-04-21 devnull * macros in rfc. The total size is a lot less. -- presotto
5 a25e7f2f 2004-04-21 devnull *
6 a25e7f2f 2004-04-21 devnull * Copyright (C) 1991-2, RSA Data Security, Inc. Created 1991. All
7 a25e7f2f 2004-04-21 devnull * rights reserved.
8 a25e7f2f 2004-04-21 devnull *
9 a25e7f2f 2004-04-21 devnull * License to copy and use this software is granted provided that it
10 a25e7f2f 2004-04-21 devnull * is identified as the "RSA Data Security, Inc. MD5 Message-Digest
11 a25e7f2f 2004-04-21 devnull * Algorithm" in all material mentioning or referencing this software
12 a25e7f2f 2004-04-21 devnull * or this function.
13 a25e7f2f 2004-04-21 devnull *
14 a25e7f2f 2004-04-21 devnull * License is also granted to make and use derivative works provided
15 a25e7f2f 2004-04-21 devnull * that such works are identified as "derived from the RSA Data
16 a25e7f2f 2004-04-21 devnull * Security, Inc. MD5 Message-Digest Algorithm" in all material
17 a25e7f2f 2004-04-21 devnull * mentioning or referencing the derived work.
18 a25e7f2f 2004-04-21 devnull *
19 a25e7f2f 2004-04-21 devnull * RSA Data Security, Inc. makes no representations concerning either
20 a25e7f2f 2004-04-21 devnull * the merchantability of this software or the suitability of this
21 a25e7f2f 2004-04-21 devnull * software forany particular purpose. It is provided "as is"
22 a25e7f2f 2004-04-21 devnull * without express or implied warranty of any kind.
23 a25e7f2f 2004-04-21 devnull * These notices must be retained in any copies of any part of this
24 a25e7f2f 2004-04-21 devnull * documentation and/or software.
25 a25e7f2f 2004-04-21 devnull */
26 a25e7f2f 2004-04-21 devnull #define S11 7
27 a25e7f2f 2004-04-21 devnull #define S12 12
28 a25e7f2f 2004-04-21 devnull #define S13 17
29 a25e7f2f 2004-04-21 devnull #define S14 22
30 a25e7f2f 2004-04-21 devnull
31 a25e7f2f 2004-04-21 devnull #define S21 5
32 a25e7f2f 2004-04-21 devnull #define S22 9
33 a25e7f2f 2004-04-21 devnull #define S23 14
34 a25e7f2f 2004-04-21 devnull #define S24 20
35 a25e7f2f 2004-04-21 devnull
36 a25e7f2f 2004-04-21 devnull #define S31 4
37 a25e7f2f 2004-04-21 devnull #define S32 11
38 a25e7f2f 2004-04-21 devnull #define S33 16
39 a25e7f2f 2004-04-21 devnull #define S34 23
40 a25e7f2f 2004-04-21 devnull
41 a25e7f2f 2004-04-21 devnull #define S41 6
42 a25e7f2f 2004-04-21 devnull #define S42 10
43 a25e7f2f 2004-04-21 devnull #define S43 15
44 a25e7f2f 2004-04-21 devnull #define S44 21
45 a25e7f2f 2004-04-21 devnull
46 a2000ee7 2006-04-21 devnull #define PAYME(x) $##x
47 a25e7f2f 2004-04-21 devnull
48 a25e7f2f 2004-04-21 devnull /*
49 a25e7f2f 2004-04-21 devnull * SI is data
50 a25e7f2f 2004-04-21 devnull * a += FN(B,C,D);
51 a25e7f2f 2004-04-21 devnull * a += x[sh] + t[sh];
52 a25e7f2f 2004-04-21 devnull * a = (a << S11) | (a >> (32 - S11));
53 a25e7f2f 2004-04-21 devnull * a += b;
54 a25e7f2f 2004-04-21 devnull */
55 a25e7f2f 2004-04-21 devnull
56 a25e7f2f 2004-04-21 devnull #define BODY1(off,V,FN,SH,A,B,C,D)\
57 a25e7f2f 2004-04-21 devnull FN(B,C,D)\
58 a25e7f2f 2004-04-21 devnull leal V(A, %edi, 1), A;\
59 a25e7f2f 2004-04-21 devnull addl off(%ebp), A;\
60 a25e7f2f 2004-04-21 devnull roll PAYME(SH), A;\
61 a25e7f2f 2004-04-21 devnull addl B, A;\
62 a25e7f2f 2004-04-21 devnull
63 a25e7f2f 2004-04-21 devnull #define BODY(off,V,FN,SH,A,B,C,D)\
64 a25e7f2f 2004-04-21 devnull FN(B,C,D)\
65 a25e7f2f 2004-04-21 devnull leal V(A, %edi, 1), A;\
66 a25e7f2f 2004-04-21 devnull addl (off)(%ebp), A;\
67 a25e7f2f 2004-04-21 devnull roll PAYME(SH), A;\
68 a25e7f2f 2004-04-21 devnull addl B,A;\
69 a25e7f2f 2004-04-21 devnull
70 a25e7f2f 2004-04-21 devnull /*
71 a25e7f2f 2004-04-21 devnull * fn1 = ((c ^ d) & b) ^ d
72 a25e7f2f 2004-04-21 devnull */
73 a25e7f2f 2004-04-21 devnull #define FN1(B,C,D)\
74 a25e7f2f 2004-04-21 devnull movl C, %edi;\
75 a25e7f2f 2004-04-21 devnull xorl D, %edi;\
76 a25e7f2f 2004-04-21 devnull andl B, %edi;\
77 a25e7f2f 2004-04-21 devnull xorl D, %edi;\
78 a25e7f2f 2004-04-21 devnull
79 a25e7f2f 2004-04-21 devnull /*
80 a25e7f2f 2004-04-21 devnull * fn2 = ((b ^ c) & d) ^ c;
81 a25e7f2f 2004-04-21 devnull */
82 a25e7f2f 2004-04-21 devnull #define FN2(B,C,D)\
83 a25e7f2f 2004-04-21 devnull movl B, %edi;\
84 a25e7f2f 2004-04-21 devnull xorl C, %edi;\
85 a25e7f2f 2004-04-21 devnull andl D, %edi;\
86 a25e7f2f 2004-04-21 devnull xorl C, %edi;\
87 a25e7f2f 2004-04-21 devnull
88 a25e7f2f 2004-04-21 devnull /*
89 a25e7f2f 2004-04-21 devnull * fn3 = b ^ c ^ d;
90 a25e7f2f 2004-04-21 devnull */
91 a25e7f2f 2004-04-21 devnull #define FN3(B,C,D)\
92 a25e7f2f 2004-04-21 devnull movl B, %edi;\
93 a25e7f2f 2004-04-21 devnull xorl C, %edi;\
94 a25e7f2f 2004-04-21 devnull xorl D, %edi;\
95 a25e7f2f 2004-04-21 devnull
96 a25e7f2f 2004-04-21 devnull /*
97 a25e7f2f 2004-04-21 devnull * fn4 = c ^ (b | ~d);
98 a25e7f2f 2004-04-21 devnull */
99 a25e7f2f 2004-04-21 devnull #define FN4(B,C,D)\
100 a25e7f2f 2004-04-21 devnull movl D, %edi;\
101 a25e7f2f 2004-04-21 devnull xorl $-1, %edi;\
102 a25e7f2f 2004-04-21 devnull orl B, %edi;\
103 a25e7f2f 2004-04-21 devnull xorl C, %edi;\
104 a25e7f2f 2004-04-21 devnull
105 2f2df5e0 2004-05-09 devnull #define STACKSIZE 20
106 a25e7f2f 2004-04-21 devnull
107 2f2df5e0 2004-05-09 devnull #define DATA (STACKSIZE+8)
108 2f2df5e0 2004-05-09 devnull #define LEN (STACKSIZE+12)
109 2f2df5e0 2004-05-09 devnull #define STATE (STACKSIZE+16)
110 a25e7f2f 2004-04-21 devnull
111 2f2df5e0 2004-05-09 devnull #define EDATA (STACKSIZE-4)
112 2f2df5e0 2004-05-09 devnull #define OLDEBX (STACKSIZE-8)
113 2f2df5e0 2004-05-09 devnull #define OLDESI (STACKSIZE-12)
114 2f2df5e0 2004-05-09 devnull #define OLDEDI (STACKSIZE-16)
115 2f2df5e0 2004-05-09 devnull
116 a25e7f2f 2004-04-21 devnull .text
117 a25e7f2f 2004-04-21 devnull
118 a25e7f2f 2004-04-21 devnull .p2align 2,0x90
119 54b59fd1 2006-04-21 devnull #ifdef __Darwin__
120 54b59fd1 2006-04-21 devnull .globl __md5block
121 54b59fd1 2006-04-21 devnull __md5block:
122 54b59fd1 2006-04-21 devnull #else
123 a25e7f2f 2004-04-21 devnull .globl _md5block
124 a25e7f2f 2004-04-21 devnull _md5block:
125 54b59fd1 2006-04-21 devnull #endif
126 a25e7f2f 2004-04-21 devnull
127 a25e7f2f 2004-04-21 devnull /* Prelude */
128 a25e7f2f 2004-04-21 devnull pushl %ebp
129 2f2df5e0 2004-05-09 devnull subl $(STACKSIZE), %esp
130 a25e7f2f 2004-04-21 devnull movl %ebx, OLDEBX(%esp)
131 a25e7f2f 2004-04-21 devnull movl %esi, OLDESI(%esp)
132 a25e7f2f 2004-04-21 devnull movl %edi, OLDEDI(%esp)
133 a25e7f2f 2004-04-21 devnull
134 a25e7f2f 2004-04-21 devnull movl DATA(%esp), %eax
135 a25e7f2f 2004-04-21 devnull addl LEN(%esp), %eax
136 a25e7f2f 2004-04-21 devnull movl %eax, EDATA(%esp)
137 a25e7f2f 2004-04-21 devnull
138 a25e7f2f 2004-04-21 devnull movl DATA(%esp), %ebp
139 a25e7f2f 2004-04-21 devnull
140 6a4599d7 2005-05-12 devnull 0:
141 a25e7f2f 2004-04-21 devnull movl STATE(%esp), %esi
142 a25e7f2f 2004-04-21 devnull movl (%esi), %eax
143 a25e7f2f 2004-04-21 devnull movl 4(%esi), %ebx
144 a25e7f2f 2004-04-21 devnull movl 8(%esi), %ecx
145 a25e7f2f 2004-04-21 devnull movl 12(%esi), %edx
146 a25e7f2f 2004-04-21 devnull
147 a25e7f2f 2004-04-21 devnull BODY1( 0*4,0xd76aa478,FN1,S11,%eax,%ebx,%ecx,%edx)
148 a25e7f2f 2004-04-21 devnull BODY1( 1*4,0xe8c7b756,FN1,S12,%edx,%eax,%ebx,%ecx)
149 a25e7f2f 2004-04-21 devnull BODY1( 2*4,0x242070db,FN1,S13,%ecx,%edx,%eax,%ebx)
150 a25e7f2f 2004-04-21 devnull BODY1( 3*4,0xc1bdceee,FN1,S14,%ebx,%ecx,%edx,%eax)
151 a25e7f2f 2004-04-21 devnull
152 a25e7f2f 2004-04-21 devnull BODY1( 4*4,0xf57c0faf,FN1,S11,%eax,%ebx,%ecx,%edx)
153 a25e7f2f 2004-04-21 devnull BODY1( 5*4,0x4787c62a,FN1,S12,%edx,%eax,%ebx,%ecx)
154 a25e7f2f 2004-04-21 devnull BODY1( 6*4,0xa8304613,FN1,S13,%ecx,%edx,%eax,%ebx)
155 a25e7f2f 2004-04-21 devnull BODY1( 7*4,0xfd469501,FN1,S14,%ebx,%ecx,%edx,%eax)
156 a25e7f2f 2004-04-21 devnull
157 a25e7f2f 2004-04-21 devnull BODY1( 8*4,0x698098d8,FN1,S11,%eax,%ebx,%ecx,%edx)
158 a25e7f2f 2004-04-21 devnull BODY1( 9*4,0x8b44f7af,FN1,S12,%edx,%eax,%ebx,%ecx)
159 a25e7f2f 2004-04-21 devnull BODY1(10*4,0xffff5bb1,FN1,S13,%ecx,%edx,%eax,%ebx)
160 a25e7f2f 2004-04-21 devnull BODY1(11*4,0x895cd7be,FN1,S14,%ebx,%ecx,%edx,%eax)
161 a25e7f2f 2004-04-21 devnull
162 a25e7f2f 2004-04-21 devnull BODY1(12*4,0x6b901122,FN1,S11,%eax,%ebx,%ecx,%edx)
163 a25e7f2f 2004-04-21 devnull BODY1(13*4,0xfd987193,FN1,S12,%edx,%eax,%ebx,%ecx)
164 a25e7f2f 2004-04-21 devnull BODY1(14*4,0xa679438e,FN1,S13,%ecx,%edx,%eax,%ebx)
165 a25e7f2f 2004-04-21 devnull BODY1(15*4,0x49b40821,FN1,S14,%ebx,%ecx,%edx,%eax)
166 a25e7f2f 2004-04-21 devnull
167 a25e7f2f 2004-04-21 devnull
168 a25e7f2f 2004-04-21 devnull BODY( 1*4,0xf61e2562,FN2,S21,%eax,%ebx,%ecx,%edx)
169 a25e7f2f 2004-04-21 devnull BODY( 6*4,0xc040b340,FN2,S22,%edx,%eax,%ebx,%ecx)
170 a25e7f2f 2004-04-21 devnull BODY(11*4,0x265e5a51,FN2,S23,%ecx,%edx,%eax,%ebx)
171 a25e7f2f 2004-04-21 devnull BODY( 0*4,0xe9b6c7aa,FN2,S24,%ebx,%ecx,%edx,%eax)
172 a25e7f2f 2004-04-21 devnull
173 a25e7f2f 2004-04-21 devnull BODY( 5*4,0xd62f105d,FN2,S21,%eax,%ebx,%ecx,%edx)
174 a25e7f2f 2004-04-21 devnull BODY(10*4,0x02441453,FN2,S22,%edx,%eax,%ebx,%ecx)
175 a25e7f2f 2004-04-21 devnull BODY(15*4,0xd8a1e681,FN2,S23,%ecx,%edx,%eax,%ebx)
176 a25e7f2f 2004-04-21 devnull BODY( 4*4,0xe7d3fbc8,FN2,S24,%ebx,%ecx,%edx,%eax)
177 a25e7f2f 2004-04-21 devnull
178 a25e7f2f 2004-04-21 devnull BODY( 9*4,0x21e1cde6,FN2,S21,%eax,%ebx,%ecx,%edx)
179 a25e7f2f 2004-04-21 devnull BODY(14*4,0xc33707d6,FN2,S22,%edx,%eax,%ebx,%ecx)
180 a25e7f2f 2004-04-21 devnull BODY( 3*4,0xf4d50d87,FN2,S23,%ecx,%edx,%eax,%ebx)
181 a25e7f2f 2004-04-21 devnull BODY( 8*4,0x455a14ed,FN2,S24,%ebx,%ecx,%edx,%eax)
182 a25e7f2f 2004-04-21 devnull
183 a25e7f2f 2004-04-21 devnull BODY(13*4,0xa9e3e905,FN2,S21,%eax,%ebx,%ecx,%edx)
184 a25e7f2f 2004-04-21 devnull BODY( 2*4,0xfcefa3f8,FN2,S22,%edx,%eax,%ebx,%ecx)
185 a25e7f2f 2004-04-21 devnull BODY( 7*4,0x676f02d9,FN2,S23,%ecx,%edx,%eax,%ebx)
186 a25e7f2f 2004-04-21 devnull BODY(12*4,0x8d2a4c8a,FN2,S24,%ebx,%ecx,%edx,%eax)
187 a25e7f2f 2004-04-21 devnull
188 a25e7f2f 2004-04-21 devnull
189 a25e7f2f 2004-04-21 devnull BODY( 5*4,0xfffa3942,FN3,S31,%eax,%ebx,%ecx,%edx)
190 a25e7f2f 2004-04-21 devnull BODY( 8*4,0x8771f681,FN3,S32,%edx,%eax,%ebx,%ecx)
191 a25e7f2f 2004-04-21 devnull BODY(11*4,0x6d9d6122,FN3,S33,%ecx,%edx,%eax,%ebx)
192 a25e7f2f 2004-04-21 devnull BODY(14*4,0xfde5380c,FN3,S34,%ebx,%ecx,%edx,%eax)
193 a25e7f2f 2004-04-21 devnull
194 a25e7f2f 2004-04-21 devnull BODY( 1*4,0xa4beea44,FN3,S31,%eax,%ebx,%ecx,%edx)
195 a25e7f2f 2004-04-21 devnull BODY( 4*4,0x4bdecfa9,FN3,S32,%edx,%eax,%ebx,%ecx)
196 a25e7f2f 2004-04-21 devnull BODY( 7*4,0xf6bb4b60,FN3,S33,%ecx,%edx,%eax,%ebx)
197 a25e7f2f 2004-04-21 devnull BODY(10*4,0xbebfbc70,FN3,S34,%ebx,%ecx,%edx,%eax)
198 a25e7f2f 2004-04-21 devnull
199 a25e7f2f 2004-04-21 devnull BODY(13*4,0x289b7ec6,FN3,S31,%eax,%ebx,%ecx,%edx)
200 a25e7f2f 2004-04-21 devnull BODY( 0*4,0xeaa127fa,FN3,S32,%edx,%eax,%ebx,%ecx)
201 a25e7f2f 2004-04-21 devnull BODY( 3*4,0xd4ef3085,FN3,S33,%ecx,%edx,%eax,%ebx)
202 a25e7f2f 2004-04-21 devnull BODY( 6*4,0x04881d05,FN3,S34,%ebx,%ecx,%edx,%eax)
203 a25e7f2f 2004-04-21 devnull
204 a25e7f2f 2004-04-21 devnull BODY( 9*4,0xd9d4d039,FN3,S31,%eax,%ebx,%ecx,%edx)
205 a25e7f2f 2004-04-21 devnull BODY(12*4,0xe6db99e5,FN3,S32,%edx,%eax,%ebx,%ecx)
206 a25e7f2f 2004-04-21 devnull BODY(15*4,0x1fa27cf8,FN3,S33,%ecx,%edx,%eax,%ebx)
207 a25e7f2f 2004-04-21 devnull BODY( 2*4,0xc4ac5665,FN3,S34,%ebx,%ecx,%edx,%eax)
208 a25e7f2f 2004-04-21 devnull
209 a25e7f2f 2004-04-21 devnull
210 a25e7f2f 2004-04-21 devnull BODY( 0*4,0xf4292244,FN4,S41,%eax,%ebx,%ecx,%edx)
211 a25e7f2f 2004-04-21 devnull BODY( 7*4,0x432aff97,FN4,S42,%edx,%eax,%ebx,%ecx)
212 a25e7f2f 2004-04-21 devnull BODY(14*4,0xab9423a7,FN4,S43,%ecx,%edx,%eax,%ebx)
213 a25e7f2f 2004-04-21 devnull BODY( 5*4,0xfc93a039,FN4,S44,%ebx,%ecx,%edx,%eax)
214 a25e7f2f 2004-04-21 devnull
215 a25e7f2f 2004-04-21 devnull BODY(12*4,0x655b59c3,FN4,S41,%eax,%ebx,%ecx,%edx)
216 a25e7f2f 2004-04-21 devnull BODY( 3*4,0x8f0ccc92,FN4,S42,%edx,%eax,%ebx,%ecx)
217 a25e7f2f 2004-04-21 devnull BODY(10*4,0xffeff47d,FN4,S43,%ecx,%edx,%eax,%ebx)
218 a25e7f2f 2004-04-21 devnull BODY( 1*4,0x85845dd1,FN4,S44,%ebx,%ecx,%edx,%eax)
219 a25e7f2f 2004-04-21 devnull
220 a25e7f2f 2004-04-21 devnull BODY( 8*4,0x6fa87e4f,FN4,S41,%eax,%ebx,%ecx,%edx)
221 a25e7f2f 2004-04-21 devnull BODY(15*4,0xfe2ce6e0,FN4,S42,%edx,%eax,%ebx,%ecx)
222 a25e7f2f 2004-04-21 devnull BODY( 6*4,0xa3014314,FN4,S43,%ecx,%edx,%eax,%ebx)
223 a25e7f2f 2004-04-21 devnull BODY(13*4,0x4e0811a1,FN4,S44,%ebx,%ecx,%edx,%eax)
224 a25e7f2f 2004-04-21 devnull
225 a25e7f2f 2004-04-21 devnull BODY( 4*4,0xf7537e82,FN4,S41,%eax,%ebx,%ecx,%edx)
226 a25e7f2f 2004-04-21 devnull BODY(11*4,0xbd3af235,FN4,S42,%edx,%eax,%ebx,%ecx)
227 a25e7f2f 2004-04-21 devnull BODY( 2*4,0x2ad7d2bb,FN4,S43,%ecx,%edx,%eax,%ebx)
228 a25e7f2f 2004-04-21 devnull BODY( 9*4,0xeb86d391,FN4,S44,%ebx,%ecx,%edx,%eax)
229 a25e7f2f 2004-04-21 devnull
230 a25e7f2f 2004-04-21 devnull addl $(16*4), %ebp
231 a25e7f2f 2004-04-21 devnull movl STATE(%esp), %edi
232 a25e7f2f 2004-04-21 devnull addl %eax,0(%edi)
233 a25e7f2f 2004-04-21 devnull addl %ebx,4(%edi)
234 a25e7f2f 2004-04-21 devnull addl %ecx,8(%edi)
235 a25e7f2f 2004-04-21 devnull addl %edx,12(%edi)
236 a25e7f2f 2004-04-21 devnull
237 a25e7f2f 2004-04-21 devnull movl EDATA(%esp), %edi
238 a25e7f2f 2004-04-21 devnull cmpl %edi, %ebp
239 6a4599d7 2005-05-12 devnull jb 0b
240 a25e7f2f 2004-04-21 devnull
241 a25e7f2f 2004-04-21 devnull /* Postlude */
242 a25e7f2f 2004-04-21 devnull movl OLDEBX(%esp), %ebx
243 a25e7f2f 2004-04-21 devnull movl OLDESI(%esp), %esi
244 a25e7f2f 2004-04-21 devnull movl OLDEDI(%esp), %edi
245 2f2df5e0 2004-05-09 devnull addl $(STACKSIZE), %esp
246 2f2df5e0 2004-05-09 devnull popl %ebp
247 a25e7f2f 2004-04-21 devnull ret
248 a25e7f2f 2004-04-21 devnull