hmac_drbg.c 19 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625
  1. /*
  2. * HMAC_DRBG implementation (NIST SP 800-90)
  3. *
  4. * Copyright (C) 2006-2015, ARM Limited, All Rights Reserved
  5. * SPDX-License-Identifier: Apache-2.0
  6. *
  7. * Licensed under the Apache License, Version 2.0 (the "License"); you may
  8. * not use this file except in compliance with the License.
  9. * You may obtain a copy of the License at
  10. *
  11. * http://www.apache.org/licenses/LICENSE-2.0
  12. *
  13. * Unless required by applicable law or agreed to in writing, software
  14. * distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
  15. * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  16. * See the License for the specific language governing permissions and
  17. * limitations under the License.
  18. *
  19. * This file is part of mbed TLS (https://tls.mbed.org)
  20. */
  21. /*
  22. * The NIST SP 800-90A DRBGs are described in the following publication.
  23. * http://csrc.nist.gov/publications/nistpubs/800-90A/SP800-90A.pdf
  24. * References below are based on rev. 1 (January 2012).
  25. */
  26. #if !defined(MBEDTLS_CONFIG_FILE)
  27. #include "mbedtls/config.h"
  28. #else
  29. #include MBEDTLS_CONFIG_FILE
  30. #endif
  31. #if defined(MBEDTLS_HMAC_DRBG_C)
  32. #include "mbedtls/hmac_drbg.h"
  33. #include "mbedtls/platform_util.h"
  34. #include <string.h>
  35. #if defined(MBEDTLS_FS_IO)
  36. #include <stdio.h>
  37. #endif
  38. #if defined(MBEDTLS_SELF_TEST)
  39. #if defined(MBEDTLS_PLATFORM_C)
  40. #include "mbedtls/platform.h"
  41. #else
  42. #include <stdio.h>
  43. #define mbedtls_printf printf
  44. #endif /* MBEDTLS_SELF_TEST */
  45. #endif /* MBEDTLS_PLATFORM_C */
  46. /*
  47. * HMAC_DRBG context initialization
  48. */
  49. void mbedtls_hmac_drbg_init( mbedtls_hmac_drbg_context *ctx )
  50. {
  51. memset( ctx, 0, sizeof( mbedtls_hmac_drbg_context ) );
  52. #if defined(MBEDTLS_THREADING_C)
  53. mbedtls_mutex_init( &ctx->mutex );
  54. #endif
  55. }
  56. /*
  57. * HMAC_DRBG update, using optional additional data (10.1.2.2)
  58. */
  59. int mbedtls_hmac_drbg_update_ret( mbedtls_hmac_drbg_context *ctx,
  60. const unsigned char *additional,
  61. size_t add_len )
  62. {
  63. size_t md_len = mbedtls_md_get_size( ctx->md_ctx.md_info );
  64. unsigned char rounds = ( additional != NULL && add_len != 0 ) ? 2 : 1;
  65. unsigned char sep[1];
  66. unsigned char K[MBEDTLS_MD_MAX_SIZE];
  67. int ret;
  68. for( sep[0] = 0; sep[0] < rounds; sep[0]++ )
  69. {
  70. /* Step 1 or 4 */
  71. if( ( ret = mbedtls_md_hmac_reset( &ctx->md_ctx ) ) != 0 )
  72. goto exit;
  73. if( ( ret = mbedtls_md_hmac_update( &ctx->md_ctx,
  74. ctx->V, md_len ) ) != 0 )
  75. goto exit;
  76. if( ( ret = mbedtls_md_hmac_update( &ctx->md_ctx,
  77. sep, 1 ) ) != 0 )
  78. goto exit;
  79. if( rounds == 2 )
  80. {
  81. if( ( ret = mbedtls_md_hmac_update( &ctx->md_ctx,
  82. additional, add_len ) ) != 0 )
  83. goto exit;
  84. }
  85. if( ( ret = mbedtls_md_hmac_finish( &ctx->md_ctx, K ) ) != 0 )
  86. goto exit;
  87. /* Step 2 or 5 */
  88. if( ( ret = mbedtls_md_hmac_starts( &ctx->md_ctx, K, md_len ) ) != 0 )
  89. goto exit;
  90. if( ( ret = mbedtls_md_hmac_update( &ctx->md_ctx,
  91. ctx->V, md_len ) ) != 0 )
  92. goto exit;
  93. if( ( ret = mbedtls_md_hmac_finish( &ctx->md_ctx, ctx->V ) ) != 0 )
  94. goto exit;
  95. }
  96. exit:
  97. mbedtls_platform_zeroize( K, sizeof( K ) );
  98. return( ret );
  99. }
  100. #if !defined(MBEDTLS_DEPRECATED_REMOVED)
  101. void mbedtls_hmac_drbg_update( mbedtls_hmac_drbg_context *ctx,
  102. const unsigned char *additional,
  103. size_t add_len )
  104. {
  105. (void) mbedtls_hmac_drbg_update_ret( ctx, additional, add_len );
  106. }
  107. #endif /* MBEDTLS_DEPRECATED_REMOVED */
  108. /*
  109. * Simplified HMAC_DRBG initialisation (for use with deterministic ECDSA)
  110. */
  111. int mbedtls_hmac_drbg_seed_buf( mbedtls_hmac_drbg_context *ctx,
  112. const mbedtls_md_info_t * md_info,
  113. const unsigned char *data, size_t data_len )
  114. {
  115. int ret;
  116. if( ( ret = mbedtls_md_setup( &ctx->md_ctx, md_info, 1 ) ) != 0 )
  117. return( ret );
  118. /*
  119. * Set initial working state.
  120. * Use the V memory location, which is currently all 0, to initialize the
  121. * MD context with an all-zero key. Then set V to its initial value.
  122. */
  123. if( ( ret = mbedtls_md_hmac_starts( &ctx->md_ctx, ctx->V,
  124. mbedtls_md_get_size( md_info ) ) ) != 0 )
  125. return( ret );
  126. memset( ctx->V, 0x01, mbedtls_md_get_size( md_info ) );
  127. if( ( ret = mbedtls_hmac_drbg_update_ret( ctx, data, data_len ) ) != 0 )
  128. return( ret );
  129. return( 0 );
  130. }
  131. /*
  132. * Internal function used both for seeding and reseeding the DRBG.
  133. * Comments starting with arabic numbers refer to section 10.1.2.4
  134. * of SP800-90A, while roman numbers refer to section 9.2.
  135. */
  136. static int hmac_drbg_reseed_core( mbedtls_hmac_drbg_context *ctx,
  137. const unsigned char *additional, size_t len,
  138. int use_nonce )
  139. {
  140. unsigned char seed[MBEDTLS_HMAC_DRBG_MAX_SEED_INPUT];
  141. size_t seedlen = 0;
  142. int ret;
  143. {
  144. size_t total_entropy_len;
  145. if( use_nonce == 0 )
  146. total_entropy_len = ctx->entropy_len;
  147. else
  148. total_entropy_len = ctx->entropy_len * 3 / 2;
  149. /* III. Check input length */
  150. if( len > MBEDTLS_HMAC_DRBG_MAX_INPUT ||
  151. total_entropy_len + len > MBEDTLS_HMAC_DRBG_MAX_SEED_INPUT )
  152. {
  153. return( MBEDTLS_ERR_HMAC_DRBG_INPUT_TOO_BIG );
  154. }
  155. }
  156. memset( seed, 0, MBEDTLS_HMAC_DRBG_MAX_SEED_INPUT );
  157. /* IV. Gather entropy_len bytes of entropy for the seed */
  158. if( ( ret = ctx->f_entropy( ctx->p_entropy,
  159. seed, ctx->entropy_len ) ) != 0 )
  160. {
  161. return( MBEDTLS_ERR_HMAC_DRBG_ENTROPY_SOURCE_FAILED );
  162. }
  163. seedlen += ctx->entropy_len;
  164. /* For initial seeding, allow adding of nonce generated
  165. * from the entropy source. See Sect 8.6.7 in SP800-90A. */
  166. if( use_nonce )
  167. {
  168. /* Note: We don't merge the two calls to f_entropy() in order
  169. * to avoid requesting too much entropy from f_entropy()
  170. * at once. Specifically, if the underlying digest is not
  171. * SHA-1, 3 / 2 * entropy_len is at least 36 Bytes, which
  172. * is larger than the maximum of 32 Bytes that our own
  173. * entropy source implementation can emit in a single
  174. * call in configurations disabling SHA-512. */
  175. if( ( ret = ctx->f_entropy( ctx->p_entropy,
  176. seed + seedlen,
  177. ctx->entropy_len / 2 ) ) != 0 )
  178. {
  179. return( MBEDTLS_ERR_HMAC_DRBG_ENTROPY_SOURCE_FAILED );
  180. }
  181. seedlen += ctx->entropy_len / 2;
  182. }
  183. /* 1. Concatenate entropy and additional data if any */
  184. if( additional != NULL && len != 0 )
  185. {
  186. memcpy( seed + seedlen, additional, len );
  187. seedlen += len;
  188. }
  189. /* 2. Update state */
  190. if( ( ret = mbedtls_hmac_drbg_update_ret( ctx, seed, seedlen ) ) != 0 )
  191. goto exit;
  192. /* 3. Reset reseed_counter */
  193. ctx->reseed_counter = 1;
  194. exit:
  195. /* 4. Done */
  196. mbedtls_platform_zeroize( seed, seedlen );
  197. return( ret );
  198. }
  199. /*
  200. * HMAC_DRBG reseeding: 10.1.2.4 + 9.2
  201. */
  202. int mbedtls_hmac_drbg_reseed( mbedtls_hmac_drbg_context *ctx,
  203. const unsigned char *additional, size_t len )
  204. {
  205. return( hmac_drbg_reseed_core( ctx, additional, len, 0 ) );
  206. }
  207. /*
  208. * HMAC_DRBG initialisation (10.1.2.3 + 9.1)
  209. *
  210. * The nonce is not passed as a separate parameter but extracted
  211. * from the entropy source as suggested in 8.6.7.
  212. */
  213. int mbedtls_hmac_drbg_seed( mbedtls_hmac_drbg_context *ctx,
  214. const mbedtls_md_info_t * md_info,
  215. int (*f_entropy)(void *, unsigned char *, size_t),
  216. void *p_entropy,
  217. const unsigned char *custom,
  218. size_t len )
  219. {
  220. int ret;
  221. size_t md_size;
  222. if( ( ret = mbedtls_md_setup( &ctx->md_ctx, md_info, 1 ) ) != 0 )
  223. return( ret );
  224. md_size = mbedtls_md_get_size( md_info );
  225. /*
  226. * Set initial working state.
  227. * Use the V memory location, which is currently all 0, to initialize the
  228. * MD context with an all-zero key. Then set V to its initial value.
  229. */
  230. if( ( ret = mbedtls_md_hmac_starts( &ctx->md_ctx, ctx->V, md_size ) ) != 0 )
  231. return( ret );
  232. memset( ctx->V, 0x01, md_size );
  233. ctx->f_entropy = f_entropy;
  234. ctx->p_entropy = p_entropy;
  235. ctx->reseed_interval = MBEDTLS_HMAC_DRBG_RESEED_INTERVAL;
  236. if( ctx->entropy_len == 0 )
  237. {
  238. /*
  239. * See SP800-57 5.6.1 (p. 65-66) for the security strength provided by
  240. * each hash function, then according to SP800-90A rev1 10.1 table 2,
  241. * min_entropy_len (in bits) is security_strength.
  242. *
  243. * (This also matches the sizes used in the NIST test vectors.)
  244. */
  245. ctx->entropy_len = md_size <= 20 ? 16 : /* 160-bits hash -> 128 bits */
  246. md_size <= 28 ? 24 : /* 224-bits hash -> 192 bits */
  247. 32; /* better (256+) -> 256 bits */
  248. }
  249. if( ( ret = hmac_drbg_reseed_core( ctx, custom, len,
  250. 1 /* add nonce */ ) ) != 0 )
  251. {
  252. return( ret );
  253. }
  254. return( 0 );
  255. }
  256. /*
  257. * Set prediction resistance
  258. */
  259. void mbedtls_hmac_drbg_set_prediction_resistance( mbedtls_hmac_drbg_context *ctx,
  260. int resistance )
  261. {
  262. ctx->prediction_resistance = resistance;
  263. }
  264. /*
  265. * Set entropy length grabbed for seeding
  266. */
  267. void mbedtls_hmac_drbg_set_entropy_len( mbedtls_hmac_drbg_context *ctx, size_t len )
  268. {
  269. ctx->entropy_len = len;
  270. }
  271. /*
  272. * Set reseed interval
  273. */
  274. void mbedtls_hmac_drbg_set_reseed_interval( mbedtls_hmac_drbg_context *ctx, int interval )
  275. {
  276. ctx->reseed_interval = interval;
  277. }
  278. /*
  279. * HMAC_DRBG random function with optional additional data:
  280. * 10.1.2.5 (arabic) + 9.3 (Roman)
  281. */
  282. int mbedtls_hmac_drbg_random_with_add( void *p_rng,
  283. unsigned char *output, size_t out_len,
  284. const unsigned char *additional, size_t add_len )
  285. {
  286. int ret;
  287. mbedtls_hmac_drbg_context *ctx = (mbedtls_hmac_drbg_context *) p_rng;
  288. size_t md_len = mbedtls_md_get_size( ctx->md_ctx.md_info );
  289. size_t left = out_len;
  290. unsigned char *out = output;
  291. /* II. Check request length */
  292. if( out_len > MBEDTLS_HMAC_DRBG_MAX_REQUEST )
  293. return( MBEDTLS_ERR_HMAC_DRBG_REQUEST_TOO_BIG );
  294. /* III. Check input length */
  295. if( add_len > MBEDTLS_HMAC_DRBG_MAX_INPUT )
  296. return( MBEDTLS_ERR_HMAC_DRBG_INPUT_TOO_BIG );
  297. /* 1. (aka VII and IX) Check reseed counter and PR */
  298. if( ctx->f_entropy != NULL && /* For no-reseeding instances */
  299. ( ctx->prediction_resistance == MBEDTLS_HMAC_DRBG_PR_ON ||
  300. ctx->reseed_counter > ctx->reseed_interval ) )
  301. {
  302. if( ( ret = mbedtls_hmac_drbg_reseed( ctx, additional, add_len ) ) != 0 )
  303. return( ret );
  304. add_len = 0; /* VII.4 */
  305. }
  306. /* 2. Use additional data if any */
  307. if( additional != NULL && add_len != 0 )
  308. {
  309. if( ( ret = mbedtls_hmac_drbg_update_ret( ctx,
  310. additional, add_len ) ) != 0 )
  311. goto exit;
  312. }
  313. /* 3, 4, 5. Generate bytes */
  314. while( left != 0 )
  315. {
  316. size_t use_len = left > md_len ? md_len : left;
  317. if( ( ret = mbedtls_md_hmac_reset( &ctx->md_ctx ) ) != 0 )
  318. goto exit;
  319. if( ( ret = mbedtls_md_hmac_update( &ctx->md_ctx,
  320. ctx->V, md_len ) ) != 0 )
  321. goto exit;
  322. if( ( ret = mbedtls_md_hmac_finish( &ctx->md_ctx, ctx->V ) ) != 0 )
  323. goto exit;
  324. memcpy( out, ctx->V, use_len );
  325. out += use_len;
  326. left -= use_len;
  327. }
  328. /* 6. Update */
  329. if( ( ret = mbedtls_hmac_drbg_update_ret( ctx,
  330. additional, add_len ) ) != 0 )
  331. goto exit;
  332. /* 7. Update reseed counter */
  333. ctx->reseed_counter++;
  334. exit:
  335. /* 8. Done */
  336. return( ret );
  337. }
  338. /*
  339. * HMAC_DRBG random function
  340. */
  341. int mbedtls_hmac_drbg_random( void *p_rng, unsigned char *output, size_t out_len )
  342. {
  343. int ret;
  344. mbedtls_hmac_drbg_context *ctx = (mbedtls_hmac_drbg_context *) p_rng;
  345. #if defined(MBEDTLS_THREADING_C)
  346. if( ( ret = mbedtls_mutex_lock( &ctx->mutex ) ) != 0 )
  347. return( ret );
  348. #endif
  349. ret = mbedtls_hmac_drbg_random_with_add( ctx, output, out_len, NULL, 0 );
  350. #if defined(MBEDTLS_THREADING_C)
  351. if( mbedtls_mutex_unlock( &ctx->mutex ) != 0 )
  352. return( MBEDTLS_ERR_THREADING_MUTEX_ERROR );
  353. #endif
  354. return( ret );
  355. }
  356. /*
  357. * Free an HMAC_DRBG context
  358. */
  359. void mbedtls_hmac_drbg_free( mbedtls_hmac_drbg_context *ctx )
  360. {
  361. if( ctx == NULL )
  362. return;
  363. #if defined(MBEDTLS_THREADING_C)
  364. mbedtls_mutex_free( &ctx->mutex );
  365. #endif
  366. mbedtls_md_free( &ctx->md_ctx );
  367. mbedtls_platform_zeroize( ctx, sizeof( mbedtls_hmac_drbg_context ) );
  368. }
  369. #if defined(MBEDTLS_FS_IO)
  370. int mbedtls_hmac_drbg_write_seed_file( mbedtls_hmac_drbg_context *ctx, const char *path )
  371. {
  372. int ret;
  373. FILE *f;
  374. unsigned char buf[ MBEDTLS_HMAC_DRBG_MAX_INPUT ];
  375. if( ( f = fopen( path, "wb" ) ) == NULL )
  376. return( MBEDTLS_ERR_HMAC_DRBG_FILE_IO_ERROR );
  377. if( ( ret = mbedtls_hmac_drbg_random( ctx, buf, sizeof( buf ) ) ) != 0 )
  378. goto exit;
  379. if( fwrite( buf, 1, sizeof( buf ), f ) != sizeof( buf ) )
  380. {
  381. ret = MBEDTLS_ERR_HMAC_DRBG_FILE_IO_ERROR;
  382. goto exit;
  383. }
  384. ret = 0;
  385. exit:
  386. fclose( f );
  387. mbedtls_platform_zeroize( buf, sizeof( buf ) );
  388. return( ret );
  389. }
  390. int mbedtls_hmac_drbg_update_seed_file( mbedtls_hmac_drbg_context *ctx, const char *path )
  391. {
  392. int ret = 0;
  393. FILE *f = NULL;
  394. size_t n;
  395. unsigned char buf[ MBEDTLS_HMAC_DRBG_MAX_INPUT ];
  396. unsigned char c;
  397. if( ( f = fopen( path, "rb" ) ) == NULL )
  398. return( MBEDTLS_ERR_HMAC_DRBG_FILE_IO_ERROR );
  399. n = fread( buf, 1, sizeof( buf ), f );
  400. if( fread( &c, 1, 1, f ) != 0 )
  401. {
  402. ret = MBEDTLS_ERR_HMAC_DRBG_INPUT_TOO_BIG;
  403. goto exit;
  404. }
  405. if( n == 0 || ferror( f ) )
  406. {
  407. ret = MBEDTLS_ERR_HMAC_DRBG_FILE_IO_ERROR;
  408. goto exit;
  409. }
  410. fclose( f );
  411. f = NULL;
  412. ret = mbedtls_hmac_drbg_update_ret( ctx, buf, n );
  413. exit:
  414. mbedtls_platform_zeroize( buf, sizeof( buf ) );
  415. if( f != NULL )
  416. fclose( f );
  417. if( ret != 0 )
  418. return( ret );
  419. return( mbedtls_hmac_drbg_write_seed_file( ctx, path ) );
  420. }
  421. #endif /* MBEDTLS_FS_IO */
  422. #if defined(MBEDTLS_SELF_TEST)
  423. #if !defined(MBEDTLS_SHA1_C)
  424. /* Dummy checkup routine */
  425. int mbedtls_hmac_drbg_self_test( int verbose )
  426. {
  427. (void) verbose;
  428. return( 0 );
  429. }
  430. #else
  431. #define OUTPUT_LEN 80
  432. /* From a NIST PR=true test vector */
  433. static const unsigned char entropy_pr[] = {
  434. 0xa0, 0xc9, 0xab, 0x58, 0xf1, 0xe2, 0xe5, 0xa4, 0xde, 0x3e, 0xbd, 0x4f,
  435. 0xf7, 0x3e, 0x9c, 0x5b, 0x64, 0xef, 0xd8, 0xca, 0x02, 0x8c, 0xf8, 0x11,
  436. 0x48, 0xa5, 0x84, 0xfe, 0x69, 0xab, 0x5a, 0xee, 0x42, 0xaa, 0x4d, 0x42,
  437. 0x17, 0x60, 0x99, 0xd4, 0x5e, 0x13, 0x97, 0xdc, 0x40, 0x4d, 0x86, 0xa3,
  438. 0x7b, 0xf5, 0x59, 0x54, 0x75, 0x69, 0x51, 0xe4 };
  439. static const unsigned char result_pr[OUTPUT_LEN] = {
  440. 0x9a, 0x00, 0xa2, 0xd0, 0x0e, 0xd5, 0x9b, 0xfe, 0x31, 0xec, 0xb1, 0x39,
  441. 0x9b, 0x60, 0x81, 0x48, 0xd1, 0x96, 0x9d, 0x25, 0x0d, 0x3c, 0x1e, 0x94,
  442. 0x10, 0x10, 0x98, 0x12, 0x93, 0x25, 0xca, 0xb8, 0xfc, 0xcc, 0x2d, 0x54,
  443. 0x73, 0x19, 0x70, 0xc0, 0x10, 0x7a, 0xa4, 0x89, 0x25, 0x19, 0x95, 0x5e,
  444. 0x4b, 0xc6, 0x00, 0x1d, 0x7f, 0x4e, 0x6a, 0x2b, 0xf8, 0xa3, 0x01, 0xab,
  445. 0x46, 0x05, 0x5c, 0x09, 0xa6, 0x71, 0x88, 0xf1, 0xa7, 0x40, 0xee, 0xf3,
  446. 0xe1, 0x5c, 0x02, 0x9b, 0x44, 0xaf, 0x03, 0x44 };
  447. /* From a NIST PR=false test vector */
  448. static const unsigned char entropy_nopr[] = {
  449. 0x79, 0x34, 0x9b, 0xbf, 0x7c, 0xdd, 0xa5, 0x79, 0x95, 0x57, 0x86, 0x66,
  450. 0x21, 0xc9, 0x13, 0x83, 0x11, 0x46, 0x73, 0x3a, 0xbf, 0x8c, 0x35, 0xc8,
  451. 0xc7, 0x21, 0x5b, 0x5b, 0x96, 0xc4, 0x8e, 0x9b, 0x33, 0x8c, 0x74, 0xe3,
  452. 0xe9, 0x9d, 0xfe, 0xdf };
  453. static const unsigned char result_nopr[OUTPUT_LEN] = {
  454. 0xc6, 0xa1, 0x6a, 0xb8, 0xd4, 0x20, 0x70, 0x6f, 0x0f, 0x34, 0xab, 0x7f,
  455. 0xec, 0x5a, 0xdc, 0xa9, 0xd8, 0xca, 0x3a, 0x13, 0x3e, 0x15, 0x9c, 0xa6,
  456. 0xac, 0x43, 0xc6, 0xf8, 0xa2, 0xbe, 0x22, 0x83, 0x4a, 0x4c, 0x0a, 0x0a,
  457. 0xff, 0xb1, 0x0d, 0x71, 0x94, 0xf1, 0xc1, 0xa5, 0xcf, 0x73, 0x22, 0xec,
  458. 0x1a, 0xe0, 0x96, 0x4e, 0xd4, 0xbf, 0x12, 0x27, 0x46, 0xe0, 0x87, 0xfd,
  459. 0xb5, 0xb3, 0xe9, 0x1b, 0x34, 0x93, 0xd5, 0xbb, 0x98, 0xfa, 0xed, 0x49,
  460. 0xe8, 0x5f, 0x13, 0x0f, 0xc8, 0xa4, 0x59, 0xb7 };
  461. /* "Entropy" from buffer */
  462. static size_t test_offset;
  463. static int hmac_drbg_self_test_entropy( void *data,
  464. unsigned char *buf, size_t len )
  465. {
  466. const unsigned char *p = data;
  467. memcpy( buf, p + test_offset, len );
  468. test_offset += len;
  469. return( 0 );
  470. }
  471. #define CHK( c ) if( (c) != 0 ) \
  472. { \
  473. if( verbose != 0 ) \
  474. mbedtls_printf( "failed\n" ); \
  475. return( 1 ); \
  476. }
  477. /*
  478. * Checkup routine for HMAC_DRBG with SHA-1
  479. */
  480. int mbedtls_hmac_drbg_self_test( int verbose )
  481. {
  482. mbedtls_hmac_drbg_context ctx;
  483. unsigned char buf[OUTPUT_LEN];
  484. const mbedtls_md_info_t *md_info = mbedtls_md_info_from_type( MBEDTLS_MD_SHA1 );
  485. mbedtls_hmac_drbg_init( &ctx );
  486. /*
  487. * PR = True
  488. */
  489. if( verbose != 0 )
  490. mbedtls_printf( " HMAC_DRBG (PR = True) : " );
  491. test_offset = 0;
  492. CHK( mbedtls_hmac_drbg_seed( &ctx, md_info,
  493. hmac_drbg_self_test_entropy, (void *) entropy_pr,
  494. NULL, 0 ) );
  495. mbedtls_hmac_drbg_set_prediction_resistance( &ctx, MBEDTLS_HMAC_DRBG_PR_ON );
  496. CHK( mbedtls_hmac_drbg_random( &ctx, buf, OUTPUT_LEN ) );
  497. CHK( mbedtls_hmac_drbg_random( &ctx, buf, OUTPUT_LEN ) );
  498. CHK( memcmp( buf, result_pr, OUTPUT_LEN ) );
  499. mbedtls_hmac_drbg_free( &ctx );
  500. mbedtls_hmac_drbg_free( &ctx );
  501. if( verbose != 0 )
  502. mbedtls_printf( "passed\n" );
  503. /*
  504. * PR = False
  505. */
  506. if( verbose != 0 )
  507. mbedtls_printf( " HMAC_DRBG (PR = False) : " );
  508. mbedtls_hmac_drbg_init( &ctx );
  509. test_offset = 0;
  510. CHK( mbedtls_hmac_drbg_seed( &ctx, md_info,
  511. hmac_drbg_self_test_entropy, (void *) entropy_nopr,
  512. NULL, 0 ) );
  513. CHK( mbedtls_hmac_drbg_reseed( &ctx, NULL, 0 ) );
  514. CHK( mbedtls_hmac_drbg_random( &ctx, buf, OUTPUT_LEN ) );
  515. CHK( mbedtls_hmac_drbg_random( &ctx, buf, OUTPUT_LEN ) );
  516. CHK( memcmp( buf, result_nopr, OUTPUT_LEN ) );
  517. mbedtls_hmac_drbg_free( &ctx );
  518. mbedtls_hmac_drbg_free( &ctx );
  519. if( verbose != 0 )
  520. mbedtls_printf( "passed\n" );
  521. if( verbose != 0 )
  522. mbedtls_printf( "\n" );
  523. return( 0 );
  524. }
  525. #endif /* MBEDTLS_SHA1_C */
  526. #endif /* MBEDTLS_SELF_TEST */
  527. #endif /* MBEDTLS_HMAC_DRBG_C */