diff options
| author | Andy Polyakov <appro@openssl.org> | 2009-03-17 18:31:08 +0000 |
|---|---|---|
| committer | Andy Polyakov <appro@openssl.org> | 2009-03-17 18:31:08 +0000 |
| commit | e22b864846d0ba7be13bf791843001f53ee54f70 (patch) | |
| tree | 04b42767e1ad7b89de5cd4921035112a5beeb864 | |
| parent | b6af2c7e3e77e3dc9e295027e8921c9566d523e8 (diff) | |
| download | openssl-new-e22b864846d0ba7be13bf791843001f53ee54f70.tar.gz | |
Make SPARC assembler modules *really* Purify-friendly.
| -rwxr-xr-x | crypto/aes/asm/aes-sparcv9.pl | 8 | ||||
| -rw-r--r-- | crypto/sha/asm/sha1-sparcv9a.pl | 4 | ||||
| -rw-r--r-- | crypto/sha/asm/sha512-sparcv9.pl | 2 |
3 files changed, 7 insertions, 7 deletions
diff --git a/crypto/aes/asm/aes-sparcv9.pl b/crypto/aes/asm/aes-sparcv9.pl index 76828ee767..c57b3a2d6d 100755 --- a/crypto/aes/asm/aes-sparcv9.pl +++ b/crypto/aes/asm/aes-sparcv9.pl @@ -523,7 +523,7 @@ AES_encrypt: ld [%i0+12],%o3 1: call .+8 - sub %o7,1b-AES_Te,%o4 + add %o7,AES_Te-1b,%o4 call _sparcv9_AES_encrypt mov %i2,%o5 @@ -583,7 +583,7 @@ AES_encrypt: or %l4,%l6,%o3 1: call .+8 - sub %o7,1b-AES_Te,%o4 + add %o7,AES_Te-1b,%o4 call _sparcv9_AES_encrypt mov %i2,%o5 @@ -1069,7 +1069,7 @@ AES_decrypt: ld [%i0+12],%o3 1: call .+8 - sub %o7,1b-AES_Td,%o4 + add %o7,AES_Td-1b,%o4 call _sparcv9_AES_decrypt mov %i2,%o5 @@ -1129,7 +1129,7 @@ AES_decrypt: or %l4,%l6,%o3 1: call .+8 - sub %o7,1b-AES_Td,%o4 + add %o7,AES_Td-1b,%o4 call _sparcv9_AES_decrypt mov %i2,%o5 diff --git a/crypto/sha/asm/sha1-sparcv9a.pl b/crypto/sha/asm/sha1-sparcv9a.pl index 9e8d0ca382..15eb854bad 100644 --- a/crypto/sha/asm/sha1-sparcv9a.pl +++ b/crypto/sha/asm/sha1-sparcv9a.pl @@ -415,7 +415,7 @@ sha1_block_data_order: add %fp,$bias-256,$base 1: call .+8 - sub %o7,1b-vis_const,$tmp0 + add %o7,vis_const-1b,$tmp0 ldd [$tmp0+0],$VK_00_19 ldd [$tmp0+8],$VK_20_39 @@ -433,7 +433,7 @@ sha1_block_data_order: and $inp,-8,$inp ld [$ctx+16],$Ectx - # X[16] is maintained in FP register bank + ! X[16] is maintained in FP register bank alignaddr %g0,$align,%g0 ldd [$inp+0],@X[0] sub $inp,-64,$Xfer diff --git a/crypto/sha/asm/sha512-sparcv9.pl b/crypto/sha/asm/sha512-sparcv9.pl index fa276d258b..54241aab50 100644 --- a/crypto/sha/asm/sha512-sparcv9.pl +++ b/crypto/sha/asm/sha512-sparcv9.pl @@ -472,7 +472,7 @@ $code.=<<___ if ($SZ==8); # SHA512 ___ $code.=<<___; .Lpic: call .+8 - sub %o7,.Lpic-K${label},$Ktbl + add %o7,K${label}-.Lpic,$Ktbl $LD [$ctx+`0*$SZ`],$A $LD [$ctx+`1*$SZ`],$B |