Nicolas Borla / Mbed OS BBR_1Ebene

BBR 1 Ebene

mbed-os/features/mbedtls/src/aes.c@0:fbdae7e6d805, 2018-05-14 (annotated)

Committer:
borlanic
Date:
Mon May 14 11:29:06 2018 +0000
Revision:
0:fbdae7e6d805
BBR

Who changed what in which revision?

UserRevisionLine numberNew contents of line
borlanic 0:fbdae7e6d805 1 /*
borlanic 0:fbdae7e6d805 2 * FIPS-197 compliant AES implementation
borlanic 0:fbdae7e6d805 3 *
borlanic 0:fbdae7e6d805 4 * Copyright (C) 2006-2015, ARM Limited, All Rights Reserved
borlanic 0:fbdae7e6d805 5 * SPDX-License-Identifier: Apache-2.0
borlanic 0:fbdae7e6d805 6 *
borlanic 0:fbdae7e6d805 7 * Licensed under the Apache License, Version 2.0 (the "License"); you may
borlanic 0:fbdae7e6d805 8 * not use this file except in compliance with the License.
borlanic 0:fbdae7e6d805 9 * You may obtain a copy of the License at
borlanic 0:fbdae7e6d805 10 *
borlanic 0:fbdae7e6d805 11 * http://www.apache.org/licenses/LICENSE-2.0
borlanic 0:fbdae7e6d805 12 *
borlanic 0:fbdae7e6d805 13 * Unless required by applicable law or agreed to in writing, software
borlanic 0:fbdae7e6d805 14 * distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
borlanic 0:fbdae7e6d805 15 * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
borlanic 0:fbdae7e6d805 16 * See the License for the specific language governing permissions and
borlanic 0:fbdae7e6d805 17 * limitations under the License.
borlanic 0:fbdae7e6d805 18 *
borlanic 0:fbdae7e6d805 19 * This file is part of mbed TLS (https://tls.mbed.org)
borlanic 0:fbdae7e6d805 20 */
borlanic 0:fbdae7e6d805 21 /*
borlanic 0:fbdae7e6d805 22 * The AES block cipher was designed by Vincent Rijmen and Joan Daemen.
borlanic 0:fbdae7e6d805 23 *
borlanic 0:fbdae7e6d805 24 * http://csrc.nist.gov/encryption/aes/rijndael/Rijndael.pdf
borlanic 0:fbdae7e6d805 25 * http://csrc.nist.gov/publications/fips/fips197/fips-197.pdf
borlanic 0:fbdae7e6d805 26 */
borlanic 0:fbdae7e6d805 27
borlanic 0:fbdae7e6d805 28 #if !defined(MBEDTLS_CONFIG_FILE)
borlanic 0:fbdae7e6d805 29 #include "mbedtls/config.h"
borlanic 0:fbdae7e6d805 30 #else
borlanic 0:fbdae7e6d805 31 #include MBEDTLS_CONFIG_FILE
borlanic 0:fbdae7e6d805 32 #endif
borlanic 0:fbdae7e6d805 33
borlanic 0:fbdae7e6d805 34 #if defined(MBEDTLS_AES_C)
borlanic 0:fbdae7e6d805 35
borlanic 0:fbdae7e6d805 36 #include <string.h>
borlanic 0:fbdae7e6d805 37
borlanic 0:fbdae7e6d805 38 #include "mbedtls/aes.h"
borlanic 0:fbdae7e6d805 39 #if defined(MBEDTLS_PADLOCK_C)
borlanic 0:fbdae7e6d805 40 #include "mbedtls/padlock.h"
borlanic 0:fbdae7e6d805 41 #endif
borlanic 0:fbdae7e6d805 42 #if defined(MBEDTLS_AESNI_C)
borlanic 0:fbdae7e6d805 43 #include "mbedtls/aesni.h"
borlanic 0:fbdae7e6d805 44 #endif
borlanic 0:fbdae7e6d805 45
borlanic 0:fbdae7e6d805 46 #if defined(MBEDTLS_SELF_TEST)
borlanic 0:fbdae7e6d805 47 #if defined(MBEDTLS_PLATFORM_C)
borlanic 0:fbdae7e6d805 48 #include "mbedtls/platform.h"
borlanic 0:fbdae7e6d805 49 #else
borlanic 0:fbdae7e6d805 50 #include <stdio.h>
borlanic 0:fbdae7e6d805 51 #define mbedtls_printf printf
borlanic 0:fbdae7e6d805 52 #endif /* MBEDTLS_PLATFORM_C */
borlanic 0:fbdae7e6d805 53 #endif /* MBEDTLS_SELF_TEST */
borlanic 0:fbdae7e6d805 54
borlanic 0:fbdae7e6d805 55 #if !defined(MBEDTLS_AES_ALT)
borlanic 0:fbdae7e6d805 56
borlanic 0:fbdae7e6d805 57 /* Implementation that should never be optimized out by the compiler */
borlanic 0:fbdae7e6d805 58 static void mbedtls_zeroize( void *v, size_t n ) {
borlanic 0:fbdae7e6d805 59 volatile unsigned char *p = (unsigned char*)v; while( n-- ) *p++ = 0;
borlanic 0:fbdae7e6d805 60 }
borlanic 0:fbdae7e6d805 61
borlanic 0:fbdae7e6d805 62 /*
borlanic 0:fbdae7e6d805 63 * 32-bit integer manipulation macros (little endian)
borlanic 0:fbdae7e6d805 64 */
borlanic 0:fbdae7e6d805 65 #ifndef GET_UINT32_LE
borlanic 0:fbdae7e6d805 66 #define GET_UINT32_LE(n,b,i) \
borlanic 0:fbdae7e6d805 67 { \
borlanic 0:fbdae7e6d805 68 (n) = ( (uint32_t) (b)[(i) ] ) \
borlanic 0:fbdae7e6d805 69 | ( (uint32_t) (b)[(i) + 1] << 8 ) \
borlanic 0:fbdae7e6d805 70 | ( (uint32_t) (b)[(i) + 2] << 16 ) \
borlanic 0:fbdae7e6d805 71 | ( (uint32_t) (b)[(i) + 3] << 24 ); \
borlanic 0:fbdae7e6d805 72 }
borlanic 0:fbdae7e6d805 73 #endif
borlanic 0:fbdae7e6d805 74
borlanic 0:fbdae7e6d805 75 #ifndef PUT_UINT32_LE
borlanic 0:fbdae7e6d805 76 #define PUT_UINT32_LE(n,b,i) \
borlanic 0:fbdae7e6d805 77 { \
borlanic 0:fbdae7e6d805 78 (b)[(i) ] = (unsigned char) ( ( (n) ) & 0xFF ); \
borlanic 0:fbdae7e6d805 79 (b)[(i) + 1] = (unsigned char) ( ( (n) >> 8 ) & 0xFF ); \
borlanic 0:fbdae7e6d805 80 (b)[(i) + 2] = (unsigned char) ( ( (n) >> 16 ) & 0xFF ); \
borlanic 0:fbdae7e6d805 81 (b)[(i) + 3] = (unsigned char) ( ( (n) >> 24 ) & 0xFF ); \
borlanic 0:fbdae7e6d805 82 }
borlanic 0:fbdae7e6d805 83 #endif
borlanic 0:fbdae7e6d805 84
borlanic 0:fbdae7e6d805 85 #if defined(MBEDTLS_PADLOCK_C) && \
borlanic 0:fbdae7e6d805 86 ( defined(MBEDTLS_HAVE_X86) || defined(MBEDTLS_PADLOCK_ALIGN16) )
borlanic 0:fbdae7e6d805 87 static int aes_padlock_ace = -1;
borlanic 0:fbdae7e6d805 88 #endif
borlanic 0:fbdae7e6d805 89
borlanic 0:fbdae7e6d805 90 #if defined(MBEDTLS_AES_ROM_TABLES)
borlanic 0:fbdae7e6d805 91 /*
borlanic 0:fbdae7e6d805 92 * Forward S-box
borlanic 0:fbdae7e6d805 93 */
borlanic 0:fbdae7e6d805 94 static const unsigned char FSb[256] =
borlanic 0:fbdae7e6d805 95 {
borlanic 0:fbdae7e6d805 96 0x63, 0x7C, 0x77, 0x7B, 0xF2, 0x6B, 0x6F, 0xC5,
borlanic 0:fbdae7e6d805 97 0x30, 0x01, 0x67, 0x2B, 0xFE, 0xD7, 0xAB, 0x76,
borlanic 0:fbdae7e6d805 98 0xCA, 0x82, 0xC9, 0x7D, 0xFA, 0x59, 0x47, 0xF0,
borlanic 0:fbdae7e6d805 99 0xAD, 0xD4, 0xA2, 0xAF, 0x9C, 0xA4, 0x72, 0xC0,
borlanic 0:fbdae7e6d805 100 0xB7, 0xFD, 0x93, 0x26, 0x36, 0x3F, 0xF7, 0xCC,
borlanic 0:fbdae7e6d805 101 0x34, 0xA5, 0xE5, 0xF1, 0x71, 0xD8, 0x31, 0x15,
borlanic 0:fbdae7e6d805 102 0x04, 0xC7, 0x23, 0xC3, 0x18, 0x96, 0x05, 0x9A,
borlanic 0:fbdae7e6d805 103 0x07, 0x12, 0x80, 0xE2, 0xEB, 0x27, 0xB2, 0x75,
borlanic 0:fbdae7e6d805 104 0x09, 0x83, 0x2C, 0x1A, 0x1B, 0x6E, 0x5A, 0xA0,
borlanic 0:fbdae7e6d805 105 0x52, 0x3B, 0xD6, 0xB3, 0x29, 0xE3, 0x2F, 0x84,
borlanic 0:fbdae7e6d805 106 0x53, 0xD1, 0x00, 0xED, 0x20, 0xFC, 0xB1, 0x5B,
borlanic 0:fbdae7e6d805 107 0x6A, 0xCB, 0xBE, 0x39, 0x4A, 0x4C, 0x58, 0xCF,
borlanic 0:fbdae7e6d805 108 0xD0, 0xEF, 0xAA, 0xFB, 0x43, 0x4D, 0x33, 0x85,
borlanic 0:fbdae7e6d805 109 0x45, 0xF9, 0x02, 0x7F, 0x50, 0x3C, 0x9F, 0xA8,
borlanic 0:fbdae7e6d805 110 0x51, 0xA3, 0x40, 0x8F, 0x92, 0x9D, 0x38, 0xF5,
borlanic 0:fbdae7e6d805 111 0xBC, 0xB6, 0xDA, 0x21, 0x10, 0xFF, 0xF3, 0xD2,
borlanic 0:fbdae7e6d805 112 0xCD, 0x0C, 0x13, 0xEC, 0x5F, 0x97, 0x44, 0x17,
borlanic 0:fbdae7e6d805 113 0xC4, 0xA7, 0x7E, 0x3D, 0x64, 0x5D, 0x19, 0x73,
borlanic 0:fbdae7e6d805 114 0x60, 0x81, 0x4F, 0xDC, 0x22, 0x2A, 0x90, 0x88,
borlanic 0:fbdae7e6d805 115 0x46, 0xEE, 0xB8, 0x14, 0xDE, 0x5E, 0x0B, 0xDB,
borlanic 0:fbdae7e6d805 116 0xE0, 0x32, 0x3A, 0x0A, 0x49, 0x06, 0x24, 0x5C,
borlanic 0:fbdae7e6d805 117 0xC2, 0xD3, 0xAC, 0x62, 0x91, 0x95, 0xE4, 0x79,
borlanic 0:fbdae7e6d805 118 0xE7, 0xC8, 0x37, 0x6D, 0x8D, 0xD5, 0x4E, 0xA9,
borlanic 0:fbdae7e6d805 119 0x6C, 0x56, 0xF4, 0xEA, 0x65, 0x7A, 0xAE, 0x08,
borlanic 0:fbdae7e6d805 120 0xBA, 0x78, 0x25, 0x2E, 0x1C, 0xA6, 0xB4, 0xC6,
borlanic 0:fbdae7e6d805 121 0xE8, 0xDD, 0x74, 0x1F, 0x4B, 0xBD, 0x8B, 0x8A,
borlanic 0:fbdae7e6d805 122 0x70, 0x3E, 0xB5, 0x66, 0x48, 0x03, 0xF6, 0x0E,
borlanic 0:fbdae7e6d805 123 0x61, 0x35, 0x57, 0xB9, 0x86, 0xC1, 0x1D, 0x9E,
borlanic 0:fbdae7e6d805 124 0xE1, 0xF8, 0x98, 0x11, 0x69, 0xD9, 0x8E, 0x94,
borlanic 0:fbdae7e6d805 125 0x9B, 0x1E, 0x87, 0xE9, 0xCE, 0x55, 0x28, 0xDF,
borlanic 0:fbdae7e6d805 126 0x8C, 0xA1, 0x89, 0x0D, 0xBF, 0xE6, 0x42, 0x68,
borlanic 0:fbdae7e6d805 127 0x41, 0x99, 0x2D, 0x0F, 0xB0, 0x54, 0xBB, 0x16
borlanic 0:fbdae7e6d805 128 };
borlanic 0:fbdae7e6d805 129
borlanic 0:fbdae7e6d805 130 /*
borlanic 0:fbdae7e6d805 131 * Forward tables
borlanic 0:fbdae7e6d805 132 */
borlanic 0:fbdae7e6d805 133 #define FT \
borlanic 0:fbdae7e6d805 134 \
borlanic 0:fbdae7e6d805 135 V(A5,63,63,C6), V(84,7C,7C,F8), V(99,77,77,EE), V(8D,7B,7B,F6), \
borlanic 0:fbdae7e6d805 136 V(0D,F2,F2,FF), V(BD,6B,6B,D6), V(B1,6F,6F,DE), V(54,C5,C5,91), \
borlanic 0:fbdae7e6d805 137 V(50,30,30,60), V(03,01,01,02), V(A9,67,67,CE), V(7D,2B,2B,56), \
borlanic 0:fbdae7e6d805 138 V(19,FE,FE,E7), V(62,D7,D7,B5), V(E6,AB,AB,4D), V(9A,76,76,EC), \
borlanic 0:fbdae7e6d805 139 V(45,CA,CA,8F), V(9D,82,82,1F), V(40,C9,C9,89), V(87,7D,7D,FA), \
borlanic 0:fbdae7e6d805 140 V(15,FA,FA,EF), V(EB,59,59,B2), V(C9,47,47,8E), V(0B,F0,F0,FB), \
borlanic 0:fbdae7e6d805 141 V(EC,AD,AD,41), V(67,D4,D4,B3), V(FD,A2,A2,5F), V(EA,AF,AF,45), \
borlanic 0:fbdae7e6d805 142 V(BF,9C,9C,23), V(F7,A4,A4,53), V(96,72,72,E4), V(5B,C0,C0,9B), \
borlanic 0:fbdae7e6d805 143 V(C2,B7,B7,75), V(1C,FD,FD,E1), V(AE,93,93,3D), V(6A,26,26,4C), \
borlanic 0:fbdae7e6d805 144 V(5A,36,36,6C), V(41,3F,3F,7E), V(02,F7,F7,F5), V(4F,CC,CC,83), \
borlanic 0:fbdae7e6d805 145 V(5C,34,34,68), V(F4,A5,A5,51), V(34,E5,E5,D1), V(08,F1,F1,F9), \
borlanic 0:fbdae7e6d805 146 V(93,71,71,E2), V(73,D8,D8,AB), V(53,31,31,62), V(3F,15,15,2A), \
borlanic 0:fbdae7e6d805 147 V(0C,04,04,08), V(52,C7,C7,95), V(65,23,23,46), V(5E,C3,C3,9D), \
borlanic 0:fbdae7e6d805 148 V(28,18,18,30), V(A1,96,96,37), V(0F,05,05,0A), V(B5,9A,9A,2F), \
borlanic 0:fbdae7e6d805 149 V(09,07,07,0E), V(36,12,12,24), V(9B,80,80,1B), V(3D,E2,E2,DF), \
borlanic 0:fbdae7e6d805 150 V(26,EB,EB,CD), V(69,27,27,4E), V(CD,B2,B2,7F), V(9F,75,75,EA), \
borlanic 0:fbdae7e6d805 151 V(1B,09,09,12), V(9E,83,83,1D), V(74,2C,2C,58), V(2E,1A,1A,34), \
borlanic 0:fbdae7e6d805 152 V(2D,1B,1B,36), V(B2,6E,6E,DC), V(EE,5A,5A,B4), V(FB,A0,A0,5B), \
borlanic 0:fbdae7e6d805 153 V(F6,52,52,A4), V(4D,3B,3B,76), V(61,D6,D6,B7), V(CE,B3,B3,7D), \
borlanic 0:fbdae7e6d805 154 V(7B,29,29,52), V(3E,E3,E3,DD), V(71,2F,2F,5E), V(97,84,84,13), \
borlanic 0:fbdae7e6d805 155 V(F5,53,53,A6), V(68,D1,D1,B9), V(00,00,00,00), V(2C,ED,ED,C1), \
borlanic 0:fbdae7e6d805 156 V(60,20,20,40), V(1F,FC,FC,E3), V(C8,B1,B1,79), V(ED,5B,5B,B6), \
borlanic 0:fbdae7e6d805 157 V(BE,6A,6A,D4), V(46,CB,CB,8D), V(D9,BE,BE,67), V(4B,39,39,72), \
borlanic 0:fbdae7e6d805 158 V(DE,4A,4A,94), V(D4,4C,4C,98), V(E8,58,58,B0), V(4A,CF,CF,85), \
borlanic 0:fbdae7e6d805 159 V(6B,D0,D0,BB), V(2A,EF,EF,C5), V(E5,AA,AA,4F), V(16,FB,FB,ED), \
borlanic 0:fbdae7e6d805 160 V(C5,43,43,86), V(D7,4D,4D,9A), V(55,33,33,66), V(94,85,85,11), \
borlanic 0:fbdae7e6d805 161 V(CF,45,45,8A), V(10,F9,F9,E9), V(06,02,02,04), V(81,7F,7F,FE), \
borlanic 0:fbdae7e6d805 162 V(F0,50,50,A0), V(44,3C,3C,78), V(BA,9F,9F,25), V(E3,A8,A8,4B), \
borlanic 0:fbdae7e6d805 163 V(F3,51,51,A2), V(FE,A3,A3,5D), V(C0,40,40,80), V(8A,8F,8F,05), \
borlanic 0:fbdae7e6d805 164 V(AD,92,92,3F), V(BC,9D,9D,21), V(48,38,38,70), V(04,F5,F5,F1), \
borlanic 0:fbdae7e6d805 165 V(DF,BC,BC,63), V(C1,B6,B6,77), V(75,DA,DA,AF), V(63,21,21,42), \
borlanic 0:fbdae7e6d805 166 V(30,10,10,20), V(1A,FF,FF,E5), V(0E,F3,F3,FD), V(6D,D2,D2,BF), \
borlanic 0:fbdae7e6d805 167 V(4C,CD,CD,81), V(14,0C,0C,18), V(35,13,13,26), V(2F,EC,EC,C3), \
borlanic 0:fbdae7e6d805 168 V(E1,5F,5F,BE), V(A2,97,97,35), V(CC,44,44,88), V(39,17,17,2E), \
borlanic 0:fbdae7e6d805 169 V(57,C4,C4,93), V(F2,A7,A7,55), V(82,7E,7E,FC), V(47,3D,3D,7A), \
borlanic 0:fbdae7e6d805 170 V(AC,64,64,C8), V(E7,5D,5D,BA), V(2B,19,19,32), V(95,73,73,E6), \
borlanic 0:fbdae7e6d805 171 V(A0,60,60,C0), V(98,81,81,19), V(D1,4F,4F,9E), V(7F,DC,DC,A3), \
borlanic 0:fbdae7e6d805 172 V(66,22,22,44), V(7E,2A,2A,54), V(AB,90,90,3B), V(83,88,88,0B), \
borlanic 0:fbdae7e6d805 173 V(CA,46,46,8C), V(29,EE,EE,C7), V(D3,B8,B8,6B), V(3C,14,14,28), \
borlanic 0:fbdae7e6d805 174 V(79,DE,DE,A7), V(E2,5E,5E,BC), V(1D,0B,0B,16), V(76,DB,DB,AD), \
borlanic 0:fbdae7e6d805 175 V(3B,E0,E0,DB), V(56,32,32,64), V(4E,3A,3A,74), V(1E,0A,0A,14), \
borlanic 0:fbdae7e6d805 176 V(DB,49,49,92), V(0A,06,06,0C), V(6C,24,24,48), V(E4,5C,5C,B8), \
borlanic 0:fbdae7e6d805 177 V(5D,C2,C2,9F), V(6E,D3,D3,BD), V(EF,AC,AC,43), V(A6,62,62,C4), \
borlanic 0:fbdae7e6d805 178 V(A8,91,91,39), V(A4,95,95,31), V(37,E4,E4,D3), V(8B,79,79,F2), \
borlanic 0:fbdae7e6d805 179 V(32,E7,E7,D5), V(43,C8,C8,8B), V(59,37,37,6E), V(B7,6D,6D,DA), \
borlanic 0:fbdae7e6d805 180 V(8C,8D,8D,01), V(64,D5,D5,B1), V(D2,4E,4E,9C), V(E0,A9,A9,49), \
borlanic 0:fbdae7e6d805 181 V(B4,6C,6C,D8), V(FA,56,56,AC), V(07,F4,F4,F3), V(25,EA,EA,CF), \
borlanic 0:fbdae7e6d805 182 V(AF,65,65,CA), V(8E,7A,7A,F4), V(E9,AE,AE,47), V(18,08,08,10), \
borlanic 0:fbdae7e6d805 183 V(D5,BA,BA,6F), V(88,78,78,F0), V(6F,25,25,4A), V(72,2E,2E,5C), \
borlanic 0:fbdae7e6d805 184 V(24,1C,1C,38), V(F1,A6,A6,57), V(C7,B4,B4,73), V(51,C6,C6,97), \
borlanic 0:fbdae7e6d805 185 V(23,E8,E8,CB), V(7C,DD,DD,A1), V(9C,74,74,E8), V(21,1F,1F,3E), \
borlanic 0:fbdae7e6d805 186 V(DD,4B,4B,96), V(DC,BD,BD,61), V(86,8B,8B,0D), V(85,8A,8A,0F), \
borlanic 0:fbdae7e6d805 187 V(90,70,70,E0), V(42,3E,3E,7C), V(C4,B5,B5,71), V(AA,66,66,CC), \
borlanic 0:fbdae7e6d805 188 V(D8,48,48,90), V(05,03,03,06), V(01,F6,F6,F7), V(12,0E,0E,1C), \
borlanic 0:fbdae7e6d805 189 V(A3,61,61,C2), V(5F,35,35,6A), V(F9,57,57,AE), V(D0,B9,B9,69), \
borlanic 0:fbdae7e6d805 190 V(91,86,86,17), V(58,C1,C1,99), V(27,1D,1D,3A), V(B9,9E,9E,27), \
borlanic 0:fbdae7e6d805 191 V(38,E1,E1,D9), V(13,F8,F8,EB), V(B3,98,98,2B), V(33,11,11,22), \
borlanic 0:fbdae7e6d805 192 V(BB,69,69,D2), V(70,D9,D9,A9), V(89,8E,8E,07), V(A7,94,94,33), \
borlanic 0:fbdae7e6d805 193 V(B6,9B,9B,2D), V(22,1E,1E,3C), V(92,87,87,15), V(20,E9,E9,C9), \
borlanic 0:fbdae7e6d805 194 V(49,CE,CE,87), V(FF,55,55,AA), V(78,28,28,50), V(7A,DF,DF,A5), \
borlanic 0:fbdae7e6d805 195 V(8F,8C,8C,03), V(F8,A1,A1,59), V(80,89,89,09), V(17,0D,0D,1A), \
borlanic 0:fbdae7e6d805 196 V(DA,BF,BF,65), V(31,E6,E6,D7), V(C6,42,42,84), V(B8,68,68,D0), \
borlanic 0:fbdae7e6d805 197 V(C3,41,41,82), V(B0,99,99,29), V(77,2D,2D,5A), V(11,0F,0F,1E), \
borlanic 0:fbdae7e6d805 198 V(CB,B0,B0,7B), V(FC,54,54,A8), V(D6,BB,BB,6D), V(3A,16,16,2C)
borlanic 0:fbdae7e6d805 199
borlanic 0:fbdae7e6d805 200 #define V(a,b,c,d) 0x##a##b##c##d
borlanic 0:fbdae7e6d805 201 static const uint32_t FT0[256] = { FT };
borlanic 0:fbdae7e6d805 202 #undef V
borlanic 0:fbdae7e6d805 203
borlanic 0:fbdae7e6d805 204 #define V(a,b,c,d) 0x##b##c##d##a
borlanic 0:fbdae7e6d805 205 static const uint32_t FT1[256] = { FT };
borlanic 0:fbdae7e6d805 206 #undef V
borlanic 0:fbdae7e6d805 207
borlanic 0:fbdae7e6d805 208 #define V(a,b,c,d) 0x##c##d##a##b
borlanic 0:fbdae7e6d805 209 static const uint32_t FT2[256] = { FT };
borlanic 0:fbdae7e6d805 210 #undef V
borlanic 0:fbdae7e6d805 211
borlanic 0:fbdae7e6d805 212 #define V(a,b,c,d) 0x##d##a##b##c
borlanic 0:fbdae7e6d805 213 static const uint32_t FT3[256] = { FT };
borlanic 0:fbdae7e6d805 214 #undef V
borlanic 0:fbdae7e6d805 215
borlanic 0:fbdae7e6d805 216 #undef FT
borlanic 0:fbdae7e6d805 217
borlanic 0:fbdae7e6d805 218 /*
borlanic 0:fbdae7e6d805 219 * Reverse S-box
borlanic 0:fbdae7e6d805 220 */
borlanic 0:fbdae7e6d805 221 static const unsigned char RSb[256] =
borlanic 0:fbdae7e6d805 222 {
borlanic 0:fbdae7e6d805 223 0x52, 0x09, 0x6A, 0xD5, 0x30, 0x36, 0xA5, 0x38,
borlanic 0:fbdae7e6d805 224 0xBF, 0x40, 0xA3, 0x9E, 0x81, 0xF3, 0xD7, 0xFB,
borlanic 0:fbdae7e6d805 225 0x7C, 0xE3, 0x39, 0x82, 0x9B, 0x2F, 0xFF, 0x87,
borlanic 0:fbdae7e6d805 226 0x34, 0x8E, 0x43, 0x44, 0xC4, 0xDE, 0xE9, 0xCB,
borlanic 0:fbdae7e6d805 227 0x54, 0x7B, 0x94, 0x32, 0xA6, 0xC2, 0x23, 0x3D,
borlanic 0:fbdae7e6d805 228 0xEE, 0x4C, 0x95, 0x0B, 0x42, 0xFA, 0xC3, 0x4E,
borlanic 0:fbdae7e6d805 229 0x08, 0x2E, 0xA1, 0x66, 0x28, 0xD9, 0x24, 0xB2,
borlanic 0:fbdae7e6d805 230 0x76, 0x5B, 0xA2, 0x49, 0x6D, 0x8B, 0xD1, 0x25,
borlanic 0:fbdae7e6d805 231 0x72, 0xF8, 0xF6, 0x64, 0x86, 0x68, 0x98, 0x16,
borlanic 0:fbdae7e6d805 232 0xD4, 0xA4, 0x5C, 0xCC, 0x5D, 0x65, 0xB6, 0x92,
borlanic 0:fbdae7e6d805 233 0x6C, 0x70, 0x48, 0x50, 0xFD, 0xED, 0xB9, 0xDA,
borlanic 0:fbdae7e6d805 234 0x5E, 0x15, 0x46, 0x57, 0xA7, 0x8D, 0x9D, 0x84,
borlanic 0:fbdae7e6d805 235 0x90, 0xD8, 0xAB, 0x00, 0x8C, 0xBC, 0xD3, 0x0A,
borlanic 0:fbdae7e6d805 236 0xF7, 0xE4, 0x58, 0x05, 0xB8, 0xB3, 0x45, 0x06,
borlanic 0:fbdae7e6d805 237 0xD0, 0x2C, 0x1E, 0x8F, 0xCA, 0x3F, 0x0F, 0x02,
borlanic 0:fbdae7e6d805 238 0xC1, 0xAF, 0xBD, 0x03, 0x01, 0x13, 0x8A, 0x6B,
borlanic 0:fbdae7e6d805 239 0x3A, 0x91, 0x11, 0x41, 0x4F, 0x67, 0xDC, 0xEA,
borlanic 0:fbdae7e6d805 240 0x97, 0xF2, 0xCF, 0xCE, 0xF0, 0xB4, 0xE6, 0x73,
borlanic 0:fbdae7e6d805 241 0x96, 0xAC, 0x74, 0x22, 0xE7, 0xAD, 0x35, 0x85,
borlanic 0:fbdae7e6d805 242 0xE2, 0xF9, 0x37, 0xE8, 0x1C, 0x75, 0xDF, 0x6E,
borlanic 0:fbdae7e6d805 243 0x47, 0xF1, 0x1A, 0x71, 0x1D, 0x29, 0xC5, 0x89,
borlanic 0:fbdae7e6d805 244 0x6F, 0xB7, 0x62, 0x0E, 0xAA, 0x18, 0xBE, 0x1B,
borlanic 0:fbdae7e6d805 245 0xFC, 0x56, 0x3E, 0x4B, 0xC6, 0xD2, 0x79, 0x20,
borlanic 0:fbdae7e6d805 246 0x9A, 0xDB, 0xC0, 0xFE, 0x78, 0xCD, 0x5A, 0xF4,
borlanic 0:fbdae7e6d805 247 0x1F, 0xDD, 0xA8, 0x33, 0x88, 0x07, 0xC7, 0x31,
borlanic 0:fbdae7e6d805 248 0xB1, 0x12, 0x10, 0x59, 0x27, 0x80, 0xEC, 0x5F,
borlanic 0:fbdae7e6d805 249 0x60, 0x51, 0x7F, 0xA9, 0x19, 0xB5, 0x4A, 0x0D,
borlanic 0:fbdae7e6d805 250 0x2D, 0xE5, 0x7A, 0x9F, 0x93, 0xC9, 0x9C, 0xEF,
borlanic 0:fbdae7e6d805 251 0xA0, 0xE0, 0x3B, 0x4D, 0xAE, 0x2A, 0xF5, 0xB0,
borlanic 0:fbdae7e6d805 252 0xC8, 0xEB, 0xBB, 0x3C, 0x83, 0x53, 0x99, 0x61,
borlanic 0:fbdae7e6d805 253 0x17, 0x2B, 0x04, 0x7E, 0xBA, 0x77, 0xD6, 0x26,
borlanic 0:fbdae7e6d805 254 0xE1, 0x69, 0x14, 0x63, 0x55, 0x21, 0x0C, 0x7D
borlanic 0:fbdae7e6d805 255 };
borlanic 0:fbdae7e6d805 256
borlanic 0:fbdae7e6d805 257 /*
borlanic 0:fbdae7e6d805 258 * Reverse tables
borlanic 0:fbdae7e6d805 259 */
borlanic 0:fbdae7e6d805 260 #define RT \
borlanic 0:fbdae7e6d805 261 \
borlanic 0:fbdae7e6d805 262 V(50,A7,F4,51), V(53,65,41,7E), V(C3,A4,17,1A), V(96,5E,27,3A), \
borlanic 0:fbdae7e6d805 263 V(CB,6B,AB,3B), V(F1,45,9D,1F), V(AB,58,FA,AC), V(93,03,E3,4B), \
borlanic 0:fbdae7e6d805 264 V(55,FA,30,20), V(F6,6D,76,AD), V(91,76,CC,88), V(25,4C,02,F5), \
borlanic 0:fbdae7e6d805 265 V(FC,D7,E5,4F), V(D7,CB,2A,C5), V(80,44,35,26), V(8F,A3,62,B5), \
borlanic 0:fbdae7e6d805 266 V(49,5A,B1,DE), V(67,1B,BA,25), V(98,0E,EA,45), V(E1,C0,FE,5D), \
borlanic 0:fbdae7e6d805 267 V(02,75,2F,C3), V(12,F0,4C,81), V(A3,97,46,8D), V(C6,F9,D3,6B), \
borlanic 0:fbdae7e6d805 268 V(E7,5F,8F,03), V(95,9C,92,15), V(EB,7A,6D,BF), V(DA,59,52,95), \
borlanic 0:fbdae7e6d805 269 V(2D,83,BE,D4), V(D3,21,74,58), V(29,69,E0,49), V(44,C8,C9,8E), \
borlanic 0:fbdae7e6d805 270 V(6A,89,C2,75), V(78,79,8E,F4), V(6B,3E,58,99), V(DD,71,B9,27), \
borlanic 0:fbdae7e6d805 271 V(B6,4F,E1,BE), V(17,AD,88,F0), V(66,AC,20,C9), V(B4,3A,CE,7D), \
borlanic 0:fbdae7e6d805 272 V(18,4A,DF,63), V(82,31,1A,E5), V(60,33,51,97), V(45,7F,53,62), \
borlanic 0:fbdae7e6d805 273 V(E0,77,64,B1), V(84,AE,6B,BB), V(1C,A0,81,FE), V(94,2B,08,F9), \
borlanic 0:fbdae7e6d805 274 V(58,68,48,70), V(19,FD,45,8F), V(87,6C,DE,94), V(B7,F8,7B,52), \
borlanic 0:fbdae7e6d805 275 V(23,D3,73,AB), V(E2,02,4B,72), V(57,8F,1F,E3), V(2A,AB,55,66), \
borlanic 0:fbdae7e6d805 276 V(07,28,EB,B2), V(03,C2,B5,2F), V(9A,7B,C5,86), V(A5,08,37,D3), \
borlanic 0:fbdae7e6d805 277 V(F2,87,28,30), V(B2,A5,BF,23), V(BA,6A,03,02), V(5C,82,16,ED), \
borlanic 0:fbdae7e6d805 278 V(2B,1C,CF,8A), V(92,B4,79,A7), V(F0,F2,07,F3), V(A1,E2,69,4E), \
borlanic 0:fbdae7e6d805 279 V(CD,F4,DA,65), V(D5,BE,05,06), V(1F,62,34,D1), V(8A,FE,A6,C4), \
borlanic 0:fbdae7e6d805 280 V(9D,53,2E,34), V(A0,55,F3,A2), V(32,E1,8A,05), V(75,EB,F6,A4), \
borlanic 0:fbdae7e6d805 281 V(39,EC,83,0B), V(AA,EF,60,40), V(06,9F,71,5E), V(51,10,6E,BD), \
borlanic 0:fbdae7e6d805 282 V(F9,8A,21,3E), V(3D,06,DD,96), V(AE,05,3E,DD), V(46,BD,E6,4D), \
borlanic 0:fbdae7e6d805 283 V(B5,8D,54,91), V(05,5D,C4,71), V(6F,D4,06,04), V(FF,15,50,60), \
borlanic 0:fbdae7e6d805 284 V(24,FB,98,19), V(97,E9,BD,D6), V(CC,43,40,89), V(77,9E,D9,67), \
borlanic 0:fbdae7e6d805 285 V(BD,42,E8,B0), V(88,8B,89,07), V(38,5B,19,E7), V(DB,EE,C8,79), \
borlanic 0:fbdae7e6d805 286 V(47,0A,7C,A1), V(E9,0F,42,7C), V(C9,1E,84,F8), V(00,00,00,00), \
borlanic 0:fbdae7e6d805 287 V(83,86,80,09), V(48,ED,2B,32), V(AC,70,11,1E), V(4E,72,5A,6C), \
borlanic 0:fbdae7e6d805 288 V(FB,FF,0E,FD), V(56,38,85,0F), V(1E,D5,AE,3D), V(27,39,2D,36), \
borlanic 0:fbdae7e6d805 289 V(64,D9,0F,0A), V(21,A6,5C,68), V(D1,54,5B,9B), V(3A,2E,36,24), \
borlanic 0:fbdae7e6d805 290 V(B1,67,0A,0C), V(0F,E7,57,93), V(D2,96,EE,B4), V(9E,91,9B,1B), \
borlanic 0:fbdae7e6d805 291 V(4F,C5,C0,80), V(A2,20,DC,61), V(69,4B,77,5A), V(16,1A,12,1C), \
borlanic 0:fbdae7e6d805 292 V(0A,BA,93,E2), V(E5,2A,A0,C0), V(43,E0,22,3C), V(1D,17,1B,12), \
borlanic 0:fbdae7e6d805 293 V(0B,0D,09,0E), V(AD,C7,8B,F2), V(B9,A8,B6,2D), V(C8,A9,1E,14), \
borlanic 0:fbdae7e6d805 294 V(85,19,F1,57), V(4C,07,75,AF), V(BB,DD,99,EE), V(FD,60,7F,A3), \
borlanic 0:fbdae7e6d805 295 V(9F,26,01,F7), V(BC,F5,72,5C), V(C5,3B,66,44), V(34,7E,FB,5B), \
borlanic 0:fbdae7e6d805 296 V(76,29,43,8B), V(DC,C6,23,CB), V(68,FC,ED,B6), V(63,F1,E4,B8), \
borlanic 0:fbdae7e6d805 297 V(CA,DC,31,D7), V(10,85,63,42), V(40,22,97,13), V(20,11,C6,84), \
borlanic 0:fbdae7e6d805 298 V(7D,24,4A,85), V(F8,3D,BB,D2), V(11,32,F9,AE), V(6D,A1,29,C7), \
borlanic 0:fbdae7e6d805 299 V(4B,2F,9E,1D), V(F3,30,B2,DC), V(EC,52,86,0D), V(D0,E3,C1,77), \
borlanic 0:fbdae7e6d805 300 V(6C,16,B3,2B), V(99,B9,70,A9), V(FA,48,94,11), V(22,64,E9,47), \
borlanic 0:fbdae7e6d805 301 V(C4,8C,FC,A8), V(1A,3F,F0,A0), V(D8,2C,7D,56), V(EF,90,33,22), \
borlanic 0:fbdae7e6d805 302 V(C7,4E,49,87), V(C1,D1,38,D9), V(FE,A2,CA,8C), V(36,0B,D4,98), \
borlanic 0:fbdae7e6d805 303 V(CF,81,F5,A6), V(28,DE,7A,A5), V(26,8E,B7,DA), V(A4,BF,AD,3F), \
borlanic 0:fbdae7e6d805 304 V(E4,9D,3A,2C), V(0D,92,78,50), V(9B,CC,5F,6A), V(62,46,7E,54), \
borlanic 0:fbdae7e6d805 305 V(C2,13,8D,F6), V(E8,B8,D8,90), V(5E,F7,39,2E), V(F5,AF,C3,82), \
borlanic 0:fbdae7e6d805 306 V(BE,80,5D,9F), V(7C,93,D0,69), V(A9,2D,D5,6F), V(B3,12,25,CF), \
borlanic 0:fbdae7e6d805 307 V(3B,99,AC,C8), V(A7,7D,18,10), V(6E,63,9C,E8), V(7B,BB,3B,DB), \
borlanic 0:fbdae7e6d805 308 V(09,78,26,CD), V(F4,18,59,6E), V(01,B7,9A,EC), V(A8,9A,4F,83), \
borlanic 0:fbdae7e6d805 309 V(65,6E,95,E6), V(7E,E6,FF,AA), V(08,CF,BC,21), V(E6,E8,15,EF), \
borlanic 0:fbdae7e6d805 310 V(D9,9B,E7,BA), V(CE,36,6F,4A), V(D4,09,9F,EA), V(D6,7C,B0,29), \
borlanic 0:fbdae7e6d805 311 V(AF,B2,A4,31), V(31,23,3F,2A), V(30,94,A5,C6), V(C0,66,A2,35), \
borlanic 0:fbdae7e6d805 312 V(37,BC,4E,74), V(A6,CA,82,FC), V(B0,D0,90,E0), V(15,D8,A7,33), \
borlanic 0:fbdae7e6d805 313 V(4A,98,04,F1), V(F7,DA,EC,41), V(0E,50,CD,7F), V(2F,F6,91,17), \
borlanic 0:fbdae7e6d805 314 V(8D,D6,4D,76), V(4D,B0,EF,43), V(54,4D,AA,CC), V(DF,04,96,E4), \
borlanic 0:fbdae7e6d805 315 V(E3,B5,D1,9E), V(1B,88,6A,4C), V(B8,1F,2C,C1), V(7F,51,65,46), \
borlanic 0:fbdae7e6d805 316 V(04,EA,5E,9D), V(5D,35,8C,01), V(73,74,87,FA), V(2E,41,0B,FB), \
borlanic 0:fbdae7e6d805 317 V(5A,1D,67,B3), V(52,D2,DB,92), V(33,56,10,E9), V(13,47,D6,6D), \
borlanic 0:fbdae7e6d805 318 V(8C,61,D7,9A), V(7A,0C,A1,37), V(8E,14,F8,59), V(89,3C,13,EB), \
borlanic 0:fbdae7e6d805 319 V(EE,27,A9,CE), V(35,C9,61,B7), V(ED,E5,1C,E1), V(3C,B1,47,7A), \
borlanic 0:fbdae7e6d805 320 V(59,DF,D2,9C), V(3F,73,F2,55), V(79,CE,14,18), V(BF,37,C7,73), \
borlanic 0:fbdae7e6d805 321 V(EA,CD,F7,53), V(5B,AA,FD,5F), V(14,6F,3D,DF), V(86,DB,44,78), \
borlanic 0:fbdae7e6d805 322 V(81,F3,AF,CA), V(3E,C4,68,B9), V(2C,34,24,38), V(5F,40,A3,C2), \
borlanic 0:fbdae7e6d805 323 V(72,C3,1D,16), V(0C,25,E2,BC), V(8B,49,3C,28), V(41,95,0D,FF), \
borlanic 0:fbdae7e6d805 324 V(71,01,A8,39), V(DE,B3,0C,08), V(9C,E4,B4,D8), V(90,C1,56,64), \
borlanic 0:fbdae7e6d805 325 V(61,84,CB,7B), V(70,B6,32,D5), V(74,5C,6C,48), V(42,57,B8,D0)
borlanic 0:fbdae7e6d805 326
borlanic 0:fbdae7e6d805 327 #define V(a,b,c,d) 0x##a##b##c##d
borlanic 0:fbdae7e6d805 328 static const uint32_t RT0[256] = { RT };
borlanic 0:fbdae7e6d805 329 #undef V
borlanic 0:fbdae7e6d805 330
borlanic 0:fbdae7e6d805 331 #define V(a,b,c,d) 0x##b##c##d##a
borlanic 0:fbdae7e6d805 332 static const uint32_t RT1[256] = { RT };
borlanic 0:fbdae7e6d805 333 #undef V
borlanic 0:fbdae7e6d805 334
borlanic 0:fbdae7e6d805 335 #define V(a,b,c,d) 0x##c##d##a##b
borlanic 0:fbdae7e6d805 336 static const uint32_t RT2[256] = { RT };
borlanic 0:fbdae7e6d805 337 #undef V
borlanic 0:fbdae7e6d805 338
borlanic 0:fbdae7e6d805 339 #define V(a,b,c,d) 0x##d##a##b##c
borlanic 0:fbdae7e6d805 340 static const uint32_t RT3[256] = { RT };
borlanic 0:fbdae7e6d805 341 #undef V
borlanic 0:fbdae7e6d805 342
borlanic 0:fbdae7e6d805 343 #undef RT
borlanic 0:fbdae7e6d805 344
borlanic 0:fbdae7e6d805 345 /*
borlanic 0:fbdae7e6d805 346 * Round constants
borlanic 0:fbdae7e6d805 347 */
borlanic 0:fbdae7e6d805 348 static const uint32_t RCON[10] =
borlanic 0:fbdae7e6d805 349 {
borlanic 0:fbdae7e6d805 350 0x00000001, 0x00000002, 0x00000004, 0x00000008,
borlanic 0:fbdae7e6d805 351 0x00000010, 0x00000020, 0x00000040, 0x00000080,
borlanic 0:fbdae7e6d805 352 0x0000001B, 0x00000036
borlanic 0:fbdae7e6d805 353 };
borlanic 0:fbdae7e6d805 354
borlanic 0:fbdae7e6d805 355 #else /* MBEDTLS_AES_ROM_TABLES */
borlanic 0:fbdae7e6d805 356
borlanic 0:fbdae7e6d805 357 /*
borlanic 0:fbdae7e6d805 358 * Forward S-box & tables
borlanic 0:fbdae7e6d805 359 */
borlanic 0:fbdae7e6d805 360 static unsigned char FSb[256];
borlanic 0:fbdae7e6d805 361 static uint32_t FT0[256];
borlanic 0:fbdae7e6d805 362 static uint32_t FT1[256];
borlanic 0:fbdae7e6d805 363 static uint32_t FT2[256];
borlanic 0:fbdae7e6d805 364 static uint32_t FT3[256];
borlanic 0:fbdae7e6d805 365
borlanic 0:fbdae7e6d805 366 /*
borlanic 0:fbdae7e6d805 367 * Reverse S-box & tables
borlanic 0:fbdae7e6d805 368 */
borlanic 0:fbdae7e6d805 369 static unsigned char RSb[256];
borlanic 0:fbdae7e6d805 370 static uint32_t RT0[256];
borlanic 0:fbdae7e6d805 371 static uint32_t RT1[256];
borlanic 0:fbdae7e6d805 372 static uint32_t RT2[256];
borlanic 0:fbdae7e6d805 373 static uint32_t RT3[256];
borlanic 0:fbdae7e6d805 374
borlanic 0:fbdae7e6d805 375 /*
borlanic 0:fbdae7e6d805 376 * Round constants
borlanic 0:fbdae7e6d805 377 */
borlanic 0:fbdae7e6d805 378 static uint32_t RCON[10];
borlanic 0:fbdae7e6d805 379
borlanic 0:fbdae7e6d805 380 /*
borlanic 0:fbdae7e6d805 381 * Tables generation code
borlanic 0:fbdae7e6d805 382 */
borlanic 0:fbdae7e6d805 383 #define ROTL8(x) ( ( x << 8 ) & 0xFFFFFFFF ) | ( x >> 24 )
borlanic 0:fbdae7e6d805 384 #define XTIME(x) ( ( x << 1 ) ^ ( ( x & 0x80 ) ? 0x1B : 0x00 ) )
borlanic 0:fbdae7e6d805 385 #define MUL(x,y) ( ( x && y ) ? pow[(log[x]+log[y]) % 255] : 0 )
borlanic 0:fbdae7e6d805 386
borlanic 0:fbdae7e6d805 387 static int aes_init_done = 0;
borlanic 0:fbdae7e6d805 388
borlanic 0:fbdae7e6d805 389 static void aes_gen_tables( void )
borlanic 0:fbdae7e6d805 390 {
borlanic 0:fbdae7e6d805 391 int i, x, y, z;
borlanic 0:fbdae7e6d805 392 int pow[256];
borlanic 0:fbdae7e6d805 393 int log[256];
borlanic 0:fbdae7e6d805 394
borlanic 0:fbdae7e6d805 395 /*
borlanic 0:fbdae7e6d805 396 * compute pow and log tables over GF(2^8)
borlanic 0:fbdae7e6d805 397 */
borlanic 0:fbdae7e6d805 398 for( i = 0, x = 1; i < 256; i++ )
borlanic 0:fbdae7e6d805 399 {
borlanic 0:fbdae7e6d805 400 pow[i] = x;
borlanic 0:fbdae7e6d805 401 log[x] = i;
borlanic 0:fbdae7e6d805 402 x = ( x ^ XTIME( x ) ) & 0xFF;
borlanic 0:fbdae7e6d805 403 }
borlanic 0:fbdae7e6d805 404
borlanic 0:fbdae7e6d805 405 /*
borlanic 0:fbdae7e6d805 406 * calculate the round constants
borlanic 0:fbdae7e6d805 407 */
borlanic 0:fbdae7e6d805 408 for( i = 0, x = 1; i < 10; i++ )
borlanic 0:fbdae7e6d805 409 {
borlanic 0:fbdae7e6d805 410 RCON[i] = (uint32_t) x;
borlanic 0:fbdae7e6d805 411 x = XTIME( x ) & 0xFF;
borlanic 0:fbdae7e6d805 412 }
borlanic 0:fbdae7e6d805 413
borlanic 0:fbdae7e6d805 414 /*
borlanic 0:fbdae7e6d805 415 * generate the forward and reverse S-boxes
borlanic 0:fbdae7e6d805 416 */
borlanic 0:fbdae7e6d805 417 FSb[0x00] = 0x63;
borlanic 0:fbdae7e6d805 418 RSb[0x63] = 0x00;
borlanic 0:fbdae7e6d805 419
borlanic 0:fbdae7e6d805 420 for( i = 1; i < 256; i++ )
borlanic 0:fbdae7e6d805 421 {
borlanic 0:fbdae7e6d805 422 x = pow[255 - log[i]];
borlanic 0:fbdae7e6d805 423
borlanic 0:fbdae7e6d805 424 y = x; y = ( ( y << 1 ) | ( y >> 7 ) ) & 0xFF;
borlanic 0:fbdae7e6d805 425 x ^= y; y = ( ( y << 1 ) | ( y >> 7 ) ) & 0xFF;
borlanic 0:fbdae7e6d805 426 x ^= y; y = ( ( y << 1 ) | ( y >> 7 ) ) & 0xFF;
borlanic 0:fbdae7e6d805 427 x ^= y; y = ( ( y << 1 ) | ( y >> 7 ) ) & 0xFF;
borlanic 0:fbdae7e6d805 428 x ^= y ^ 0x63;
borlanic 0:fbdae7e6d805 429
borlanic 0:fbdae7e6d805 430 FSb[i] = (unsigned char) x;
borlanic 0:fbdae7e6d805 431 RSb[x] = (unsigned char) i;
borlanic 0:fbdae7e6d805 432 }
borlanic 0:fbdae7e6d805 433
borlanic 0:fbdae7e6d805 434 /*
borlanic 0:fbdae7e6d805 435 * generate the forward and reverse tables
borlanic 0:fbdae7e6d805 436 */
borlanic 0:fbdae7e6d805 437 for( i = 0; i < 256; i++ )
borlanic 0:fbdae7e6d805 438 {
borlanic 0:fbdae7e6d805 439 x = FSb[i];
borlanic 0:fbdae7e6d805 440 y = XTIME( x ) & 0xFF;
borlanic 0:fbdae7e6d805 441 z = ( y ^ x ) & 0xFF;
borlanic 0:fbdae7e6d805 442
borlanic 0:fbdae7e6d805 443 FT0[i] = ( (uint32_t) y ) ^
borlanic 0:fbdae7e6d805 444 ( (uint32_t) x << 8 ) ^
borlanic 0:fbdae7e6d805 445 ( (uint32_t) x << 16 ) ^
borlanic 0:fbdae7e6d805 446 ( (uint32_t) z << 24 );
borlanic 0:fbdae7e6d805 447
borlanic 0:fbdae7e6d805 448 FT1[i] = ROTL8( FT0[i] );
borlanic 0:fbdae7e6d805 449 FT2[i] = ROTL8( FT1[i] );
borlanic 0:fbdae7e6d805 450 FT3[i] = ROTL8( FT2[i] );
borlanic 0:fbdae7e6d805 451
borlanic 0:fbdae7e6d805 452 x = RSb[i];
borlanic 0:fbdae7e6d805 453
borlanic 0:fbdae7e6d805 454 RT0[i] = ( (uint32_t) MUL( 0x0E, x ) ) ^
borlanic 0:fbdae7e6d805 455 ( (uint32_t) MUL( 0x09, x ) << 8 ) ^
borlanic 0:fbdae7e6d805 456 ( (uint32_t) MUL( 0x0D, x ) << 16 ) ^
borlanic 0:fbdae7e6d805 457 ( (uint32_t) MUL( 0x0B, x ) << 24 );
borlanic 0:fbdae7e6d805 458
borlanic 0:fbdae7e6d805 459 RT1[i] = ROTL8( RT0[i] );
borlanic 0:fbdae7e6d805 460 RT2[i] = ROTL8( RT1[i] );
borlanic 0:fbdae7e6d805 461 RT3[i] = ROTL8( RT2[i] );
borlanic 0:fbdae7e6d805 462 }
borlanic 0:fbdae7e6d805 463 }
borlanic 0:fbdae7e6d805 464
borlanic 0:fbdae7e6d805 465 #endif /* MBEDTLS_AES_ROM_TABLES */
borlanic 0:fbdae7e6d805 466
borlanic 0:fbdae7e6d805 467 void mbedtls_aes_init( mbedtls_aes_context *ctx )
borlanic 0:fbdae7e6d805 468 {
borlanic 0:fbdae7e6d805 469 memset( ctx, 0, sizeof( mbedtls_aes_context ) );
borlanic 0:fbdae7e6d805 470 }
borlanic 0:fbdae7e6d805 471
borlanic 0:fbdae7e6d805 472 void mbedtls_aes_free( mbedtls_aes_context *ctx )
borlanic 0:fbdae7e6d805 473 {
borlanic 0:fbdae7e6d805 474 if( ctx == NULL )
borlanic 0:fbdae7e6d805 475 return;
borlanic 0:fbdae7e6d805 476
borlanic 0:fbdae7e6d805 477 mbedtls_zeroize( ctx, sizeof( mbedtls_aes_context ) );
borlanic 0:fbdae7e6d805 478 }
borlanic 0:fbdae7e6d805 479
borlanic 0:fbdae7e6d805 480 /*
borlanic 0:fbdae7e6d805 481 * AES key schedule (encryption)
borlanic 0:fbdae7e6d805 482 */
borlanic 0:fbdae7e6d805 483 #if !defined(MBEDTLS_AES_SETKEY_ENC_ALT)
borlanic 0:fbdae7e6d805 484 int mbedtls_aes_setkey_enc( mbedtls_aes_context *ctx, const unsigned char *key,
borlanic 0:fbdae7e6d805 485 unsigned int keybits )
borlanic 0:fbdae7e6d805 486 {
borlanic 0:fbdae7e6d805 487 unsigned int i;
borlanic 0:fbdae7e6d805 488 uint32_t *RK;
borlanic 0:fbdae7e6d805 489
borlanic 0:fbdae7e6d805 490 #if !defined(MBEDTLS_AES_ROM_TABLES)
borlanic 0:fbdae7e6d805 491 if( aes_init_done == 0 )
borlanic 0:fbdae7e6d805 492 {
borlanic 0:fbdae7e6d805 493 aes_gen_tables();
borlanic 0:fbdae7e6d805 494 aes_init_done = 1;
borlanic 0:fbdae7e6d805 495
borlanic 0:fbdae7e6d805 496 }
borlanic 0:fbdae7e6d805 497 #endif
borlanic 0:fbdae7e6d805 498
borlanic 0:fbdae7e6d805 499 switch( keybits )
borlanic 0:fbdae7e6d805 500 {
borlanic 0:fbdae7e6d805 501 case 128: ctx->nr = 10; break;
borlanic 0:fbdae7e6d805 502 case 192: ctx->nr = 12; break;
borlanic 0:fbdae7e6d805 503 case 256: ctx->nr = 14; break;
borlanic 0:fbdae7e6d805 504 default : return( MBEDTLS_ERR_AES_INVALID_KEY_LENGTH );
borlanic 0:fbdae7e6d805 505 }
borlanic 0:fbdae7e6d805 506
borlanic 0:fbdae7e6d805 507 #if defined(MBEDTLS_PADLOCK_C) && defined(MBEDTLS_PADLOCK_ALIGN16)
borlanic 0:fbdae7e6d805 508 if( aes_padlock_ace == -1 )
borlanic 0:fbdae7e6d805 509 aes_padlock_ace = mbedtls_padlock_has_support( MBEDTLS_PADLOCK_ACE );
borlanic 0:fbdae7e6d805 510
borlanic 0:fbdae7e6d805 511 if( aes_padlock_ace )
borlanic 0:fbdae7e6d805 512 ctx->rk = RK = MBEDTLS_PADLOCK_ALIGN16( ctx->buf );
borlanic 0:fbdae7e6d805 513 else
borlanic 0:fbdae7e6d805 514 #endif
borlanic 0:fbdae7e6d805 515 ctx->rk = RK = ctx->buf;
borlanic 0:fbdae7e6d805 516
borlanic 0:fbdae7e6d805 517 #if defined(MBEDTLS_AESNI_C) && defined(MBEDTLS_HAVE_X86_64)
borlanic 0:fbdae7e6d805 518 if( mbedtls_aesni_has_support( MBEDTLS_AESNI_AES ) )
borlanic 0:fbdae7e6d805 519 return( mbedtls_aesni_setkey_enc( (unsigned char *) ctx->rk, key, keybits ) );
borlanic 0:fbdae7e6d805 520 #endif
borlanic 0:fbdae7e6d805 521
borlanic 0:fbdae7e6d805 522 for( i = 0; i < ( keybits >> 5 ); i++ )
borlanic 0:fbdae7e6d805 523 {
borlanic 0:fbdae7e6d805 524 GET_UINT32_LE( RK[i], key, i << 2 );
borlanic 0:fbdae7e6d805 525 }
borlanic 0:fbdae7e6d805 526
borlanic 0:fbdae7e6d805 527 switch( ctx->nr )
borlanic 0:fbdae7e6d805 528 {
borlanic 0:fbdae7e6d805 529 case 10:
borlanic 0:fbdae7e6d805 530
borlanic 0:fbdae7e6d805 531 for( i = 0; i < 10; i++, RK += 4 )
borlanic 0:fbdae7e6d805 532 {
borlanic 0:fbdae7e6d805 533 RK[4] = RK[0] ^ RCON[i] ^
borlanic 0:fbdae7e6d805 534 ( (uint32_t) FSb[ ( RK[3] >> 8 ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 535 ( (uint32_t) FSb[ ( RK[3] >> 16 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 536 ( (uint32_t) FSb[ ( RK[3] >> 24 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 537 ( (uint32_t) FSb[ ( RK[3] ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 538
borlanic 0:fbdae7e6d805 539 RK[5] = RK[1] ^ RK[4];
borlanic 0:fbdae7e6d805 540 RK[6] = RK[2] ^ RK[5];
borlanic 0:fbdae7e6d805 541 RK[7] = RK[3] ^ RK[6];
borlanic 0:fbdae7e6d805 542 }
borlanic 0:fbdae7e6d805 543 break;
borlanic 0:fbdae7e6d805 544
borlanic 0:fbdae7e6d805 545 case 12:
borlanic 0:fbdae7e6d805 546
borlanic 0:fbdae7e6d805 547 for( i = 0; i < 8; i++, RK += 6 )
borlanic 0:fbdae7e6d805 548 {
borlanic 0:fbdae7e6d805 549 RK[6] = RK[0] ^ RCON[i] ^
borlanic 0:fbdae7e6d805 550 ( (uint32_t) FSb[ ( RK[5] >> 8 ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 551 ( (uint32_t) FSb[ ( RK[5] >> 16 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 552 ( (uint32_t) FSb[ ( RK[5] >> 24 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 553 ( (uint32_t) FSb[ ( RK[5] ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 554
borlanic 0:fbdae7e6d805 555 RK[7] = RK[1] ^ RK[6];
borlanic 0:fbdae7e6d805 556 RK[8] = RK[2] ^ RK[7];
borlanic 0:fbdae7e6d805 557 RK[9] = RK[3] ^ RK[8];
borlanic 0:fbdae7e6d805 558 RK[10] = RK[4] ^ RK[9];
borlanic 0:fbdae7e6d805 559 RK[11] = RK[5] ^ RK[10];
borlanic 0:fbdae7e6d805 560 }
borlanic 0:fbdae7e6d805 561 break;
borlanic 0:fbdae7e6d805 562
borlanic 0:fbdae7e6d805 563 case 14:
borlanic 0:fbdae7e6d805 564
borlanic 0:fbdae7e6d805 565 for( i = 0; i < 7; i++, RK += 8 )
borlanic 0:fbdae7e6d805 566 {
borlanic 0:fbdae7e6d805 567 RK[8] = RK[0] ^ RCON[i] ^
borlanic 0:fbdae7e6d805 568 ( (uint32_t) FSb[ ( RK[7] >> 8 ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 569 ( (uint32_t) FSb[ ( RK[7] >> 16 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 570 ( (uint32_t) FSb[ ( RK[7] >> 24 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 571 ( (uint32_t) FSb[ ( RK[7] ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 572
borlanic 0:fbdae7e6d805 573 RK[9] = RK[1] ^ RK[8];
borlanic 0:fbdae7e6d805 574 RK[10] = RK[2] ^ RK[9];
borlanic 0:fbdae7e6d805 575 RK[11] = RK[3] ^ RK[10];
borlanic 0:fbdae7e6d805 576
borlanic 0:fbdae7e6d805 577 RK[12] = RK[4] ^
borlanic 0:fbdae7e6d805 578 ( (uint32_t) FSb[ ( RK[11] ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 579 ( (uint32_t) FSb[ ( RK[11] >> 8 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 580 ( (uint32_t) FSb[ ( RK[11] >> 16 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 581 ( (uint32_t) FSb[ ( RK[11] >> 24 ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 582
borlanic 0:fbdae7e6d805 583 RK[13] = RK[5] ^ RK[12];
borlanic 0:fbdae7e6d805 584 RK[14] = RK[6] ^ RK[13];
borlanic 0:fbdae7e6d805 585 RK[15] = RK[7] ^ RK[14];
borlanic 0:fbdae7e6d805 586 }
borlanic 0:fbdae7e6d805 587 break;
borlanic 0:fbdae7e6d805 588 }
borlanic 0:fbdae7e6d805 589
borlanic 0:fbdae7e6d805 590 return( 0 );
borlanic 0:fbdae7e6d805 591 }
borlanic 0:fbdae7e6d805 592 #endif /* !MBEDTLS_AES_SETKEY_ENC_ALT */
borlanic 0:fbdae7e6d805 593
borlanic 0:fbdae7e6d805 594 /*
borlanic 0:fbdae7e6d805 595 * AES key schedule (decryption)
borlanic 0:fbdae7e6d805 596 */
borlanic 0:fbdae7e6d805 597 #if !defined(MBEDTLS_AES_SETKEY_DEC_ALT)
borlanic 0:fbdae7e6d805 598 int mbedtls_aes_setkey_dec( mbedtls_aes_context *ctx, const unsigned char *key,
borlanic 0:fbdae7e6d805 599 unsigned int keybits )
borlanic 0:fbdae7e6d805 600 {
borlanic 0:fbdae7e6d805 601 int i, j, ret;
borlanic 0:fbdae7e6d805 602 mbedtls_aes_context cty;
borlanic 0:fbdae7e6d805 603 uint32_t *RK;
borlanic 0:fbdae7e6d805 604 uint32_t *SK;
borlanic 0:fbdae7e6d805 605
borlanic 0:fbdae7e6d805 606 mbedtls_aes_init( &cty );
borlanic 0:fbdae7e6d805 607
borlanic 0:fbdae7e6d805 608 #if defined(MBEDTLS_PADLOCK_C) && defined(MBEDTLS_PADLOCK_ALIGN16)
borlanic 0:fbdae7e6d805 609 if( aes_padlock_ace == -1 )
borlanic 0:fbdae7e6d805 610 aes_padlock_ace = mbedtls_padlock_has_support( MBEDTLS_PADLOCK_ACE );
borlanic 0:fbdae7e6d805 611
borlanic 0:fbdae7e6d805 612 if( aes_padlock_ace )
borlanic 0:fbdae7e6d805 613 ctx->rk = RK = MBEDTLS_PADLOCK_ALIGN16( ctx->buf );
borlanic 0:fbdae7e6d805 614 else
borlanic 0:fbdae7e6d805 615 #endif
borlanic 0:fbdae7e6d805 616 ctx->rk = RK = ctx->buf;
borlanic 0:fbdae7e6d805 617
borlanic 0:fbdae7e6d805 618 /* Also checks keybits */
borlanic 0:fbdae7e6d805 619 if( ( ret = mbedtls_aes_setkey_enc( &cty, key, keybits ) ) != 0 )
borlanic 0:fbdae7e6d805 620 goto exit;
borlanic 0:fbdae7e6d805 621
borlanic 0:fbdae7e6d805 622 ctx->nr = cty.nr;
borlanic 0:fbdae7e6d805 623
borlanic 0:fbdae7e6d805 624 #if defined(MBEDTLS_AESNI_C) && defined(MBEDTLS_HAVE_X86_64)
borlanic 0:fbdae7e6d805 625 if( mbedtls_aesni_has_support( MBEDTLS_AESNI_AES ) )
borlanic 0:fbdae7e6d805 626 {
borlanic 0:fbdae7e6d805 627 mbedtls_aesni_inverse_key( (unsigned char *) ctx->rk,
borlanic 0:fbdae7e6d805 628 (const unsigned char *) cty.rk, ctx->nr );
borlanic 0:fbdae7e6d805 629 goto exit;
borlanic 0:fbdae7e6d805 630 }
borlanic 0:fbdae7e6d805 631 #endif
borlanic 0:fbdae7e6d805 632
borlanic 0:fbdae7e6d805 633 SK = cty.rk + cty.nr * 4;
borlanic 0:fbdae7e6d805 634
borlanic 0:fbdae7e6d805 635 *RK++ = *SK++;
borlanic 0:fbdae7e6d805 636 *RK++ = *SK++;
borlanic 0:fbdae7e6d805 637 *RK++ = *SK++;
borlanic 0:fbdae7e6d805 638 *RK++ = *SK++;
borlanic 0:fbdae7e6d805 639
borlanic 0:fbdae7e6d805 640 for( i = ctx->nr - 1, SK -= 8; i > 0; i--, SK -= 8 )
borlanic 0:fbdae7e6d805 641 {
borlanic 0:fbdae7e6d805 642 for( j = 0; j < 4; j++, SK++ )
borlanic 0:fbdae7e6d805 643 {
borlanic 0:fbdae7e6d805 644 *RK++ = RT0[ FSb[ ( *SK ) & 0xFF ] ] ^
borlanic 0:fbdae7e6d805 645 RT1[ FSb[ ( *SK >> 8 ) & 0xFF ] ] ^
borlanic 0:fbdae7e6d805 646 RT2[ FSb[ ( *SK >> 16 ) & 0xFF ] ] ^
borlanic 0:fbdae7e6d805 647 RT3[ FSb[ ( *SK >> 24 ) & 0xFF ] ];
borlanic 0:fbdae7e6d805 648 }
borlanic 0:fbdae7e6d805 649 }
borlanic 0:fbdae7e6d805 650
borlanic 0:fbdae7e6d805 651 *RK++ = *SK++;
borlanic 0:fbdae7e6d805 652 *RK++ = *SK++;
borlanic 0:fbdae7e6d805 653 *RK++ = *SK++;
borlanic 0:fbdae7e6d805 654 *RK++ = *SK++;
borlanic 0:fbdae7e6d805 655
borlanic 0:fbdae7e6d805 656 exit:
borlanic 0:fbdae7e6d805 657 mbedtls_aes_free( &cty );
borlanic 0:fbdae7e6d805 658
borlanic 0:fbdae7e6d805 659 return( ret );
borlanic 0:fbdae7e6d805 660 }
borlanic 0:fbdae7e6d805 661 #endif /* !MBEDTLS_AES_SETKEY_DEC_ALT */
borlanic 0:fbdae7e6d805 662
borlanic 0:fbdae7e6d805 663 #define AES_FROUND(X0,X1,X2,X3,Y0,Y1,Y2,Y3) \
borlanic 0:fbdae7e6d805 664 { \
borlanic 0:fbdae7e6d805 665 X0 = *RK++ ^ FT0[ ( Y0 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 666 FT1[ ( Y1 >> 8 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 667 FT2[ ( Y2 >> 16 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 668 FT3[ ( Y3 >> 24 ) & 0xFF ]; \
borlanic 0:fbdae7e6d805 669 \
borlanic 0:fbdae7e6d805 670 X1 = *RK++ ^ FT0[ ( Y1 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 671 FT1[ ( Y2 >> 8 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 672 FT2[ ( Y3 >> 16 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 673 FT3[ ( Y0 >> 24 ) & 0xFF ]; \
borlanic 0:fbdae7e6d805 674 \
borlanic 0:fbdae7e6d805 675 X2 = *RK++ ^ FT0[ ( Y2 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 676 FT1[ ( Y3 >> 8 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 677 FT2[ ( Y0 >> 16 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 678 FT3[ ( Y1 >> 24 ) & 0xFF ]; \
borlanic 0:fbdae7e6d805 679 \
borlanic 0:fbdae7e6d805 680 X3 = *RK++ ^ FT0[ ( Y3 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 681 FT1[ ( Y0 >> 8 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 682 FT2[ ( Y1 >> 16 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 683 FT3[ ( Y2 >> 24 ) & 0xFF ]; \
borlanic 0:fbdae7e6d805 684 }
borlanic 0:fbdae7e6d805 685
borlanic 0:fbdae7e6d805 686 #define AES_RROUND(X0,X1,X2,X3,Y0,Y1,Y2,Y3) \
borlanic 0:fbdae7e6d805 687 { \
borlanic 0:fbdae7e6d805 688 X0 = *RK++ ^ RT0[ ( Y0 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 689 RT1[ ( Y3 >> 8 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 690 RT2[ ( Y2 >> 16 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 691 RT3[ ( Y1 >> 24 ) & 0xFF ]; \
borlanic 0:fbdae7e6d805 692 \
borlanic 0:fbdae7e6d805 693 X1 = *RK++ ^ RT0[ ( Y1 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 694 RT1[ ( Y0 >> 8 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 695 RT2[ ( Y3 >> 16 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 696 RT3[ ( Y2 >> 24 ) & 0xFF ]; \
borlanic 0:fbdae7e6d805 697 \
borlanic 0:fbdae7e6d805 698 X2 = *RK++ ^ RT0[ ( Y2 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 699 RT1[ ( Y1 >> 8 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 700 RT2[ ( Y0 >> 16 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 701 RT3[ ( Y3 >> 24 ) & 0xFF ]; \
borlanic 0:fbdae7e6d805 702 \
borlanic 0:fbdae7e6d805 703 X3 = *RK++ ^ RT0[ ( Y3 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 704 RT1[ ( Y2 >> 8 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 705 RT2[ ( Y1 >> 16 ) & 0xFF ] ^ \
borlanic 0:fbdae7e6d805 706 RT3[ ( Y0 >> 24 ) & 0xFF ]; \
borlanic 0:fbdae7e6d805 707 }
borlanic 0:fbdae7e6d805 708
borlanic 0:fbdae7e6d805 709 /*
borlanic 0:fbdae7e6d805 710 * AES-ECB block encryption
borlanic 0:fbdae7e6d805 711 */
borlanic 0:fbdae7e6d805 712 #if !defined(MBEDTLS_AES_ENCRYPT_ALT)
borlanic 0:fbdae7e6d805 713 int mbedtls_internal_aes_encrypt( mbedtls_aes_context *ctx,
borlanic 0:fbdae7e6d805 714 const unsigned char input[16],
borlanic 0:fbdae7e6d805 715 unsigned char output[16] )
borlanic 0:fbdae7e6d805 716 {
borlanic 0:fbdae7e6d805 717 int i;
borlanic 0:fbdae7e6d805 718 uint32_t *RK, X0, X1, X2, X3, Y0, Y1, Y2, Y3;
borlanic 0:fbdae7e6d805 719
borlanic 0:fbdae7e6d805 720 RK = ctx->rk;
borlanic 0:fbdae7e6d805 721
borlanic 0:fbdae7e6d805 722 GET_UINT32_LE( X0, input, 0 ); X0 ^= *RK++;
borlanic 0:fbdae7e6d805 723 GET_UINT32_LE( X1, input, 4 ); X1 ^= *RK++;
borlanic 0:fbdae7e6d805 724 GET_UINT32_LE( X2, input, 8 ); X2 ^= *RK++;
borlanic 0:fbdae7e6d805 725 GET_UINT32_LE( X3, input, 12 ); X3 ^= *RK++;
borlanic 0:fbdae7e6d805 726
borlanic 0:fbdae7e6d805 727 for( i = ( ctx->nr >> 1 ) - 1; i > 0; i-- )
borlanic 0:fbdae7e6d805 728 {
borlanic 0:fbdae7e6d805 729 AES_FROUND( Y0, Y1, Y2, Y3, X0, X1, X2, X3 );
borlanic 0:fbdae7e6d805 730 AES_FROUND( X0, X1, X2, X3, Y0, Y1, Y2, Y3 );
borlanic 0:fbdae7e6d805 731 }
borlanic 0:fbdae7e6d805 732
borlanic 0:fbdae7e6d805 733 AES_FROUND( Y0, Y1, Y2, Y3, X0, X1, X2, X3 );
borlanic 0:fbdae7e6d805 734
borlanic 0:fbdae7e6d805 735 X0 = *RK++ ^ \
borlanic 0:fbdae7e6d805 736 ( (uint32_t) FSb[ ( Y0 ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 737 ( (uint32_t) FSb[ ( Y1 >> 8 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 738 ( (uint32_t) FSb[ ( Y2 >> 16 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 739 ( (uint32_t) FSb[ ( Y3 >> 24 ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 740
borlanic 0:fbdae7e6d805 741 X1 = *RK++ ^ \
borlanic 0:fbdae7e6d805 742 ( (uint32_t) FSb[ ( Y1 ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 743 ( (uint32_t) FSb[ ( Y2 >> 8 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 744 ( (uint32_t) FSb[ ( Y3 >> 16 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 745 ( (uint32_t) FSb[ ( Y0 >> 24 ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 746
borlanic 0:fbdae7e6d805 747 X2 = *RK++ ^ \
borlanic 0:fbdae7e6d805 748 ( (uint32_t) FSb[ ( Y2 ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 749 ( (uint32_t) FSb[ ( Y3 >> 8 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 750 ( (uint32_t) FSb[ ( Y0 >> 16 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 751 ( (uint32_t) FSb[ ( Y1 >> 24 ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 752
borlanic 0:fbdae7e6d805 753 X3 = *RK++ ^ \
borlanic 0:fbdae7e6d805 754 ( (uint32_t) FSb[ ( Y3 ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 755 ( (uint32_t) FSb[ ( Y0 >> 8 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 756 ( (uint32_t) FSb[ ( Y1 >> 16 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 757 ( (uint32_t) FSb[ ( Y2 >> 24 ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 758
borlanic 0:fbdae7e6d805 759 PUT_UINT32_LE( X0, output, 0 );
borlanic 0:fbdae7e6d805 760 PUT_UINT32_LE( X1, output, 4 );
borlanic 0:fbdae7e6d805 761 PUT_UINT32_LE( X2, output, 8 );
borlanic 0:fbdae7e6d805 762 PUT_UINT32_LE( X3, output, 12 );
borlanic 0:fbdae7e6d805 763
borlanic 0:fbdae7e6d805 764 return( 0 );
borlanic 0:fbdae7e6d805 765 }
borlanic 0:fbdae7e6d805 766 #endif /* !MBEDTLS_AES_ENCRYPT_ALT */
borlanic 0:fbdae7e6d805 767
borlanic 0:fbdae7e6d805 768 void mbedtls_aes_encrypt( mbedtls_aes_context *ctx,
borlanic 0:fbdae7e6d805 769 const unsigned char input[16],
borlanic 0:fbdae7e6d805 770 unsigned char output[16] )
borlanic 0:fbdae7e6d805 771 {
borlanic 0:fbdae7e6d805 772 mbedtls_internal_aes_encrypt( ctx, input, output );
borlanic 0:fbdae7e6d805 773 }
borlanic 0:fbdae7e6d805 774
borlanic 0:fbdae7e6d805 775 /*
borlanic 0:fbdae7e6d805 776 * AES-ECB block decryption
borlanic 0:fbdae7e6d805 777 */
borlanic 0:fbdae7e6d805 778 #if !defined(MBEDTLS_AES_DECRYPT_ALT)
borlanic 0:fbdae7e6d805 779 int mbedtls_internal_aes_decrypt( mbedtls_aes_context *ctx,
borlanic 0:fbdae7e6d805 780 const unsigned char input[16],
borlanic 0:fbdae7e6d805 781 unsigned char output[16] )
borlanic 0:fbdae7e6d805 782 {
borlanic 0:fbdae7e6d805 783 int i;
borlanic 0:fbdae7e6d805 784 uint32_t *RK, X0, X1, X2, X3, Y0, Y1, Y2, Y3;
borlanic 0:fbdae7e6d805 785
borlanic 0:fbdae7e6d805 786 RK = ctx->rk;
borlanic 0:fbdae7e6d805 787
borlanic 0:fbdae7e6d805 788 GET_UINT32_LE( X0, input, 0 ); X0 ^= *RK++;
borlanic 0:fbdae7e6d805 789 GET_UINT32_LE( X1, input, 4 ); X1 ^= *RK++;
borlanic 0:fbdae7e6d805 790 GET_UINT32_LE( X2, input, 8 ); X2 ^= *RK++;
borlanic 0:fbdae7e6d805 791 GET_UINT32_LE( X3, input, 12 ); X3 ^= *RK++;
borlanic 0:fbdae7e6d805 792
borlanic 0:fbdae7e6d805 793 for( i = ( ctx->nr >> 1 ) - 1; i > 0; i-- )
borlanic 0:fbdae7e6d805 794 {
borlanic 0:fbdae7e6d805 795 AES_RROUND( Y0, Y1, Y2, Y3, X0, X1, X2, X3 );
borlanic 0:fbdae7e6d805 796 AES_RROUND( X0, X1, X2, X3, Y0, Y1, Y2, Y3 );
borlanic 0:fbdae7e6d805 797 }
borlanic 0:fbdae7e6d805 798
borlanic 0:fbdae7e6d805 799 AES_RROUND( Y0, Y1, Y2, Y3, X0, X1, X2, X3 );
borlanic 0:fbdae7e6d805 800
borlanic 0:fbdae7e6d805 801 X0 = *RK++ ^ \
borlanic 0:fbdae7e6d805 802 ( (uint32_t) RSb[ ( Y0 ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 803 ( (uint32_t) RSb[ ( Y3 >> 8 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 804 ( (uint32_t) RSb[ ( Y2 >> 16 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 805 ( (uint32_t) RSb[ ( Y1 >> 24 ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 806
borlanic 0:fbdae7e6d805 807 X1 = *RK++ ^ \
borlanic 0:fbdae7e6d805 808 ( (uint32_t) RSb[ ( Y1 ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 809 ( (uint32_t) RSb[ ( Y0 >> 8 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 810 ( (uint32_t) RSb[ ( Y3 >> 16 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 811 ( (uint32_t) RSb[ ( Y2 >> 24 ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 812
borlanic 0:fbdae7e6d805 813 X2 = *RK++ ^ \
borlanic 0:fbdae7e6d805 814 ( (uint32_t) RSb[ ( Y2 ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 815 ( (uint32_t) RSb[ ( Y1 >> 8 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 816 ( (uint32_t) RSb[ ( Y0 >> 16 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 817 ( (uint32_t) RSb[ ( Y3 >> 24 ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 818
borlanic 0:fbdae7e6d805 819 X3 = *RK++ ^ \
borlanic 0:fbdae7e6d805 820 ( (uint32_t) RSb[ ( Y3 ) & 0xFF ] ) ^
borlanic 0:fbdae7e6d805 821 ( (uint32_t) RSb[ ( Y2 >> 8 ) & 0xFF ] << 8 ) ^
borlanic 0:fbdae7e6d805 822 ( (uint32_t) RSb[ ( Y1 >> 16 ) & 0xFF ] << 16 ) ^
borlanic 0:fbdae7e6d805 823 ( (uint32_t) RSb[ ( Y0 >> 24 ) & 0xFF ] << 24 );
borlanic 0:fbdae7e6d805 824
borlanic 0:fbdae7e6d805 825 PUT_UINT32_LE( X0, output, 0 );
borlanic 0:fbdae7e6d805 826 PUT_UINT32_LE( X1, output, 4 );
borlanic 0:fbdae7e6d805 827 PUT_UINT32_LE( X2, output, 8 );
borlanic 0:fbdae7e6d805 828 PUT_UINT32_LE( X3, output, 12 );
borlanic 0:fbdae7e6d805 829
borlanic 0:fbdae7e6d805 830 return( 0 );
borlanic 0:fbdae7e6d805 831 }
borlanic 0:fbdae7e6d805 832 #endif /* !MBEDTLS_AES_DECRYPT_ALT */
borlanic 0:fbdae7e6d805 833
borlanic 0:fbdae7e6d805 834 void mbedtls_aes_decrypt( mbedtls_aes_context *ctx,
borlanic 0:fbdae7e6d805 835 const unsigned char input[16],
borlanic 0:fbdae7e6d805 836 unsigned char output[16] )
borlanic 0:fbdae7e6d805 837 {
borlanic 0:fbdae7e6d805 838 mbedtls_internal_aes_decrypt( ctx, input, output );
borlanic 0:fbdae7e6d805 839 }
borlanic 0:fbdae7e6d805 840
borlanic 0:fbdae7e6d805 841 /*
borlanic 0:fbdae7e6d805 842 * AES-ECB block encryption/decryption
borlanic 0:fbdae7e6d805 843 */
borlanic 0:fbdae7e6d805 844 int mbedtls_aes_crypt_ecb( mbedtls_aes_context *ctx,
borlanic 0:fbdae7e6d805 845 int mode,
borlanic 0:fbdae7e6d805 846 const unsigned char input[16],
borlanic 0:fbdae7e6d805 847 unsigned char output[16] )
borlanic 0:fbdae7e6d805 848 {
borlanic 0:fbdae7e6d805 849 #if defined(MBEDTLS_AESNI_C) && defined(MBEDTLS_HAVE_X86_64)
borlanic 0:fbdae7e6d805 850 if( mbedtls_aesni_has_support( MBEDTLS_AESNI_AES ) )
borlanic 0:fbdae7e6d805 851 return( mbedtls_aesni_crypt_ecb( ctx, mode, input, output ) );
borlanic 0:fbdae7e6d805 852 #endif
borlanic 0:fbdae7e6d805 853
borlanic 0:fbdae7e6d805 854 #if defined(MBEDTLS_PADLOCK_C) && defined(MBEDTLS_HAVE_X86)
borlanic 0:fbdae7e6d805 855 if( aes_padlock_ace )
borlanic 0:fbdae7e6d805 856 {
borlanic 0:fbdae7e6d805 857 if( mbedtls_padlock_xcryptecb( ctx, mode, input, output ) == 0 )
borlanic 0:fbdae7e6d805 858 return( 0 );
borlanic 0:fbdae7e6d805 859
borlanic 0:fbdae7e6d805 860 // If padlock data misaligned, we just fall back to
borlanic 0:fbdae7e6d805 861 // unaccelerated mode
borlanic 0:fbdae7e6d805 862 //
borlanic 0:fbdae7e6d805 863 }
borlanic 0:fbdae7e6d805 864 #endif
borlanic 0:fbdae7e6d805 865
borlanic 0:fbdae7e6d805 866 if( mode == MBEDTLS_AES_ENCRYPT )
borlanic 0:fbdae7e6d805 867 return( mbedtls_internal_aes_encrypt( ctx, input, output ) );
borlanic 0:fbdae7e6d805 868 else
borlanic 0:fbdae7e6d805 869 return( mbedtls_internal_aes_decrypt( ctx, input, output ) );
borlanic 0:fbdae7e6d805 870 }
borlanic 0:fbdae7e6d805 871
borlanic 0:fbdae7e6d805 872 #if defined(MBEDTLS_CIPHER_MODE_CBC)
borlanic 0:fbdae7e6d805 873 /*
borlanic 0:fbdae7e6d805 874 * AES-CBC buffer encryption/decryption
borlanic 0:fbdae7e6d805 875 */
borlanic 0:fbdae7e6d805 876 int mbedtls_aes_crypt_cbc( mbedtls_aes_context *ctx,
borlanic 0:fbdae7e6d805 877 int mode,
borlanic 0:fbdae7e6d805 878 size_t length,
borlanic 0:fbdae7e6d805 879 unsigned char iv[16],
borlanic 0:fbdae7e6d805 880 const unsigned char *input,
borlanic 0:fbdae7e6d805 881 unsigned char *output )
borlanic 0:fbdae7e6d805 882 {
borlanic 0:fbdae7e6d805 883 int i;
borlanic 0:fbdae7e6d805 884 unsigned char temp[16];
borlanic 0:fbdae7e6d805 885
borlanic 0:fbdae7e6d805 886 if( length % 16 )
borlanic 0:fbdae7e6d805 887 return( MBEDTLS_ERR_AES_INVALID_INPUT_LENGTH );
borlanic 0:fbdae7e6d805 888
borlanic 0:fbdae7e6d805 889 #if defined(MBEDTLS_PADLOCK_C) && defined(MBEDTLS_HAVE_X86)
borlanic 0:fbdae7e6d805 890 if( aes_padlock_ace )
borlanic 0:fbdae7e6d805 891 {
borlanic 0:fbdae7e6d805 892 if( mbedtls_padlock_xcryptcbc( ctx, mode, length, iv, input, output ) == 0 )
borlanic 0:fbdae7e6d805 893 return( 0 );
borlanic 0:fbdae7e6d805 894
borlanic 0:fbdae7e6d805 895 // If padlock data misaligned, we just fall back to
borlanic 0:fbdae7e6d805 896 // unaccelerated mode
borlanic 0:fbdae7e6d805 897 //
borlanic 0:fbdae7e6d805 898 }
borlanic 0:fbdae7e6d805 899 #endif
borlanic 0:fbdae7e6d805 900
borlanic 0:fbdae7e6d805 901 if( mode == MBEDTLS_AES_DECRYPT )
borlanic 0:fbdae7e6d805 902 {
borlanic 0:fbdae7e6d805 903 while( length > 0 )
borlanic 0:fbdae7e6d805 904 {
borlanic 0:fbdae7e6d805 905 memcpy( temp, input, 16 );
borlanic 0:fbdae7e6d805 906 mbedtls_aes_crypt_ecb( ctx, mode, input, output );
borlanic 0:fbdae7e6d805 907
borlanic 0:fbdae7e6d805 908 for( i = 0; i < 16; i++ )
borlanic 0:fbdae7e6d805 909 output[i] = (unsigned char)( output[i] ^ iv[i] );
borlanic 0:fbdae7e6d805 910
borlanic 0:fbdae7e6d805 911 memcpy( iv, temp, 16 );
borlanic 0:fbdae7e6d805 912
borlanic 0:fbdae7e6d805 913 input += 16;
borlanic 0:fbdae7e6d805 914 output += 16;
borlanic 0:fbdae7e6d805 915 length -= 16;
borlanic 0:fbdae7e6d805 916 }
borlanic 0:fbdae7e6d805 917 }
borlanic 0:fbdae7e6d805 918 else
borlanic 0:fbdae7e6d805 919 {
borlanic 0:fbdae7e6d805 920 while( length > 0 )
borlanic 0:fbdae7e6d805 921 {
borlanic 0:fbdae7e6d805 922 for( i = 0; i < 16; i++ )
borlanic 0:fbdae7e6d805 923 output[i] = (unsigned char)( input[i] ^ iv[i] );
borlanic 0:fbdae7e6d805 924
borlanic 0:fbdae7e6d805 925 mbedtls_aes_crypt_ecb( ctx, mode, output, output );
borlanic 0:fbdae7e6d805 926 memcpy( iv, output, 16 );
borlanic 0:fbdae7e6d805 927
borlanic 0:fbdae7e6d805 928 input += 16;
borlanic 0:fbdae7e6d805 929 output += 16;
borlanic 0:fbdae7e6d805 930 length -= 16;
borlanic 0:fbdae7e6d805 931 }
borlanic 0:fbdae7e6d805 932 }
borlanic 0:fbdae7e6d805 933
borlanic 0:fbdae7e6d805 934 return( 0 );
borlanic 0:fbdae7e6d805 935 }
borlanic 0:fbdae7e6d805 936 #endif /* MBEDTLS_CIPHER_MODE_CBC */
borlanic 0:fbdae7e6d805 937
borlanic 0:fbdae7e6d805 938 #if defined(MBEDTLS_CIPHER_MODE_CFB)
borlanic 0:fbdae7e6d805 939 /*
borlanic 0:fbdae7e6d805 940 * AES-CFB128 buffer encryption/decryption
borlanic 0:fbdae7e6d805 941 */
borlanic 0:fbdae7e6d805 942 int mbedtls_aes_crypt_cfb128( mbedtls_aes_context *ctx,
borlanic 0:fbdae7e6d805 943 int mode,
borlanic 0:fbdae7e6d805 944 size_t length,
borlanic 0:fbdae7e6d805 945 size_t *iv_off,
borlanic 0:fbdae7e6d805 946 unsigned char iv[16],
borlanic 0:fbdae7e6d805 947 const unsigned char *input,
borlanic 0:fbdae7e6d805 948 unsigned char *output )
borlanic 0:fbdae7e6d805 949 {
borlanic 0:fbdae7e6d805 950 int c;
borlanic 0:fbdae7e6d805 951 size_t n = *iv_off;
borlanic 0:fbdae7e6d805 952
borlanic 0:fbdae7e6d805 953 if( mode == MBEDTLS_AES_DECRYPT )
borlanic 0:fbdae7e6d805 954 {
borlanic 0:fbdae7e6d805 955 while( length-- )
borlanic 0:fbdae7e6d805 956 {
borlanic 0:fbdae7e6d805 957 if( n == 0 )
borlanic 0:fbdae7e6d805 958 mbedtls_aes_crypt_ecb( ctx, MBEDTLS_AES_ENCRYPT, iv, iv );
borlanic 0:fbdae7e6d805 959
borlanic 0:fbdae7e6d805 960 c = *input++;
borlanic 0:fbdae7e6d805 961 *output++ = (unsigned char)( c ^ iv[n] );
borlanic 0:fbdae7e6d805 962 iv[n] = (unsigned char) c;
borlanic 0:fbdae7e6d805 963
borlanic 0:fbdae7e6d805 964 n = ( n + 1 ) & 0x0F;
borlanic 0:fbdae7e6d805 965 }
borlanic 0:fbdae7e6d805 966 }
borlanic 0:fbdae7e6d805 967 else
borlanic 0:fbdae7e6d805 968 {
borlanic 0:fbdae7e6d805 969 while( length-- )
borlanic 0:fbdae7e6d805 970 {
borlanic 0:fbdae7e6d805 971 if( n == 0 )
borlanic 0:fbdae7e6d805 972 mbedtls_aes_crypt_ecb( ctx, MBEDTLS_AES_ENCRYPT, iv, iv );
borlanic 0:fbdae7e6d805 973
borlanic 0:fbdae7e6d805 974 iv[n] = *output++ = (unsigned char)( iv[n] ^ *input++ );
borlanic 0:fbdae7e6d805 975
borlanic 0:fbdae7e6d805 976 n = ( n + 1 ) & 0x0F;
borlanic 0:fbdae7e6d805 977 }
borlanic 0:fbdae7e6d805 978 }
borlanic 0:fbdae7e6d805 979
borlanic 0:fbdae7e6d805 980 *iv_off = n;
borlanic 0:fbdae7e6d805 981
borlanic 0:fbdae7e6d805 982 return( 0 );
borlanic 0:fbdae7e6d805 983 }
borlanic 0:fbdae7e6d805 984
borlanic 0:fbdae7e6d805 985 /*
borlanic 0:fbdae7e6d805 986 * AES-CFB8 buffer encryption/decryption
borlanic 0:fbdae7e6d805 987 */
borlanic 0:fbdae7e6d805 988 int mbedtls_aes_crypt_cfb8( mbedtls_aes_context *ctx,
borlanic 0:fbdae7e6d805 989 int mode,
borlanic 0:fbdae7e6d805 990 size_t length,
borlanic 0:fbdae7e6d805 991 unsigned char iv[16],
borlanic 0:fbdae7e6d805 992 const unsigned char *input,
borlanic 0:fbdae7e6d805 993 unsigned char *output )
borlanic 0:fbdae7e6d805 994 {
borlanic 0:fbdae7e6d805 995 unsigned char c;
borlanic 0:fbdae7e6d805 996 unsigned char ov[17];
borlanic 0:fbdae7e6d805 997
borlanic 0:fbdae7e6d805 998 while( length-- )
borlanic 0:fbdae7e6d805 999 {
borlanic 0:fbdae7e6d805 1000 memcpy( ov, iv, 16 );
borlanic 0:fbdae7e6d805 1001 mbedtls_aes_crypt_ecb( ctx, MBEDTLS_AES_ENCRYPT, iv, iv );
borlanic 0:fbdae7e6d805 1002
borlanic 0:fbdae7e6d805 1003 if( mode == MBEDTLS_AES_DECRYPT )
borlanic 0:fbdae7e6d805 1004 ov[16] = *input;
borlanic 0:fbdae7e6d805 1005
borlanic 0:fbdae7e6d805 1006 c = *output++ = (unsigned char)( iv[0] ^ *input++ );
borlanic 0:fbdae7e6d805 1007
borlanic 0:fbdae7e6d805 1008 if( mode == MBEDTLS_AES_ENCRYPT )
borlanic 0:fbdae7e6d805 1009 ov[16] = c;
borlanic 0:fbdae7e6d805 1010
borlanic 0:fbdae7e6d805 1011 memcpy( iv, ov + 1, 16 );
borlanic 0:fbdae7e6d805 1012 }
borlanic 0:fbdae7e6d805 1013
borlanic 0:fbdae7e6d805 1014 return( 0 );
borlanic 0:fbdae7e6d805 1015 }
borlanic 0:fbdae7e6d805 1016 #endif /*MBEDTLS_CIPHER_MODE_CFB */
borlanic 0:fbdae7e6d805 1017
borlanic 0:fbdae7e6d805 1018 #if defined(MBEDTLS_CIPHER_MODE_CTR)
borlanic 0:fbdae7e6d805 1019 /*
borlanic 0:fbdae7e6d805 1020 * AES-CTR buffer encryption/decryption
borlanic 0:fbdae7e6d805 1021 */
borlanic 0:fbdae7e6d805 1022 int mbedtls_aes_crypt_ctr( mbedtls_aes_context *ctx,
borlanic 0:fbdae7e6d805 1023 size_t length,
borlanic 0:fbdae7e6d805 1024 size_t *nc_off,
borlanic 0:fbdae7e6d805 1025 unsigned char nonce_counter[16],
borlanic 0:fbdae7e6d805 1026 unsigned char stream_block[16],
borlanic 0:fbdae7e6d805 1027 const unsigned char *input,
borlanic 0:fbdae7e6d805 1028 unsigned char *output )
borlanic 0:fbdae7e6d805 1029 {
borlanic 0:fbdae7e6d805 1030 int c, i;
borlanic 0:fbdae7e6d805 1031 size_t n = *nc_off;
borlanic 0:fbdae7e6d805 1032
borlanic 0:fbdae7e6d805 1033 while( length-- )
borlanic 0:fbdae7e6d805 1034 {
borlanic 0:fbdae7e6d805 1035 if( n == 0 ) {
borlanic 0:fbdae7e6d805 1036 mbedtls_aes_crypt_ecb( ctx, MBEDTLS_AES_ENCRYPT, nonce_counter, stream_block );
borlanic 0:fbdae7e6d805 1037
borlanic 0:fbdae7e6d805 1038 for( i = 16; i > 0; i-- )
borlanic 0:fbdae7e6d805 1039 if( ++nonce_counter[i - 1] != 0 )
borlanic 0:fbdae7e6d805 1040 break;
borlanic 0:fbdae7e6d805 1041 }
borlanic 0:fbdae7e6d805 1042 c = *input++;
borlanic 0:fbdae7e6d805 1043 *output++ = (unsigned char)( c ^ stream_block[n] );
borlanic 0:fbdae7e6d805 1044
borlanic 0:fbdae7e6d805 1045 n = ( n + 1 ) & 0x0F;
borlanic 0:fbdae7e6d805 1046 }
borlanic 0:fbdae7e6d805 1047
borlanic 0:fbdae7e6d805 1048 *nc_off = n;
borlanic 0:fbdae7e6d805 1049
borlanic 0:fbdae7e6d805 1050 return( 0 );
borlanic 0:fbdae7e6d805 1051 }
borlanic 0:fbdae7e6d805 1052 #endif /* MBEDTLS_CIPHER_MODE_CTR */
borlanic 0:fbdae7e6d805 1053
borlanic 0:fbdae7e6d805 1054 #endif /* !MBEDTLS_AES_ALT */
borlanic 0:fbdae7e6d805 1055
borlanic 0:fbdae7e6d805 1056 #if defined(MBEDTLS_SELF_TEST)
borlanic 0:fbdae7e6d805 1057 /*
borlanic 0:fbdae7e6d805 1058 * AES test vectors from:
borlanic 0:fbdae7e6d805 1059 *
borlanic 0:fbdae7e6d805 1060 * http://csrc.nist.gov/archive/aes/rijndael/rijndael-vals.zip
borlanic 0:fbdae7e6d805 1061 */
borlanic 0:fbdae7e6d805 1062 static const unsigned char aes_test_ecb_dec[3][16] =
borlanic 0:fbdae7e6d805 1063 {
borlanic 0:fbdae7e6d805 1064 { 0x44, 0x41, 0x6A, 0xC2, 0xD1, 0xF5, 0x3C, 0x58,
borlanic 0:fbdae7e6d805 1065 0x33, 0x03, 0x91, 0x7E, 0x6B, 0xE9, 0xEB, 0xE0 },
borlanic 0:fbdae7e6d805 1066 { 0x48, 0xE3, 0x1E, 0x9E, 0x25, 0x67, 0x18, 0xF2,
borlanic 0:fbdae7e6d805 1067 0x92, 0x29, 0x31, 0x9C, 0x19, 0xF1, 0x5B, 0xA4 },
borlanic 0:fbdae7e6d805 1068 { 0x05, 0x8C, 0xCF, 0xFD, 0xBB, 0xCB, 0x38, 0x2D,
borlanic 0:fbdae7e6d805 1069 0x1F, 0x6F, 0x56, 0x58, 0x5D, 0x8A, 0x4A, 0xDE }
borlanic 0:fbdae7e6d805 1070 };
borlanic 0:fbdae7e6d805 1071
borlanic 0:fbdae7e6d805 1072 static const unsigned char aes_test_ecb_enc[3][16] =
borlanic 0:fbdae7e6d805 1073 {
borlanic 0:fbdae7e6d805 1074 { 0xC3, 0x4C, 0x05, 0x2C, 0xC0, 0xDA, 0x8D, 0x73,
borlanic 0:fbdae7e6d805 1075 0x45, 0x1A, 0xFE, 0x5F, 0x03, 0xBE, 0x29, 0x7F },
borlanic 0:fbdae7e6d805 1076 { 0xF3, 0xF6, 0x75, 0x2A, 0xE8, 0xD7, 0x83, 0x11,
borlanic 0:fbdae7e6d805 1077 0x38, 0xF0, 0x41, 0x56, 0x06, 0x31, 0xB1, 0x14 },
borlanic 0:fbdae7e6d805 1078 { 0x8B, 0x79, 0xEE, 0xCC, 0x93, 0xA0, 0xEE, 0x5D,
borlanic 0:fbdae7e6d805 1079 0xFF, 0x30, 0xB4, 0xEA, 0x21, 0x63, 0x6D, 0xA4 }
borlanic 0:fbdae7e6d805 1080 };
borlanic 0:fbdae7e6d805 1081
borlanic 0:fbdae7e6d805 1082 #if defined(MBEDTLS_CIPHER_MODE_CBC)
borlanic 0:fbdae7e6d805 1083 static const unsigned char aes_test_cbc_dec[3][16] =
borlanic 0:fbdae7e6d805 1084 {
borlanic 0:fbdae7e6d805 1085 { 0xFA, 0xCA, 0x37, 0xE0, 0xB0, 0xC8, 0x53, 0x73,
borlanic 0:fbdae7e6d805 1086 0xDF, 0x70, 0x6E, 0x73, 0xF7, 0xC9, 0xAF, 0x86 },
borlanic 0:fbdae7e6d805 1087 { 0x5D, 0xF6, 0x78, 0xDD, 0x17, 0xBA, 0x4E, 0x75,
borlanic 0:fbdae7e6d805 1088 0xB6, 0x17, 0x68, 0xC6, 0xAD, 0xEF, 0x7C, 0x7B },
borlanic 0:fbdae7e6d805 1089 { 0x48, 0x04, 0xE1, 0x81, 0x8F, 0xE6, 0x29, 0x75,
borlanic 0:fbdae7e6d805 1090 0x19, 0xA3, 0xE8, 0x8C, 0x57, 0x31, 0x04, 0x13 }
borlanic 0:fbdae7e6d805 1091 };
borlanic 0:fbdae7e6d805 1092
borlanic 0:fbdae7e6d805 1093 static const unsigned char aes_test_cbc_enc[3][16] =
borlanic 0:fbdae7e6d805 1094 {
borlanic 0:fbdae7e6d805 1095 { 0x8A, 0x05, 0xFC, 0x5E, 0x09, 0x5A, 0xF4, 0x84,
borlanic 0:fbdae7e6d805 1096 0x8A, 0x08, 0xD3, 0x28, 0xD3, 0x68, 0x8E, 0x3D },
borlanic 0:fbdae7e6d805 1097 { 0x7B, 0xD9, 0x66, 0xD5, 0x3A, 0xD8, 0xC1, 0xBB,
borlanic 0:fbdae7e6d805 1098 0x85, 0xD2, 0xAD, 0xFA, 0xE8, 0x7B, 0xB1, 0x04 },
borlanic 0:fbdae7e6d805 1099 { 0xFE, 0x3C, 0x53, 0x65, 0x3E, 0x2F, 0x45, 0xB5,
borlanic 0:fbdae7e6d805 1100 0x6F, 0xCD, 0x88, 0xB2, 0xCC, 0x89, 0x8F, 0xF0 }
borlanic 0:fbdae7e6d805 1101 };
borlanic 0:fbdae7e6d805 1102 #endif /* MBEDTLS_CIPHER_MODE_CBC */
borlanic 0:fbdae7e6d805 1103
borlanic 0:fbdae7e6d805 1104 #if defined(MBEDTLS_CIPHER_MODE_CFB)
borlanic 0:fbdae7e6d805 1105 /*
borlanic 0:fbdae7e6d805 1106 * AES-CFB128 test vectors from:
borlanic 0:fbdae7e6d805 1107 *
borlanic 0:fbdae7e6d805 1108 * http://csrc.nist.gov/publications/nistpubs/800-38a/sp800-38a.pdf
borlanic 0:fbdae7e6d805 1109 */
borlanic 0:fbdae7e6d805 1110 static const unsigned char aes_test_cfb128_key[3][32] =
borlanic 0:fbdae7e6d805 1111 {
borlanic 0:fbdae7e6d805 1112 { 0x2B, 0x7E, 0x15, 0x16, 0x28, 0xAE, 0xD2, 0xA6,
borlanic 0:fbdae7e6d805 1113 0xAB, 0xF7, 0x15, 0x88, 0x09, 0xCF, 0x4F, 0x3C },
borlanic 0:fbdae7e6d805 1114 { 0x8E, 0x73, 0xB0, 0xF7, 0xDA, 0x0E, 0x64, 0x52,
borlanic 0:fbdae7e6d805 1115 0xC8, 0x10, 0xF3, 0x2B, 0x80, 0x90, 0x79, 0xE5,
borlanic 0:fbdae7e6d805 1116 0x62, 0xF8, 0xEA, 0xD2, 0x52, 0x2C, 0x6B, 0x7B },
borlanic 0:fbdae7e6d805 1117 { 0x60, 0x3D, 0xEB, 0x10, 0x15, 0xCA, 0x71, 0xBE,
borlanic 0:fbdae7e6d805 1118 0x2B, 0x73, 0xAE, 0xF0, 0x85, 0x7D, 0x77, 0x81,
borlanic 0:fbdae7e6d805 1119 0x1F, 0x35, 0x2C, 0x07, 0x3B, 0x61, 0x08, 0xD7,
borlanic 0:fbdae7e6d805 1120 0x2D, 0x98, 0x10, 0xA3, 0x09, 0x14, 0xDF, 0xF4 }
borlanic 0:fbdae7e6d805 1121 };
borlanic 0:fbdae7e6d805 1122
borlanic 0:fbdae7e6d805 1123 static const unsigned char aes_test_cfb128_iv[16] =
borlanic 0:fbdae7e6d805 1124 {
borlanic 0:fbdae7e6d805 1125 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
borlanic 0:fbdae7e6d805 1126 0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F
borlanic 0:fbdae7e6d805 1127 };
borlanic 0:fbdae7e6d805 1128
borlanic 0:fbdae7e6d805 1129 static const unsigned char aes_test_cfb128_pt[64] =
borlanic 0:fbdae7e6d805 1130 {
borlanic 0:fbdae7e6d805 1131 0x6B, 0xC1, 0xBE, 0xE2, 0x2E, 0x40, 0x9F, 0x96,
borlanic 0:fbdae7e6d805 1132 0xE9, 0x3D, 0x7E, 0x11, 0x73, 0x93, 0x17, 0x2A,
borlanic 0:fbdae7e6d805 1133 0xAE, 0x2D, 0x8A, 0x57, 0x1E, 0x03, 0xAC, 0x9C,
borlanic 0:fbdae7e6d805 1134 0x9E, 0xB7, 0x6F, 0xAC, 0x45, 0xAF, 0x8E, 0x51,
borlanic 0:fbdae7e6d805 1135 0x30, 0xC8, 0x1C, 0x46, 0xA3, 0x5C, 0xE4, 0x11,
borlanic 0:fbdae7e6d805 1136 0xE5, 0xFB, 0xC1, 0x19, 0x1A, 0x0A, 0x52, 0xEF,
borlanic 0:fbdae7e6d805 1137 0xF6, 0x9F, 0x24, 0x45, 0xDF, 0x4F, 0x9B, 0x17,
borlanic 0:fbdae7e6d805 1138 0xAD, 0x2B, 0x41, 0x7B, 0xE6, 0x6C, 0x37, 0x10
borlanic 0:fbdae7e6d805 1139 };
borlanic 0:fbdae7e6d805 1140
borlanic 0:fbdae7e6d805 1141 static const unsigned char aes_test_cfb128_ct[3][64] =
borlanic 0:fbdae7e6d805 1142 {
borlanic 0:fbdae7e6d805 1143 { 0x3B, 0x3F, 0xD9, 0x2E, 0xB7, 0x2D, 0xAD, 0x20,
borlanic 0:fbdae7e6d805 1144 0x33, 0x34, 0x49, 0xF8, 0xE8, 0x3C, 0xFB, 0x4A,
borlanic 0:fbdae7e6d805 1145 0xC8, 0xA6, 0x45, 0x37, 0xA0, 0xB3, 0xA9, 0x3F,
borlanic 0:fbdae7e6d805 1146 0xCD, 0xE3, 0xCD, 0xAD, 0x9F, 0x1C, 0xE5, 0x8B,
borlanic 0:fbdae7e6d805 1147 0x26, 0x75, 0x1F, 0x67, 0xA3, 0xCB, 0xB1, 0x40,
borlanic 0:fbdae7e6d805 1148 0xB1, 0x80, 0x8C, 0xF1, 0x87, 0xA4, 0xF4, 0xDF,
borlanic 0:fbdae7e6d805 1149 0xC0, 0x4B, 0x05, 0x35, 0x7C, 0x5D, 0x1C, 0x0E,
borlanic 0:fbdae7e6d805 1150 0xEA, 0xC4, 0xC6, 0x6F, 0x9F, 0xF7, 0xF2, 0xE6 },
borlanic 0:fbdae7e6d805 1151 { 0xCD, 0xC8, 0x0D, 0x6F, 0xDD, 0xF1, 0x8C, 0xAB,
borlanic 0:fbdae7e6d805 1152 0x34, 0xC2, 0x59, 0x09, 0xC9, 0x9A, 0x41, 0x74,
borlanic 0:fbdae7e6d805 1153 0x67, 0xCE, 0x7F, 0x7F, 0x81, 0x17, 0x36, 0x21,
borlanic 0:fbdae7e6d805 1154 0x96, 0x1A, 0x2B, 0x70, 0x17, 0x1D, 0x3D, 0x7A,
borlanic 0:fbdae7e6d805 1155 0x2E, 0x1E, 0x8A, 0x1D, 0xD5, 0x9B, 0x88, 0xB1,
borlanic 0:fbdae7e6d805 1156 0xC8, 0xE6, 0x0F, 0xED, 0x1E, 0xFA, 0xC4, 0xC9,
borlanic 0:fbdae7e6d805 1157 0xC0, 0x5F, 0x9F, 0x9C, 0xA9, 0x83, 0x4F, 0xA0,
borlanic 0:fbdae7e6d805 1158 0x42, 0xAE, 0x8F, 0xBA, 0x58, 0x4B, 0x09, 0xFF },
borlanic 0:fbdae7e6d805 1159 { 0xDC, 0x7E, 0x84, 0xBF, 0xDA, 0x79, 0x16, 0x4B,
borlanic 0:fbdae7e6d805 1160 0x7E, 0xCD, 0x84, 0x86, 0x98, 0x5D, 0x38, 0x60,
borlanic 0:fbdae7e6d805 1161 0x39, 0xFF, 0xED, 0x14, 0x3B, 0x28, 0xB1, 0xC8,
borlanic 0:fbdae7e6d805 1162 0x32, 0x11, 0x3C, 0x63, 0x31, 0xE5, 0x40, 0x7B,
borlanic 0:fbdae7e6d805 1163 0xDF, 0x10, 0x13, 0x24, 0x15, 0xE5, 0x4B, 0x92,
borlanic 0:fbdae7e6d805 1164 0xA1, 0x3E, 0xD0, 0xA8, 0x26, 0x7A, 0xE2, 0xF9,
borlanic 0:fbdae7e6d805 1165 0x75, 0xA3, 0x85, 0x74, 0x1A, 0xB9, 0xCE, 0xF8,
borlanic 0:fbdae7e6d805 1166 0x20, 0x31, 0x62, 0x3D, 0x55, 0xB1, 0xE4, 0x71 }
borlanic 0:fbdae7e6d805 1167 };
borlanic 0:fbdae7e6d805 1168 #endif /* MBEDTLS_CIPHER_MODE_CFB */
borlanic 0:fbdae7e6d805 1169
borlanic 0:fbdae7e6d805 1170 #if defined(MBEDTLS_CIPHER_MODE_CTR)
borlanic 0:fbdae7e6d805 1171 /*
borlanic 0:fbdae7e6d805 1172 * AES-CTR test vectors from:
borlanic 0:fbdae7e6d805 1173 *
borlanic 0:fbdae7e6d805 1174 * http://www.faqs.org/rfcs/rfc3686.html
borlanic 0:fbdae7e6d805 1175 */
borlanic 0:fbdae7e6d805 1176
borlanic 0:fbdae7e6d805 1177 static const unsigned char aes_test_ctr_key[3][16] =
borlanic 0:fbdae7e6d805 1178 {
borlanic 0:fbdae7e6d805 1179 { 0xAE, 0x68, 0x52, 0xF8, 0x12, 0x10, 0x67, 0xCC,
borlanic 0:fbdae7e6d805 1180 0x4B, 0xF7, 0xA5, 0x76, 0x55, 0x77, 0xF3, 0x9E },
borlanic 0:fbdae7e6d805 1181 { 0x7E, 0x24, 0x06, 0x78, 0x17, 0xFA, 0xE0, 0xD7,
borlanic 0:fbdae7e6d805 1182 0x43, 0xD6, 0xCE, 0x1F, 0x32, 0x53, 0x91, 0x63 },
borlanic 0:fbdae7e6d805 1183 { 0x76, 0x91, 0xBE, 0x03, 0x5E, 0x50, 0x20, 0xA8,
borlanic 0:fbdae7e6d805 1184 0xAC, 0x6E, 0x61, 0x85, 0x29, 0xF9, 0xA0, 0xDC }
borlanic 0:fbdae7e6d805 1185 };
borlanic 0:fbdae7e6d805 1186
borlanic 0:fbdae7e6d805 1187 static const unsigned char aes_test_ctr_nonce_counter[3][16] =
borlanic 0:fbdae7e6d805 1188 {
borlanic 0:fbdae7e6d805 1189 { 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x00,
borlanic 0:fbdae7e6d805 1190 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01 },
borlanic 0:fbdae7e6d805 1191 { 0x00, 0x6C, 0xB6, 0xDB, 0xC0, 0x54, 0x3B, 0x59,
borlanic 0:fbdae7e6d805 1192 0xDA, 0x48, 0xD9, 0x0B, 0x00, 0x00, 0x00, 0x01 },
borlanic 0:fbdae7e6d805 1193 { 0x00, 0xE0, 0x01, 0x7B, 0x27, 0x77, 0x7F, 0x3F,
borlanic 0:fbdae7e6d805 1194 0x4A, 0x17, 0x86, 0xF0, 0x00, 0x00, 0x00, 0x01 }
borlanic 0:fbdae7e6d805 1195 };
borlanic 0:fbdae7e6d805 1196
borlanic 0:fbdae7e6d805 1197 static const unsigned char aes_test_ctr_pt[3][48] =
borlanic 0:fbdae7e6d805 1198 {
borlanic 0:fbdae7e6d805 1199 { 0x53, 0x69, 0x6E, 0x67, 0x6C, 0x65, 0x20, 0x62,
borlanic 0:fbdae7e6d805 1200 0x6C, 0x6F, 0x63, 0x6B, 0x20, 0x6D, 0x73, 0x67 },
borlanic 0:fbdae7e6d805 1201
borlanic 0:fbdae7e6d805 1202 { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
borlanic 0:fbdae7e6d805 1203 0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
borlanic 0:fbdae7e6d805 1204 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
borlanic 0:fbdae7e6d805 1205 0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F },
borlanic 0:fbdae7e6d805 1206
borlanic 0:fbdae7e6d805 1207 { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
borlanic 0:fbdae7e6d805 1208 0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
borlanic 0:fbdae7e6d805 1209 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
borlanic 0:fbdae7e6d805 1210 0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F,
borlanic 0:fbdae7e6d805 1211 0x20, 0x21, 0x22, 0x23 }
borlanic 0:fbdae7e6d805 1212 };
borlanic 0:fbdae7e6d805 1213
borlanic 0:fbdae7e6d805 1214 static const unsigned char aes_test_ctr_ct[3][48] =
borlanic 0:fbdae7e6d805 1215 {
borlanic 0:fbdae7e6d805 1216 { 0xE4, 0x09, 0x5D, 0x4F, 0xB7, 0xA7, 0xB3, 0x79,
borlanic 0:fbdae7e6d805 1217 0x2D, 0x61, 0x75, 0xA3, 0x26, 0x13, 0x11, 0xB8 },
borlanic 0:fbdae7e6d805 1218 { 0x51, 0x04, 0xA1, 0x06, 0x16, 0x8A, 0x72, 0xD9,
borlanic 0:fbdae7e6d805 1219 0x79, 0x0D, 0x41, 0xEE, 0x8E, 0xDA, 0xD3, 0x88,
borlanic 0:fbdae7e6d805 1220 0xEB, 0x2E, 0x1E, 0xFC, 0x46, 0xDA, 0x57, 0xC8,
borlanic 0:fbdae7e6d805 1221 0xFC, 0xE6, 0x30, 0xDF, 0x91, 0x41, 0xBE, 0x28 },
borlanic 0:fbdae7e6d805 1222 { 0xC1, 0xCF, 0x48, 0xA8, 0x9F, 0x2F, 0xFD, 0xD9,
borlanic 0:fbdae7e6d805 1223 0xCF, 0x46, 0x52, 0xE9, 0xEF, 0xDB, 0x72, 0xD7,
borlanic 0:fbdae7e6d805 1224 0x45, 0x40, 0xA4, 0x2B, 0xDE, 0x6D, 0x78, 0x36,
borlanic 0:fbdae7e6d805 1225 0xD5, 0x9A, 0x5C, 0xEA, 0xAE, 0xF3, 0x10, 0x53,
borlanic 0:fbdae7e6d805 1226 0x25, 0xB2, 0x07, 0x2F }
borlanic 0:fbdae7e6d805 1227 };
borlanic 0:fbdae7e6d805 1228
borlanic 0:fbdae7e6d805 1229 static const int aes_test_ctr_len[3] =
borlanic 0:fbdae7e6d805 1230 { 16, 32, 36 };
borlanic 0:fbdae7e6d805 1231 #endif /* MBEDTLS_CIPHER_MODE_CTR */
borlanic 0:fbdae7e6d805 1232
borlanic 0:fbdae7e6d805 1233 /*
borlanic 0:fbdae7e6d805 1234 * Checkup routine
borlanic 0:fbdae7e6d805 1235 */
borlanic 0:fbdae7e6d805 1236 int mbedtls_aes_self_test( int verbose )
borlanic 0:fbdae7e6d805 1237 {
borlanic 0:fbdae7e6d805 1238 int ret = 0, i, j, u, mode;
borlanic 0:fbdae7e6d805 1239 unsigned int keybits;
borlanic 0:fbdae7e6d805 1240 unsigned char key[32];
borlanic 0:fbdae7e6d805 1241 unsigned char buf[64];
borlanic 0:fbdae7e6d805 1242 const unsigned char *aes_tests;
borlanic 0:fbdae7e6d805 1243 #if defined(MBEDTLS_CIPHER_MODE_CBC) || defined(MBEDTLS_CIPHER_MODE_CFB)
borlanic 0:fbdae7e6d805 1244 unsigned char iv[16];
borlanic 0:fbdae7e6d805 1245 #endif
borlanic 0:fbdae7e6d805 1246 #if defined(MBEDTLS_CIPHER_MODE_CBC)
borlanic 0:fbdae7e6d805 1247 unsigned char prv[16];
borlanic 0:fbdae7e6d805 1248 #endif
borlanic 0:fbdae7e6d805 1249 #if defined(MBEDTLS_CIPHER_MODE_CTR) || defined(MBEDTLS_CIPHER_MODE_CFB)
borlanic 0:fbdae7e6d805 1250 size_t offset;
borlanic 0:fbdae7e6d805 1251 #endif
borlanic 0:fbdae7e6d805 1252 #if defined(MBEDTLS_CIPHER_MODE_CTR)
borlanic 0:fbdae7e6d805 1253 int len;
borlanic 0:fbdae7e6d805 1254 unsigned char nonce_counter[16];
borlanic 0:fbdae7e6d805 1255 unsigned char stream_block[16];
borlanic 0:fbdae7e6d805 1256 #endif
borlanic 0:fbdae7e6d805 1257 mbedtls_aes_context ctx;
borlanic 0:fbdae7e6d805 1258
borlanic 0:fbdae7e6d805 1259 memset( key, 0, 32 );
borlanic 0:fbdae7e6d805 1260 mbedtls_aes_init( &ctx );
borlanic 0:fbdae7e6d805 1261
borlanic 0:fbdae7e6d805 1262 /*
borlanic 0:fbdae7e6d805 1263 * ECB mode
borlanic 0:fbdae7e6d805 1264 */
borlanic 0:fbdae7e6d805 1265 for( i = 0; i < 6; i++ )
borlanic 0:fbdae7e6d805 1266 {
borlanic 0:fbdae7e6d805 1267 u = i >> 1;
borlanic 0:fbdae7e6d805 1268 keybits = 128 + u * 64;
borlanic 0:fbdae7e6d805 1269 mode = i & 1;
borlanic 0:fbdae7e6d805 1270
borlanic 0:fbdae7e6d805 1271 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1272 mbedtls_printf( " AES-ECB-%3d (%s): ", keybits,
borlanic 0:fbdae7e6d805 1273 ( mode == MBEDTLS_AES_DECRYPT ) ? "dec" : "enc" );
borlanic 0:fbdae7e6d805 1274
borlanic 0:fbdae7e6d805 1275 memset( buf, 0, 16 );
borlanic 0:fbdae7e6d805 1276
borlanic 0:fbdae7e6d805 1277 if( mode == MBEDTLS_AES_DECRYPT )
borlanic 0:fbdae7e6d805 1278 {
borlanic 0:fbdae7e6d805 1279 ret = mbedtls_aes_setkey_dec( &ctx, key, keybits );
borlanic 0:fbdae7e6d805 1280 aes_tests = aes_test_ecb_dec[u];
borlanic 0:fbdae7e6d805 1281 }
borlanic 0:fbdae7e6d805 1282 else
borlanic 0:fbdae7e6d805 1283 {
borlanic 0:fbdae7e6d805 1284 ret = mbedtls_aes_setkey_enc( &ctx, key, keybits );
borlanic 0:fbdae7e6d805 1285 aes_tests = aes_test_ecb_enc[u];
borlanic 0:fbdae7e6d805 1286 }
borlanic 0:fbdae7e6d805 1287
borlanic 0:fbdae7e6d805 1288 /*
borlanic 0:fbdae7e6d805 1289 * AES-192 is an optional feature that may be unavailable when
borlanic 0:fbdae7e6d805 1290 * there is an alternative underlying implementation i.e. when
borlanic 0:fbdae7e6d805 1291 * MBEDTLS_AES_ALT is defined.
borlanic 0:fbdae7e6d805 1292 */
borlanic 0:fbdae7e6d805 1293 if( ret == MBEDTLS_ERR_AES_FEATURE_UNAVAILABLE && keybits == 192 )
borlanic 0:fbdae7e6d805 1294 {
borlanic 0:fbdae7e6d805 1295 mbedtls_printf( "skipped\n" );
borlanic 0:fbdae7e6d805 1296 continue;
borlanic 0:fbdae7e6d805 1297 }
borlanic 0:fbdae7e6d805 1298 else if( ret != 0 )
borlanic 0:fbdae7e6d805 1299 {
borlanic 0:fbdae7e6d805 1300 goto exit;
borlanic 0:fbdae7e6d805 1301 }
borlanic 0:fbdae7e6d805 1302
borlanic 0:fbdae7e6d805 1303 for( j = 0; j < 10000; j++ )
borlanic 0:fbdae7e6d805 1304 {
borlanic 0:fbdae7e6d805 1305 ret = mbedtls_aes_crypt_ecb( &ctx, mode, buf, buf );
borlanic 0:fbdae7e6d805 1306 if( ret != 0 )
borlanic 0:fbdae7e6d805 1307 goto exit;
borlanic 0:fbdae7e6d805 1308 }
borlanic 0:fbdae7e6d805 1309
borlanic 0:fbdae7e6d805 1310 if( memcmp( buf, aes_tests, 16 ) != 0 )
borlanic 0:fbdae7e6d805 1311 {
borlanic 0:fbdae7e6d805 1312 ret = 1;
borlanic 0:fbdae7e6d805 1313 goto exit;
borlanic 0:fbdae7e6d805 1314 }
borlanic 0:fbdae7e6d805 1315
borlanic 0:fbdae7e6d805 1316 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1317 mbedtls_printf( "passed\n" );
borlanic 0:fbdae7e6d805 1318 }
borlanic 0:fbdae7e6d805 1319
borlanic 0:fbdae7e6d805 1320 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1321 mbedtls_printf( "\n" );
borlanic 0:fbdae7e6d805 1322
borlanic 0:fbdae7e6d805 1323 #if defined(MBEDTLS_CIPHER_MODE_CBC)
borlanic 0:fbdae7e6d805 1324 /*
borlanic 0:fbdae7e6d805 1325 * CBC mode
borlanic 0:fbdae7e6d805 1326 */
borlanic 0:fbdae7e6d805 1327 for( i = 0; i < 6; i++ )
borlanic 0:fbdae7e6d805 1328 {
borlanic 0:fbdae7e6d805 1329 u = i >> 1;
borlanic 0:fbdae7e6d805 1330 keybits = 128 + u * 64;
borlanic 0:fbdae7e6d805 1331 mode = i & 1;
borlanic 0:fbdae7e6d805 1332
borlanic 0:fbdae7e6d805 1333 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1334 mbedtls_printf( " AES-CBC-%3d (%s): ", keybits,
borlanic 0:fbdae7e6d805 1335 ( mode == MBEDTLS_AES_DECRYPT ) ? "dec" : "enc" );
borlanic 0:fbdae7e6d805 1336
borlanic 0:fbdae7e6d805 1337 memset( iv , 0, 16 );
borlanic 0:fbdae7e6d805 1338 memset( prv, 0, 16 );
borlanic 0:fbdae7e6d805 1339 memset( buf, 0, 16 );
borlanic 0:fbdae7e6d805 1340
borlanic 0:fbdae7e6d805 1341 if( mode == MBEDTLS_AES_DECRYPT )
borlanic 0:fbdae7e6d805 1342 {
borlanic 0:fbdae7e6d805 1343 ret = mbedtls_aes_setkey_dec( &ctx, key, keybits );
borlanic 0:fbdae7e6d805 1344 aes_tests = aes_test_cbc_dec[u];
borlanic 0:fbdae7e6d805 1345 }
borlanic 0:fbdae7e6d805 1346 else
borlanic 0:fbdae7e6d805 1347 {
borlanic 0:fbdae7e6d805 1348 ret = mbedtls_aes_setkey_enc( &ctx, key, keybits );
borlanic 0:fbdae7e6d805 1349 aes_tests = aes_test_cbc_enc[u];
borlanic 0:fbdae7e6d805 1350 }
borlanic 0:fbdae7e6d805 1351
borlanic 0:fbdae7e6d805 1352 /*
borlanic 0:fbdae7e6d805 1353 * AES-192 is an optional feature that may be unavailable when
borlanic 0:fbdae7e6d805 1354 * there is an alternative underlying implementation i.e. when
borlanic 0:fbdae7e6d805 1355 * MBEDTLS_AES_ALT is defined.
borlanic 0:fbdae7e6d805 1356 */
borlanic 0:fbdae7e6d805 1357 if( ret == MBEDTLS_ERR_AES_FEATURE_UNAVAILABLE && keybits == 192 )
borlanic 0:fbdae7e6d805 1358 {
borlanic 0:fbdae7e6d805 1359 mbedtls_printf( "skipped\n" );
borlanic 0:fbdae7e6d805 1360 continue;
borlanic 0:fbdae7e6d805 1361 }
borlanic 0:fbdae7e6d805 1362 else if( ret != 0 )
borlanic 0:fbdae7e6d805 1363 {
borlanic 0:fbdae7e6d805 1364 goto exit;
borlanic 0:fbdae7e6d805 1365 }
borlanic 0:fbdae7e6d805 1366
borlanic 0:fbdae7e6d805 1367 for( j = 0; j < 10000; j++ )
borlanic 0:fbdae7e6d805 1368 {
borlanic 0:fbdae7e6d805 1369 if( mode == MBEDTLS_AES_ENCRYPT )
borlanic 0:fbdae7e6d805 1370 {
borlanic 0:fbdae7e6d805 1371 unsigned char tmp[16];
borlanic 0:fbdae7e6d805 1372
borlanic 0:fbdae7e6d805 1373 memcpy( tmp, prv, 16 );
borlanic 0:fbdae7e6d805 1374 memcpy( prv, buf, 16 );
borlanic 0:fbdae7e6d805 1375 memcpy( buf, tmp, 16 );
borlanic 0:fbdae7e6d805 1376 }
borlanic 0:fbdae7e6d805 1377
borlanic 0:fbdae7e6d805 1378 ret = mbedtls_aes_crypt_cbc( &ctx, mode, 16, iv, buf, buf );
borlanic 0:fbdae7e6d805 1379 if( ret != 0 )
borlanic 0:fbdae7e6d805 1380 goto exit;
borlanic 0:fbdae7e6d805 1381
borlanic 0:fbdae7e6d805 1382 }
borlanic 0:fbdae7e6d805 1383
borlanic 0:fbdae7e6d805 1384 if( memcmp( buf, aes_tests, 16 ) != 0 )
borlanic 0:fbdae7e6d805 1385 {
borlanic 0:fbdae7e6d805 1386 ret = 1;
borlanic 0:fbdae7e6d805 1387 goto exit;
borlanic 0:fbdae7e6d805 1388 }
borlanic 0:fbdae7e6d805 1389
borlanic 0:fbdae7e6d805 1390 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1391 mbedtls_printf( "passed\n" );
borlanic 0:fbdae7e6d805 1392 }
borlanic 0:fbdae7e6d805 1393
borlanic 0:fbdae7e6d805 1394 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1395 mbedtls_printf( "\n" );
borlanic 0:fbdae7e6d805 1396 #endif /* MBEDTLS_CIPHER_MODE_CBC */
borlanic 0:fbdae7e6d805 1397
borlanic 0:fbdae7e6d805 1398 #if defined(MBEDTLS_CIPHER_MODE_CFB)
borlanic 0:fbdae7e6d805 1399 /*
borlanic 0:fbdae7e6d805 1400 * CFB128 mode
borlanic 0:fbdae7e6d805 1401 */
borlanic 0:fbdae7e6d805 1402 for( i = 0; i < 6; i++ )
borlanic 0:fbdae7e6d805 1403 {
borlanic 0:fbdae7e6d805 1404 u = i >> 1;
borlanic 0:fbdae7e6d805 1405 keybits = 128 + u * 64;
borlanic 0:fbdae7e6d805 1406 mode = i & 1;
borlanic 0:fbdae7e6d805 1407
borlanic 0:fbdae7e6d805 1408 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1409 mbedtls_printf( " AES-CFB128-%3d (%s): ", keybits,
borlanic 0:fbdae7e6d805 1410 ( mode == MBEDTLS_AES_DECRYPT ) ? "dec" : "enc" );
borlanic 0:fbdae7e6d805 1411
borlanic 0:fbdae7e6d805 1412 memcpy( iv, aes_test_cfb128_iv, 16 );
borlanic 0:fbdae7e6d805 1413 memcpy( key, aes_test_cfb128_key[u], keybits / 8 );
borlanic 0:fbdae7e6d805 1414
borlanic 0:fbdae7e6d805 1415 offset = 0;
borlanic 0:fbdae7e6d805 1416 ret = mbedtls_aes_setkey_enc( &ctx, key, keybits );
borlanic 0:fbdae7e6d805 1417 /*
borlanic 0:fbdae7e6d805 1418 * AES-192 is an optional feature that may be unavailable when
borlanic 0:fbdae7e6d805 1419 * there is an alternative underlying implementation i.e. when
borlanic 0:fbdae7e6d805 1420 * MBEDTLS_AES_ALT is defined.
borlanic 0:fbdae7e6d805 1421 */
borlanic 0:fbdae7e6d805 1422 if( ret == MBEDTLS_ERR_AES_FEATURE_UNAVAILABLE && keybits == 192 )
borlanic 0:fbdae7e6d805 1423 {
borlanic 0:fbdae7e6d805 1424 mbedtls_printf( "skipped\n" );
borlanic 0:fbdae7e6d805 1425 continue;
borlanic 0:fbdae7e6d805 1426 }
borlanic 0:fbdae7e6d805 1427 else if( ret != 0 )
borlanic 0:fbdae7e6d805 1428 {
borlanic 0:fbdae7e6d805 1429 goto exit;
borlanic 0:fbdae7e6d805 1430 }
borlanic 0:fbdae7e6d805 1431
borlanic 0:fbdae7e6d805 1432 if( mode == MBEDTLS_AES_DECRYPT )
borlanic 0:fbdae7e6d805 1433 {
borlanic 0:fbdae7e6d805 1434 memcpy( buf, aes_test_cfb128_ct[u], 64 );
borlanic 0:fbdae7e6d805 1435 aes_tests = aes_test_cfb128_pt;
borlanic 0:fbdae7e6d805 1436 }
borlanic 0:fbdae7e6d805 1437 else
borlanic 0:fbdae7e6d805 1438 {
borlanic 0:fbdae7e6d805 1439 memcpy( buf, aes_test_cfb128_pt, 64 );
borlanic 0:fbdae7e6d805 1440 aes_tests = aes_test_cfb128_ct[u];
borlanic 0:fbdae7e6d805 1441 }
borlanic 0:fbdae7e6d805 1442
borlanic 0:fbdae7e6d805 1443 ret = mbedtls_aes_crypt_cfb128( &ctx, mode, 64, &offset, iv, buf, buf );
borlanic 0:fbdae7e6d805 1444 if( ret != 0 )
borlanic 0:fbdae7e6d805 1445 goto exit;
borlanic 0:fbdae7e6d805 1446
borlanic 0:fbdae7e6d805 1447 if( memcmp( buf, aes_tests, 64 ) != 0 )
borlanic 0:fbdae7e6d805 1448 {
borlanic 0:fbdae7e6d805 1449 ret = 1;
borlanic 0:fbdae7e6d805 1450 goto exit;
borlanic 0:fbdae7e6d805 1451 }
borlanic 0:fbdae7e6d805 1452
borlanic 0:fbdae7e6d805 1453 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1454 mbedtls_printf( "passed\n" );
borlanic 0:fbdae7e6d805 1455 }
borlanic 0:fbdae7e6d805 1456
borlanic 0:fbdae7e6d805 1457 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1458 mbedtls_printf( "\n" );
borlanic 0:fbdae7e6d805 1459 #endif /* MBEDTLS_CIPHER_MODE_CFB */
borlanic 0:fbdae7e6d805 1460
borlanic 0:fbdae7e6d805 1461 #if defined(MBEDTLS_CIPHER_MODE_CTR)
borlanic 0:fbdae7e6d805 1462 /*
borlanic 0:fbdae7e6d805 1463 * CTR mode
borlanic 0:fbdae7e6d805 1464 */
borlanic 0:fbdae7e6d805 1465 for( i = 0; i < 6; i++ )
borlanic 0:fbdae7e6d805 1466 {
borlanic 0:fbdae7e6d805 1467 u = i >> 1;
borlanic 0:fbdae7e6d805 1468 mode = i & 1;
borlanic 0:fbdae7e6d805 1469
borlanic 0:fbdae7e6d805 1470 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1471 mbedtls_printf( " AES-CTR-128 (%s): ",
borlanic 0:fbdae7e6d805 1472 ( mode == MBEDTLS_AES_DECRYPT ) ? "dec" : "enc" );
borlanic 0:fbdae7e6d805 1473
borlanic 0:fbdae7e6d805 1474 memcpy( nonce_counter, aes_test_ctr_nonce_counter[u], 16 );
borlanic 0:fbdae7e6d805 1475 memcpy( key, aes_test_ctr_key[u], 16 );
borlanic 0:fbdae7e6d805 1476
borlanic 0:fbdae7e6d805 1477 offset = 0;
borlanic 0:fbdae7e6d805 1478 if( ( ret = mbedtls_aes_setkey_enc( &ctx, key, 128 ) ) != 0 )
borlanic 0:fbdae7e6d805 1479 goto exit;
borlanic 0:fbdae7e6d805 1480
borlanic 0:fbdae7e6d805 1481 len = aes_test_ctr_len[u];
borlanic 0:fbdae7e6d805 1482
borlanic 0:fbdae7e6d805 1483 if( mode == MBEDTLS_AES_DECRYPT )
borlanic 0:fbdae7e6d805 1484 {
borlanic 0:fbdae7e6d805 1485 memcpy( buf, aes_test_ctr_ct[u], len );
borlanic 0:fbdae7e6d805 1486 aes_tests = aes_test_ctr_pt[u];
borlanic 0:fbdae7e6d805 1487 }
borlanic 0:fbdae7e6d805 1488 else
borlanic 0:fbdae7e6d805 1489 {
borlanic 0:fbdae7e6d805 1490 memcpy( buf, aes_test_ctr_pt[u], len );
borlanic 0:fbdae7e6d805 1491 aes_tests = aes_test_ctr_ct[u];
borlanic 0:fbdae7e6d805 1492 }
borlanic 0:fbdae7e6d805 1493
borlanic 0:fbdae7e6d805 1494 ret = mbedtls_aes_crypt_ctr( &ctx, len, &offset, nonce_counter,
borlanic 0:fbdae7e6d805 1495 stream_block, buf, buf );
borlanic 0:fbdae7e6d805 1496 if( ret != 0 )
borlanic 0:fbdae7e6d805 1497 goto exit;
borlanic 0:fbdae7e6d805 1498
borlanic 0:fbdae7e6d805 1499 if( memcmp( buf, aes_tests, len ) != 0 )
borlanic 0:fbdae7e6d805 1500 {
borlanic 0:fbdae7e6d805 1501 ret = 1;
borlanic 0:fbdae7e6d805 1502 goto exit;
borlanic 0:fbdae7e6d805 1503 }
borlanic 0:fbdae7e6d805 1504
borlanic 0:fbdae7e6d805 1505 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1506 mbedtls_printf( "passed\n" );
borlanic 0:fbdae7e6d805 1507 }
borlanic 0:fbdae7e6d805 1508
borlanic 0:fbdae7e6d805 1509 if( verbose != 0 )
borlanic 0:fbdae7e6d805 1510 mbedtls_printf( "\n" );
borlanic 0:fbdae7e6d805 1511 #endif /* MBEDTLS_CIPHER_MODE_CTR */
borlanic 0:fbdae7e6d805 1512
borlanic 0:fbdae7e6d805 1513 ret = 0;
borlanic 0:fbdae7e6d805 1514
borlanic 0:fbdae7e6d805 1515 exit:
borlanic 0:fbdae7e6d805 1516 if( ret != 0 && verbose != 0 )
borlanic 0:fbdae7e6d805 1517 mbedtls_printf( "failed\n" );
borlanic 0:fbdae7e6d805 1518
borlanic 0:fbdae7e6d805 1519 mbedtls_aes_free( &ctx );
borlanic 0:fbdae7e6d805 1520
borlanic 0:fbdae7e6d805 1521 return( ret );
borlanic 0:fbdae7e6d805 1522 }
borlanic 0:fbdae7e6d805 1523
borlanic 0:fbdae7e6d805 1524 #endif /* MBEDTLS_SELF_TEST */
borlanic 0:fbdae7e6d805 1525
borlanic 0:fbdae7e6d805 1526 #endif /* MBEDTLS_AES_C */