File Manager

003 File Manager

Current Path: /usr/src/crypto/openssl/crypto

📁 ..
📄 LPdir_unix.c(4.88 KB)
📁 aes
📁 aria
📄 arm64cpuid.pl(2.81 KB)
📄 arm_arch.h(2.57 KB)
📄 armcap.c(5.87 KB)
📄 armv4cpuid.pl(5.33 KB)
📁 asn1
📁 async
📁 bf
📁 bio
📁 blake2
📁 bn
📁 buffer
📄 build.info(1.56 KB)
📄 c64xpluscpuid.pl(5.3 KB)
📁 camellia
📁 cast
📁 chacha
📁 cmac
📁 cms
📁 comp
📁 conf
📄 cpt_err.c(3.04 KB)
📄 cryptlib.c(12.86 KB)
📁 ct
📄 ctype.c(14.39 KB)
📄 cversion.c(1.03 KB)
📁 des
📁 dh
📄 dllmain.c(1.17 KB)
📁 dsa
📁 dso
📄 ebcdic.c(14.97 KB)
📁 ec
📁 engine
📁 err
📁 evp
📄 ex_data.c(11.14 KB)
📄 getenv.c(728 B)
📁 hmac
📄 ia64cpuid.S(6.34 KB)
📁 idea
📄 init.c(24.44 KB)
📁 kdf
📁 lhash
📁 md2
📁 md4
📁 md5
📁 mdc2
📄 mem.c(7.85 KB)
📄 mem_clr.c(770 B)
📄 mem_dbg.c(17.65 KB)
📄 mem_sec.c(17.01 KB)
📄 mips_arch.h(1.21 KB)
📁 modes
📄 o_dir.c(1.05 KB)
📄 o_fips.c(621 B)
📄 o_fopen.c(4.26 KB)
📄 o_init.c(513 B)
📄 o_str.c(6.36 KB)
📄 o_time.c(5.52 KB)
📁 objects
📁 ocsp
📄 pariscid.pl(4.57 KB)
📁 pem
📁 perlasm
📁 pkcs12
📁 pkcs7
📁 poly1305
📄 ppc_arch.h(827 B)
📄 ppccap.c(12.87 KB)
📄 ppccpuid.pl(7.01 KB)
📁 rand
📁 rc2
📁 rc4
📁 rc5
📁 ripemd
📁 rsa
📄 s390x_arch.h(3.07 KB)
📄 s390xcap.c(1.97 KB)
📄 s390xcpuid.pl(8.54 KB)
📁 seed
📁 sha
📁 siphash
📁 sm2
📁 sm3
📁 sm4
📄 sparc_arch.h(4.24 KB)
📄 sparccpuid.S(12 KB)
📄 sparcv9cap.c(10.49 KB)
📁 srp
📁 stack
📁 store
📄 threads_none.c(2.86 KB)
📄 threads_pthread.c(4.15 KB)
📁 ts
📁 txt_db
📁 ui
📄 uid.c(1.09 KB)
📄 vms_rms.h(2.1 KB)
📁 whrlpool
📁 x509
📁 x509v3
📄 x86_64cpuid.pl(10.14 KB)
📄 x86cpuid.pl(12.2 KB)

Editing: arm64cpuid.pl

#! /usr/bin/env perl
# Copyright 2015-2020 The OpenSSL Project Authors. All Rights Reserved.
#
# Licensed under the OpenSSL license (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

$flavour = shift;
$output  = shift;

$0 =~ m/(.*[\/\\])[^\/\\]+$/; $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;

$code.=<<___;
#include "arm_arch.h"

.text
.arch	armv8-a+crypto

.align	5
.globl	_armv7_neon_probe
.type	_armv7_neon_probe,%function
_armv7_neon_probe:
	orr	v15.16b, v15.16b, v15.16b
	ret
.size	_armv7_neon_probe,.-_armv7_neon_probe

.globl	_armv7_tick
.type	_armv7_tick,%function
_armv7_tick:
#ifdef	__APPLE__
	mrs	x0, CNTPCT_EL0
#else
	mrs	x0, CNTVCT_EL0
#endif
	ret
.size	_armv7_tick,.-_armv7_tick

.globl	_armv8_aes_probe
.type	_armv8_aes_probe,%function
_armv8_aes_probe:
	aese	v0.16b, v0.16b
	ret
.size	_armv8_aes_probe,.-_armv8_aes_probe

.globl	_armv8_sha1_probe
.type	_armv8_sha1_probe,%function
_armv8_sha1_probe:
	sha1h	s0, s0
	ret
.size	_armv8_sha1_probe,.-_armv8_sha1_probe

.globl	_armv8_sha256_probe
.type	_armv8_sha256_probe,%function
_armv8_sha256_probe:
	sha256su0	v0.4s, v0.4s
	ret
.size	_armv8_sha256_probe,.-_armv8_sha256_probe

.globl	_armv8_pmull_probe
.type	_armv8_pmull_probe,%function
_armv8_pmull_probe:
	pmull	v0.1q, v0.1d, v0.1d
	ret
.size	_armv8_pmull_probe,.-_armv8_pmull_probe

.globl	_armv8_sha512_probe
.type	_armv8_sha512_probe,%function
_armv8_sha512_probe:
	.long	0xcec08000	// sha512su0	v0.2d,v0.2d
	ret
.size	_armv8_sha512_probe,.-_armv8_sha512_probe

.globl	OPENSSL_cleanse
.type	OPENSSL_cleanse,%function
.align	5
OPENSSL_cleanse:
	cbz	x1,.Lret	// len==0?
	cmp	x1,#15
	b.hi	.Lot		// len>15
	nop
.Little:
	strb	wzr,[x0],#1	// store byte-by-byte
	subs	x1,x1,#1
	b.ne	.Little
.Lret:	ret

.align	4
.Lot:	tst	x0,#7
	b.eq	.Laligned	// inp is aligned
	strb	wzr,[x0],#1	// store byte-by-byte
	sub	x1,x1,#1
	b	.Lot

.align	4
.Laligned:
	str	xzr,[x0],#8	// store word-by-word
	sub	x1,x1,#8
	tst	x1,#-8
	b.ne	.Laligned	// len>=8
	cbnz	x1,.Little	// len!=0?
	ret
.size	OPENSSL_cleanse,.-OPENSSL_cleanse

.globl	CRYPTO_memcmp
.type	CRYPTO_memcmp,%function
.align	4
CRYPTO_memcmp:
	eor	w3,w3,w3
	cbz	x2,.Lno_data	// len==0?
	cmp	x2,#16
	b.ne	.Loop_cmp
	ldp	x8,x9,[x0]
	ldp	x10,x11,[x1]
	eor	x8,x8,x10
	eor	x9,x9,x11
	orr	x8,x8,x9
	mov	x0,#1
	cmp	x8,#0
	csel	x0,xzr,x0,eq
	ret

.align	4
.Loop_cmp:
	ldrb	w4,[x0],#1
	ldrb	w5,[x1],#1
	eor	w4,w4,w5
	orr	w3,w3,w4
	subs	x2,x2,#1
	b.ne	.Loop_cmp

.Lno_data:
	neg	w0,w3
	lsr	w0,w0,#31
	ret
.size	CRYPTO_memcmp,.-CRYPTO_memcmp
___

print $code;
close STDOUT or die "error closing STDOUT: $!";

003 File Manager

Editing: arm64cpuid.pl

Upload File

Create Folder