| OLD | NEW |
| (Empty) |
| 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 | |
| 58 static const unsigned char default_iv[] = { | |
| 59 0xA6, 0xA6, 0xA6, 0xA6, 0xA6, 0xA6, 0xA6, 0xA6, | |
| 60 }; | |
| 61 | |
| 62 int 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 | |
| 99 int 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 | |
| 143 int 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 | |
| 185 int main(int argc, char **argv) | |
| 186 { | |
| 187 | |
| 188 static 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 | |
| 195 static 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 | |
| 202 static 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 | |
| 208 static 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 | |
| 214 static 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 | |
| 220 static 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 | |
| 227 static 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 | |
| 234 static 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 | |
| OLD | NEW |