Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1. /*
  2.  *  Camellia implementation
  3.  *
  4.  *  Copyright (C) 2006-2015, ARM Limited, All Rights Reserved
  5.  *  SPDX-License-Identifier: GPL-2.0
  6.  *
  7.  *  This program is free software; you can redistribute it and/or modify
  8.  *  it under the terms of the GNU General Public License as published by
  9.  *  the Free Software Foundation; either version 2 of the License, or
  10.  *  (at your option) any later version.
  11.  *
  12.  *  This program is distributed in the hope that it will be useful,
  13.  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14.  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15.  *  GNU General Public License for more details.
  16.  *
  17.  *  You should have received a copy of the GNU General Public License along
  18.  *  with this program; if not, write to the Free Software Foundation, Inc.,
  19.  *  51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  20.  *
  21.  *  This file is part of mbed TLS (https://tls.mbed.org)
  22.  */
  23. /*
  24.  *  The Camellia block cipher was designed by NTT and Mitsubishi Electric
  25.  *  Corporation.
  26.  *
  27.  *  http://info.isl.ntt.co.jp/crypt/eng/camellia/dl/01espec.pdf
  28.  */
  29.  
  30. #if !defined(MBEDTLS_CONFIG_FILE)
  31. #include "mbedtls/config.h"
  32. #else
  33. #include MBEDTLS_CONFIG_FILE
  34. #endif
  35.  
  36. #if defined(MBEDTLS_CAMELLIA_C)
  37.  
  38. #include "mbedtls/camellia.h"
  39. #include "mbedtls/platform_util.h"
  40.  
  41. #include <string.h>
  42.  
  43. #if defined(MBEDTLS_SELF_TEST)
  44. #if defined(MBEDTLS_PLATFORM_C)
  45. #include "mbedtls/platform.h"
  46. #else
  47. #include <stdio.h>
  48. #define mbedtls_printf printf
  49. #endif /* MBEDTLS_PLATFORM_C */
  50. #endif /* MBEDTLS_SELF_TEST */
  51.  
  52. #if !defined(MBEDTLS_CAMELLIA_ALT)
  53.  
  54. /* Parameter validation macros */
  55. #define CAMELLIA_VALIDATE_RET( cond )                                       \
  56.     MBEDTLS_INTERNAL_VALIDATE_RET( cond, MBEDTLS_ERR_CAMELLIA_BAD_INPUT_DATA )
  57. #define CAMELLIA_VALIDATE( cond )                                           \
  58.     MBEDTLS_INTERNAL_VALIDATE( cond )
  59.  
  60. /*
  61.  * 32-bit integer manipulation macros (big endian)
  62.  */
  63. #ifndef GET_UINT32_BE
  64. #define GET_UINT32_BE(n,b,i)                            \
  65. {                                                       \
  66.     (n) = ( (uint32_t) (b)[(i)    ] << 24 )             \
  67.         | ( (uint32_t) (b)[(i) + 1] << 16 )             \
  68.         | ( (uint32_t) (b)[(i) + 2] <<  8 )             \
  69.         | ( (uint32_t) (b)[(i) + 3]       );            \
  70. }
  71. #endif
  72.  
  73. #ifndef PUT_UINT32_BE
  74. #define PUT_UINT32_BE(n,b,i)                            \
  75. {                                                       \
  76.     (b)[(i)    ] = (unsigned char) ( (n) >> 24 );       \
  77.     (b)[(i) + 1] = (unsigned char) ( (n) >> 16 );       \
  78.     (b)[(i) + 2] = (unsigned char) ( (n) >>  8 );       \
  79.     (b)[(i) + 3] = (unsigned char) ( (n)       );       \
  80. }
  81. #endif
  82.  
  83. static const unsigned char SIGMA_CHARS[6][8] =
  84. {
  85.     { 0xa0, 0x9e, 0x66, 0x7f, 0x3b, 0xcc, 0x90, 0x8b },
  86.     { 0xb6, 0x7a, 0xe8, 0x58, 0x4c, 0xaa, 0x73, 0xb2 },
  87.     { 0xc6, 0xef, 0x37, 0x2f, 0xe9, 0x4f, 0x82, 0xbe },
  88.     { 0x54, 0xff, 0x53, 0xa5, 0xf1, 0xd3, 0x6f, 0x1c },
  89.     { 0x10, 0xe5, 0x27, 0xfa, 0xde, 0x68, 0x2d, 0x1d },
  90.     { 0xb0, 0x56, 0x88, 0xc2, 0xb3, 0xe6, 0xc1, 0xfd }
  91. };
  92.  
  93. #if defined(MBEDTLS_CAMELLIA_SMALL_MEMORY)
  94.  
  95. static const unsigned char FSb[256] =
  96. {
  97.     112,130, 44,236,179, 39,192,229,228,133, 87, 53,234, 12,174, 65,
  98.      35,239,107,147, 69, 25,165, 33,237, 14, 79, 78, 29,101,146,189,
  99.     134,184,175,143,124,235, 31,206, 62, 48,220, 95, 94,197, 11, 26,
  100.     166,225, 57,202,213, 71, 93, 61,217,  1, 90,214, 81, 86,108, 77,
  101.     139, 13,154,102,251,204,176, 45,116, 18, 43, 32,240,177,132,153,
  102.     223, 76,203,194, 52,126,118,  5,109,183,169, 49,209, 23,  4,215,
  103.      20, 88, 58, 97,222, 27, 17, 28, 50, 15,156, 22, 83, 24,242, 34,
  104.     254, 68,207,178,195,181,122,145, 36,  8,232,168, 96,252,105, 80,
  105.     170,208,160,125,161,137, 98,151, 84, 91, 30,149,224,255,100,210,
  106.      16,196,  0, 72,163,247,117,219,138,  3,230,218,  9, 63,221,148,
  107.     135, 92,131,  2,205, 74,144, 51,115,103,246,243,157,127,191,226,
  108.      82,155,216, 38,200, 55,198, 59,129,150,111, 75, 19,190, 99, 46,
  109.     233,121,167,140,159,110,188,142, 41,245,249,182, 47,253,180, 89,
  110.     120,152,  6,106,231, 70,113,186,212, 37,171, 66,136,162,141,250,
  111.     114,  7,185, 85,248,238,172, 10, 54, 73, 42,104, 60, 56,241,164,
  112.      64, 40,211,123,187,201, 67,193, 21,227,173,244,119,199,128,158
  113. };
  114.  
  115. #define SBOX1(n) FSb[(n)]
  116. #define SBOX2(n) (unsigned char)((FSb[(n)] >> 7 ^ FSb[(n)] << 1) & 0xff)
  117. #define SBOX3(n) (unsigned char)((FSb[(n)] >> 1 ^ FSb[(n)] << 7) & 0xff)
  118. #define SBOX4(n) FSb[((n) << 1 ^ (n) >> 7) &0xff]
  119.  
  120. #else /* MBEDTLS_CAMELLIA_SMALL_MEMORY */
  121.  
  122. static const unsigned char FSb[256] =
  123. {
  124.  112, 130,  44, 236, 179,  39, 192, 229, 228, 133,  87,  53, 234,  12, 174,  65,
  125.   35, 239, 107, 147,  69,  25, 165,  33, 237,  14,  79,  78,  29, 101, 146, 189,
  126.  134, 184, 175, 143, 124, 235,  31, 206,  62,  48, 220,  95,  94, 197,  11,  26,
  127.  166, 225,  57, 202, 213,  71,  93,  61, 217,   1,  90, 214,  81,  86, 108,  77,
  128.  139,  13, 154, 102, 251, 204, 176,  45, 116,  18,  43,  32, 240, 177, 132, 153,
  129.  223,  76, 203, 194,  52, 126, 118,   5, 109, 183, 169,  49, 209,  23,   4, 215,
  130.   20,  88,  58,  97, 222,  27,  17,  28,  50,  15, 156,  22,  83,  24, 242,  34,
  131.  254,  68, 207, 178, 195, 181, 122, 145,  36,   8, 232, 168,  96, 252, 105,  80,
  132.  170, 208, 160, 125, 161, 137,  98, 151,  84,  91,  30, 149, 224, 255, 100, 210,
  133.   16, 196,   0,  72, 163, 247, 117, 219, 138,   3, 230, 218,   9,  63, 221, 148,
  134.  135,  92, 131,   2, 205,  74, 144,  51, 115, 103, 246, 243, 157, 127, 191, 226,
  135.   82, 155, 216,  38, 200,  55, 198,  59, 129, 150, 111,  75,  19, 190,  99,  46,
  136.  233, 121, 167, 140, 159, 110, 188, 142,  41, 245, 249, 182,  47, 253, 180,  89,
  137.  120, 152,   6, 106, 231,  70, 113, 186, 212,  37, 171,  66, 136, 162, 141, 250,
  138.  114,   7, 185,  85, 248, 238, 172,  10,  54,  73,  42, 104,  60,  56, 241, 164,
  139.  64,  40, 211, 123, 187, 201,  67, 193,  21, 227, 173, 244, 119, 199, 128, 158
  140. };
  141.  
  142. static const unsigned char FSb2[256] =
  143. {
  144.  224,   5,  88, 217, 103,  78, 129, 203, 201,  11, 174, 106, 213,  24,  93, 130,
  145.   70, 223, 214,  39, 138,  50,  75,  66, 219,  28, 158, 156,  58, 202,  37, 123,
  146.   13, 113,  95,  31, 248, 215,  62, 157, 124,  96, 185, 190, 188, 139,  22,  52,
  147.   77, 195, 114, 149, 171, 142, 186, 122, 179,   2, 180, 173, 162, 172, 216, 154,
  148.   23,  26,  53, 204, 247, 153,  97,  90, 232,  36,  86,  64, 225,  99,   9,  51,
  149.  191, 152, 151, 133, 104, 252, 236,  10, 218, 111,  83,  98, 163,  46,   8, 175,
  150.   40, 176, 116, 194, 189,  54,  34,  56, 100,  30,  57,  44, 166,  48, 229,  68,
  151.  253, 136, 159, 101, 135, 107, 244,  35,  72,  16, 209,  81, 192, 249, 210, 160,
  152.   85, 161,  65, 250,  67,  19, 196,  47, 168, 182,  60,  43, 193, 255, 200, 165,
  153.   32, 137,   0, 144,  71, 239, 234, 183,  21,   6, 205, 181,  18, 126, 187,  41,
  154.   15, 184,   7,   4, 155, 148,  33, 102, 230, 206, 237, 231,  59, 254, 127, 197,
  155.  164,  55, 177,  76, 145, 110, 141, 118,   3,  45, 222, 150,  38, 125, 198,  92,
  156.  211, 242,  79,  25,  63, 220, 121,  29,  82, 235, 243, 109,  94, 251, 105, 178,
  157.  240,  49,  12, 212, 207, 140, 226, 117, 169,  74,  87, 132,  17,  69,  27, 245,
  158.  228,  14, 115, 170, 241, 221,  89,  20, 108, 146,  84, 208, 120, 112, 227,  73,
  159.  128,  80, 167, 246, 119, 147, 134, 131,  42, 199,  91, 233, 238, 143,   1,  61
  160. };
  161.  
  162. static const unsigned char FSb3[256] =
  163. {
  164.   56,  65,  22, 118, 217, 147,  96, 242, 114, 194, 171, 154, 117,   6,  87, 160,
  165.  145, 247, 181, 201, 162, 140, 210, 144, 246,   7, 167,  39, 142, 178,  73, 222,
  166.   67,  92, 215, 199,  62, 245, 143, 103,  31,  24, 110, 175,  47, 226, 133,  13,
  167.   83, 240, 156, 101, 234, 163, 174, 158, 236, 128,  45, 107, 168,  43,  54, 166,
  168.  197, 134,  77,  51, 253, 102,  88, 150,  58,   9, 149,  16, 120, 216,  66, 204,
  169.  239,  38, 229,  97,  26,  63,  59, 130, 182, 219, 212, 152, 232, 139,   2, 235,
  170.   10,  44,  29, 176, 111, 141, 136,  14,  25, 135,  78,  11, 169,  12, 121,  17,
  171.  127,  34, 231,  89, 225, 218,  61, 200,  18,   4, 116,  84,  48, 126, 180,  40,
  172.   85, 104,  80, 190, 208, 196,  49, 203,  42, 173,  15, 202, 112, 255,  50, 105,
  173.    8,  98,   0,  36, 209, 251, 186, 237,  69, 129, 115, 109, 132, 159, 238,  74,
  174.  195,  46, 193,   1, 230,  37,  72, 153, 185, 179, 123, 249, 206, 191, 223, 113,
  175.   41, 205, 108,  19, 100, 155,  99, 157, 192,  75, 183, 165, 137,  95, 177,  23,
  176.  244, 188, 211,  70, 207,  55,  94,  71, 148, 250, 252,  91, 151, 254,  90, 172,
  177.   60,  76,   3,  53, 243,  35, 184,  93, 106, 146, 213,  33,  68,  81, 198, 125,
  178.   57, 131, 220, 170, 124, 119,  86,   5,  27, 164,  21,  52,  30,  28, 248,  82,
  179.   32,  20, 233, 189, 221, 228, 161, 224, 138, 241, 214, 122, 187, 227,  64,  79
  180. };
  181.  
  182. static const unsigned char FSb4[256] =
  183. {
  184.  112,  44, 179, 192, 228,  87, 234, 174,  35, 107,  69, 165, 237,  79,  29, 146,
  185.  134, 175, 124,  31,  62, 220,  94,  11, 166,  57, 213,  93, 217,  90,  81, 108,
  186.  139, 154, 251, 176, 116,  43, 240, 132, 223, 203,  52, 118, 109, 169, 209,   4,
  187.   20,  58, 222,  17,  50, 156,  83, 242, 254, 207, 195, 122,  36, 232,  96, 105,
  188.  170, 160, 161,  98,  84,  30, 224, 100,  16,   0, 163, 117, 138, 230,   9, 221,
  189.  135, 131, 205, 144, 115, 246, 157, 191,  82, 216, 200, 198, 129, 111,  19,  99,
  190.  233, 167, 159, 188,  41, 249,  47, 180, 120,   6, 231, 113, 212, 171, 136, 141,
  191.  114, 185, 248, 172,  54,  42,  60, 241,  64, 211, 187,  67,  21, 173, 119, 128,
  192.  130, 236,  39, 229, 133,  53,  12,  65, 239, 147,  25,  33,  14,  78, 101, 189,
  193.  184, 143, 235, 206,  48,  95, 197,  26, 225, 202,  71,  61,   1, 214,  86,  77,
  194.   13, 102, 204,  45,  18,  32, 177, 153,  76, 194, 126,   5, 183,  49,  23, 215,
  195.   88,  97,  27,  28,  15,  22,  24,  34,  68, 178, 181, 145,   8, 168, 252,  80,
  196.  208, 125, 137, 151,  91, 149, 255, 210, 196,  72, 247, 219,   3, 218,  63, 148,
  197.   92,   2,  74,  51, 103, 243, 127, 226, 155,  38,  55,  59, 150,  75, 190,  46,
  198.  121, 140, 110, 142, 245, 182, 253,  89, 152, 106,  70, 186,  37,  66, 162, 250,
  199.   7,  85, 238,  10,  73, 104,  56, 164,  40, 123, 201, 193, 227, 244, 199, 158
  200. };
  201.  
  202. #define SBOX1(n) FSb[(n)]
  203. #define SBOX2(n) FSb2[(n)]
  204. #define SBOX3(n) FSb3[(n)]
  205. #define SBOX4(n) FSb4[(n)]
  206.  
  207. #endif /* MBEDTLS_CAMELLIA_SMALL_MEMORY */
  208.  
  209. static const unsigned char shifts[2][4][4] =
  210. {
  211.     {
  212.         { 1, 1, 1, 1 }, /* KL */
  213.         { 0, 0, 0, 0 }, /* KR */
  214.         { 1, 1, 1, 1 }, /* KA */
  215.         { 0, 0, 0, 0 }  /* KB */
  216.     },
  217.     {
  218.         { 1, 0, 1, 1 }, /* KL */
  219.         { 1, 1, 0, 1 }, /* KR */
  220.         { 1, 1, 1, 0 }, /* KA */
  221.         { 1, 1, 0, 1 }  /* KB */
  222.     }
  223. };
  224.  
  225. static const signed char indexes[2][4][20] =
  226. {
  227.     {
  228.         {  0,  1,  2,  3,  8,  9, 10, 11, 38, 39,
  229.           36, 37, 23, 20, 21, 22, 27, -1, -1, 26 }, /* KL -> RK */
  230.         { -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
  231.           -1, -1, -1, -1, -1, -1, -1, -1, -1, -1 }, /* KR -> RK */
  232.         {  4,  5,  6,  7, 12, 13, 14, 15, 16, 17,
  233.           18, 19, -1, 24, 25, -1, 31, 28, 29, 30 }, /* KA -> RK */
  234.         { -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
  235.           -1, -1, -1, -1, -1, -1, -1, -1, -1, -1 }  /* KB -> RK */
  236.     },
  237.     {
  238.         {  0,  1,  2,  3, 61, 62, 63, 60, -1, -1,
  239.           -1, -1, 27, 24, 25, 26, 35, 32, 33, 34 }, /* KL -> RK */
  240.         { -1, -1, -1, -1,  8,  9, 10, 11, 16, 17,
  241.           18, 19, -1, -1, -1, -1, 39, 36, 37, 38 }, /* KR -> RK */
  242.         { -1, -1, -1, -1, 12, 13, 14, 15, 58, 59,
  243.           56, 57, 31, 28, 29, 30, -1, -1, -1, -1 }, /* KA -> RK */
  244.         {  4,  5,  6,  7, 65, 66, 67, 64, 20, 21,
  245.           22, 23, -1, -1, -1, -1, 43, 40, 41, 42 }  /* KB -> RK */
  246.     }
  247. };
  248.  
  249. static const signed char transposes[2][20] =
  250. {
  251.     {
  252.         21, 22, 23, 20,
  253.         -1, -1, -1, -1,
  254.         18, 19, 16, 17,
  255.         11,  8,  9, 10,
  256.         15, 12, 13, 14
  257.     },
  258.     {
  259.         25, 26, 27, 24,
  260.         29, 30, 31, 28,
  261.         18, 19, 16, 17,
  262.         -1, -1, -1, -1,
  263.         -1, -1, -1, -1
  264.     }
  265. };
  266.  
  267. /* Shift macro for 128 bit strings with rotation smaller than 32 bits (!) */
  268. #define ROTL(DEST, SRC, SHIFT)                                      \
  269. {                                                                   \
  270.     (DEST)[0] = (SRC)[0] << (SHIFT) ^ (SRC)[1] >> (32 - (SHIFT));   \
  271.     (DEST)[1] = (SRC)[1] << (SHIFT) ^ (SRC)[2] >> (32 - (SHIFT));   \
  272.     (DEST)[2] = (SRC)[2] << (SHIFT) ^ (SRC)[3] >> (32 - (SHIFT));   \
  273.     (DEST)[3] = (SRC)[3] << (SHIFT) ^ (SRC)[0] >> (32 - (SHIFT));   \
  274. }
  275.  
  276. #define FL(XL, XR, KL, KR)                                          \
  277. {                                                                   \
  278.     (XR) = ((((XL) & (KL)) << 1) | (((XL) & (KL)) >> 31)) ^ (XR);   \
  279.     (XL) = ((XR) | (KR)) ^ (XL);                                    \
  280. }
  281.  
  282. #define FLInv(YL, YR, KL, KR)                                       \
  283. {                                                                   \
  284.     (YL) = ((YR) | (KR)) ^ (YL);                                    \
  285.     (YR) = ((((YL) & (KL)) << 1) | (((YL) & (KL)) >> 31)) ^ (YR);   \
  286. }
  287.  
  288. #define SHIFT_AND_PLACE(INDEX, OFFSET)                      \
  289. {                                                           \
  290.     TK[0] = KC[(OFFSET) * 4 + 0];                           \
  291.     TK[1] = KC[(OFFSET) * 4 + 1];                           \
  292.     TK[2] = KC[(OFFSET) * 4 + 2];                           \
  293.     TK[3] = KC[(OFFSET) * 4 + 3];                           \
  294.                                                             \
  295.     for( i = 1; i <= 4; i++ )                               \
  296.         if( shifts[(INDEX)][(OFFSET)][i -1] )               \
  297.             ROTL(TK + i * 4, TK, ( 15 * i ) % 32);          \
  298.                                                             \
  299.     for( i = 0; i < 20; i++ )                               \
  300.         if( indexes[(INDEX)][(OFFSET)][i] != -1 ) {         \
  301.             RK[indexes[(INDEX)][(OFFSET)][i]] = TK[ i ];    \
  302.         }                                                   \
  303. }
  304.  
  305. static void camellia_feistel( const uint32_t x[2], const uint32_t k[2],
  306.                               uint32_t z[2])
  307. {
  308.     uint32_t I0, I1;
  309.     I0 = x[0] ^ k[0];
  310.     I1 = x[1] ^ k[1];
  311.  
  312.     I0 = ((uint32_t) SBOX1((I0 >> 24) & 0xFF) << 24) |
  313.          ((uint32_t) SBOX2((I0 >> 16) & 0xFF) << 16) |
  314.          ((uint32_t) SBOX3((I0 >>  8) & 0xFF) <<  8) |
  315.          ((uint32_t) SBOX4((I0      ) & 0xFF)      );
  316.     I1 = ((uint32_t) SBOX2((I1 >> 24) & 0xFF) << 24) |
  317.          ((uint32_t) SBOX3((I1 >> 16) & 0xFF) << 16) |
  318.          ((uint32_t) SBOX4((I1 >>  8) & 0xFF) <<  8) |
  319.          ((uint32_t) SBOX1((I1      ) & 0xFF)      );
  320.  
  321.     I0 ^= (I1 << 8) | (I1 >> 24);
  322.     I1 ^= (I0 << 16) | (I0 >> 16);
  323.     I0 ^= (I1 >> 8) | (I1 << 24);
  324.     I1 ^= (I0 >> 8) | (I0 << 24);
  325.  
  326.     z[0] ^= I1;
  327.     z[1] ^= I0;
  328. }
  329.  
  330. void mbedtls_camellia_init( mbedtls_camellia_context *ctx )
  331. {
  332.     CAMELLIA_VALIDATE( ctx != NULL );
  333.     memset( ctx, 0, sizeof( mbedtls_camellia_context ) );
  334. }
  335.  
  336. void mbedtls_camellia_free( mbedtls_camellia_context *ctx )
  337. {
  338.     if( ctx == NULL )
  339.         return;
  340.  
  341.     mbedtls_platform_zeroize( ctx, sizeof( mbedtls_camellia_context ) );
  342. }
  343.  
  344. /*
  345.  * Camellia key schedule (encryption)
  346.  */
  347. int mbedtls_camellia_setkey_enc( mbedtls_camellia_context *ctx,
  348.                                  const unsigned char *key,
  349.                                  unsigned int keybits )
  350. {
  351.     int idx;
  352.     size_t i;
  353.     uint32_t *RK;
  354.     unsigned char t[64];
  355.     uint32_t SIGMA[6][2];
  356.     uint32_t KC[16];
  357.     uint32_t TK[20];
  358.  
  359.     CAMELLIA_VALIDATE_RET( ctx != NULL );
  360.     CAMELLIA_VALIDATE_RET( key != NULL );
  361.  
  362.     RK = ctx->rk;
  363.  
  364.     memset( t, 0, 64 );
  365.     memset( RK, 0, sizeof(ctx->rk) );
  366.  
  367.     switch( keybits )
  368.     {
  369.         case 128: ctx->nr = 3; idx = 0; break;
  370.         case 192:
  371.         case 256: ctx->nr = 4; idx = 1; break;
  372.         default : return( MBEDTLS_ERR_CAMELLIA_BAD_INPUT_DATA );
  373.     }
  374.  
  375.     for( i = 0; i < keybits / 8; ++i )
  376.         t[i] = key[i];
  377.  
  378.     if( keybits == 192 ) {
  379.         for( i = 0; i < 8; i++ )
  380.             t[24 + i] = ~t[16 + i];
  381.     }
  382.  
  383.     /*
  384.      * Prepare SIGMA values
  385.      */
  386.     for( i = 0; i < 6; i++ ) {
  387.         GET_UINT32_BE( SIGMA[i][0], SIGMA_CHARS[i], 0 );
  388.         GET_UINT32_BE( SIGMA[i][1], SIGMA_CHARS[i], 4 );
  389.     }
  390.  
  391.     /*
  392.      * Key storage in KC
  393.      * Order: KL, KR, KA, KB
  394.      */
  395.     memset( KC, 0, sizeof(KC) );
  396.  
  397.     /* Store KL, KR */
  398.     for( i = 0; i < 8; i++ )
  399.         GET_UINT32_BE( KC[i], t, i * 4 );
  400.  
  401.     /* Generate KA */
  402.     for( i = 0; i < 4; ++i )
  403.         KC[8 + i] = KC[i] ^ KC[4 + i];
  404.  
  405.     camellia_feistel( KC + 8, SIGMA[0], KC + 10 );
  406.     camellia_feistel( KC + 10, SIGMA[1], KC + 8 );
  407.  
  408.     for( i = 0; i < 4; ++i )
  409.         KC[8 + i] ^= KC[i];
  410.  
  411.     camellia_feistel( KC + 8, SIGMA[2], KC + 10 );
  412.     camellia_feistel( KC + 10, SIGMA[3], KC + 8 );
  413.  
  414.     if( keybits > 128 ) {
  415.         /* Generate KB */
  416.         for( i = 0; i < 4; ++i )
  417.             KC[12 + i] = KC[4 + i] ^ KC[8 + i];
  418.  
  419.         camellia_feistel( KC + 12, SIGMA[4], KC + 14 );
  420.         camellia_feistel( KC + 14, SIGMA[5], KC + 12 );
  421.     }
  422.  
  423.     /*
  424.      * Generating subkeys
  425.      */
  426.  
  427.     /* Manipulating KL */
  428.     SHIFT_AND_PLACE( idx, 0 );
  429.  
  430.     /* Manipulating KR */
  431.     if( keybits > 128 ) {
  432.         SHIFT_AND_PLACE( idx, 1 );
  433.     }
  434.  
  435.     /* Manipulating KA */
  436.     SHIFT_AND_PLACE( idx, 2 );
  437.  
  438.     /* Manipulating KB */
  439.     if( keybits > 128 ) {
  440.         SHIFT_AND_PLACE( idx, 3 );
  441.     }
  442.  
  443.     /* Do transpositions */
  444.     for( i = 0; i < 20; i++ ) {
  445.         if( transposes[idx][i] != -1 ) {
  446.             RK[32 + 12 * idx + i] = RK[transposes[idx][i]];
  447.         }
  448.     }
  449.  
  450.     return( 0 );
  451. }
  452.  
  453. /*
  454.  * Camellia key schedule (decryption)
  455.  */
  456. int mbedtls_camellia_setkey_dec( mbedtls_camellia_context *ctx,
  457.                                  const unsigned char *key,
  458.                                  unsigned int keybits )
  459. {
  460.     int idx, ret;
  461.     size_t i;
  462.     mbedtls_camellia_context cty;
  463.     uint32_t *RK;
  464.     uint32_t *SK;
  465.     CAMELLIA_VALIDATE_RET( ctx != NULL );
  466.     CAMELLIA_VALIDATE_RET( key != NULL );
  467.  
  468.     mbedtls_camellia_init( &cty );
  469.  
  470.     /* Also checks keybits */
  471.     if( ( ret = mbedtls_camellia_setkey_enc( &cty, key, keybits ) ) != 0 )
  472.         goto exit;
  473.  
  474.     ctx->nr = cty.nr;
  475.     idx = ( ctx->nr == 4 );
  476.  
  477.     RK = ctx->rk;
  478.     SK = cty.rk + 24 * 2 + 8 * idx * 2;
  479.  
  480.     *RK++ = *SK++;
  481.     *RK++ = *SK++;
  482.     *RK++ = *SK++;
  483.     *RK++ = *SK++;
  484.  
  485.     for( i = 22 + 8 * idx, SK -= 6; i > 0; i--, SK -= 4 )
  486.     {
  487.         *RK++ = *SK++;
  488.         *RK++ = *SK++;
  489.     }
  490.  
  491.     SK -= 2;
  492.  
  493.     *RK++ = *SK++;
  494.     *RK++ = *SK++;
  495.     *RK++ = *SK++;
  496.     *RK++ = *SK++;
  497.  
  498. exit:
  499.     mbedtls_camellia_free( &cty );
  500.  
  501.     return( ret );
  502. }
  503.  
  504. /*
  505.  * Camellia-ECB block encryption/decryption
  506.  */
  507. int mbedtls_camellia_crypt_ecb( mbedtls_camellia_context *ctx,
  508.                     int mode,
  509.                     const unsigned char input[16],
  510.                     unsigned char output[16] )
  511. {
  512.     int NR;
  513.     uint32_t *RK, X[4];
  514.     CAMELLIA_VALIDATE_RET( ctx != NULL );
  515.     CAMELLIA_VALIDATE_RET( mode == MBEDTLS_CAMELLIA_ENCRYPT ||
  516.                            mode == MBEDTLS_CAMELLIA_DECRYPT );
  517.     CAMELLIA_VALIDATE_RET( input  != NULL );
  518.     CAMELLIA_VALIDATE_RET( output != NULL );
  519.  
  520.     ( (void) mode );
  521.  
  522.     NR = ctx->nr;
  523.     RK = ctx->rk;
  524.  
  525.     GET_UINT32_BE( X[0], input,  0 );
  526.     GET_UINT32_BE( X[1], input,  4 );
  527.     GET_UINT32_BE( X[2], input,  8 );
  528.     GET_UINT32_BE( X[3], input, 12 );
  529.  
  530.     X[0] ^= *RK++;
  531.     X[1] ^= *RK++;
  532.     X[2] ^= *RK++;
  533.     X[3] ^= *RK++;
  534.  
  535.     while( NR ) {
  536.         --NR;
  537.         camellia_feistel( X, RK, X + 2 );
  538.         RK += 2;
  539.         camellia_feistel( X + 2, RK, X );
  540.         RK += 2;
  541.         camellia_feistel( X, RK, X + 2 );
  542.         RK += 2;
  543.         camellia_feistel( X + 2, RK, X );
  544.         RK += 2;
  545.         camellia_feistel( X, RK, X + 2 );
  546.         RK += 2;
  547.         camellia_feistel( X + 2, RK, X );
  548.         RK += 2;
  549.  
  550.         if( NR ) {
  551.             FL(X[0], X[1], RK[0], RK[1]);
  552.             RK += 2;
  553.             FLInv(X[2], X[3], RK[0], RK[1]);
  554.             RK += 2;
  555.         }
  556.     }
  557.  
  558.     X[2] ^= *RK++;
  559.     X[3] ^= *RK++;
  560.     X[0] ^= *RK++;
  561.     X[1] ^= *RK++;
  562.  
  563.     PUT_UINT32_BE( X[2], output,  0 );
  564.     PUT_UINT32_BE( X[3], output,  4 );
  565.     PUT_UINT32_BE( X[0], output,  8 );
  566.     PUT_UINT32_BE( X[1], output, 12 );
  567.  
  568.     return( 0 );
  569. }
  570.  
  571. #if defined(MBEDTLS_CIPHER_MODE_CBC)
  572. /*
  573.  * Camellia-CBC buffer encryption/decryption
  574.  */
  575. int mbedtls_camellia_crypt_cbc( mbedtls_camellia_context *ctx,
  576.                                 int mode,
  577.                                 size_t length,
  578.                                 unsigned char iv[16],
  579.                                 const unsigned char *input,
  580.                                 unsigned char *output )
  581. {
  582.     int i;
  583.     unsigned char temp[16];
  584.     CAMELLIA_VALIDATE_RET( ctx != NULL );
  585.     CAMELLIA_VALIDATE_RET( mode == MBEDTLS_CAMELLIA_ENCRYPT ||
  586.                            mode == MBEDTLS_CAMELLIA_DECRYPT );
  587.     CAMELLIA_VALIDATE_RET( iv != NULL );
  588.     CAMELLIA_VALIDATE_RET( length == 0 || input  != NULL );
  589.     CAMELLIA_VALIDATE_RET( length == 0 || output != NULL );
  590.  
  591.     if( length % 16 )
  592.         return( MBEDTLS_ERR_CAMELLIA_INVALID_INPUT_LENGTH );
  593.  
  594.     if( mode == MBEDTLS_CAMELLIA_DECRYPT )
  595.     {
  596.         while( length > 0 )
  597.         {
  598.             memcpy( temp, input, 16 );
  599.             mbedtls_camellia_crypt_ecb( ctx, mode, input, output );
  600.  
  601.             for( i = 0; i < 16; i++ )
  602.                 output[i] = (unsigned char)( output[i] ^ iv[i] );
  603.  
  604.             memcpy( iv, temp, 16 );
  605.  
  606.             input  += 16;
  607.             output += 16;
  608.             length -= 16;
  609.         }
  610.     }
  611.     else
  612.     {
  613.         while( length > 0 )
  614.         {
  615.             for( i = 0; i < 16; i++ )
  616.                 output[i] = (unsigned char)( input[i] ^ iv[i] );
  617.  
  618.             mbedtls_camellia_crypt_ecb( ctx, mode, output, output );
  619.             memcpy( iv, output, 16 );
  620.  
  621.             input  += 16;
  622.             output += 16;
  623.             length -= 16;
  624.         }
  625.     }
  626.  
  627.     return( 0 );
  628. }
  629. #endif /* MBEDTLS_CIPHER_MODE_CBC */
  630.  
  631. #if defined(MBEDTLS_CIPHER_MODE_CFB)
  632. /*
  633.  * Camellia-CFB128 buffer encryption/decryption
  634.  */
  635. int mbedtls_camellia_crypt_cfb128( mbedtls_camellia_context *ctx,
  636.                        int mode,
  637.                        size_t length,
  638.                        size_t *iv_off,
  639.                        unsigned char iv[16],
  640.                        const unsigned char *input,
  641.                        unsigned char *output )
  642. {
  643.     int c;
  644.     size_t n;
  645.     CAMELLIA_VALIDATE_RET( ctx != NULL );
  646.     CAMELLIA_VALIDATE_RET( mode == MBEDTLS_CAMELLIA_ENCRYPT ||
  647.                            mode == MBEDTLS_CAMELLIA_DECRYPT );
  648.     CAMELLIA_VALIDATE_RET( iv     != NULL );
  649.     CAMELLIA_VALIDATE_RET( iv_off != NULL );
  650.     CAMELLIA_VALIDATE_RET( length == 0 || input  != NULL );
  651.     CAMELLIA_VALIDATE_RET( length == 0 || output != NULL );
  652.  
  653.     n = *iv_off;
  654.     if( n >= 16 )
  655.         return( MBEDTLS_ERR_CAMELLIA_BAD_INPUT_DATA );
  656.  
  657.     if( mode == MBEDTLS_CAMELLIA_DECRYPT )
  658.     {
  659.         while( length-- )
  660.         {
  661.             if( n == 0 )
  662.                 mbedtls_camellia_crypt_ecb( ctx, MBEDTLS_CAMELLIA_ENCRYPT, iv, iv );
  663.  
  664.             c = *input++;
  665.             *output++ = (unsigned char)( c ^ iv[n] );
  666.             iv[n] = (unsigned char) c;
  667.  
  668.             n = ( n + 1 ) & 0x0F;
  669.         }
  670.     }
  671.     else
  672.     {
  673.         while( length-- )
  674.         {
  675.             if( n == 0 )
  676.                 mbedtls_camellia_crypt_ecb( ctx, MBEDTLS_CAMELLIA_ENCRYPT, iv, iv );
  677.  
  678.             iv[n] = *output++ = (unsigned char)( iv[n] ^ *input++ );
  679.  
  680.             n = ( n + 1 ) & 0x0F;
  681.         }
  682.     }
  683.  
  684.     *iv_off = n;
  685.  
  686.     return( 0 );
  687. }
  688. #endif /* MBEDTLS_CIPHER_MODE_CFB */
  689.  
  690. #if defined(MBEDTLS_CIPHER_MODE_CTR)
  691. /*
  692.  * Camellia-CTR buffer encryption/decryption
  693.  */
  694. int mbedtls_camellia_crypt_ctr( mbedtls_camellia_context *ctx,
  695.                        size_t length,
  696.                        size_t *nc_off,
  697.                        unsigned char nonce_counter[16],
  698.                        unsigned char stream_block[16],
  699.                        const unsigned char *input,
  700.                        unsigned char *output )
  701. {
  702.     int c, i;
  703.     size_t n;
  704.     CAMELLIA_VALIDATE_RET( ctx != NULL );
  705.     CAMELLIA_VALIDATE_RET( nonce_counter != NULL );
  706.     CAMELLIA_VALIDATE_RET( stream_block  != NULL );
  707.     CAMELLIA_VALIDATE_RET( nc_off != NULL );
  708.     CAMELLIA_VALIDATE_RET( length == 0 || input  != NULL );
  709.     CAMELLIA_VALIDATE_RET( length == 0 || output != NULL );
  710.  
  711.     n = *nc_off;
  712.     if( n >= 16 )
  713.         return( MBEDTLS_ERR_CAMELLIA_BAD_INPUT_DATA );
  714.  
  715.     while( length-- )
  716.     {
  717.         if( n == 0 ) {
  718.             mbedtls_camellia_crypt_ecb( ctx, MBEDTLS_CAMELLIA_ENCRYPT, nonce_counter,
  719.                                 stream_block );
  720.  
  721.             for( i = 16; i > 0; i-- )
  722.                 if( ++nonce_counter[i - 1] != 0 )
  723.                     break;
  724.         }
  725.         c = *input++;
  726.         *output++ = (unsigned char)( c ^ stream_block[n] );
  727.  
  728.         n = ( n + 1 ) & 0x0F;
  729.     }
  730.  
  731.     *nc_off = n;
  732.  
  733.     return( 0 );
  734. }
  735. #endif /* MBEDTLS_CIPHER_MODE_CTR */
  736. #endif /* !MBEDTLS_CAMELLIA_ALT */
  737.  
  738. #if defined(MBEDTLS_SELF_TEST)
  739.  
  740. /*
  741.  * Camellia test vectors from:
  742.  *
  743.  * http://info.isl.ntt.co.jp/crypt/eng/camellia/technology.html:
  744.  *   http://info.isl.ntt.co.jp/crypt/eng/camellia/dl/cryptrec/intermediate.txt
  745.  *   http://info.isl.ntt.co.jp/crypt/eng/camellia/dl/cryptrec/t_camellia.txt
  746.  *                      (For each bitlength: Key 0, Nr 39)
  747.  */
  748. #define CAMELLIA_TESTS_ECB  2
  749.  
  750. static const unsigned char camellia_test_ecb_key[3][CAMELLIA_TESTS_ECB][32] =
  751. {
  752.     {
  753.         { 0x01, 0x23, 0x45, 0x67, 0x89, 0xab, 0xcd, 0xef,
  754.           0xfe, 0xdc, 0xba, 0x98, 0x76, 0x54, 0x32, 0x10 },
  755.         { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  756.           0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 }
  757.     },
  758.     {
  759.         { 0x01, 0x23, 0x45, 0x67, 0x89, 0xab, 0xcd, 0xef,
  760.           0xfe, 0xdc, 0xba, 0x98, 0x76, 0x54, 0x32, 0x10,
  761.           0x00, 0x11, 0x22, 0x33, 0x44, 0x55, 0x66, 0x77 },
  762.         { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  763.           0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  764.           0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 }
  765.     },
  766.     {
  767.         { 0x01, 0x23, 0x45, 0x67, 0x89, 0xab, 0xcd, 0xef,
  768.           0xfe, 0xdc, 0xba, 0x98, 0x76, 0x54, 0x32, 0x10,
  769.           0x00, 0x11, 0x22, 0x33, 0x44, 0x55, 0x66, 0x77,
  770.           0x88, 0x99, 0xaa, 0xbb, 0xcc, 0xdd, 0xee, 0xff },
  771.         { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  772.           0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  773.           0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
  774.           0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 }
  775.     },
  776. };
  777.  
  778. static const unsigned char camellia_test_ecb_plain[CAMELLIA_TESTS_ECB][16] =
  779. {
  780.     { 0x01, 0x23, 0x45, 0x67, 0x89, 0xab, 0xcd, 0xef,
  781.       0xfe, 0xdc, 0xba, 0x98, 0x76, 0x54, 0x32, 0x10 },
  782.     { 0x00, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00,
  783.       0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 }
  784. };
  785.  
  786. static const unsigned char camellia_test_ecb_cipher[3][CAMELLIA_TESTS_ECB][16] =
  787. {
  788.     {
  789.         { 0x67, 0x67, 0x31, 0x38, 0x54, 0x96, 0x69, 0x73,
  790.           0x08, 0x57, 0x06, 0x56, 0x48, 0xea, 0xbe, 0x43 },
  791.         { 0x38, 0x3C, 0x6C, 0x2A, 0xAB, 0xEF, 0x7F, 0xDE,
  792.           0x25, 0xCD, 0x47, 0x0B, 0xF7, 0x74, 0xA3, 0x31 }
  793.     },
  794.     {
  795.         { 0xb4, 0x99, 0x34, 0x01, 0xb3, 0xe9, 0x96, 0xf8,
  796.           0x4e, 0xe5, 0xce, 0xe7, 0xd7, 0x9b, 0x09, 0xb9 },
  797.         { 0xD1, 0x76, 0x3F, 0xC0, 0x19, 0xD7, 0x7C, 0xC9,
  798.           0x30, 0xBF, 0xF2, 0xA5, 0x6F, 0x7C, 0x93, 0x64 }
  799.     },
  800.     {
  801.         { 0x9a, 0xcc, 0x23, 0x7d, 0xff, 0x16, 0xd7, 0x6c,
  802.           0x20, 0xef, 0x7c, 0x91, 0x9e, 0x3a, 0x75, 0x09 },
  803.         { 0x05, 0x03, 0xFB, 0x10, 0xAB, 0x24, 0x1E, 0x7C,
  804.           0xF4, 0x5D, 0x8C, 0xDE, 0xEE, 0x47, 0x43, 0x35 }
  805.     }
  806. };
  807.  
  808. #if defined(MBEDTLS_CIPHER_MODE_CBC)
  809. #define CAMELLIA_TESTS_CBC  3
  810.  
  811. static const unsigned char camellia_test_cbc_key[3][32] =
  812. {
  813.         { 0x2B, 0x7E, 0x15, 0x16, 0x28, 0xAE, 0xD2, 0xA6,
  814.           0xAB, 0xF7, 0x15, 0x88, 0x09, 0xCF, 0x4F, 0x3C }
  815.     ,
  816.         { 0x8E, 0x73, 0xB0, 0xF7, 0xDA, 0x0E, 0x64, 0x52,
  817.           0xC8, 0x10, 0xF3, 0x2B, 0x80, 0x90, 0x79, 0xE5,
  818.           0x62, 0xF8, 0xEA, 0xD2, 0x52, 0x2C, 0x6B, 0x7B }
  819.     ,
  820.         { 0x60, 0x3D, 0xEB, 0x10, 0x15, 0xCA, 0x71, 0xBE,
  821.           0x2B, 0x73, 0xAE, 0xF0, 0x85, 0x7D, 0x77, 0x81,
  822.           0x1F, 0x35, 0x2C, 0x07, 0x3B, 0x61, 0x08, 0xD7,
  823.           0x2D, 0x98, 0x10, 0xA3, 0x09, 0x14, 0xDF, 0xF4 }
  824. };
  825.  
  826. static const unsigned char camellia_test_cbc_iv[16] =
  827.  
  828.     { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
  829.       0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F }
  830. ;
  831.  
  832. static const unsigned char camellia_test_cbc_plain[CAMELLIA_TESTS_CBC][16] =
  833. {
  834.     { 0x6B, 0xC1, 0xBE, 0xE2, 0x2E, 0x40, 0x9F, 0x96,
  835.       0xE9, 0x3D, 0x7E, 0x11, 0x73, 0x93, 0x17, 0x2A },
  836.     { 0xAE, 0x2D, 0x8A, 0x57, 0x1E, 0x03, 0xAC, 0x9C,
  837.       0x9E, 0xB7, 0x6F, 0xAC, 0x45, 0xAF, 0x8E, 0x51 },
  838.     { 0x30, 0xC8, 0x1C, 0x46, 0xA3, 0x5C, 0xE4, 0x11,
  839.       0xE5, 0xFB, 0xC1, 0x19, 0x1A, 0x0A, 0x52, 0xEF }
  840.  
  841. };
  842.  
  843. static const unsigned char camellia_test_cbc_cipher[3][CAMELLIA_TESTS_CBC][16] =
  844. {
  845.     {
  846.         { 0x16, 0x07, 0xCF, 0x49, 0x4B, 0x36, 0xBB, 0xF0,
  847.           0x0D, 0xAE, 0xB0, 0xB5, 0x03, 0xC8, 0x31, 0xAB },
  848.         { 0xA2, 0xF2, 0xCF, 0x67, 0x16, 0x29, 0xEF, 0x78,
  849.           0x40, 0xC5, 0xA5, 0xDF, 0xB5, 0x07, 0x48, 0x87 },
  850.         { 0x0F, 0x06, 0x16, 0x50, 0x08, 0xCF, 0x8B, 0x8B,
  851.           0x5A, 0x63, 0x58, 0x63, 0x62, 0x54, 0x3E, 0x54 }
  852.     },
  853.     {
  854.         { 0x2A, 0x48, 0x30, 0xAB, 0x5A, 0xC4, 0xA1, 0xA2,
  855.           0x40, 0x59, 0x55, 0xFD, 0x21, 0x95, 0xCF, 0x93 },
  856.         { 0x5D, 0x5A, 0x86, 0x9B, 0xD1, 0x4C, 0xE5, 0x42,
  857.           0x64, 0xF8, 0x92, 0xA6, 0xDD, 0x2E, 0xC3, 0xD5 },
  858.         { 0x37, 0xD3, 0x59, 0xC3, 0x34, 0x98, 0x36, 0xD8,
  859.           0x84, 0xE3, 0x10, 0xAD, 0xDF, 0x68, 0xC4, 0x49 }
  860.     },
  861.     {
  862.         { 0xE6, 0xCF, 0xA3, 0x5F, 0xC0, 0x2B, 0x13, 0x4A,
  863.           0x4D, 0x2C, 0x0B, 0x67, 0x37, 0xAC, 0x3E, 0xDA },
  864.         { 0x36, 0xCB, 0xEB, 0x73, 0xBD, 0x50, 0x4B, 0x40,
  865.           0x70, 0xB1, 0xB7, 0xDE, 0x2B, 0x21, 0xEB, 0x50 },
  866.         { 0xE3, 0x1A, 0x60, 0x55, 0x29, 0x7D, 0x96, 0xCA,
  867.           0x33, 0x30, 0xCD, 0xF1, 0xB1, 0x86, 0x0A, 0x83 }
  868.     }
  869. };
  870. #endif /* MBEDTLS_CIPHER_MODE_CBC */
  871.  
  872. #if defined(MBEDTLS_CIPHER_MODE_CTR)
  873. /*
  874.  * Camellia-CTR test vectors from:
  875.  *
  876.  * http://www.faqs.org/rfcs/rfc5528.html
  877.  */
  878.  
  879. static const unsigned char camellia_test_ctr_key[3][16] =
  880. {
  881.     { 0xAE, 0x68, 0x52, 0xF8, 0x12, 0x10, 0x67, 0xCC,
  882.       0x4B, 0xF7, 0xA5, 0x76, 0x55, 0x77, 0xF3, 0x9E },
  883.     { 0x7E, 0x24, 0x06, 0x78, 0x17, 0xFA, 0xE0, 0xD7,
  884.       0x43, 0xD6, 0xCE, 0x1F, 0x32, 0x53, 0x91, 0x63 },
  885.     { 0x76, 0x91, 0xBE, 0x03, 0x5E, 0x50, 0x20, 0xA8,
  886.       0xAC, 0x6E, 0x61, 0x85, 0x29, 0xF9, 0xA0, 0xDC }
  887. };
  888.  
  889. static const unsigned char camellia_test_ctr_nonce_counter[3][16] =
  890. {
  891.     { 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x00,
  892.       0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01 },
  893.     { 0x00, 0x6C, 0xB6, 0xDB, 0xC0, 0x54, 0x3B, 0x59,
  894.       0xDA, 0x48, 0xD9, 0x0B, 0x00, 0x00, 0x00, 0x01 },
  895.     { 0x00, 0xE0, 0x01, 0x7B, 0x27, 0x77, 0x7F, 0x3F,
  896.       0x4A, 0x17, 0x86, 0xF0, 0x00, 0x00, 0x00, 0x01 }
  897. };
  898.  
  899. static const unsigned char camellia_test_ctr_pt[3][48] =
  900. {
  901.     { 0x53, 0x69, 0x6E, 0x67, 0x6C, 0x65, 0x20, 0x62,
  902.       0x6C, 0x6F, 0x63, 0x6B, 0x20, 0x6D, 0x73, 0x67 },
  903.  
  904.     { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
  905.       0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
  906.       0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
  907.       0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F },
  908.  
  909.     { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
  910.       0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
  911.       0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
  912.       0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F,
  913.       0x20, 0x21, 0x22, 0x23 }
  914. };
  915.  
  916. static const unsigned char camellia_test_ctr_ct[3][48] =
  917. {
  918.     { 0xD0, 0x9D, 0xC2, 0x9A, 0x82, 0x14, 0x61, 0x9A,
  919.       0x20, 0x87, 0x7C, 0x76, 0xDB, 0x1F, 0x0B, 0x3F },
  920.     { 0xDB, 0xF3, 0xC7, 0x8D, 0xC0, 0x83, 0x96, 0xD4,
  921.       0xDA, 0x7C, 0x90, 0x77, 0x65, 0xBB, 0xCB, 0x44,
  922.       0x2B, 0x8E, 0x8E, 0x0F, 0x31, 0xF0, 0xDC, 0xA7,
  923.       0x2C, 0x74, 0x17, 0xE3, 0x53, 0x60, 0xE0, 0x48 },
  924.     { 0xB1, 0x9D, 0x1F, 0xCD, 0xCB, 0x75, 0xEB, 0x88,
  925.       0x2F, 0x84, 0x9C, 0xE2, 0x4D, 0x85, 0xCF, 0x73,
  926.       0x9C, 0xE6, 0x4B, 0x2B, 0x5C, 0x9D, 0x73, 0xF1,
  927.       0x4F, 0x2D, 0x5D, 0x9D, 0xCE, 0x98, 0x89, 0xCD,
  928.       0xDF, 0x50, 0x86, 0x96 }
  929. };
  930.  
  931. static const int camellia_test_ctr_len[3] =
  932.     { 16, 32, 36 };
  933. #endif /* MBEDTLS_CIPHER_MODE_CTR */
  934.  
  935. /*
  936.  * Checkup routine
  937.  */
  938. int mbedtls_camellia_self_test( int verbose )
  939. {
  940.     int i, j, u, v;
  941.     unsigned char key[32];
  942.     unsigned char buf[64];
  943.     unsigned char src[16];
  944.     unsigned char dst[16];
  945. #if defined(MBEDTLS_CIPHER_MODE_CBC)
  946.     unsigned char iv[16];
  947. #endif
  948. #if defined(MBEDTLS_CIPHER_MODE_CTR)
  949.     size_t offset, len;
  950.     unsigned char nonce_counter[16];
  951.     unsigned char stream_block[16];
  952. #endif
  953.  
  954.     mbedtls_camellia_context ctx;
  955.  
  956.     memset( key, 0, 32 );
  957.  
  958.     for( j = 0; j < 6; j++ ) {
  959.         u = j >> 1;
  960.     v = j & 1;
  961.  
  962.     if( verbose != 0 )
  963.         mbedtls_printf( "  CAMELLIA-ECB-%3d (%s): ", 128 + u * 64,
  964.                          (v == MBEDTLS_CAMELLIA_DECRYPT) ? "dec" : "enc");
  965.  
  966.     for( i = 0; i < CAMELLIA_TESTS_ECB; i++ ) {
  967.         memcpy( key, camellia_test_ecb_key[u][i], 16 + 8 * u );
  968.  
  969.         if( v == MBEDTLS_CAMELLIA_DECRYPT ) {
  970.             mbedtls_camellia_setkey_dec( &ctx, key, 128 + u * 64 );
  971.             memcpy( src, camellia_test_ecb_cipher[u][i], 16 );
  972.             memcpy( dst, camellia_test_ecb_plain[i], 16 );
  973.         } else { /* MBEDTLS_CAMELLIA_ENCRYPT */
  974.             mbedtls_camellia_setkey_enc( &ctx, key, 128 + u * 64 );
  975.             memcpy( src, camellia_test_ecb_plain[i], 16 );
  976.             memcpy( dst, camellia_test_ecb_cipher[u][i], 16 );
  977.         }
  978.  
  979.         mbedtls_camellia_crypt_ecb( &ctx, v, src, buf );
  980.  
  981.         if( memcmp( buf, dst, 16 ) != 0 )
  982.         {
  983.             if( verbose != 0 )
  984.                 mbedtls_printf( "failed\n" );
  985.  
  986.             return( 1 );
  987.         }
  988.     }
  989.  
  990.     if( verbose != 0 )
  991.         mbedtls_printf( "passed\n" );
  992.     }
  993.  
  994.     if( verbose != 0 )
  995.         mbedtls_printf( "\n" );
  996.  
  997. #if defined(MBEDTLS_CIPHER_MODE_CBC)
  998.     /*
  999.      * CBC mode
  1000.      */
  1001.     for( j = 0; j < 6; j++ )
  1002.     {
  1003.         u = j >> 1;
  1004.         v = j  & 1;
  1005.  
  1006.         if( verbose != 0 )
  1007.             mbedtls_printf( "  CAMELLIA-CBC-%3d (%s): ", 128 + u * 64,
  1008.                              ( v == MBEDTLS_CAMELLIA_DECRYPT ) ? "dec" : "enc" );
  1009.  
  1010.         memcpy( src, camellia_test_cbc_iv, 16 );
  1011.         memcpy( dst, camellia_test_cbc_iv, 16 );
  1012.         memcpy( key, camellia_test_cbc_key[u], 16 + 8 * u );
  1013.  
  1014.         if( v == MBEDTLS_CAMELLIA_DECRYPT ) {
  1015.             mbedtls_camellia_setkey_dec( &ctx, key, 128 + u * 64 );
  1016.         } else {
  1017.             mbedtls_camellia_setkey_enc( &ctx, key, 128 + u * 64 );
  1018.         }
  1019.  
  1020.         for( i = 0; i < CAMELLIA_TESTS_CBC; i++ ) {
  1021.  
  1022.             if( v == MBEDTLS_CAMELLIA_DECRYPT ) {
  1023.                 memcpy( iv , src, 16 );
  1024.                 memcpy( src, camellia_test_cbc_cipher[u][i], 16 );
  1025.                 memcpy( dst, camellia_test_cbc_plain[i], 16 );
  1026.             } else { /* MBEDTLS_CAMELLIA_ENCRYPT */
  1027.                 memcpy( iv , dst, 16 );
  1028.                 memcpy( src, camellia_test_cbc_plain[i], 16 );
  1029.                 memcpy( dst, camellia_test_cbc_cipher[u][i], 16 );
  1030.             }
  1031.  
  1032.             mbedtls_camellia_crypt_cbc( &ctx, v, 16, iv, src, buf );
  1033.  
  1034.             if( memcmp( buf, dst, 16 ) != 0 )
  1035.             {
  1036.                 if( verbose != 0 )
  1037.                     mbedtls_printf( "failed\n" );
  1038.  
  1039.                 return( 1 );
  1040.             }
  1041.         }
  1042.  
  1043.         if( verbose != 0 )
  1044.             mbedtls_printf( "passed\n" );
  1045.     }
  1046. #endif /* MBEDTLS_CIPHER_MODE_CBC */
  1047.  
  1048.     if( verbose != 0 )
  1049.         mbedtls_printf( "\n" );
  1050.  
  1051. #if defined(MBEDTLS_CIPHER_MODE_CTR)
  1052.     /*
  1053.      * CTR mode
  1054.      */
  1055.     for( i = 0; i < 6; i++ )
  1056.     {
  1057.         u = i >> 1;
  1058.         v = i  & 1;
  1059.  
  1060.         if( verbose != 0 )
  1061.             mbedtls_printf( "  CAMELLIA-CTR-128 (%s): ",
  1062.                              ( v == MBEDTLS_CAMELLIA_DECRYPT ) ? "dec" : "enc" );
  1063.  
  1064.         memcpy( nonce_counter, camellia_test_ctr_nonce_counter[u], 16 );
  1065.         memcpy( key, camellia_test_ctr_key[u], 16 );
  1066.  
  1067.         offset = 0;
  1068.         mbedtls_camellia_setkey_enc( &ctx, key, 128 );
  1069.  
  1070.         if( v == MBEDTLS_CAMELLIA_DECRYPT )
  1071.         {
  1072.             len = camellia_test_ctr_len[u];
  1073.             memcpy( buf, camellia_test_ctr_ct[u], len );
  1074.  
  1075.             mbedtls_camellia_crypt_ctr( &ctx, len, &offset, nonce_counter, stream_block,
  1076.                                 buf, buf );
  1077.  
  1078.             if( memcmp( buf, camellia_test_ctr_pt[u], len ) != 0 )
  1079.             {
  1080.                 if( verbose != 0 )
  1081.                     mbedtls_printf( "failed\n" );
  1082.  
  1083.                 return( 1 );
  1084.             }
  1085.         }
  1086.         else
  1087.         {
  1088.             len = camellia_test_ctr_len[u];
  1089.             memcpy( buf, camellia_test_ctr_pt[u], len );
  1090.  
  1091.             mbedtls_camellia_crypt_ctr( &ctx, len, &offset, nonce_counter, stream_block,
  1092.                                 buf, buf );
  1093.  
  1094.             if( memcmp( buf, camellia_test_ctr_ct[u], len ) != 0 )
  1095.             {
  1096.                 if( verbose != 0 )
  1097.                     mbedtls_printf( "failed\n" );
  1098.  
  1099.                 return( 1 );
  1100.             }
  1101.         }
  1102.  
  1103.         if( verbose != 0 )
  1104.             mbedtls_printf( "passed\n" );
  1105.     }
  1106.  
  1107.     if( verbose != 0 )
  1108.         mbedtls_printf( "\n" );
  1109. #endif /* MBEDTLS_CIPHER_MODE_CTR */
  1110.  
  1111.     return( 0 );
  1112. }
  1113.  
  1114. #endif /* MBEDTLS_SELF_TEST */
  1115.  
  1116. #endif /* MBEDTLS_CAMELLIA_C */
  1117.