diff options
author | Andy Polyakov <appro@openssl.org> | 2010-09-10 15:41:08 +0000 |
---|---|---|
committer | Andy Polyakov <appro@openssl.org> | 2010-09-10 15:41:08 +0000 |
commit | 3739a772e99fcb0abf2aeb4b0890fa851fc83830 (patch) | |
tree | 5d0c2254c0cc2321b27a9f2cea6f3b429e46e0af /crypto/sha/asm | |
parent | c504f0a921ab2cd42081faacce77cbf3b52ba88b (diff) |
sha1-armv4-large.pl: more readable input pickup.
Diffstat (limited to 'crypto/sha/asm')
-rw-r--r-- | crypto/sha/asm/sha1-armv4-large.pl | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/crypto/sha/asm/sha1-armv4-large.pl b/crypto/sha/asm/sha1-armv4-large.pl index 6e65fe3e01..afe506be30 100644 --- a/crypto/sha/asm/sha1-armv4-large.pl +++ b/crypto/sha/asm/sha1-armv4-large.pl @@ -91,16 +91,16 @@ ___ sub BODY_00_15 { my ($a,$b,$c,$d,$e)=@_; $code.=<<___; - ldrb $t0,[$inp],#4 - ldrb $t1,[$inp,#-1] - ldrb $t2,[$inp,#-2] + ldrb $t1,[$inp,#2] + ldrb $t0,[$inp,#3] + ldrb $t2,[$inp,#1] add $e,$K,$e,ror#2 @ E+=K_00_19 - ldrb $t3,[$inp,#-3] + ldrb $t3,[$inp],#4 add $e,$e,$a,ror#27 @ E+=ROR(A,27) - orr $t0,$t1,$t0,lsl#24 + orr $t0,$t0,$t1,lsl#8 eor $t1,$c,$d @ F_xx_xx - orr $t0,$t0,$t2,lsl#8 - orr $t0,$t0,$t3,lsl#16 + orr $t0,$t0,$t2,lsl#16 + orr $t0,$t0,$t3,lsl#24 and $t1,$b,$t1,ror#2 add $e,$e,$t0 @ E+=X[i] eor $t1,$t1,$d,ror#2 @ F_00_19(B,C,D) |