Fix segfault in RSA_free() (and DSA/DH/EC_KEY)
[openssl.git] / crypto / s390x_arch.h
1 /*
2  * Copyright 2017-2018 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the OpenSSL license (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
8  */
9
10 #ifndef S390X_ARCH_H
11 # define S390X_ARCH_H
12
13 # ifndef __ASSEMBLER__
14
15 void s390x_kimd(const unsigned char *in, size_t len, unsigned int fc,
16                 void *param);
17 void s390x_klmd(const unsigned char *in, size_t inlen, unsigned char *out,
18                 size_t outlen, unsigned int fc, void *param);
19 void s390x_km(const unsigned char *in, size_t len, unsigned char *out,
20               unsigned int fc, void *param);
21 void s390x_kmac(const unsigned char *in, size_t len, unsigned int fc,
22                 void *param);
23 void s390x_kmo(const unsigned char *in, size_t len, unsigned char *out,
24                unsigned int fc, void *param);
25 void s390x_kmf(const unsigned char *in, size_t len, unsigned char *out,
26                unsigned int fc, void *param);
27 void s390x_kma(const unsigned char *aad, size_t alen, const unsigned char *in,
28                size_t len, unsigned char *out, unsigned int fc, void *param);
29
30 /*
31  * The field elements of OPENSSL_s390xcap_P are the 64-bit words returned by
32  * the STFLE instruction followed by the 64-bit word pairs returned by
33  * instructions' QUERY functions. If STFLE returns fewer data or an instruction
34  * is not supported, the corresponding field elements are zero.
35  */
36 struct OPENSSL_s390xcap_st {
37     unsigned long long stfle[4];
38     unsigned long long kimd[2];
39     unsigned long long klmd[2];
40     unsigned long long km[2];
41     unsigned long long kmc[2];
42     unsigned long long kmac[2];
43     unsigned long long kmctr[2];
44     unsigned long long kmo[2];
45     unsigned long long kmf[2];
46     unsigned long long prno[2];
47     unsigned long long kma[2];
48 };
49
50 extern struct OPENSSL_s390xcap_st OPENSSL_s390xcap_P;
51
52 /* convert facility bit number or function code to bit mask */
53 #  define S390X_CAPBIT(i)       (1ULL << (63 - (i) % 64))
54
55 # endif
56
57 /* OPENSSL_s390xcap_P offsets [bytes] */
58 # define S390X_STFLE            0x00
59 # define S390X_KIMD             0x20
60 # define S390X_KLMD             0x30
61 # define S390X_KM               0x40
62 # define S390X_KMC              0x50
63 # define S390X_KMAC             0x60
64 # define S390X_KMCTR            0x70
65 # define S390X_KMO              0x80
66 # define S390X_KMF              0x90
67 # define S390X_PRNO             0xa0
68 # define S390X_KMA              0xb0
69
70 /* Facility Bit Numbers */
71 # define S390X_VX               129
72 # define S390X_VXD              134
73 # define S390X_VXE              135
74
75 /* Function Codes */
76
77 /* all instructions */
78 # define S390X_QUERY            0
79
80 /* kimd/klmd */
81 # define S390X_SHA3_224         32
82 # define S390X_SHA3_256         33
83 # define S390X_SHA3_384         34
84 # define S390X_SHA3_512         35
85 # define S390X_SHAKE_128        36
86 # define S390X_SHAKE_256        37
87 # define S390X_GHASH            65
88
89 /* km/kmc/kmac/kmctr/kmo/kmf/kma */
90 # define S390X_AES_128          18
91 # define S390X_AES_192          19
92 # define S390X_AES_256          20
93
94 /* prno */
95 # define S390X_TRNG             114
96
97 /* Register 0 Flags */
98 # define S390X_DECRYPT          0x80
99 # define S390X_KMA_LPC          0x100
100 # define S390X_KMA_LAAD         0x200
101 # define S390X_KMA_HS           0x400
102
103 #endif