generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

aes-s390x.pl: make it more foolproof [inspired by 1.0.1].

Browse Source
This commit is contained in:
Andy Polyakov 2012-04-05 08:22:09 +00:00
parent a20152bdaf
commit bc9583efa2
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
crypto/aes/asm/aes-s390x.pl
View File

@ -783,6 +783,7 @@ $code.=<<___;
.type AES_set_encrypt_key,\@function .type AES_set_encrypt_key,\@function
.align 16 .align 16
AES_set_encrypt_key: AES_set_encrypt_key:
_s390x_AES_set_encrypt_key:
lghi $t0,0 lghi $t0,0
cl${g}r $inp,$t0 cl${g}r $inp,$t0
je .Lminus1 je .Lminus1
@ -1068,7 +1069,7 @@ $code.=<<___;
AES_set_decrypt_key: AES_set_decrypt_key:
st${g} $key,4*$SIZE_T($sp) # I rely on AES_set_encrypt_key to st${g} $key,4*$SIZE_T($sp) # I rely on AES_set_encrypt_key to
st${g} $ra,14*$SIZE_T($sp) # save non-volatile registers! st${g} $ra,14*$SIZE_T($sp) # save non-volatile registers!
bras $ra,AES_set_encrypt_key bras $ra,_s390x_AES_set_encrypt_key
l${g} $key,4*$SIZE_T($sp) l${g} $key,4*$SIZE_T($sp)
l${g} $ra,14*$SIZE_T($sp) l${g} $ra,14*$SIZE_T($sp)
ltgr %r2,%r2 ltgr %r2,%r2