diff options
Diffstat (limited to 'src/lib/libcrypto/s390xcpuid.S')
| -rw-r--r-- | src/lib/libcrypto/s390xcpuid.S | 90 |
1 files changed, 0 insertions, 90 deletions
diff --git a/src/lib/libcrypto/s390xcpuid.S b/src/lib/libcrypto/s390xcpuid.S deleted file mode 100644 index 8500133ad0..0000000000 --- a/src/lib/libcrypto/s390xcpuid.S +++ /dev/null | |||
| @@ -1,90 +0,0 @@ | |||
| 1 | .text | ||
| 2 | |||
| 3 | .globl OPENSSL_cpuid_setup | ||
| 4 | .type OPENSSL_cpuid_setup,@function | ||
| 5 | .align 16 | ||
| 6 | OPENSSL_cpuid_setup: | ||
| 7 | br %r14 # reserved for future | ||
| 8 | .size OPENSSL_cpuid_setup,.-OPENSSL_cpuid_setup | ||
| 9 | |||
| 10 | .globl OPENSSL_s390x_facilities | ||
| 11 | .type OPENSSL_s390x_facilities,@function | ||
| 12 | .align 16 | ||
| 13 | OPENSSL_s390x_facilities: | ||
| 14 | lghi %r0,0 | ||
| 15 | .long 0xb2b0f010 # stfle 16(%r15) | ||
| 16 | lg %r2,16(%r15) | ||
| 17 | br %r14 | ||
| 18 | .size OPENSSL_s390x_facilities,.-OPENSSL_s390x_facilities | ||
| 19 | |||
| 20 | .globl OPENSSL_rdtsc | ||
| 21 | .type OPENSSL_rdtsc,@function | ||
| 22 | .align 16 | ||
| 23 | OPENSSL_rdtsc: | ||
| 24 | stck 16(%r15) | ||
| 25 | lg %r2,16(%r15) | ||
| 26 | br %r14 | ||
| 27 | .size OPENSSL_rdtsc,.-OPENSSL_rdtsc | ||
| 28 | |||
| 29 | .globl OPENSSL_atomic_add | ||
| 30 | .type OPENSSL_atomic_add,@function | ||
| 31 | .align 16 | ||
| 32 | OPENSSL_atomic_add: | ||
| 33 | l %r1,0(%r2) | ||
| 34 | .Lspin: lr %r0,%r1 | ||
| 35 | ar %r0,%r3 | ||
| 36 | cs %r1,%r0,0(%r2) | ||
| 37 | brc 4,.Lspin | ||
| 38 | lgfr %r2,%r0 # OpenSSL expects the new value | ||
| 39 | br %r14 | ||
| 40 | .size OPENSSL_atomic_add,.-OPENSSL_atomic_add | ||
| 41 | |||
| 42 | .globl OPENSSL_wipe_cpu | ||
| 43 | .type OPENSSL_wipe_cpu,@function | ||
| 44 | .align 16 | ||
| 45 | OPENSSL_wipe_cpu: | ||
| 46 | xgr %r0,%r0 | ||
| 47 | xgr %r1,%r1 | ||
| 48 | lgr %r2,%r15 | ||
| 49 | xgr %r3,%r3 | ||
| 50 | xgr %r4,%r4 | ||
| 51 | lzdr %f0 | ||
| 52 | lzdr %f1 | ||
| 53 | lzdr %f2 | ||
| 54 | lzdr %f3 | ||
| 55 | lzdr %f4 | ||
| 56 | lzdr %f5 | ||
| 57 | lzdr %f6 | ||
| 58 | lzdr %f7 | ||
| 59 | br %r14 | ||
| 60 | .size OPENSSL_wipe_cpu,.-OPENSSL_wipe_cpu | ||
| 61 | |||
| 62 | .globl OPENSSL_cleanse | ||
| 63 | .type OPENSSL_cleanse,@function | ||
| 64 | .align 16 | ||
| 65 | OPENSSL_cleanse: | ||
| 66 | lghi %r4,15 | ||
| 67 | lghi %r0,0 | ||
| 68 | clgr %r3,%r4 | ||
| 69 | jh .Lot | ||
| 70 | .Little: | ||
| 71 | stc %r0,0(%r2) | ||
| 72 | la %r2,1(%r2) | ||
| 73 | brctg %r3,.Little | ||
| 74 | br %r14 | ||
| 75 | .align 4 | ||
| 76 | .Lot: tmll %r2,7 | ||
| 77 | jz .Laligned | ||
| 78 | stc %r0,0(%r2) | ||
| 79 | la %r2,1(%r2) | ||
| 80 | brctg %r3,.Lot | ||
| 81 | .Laligned: | ||
| 82 | srlg %r4,%r3,3 | ||
| 83 | .Loop: stg %r0,0(%r2) | ||
| 84 | la %r2,8(%r2) | ||
| 85 | brctg %r4,.Loop | ||
| 86 | lghi %r4,7 | ||
| 87 | ngr %r3,%r4 | ||
| 88 | jnz .Little | ||
| 89 | br %r14 | ||
| 90 | .size OPENSSL_cleanse,.-OPENSSL_cleanse | ||