| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758 | 
							- BEGIN_HEADER
 
- #include <polarssl/dhm.h>
 
- END_HEADER
 
- BEGIN_DEPENDENCIES
 
- depends_on:POLARSSL_DHM_C:POLARSSL_BIGNUM_C
 
- END_DEPENDENCIES
 
- BEGIN_CASE
 
- dhm_do_dhm:x_size:radix_P:input_P:radix_G:input_G
 
- {
 
-     dhm_context ctx_srv;
 
-     dhm_context ctx_cli;
 
-     unsigned char ske[1000];
 
-     unsigned char *p = ske;
 
-     unsigned char pub_cli[1000];
 
-     unsigned char sec_srv[1000];
 
-     unsigned char sec_cli[1000];
 
-     size_t ske_len = 0;
 
-     size_t pub_cli_len = 0;
 
-     size_t sec_srv_len = 1000;
 
-     size_t sec_cli_len = 1000;
 
-     int x_size;
 
-     rnd_pseudo_info rnd_info;
 
-     memset( &ctx_srv, 0x00, sizeof( dhm_context ) );
 
-     memset( &ctx_cli, 0x00, sizeof( dhm_context ) );
 
-     memset( ske, 0x00, 1000 );
 
-     memset( pub_cli, 0x00, 1000 );
 
-     memset( sec_srv, 0x00, 1000 );
 
-     memset( sec_cli, 0x00, 1000 );
 
-     memset( &rnd_info, 0x00, sizeof( rnd_pseudo_info ) );
 
-     TEST_ASSERT( mpi_read_string( &ctx_srv.P, {radix_P}, {input_P} ) == 0 );
 
-     TEST_ASSERT( mpi_read_string( &ctx_srv.G, {radix_G}, {input_G} ) == 0 );
 
-     x_size = mpi_size( &ctx_srv.P );
 
-     TEST_ASSERT( dhm_make_params( &ctx_srv, x_size, ske, &ske_len, &rnd_pseudo_rand, &rnd_info ) == 0 );
 
-     ske[ske_len++] = 0;
 
-     ske[ske_len++] = 0;
 
-     TEST_ASSERT( dhm_read_params( &ctx_cli, &p, ske + ske_len ) == 0 );
 
-     pub_cli_len = x_size;
 
-     TEST_ASSERT( dhm_make_public( &ctx_cli, x_size, pub_cli, pub_cli_len, &rnd_pseudo_rand, &rnd_info ) == 0 );
 
-     TEST_ASSERT( dhm_read_public( &ctx_srv, pub_cli, pub_cli_len ) == 0 );
 
-     TEST_ASSERT( dhm_calc_secret( &ctx_srv, sec_srv, &sec_srv_len ) == 0 );
 
-     TEST_ASSERT( dhm_calc_secret( &ctx_cli, sec_cli, &sec_cli_len ) == 0 );
 
-     TEST_ASSERT( sec_srv_len == sec_cli_len );
 
-     TEST_ASSERT( sec_srv_len != 0 );
 
-     TEST_ASSERT( memcmp( sec_srv, sec_cli, sec_srv_len ) == 0 );
 
-     dhm_free( &ctx_srv );
 
-     dhm_free( &ctx_cli );
 
- }
 
- END_CASE
 
 
  |