blob: 23526623f23f71e1b97971ee55eb33341c135ca5 [file] [log] [blame]
Paul Bakker5c60de22009-07-08 19:47:36 +00001BEGIN_HEADER
2#include <polarssl/dhm.h>
Paul Bakker5c60de22009-07-08 19:47:36 +00003END_HEADER
4
5BEGIN_CASE
6dhm_do_dhm:x_size:radix_P:input_P:radix_G:input_G
7{
8 dhm_context ctx_srv;
9 dhm_context ctx_cli;
10 unsigned char ske[1000];
11 unsigned char *p = ske;
12 unsigned char pub_cli[1000];
13 unsigned char sec_srv[1000];
14 unsigned char sec_cli[1000];
Paul Bakkerf4a3f302011-04-24 15:53:29 +000015 size_t ske_len = 0;
16 size_t pub_cli_len = 0;
17 size_t sec_srv_len = 1000;
18 size_t sec_cli_len = 1000;
Paul Bakker69998dd2009-07-11 19:15:20 +000019 int x_size;
Paul Bakker997bbd12011-03-13 15:45:42 +000020 rnd_pseudo_info rnd_info;
Paul Bakker5c60de22009-07-08 19:47:36 +000021
22 memset( &ctx_srv, 0x00, sizeof( dhm_context ) );
23 memset( &ctx_cli, 0x00, sizeof( dhm_context ) );
24 memset( ske, 0x00, 1000 );
25 memset( pub_cli, 0x00, 1000 );
26 memset( sec_srv, 0x00, 1000 );
27 memset( sec_cli, 0x00, 1000 );
Paul Bakker997bbd12011-03-13 15:45:42 +000028 memset( &rnd_info, 0x00, sizeof( rnd_pseudo_info ) );
Paul Bakker5c60de22009-07-08 19:47:36 +000029
30 TEST_ASSERT( mpi_read_string( &ctx_srv.P, {radix_P}, {input_P} ) == 0 );
31 TEST_ASSERT( mpi_read_string( &ctx_srv.G, {radix_G}, {input_G} ) == 0 );
Paul Bakker69998dd2009-07-11 19:15:20 +000032 x_size = mpi_size( &ctx_srv.P );
Paul Bakker5c60de22009-07-08 19:47:36 +000033
Paul Bakker997bbd12011-03-13 15:45:42 +000034 TEST_ASSERT( dhm_make_params( &ctx_srv, x_size, ske, &ske_len, &rnd_pseudo_rand, &rnd_info ) == 0 );
Paul Bakker5c60de22009-07-08 19:47:36 +000035 ske[ske_len++] = 0;
36 ske[ske_len++] = 0;
37 TEST_ASSERT( dhm_read_params( &ctx_cli, &p, ske + ske_len ) == 0 );
38
39 pub_cli_len = x_size;
Paul Bakker997bbd12011-03-13 15:45:42 +000040 TEST_ASSERT( dhm_make_public( &ctx_cli, x_size, pub_cli, pub_cli_len, &rnd_pseudo_rand, &rnd_info ) == 0 );
Paul Bakker5c60de22009-07-08 19:47:36 +000041
42 TEST_ASSERT( dhm_read_public( &ctx_srv, pub_cli, pub_cli_len ) == 0 );
43
44 TEST_ASSERT( dhm_calc_secret( &ctx_srv, sec_srv, &sec_srv_len ) == 0 );
45 TEST_ASSERT( dhm_calc_secret( &ctx_cli, sec_cli, &sec_cli_len ) == 0 );
46
47 TEST_ASSERT( sec_srv_len == sec_cli_len );
48 TEST_ASSERT( sec_srv_len != 0 );
49 TEST_ASSERT( memcmp( sec_srv, sec_cli, sec_srv_len ) == 0 );
Paul Bakkerc43481a2011-02-20 16:34:26 +000050
51 dhm_free( &ctx_srv );
52 dhm_free( &ctx_cli );
Paul Bakker5c60de22009-07-08 19:47:36 +000053}
54END_CASE