| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 1 | /* BEGIN_HEADER */ | 
| Manuel Pégourié-Gonnard | 7f80997 | 2015-03-09 17:05:11 +0000 | [diff] [blame] | 2 | #include "mbedtls/ccm.h" | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 3 | /* END_HEADER */ | 
|  | 4 |  | 
|  | 5 | /* BEGIN_DEPENDENCIES | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 6 | * depends_on:MBEDTLS_CCM_C | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 7 | * END_DEPENDENCIES | 
|  | 8 | */ | 
|  | 9 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 10 | /* BEGIN_CASE depends_on:MBEDTLS_SELF_TEST:MBEDTLS_AES_C */ | 
|  | 11 | void mbedtls_ccm_self_test( ) | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 12 | { | 
| Andres AG | 93012e8 | 2016-09-09 09:10:28 +0100 | [diff] [blame] | 13 | TEST_ASSERT( mbedtls_ccm_self_test( 1 ) == 0 ); | 
| Manuel Pégourié-Gonnard | a6916fa | 2014-05-02 15:17:29 +0200 | [diff] [blame] | 14 | } | 
|  | 15 | /* END_CASE */ | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 16 |  | 
|  | 17 | /* BEGIN_CASE */ | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 18 | void mbedtls_ccm_setkey( int cipher_id, int key_size, int result ) | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 19 | { | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 20 | mbedtls_ccm_context ctx; | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 21 | unsigned char key[32]; | 
|  | 22 | int ret; | 
|  | 23 |  | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 24 | mbedtls_ccm_init( &ctx ); | 
|  | 25 |  | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 26 | memset( key, 0x2A, sizeof( key ) ); | 
|  | 27 | TEST_ASSERT( (unsigned) key_size <= 8 * sizeof( key ) ); | 
|  | 28 |  | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 29 | ret = mbedtls_ccm_setkey( &ctx, cipher_id, key, key_size ); | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 30 | TEST_ASSERT( ret == result ); | 
|  | 31 |  | 
| Paul Bakker | bd51b26 | 2014-07-10 15:26:12 +0200 | [diff] [blame] | 32 | exit: | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 33 | mbedtls_ccm_free( &ctx ); | 
| Manuel Pégourié-Gonnard | 9fe0d13 | 2014-05-06 12:12:45 +0200 | [diff] [blame] | 34 | } | 
|  | 35 | /* END_CASE */ | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 36 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 37 | /* BEGIN_CASE depends_on:MBEDTLS_AES_C */ | 
| Manuel Pégourié-Gonnard | 87df5ba | 2014-05-06 18:07:24 +0200 | [diff] [blame] | 38 | void ccm_lengths( int msg_len, int iv_len, int add_len, int tag_len, int res ) | 
|  | 39 | { | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 40 | mbedtls_ccm_context ctx; | 
| Manuel Pégourié-Gonnard | 87df5ba | 2014-05-06 18:07:24 +0200 | [diff] [blame] | 41 | unsigned char key[16]; | 
|  | 42 | unsigned char msg[10]; | 
|  | 43 | unsigned char iv[14]; | 
|  | 44 | unsigned char add[10]; | 
|  | 45 | unsigned char out[10]; | 
|  | 46 | unsigned char tag[18]; | 
|  | 47 | int decrypt_ret; | 
|  | 48 |  | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 49 | mbedtls_ccm_init( &ctx ); | 
|  | 50 |  | 
| Manuel Pégourié-Gonnard | 87df5ba | 2014-05-06 18:07:24 +0200 | [diff] [blame] | 51 | memset( key, 0, sizeof( key ) ); | 
|  | 52 | memset( msg, 0, sizeof( msg ) ); | 
|  | 53 | memset( iv, 0, sizeof( iv ) ); | 
|  | 54 | memset( add, 0, sizeof( add ) ); | 
|  | 55 | memset( out, 0, sizeof( out ) ); | 
|  | 56 | memset( tag, 0, sizeof( tag ) ); | 
|  | 57 |  | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 58 | TEST_ASSERT( mbedtls_ccm_setkey( &ctx, MBEDTLS_CIPHER_ID_AES, | 
| Manuel Pégourié-Gonnard | 87df5ba | 2014-05-06 18:07:24 +0200 | [diff] [blame] | 59 | key, 8 * sizeof( key ) ) == 0 ); | 
|  | 60 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 61 | TEST_ASSERT( mbedtls_ccm_encrypt_and_tag( &ctx, msg_len, iv, iv_len, add, add_len, | 
| Manuel Pégourié-Gonnard | 87df5ba | 2014-05-06 18:07:24 +0200 | [diff] [blame] | 62 | msg, out, tag, tag_len ) == res ); | 
|  | 63 |  | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 64 | decrypt_ret = mbedtls_ccm_auth_decrypt( &ctx, msg_len, iv, iv_len, add, add_len, | 
| Manuel Pégourié-Gonnard | 87df5ba | 2014-05-06 18:07:24 +0200 | [diff] [blame] | 65 | msg, out, tag, tag_len ); | 
|  | 66 |  | 
|  | 67 | if( res == 0 ) | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 68 | TEST_ASSERT( decrypt_ret == MBEDTLS_ERR_CCM_AUTH_FAILED ); | 
| Manuel Pégourié-Gonnard | 87df5ba | 2014-05-06 18:07:24 +0200 | [diff] [blame] | 69 | else | 
|  | 70 | TEST_ASSERT( decrypt_ret == res ); | 
|  | 71 |  | 
| Paul Bakker | bd51b26 | 2014-07-10 15:26:12 +0200 | [diff] [blame] | 72 | exit: | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 73 | mbedtls_ccm_free( &ctx ); | 
| Manuel Pégourié-Gonnard | 87df5ba | 2014-05-06 18:07:24 +0200 | [diff] [blame] | 74 | } | 
|  | 75 | /* END_CASE */ | 
|  | 76 |  | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 77 | /* BEGIN_CASE */ | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 78 | void mbedtls_ccm_encrypt_and_tag( int cipher_id, | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 79 | char *key_hex, char *msg_hex, | 
|  | 80 | char *iv_hex, char *add_hex, | 
|  | 81 | char *result_hex ) | 
|  | 82 | { | 
| Manuel Pégourié-Gonnard | e8b8d01 | 2014-05-06 18:19:06 +0200 | [diff] [blame] | 83 | unsigned char key[32]; | 
|  | 84 | unsigned char msg[50]; | 
|  | 85 | unsigned char iv[13]; | 
|  | 86 | unsigned char add[32]; | 
| Manuel Pégourié-Gonnard | e8b8d01 | 2014-05-06 18:19:06 +0200 | [diff] [blame] | 87 | unsigned char result[50]; | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 88 | mbedtls_ccm_context ctx; | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 89 | size_t key_len, msg_len, iv_len, add_len, tag_len, result_len; | 
|  | 90 |  | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 91 | mbedtls_ccm_init( &ctx ); | 
|  | 92 |  | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 93 | memset( key, 0x00, sizeof( key ) ); | 
|  | 94 | memset( msg, 0x00, sizeof( msg ) ); | 
|  | 95 | memset( iv, 0x00, sizeof( iv ) ); | 
|  | 96 | memset( add, 0x00, sizeof( add ) ); | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 97 | memset( result, 0x00, sizeof( result ) ); | 
|  | 98 |  | 
|  | 99 | key_len = unhexify( key, key_hex ); | 
|  | 100 | msg_len = unhexify( msg, msg_hex ); | 
|  | 101 | iv_len = unhexify( iv, iv_hex ); | 
|  | 102 | add_len = unhexify( add, add_hex ); | 
|  | 103 | result_len = unhexify( result, result_hex ); | 
|  | 104 | tag_len = result_len - msg_len; | 
|  | 105 |  | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 106 | TEST_ASSERT( mbedtls_ccm_setkey( &ctx, cipher_id, key, key_len * 8 ) == 0 ); | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 107 |  | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 108 | /* Test with input == output */ | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 109 | TEST_ASSERT( mbedtls_ccm_encrypt_and_tag( &ctx, msg_len, iv, iv_len, add, add_len, | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 110 | msg, msg, msg + msg_len, tag_len ) == 0 ); | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 111 |  | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 112 | TEST_ASSERT( memcmp( msg, result, result_len ) == 0 ); | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 113 |  | 
|  | 114 | /* Check we didn't write past the end */ | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 115 | TEST_ASSERT( msg[result_len] == 0 && msg[result_len + 1] == 0 ); | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 116 |  | 
| Paul Bakker | bd51b26 | 2014-07-10 15:26:12 +0200 | [diff] [blame] | 117 | exit: | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 118 | mbedtls_ccm_free( &ctx ); | 
| Manuel Pégourié-Gonnard | 637eb3d | 2014-05-06 12:13:09 +0200 | [diff] [blame] | 119 | } | 
|  | 120 | /* END_CASE */ | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 121 |  | 
|  | 122 | /* BEGIN_CASE */ | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 123 | void mbedtls_ccm_auth_decrypt( int cipher_id, | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 124 | char *key_hex, char *msg_hex, | 
|  | 125 | char *iv_hex, char *add_hex, | 
|  | 126 | int tag_len, char *result_hex ) | 
|  | 127 | { | 
| Manuel Pégourié-Gonnard | e8b8d01 | 2014-05-06 18:19:06 +0200 | [diff] [blame] | 128 | unsigned char key[32]; | 
|  | 129 | unsigned char msg[50]; | 
|  | 130 | unsigned char iv[13]; | 
|  | 131 | unsigned char add[32]; | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 132 | unsigned char tag[16]; | 
| Manuel Pégourié-Gonnard | e8b8d01 | 2014-05-06 18:19:06 +0200 | [diff] [blame] | 133 | unsigned char result[50]; | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 134 | mbedtls_ccm_context ctx; | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 135 | size_t key_len, msg_len, iv_len, add_len, result_len; | 
|  | 136 | int ret; | 
|  | 137 |  | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 138 | mbedtls_ccm_init( &ctx ); | 
|  | 139 |  | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 140 | memset( key, 0x00, sizeof( key ) ); | 
|  | 141 | memset( msg, 0x00, sizeof( msg ) ); | 
|  | 142 | memset( iv, 0x00, sizeof( iv ) ); | 
|  | 143 | memset( add, 0x00, sizeof( add ) ); | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 144 | memset( tag, 0x00, sizeof( tag ) ); | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 145 | memset( result, 0x00, sizeof( result ) ); | 
|  | 146 |  | 
|  | 147 | key_len = unhexify( key, key_hex ); | 
|  | 148 | msg_len = unhexify( msg, msg_hex ); | 
|  | 149 | iv_len = unhexify( iv, iv_hex ); | 
|  | 150 | add_len = unhexify( add, add_hex ); | 
|  | 151 | msg_len -= tag_len; | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 152 | memcpy( tag, msg + msg_len, tag_len ); | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 153 |  | 
|  | 154 | if( strcmp( "FAIL", result_hex ) == 0 ) | 
|  | 155 | { | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 156 | ret = MBEDTLS_ERR_CCM_AUTH_FAILED; | 
| Rich Evans | 63adb49 | 2015-02-10 12:44:07 +0000 | [diff] [blame] | 157 | result_len = -1; | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 158 | } | 
|  | 159 | else | 
|  | 160 | { | 
|  | 161 | ret = 0; | 
|  | 162 | result_len = unhexify( result, result_hex ); | 
|  | 163 | } | 
|  | 164 |  | 
| Manuel Pégourié-Gonnard | 6963ff0 | 2015-04-28 18:02:54 +0200 | [diff] [blame] | 165 | TEST_ASSERT( mbedtls_ccm_setkey( &ctx, cipher_id, key, key_len * 8 ) == 0 ); | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 166 |  | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 167 | /* Test with input == output */ | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 168 | TEST_ASSERT( mbedtls_ccm_auth_decrypt( &ctx, msg_len, iv, iv_len, add, add_len, | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 169 | msg, msg, msg + msg_len, tag_len ) == ret ); | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 170 |  | 
|  | 171 | if( ret == 0 ) | 
|  | 172 | { | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 173 | TEST_ASSERT( memcmp( msg, result, result_len ) == 0 ); | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 174 | } | 
|  | 175 | else | 
|  | 176 | { | 
|  | 177 | size_t i; | 
|  | 178 |  | 
|  | 179 | for( i = 0; i < msg_len; i++ ) | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 180 | TEST_ASSERT( msg[i] == 0 ); | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 181 | } | 
|  | 182 |  | 
| Manuel Pégourié-Gonnard | 0f6b66d | 2014-05-07 14:43:46 +0200 | [diff] [blame] | 183 | /* Check we didn't write past the end (where the original tag is) */ | 
|  | 184 | TEST_ASSERT( memcmp( msg + msg_len, tag, tag_len ) == 0 ); | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 185 |  | 
| Paul Bakker | bd51b26 | 2014-07-10 15:26:12 +0200 | [diff] [blame] | 186 | exit: | 
| Manuel Pégourié-Gonnard | 2cf5a7c | 2015-04-08 12:49:31 +0200 | [diff] [blame] | 187 | mbedtls_ccm_free( &ctx ); | 
| Manuel Pégourié-Gonnard | ce77d55 | 2014-05-06 18:06:52 +0200 | [diff] [blame] | 188 | } | 
|  | 189 | /* END_CASE */ |