openssl
/
openssl
mirror of https://github.com/openssl/openssl
1
0
Fork 0
Code Issues Releases Wiki Activity

Use Perl to generate bsaes-armv8.S 

Reviewed-by: Paul Dale <pauli@openssl.org>
Reviewed-by: Tomas Mraz <tomas@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/14592)
This commit is contained in:
Tom Cosgrove 2021-06-17 12:21:23 +01:00 committed by Tomas Mraz
parent 82551af514
commit a35c3a9f5b
2 changed files with 45 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
crypto/aes/asm/bsaes-armv8.S → crypto/aes/asm/bsaes-armv8.pl
View File

@ -1,3 +1,37 @@
#!/usr/bin/env perl
# Copyright 2020-2021 The OpenSSL Project Authors. All Rights Reserved.
#
# Licensed under the Apache License 2.0 (the "License"). You may not use
# this file except in compliance with the License. You can obtain a copy
# in the file LICENSE in the source distribution or at
# https://www.openssl.org/source/license.html
use strict;
my $output = $#ARGV >= 0 && $ARGV[$#ARGV] =~ m|\.\w+$| ? pop : undef;
my $flavour = $#ARGV >= 0 && $ARGV[0] !~ m|\.| ? shift : undef;
my $xlate;
$0 =~ m/(.*[\/\\])[^\/\\]+$/; my $dir=$1;
( $xlate="${dir}arm-xlate.pl" and -f $xlate ) or
( $xlate="${dir}../../perlasm/arm-xlate.pl" and -f $xlate ) or
die "can't locate arm-xlate.pl";
open OUT,"| \"$^X\" $xlate $flavour $output";
*STDOUT=*OUT;
my $code = data();
print $code;
close STDOUT or die "error closing STDOUT: $!"; # enforce flush
sub data
{
local $/;
return <DATA>;
}
__END__
// Copyright 2021 The OpenSSL Project Authors. All Rights Reserved.
//
// Licensed under the OpenSSL license (the "License"). You may not use
@ -26,6 +60,10 @@
.text
.extern AES_cbc_encrypt
.extern AES_encrypt
.extern AES_decrypt
.type _bsaes_decrypt8,%function
.align 4
// On entry:
@ -981,7 +1019,13 @@ _bsaes_key_convert:
// No output registers, usual AAPCS64 register preservation
ossl_bsaes_cbc_encrypt:
cmp x2, #128
#ifdef __APPLE__
bhs .Lcbc_do_bsaes
b AES_cbc_encrypt
.Lcbc_do_bsaes:
#else
blo AES_cbc_encrypt
#endif
// it is up to the caller to make sure we are called with enc == 0

2
crypto/aes/build.info
View File

@ -80,7 +80,7 @@ IF[{- !$disabled{module} && !$disabled{shared} -}]
ENDIF
GENERATE[aes-ia64.s]=asm/aes-ia64.S
GENERATE[bsaes-armv8.S]=asm/bsaes-armv8.S
GENERATE[bsaes-armv8.S]=asm/bsaes-armv8.pl
GENERATE[aes-586.s]=asm/aes-586.pl
DEPEND[aes-586.s]=../perlasm/x86asm.pl