]>
Commit | Line | Data |
---|---|---|
743694a6 | 1 | /* |
8020d79b | 2 | * Copyright 2010-2021 The OpenSSL Project Authors. All Rights Reserved. |
743694a6 MC |
3 | * |
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 | |
8 | */ | |
9 | ||
946bdd12 | 10 | /* This header can move into provider when legacy support is removed */ |
459b15d4 SL |
11 | #include <openssl/modes.h> |
12 | ||
13 | #if (defined(_WIN32) || defined(_WIN64)) && !defined(__MINGW32__) | |
14 | typedef __int64 i64; | |
15 | typedef unsigned __int64 u64; | |
16 | # define U64(C) C##UI64 | |
17 | #elif defined(__arch64__) | |
18 | typedef long i64; | |
19 | typedef unsigned long u64; | |
20 | # define U64(C) C##UL | |
21 | #else | |
22 | typedef long long i64; | |
23 | typedef unsigned long long u64; | |
24 | # define U64(C) C##ULL | |
25 | #endif | |
26 | ||
27 | typedef unsigned int u32; | |
28 | typedef unsigned char u8; | |
29 | ||
30 | #define STRICT_ALIGNMENT 1 | |
31 | #ifndef PEDANTIC | |
32 | # if defined(__i386) || defined(__i386__) || \ | |
33 | defined(__x86_64) || defined(__x86_64__) || \ | |
34 | defined(_M_IX86) || defined(_M_AMD64) || defined(_M_X64) || \ | |
35 | defined(__aarch64__) || \ | |
36 | defined(__s390__) || defined(__s390x__) | |
37 | # undef STRICT_ALIGNMENT | |
38 | # endif | |
39 | #endif | |
40 | ||
41 | #if !defined(PEDANTIC) && !defined(OPENSSL_NO_ASM) && !defined(OPENSSL_NO_INLINE_ASM) | |
42 | # if defined(__GNUC__) && __GNUC__>=2 | |
43 | # if defined(__x86_64) || defined(__x86_64__) | |
44 | # define BSWAP8(x) ({ u64 ret_=(x); \ | |
45 | asm ("bswapq %0" \ | |
46 | : "+r"(ret_)); ret_; }) | |
47 | # define BSWAP4(x) ({ u32 ret_=(x); \ | |
48 | asm ("bswapl %0" \ | |
49 | : "+r"(ret_)); ret_; }) | |
50 | # elif (defined(__i386) || defined(__i386__)) && !defined(I386_ONLY) | |
51 | # define BSWAP8(x) ({ u32 lo_=(u64)(x)>>32,hi_=(x); \ | |
52 | asm ("bswapl %0; bswapl %1" \ | |
53 | : "+r"(hi_),"+r"(lo_)); \ | |
54 | (u64)hi_<<32|lo_; }) | |
55 | # define BSWAP4(x) ({ u32 ret_=(x); \ | |
56 | asm ("bswapl %0" \ | |
57 | : "+r"(ret_)); ret_; }) | |
58 | # elif defined(__aarch64__) | |
bc8b648f | 59 | # if defined(__BYTE_ORDER__) && defined(__ORDER_LITTLE_ENDIAN__) && \ |
60 | __BYTE_ORDER__==__ORDER_LITTLE_ENDIAN__ | |
61 | # define BSWAP8(x) ({ u64 ret_; \ | |
459b15d4 SL |
62 | asm ("rev %0,%1" \ |
63 | : "=r"(ret_) : "r"(x)); ret_; }) | |
bc8b648f | 64 | # define BSWAP4(x) ({ u32 ret_; \ |
459b15d4 SL |
65 | asm ("rev %w0,%w1" \ |
66 | : "=r"(ret_) : "r"(x)); ret_; }) | |
bc8b648f | 67 | # endif |
459b15d4 SL |
68 | # elif (defined(__arm__) || defined(__arm)) && !defined(STRICT_ALIGNMENT) |
69 | # define BSWAP8(x) ({ u32 lo_=(u64)(x)>>32,hi_=(x); \ | |
70 | asm ("rev %0,%0; rev %1,%1" \ | |
71 | : "+r"(hi_),"+r"(lo_)); \ | |
72 | (u64)hi_<<32|lo_; }) | |
73 | # define BSWAP4(x) ({ u32 ret_; \ | |
74 | asm ("rev %0,%1" \ | |
75 | : "=r"(ret_) : "r"((u32)(x))); \ | |
76 | ret_; }) | |
77 | # endif | |
78 | # elif defined(_MSC_VER) | |
79 | # if _MSC_VER>=1300 | |
80 | # include <stdlib.h> | |
81 | # pragma intrinsic(_byteswap_uint64,_byteswap_ulong) | |
82 | # define BSWAP8(x) _byteswap_uint64((u64)(x)) | |
83 | # define BSWAP4(x) _byteswap_ulong((u32)(x)) | |
84 | # elif defined(_M_IX86) | |
85 | __inline u32 _bswap4(u32 val) | |
86 | { | |
87 | _asm mov eax, val _asm bswap eax} | |
88 | # define BSWAP4(x) _bswap4(x) | |
89 | # endif | |
90 | # endif | |
91 | #endif | |
92 | #if defined(BSWAP4) && !defined(STRICT_ALIGNMENT) | |
93 | # define GETU32(p) BSWAP4(*(const u32 *)(p)) | |
94 | # define PUTU32(p,v) *(u32 *)(p) = BSWAP4(v) | |
95 | #else | |
96 | # define GETU32(p) ((u32)(p)[0]<<24|(u32)(p)[1]<<16|(u32)(p)[2]<<8|(u32)(p)[3]) | |
97 | # define PUTU32(p,v) ((p)[0]=(u8)((v)>>24),(p)[1]=(u8)((v)>>16),(p)[2]=(u8)((v)>>8),(p)[3]=(u8)(v)) | |
98 | #endif | |
99 | /*- GCM definitions */ typedef struct { | |
100 | u64 hi, lo; | |
101 | } u128; | |
102 | ||
103 | #ifdef TABLE_BITS | |
104 | # undef TABLE_BITS | |
105 | #endif | |
106 | /* | |
107 | * Even though permitted values for TABLE_BITS are 8, 4 and 1, it should | |
108 | * never be set to 8 [or 1]. For further information see gcm128.c. | |
109 | */ | |
110 | #define TABLE_BITS 4 | |
111 | ||
112 | struct gcm128_context { | |
113 | /* Following 6 names follow names in GCM specification */ | |
114 | union { | |
115 | u64 u[2]; | |
116 | u32 d[4]; | |
117 | u8 c[16]; | |
118 | size_t t[16 / sizeof(size_t)]; | |
119 | } Yi, EKi, EK0, len, Xi, H; | |
120 | /* | |
63b996e7 AM |
121 | * Relative position of Yi, EKi, EK0, len, Xi, H and pre-computed Htable is |
122 | * used in some assembler modules, i.e. don't change the order! | |
459b15d4 SL |
123 | */ |
124 | #if TABLE_BITS==8 | |
125 | u128 Htable[256]; | |
126 | #else | |
127 | u128 Htable[16]; | |
128 | void (*gmult) (u64 Xi[2], const u128 Htable[16]); | |
129 | void (*ghash) (u64 Xi[2], const u128 Htable[16], const u8 *inp, | |
130 | size_t len); | |
131 | #endif | |
132 | unsigned int mres, ares; | |
133 | block128_f block; | |
134 | void *key; | |
135 | #if !defined(OPENSSL_SMALL_FOOTPRINT) | |
136 | unsigned char Xn[48]; | |
137 | #endif | |
138 | }; | |
139 | ||
140 | /* | |
141 | * The maximum permitted number of cipher blocks per data unit in XTS mode. | |
142 | * Reference IEEE Std 1619-2018. | |
143 | */ | |
144 | #define XTS_MAX_BLOCKS_PER_DATA_UNIT (1<<20) | |
145 | ||
146 | struct xts128_context { | |
147 | void *key1, *key2; | |
148 | block128_f block1, block2; | |
149 | }; | |
150 | ||
151 | struct ccm128_context { | |
152 | union { | |
153 | u64 u[2]; | |
154 | u8 c[16]; | |
155 | } nonce, cmac; | |
156 | u64 blocks; | |
157 | block128_f block; | |
158 | void *key; | |
159 | }; | |
160 | ||
161 | #ifndef OPENSSL_NO_OCB | |
162 | ||
163 | typedef union { | |
164 | u64 a[2]; | |
165 | unsigned char c[16]; | |
166 | } OCB_BLOCK; | |
167 | # define ocb_block16_xor(in1,in2,out) \ | |
168 | ( (out)->a[0]=(in1)->a[0]^(in2)->a[0], \ | |
169 | (out)->a[1]=(in1)->a[1]^(in2)->a[1] ) | |
170 | # if STRICT_ALIGNMENT | |
171 | # define ocb_block16_xor_misaligned(in1,in2,out) \ | |
172 | ocb_block_xor((in1)->c,(in2)->c,16,(out)->c) | |
173 | # else | |
174 | # define ocb_block16_xor_misaligned ocb_block16_xor | |
175 | # endif | |
176 | ||
177 | struct ocb128_context { | |
178 | /* Need both encrypt and decrypt key schedules for decryption */ | |
179 | block128_f encrypt; | |
180 | block128_f decrypt; | |
181 | void *keyenc; | |
182 | void *keydec; | |
183 | ocb128_f stream; /* direction dependent */ | |
184 | /* Key dependent variables. Can be reused if key remains the same */ | |
185 | size_t l_index; | |
186 | size_t max_l_index; | |
187 | OCB_BLOCK l_star; | |
188 | OCB_BLOCK l_dollar; | |
189 | OCB_BLOCK *l; | |
190 | /* Must be reset for each session */ | |
191 | struct { | |
192 | u64 blocks_hashed; | |
193 | u64 blocks_processed; | |
194 | OCB_BLOCK offset_aad; | |
195 | OCB_BLOCK sum; | |
196 | OCB_BLOCK offset; | |
197 | OCB_BLOCK checksum; | |
198 | } sess; | |
199 | }; | |
200 | #endif /* OPENSSL_NO_OCB */ | |
201 | ||
743694a6 MC |
202 | #ifndef OPENSSL_NO_SIV |
203 | ||
459b15d4 SL |
204 | #define SIV_LEN 16 |
205 | ||
206 | typedef union siv_block_u { | |
207 | uint64_t word[SIV_LEN/sizeof(uint64_t)]; | |
208 | unsigned char byte[SIV_LEN]; | |
209 | } SIV_BLOCK; | |
210 | ||
211 | struct siv128_context { | |
212 | /* d stores intermediate results of S2V; it corresponds to D from the | |
213 | pseudocode in section 2.4 of RFC 5297. */ | |
214 | SIV_BLOCK d; | |
215 | SIV_BLOCK tag; | |
216 | EVP_CIPHER_CTX *cipher_ctx; | |
776796e8 | 217 | EVP_MAC *mac; |
459b15d4 SL |
218 | EVP_MAC_CTX *mac_ctx_init; |
219 | int final_ret; | |
220 | int crypto_ok; | |
221 | }; | |
743694a6 MC |
222 | |
223 | #endif /* OPENSSL_NO_SIV */ |