65 lines
2.2 KiB
Diff
65 lines
2.2 KiB
Diff
|
From 07a0bbdd179a52907485fd793f0df31c097447af Mon Sep 17 00:00:00 2001
|
||
|
|
From: Andy Polyakov <appro@openssl.org>
|
||
|
|
Date: Sun, 5 May 2019 18:25:50 +0200
|
||
|
|
Subject: [PATCH] crypto/perlasm/ppc-xlate.pl: add linux64v2 flavour
|
||
|
|
MIME-Version: 1.0
|
||
|
|
Content-Type: text/plain; charset=UTF-8
|
||
|
|
Content-Transfer-Encoding: 8bit
|
||
|
|
|
||
|
|
This is a big endian ELFv2 configuration. ELFv2 was already being
|
||
|
|
used for little endian, and big endian was traditionally ELFv1
|
||
|
|
but there are practical configurations that use ELFv2 with big
|
||
|
|
endian nowadays (Adélie Linux, Void Linux, possibly Gentoo, etc.)
|
||
|
|
|
||
|
|
Reviewed-by: Paul Dale <paul.dale@oracle.com>
|
||
|
|
Reviewed-by: Richard Levitte <levitte@openssl.org>
|
||
|
|
(Merged from https://github.com/openssl/openssl/pull/8883)
|
||
|
|
Signed-off-by: Vincent Fazio <vfazio@xes-inc.com>
|
||
|
|
---
|
||
|
|
crypto/perlasm/ppc-xlate.pl | 8 ++++----
|
||
|
|
1 file changed, 4 insertions(+), 4 deletions(-)
|
||
|
|
|
||
|
|
diff --git a/crypto/perlasm/ppc-xlate.pl b/crypto/perlasm/ppc-xlate.pl
|
||
|
|
index d220c6245b..eec82b8d48 100755
|
||
|
|
--- a/crypto/perlasm/ppc-xlate.pl
|
||
|
|
+++ b/crypto/perlasm/ppc-xlate.pl
|
||
|
|
@@ -49,7 +49,7 @@ my $globl = sub {
|
||
|
|
/osx/ && do { $name = "_$name";
|
||
|
|
last;
|
||
|
|
};
|
||
|
|
- /linux.*(32|64le)/
|
||
|
|
+ /linux.*(32|64(le|v2))/
|
||
|
|
&& do { $ret .= ".globl $name";
|
||
|
|
if (!$$type) {
|
||
|
|
$ret .= "\n.type $name,\@function";
|
||
|
|
@@ -80,7 +80,7 @@ my $globl = sub {
|
||
|
|
};
|
||
|
|
my $text = sub {
|
||
|
|
my $ret = ($flavour =~ /aix/) ? ".csect\t.text[PR],7" : ".text";
|
||
|
|
- $ret = ".abiversion 2\n".$ret if ($flavour =~ /linux.*64le/);
|
||
|
|
+ $ret = ".abiversion 2\n".$ret if ($flavour =~ /linux.*64(le|v2)/);
|
||
|
|
$ret;
|
||
|
|
};
|
||
|
|
my $machine = sub {
|
||
|
|
@@ -186,7 +186,7 @@ my $vmr = sub {
|
||
|
|
|
||
|
|
# Some ABIs specify vrsave, special-purpose register #256, as reserved
|
||
|
|
# for system use.
|
||
|
|
-my $no_vrsave = ($flavour =~ /aix|linux64le/);
|
||
|
|
+my $no_vrsave = ($flavour =~ /aix|linux64(le|v2)/);
|
||
|
|
my $mtspr = sub {
|
||
|
|
my ($f,$idx,$ra) = @_;
|
||
|
|
if ($idx == 256 && $no_vrsave) {
|
||
|
|
@@ -318,7 +318,7 @@ while($line=<>) {
|
||
|
|
if ($label) {
|
||
|
|
my $xlated = ($GLOBALS{$label} or $label);
|
||
|
|
print "$xlated:";
|
||
|
|
- if ($flavour =~ /linux.*64le/) {
|
||
|
|
+ if ($flavour =~ /linux.*64(le|v2)/) {
|
||
|
|
if ($TYPES{$label} =~ /function/) {
|
||
|
|
printf "\n.localentry %s,0\n",$xlated;
|
||
|
|
}
|
||
|
|
--
|
||
|
|
2.25.0
|
||
|
|
|