Blame


1 a25e7f2f 2004-04-21 devnull .text
2 a25e7f2f 2004-04-21 devnull
3 a25e7f2f 2004-04-21 devnull .p2align 2,0x90
4 a25e7f2f 2004-04-21 devnull .globl _sha1block
5 a25e7f2f 2004-04-21 devnull .type _sha1block, @function
6 a25e7f2f 2004-04-21 devnull _sha1block:
7 a25e7f2f 2004-04-21 devnull
8 a25e7f2f 2004-04-21 devnull /* x = (wp[off-f] ^ wp[off-8] ^ wp[off-14] ^ wp[off-16]) <<< 1;
9 a25e7f2f 2004-04-21 devnull * wp[off] = x;
10 a25e7f2f 2004-04-21 devnull * x += A <<< 5;
11 a25e7f2f 2004-04-21 devnull * E += 0xca62c1d6 + x;
12 a25e7f2f 2004-04-21 devnull * x = FN(B,C,D);
13 a25e7f2f 2004-04-21 devnull * E += x;
14 a25e7f2f 2004-04-21 devnull * B >>> 2
15 a25e7f2f 2004-04-21 devnull */
16 a25e7f2f 2004-04-21 devnull #define BSWAPDI BYTE $0x0f; BYTE $0xcf;
17 a25e7f2f 2004-04-21 devnull
18 a25e7f2f 2004-04-21 devnull #define BODY(off,FN,V,A,B,C,D,E)\
19 a25e7f2f 2004-04-21 devnull movl (off-64)(%ebp), %edi;\
20 a25e7f2f 2004-04-21 devnull xorl (off-56)(%ebp), %edi;\
21 a25e7f2f 2004-04-21 devnull xorl (off-32)(%ebp), %edi;\
22 a25e7f2f 2004-04-21 devnull xorl (off-12)(%ebp), %edi;\
23 a25e7f2f 2004-04-21 devnull roll $1, %edi;\
24 a25e7f2f 2004-04-21 devnull movl %edi, off(%ebp);\
25 a25e7f2f 2004-04-21 devnull leal V(%edi, E, 1), E;\
26 a25e7f2f 2004-04-21 devnull movl A, %edi;\
27 a25e7f2f 2004-04-21 devnull roll $5, %edi;\
28 a25e7f2f 2004-04-21 devnull addl %edi, E;\
29 a25e7f2f 2004-04-21 devnull FN(B,C,D)\
30 a25e7f2f 2004-04-21 devnull addl %edi, E;\
31 a25e7f2f 2004-04-21 devnull rorl $2, B;\
32 a25e7f2f 2004-04-21 devnull
33 a25e7f2f 2004-04-21 devnull #define BODY0(off,FN,V,A,B,C,D,E)\
34 a25e7f2f 2004-04-21 devnull movl off(%ebx), %edi;\
35 a25e7f2f 2004-04-21 devnull bswap %edi;\
36 a25e7f2f 2004-04-21 devnull movl %edi, off(%ebp);\
37 a25e7f2f 2004-04-21 devnull leal V(%edi,E,1), E;\
38 a25e7f2f 2004-04-21 devnull movl A, %edi;\
39 a25e7f2f 2004-04-21 devnull roll $5,%edi;\
40 a25e7f2f 2004-04-21 devnull addl %edi,E;\
41 a25e7f2f 2004-04-21 devnull FN(B,C,D)\
42 a25e7f2f 2004-04-21 devnull addl %edi,E;\
43 a25e7f2f 2004-04-21 devnull rorl $2,B;\
44 a25e7f2f 2004-04-21 devnull
45 a25e7f2f 2004-04-21 devnull /*
46 a25e7f2f 2004-04-21 devnull * fn1 = (((C^D)&B)^D);
47 a25e7f2f 2004-04-21 devnull */
48 a25e7f2f 2004-04-21 devnull #define FN1(B,C,D)\
49 a25e7f2f 2004-04-21 devnull movl C, %edi;\
50 a25e7f2f 2004-04-21 devnull xorl D, %edi;\
51 a25e7f2f 2004-04-21 devnull andl B, %edi;\
52 a25e7f2f 2004-04-21 devnull xorl D, %edi;\
53 a25e7f2f 2004-04-21 devnull
54 a25e7f2f 2004-04-21 devnull /*
55 a25e7f2f 2004-04-21 devnull * fn24 = B ^ C ^ D
56 a25e7f2f 2004-04-21 devnull */
57 a25e7f2f 2004-04-21 devnull #define FN24(B,C,D)\
58 a25e7f2f 2004-04-21 devnull movl B, %edi;\
59 a25e7f2f 2004-04-21 devnull xorl C, %edi;\
60 a25e7f2f 2004-04-21 devnull xorl D, %edi;\
61 a25e7f2f 2004-04-21 devnull
62 a25e7f2f 2004-04-21 devnull /*
63 a25e7f2f 2004-04-21 devnull * fn3 = ((B ^ C) & (D ^= B)) ^ B
64 a25e7f2f 2004-04-21 devnull * D ^= B to restore D
65 a25e7f2f 2004-04-21 devnull */
66 a25e7f2f 2004-04-21 devnull #define FN3(B,C,D)\
67 a25e7f2f 2004-04-21 devnull movl B, %edi;\
68 a25e7f2f 2004-04-21 devnull xorl C, %edi;\
69 a25e7f2f 2004-04-21 devnull xorl B, D;\
70 a25e7f2f 2004-04-21 devnull andl D, %edi;\
71 a25e7f2f 2004-04-21 devnull xorl B, %edi;\
72 a25e7f2f 2004-04-21 devnull xorl B, D;\
73 a25e7f2f 2004-04-21 devnull
74 a25e7f2f 2004-04-21 devnull /*
75 a25e7f2f 2004-04-21 devnull * stack offsets
76 a25e7f2f 2004-04-21 devnull * void sha1block(uchar *DATA, int LEN, ulong *STATE)
77 a25e7f2f 2004-04-21 devnull */
78 a25e7f2f 2004-04-21 devnull #define DATA 8
79 a25e7f2f 2004-04-21 devnull #define LEN 12
80 a25e7f2f 2004-04-21 devnull #define STATE 16
81 a25e7f2f 2004-04-21 devnull
82 a25e7f2f 2004-04-21 devnull /*
83 a25e7f2f 2004-04-21 devnull * stack offsets for locals
84 a25e7f2f 2004-04-21 devnull * ulong w[80];
85 a25e7f2f 2004-04-21 devnull * uchar *edata;
86 a25e7f2f 2004-04-21 devnull * ulong *w15, *w40, *w60, *w80;
87 a25e7f2f 2004-04-21 devnull * register local
88 a25e7f2f 2004-04-21 devnull * ulong *wp = %ebp
89 a25e7f2f 2004-04-21 devnull * ulong a = eax, b = ebx, c = ecx, d = edx, e = esi
90 a25e7f2f 2004-04-21 devnull * ulong tmp = edi
91 a25e7f2f 2004-04-21 devnull */
92 a25e7f2f 2004-04-21 devnull #define WARRAY (-4-(80*4))
93 a25e7f2f 2004-04-21 devnull #define TMP1 (-8-(80*4))
94 a25e7f2f 2004-04-21 devnull #define TMP2 (-12-(80*4))
95 a25e7f2f 2004-04-21 devnull #define W15 (-16-(80*4))
96 a25e7f2f 2004-04-21 devnull #define W40 (-20-(80*4))
97 a25e7f2f 2004-04-21 devnull #define W60 (-24-(80*4))
98 a25e7f2f 2004-04-21 devnull #define W80 (-28-(80*4))
99 a25e7f2f 2004-04-21 devnull #define EDATA (-32-(80*4))
100 a25e7f2f 2004-04-21 devnull #define OLDEBX (-36-(80*4))
101 a25e7f2f 2004-04-21 devnull #define OLDESI (-40-(80*4))
102 a25e7f2f 2004-04-21 devnull #define OLDEDI (-44-(80*4))
103 a25e7f2f 2004-04-21 devnull
104 a25e7f2f 2004-04-21 devnull /* Prelude */
105 a25e7f2f 2004-04-21 devnull pushl %ebp
106 a25e7f2f 2004-04-21 devnull mov %ebx, OLDEBX(%esp)
107 a25e7f2f 2004-04-21 devnull mov %esi, OLDESI(%esp)
108 a25e7f2f 2004-04-21 devnull mov %edi, OLDEDI(%esp)
109 a25e7f2f 2004-04-21 devnull
110 a25e7f2f 2004-04-21 devnull movl DATA(%esp), %eax
111 a25e7f2f 2004-04-21 devnull addl LEN(%esp), %eax
112 a25e7f2f 2004-04-21 devnull movl %eax, EDATA(%esp)
113 a25e7f2f 2004-04-21 devnull
114 a25e7f2f 2004-04-21 devnull leal (WARRAY+15*4)(%esp), %edi /* aw15 */
115 a25e7f2f 2004-04-21 devnull movl %edi, W15(%esp)
116 a25e7f2f 2004-04-21 devnull leal (WARRAY+40*4)(%esp), %edx /* aw40 */
117 a25e7f2f 2004-04-21 devnull movl %edx, W40(%esp)
118 a25e7f2f 2004-04-21 devnull leal (WARRAY+60*4)(%esp), %ecx /* aw60 */
119 a25e7f2f 2004-04-21 devnull movl %ecx, W60(%esp)
120 a25e7f2f 2004-04-21 devnull leal (WARRAY+80*4)(%esp), %edi /* aw80 */
121 a25e7f2f 2004-04-21 devnull movl %edi, W80(%esp)
122 a25e7f2f 2004-04-21 devnull
123 a25e7f2f 2004-04-21 devnull mainloop:
124 a25e7f2f 2004-04-21 devnull leal WARRAY(%esp), %ebp /* warray */
125 a25e7f2f 2004-04-21 devnull
126 a25e7f2f 2004-04-21 devnull movl STATE(%esp), %edi /* state */
127 a25e7f2f 2004-04-21 devnull movl (%edi),%eax
128 a25e7f2f 2004-04-21 devnull movl 4(%edi),%ebx
129 a25e7f2f 2004-04-21 devnull movl %ebx, TMP1(%esp) /* tmp1 */
130 a25e7f2f 2004-04-21 devnull movl 8(%edi), %ecx
131 a25e7f2f 2004-04-21 devnull movl 12(%edi), %edx
132 a25e7f2f 2004-04-21 devnull movl 16(%edi), %esi
133 a25e7f2f 2004-04-21 devnull
134 a25e7f2f 2004-04-21 devnull movl DATA(%esp), %ebx /* data */
135 a25e7f2f 2004-04-21 devnull
136 a25e7f2f 2004-04-21 devnull loop1:
137 a25e7f2f 2004-04-21 devnull BODY0(0,FN1,0x5a827999,%eax,TMP1(%esp),%ecx,%edx,%esi)
138 a25e7f2f 2004-04-21 devnull movl %esi,TMP2(%esp)
139 a25e7f2f 2004-04-21 devnull BODY0(4,FN1,0x5a827999,%esi,%eax,TMP1(%esp),%ecx,%edx)
140 a25e7f2f 2004-04-21 devnull movl TMP1(%esp),%esi
141 a25e7f2f 2004-04-21 devnull BODY0(8,FN1,0x5a827999,%edx,TMP2(%esp),%eax,%esi,%ecx)
142 a25e7f2f 2004-04-21 devnull BODY0(12,FN1,0x5a827999,%ecx,%edx,TMP2(%esp),%eax,%esi)
143 a25e7f2f 2004-04-21 devnull movl %esi,TMP1(%esp)
144 a25e7f2f 2004-04-21 devnull BODY0(16,FN1,0x5a827999,%esi,%ecx,%edx,TMP2(%esp),%eax)
145 a25e7f2f 2004-04-21 devnull movl TMP2(%esp),%esi
146 a25e7f2f 2004-04-21 devnull
147 a25e7f2f 2004-04-21 devnull addl $20, %ebx
148 a25e7f2f 2004-04-21 devnull addl $20, %ebp
149 a25e7f2f 2004-04-21 devnull cmpl W15(%esp), %ebp /* w15 */
150 a25e7f2f 2004-04-21 devnull jb loop1
151 a25e7f2f 2004-04-21 devnull
152 a25e7f2f 2004-04-21 devnull BODY0(0,FN1,0x5a827999,%eax,TMP1(%esp),%ecx,%edx,%esi)
153 a25e7f2f 2004-04-21 devnull addl $4, %ebx
154 a25e7f2f 2004-04-21 devnull MOVL %ebx, DATA(%esp) /* data */
155 a25e7f2f 2004-04-21 devnull MOVL TMP1(%esp),%ebx
156 a25e7f2f 2004-04-21 devnull
157 a25e7f2f 2004-04-21 devnull BODY(4,FN1,0x5a827999,%esi,%eax,%ebx,%ecx,%edx)
158 a25e7f2f 2004-04-21 devnull BODY(8,FN1,0x5a827999,%edx,%esi,%eax,%ebx,%ecx)
159 a25e7f2f 2004-04-21 devnull BODY(12,FN1,0x5a827999,%ecx,%edx,%esi,%eax,%ebx)
160 a25e7f2f 2004-04-21 devnull BODY(16,FN1,0x5a827999,%ebx,%ecx,%edx,%esi,%eax)
161 a25e7f2f 2004-04-21 devnull
162 a25e7f2f 2004-04-21 devnull addl $20, %ebp
163 a25e7f2f 2004-04-21 devnull
164 a25e7f2f 2004-04-21 devnull loop2:
165 a25e7f2f 2004-04-21 devnull BODY(0,FN24,0x6ed9eba1,%eax,%ebx,%ecx,%edx,%esi)
166 a25e7f2f 2004-04-21 devnull BODY(4,FN24,0x6ed9eba1,%esi,%eax,%ebx,%ecx,%edx)
167 a25e7f2f 2004-04-21 devnull BODY(8,FN24,0x6ed9eba1,%edx,%esi,%eax,%ebx,%ecx)
168 a25e7f2f 2004-04-21 devnull BODY(12,FN24,0x6ed9eba1,%ecx,%edx,%esi,%eax,%ebx)
169 a25e7f2f 2004-04-21 devnull BODY(16,FN24,0x6ed9eba1,%ebx,%ecx,%edx,%esi,%eax)
170 a25e7f2f 2004-04-21 devnull
171 a25e7f2f 2004-04-21 devnull addl $20,%ebp
172 a25e7f2f 2004-04-21 devnull cmpl W40(%esp), %ebp
173 a25e7f2f 2004-04-21 devnull jb loop2
174 a25e7f2f 2004-04-21 devnull
175 a25e7f2f 2004-04-21 devnull loop3:
176 a25e7f2f 2004-04-21 devnull BODY(0,FN3,0x8f1bbcdc,%eax,%ebx,%ecx,%edx,%esi)
177 a25e7f2f 2004-04-21 devnull BODY(4,FN3,0x8f1bbcdc,%esi,%eax,%ebx,%ecx,%edx)
178 a25e7f2f 2004-04-21 devnull BODY(8,FN3,0x8f1bbcdc,%edx,%esi,%eax,%ebx,%ecx)
179 a25e7f2f 2004-04-21 devnull BODY(12,FN3,0x8f1bbcdc,%ecx,%edx,%esi,%eax,%ebx)
180 a25e7f2f 2004-04-21 devnull BODY(16,FN3,0x8f1bbcdc,%ebx,%ecx,%edx,%esi,%eax)
181 a25e7f2f 2004-04-21 devnull
182 a25e7f2f 2004-04-21 devnull addl $20, %ebp
183 a25e7f2f 2004-04-21 devnull cmpl W60(%esp), %ebp /* w60 */
184 a25e7f2f 2004-04-21 devnull jb loop3
185 a25e7f2f 2004-04-21 devnull
186 a25e7f2f 2004-04-21 devnull loop4:
187 a25e7f2f 2004-04-21 devnull BODY(0,FN24,0xca62c1d6,%eax,%ebx,%ecx,%edx,%esi)
188 a25e7f2f 2004-04-21 devnull BODY(4,FN24,0xca62c1d6,%esi,%eax,%ebx,%ecx,%edx)
189 a25e7f2f 2004-04-21 devnull BODY(8,FN24,0xca62c1d6,%edx,%esi,%eax,%ebx,%ecx)
190 a25e7f2f 2004-04-21 devnull BODY(12,FN24,0xca62c1d6,%ecx,%edx,%esi,%eax,%ebx)
191 a25e7f2f 2004-04-21 devnull BODY(16,FN24,0xca62c1d6,%ebx,%ecx,%edx,%esi,%eax)
192 a25e7f2f 2004-04-21 devnull
193 a25e7f2f 2004-04-21 devnull addl $20, %ebp
194 a25e7f2f 2004-04-21 devnull cmpl W80(%esp), %ebp /* w80 */
195 a25e7f2f 2004-04-21 devnull jb loop4
196 a25e7f2f 2004-04-21 devnull
197 a25e7f2f 2004-04-21 devnull movl STATE(%esp), %edi /* state */
198 a25e7f2f 2004-04-21 devnull addl %eax, 0(%edi)
199 a25e7f2f 2004-04-21 devnull addl %ebx, 4(%edi)
200 a25e7f2f 2004-04-21 devnull addl %ecx, 8(%edi)
201 a25e7f2f 2004-04-21 devnull addl %edx, 12(%edi)
202 a25e7f2f 2004-04-21 devnull addl %esi, 16(%edi)
203 a25e7f2f 2004-04-21 devnull
204 a25e7f2f 2004-04-21 devnull movl EDATA(%esp), %edi /* edata */
205 a25e7f2f 2004-04-21 devnull cmpl %edi, DATA(%esp) /* data */
206 a25e7f2f 2004-04-21 devnull jb mainloop
207 a25e7f2f 2004-04-21 devnull
208 a25e7f2f 2004-04-21 devnull /* Postlude */
209 a25e7f2f 2004-04-21 devnull mov OLDEBX(%esp), %ebx
210 a25e7f2f 2004-04-21 devnull mov OLDESI(%esp), %esi
211 a25e7f2f 2004-04-21 devnull mov OLDEDI(%esp), %edi
212 a25e7f2f 2004-04-21 devnull movl %esp, %ebp
213 a25e7f2f 2004-04-21 devnull leave
214 a25e7f2f 2004-04-21 devnull ret