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