2 # Copyright 2015-2020 The OpenSSL Project Authors. All Rights Reserved.
4 # Licensed under the Apache License 2.0 (the "License"). You may not use
5 # this file except in compliance with the License. You can obtain a copy
6 # in the file LICENSE in the source distribution or at
7 # https://www.openssl.org/source/license.html
10 # $output is the last argument if it looks like a file (it has an extension)
11 # $flavour is the first argument if it doesn't look like a file
12 $output = $#ARGV >= 0 && $ARGV[$#ARGV] =~ m
|\
.\w
+$| ?
pop : undef;
13 $flavour = $#ARGV >= 0 && $ARGV[0] !~ m
|\
.| ?
shift : undef;
15 $0 =~ m/(.*[\/\\])[^\
/\\]+$/; $dir=$1;
16 ( $xlate="${dir}arm-xlate.pl" and -f
$xlate ) or
17 ( $xlate="${dir}perlasm/arm-xlate.pl" and -f
$xlate) or
18 die "can't locate arm-xlate.pl";
20 open OUT
,"| \"$^X\" $xlate $flavour \"$output\""
21 or die "can't call $xlate: $!";
31 .globl _armv7_neon_probe
32 .type _armv7_neon_probe
,%function
34 orr v15
.16b
, v15
.16b
, v15
.16b
36 .size _armv7_neon_probe
,.-_armv7_neon_probe
39 .type _armv7_tick
,%function
47 .size _armv7_tick
,.-_armv7_tick
49 .globl _armv8_aes_probe
50 .type _armv8_aes_probe
,%function
54 .size _armv8_aes_probe
,.-_armv8_aes_probe
56 .globl _armv8_sha1_probe
57 .type _armv8_sha1_probe
,%function
61 .size _armv8_sha1_probe
,.-_armv8_sha1_probe
63 .globl _armv8_sha256_probe
64 .type _armv8_sha256_probe
,%function
66 sha256su0 v0
.4s
, v0
.4s
68 .size _armv8_sha256_probe
,.-_armv8_sha256_probe
70 .globl _armv8_pmull_probe
71 .type _armv8_pmull_probe
,%function
73 pmull v0
.1q
, v0
.1d
, v0
.1d
75 .size _armv8_pmull_probe
,.-_armv8_pmull_probe
77 .globl _armv8_sha512_probe
78 .type _armv8_sha512_probe
,%function
80 .long
0xcec08000 // sha512su0 v0
.2d
,v0
.2d
82 .size _armv8_sha512_probe
,.-_armv8_sha512_probe
84 .globl _armv8_cpuid_probe
85 .type _armv8_cpuid_probe
,%function
89 .size _armv8_cpuid_probe
,.-_armv8_cpuid_probe
91 .globl OPENSSL_cleanse
92 .type OPENSSL_cleanse
,%function
95 cbz x1
,.Lret
// len
==0?
100 strb wzr
,[x0
],#1 // store byte-by-byte
107 b
.eq .Laligned
// inp is aligned
108 strb wzr
,[x0
],#1 // store byte-by-byte
114 str xzr
,[x0
],#8 // store word-by-word
117 b
.ne .Laligned
// len
>=8
118 cbnz x1
,.Little
// len
!=0?
120 .size OPENSSL_cleanse
,.-OPENSSL_cleanse
123 .type CRYPTO_memcmp
,%function
127 cbz x2
,.Lno_data
// len
==0?
153 .size CRYPTO_memcmp
,.-CRYPTO_memcmp
157 close STDOUT
or die "error closing STDOUT: $!";