1/* crypto/aes/aes_wrap.c */ 2/* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL 3 * project. 4 */ 5/* ==================================================================== 6 * Copyright (c) 2008 The OpenSSL Project. All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in 17 * the documentation and/or other materials provided with the 18 * distribution. 19 * 20 * 3. All advertising materials mentioning features or use of this 21 * software must display the following acknowledgment: 22 * "This product includes software developed by the OpenSSL Project 23 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" 24 * 25 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to 26 * endorse or promote products derived from this software without 27 * prior written permission. For written permission, please contact 28 * licensing@OpenSSL.org. 29 * 30 * 5. Products derived from this software may not be called "OpenSSL" 31 * nor may "OpenSSL" appear in their names without prior written 32 * permission of the OpenSSL Project. 33 * 34 * 6. Redistributions of any form whatsoever must retain the following 35 * acknowledgment: 36 * "This product includes software developed by the OpenSSL Project 37 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" 38 * 39 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY 40 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 41 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 42 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR 43 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 44 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 45 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 46 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 48 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 49 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED 50 * OF THE POSSIBILITY OF SUCH DAMAGE. 51 * ==================================================================== 52 */ 53 54#include "cryptlib.h" 55#include <openssl/aes.h> 56#include <openssl/bio.h> 57 58static const unsigned char default_iv[] = { 59 0xA6, 0xA6, 0xA6, 0xA6, 0xA6, 0xA6, 0xA6, 0xA6, 60}; 61 62int AES_wrap_key(AES_KEY *key, const unsigned char *iv, 63 unsigned char *out, 64 const unsigned char *in, unsigned int inlen) 65 { 66 unsigned char *A, B[16], *R; 67 unsigned int i, j, t; 68 if ((inlen & 0x7) || (inlen < 8)) 69 return -1; 70 A = B; 71 t = 1; 72 memcpy(out + 8, in, inlen); 73 if (!iv) 74 iv = default_iv; 75 76 memcpy(A, iv, 8); 77 78 for (j = 0; j < 6; j++) 79 { 80 R = out + 8; 81 for (i = 0; i < inlen; i += 8, t++, R += 8) 82 { 83 memcpy(B + 8, R, 8); 84 AES_encrypt(B, B, key); 85 A[7] ^= (unsigned char)(t & 0xff); 86 if (t > 0xff) 87 { 88 A[6] ^= (unsigned char)((t >> 8) & 0xff); 89 A[5] ^= (unsigned char)((t >> 16) & 0xff); 90 A[4] ^= (unsigned char)((t >> 24) & 0xff); 91 } 92 memcpy(R, B + 8, 8); 93 } 94 } 95 memcpy(out, A, 8); 96 return inlen + 8; 97 } 98 99int AES_unwrap_key(AES_KEY *key, const unsigned char *iv, 100 unsigned char *out, 101 const unsigned char *in, unsigned int inlen) 102 { 103 unsigned char *A, B[16], *R; 104 unsigned int i, j, t; 105 inlen -= 8; 106 if (inlen & 0x7) 107 return -1; 108 if (inlen < 8) 109 return -1; 110 A = B; 111 t = 6 * (inlen >> 3); 112 memcpy(A, in, 8); 113 memcpy(out, in + 8, inlen); 114 for (j = 0; j < 6; j++) 115 { 116 R = out + inlen - 8; 117 for (i = 0; i < inlen; i += 8, t--, R -= 8) 118 { 119 A[7] ^= (unsigned char)(t & 0xff); 120 if (t > 0xff) 121 { 122 A[6] ^= (unsigned char)((t >> 8) & 0xff); 123 A[5] ^= (unsigned char)((t >> 16) & 0xff); 124 A[4] ^= (unsigned char)((t >> 24) & 0xff); 125 } 126 memcpy(B + 8, R, 8); 127 AES_decrypt(B, B, key); 128 memcpy(R, B + 8, 8); 129 } 130 } 131 if (!iv) 132 iv = default_iv; 133 if (memcmp(A, iv, 8)) 134 { 135 OPENSSL_cleanse(out, inlen); 136 return 0; 137 } 138 return inlen; 139 } 140 141#ifdef AES_WRAP_TEST 142 143int AES_wrap_unwrap_test(const unsigned char *kek, int keybits, 144 const unsigned char *iv, 145 const unsigned char *eout, 146 const unsigned char *key, int keylen) 147 { 148 unsigned char *otmp = NULL, *ptmp = NULL; 149 int r, ret = 0; 150 AES_KEY wctx; 151 otmp = OPENSSL_malloc(keylen + 8); 152 ptmp = OPENSSL_malloc(keylen); 153 if (!otmp || !ptmp) 154 return 0; 155 if (AES_set_encrypt_key(kek, keybits, &wctx)) 156 goto err; 157 r = AES_wrap_key(&wctx, iv, otmp, key, keylen); 158 if (r <= 0) 159 goto err; 160 161 if (eout && memcmp(eout, otmp, keylen)) 162 goto err; 163 164 if (AES_set_decrypt_key(kek, keybits, &wctx)) 165 goto err; 166 r = AES_unwrap_key(&wctx, iv, ptmp, otmp, r); 167 168 if (memcmp(key, ptmp, keylen)) 169 goto err; 170 171 ret = 1; 172 173 err: 174 if (otmp) 175 OPENSSL_free(otmp); 176 if (ptmp) 177 OPENSSL_free(ptmp); 178 179 return ret; 180 181 } 182 183 184 185int main(int argc, char **argv) 186{ 187 188static const unsigned char kek[] = { 189 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 190 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 191 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 192 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f 193}; 194 195static const unsigned char key[] = { 196 0x00, 0x11, 0x22, 0x33, 0x44, 0x55, 0x66, 0x77, 197 0x88, 0x99, 0xaa, 0xbb, 0xcc, 0xdd, 0xee, 0xff, 198 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 199 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f 200}; 201 202static const unsigned char e1[] = { 203 0x1f, 0xa6, 0x8b, 0x0a, 0x81, 0x12, 0xb4, 0x47, 204 0xae, 0xf3, 0x4b, 0xd8, 0xfb, 0x5a, 0x7b, 0x82, 205 0x9d, 0x3e, 0x86, 0x23, 0x71, 0xd2, 0xcf, 0xe5 206}; 207 208static const unsigned char e2[] = { 209 0x96, 0x77, 0x8b, 0x25, 0xae, 0x6c, 0xa4, 0x35, 210 0xf9, 0x2b, 0x5b, 0x97, 0xc0, 0x50, 0xae, 0xd2, 211 0x46, 0x8a, 0xb8, 0xa1, 0x7a, 0xd8, 0x4e, 0x5d 212}; 213 214static const unsigned char e3[] = { 215 0x64, 0xe8, 0xc3, 0xf9, 0xce, 0x0f, 0x5b, 0xa2, 216 0x63, 0xe9, 0x77, 0x79, 0x05, 0x81, 0x8a, 0x2a, 217 0x93, 0xc8, 0x19, 0x1e, 0x7d, 0x6e, 0x8a, 0xe7 218}; 219 220static const unsigned char e4[] = { 221 0x03, 0x1d, 0x33, 0x26, 0x4e, 0x15, 0xd3, 0x32, 222 0x68, 0xf2, 0x4e, 0xc2, 0x60, 0x74, 0x3e, 0xdc, 223 0xe1, 0xc6, 0xc7, 0xdd, 0xee, 0x72, 0x5a, 0x93, 224 0x6b, 0xa8, 0x14, 0x91, 0x5c, 0x67, 0x62, 0xd2 225}; 226 227static const unsigned char e5[] = { 228 0xa8, 0xf9, 0xbc, 0x16, 0x12, 0xc6, 0x8b, 0x3f, 229 0xf6, 0xe6, 0xf4, 0xfb, 0xe3, 0x0e, 0x71, 0xe4, 230 0x76, 0x9c, 0x8b, 0x80, 0xa3, 0x2c, 0xb8, 0x95, 231 0x8c, 0xd5, 0xd1, 0x7d, 0x6b, 0x25, 0x4d, 0xa1 232}; 233 234static const unsigned char e6[] = { 235 0x28, 0xc9, 0xf4, 0x04, 0xc4, 0xb8, 0x10, 0xf4, 236 0xcb, 0xcc, 0xb3, 0x5c, 0xfb, 0x87, 0xf8, 0x26, 237 0x3f, 0x57, 0x86, 0xe2, 0xd8, 0x0e, 0xd3, 0x26, 238 0xcb, 0xc7, 0xf0, 0xe7, 0x1a, 0x99, 0xf4, 0x3b, 239 0xfb, 0x98, 0x8b, 0x9b, 0x7a, 0x02, 0xdd, 0x21 240}; 241 242 AES_KEY wctx, xctx; 243 int ret; 244 ret = AES_wrap_unwrap_test(kek, 128, NULL, e1, key, 16); 245 fprintf(stderr, "Key test result %d\n", ret); 246 ret = AES_wrap_unwrap_test(kek, 192, NULL, e2, key, 16); 247 fprintf(stderr, "Key test result %d\n", ret); 248 ret = AES_wrap_unwrap_test(kek, 256, NULL, e3, key, 16); 249 fprintf(stderr, "Key test result %d\n", ret); 250 ret = AES_wrap_unwrap_test(kek, 192, NULL, e4, key, 24); 251 fprintf(stderr, "Key test result %d\n", ret); 252 ret = AES_wrap_unwrap_test(kek, 256, NULL, e5, key, 24); 253 fprintf(stderr, "Key test result %d\n", ret); 254 ret = AES_wrap_unwrap_test(kek, 256, NULL, e6, key, 32); 255 fprintf(stderr, "Key test result %d\n", ret); 256} 257 258 259#endif 260