1 /* ==================================================================== 2 * Copyright (c) 2010 The OpenSSL Project. All rights reserved. 3 * 4 * Redistribution and use is governed by OpenSSL license. 5 * ==================================================================== 6 */ 7 8 #include <openssl/modes.h> 9 10 11 #if (defined(_WIN32) || defined(_WIN64)) && !defined(__MINGW32__) 12 typedef __int64 i64; 13 typedef unsigned __int64 u64; 14 #define U64(C) C##UI64 15 #elif defined(__arch64__) 16 typedef long i64; 17 typedef unsigned long u64; 18 #define U64(C) C##UL 19 #else 20 typedef long long i64; 21 typedef unsigned long long u64; 22 #define U64(C) C##ULL 23 #endif 24 25 typedef unsigned int u32; 26 typedef unsigned char u8; 27 28 #define STRICT_ALIGNMENT 1 29 #if defined(__i386) || defined(__i386__) || \ 30 defined(__x86_64) || defined(__x86_64__) || \ 31 defined(_M_IX86) || defined(_M_AMD64) || defined(_M_X64) || \ 32 defined(__s390__) || defined(__s390x__) 33 # undef STRICT_ALIGNMENT 34 #endif 35 36 #if !defined(PEDANTIC) && !defined(OPENSSL_NO_ASM) && !defined(OPENSSL_NO_INLINE_ASM) 37 #if defined(__GNUC__) && __GNUC__>=2 38 # if defined(__x86_64) || defined(__x86_64__) 39 # define BSWAP8(x) ({ u64 ret=(x); \ 40 asm ("bswapq %0" \ 41 : "+r"(ret)); ret; }) 42 # define BSWAP4(x) ({ u32 ret=(x); \ 43 asm ("bswapl %0" \ 44 : "+r"(ret)); ret; }) 45 # elif (defined(__i386) || defined(__i386__)) && !defined(I386_ONLY) 46 # define BSWAP8(x) ({ u32 lo=(u64)(x)>>32,hi=(x); \ 47 asm ("bswapl %0; bswapl %1" \ 48 : "+r"(hi),"+r"(lo)); \ 49 (u64)hi<<32|lo; }) 50 # define BSWAP4(x) ({ u32 ret=(x); \ 51 asm ("bswapl %0" \ 52 : "+r"(ret)); ret; }) 53 # elif (defined(__arm__) || defined(__arm)) && !defined(STRICT_ALIGNMENT) 54 # define BSWAP8(x) ({ u32 lo=(u64)(x)>>32,hi=(x); \ 55 asm ("rev %0,%0; rev %1,%1" \ 56 : "+r"(hi),"+r"(lo)); \ 57 (u64)hi<<32|lo; }) 58 # define BSWAP4(x) ({ u32 ret; \ 59 asm ("rev %0,%1" \ 60 : "=r"(ret) : "r"((u32)(x))); \ 61 ret; }) 62 # endif 63 #elif defined(_MSC_VER) 64 # if _MSC_VER>=1300 65 # pragma intrinsic(_byteswap_uint64,_byteswap_ulong) 66 # define BSWAP8(x) _byteswap_uint64((u64)(x)) 67 # define BSWAP4(x) _byteswap_ulong((u32)(x)) 68 # elif defined(_M_IX86) _bswap4(u32 val)69 __inline u32 _bswap4(u32 val) { 70 _asm mov eax,val 71 _asm bswap eax 72 } 73 # define BSWAP4(x) _bswap4(x) 74 # endif 75 #endif 76 #endif 77 78 #if defined(BSWAP4) && !defined(STRICT_ALIGNMENT) 79 #define GETU32(p) BSWAP4(*(const u32 *)(p)) 80 #define PUTU32(p,v) *(u32 *)(p) = BSWAP4(v) 81 #else 82 #define GETU32(p) ((u32)(p)[0]<<24|(u32)(p)[1]<<16|(u32)(p)[2]<<8|(u32)(p)[3]) 83 #define PUTU32(p,v) ((p)[0]=(u8)((v)>>24),(p)[1]=(u8)((v)>>16),(p)[2]=(u8)((v)>>8),(p)[3]=(u8)(v)) 84 #endif 85 86 /* GCM definitions */ 87 88 typedef struct { u64 hi,lo; } u128; 89 90 #ifdef TABLE_BITS 91 #undef TABLE_BITS 92 #endif 93 /* 94 * Even though permitted values for TABLE_BITS are 8, 4 and 1, it should 95 * never be set to 8 [or 1]. For further information see gcm128.c. 96 */ 97 #define TABLE_BITS 4 98 99 struct gcm128_context { 100 /* Following 6 names follow names in GCM specification */ 101 union { u64 u[2]; u32 d[4]; u8 c[16]; size_t t[16/sizeof(size_t)]; } 102 Yi,EKi,EK0,len,Xi,H; 103 /* Relative position of Xi, H and pre-computed Htable is used 104 * in some assembler modules, i.e. don't change the order! */ 105 #if TABLE_BITS==8 106 u128 Htable[256]; 107 #else 108 u128 Htable[16]; 109 void (*gmult)(u64 Xi[2],const u128 Htable[16]); 110 void (*ghash)(u64 Xi[2],const u128 Htable[16],const u8 *inp,size_t len); 111 #endif 112 unsigned int mres, ares; 113 block128_f block; 114 void *key; 115 }; 116 117 struct xts128_context { 118 void *key1, *key2; 119 block128_f block1,block2; 120 }; 121 122 struct ccm128_context { 123 union { u64 u[2]; u8 c[16]; } nonce, cmac; 124 u64 blocks; 125 block128_f block; 126 void *key; 127 }; 128 129