diff options
author | Andy Polyakov <appro@openssl.org> | 2015-12-02 14:32:08 +0100 |
---|---|---|
committer | Andy Polyakov <appro@openssl.org> | 2015-12-03 13:29:53 +0100 |
commit | b5516cfbd65de9331d827012fc5bdace1953613e (patch) | |
tree | 0471daa9d98894a099fc950e7fa790c0641bd992 /crypto | |
parent | 1bbea403842493aa7187aab5d3d3f26ae7874bd4 (diff) | |
download | openssl-b5516cfbd65de9331d827012fc5bdace1953613e.tar.gz |
perlasm/ppc-xlate.pl: comply with ABIs that specify vrsave as reserved.
RT#4162
Reviewed-by: Richard Levitte <levitte@openssl.org>
Diffstat (limited to 'crypto')
-rwxr-xr-x | crypto/perlasm/ppc-xlate.pl | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/crypto/perlasm/ppc-xlate.pl b/crypto/perlasm/ppc-xlate.pl index f89e814299..0f46cf06bc 100755 --- a/crypto/perlasm/ppc-xlate.pl +++ b/crypto/perlasm/ppc-xlate.pl @@ -151,6 +151,26 @@ my $vmr = sub { " vor $vx,$vy,$vy"; }; +# Some ABIs specify vrsave, special-purpose register #256, as reserved +# for system use. +my $no_vrsave = ($flavour =~ /aix|linux64le/); +my $mtspr = sub { + my ($f,$idx,$ra) = @_; + if ($idx == 256 && $no_vrsave) { + " or $ra,$ra,$ra"; + } else { + " mtspr $idx,$ra"; + } +}; +my $mfspr = sub { + my ($f,$rd,$idx) = @_; + if ($idx == 256 && $no_vrsave) { + " li $rd,-1"; + } else { + " mfspr $rd,$idx"; + } +}; + # PowerISA 2.06 stuff sub vsxmem_op { my ($f, $vrt, $ra, $rb, $op) = @_; |