summaryrefslogtreecommitdiff
path: root/src/lib/libcrypto/s390xcpuid.S
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--src/lib/libcrypto/s390xcpuid.S55
1 files changed, 0 insertions, 55 deletions
diff --git a/src/lib/libcrypto/s390xcpuid.S b/src/lib/libcrypto/s390xcpuid.S
deleted file mode 100644
index 25adb646c4..0000000000
--- a/src/lib/libcrypto/s390xcpuid.S
+++ /dev/null
@@ -1,55 +0,0 @@
1.text
2
3.globl OPENSSL_s390x_facilities
4.type OPENSSL_s390x_facilities,@function
5.align 16
6OPENSSL_s390x_facilities:
7 lghi %r0,0
8 larl %r2,OPENSSL_s390xcap_P
9 stg %r0,8(%r2)
10 .long 0xb2b02000 # stfle 0(%r2)
11 brc 8,.Ldone
12 lghi %r0,1
13 .long 0xb2b02000 # stfle 0(%r2)
14.Ldone:
15 lg %r2,0(%r2)
16 br %r14
17.size OPENSSL_s390x_facilities,.-OPENSSL_s390x_facilities
18
19.globl OPENSSL_atomic_add
20.type OPENSSL_atomic_add,@function
21.align 16
22OPENSSL_atomic_add:
23 l %r1,0(%r2)
24.Lspin: lr %r0,%r1
25 ar %r0,%r3
26 cs %r1,%r0,0(%r2)
27 brc 4,.Lspin
28 lgfr %r2,%r0 # OpenSSL expects the new value
29 br %r14
30.size OPENSSL_atomic_add,.-OPENSSL_atomic_add
31
32.globl OPENSSL_wipe_cpu
33.type OPENSSL_wipe_cpu,@function
34.align 16
35OPENSSL_wipe_cpu:
36 xgr %r0,%r0
37 xgr %r1,%r1
38 lgr %r2,%r15
39 xgr %r3,%r3
40 xgr %r4,%r4
41 lzdr %f0
42 lzdr %f1
43 lzdr %f2
44 lzdr %f3
45 lzdr %f4
46 lzdr %f5
47 lzdr %f6
48 lzdr %f7
49 br %r14
50.size OPENSSL_wipe_cpu,.-OPENSSL_wipe_cpu
51
52.section .init
53 brasl %r14,OPENSSL_cpuid_setup
54
55.comm OPENSSL_s390xcap_P,16,8