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 b8f742db 2005-01-11 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 a25e7f2f 2004-04-21 devnull .globl _md5block
120 a25e7f2f 2004-04-21 devnull .type _md5block, @function
121 a25e7f2f 2004-04-21 devnull _md5block:
122 a25e7f2f 2004-04-21 devnull
123 a25e7f2f 2004-04-21 devnull /* Prelude */
124 a25e7f2f 2004-04-21 devnull pushl %ebp
125 2f2df5e0 2004-05-09 devnull subl $(STACKSIZE), %esp
126 a25e7f2f 2004-04-21 devnull movl %ebx, OLDEBX(%esp)
127 a25e7f2f 2004-04-21 devnull movl %esi, OLDESI(%esp)
128 a25e7f2f 2004-04-21 devnull movl %edi, OLDEDI(%esp)
129 a25e7f2f 2004-04-21 devnull
130 a25e7f2f 2004-04-21 devnull movl DATA(%esp), %eax
131 a25e7f2f 2004-04-21 devnull addl LEN(%esp), %eax
132 a25e7f2f 2004-04-21 devnull movl %eax, EDATA(%esp)
133 a25e7f2f 2004-04-21 devnull
134 a25e7f2f 2004-04-21 devnull movl DATA(%esp), %ebp
135 a25e7f2f 2004-04-21 devnull
136 a25e7f2f 2004-04-21 devnull mainloop:
137 a25e7f2f 2004-04-21 devnull movl STATE(%esp), %esi
138 a25e7f2f 2004-04-21 devnull movl (%esi), %eax
139 a25e7f2f 2004-04-21 devnull movl 4(%esi), %ebx
140 a25e7f2f 2004-04-21 devnull movl 8(%esi), %ecx
141 a25e7f2f 2004-04-21 devnull movl 12(%esi), %edx
142 a25e7f2f 2004-04-21 devnull
143 a25e7f2f 2004-04-21 devnull BODY1( 0*4,0xd76aa478,FN1,S11,%eax,%ebx,%ecx,%edx)
144 a25e7f2f 2004-04-21 devnull BODY1( 1*4,0xe8c7b756,FN1,S12,%edx,%eax,%ebx,%ecx)
145 a25e7f2f 2004-04-21 devnull BODY1( 2*4,0x242070db,FN1,S13,%ecx,%edx,%eax,%ebx)
146 a25e7f2f 2004-04-21 devnull BODY1( 3*4,0xc1bdceee,FN1,S14,%ebx,%ecx,%edx,%eax)
147 a25e7f2f 2004-04-21 devnull
148 a25e7f2f 2004-04-21 devnull BODY1( 4*4,0xf57c0faf,FN1,S11,%eax,%ebx,%ecx,%edx)
149 a25e7f2f 2004-04-21 devnull BODY1( 5*4,0x4787c62a,FN1,S12,%edx,%eax,%ebx,%ecx)
150 a25e7f2f 2004-04-21 devnull BODY1( 6*4,0xa8304613,FN1,S13,%ecx,%edx,%eax,%ebx)
151 a25e7f2f 2004-04-21 devnull BODY1( 7*4,0xfd469501,FN1,S14,%ebx,%ecx,%edx,%eax)
152 a25e7f2f 2004-04-21 devnull
153 a25e7f2f 2004-04-21 devnull BODY1( 8*4,0x698098d8,FN1,S11,%eax,%ebx,%ecx,%edx)
154 a25e7f2f 2004-04-21 devnull BODY1( 9*4,0x8b44f7af,FN1,S12,%edx,%eax,%ebx,%ecx)
155 a25e7f2f 2004-04-21 devnull BODY1(10*4,0xffff5bb1,FN1,S13,%ecx,%edx,%eax,%ebx)
156 a25e7f2f 2004-04-21 devnull BODY1(11*4,0x895cd7be,FN1,S14,%ebx,%ecx,%edx,%eax)
157 a25e7f2f 2004-04-21 devnull
158 a25e7f2f 2004-04-21 devnull BODY1(12*4,0x6b901122,FN1,S11,%eax,%ebx,%ecx,%edx)
159 a25e7f2f 2004-04-21 devnull BODY1(13*4,0xfd987193,FN1,S12,%edx,%eax,%ebx,%ecx)
160 a25e7f2f 2004-04-21 devnull BODY1(14*4,0xa679438e,FN1,S13,%ecx,%edx,%eax,%ebx)
161 a25e7f2f 2004-04-21 devnull BODY1(15*4,0x49b40821,FN1,S14,%ebx,%ecx,%edx,%eax)
162 a25e7f2f 2004-04-21 devnull
163 a25e7f2f 2004-04-21 devnull
164 a25e7f2f 2004-04-21 devnull BODY( 1*4,0xf61e2562,FN2,S21,%eax,%ebx,%ecx,%edx)
165 a25e7f2f 2004-04-21 devnull BODY( 6*4,0xc040b340,FN2,S22,%edx,%eax,%ebx,%ecx)
166 a25e7f2f 2004-04-21 devnull BODY(11*4,0x265e5a51,FN2,S23,%ecx,%edx,%eax,%ebx)
167 a25e7f2f 2004-04-21 devnull BODY( 0*4,0xe9b6c7aa,FN2,S24,%ebx,%ecx,%edx,%eax)
168 a25e7f2f 2004-04-21 devnull
169 a25e7f2f 2004-04-21 devnull BODY( 5*4,0xd62f105d,FN2,S21,%eax,%ebx,%ecx,%edx)
170 a25e7f2f 2004-04-21 devnull BODY(10*4,0x02441453,FN2,S22,%edx,%eax,%ebx,%ecx)
171 a25e7f2f 2004-04-21 devnull BODY(15*4,0xd8a1e681,FN2,S23,%ecx,%edx,%eax,%ebx)
172 a25e7f2f 2004-04-21 devnull BODY( 4*4,0xe7d3fbc8,FN2,S24,%ebx,%ecx,%edx,%eax)
173 a25e7f2f 2004-04-21 devnull
174 a25e7f2f 2004-04-21 devnull BODY( 9*4,0x21e1cde6,FN2,S21,%eax,%ebx,%ecx,%edx)
175 a25e7f2f 2004-04-21 devnull BODY(14*4,0xc33707d6,FN2,S22,%edx,%eax,%ebx,%ecx)
176 a25e7f2f 2004-04-21 devnull BODY( 3*4,0xf4d50d87,FN2,S23,%ecx,%edx,%eax,%ebx)
177 a25e7f2f 2004-04-21 devnull BODY( 8*4,0x455a14ed,FN2,S24,%ebx,%ecx,%edx,%eax)
178 a25e7f2f 2004-04-21 devnull
179 a25e7f2f 2004-04-21 devnull BODY(13*4,0xa9e3e905,FN2,S21,%eax,%ebx,%ecx,%edx)
180 a25e7f2f 2004-04-21 devnull BODY( 2*4,0xfcefa3f8,FN2,S22,%edx,%eax,%ebx,%ecx)
181 a25e7f2f 2004-04-21 devnull BODY( 7*4,0x676f02d9,FN2,S23,%ecx,%edx,%eax,%ebx)
182 a25e7f2f 2004-04-21 devnull BODY(12*4,0x8d2a4c8a,FN2,S24,%ebx,%ecx,%edx,%eax)
183 a25e7f2f 2004-04-21 devnull
184 a25e7f2f 2004-04-21 devnull
185 a25e7f2f 2004-04-21 devnull BODY( 5*4,0xfffa3942,FN3,S31,%eax,%ebx,%ecx,%edx)
186 a25e7f2f 2004-04-21 devnull BODY( 8*4,0x8771f681,FN3,S32,%edx,%eax,%ebx,%ecx)
187 a25e7f2f 2004-04-21 devnull BODY(11*4,0x6d9d6122,FN3,S33,%ecx,%edx,%eax,%ebx)
188 a25e7f2f 2004-04-21 devnull BODY(14*4,0xfde5380c,FN3,S34,%ebx,%ecx,%edx,%eax)
189 a25e7f2f 2004-04-21 devnull
190 a25e7f2f 2004-04-21 devnull BODY( 1*4,0xa4beea44,FN3,S31,%eax,%ebx,%ecx,%edx)
191 a25e7f2f 2004-04-21 devnull BODY( 4*4,0x4bdecfa9,FN3,S32,%edx,%eax,%ebx,%ecx)
192 a25e7f2f 2004-04-21 devnull BODY( 7*4,0xf6bb4b60,FN3,S33,%ecx,%edx,%eax,%ebx)
193 a25e7f2f 2004-04-21 devnull BODY(10*4,0xbebfbc70,FN3,S34,%ebx,%ecx,%edx,%eax)
194 a25e7f2f 2004-04-21 devnull
195 a25e7f2f 2004-04-21 devnull BODY(13*4,0x289b7ec6,FN3,S31,%eax,%ebx,%ecx,%edx)
196 a25e7f2f 2004-04-21 devnull BODY( 0*4,0xeaa127fa,FN3,S32,%edx,%eax,%ebx,%ecx)
197 a25e7f2f 2004-04-21 devnull BODY( 3*4,0xd4ef3085,FN3,S33,%ecx,%edx,%eax,%ebx)
198 a25e7f2f 2004-04-21 devnull BODY( 6*4,0x04881d05,FN3,S34,%ebx,%ecx,%edx,%eax)
199 a25e7f2f 2004-04-21 devnull
200 a25e7f2f 2004-04-21 devnull BODY( 9*4,0xd9d4d039,FN3,S31,%eax,%ebx,%ecx,%edx)
201 a25e7f2f 2004-04-21 devnull BODY(12*4,0xe6db99e5,FN3,S32,%edx,%eax,%ebx,%ecx)
202 a25e7f2f 2004-04-21 devnull BODY(15*4,0x1fa27cf8,FN3,S33,%ecx,%edx,%eax,%ebx)
203 a25e7f2f 2004-04-21 devnull BODY( 2*4,0xc4ac5665,FN3,S34,%ebx,%ecx,%edx,%eax)
204 a25e7f2f 2004-04-21 devnull
205 a25e7f2f 2004-04-21 devnull
206 a25e7f2f 2004-04-21 devnull BODY( 0*4,0xf4292244,FN4,S41,%eax,%ebx,%ecx,%edx)
207 a25e7f2f 2004-04-21 devnull BODY( 7*4,0x432aff97,FN4,S42,%edx,%eax,%ebx,%ecx)
208 a25e7f2f 2004-04-21 devnull BODY(14*4,0xab9423a7,FN4,S43,%ecx,%edx,%eax,%ebx)
209 a25e7f2f 2004-04-21 devnull BODY( 5*4,0xfc93a039,FN4,S44,%ebx,%ecx,%edx,%eax)
210 a25e7f2f 2004-04-21 devnull
211 a25e7f2f 2004-04-21 devnull BODY(12*4,0x655b59c3,FN4,S41,%eax,%ebx,%ecx,%edx)
212 a25e7f2f 2004-04-21 devnull BODY( 3*4,0x8f0ccc92,FN4,S42,%edx,%eax,%ebx,%ecx)
213 a25e7f2f 2004-04-21 devnull BODY(10*4,0xffeff47d,FN4,S43,%ecx,%edx,%eax,%ebx)
214 a25e7f2f 2004-04-21 devnull BODY( 1*4,0x85845dd1,FN4,S44,%ebx,%ecx,%edx,%eax)
215 a25e7f2f 2004-04-21 devnull
216 a25e7f2f 2004-04-21 devnull BODY( 8*4,0x6fa87e4f,FN4,S41,%eax,%ebx,%ecx,%edx)
217 a25e7f2f 2004-04-21 devnull BODY(15*4,0xfe2ce6e0,FN4,S42,%edx,%eax,%ebx,%ecx)
218 a25e7f2f 2004-04-21 devnull BODY( 6*4,0xa3014314,FN4,S43,%ecx,%edx,%eax,%ebx)
219 a25e7f2f 2004-04-21 devnull BODY(13*4,0x4e0811a1,FN4,S44,%ebx,%ecx,%edx,%eax)
220 a25e7f2f 2004-04-21 devnull
221 a25e7f2f 2004-04-21 devnull BODY( 4*4,0xf7537e82,FN4,S41,%eax,%ebx,%ecx,%edx)
222 a25e7f2f 2004-04-21 devnull BODY(11*4,0xbd3af235,FN4,S42,%edx,%eax,%ebx,%ecx)
223 a25e7f2f 2004-04-21 devnull BODY( 2*4,0x2ad7d2bb,FN4,S43,%ecx,%edx,%eax,%ebx)
224 a25e7f2f 2004-04-21 devnull BODY( 9*4,0xeb86d391,FN4,S44,%ebx,%ecx,%edx,%eax)
225 a25e7f2f 2004-04-21 devnull
226 a25e7f2f 2004-04-21 devnull addl $(16*4), %ebp
227 a25e7f2f 2004-04-21 devnull movl STATE(%esp), %edi
228 a25e7f2f 2004-04-21 devnull addl %eax,0(%edi)
229 a25e7f2f 2004-04-21 devnull addl %ebx,4(%edi)
230 a25e7f2f 2004-04-21 devnull addl %ecx,8(%edi)
231 a25e7f2f 2004-04-21 devnull addl %edx,12(%edi)
232 a25e7f2f 2004-04-21 devnull
233 a25e7f2f 2004-04-21 devnull movl EDATA(%esp), %edi
234 a25e7f2f 2004-04-21 devnull cmpl %edi, %ebp
235 a25e7f2f 2004-04-21 devnull jb mainloop
236 a25e7f2f 2004-04-21 devnull
237 a25e7f2f 2004-04-21 devnull /* Postlude */
238 a25e7f2f 2004-04-21 devnull movl OLDEBX(%esp), %ebx
239 a25e7f2f 2004-04-21 devnull movl OLDESI(%esp), %esi
240 a25e7f2f 2004-04-21 devnull movl OLDEDI(%esp), %edi
241 2f2df5e0 2004-05-09 devnull addl $(STACKSIZE), %esp
242 2f2df5e0 2004-05-09 devnull popl %ebp
243 a25e7f2f 2004-04-21 devnull ret
244 a25e7f2f 2004-04-21 devnull