Paul Bakker | 5c60de2 | 2009-07-08 19:47:36 +0000 | [diff] [blame] | 1 | BEGIN_HEADER |
| 2 | #include <polarssl/dhm.h> |
| 3 | |
| 4 | static int myrand( void *r ) |
| 5 | { |
| 6 | if ( r != NULL ) |
| 7 | r = NULL; |
| 8 | |
| 9 | return( rand() ); |
| 10 | } |
| 11 | |
| 12 | END_HEADER |
| 13 | |
| 14 | BEGIN_CASE |
| 15 | dhm_do_dhm:x_size:radix_P:input_P:radix_G:input_G |
| 16 | { |
| 17 | dhm_context ctx_srv; |
| 18 | dhm_context ctx_cli; |
| 19 | unsigned char ske[1000]; |
| 20 | unsigned char *p = ske; |
| 21 | unsigned char pub_cli[1000]; |
| 22 | unsigned char sec_srv[1000]; |
| 23 | unsigned char sec_cli[1000]; |
| 24 | int ske_len = 0; |
| 25 | int pub_cli_len = 0; |
| 26 | int sec_srv_len = 1000; |
| 27 | int sec_cli_len = 1000; |
Paul Bakker | 69998dd | 2009-07-11 19:15:20 +0000 | [diff] [blame^] | 28 | int x_size; |
Paul Bakker | 5c60de2 | 2009-07-08 19:47:36 +0000 | [diff] [blame] | 29 | |
| 30 | memset( &ctx_srv, 0x00, sizeof( dhm_context ) ); |
| 31 | memset( &ctx_cli, 0x00, sizeof( dhm_context ) ); |
| 32 | memset( ske, 0x00, 1000 ); |
| 33 | memset( pub_cli, 0x00, 1000 ); |
| 34 | memset( sec_srv, 0x00, 1000 ); |
| 35 | memset( sec_cli, 0x00, 1000 ); |
| 36 | |
| 37 | TEST_ASSERT( mpi_read_string( &ctx_srv.P, {radix_P}, {input_P} ) == 0 ); |
| 38 | TEST_ASSERT( mpi_read_string( &ctx_srv.G, {radix_G}, {input_G} ) == 0 ); |
Paul Bakker | 69998dd | 2009-07-11 19:15:20 +0000 | [diff] [blame^] | 39 | x_size = mpi_size( &ctx_srv.P ); |
Paul Bakker | 5c60de2 | 2009-07-08 19:47:36 +0000 | [diff] [blame] | 40 | |
| 41 | TEST_ASSERT( dhm_make_params( &ctx_srv, x_size, ske, &ske_len, &myrand, NULL ) == 0 ); |
| 42 | ske[ske_len++] = 0; |
| 43 | ske[ske_len++] = 0; |
| 44 | TEST_ASSERT( dhm_read_params( &ctx_cli, &p, ske + ske_len ) == 0 ); |
| 45 | |
| 46 | pub_cli_len = x_size; |
| 47 | TEST_ASSERT( dhm_make_public( &ctx_cli, x_size, pub_cli, pub_cli_len, &myrand, NULL ) == 0 ); |
| 48 | |
| 49 | TEST_ASSERT( dhm_read_public( &ctx_srv, pub_cli, pub_cli_len ) == 0 ); |
| 50 | |
| 51 | TEST_ASSERT( dhm_calc_secret( &ctx_srv, sec_srv, &sec_srv_len ) == 0 ); |
| 52 | TEST_ASSERT( dhm_calc_secret( &ctx_cli, sec_cli, &sec_cli_len ) == 0 ); |
| 53 | |
| 54 | TEST_ASSERT( sec_srv_len == sec_cli_len ); |
| 55 | TEST_ASSERT( sec_srv_len != 0 ); |
| 56 | TEST_ASSERT( memcmp( sec_srv, sec_cli, sec_srv_len ) == 0 ); |
| 57 | } |
| 58 | END_CASE |