projects
/
openssl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
s390x assembler update: add support for run-time facility detection.
[openssl.git]
/
crypto
/
sha
/
asm
/
sha512-s390x.pl
diff --git
a/crypto/sha/asm/sha512-s390x.pl
b/crypto/sha/asm/sha512-s390x.pl
index 5811d74d094f5abcde722da00151c395fa40802c..e7ef2d5a9f59dd2c810ee799e7952dbee667cc43 100644
(file)
--- a/
crypto/sha/asm/sha512-s390x.pl
+++ b/
crypto/sha/asm/sha512-s390x.pl
@@
-214,6
+214,10
@@
$code.=<<___;
$Func:
___
$code.=<<___ if ($kimdfunc);
$Func:
___
$code.=<<___ if ($kimdfunc);
+ larl %r1,OPENSSL_s390xcap_P
+ lg %r0,0(%r1)
+ tmhl %r0,0x4000 # check for message-security assist
+ jz .Lsoftware
lghi %r0,0
la %r1,16($sp)
.long 0xb93e0002 # kimd %r0,%r2
lghi %r0,0
la %r1,16($sp)
.long 0xb93e0002 # kimd %r0,%r2
@@
-286,6
+290,7
@@
$code.=<<___;
br %r14
.size $Func,.-$Func
.string "SHA${label} block transform for s390x, CRYPTOGAMS by <appro\@openssl.org>"
br %r14
.size $Func,.-$Func
.string "SHA${label} block transform for s390x, CRYPTOGAMS by <appro\@openssl.org>"
+.comm OPENSSL_s390xcap_P,8,8
___
$code =~ s/\`([^\`]*)\`/eval $1/gem;
___
$code =~ s/\`([^\`]*)\`/eval $1/gem;