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 2f05c0e8 2004-05-09 devnull #define STACKSIZE (48+80*4)
79 2f05c0e8 2004-05-09 devnull #define DATA (STACKSIZE+8)
80 2f05c0e8 2004-05-09 devnull #define LEN (STACKSIZE+12)
81 2f05c0e8 2004-05-09 devnull #define STATE (STACKSIZE+16)
82 a25e7f2f 2004-04-21 devnull
83 a25e7f2f 2004-04-21 devnull /*
84 a25e7f2f 2004-04-21 devnull * stack offsets for locals
85 a25e7f2f 2004-04-21 devnull * ulong w[80];
86 a25e7f2f 2004-04-21 devnull * uchar *edata;
87 a25e7f2f 2004-04-21 devnull * ulong *w15, *w40, *w60, *w80;
88 a25e7f2f 2004-04-21 devnull * register local
89 a25e7f2f 2004-04-21 devnull * ulong *wp = %ebp
90 a25e7f2f 2004-04-21 devnull * ulong a = eax, b = ebx, c = ecx, d = edx, e = esi
91 a25e7f2f 2004-04-21 devnull * ulong tmp = edi
92 a25e7f2f 2004-04-21 devnull */
93 2f05c0e8 2004-05-09 devnull #define WARRAY (STACKSIZE-4-(80*4))
94 2f05c0e8 2004-05-09 devnull #define TMP1 (STACKSIZE-8-(80*4))
95 2f05c0e8 2004-05-09 devnull #define TMP2 (STACKSIZE-12-(80*4))
96 2f05c0e8 2004-05-09 devnull #define W15 (STACKSIZE-16-(80*4))
97 2f05c0e8 2004-05-09 devnull #define W40 (STACKSIZE-20-(80*4))
98 2f05c0e8 2004-05-09 devnull #define W60 (STACKSIZE-24-(80*4))
99 2f05c0e8 2004-05-09 devnull #define W80 (STACKSIZE-28-(80*4))
100 2f05c0e8 2004-05-09 devnull #define EDATA (STACKSIZE-32-(80*4))
101 2f05c0e8 2004-05-09 devnull #define OLDEBX (STACKSIZE-36-(80*4))
102 2f05c0e8 2004-05-09 devnull #define OLDESI (STACKSIZE-40-(80*4))
103 2f05c0e8 2004-05-09 devnull #define OLDEDI (STACKSIZE-44-(80*4))
104 a25e7f2f 2004-04-21 devnull
105 a25e7f2f 2004-04-21 devnull /* Prelude */
106 a25e7f2f 2004-04-21 devnull pushl %ebp
107 2f05c0e8 2004-05-09 devnull subl $(STACKSIZE), %esp
108 2f05c0e8 2004-05-09 devnull
109 a25e7f2f 2004-04-21 devnull mov %ebx, OLDEBX(%esp)
110 a25e7f2f 2004-04-21 devnull mov %esi, OLDESI(%esp)
111 a25e7f2f 2004-04-21 devnull mov %edi, OLDEDI(%esp)
112 a25e7f2f 2004-04-21 devnull
113 a25e7f2f 2004-04-21 devnull movl DATA(%esp), %eax
114 a25e7f2f 2004-04-21 devnull addl LEN(%esp), %eax
115 a25e7f2f 2004-04-21 devnull movl %eax, EDATA(%esp)
116 a25e7f2f 2004-04-21 devnull
117 a25e7f2f 2004-04-21 devnull leal (WARRAY+15*4)(%esp), %edi /* aw15 */
118 a25e7f2f 2004-04-21 devnull movl %edi, W15(%esp)
119 a25e7f2f 2004-04-21 devnull leal (WARRAY+40*4)(%esp), %edx /* aw40 */
120 a25e7f2f 2004-04-21 devnull movl %edx, W40(%esp)
121 a25e7f2f 2004-04-21 devnull leal (WARRAY+60*4)(%esp), %ecx /* aw60 */
122 a25e7f2f 2004-04-21 devnull movl %ecx, W60(%esp)
123 a25e7f2f 2004-04-21 devnull leal (WARRAY+80*4)(%esp), %edi /* aw80 */
124 a25e7f2f 2004-04-21 devnull movl %edi, W80(%esp)
125 a25e7f2f 2004-04-21 devnull
126 6a4599d7 2005-05-12 devnull 0:
127 a25e7f2f 2004-04-21 devnull leal WARRAY(%esp), %ebp /* warray */
128 a25e7f2f 2004-04-21 devnull
129 a25e7f2f 2004-04-21 devnull movl STATE(%esp), %edi /* state */
130 a25e7f2f 2004-04-21 devnull movl (%edi),%eax
131 a25e7f2f 2004-04-21 devnull movl 4(%edi),%ebx
132 a25e7f2f 2004-04-21 devnull movl %ebx, TMP1(%esp) /* tmp1 */
133 a25e7f2f 2004-04-21 devnull movl 8(%edi), %ecx
134 a25e7f2f 2004-04-21 devnull movl 12(%edi), %edx
135 a25e7f2f 2004-04-21 devnull movl 16(%edi), %esi
136 a25e7f2f 2004-04-21 devnull
137 a25e7f2f 2004-04-21 devnull movl DATA(%esp), %ebx /* data */
138 a25e7f2f 2004-04-21 devnull
139 6a4599d7 2005-05-12 devnull 1:
140 a25e7f2f 2004-04-21 devnull BODY0(0,FN1,0x5a827999,%eax,TMP1(%esp),%ecx,%edx,%esi)
141 a25e7f2f 2004-04-21 devnull movl %esi,TMP2(%esp)
142 a25e7f2f 2004-04-21 devnull BODY0(4,FN1,0x5a827999,%esi,%eax,TMP1(%esp),%ecx,%edx)
143 a25e7f2f 2004-04-21 devnull movl TMP1(%esp),%esi
144 a25e7f2f 2004-04-21 devnull BODY0(8,FN1,0x5a827999,%edx,TMP2(%esp),%eax,%esi,%ecx)
145 a25e7f2f 2004-04-21 devnull BODY0(12,FN1,0x5a827999,%ecx,%edx,TMP2(%esp),%eax,%esi)
146 a25e7f2f 2004-04-21 devnull movl %esi,TMP1(%esp)
147 a25e7f2f 2004-04-21 devnull BODY0(16,FN1,0x5a827999,%esi,%ecx,%edx,TMP2(%esp),%eax)
148 a25e7f2f 2004-04-21 devnull movl TMP2(%esp),%esi
149 a25e7f2f 2004-04-21 devnull
150 a25e7f2f 2004-04-21 devnull addl $20, %ebx
151 a25e7f2f 2004-04-21 devnull addl $20, %ebp
152 a25e7f2f 2004-04-21 devnull cmpl W15(%esp), %ebp /* w15 */
153 6a4599d7 2005-05-12 devnull jb 1b
154 a25e7f2f 2004-04-21 devnull
155 a25e7f2f 2004-04-21 devnull BODY0(0,FN1,0x5a827999,%eax,TMP1(%esp),%ecx,%edx,%esi)
156 a25e7f2f 2004-04-21 devnull addl $4, %ebx
157 a25e7f2f 2004-04-21 devnull MOVL %ebx, DATA(%esp) /* data */
158 a25e7f2f 2004-04-21 devnull MOVL TMP1(%esp),%ebx
159 a25e7f2f 2004-04-21 devnull
160 a25e7f2f 2004-04-21 devnull BODY(4,FN1,0x5a827999,%esi,%eax,%ebx,%ecx,%edx)
161 a25e7f2f 2004-04-21 devnull BODY(8,FN1,0x5a827999,%edx,%esi,%eax,%ebx,%ecx)
162 a25e7f2f 2004-04-21 devnull BODY(12,FN1,0x5a827999,%ecx,%edx,%esi,%eax,%ebx)
163 a25e7f2f 2004-04-21 devnull BODY(16,FN1,0x5a827999,%ebx,%ecx,%edx,%esi,%eax)
164 a25e7f2f 2004-04-21 devnull
165 a25e7f2f 2004-04-21 devnull addl $20, %ebp
166 a25e7f2f 2004-04-21 devnull
167 6a4599d7 2005-05-12 devnull 2:
168 a25e7f2f 2004-04-21 devnull BODY(0,FN24,0x6ed9eba1,%eax,%ebx,%ecx,%edx,%esi)
169 a25e7f2f 2004-04-21 devnull BODY(4,FN24,0x6ed9eba1,%esi,%eax,%ebx,%ecx,%edx)
170 a25e7f2f 2004-04-21 devnull BODY(8,FN24,0x6ed9eba1,%edx,%esi,%eax,%ebx,%ecx)
171 a25e7f2f 2004-04-21 devnull BODY(12,FN24,0x6ed9eba1,%ecx,%edx,%esi,%eax,%ebx)
172 a25e7f2f 2004-04-21 devnull BODY(16,FN24,0x6ed9eba1,%ebx,%ecx,%edx,%esi,%eax)
173 a25e7f2f 2004-04-21 devnull
174 a25e7f2f 2004-04-21 devnull addl $20,%ebp
175 a25e7f2f 2004-04-21 devnull cmpl W40(%esp), %ebp
176 6a4599d7 2005-05-12 devnull jb 2b
177 a25e7f2f 2004-04-21 devnull
178 6a4599d7 2005-05-12 devnull 3:
179 a25e7f2f 2004-04-21 devnull BODY(0,FN3,0x8f1bbcdc,%eax,%ebx,%ecx,%edx,%esi)
180 a25e7f2f 2004-04-21 devnull BODY(4,FN3,0x8f1bbcdc,%esi,%eax,%ebx,%ecx,%edx)
181 a25e7f2f 2004-04-21 devnull BODY(8,FN3,0x8f1bbcdc,%edx,%esi,%eax,%ebx,%ecx)
182 a25e7f2f 2004-04-21 devnull BODY(12,FN3,0x8f1bbcdc,%ecx,%edx,%esi,%eax,%ebx)
183 a25e7f2f 2004-04-21 devnull BODY(16,FN3,0x8f1bbcdc,%ebx,%ecx,%edx,%esi,%eax)
184 a25e7f2f 2004-04-21 devnull
185 a25e7f2f 2004-04-21 devnull addl $20, %ebp
186 a25e7f2f 2004-04-21 devnull cmpl W60(%esp), %ebp /* w60 */
187 6a4599d7 2005-05-12 devnull jb 3b
188 a25e7f2f 2004-04-21 devnull
189 6a4599d7 2005-05-12 devnull 4:
190 a25e7f2f 2004-04-21 devnull BODY(0,FN24,0xca62c1d6,%eax,%ebx,%ecx,%edx,%esi)
191 a25e7f2f 2004-04-21 devnull BODY(4,FN24,0xca62c1d6,%esi,%eax,%ebx,%ecx,%edx)
192 a25e7f2f 2004-04-21 devnull BODY(8,FN24,0xca62c1d6,%edx,%esi,%eax,%ebx,%ecx)
193 a25e7f2f 2004-04-21 devnull BODY(12,FN24,0xca62c1d6,%ecx,%edx,%esi,%eax,%ebx)
194 a25e7f2f 2004-04-21 devnull BODY(16,FN24,0xca62c1d6,%ebx,%ecx,%edx,%esi,%eax)
195 a25e7f2f 2004-04-21 devnull
196 a25e7f2f 2004-04-21 devnull addl $20, %ebp
197 a25e7f2f 2004-04-21 devnull cmpl W80(%esp), %ebp /* w80 */
198 6a4599d7 2005-05-12 devnull jb 4b
199 a25e7f2f 2004-04-21 devnull
200 a25e7f2f 2004-04-21 devnull movl STATE(%esp), %edi /* state */
201 a25e7f2f 2004-04-21 devnull addl %eax, 0(%edi)
202 a25e7f2f 2004-04-21 devnull addl %ebx, 4(%edi)
203 a25e7f2f 2004-04-21 devnull addl %ecx, 8(%edi)
204 a25e7f2f 2004-04-21 devnull addl %edx, 12(%edi)
205 a25e7f2f 2004-04-21 devnull addl %esi, 16(%edi)
206 a25e7f2f 2004-04-21 devnull
207 a25e7f2f 2004-04-21 devnull movl EDATA(%esp), %edi /* edata */
208 a25e7f2f 2004-04-21 devnull cmpl %edi, DATA(%esp) /* data */
209 6a4599d7 2005-05-12 devnull jb 0b
210 a25e7f2f 2004-04-21 devnull
211 a25e7f2f 2004-04-21 devnull /* Postlude */
212 a25e7f2f 2004-04-21 devnull mov OLDEBX(%esp), %ebx
213 a25e7f2f 2004-04-21 devnull mov OLDESI(%esp), %esi
214 a25e7f2f 2004-04-21 devnull mov OLDEDI(%esp), %edi
215 2f05c0e8 2004-05-09 devnull addl $(STACKSIZE), %esp
216 2f05c0e8 2004-05-09 devnull popl %ebp
217 a25e7f2f 2004-04-21 devnull ret