Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 1 | /* BEGIN_HEADER */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 2 | #include <polarssl/bignum.h> |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 3 | /* END_HEADER */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 4 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 5 | /* BEGIN_DEPENDENCIES |
| 6 | * depends_on:POLARSSL_BIGNUM_C |
| 7 | * END_DEPENDENCIES |
| 8 | */ |
Paul Bakker | 5690efc | 2011-05-26 13:16:06 +0000 | [diff] [blame] | 9 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 10 | /* BEGIN_CASE */ |
| 11 | void mpi_read_write_string( int radix_X, char *input_X, int radix_A, |
| 12 | char *input_A, int output_size, int result_read, |
| 13 | int result_write ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 14 | { |
| 15 | mpi X; |
| 16 | char str[1000]; |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 17 | size_t len = output_size; |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 18 | |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 19 | mpi_init( &X ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 20 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 21 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == result_read ); |
| 22 | if( result_read == 0 ) |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 23 | { |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 24 | TEST_ASSERT( mpi_write_string( &X, radix_A, str, &len ) == result_write ); |
| 25 | if( result_write == 0 ) |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 26 | { |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 27 | TEST_ASSERT( strcasecmp( str, input_A ) == 0 ); |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 28 | } |
| 29 | } |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 30 | |
| 31 | mpi_free( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 32 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 33 | /* END_CASE */ |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 34 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 35 | /* BEGIN_CASE */ |
| 36 | void mpi_read_binary( char *input_X, int radix_A, char *input_A ) |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 37 | { |
| 38 | mpi X; |
| 39 | unsigned char str[1000]; |
| 40 | unsigned char buf[1000]; |
Paul Bakker | f4a3f30 | 2011-04-24 15:53:29 +0000 | [diff] [blame] | 41 | size_t len = 1000; |
| 42 | size_t input_len; |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 43 | |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 44 | mpi_init( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 45 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 46 | input_len = unhexify( buf, input_X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 47 | |
| 48 | TEST_ASSERT( mpi_read_binary( &X, buf, input_len ) == 0 ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 49 | TEST_ASSERT( mpi_write_string( &X, radix_A, (char *) str, &len ) == 0 ); |
| 50 | TEST_ASSERT( strcmp( (char *) str, input_A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 51 | |
| 52 | mpi_free( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 53 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 54 | /* END_CASE */ |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 55 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 56 | /* BEGIN_CASE */ |
| 57 | void mpi_write_binary( int radix_X, char *input_X, char *input_A, |
| 58 | int output_size, int result ) |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 59 | { |
| 60 | mpi X; |
| 61 | unsigned char str[1000]; |
| 62 | unsigned char buf[1000]; |
Paul Bakker | f4a3f30 | 2011-04-24 15:53:29 +0000 | [diff] [blame] | 63 | size_t buflen; |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 64 | |
| 65 | memset( buf, 0x00, 1000 ); |
| 66 | memset( str, 0x00, 1000 ); |
| 67 | |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 68 | mpi_init( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 69 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 70 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 71 | |
Paul Bakker | 69998dd | 2009-07-11 19:15:20 +0000 | [diff] [blame] | 72 | buflen = mpi_size( &X ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 73 | if( buflen > (size_t) output_size ) |
| 74 | buflen = (size_t) output_size; |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 75 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 76 | TEST_ASSERT( mpi_write_binary( &X, buf, buflen ) == result ); |
| 77 | if( result == 0) |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 78 | { |
| 79 | hexify( str, buf, buflen ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 80 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 81 | TEST_ASSERT( strcasecmp( (char *) str, input_A ) == 0 ); |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 82 | } |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 83 | |
| 84 | mpi_free( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 85 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 86 | /* END_CASE */ |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 87 | |
Paul Bakker | 428b9ba | 2013-09-15 15:20:37 +0200 | [diff] [blame] | 88 | /* BEGIN_CASE depends_on:POLARSSL_FS_IO */ |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 89 | void mpi_read_file( int radix_X, char *input_file, char *input_A, |
| 90 | int result ) |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 91 | { |
| 92 | mpi X; |
| 93 | unsigned char str[1000]; |
| 94 | unsigned char buf[1000]; |
Paul Bakker | f4a3f30 | 2011-04-24 15:53:29 +0000 | [diff] [blame] | 95 | size_t buflen; |
Paul Bakker | 69998dd | 2009-07-11 19:15:20 +0000 | [diff] [blame] | 96 | FILE *file; |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 97 | |
| 98 | memset( buf, 0x00, 1000 ); |
| 99 | memset( str, 0x00, 1000 ); |
| 100 | |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 101 | mpi_init( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 102 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 103 | file = fopen( input_file, "r" ); |
| 104 | TEST_ASSERT( mpi_read_file( &X, radix_X, file ) == result ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 105 | fclose(file); |
| 106 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 107 | if( result == 0 ) |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 108 | { |
| 109 | buflen = mpi_size( &X ); |
| 110 | TEST_ASSERT( mpi_write_binary( &X, buf, buflen ) == 0 ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 111 | |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 112 | hexify( str, buf, buflen ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 113 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 114 | TEST_ASSERT( strcasecmp( (char *) str, input_A ) == 0 ); |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 115 | } |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 116 | |
| 117 | mpi_free( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 118 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 119 | /* END_CASE */ |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 120 | |
Paul Bakker | 428b9ba | 2013-09-15 15:20:37 +0200 | [diff] [blame] | 121 | /* BEGIN_CASE depends_on:POLARSSL_FS_IO */ |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 122 | void mpi_write_file( int radix_X, char *input_X, int output_radix, |
| 123 | char *output_file ) |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 124 | { |
| 125 | mpi X, Y; |
Paul Bakker | 69998dd | 2009-07-11 19:15:20 +0000 | [diff] [blame] | 126 | FILE *file_out, *file_in; |
| 127 | |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 128 | mpi_init( &X ); mpi_init( &Y ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 129 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 130 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 131 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 132 | file_out = fopen( output_file, "w" ); |
Paul Bakker | 5690efc | 2011-05-26 13:16:06 +0000 | [diff] [blame] | 133 | TEST_ASSERT( file_out != NULL ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 134 | TEST_ASSERT( mpi_write_file( NULL, &X, output_radix, file_out ) == 0 ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 135 | fclose(file_out); |
| 136 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 137 | file_in = fopen( output_file, "r" ); |
Paul Bakker | 5690efc | 2011-05-26 13:16:06 +0000 | [diff] [blame] | 138 | TEST_ASSERT( file_in != NULL ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 139 | TEST_ASSERT( mpi_read_file( &Y, output_radix, file_in ) == 0 ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 140 | fclose(file_in); |
| 141 | |
| 142 | TEST_ASSERT( mpi_cmp_mpi( &X, &Y ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 143 | |
| 144 | mpi_free( &X ); mpi_free( &Y ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 145 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 146 | /* END_CASE */ |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 147 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 148 | /* BEGIN_CASE */ |
| 149 | void mpi_get_bit( int radix_X, char *input_X, int pos, int val ) |
Paul Bakker | 2f5947e | 2011-05-18 15:47:11 +0000 | [diff] [blame] | 150 | { |
| 151 | mpi X; |
| 152 | mpi_init( &X ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 153 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 154 | TEST_ASSERT( mpi_get_bit( &X, pos ) == val ); |
Paul Bakker | 2f5947e | 2011-05-18 15:47:11 +0000 | [diff] [blame] | 155 | |
| 156 | mpi_free( &X ); |
| 157 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 158 | /* END_CASE */ |
Paul Bakker | 2f5947e | 2011-05-18 15:47:11 +0000 | [diff] [blame] | 159 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 160 | /* BEGIN_CASE */ |
| 161 | void mpi_set_bit( int radix_X, char *input_X, int pos, int val, int radix_Y, |
| 162 | char *output_Y ) |
Paul Bakker | 2f5947e | 2011-05-18 15:47:11 +0000 | [diff] [blame] | 163 | { |
| 164 | mpi X, Y; |
| 165 | mpi_init( &X ); mpi_init( &Y ); |
| 166 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 167 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 168 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, output_Y ) == 0 ); |
| 169 | TEST_ASSERT( mpi_set_bit( &X, pos, val ) == 0 ); |
Paul Bakker | 2f5947e | 2011-05-18 15:47:11 +0000 | [diff] [blame] | 170 | TEST_ASSERT( mpi_cmp_mpi( &X, &Y ) == 0 ); |
| 171 | |
Manuel Pégourié-Gonnard | e44ec10 | 2012-11-17 12:42:51 +0100 | [diff] [blame] | 172 | mpi_free( &X ); mpi_free( &Y ); |
Paul Bakker | 2f5947e | 2011-05-18 15:47:11 +0000 | [diff] [blame] | 173 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 174 | /* END_CASE */ |
Paul Bakker | 2f5947e | 2011-05-18 15:47:11 +0000 | [diff] [blame] | 175 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 176 | /* BEGIN_CASE */ |
| 177 | void mpi_lsb( int radix_X, char *input_X, int nr_bits ) |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 178 | { |
| 179 | mpi X; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 180 | mpi_init( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 181 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 182 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 183 | TEST_ASSERT( mpi_lsb( &X ) == (size_t) nr_bits ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 184 | |
| 185 | mpi_free( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 186 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 187 | /* END_CASE */ |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 188 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 189 | /* BEGIN_CASE */ |
| 190 | void mpi_msb( int radix_X, char *input_X, int nr_bits ) |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 191 | { |
| 192 | mpi X; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 193 | mpi_init( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 194 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 195 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 196 | TEST_ASSERT( mpi_msb( &X ) == (size_t) nr_bits ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 197 | |
| 198 | mpi_free( &X ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 199 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 200 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 201 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 202 | /* BEGIN_CASE */ |
| 203 | void mpi_gcd( int radix_X, char *input_X, int radix_Y, char *input_Y, |
| 204 | int radix_A, char *input_A ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 205 | { |
| 206 | mpi A, X, Y, Z; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 207 | mpi_init( &A ); mpi_init( &X ); mpi_init( &Y ); mpi_init( &Z ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 208 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 209 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 210 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 211 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 212 | TEST_ASSERT( mpi_gcd( &Z, &X, &Y ) == 0 ); |
| 213 | TEST_ASSERT( mpi_cmp_mpi( &Z, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 214 | |
| 215 | mpi_free( &A ); mpi_free( &X ); mpi_free( &Y ); mpi_free( &Z ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 216 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 217 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 218 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 219 | /* BEGIN_CASE */ |
| 220 | void mpi_cmp_int( int input_X, int input_A, int result_CMP ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 221 | { |
| 222 | mpi X; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 223 | mpi_init( &X ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 224 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 225 | TEST_ASSERT( mpi_lset( &X, input_X ) == 0); |
| 226 | TEST_ASSERT( mpi_cmp_int( &X, input_A ) == result_CMP); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 227 | |
| 228 | mpi_free( &X ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 229 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 230 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 231 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 232 | /* BEGIN_CASE */ |
| 233 | void mpi_cmp_mpi( int radix_X, char *input_X, int radix_Y, char *input_Y, |
| 234 | int input_A ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 235 | { |
| 236 | mpi X, Y; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 237 | mpi_init( &X ); mpi_init( &Y ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 238 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 239 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 240 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 241 | TEST_ASSERT( mpi_cmp_mpi( &X, &Y ) == input_A ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 242 | |
| 243 | mpi_free( &X ); mpi_free( &Y ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 244 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 245 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 246 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 247 | /* BEGIN_CASE */ |
| 248 | void mpi_cmp_abs( int radix_X, char *input_X, int radix_Y, char *input_Y, |
| 249 | int input_A ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 250 | { |
| 251 | mpi X, Y; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 252 | mpi_init( &X ); mpi_init( &Y ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 253 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 254 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 255 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 256 | TEST_ASSERT( mpi_cmp_abs( &X, &Y ) == input_A ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 257 | |
| 258 | mpi_free( &X ); mpi_free( &Y ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 259 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 260 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 261 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 262 | /* BEGIN_CASE */ |
| 263 | void mpi_copy( int input_X, int input_A ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 264 | { |
| 265 | mpi X, Y, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 266 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 267 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 268 | TEST_ASSERT( mpi_lset( &X, input_X ) == 0 ); |
| 269 | TEST_ASSERT( mpi_lset( &Y, input_A ) == 0 ); |
| 270 | TEST_ASSERT( mpi_lset( &A, input_A ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 271 | TEST_ASSERT( mpi_cmp_mpi( &X, &Y ) != 0 ); |
| 272 | TEST_ASSERT( mpi_cmp_mpi( &Y, &A ) == 0 ); |
| 273 | TEST_ASSERT( mpi_copy( &Y, &X ) == 0 ); |
| 274 | TEST_ASSERT( mpi_cmp_mpi( &X, &Y ) == 0 ); |
| 275 | TEST_ASSERT( mpi_cmp_mpi( &Y, &A ) != 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 276 | |
| 277 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 278 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 279 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 280 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 281 | /* BEGIN_CASE */ |
| 282 | void mpi_copy_self( int input_X ) |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 283 | { |
| 284 | mpi X; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 285 | mpi_init( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 286 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 287 | TEST_ASSERT( mpi_lset( &X, input_X ) == 0 ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 288 | TEST_ASSERT( mpi_copy( &X, &X ) == 0 ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 289 | TEST_ASSERT( mpi_cmp_int( &X, input_X ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 290 | |
| 291 | mpi_free( &X ); |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 292 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 293 | /* END_CASE */ |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 294 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 295 | /* BEGIN_CASE */ |
Manuel Pégourié-Gonnard | 5868163 | 2013-11-21 10:39:37 +0100 | [diff] [blame] | 296 | void mpi_shrink( int before, int used, int min, int after ) |
| 297 | { |
| 298 | mpi X; |
| 299 | mpi_init( &X ); |
| 300 | |
| 301 | TEST_ASSERT( mpi_grow( &X, before ) == 0 ); |
| 302 | TEST_ASSERT( used <= before ); |
| 303 | memset( X.p, 0x2a, used * sizeof( t_uint ) ); |
| 304 | TEST_ASSERT( mpi_shrink( &X, min ) == 0 ); |
| 305 | TEST_ASSERT( X.n == (size_t) after ); |
| 306 | |
| 307 | mpi_free( &X ); |
| 308 | } |
| 309 | /* END_CASE */ |
| 310 | |
| 311 | /* BEGIN_CASE */ |
Manuel Pégourié-Gonnard | 3e3d2b8 | 2013-11-21 21:12:26 +0100 | [diff] [blame] | 312 | void mpi_safe_cond_assign( int x_sign, char *x_str, |
| 313 | int y_sign, char *y_str ) |
Manuel Pégourié-Gonnard | 71c2c21 | 2013-11-21 16:56:39 +0100 | [diff] [blame] | 314 | { |
| 315 | mpi X, Y, XX; |
| 316 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &XX ); |
| 317 | |
| 318 | TEST_ASSERT( mpi_read_string( &X, 16, x_str ) == 0 ); |
Manuel Pégourié-Gonnard | 3e3d2b8 | 2013-11-21 21:12:26 +0100 | [diff] [blame] | 319 | X.s = x_sign; |
Manuel Pégourié-Gonnard | 71c2c21 | 2013-11-21 16:56:39 +0100 | [diff] [blame] | 320 | TEST_ASSERT( mpi_read_string( &Y, 16, y_str ) == 0 ); |
Manuel Pégourié-Gonnard | 3e3d2b8 | 2013-11-21 21:12:26 +0100 | [diff] [blame] | 321 | Y.s = y_sign; |
Manuel Pégourié-Gonnard | 71c2c21 | 2013-11-21 16:56:39 +0100 | [diff] [blame] | 322 | TEST_ASSERT( mpi_copy( &XX, &X ) == 0 ); |
| 323 | |
| 324 | TEST_ASSERT( mpi_safe_cond_assign( &X, &Y, 0 ) == 0 ); |
| 325 | TEST_ASSERT( mpi_cmp_mpi( &X, &XX ) == 0 ); |
| 326 | |
| 327 | TEST_ASSERT( mpi_safe_cond_assign( &X, &Y, 1 ) == 0 ); |
| 328 | TEST_ASSERT( mpi_cmp_mpi( &X, &Y ) == 0 ); |
| 329 | |
| 330 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &XX ); |
| 331 | } |
| 332 | /* END_CASE */ |
| 333 | |
| 334 | /* BEGIN_CASE */ |
Manuel Pégourié-Gonnard | a60fe89 | 2013-12-04 21:41:50 +0100 | [diff] [blame^] | 335 | void mpi_safe_cond_swap( int x_sign, char *x_str, |
| 336 | int y_sign, char *y_str ) |
| 337 | { |
| 338 | mpi X, Y, XX, YY; |
| 339 | |
| 340 | mpi_init( &X ); mpi_init( &Y ); |
| 341 | mpi_init( &XX ); mpi_init( &YY ); |
| 342 | |
| 343 | TEST_ASSERT( mpi_read_string( &X, 16, x_str ) == 0 ); |
| 344 | X.s = x_sign; |
| 345 | TEST_ASSERT( mpi_read_string( &Y, 16, y_str ) == 0 ); |
| 346 | Y.s = y_sign; |
| 347 | |
| 348 | TEST_ASSERT( mpi_copy( &XX, &X ) == 0 ); |
| 349 | TEST_ASSERT( mpi_copy( &YY, &Y ) == 0 ); |
| 350 | |
| 351 | TEST_ASSERT( mpi_safe_cond_swap( &X, &Y, 0 ) == 0 ); |
| 352 | TEST_ASSERT( mpi_cmp_mpi( &X, &XX ) == 0 ); |
| 353 | TEST_ASSERT( mpi_cmp_mpi( &Y, &YY ) == 0 ); |
| 354 | |
| 355 | TEST_ASSERT( mpi_safe_cond_swap( &X, &Y, 1 ) == 0 ); |
| 356 | TEST_ASSERT( mpi_cmp_mpi( &Y, &XX ) == 0 ); |
| 357 | TEST_ASSERT( mpi_cmp_mpi( &X, &YY ) == 0 ); |
| 358 | |
| 359 | mpi_free( &X ); mpi_free( &Y ); |
| 360 | mpi_free( &XX ); mpi_free( &YY ); |
| 361 | } |
| 362 | /* END_CASE */ |
| 363 | |
| 364 | /* BEGIN_CASE */ |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 365 | void mpi_swap( int input_X, int input_Y ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 366 | { |
| 367 | mpi X, Y, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 368 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 369 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 370 | TEST_ASSERT( mpi_lset( &X, input_X ) == 0 ); |
| 371 | TEST_ASSERT( mpi_lset( &Y, input_Y ) == 0 ); |
| 372 | TEST_ASSERT( mpi_lset( &A, input_X ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 373 | TEST_ASSERT( mpi_cmp_mpi( &X, &Y ) != 0 ); |
| 374 | TEST_ASSERT( mpi_cmp_mpi( &X, &A ) == 0 ); |
| 375 | mpi_swap( &X, &Y ); |
| 376 | TEST_ASSERT( mpi_cmp_mpi( &X, &Y ) != 0 ); |
| 377 | TEST_ASSERT( mpi_cmp_mpi( &Y, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 378 | |
| 379 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 380 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 381 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 382 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 383 | /* BEGIN_CASE */ |
| 384 | void mpi_add_mpi( int radix_X, char *input_X, int radix_Y, char *input_Y, |
| 385 | int radix_A, char *input_A ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 386 | { |
| 387 | mpi X, Y, Z, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 388 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &Z ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 389 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 390 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 391 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 392 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 393 | TEST_ASSERT( mpi_add_mpi( &Z, &X, &Y ) == 0 ); |
| 394 | TEST_ASSERT( mpi_cmp_mpi( &Z, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 395 | |
| 396 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &Z ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 397 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 398 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 399 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 400 | /* BEGIN_CASE */ |
| 401 | void mpi_add_abs( int radix_X, char *input_X, int radix_Y, char *input_Y, |
| 402 | int radix_A, char *input_A ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 403 | { |
| 404 | mpi X, Y, Z, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 405 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &Z ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 406 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 407 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 408 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 409 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 410 | TEST_ASSERT( mpi_add_abs( &Z, &X, &Y ) == 0 ); |
| 411 | TEST_ASSERT( mpi_cmp_mpi( &Z, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 412 | |
| 413 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &Z ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 414 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 415 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 416 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 417 | /* BEGIN_CASE */ |
| 418 | void mpi_add_abs_add_first( int radix_X, char *input_X, int radix_Y, |
| 419 | char *input_Y, int radix_A, char *input_A ) |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 420 | { |
| 421 | mpi X, Y, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 422 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &A ); |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 423 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 424 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 425 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 426 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 427 | TEST_ASSERT( mpi_add_abs( &X, &X, &Y ) == 0 ); |
| 428 | TEST_ASSERT( mpi_cmp_mpi( &X, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 429 | |
| 430 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &A ); |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 431 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 432 | /* END_CASE */ |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 433 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 434 | /* BEGIN_CASE */ |
| 435 | void mpi_add_abs_add_second( int radix_X, char *input_X, int radix_Y, |
| 436 | char *input_Y, int radix_A, char *input_A ) |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 437 | { |
| 438 | mpi X, Y, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 439 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &A ); |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 440 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 441 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 442 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 443 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 444 | TEST_ASSERT( mpi_add_abs( &Y, &X, &Y ) == 0 ); |
| 445 | TEST_ASSERT( mpi_cmp_mpi( &Y, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 446 | |
| 447 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &A ); |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 448 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 449 | /* END_CASE */ |
Paul Bakker | ba48cb2 | 2009-07-12 11:01:32 +0000 | [diff] [blame] | 450 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 451 | /* BEGIN_CASE */ |
| 452 | void mpi_add_int( int radix_X, char *input_X, int input_Y, int radix_A, |
| 453 | char *input_A ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 454 | { |
| 455 | mpi X, Z, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 456 | mpi_init( &X ); mpi_init( &Z ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 457 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 458 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 459 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
| 460 | TEST_ASSERT( mpi_add_int( &Z, &X, input_Y ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 461 | TEST_ASSERT( mpi_cmp_mpi( &Z, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 462 | |
| 463 | mpi_free( &X ); mpi_free( &Z ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 464 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 465 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 466 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 467 | /* BEGIN_CASE */ |
| 468 | void mpi_sub_mpi( int radix_X, char *input_X, int radix_Y, char *input_Y, |
| 469 | int radix_A, char *input_A ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 470 | { |
| 471 | mpi X, Y, Z, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 472 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &Z ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 473 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 474 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 475 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 476 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 477 | TEST_ASSERT( mpi_sub_mpi( &Z, &X, &Y ) == 0 ); |
| 478 | TEST_ASSERT( mpi_cmp_mpi( &Z, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 479 | |
| 480 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &Z ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 481 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 482 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 483 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 484 | /* BEGIN_CASE */ |
| 485 | void mpi_sub_abs( int radix_X, char *input_X, int radix_Y, char *input_Y, |
| 486 | int radix_A, char *input_A, int sub_result ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 487 | { |
| 488 | mpi X, Y, Z, A; |
| 489 | int res; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 490 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &Z ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 491 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 492 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 493 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 494 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 495 | |
| 496 | res = mpi_sub_abs( &Z, &X, &Y ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 497 | TEST_ASSERT( res == sub_result ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 498 | if( res == 0 ) |
| 499 | TEST_ASSERT( mpi_cmp_mpi( &Z, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 500 | |
| 501 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &Z ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 502 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 503 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 504 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 505 | /* BEGIN_CASE */ |
| 506 | void mpi_sub_int( int radix_X, char *input_X, int input_Y, int radix_A, |
| 507 | char *input_A ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 508 | { |
| 509 | mpi X, Z, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 510 | mpi_init( &X ); mpi_init( &Z ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 511 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 512 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 513 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
| 514 | TEST_ASSERT( mpi_sub_int( &Z, &X, input_Y ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 515 | TEST_ASSERT( mpi_cmp_mpi( &Z, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 516 | |
| 517 | mpi_free( &X ); mpi_free( &Z ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 518 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 519 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 520 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 521 | /* BEGIN_CASE */ |
| 522 | void mpi_mul_mpi( int radix_X, char *input_X, int radix_Y, char *input_Y, |
| 523 | int radix_A, char *input_A ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 524 | { |
| 525 | mpi X, Y, Z, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 526 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &Z ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 527 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 528 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 529 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 530 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 531 | TEST_ASSERT( mpi_mul_mpi( &Z, &X, &Y ) == 0 ); |
| 532 | TEST_ASSERT( mpi_cmp_mpi( &Z, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 533 | |
| 534 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &Z ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 535 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 536 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 537 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 538 | /* BEGIN_CASE */ |
| 539 | void mpi_mul_int( int radix_X, char *input_X, int input_Y, int radix_A, |
| 540 | char *input_A, char *result_comparison ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 541 | { |
| 542 | mpi X, Z, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 543 | mpi_init( &X ); mpi_init( &Z ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 544 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 545 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 546 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
| 547 | TEST_ASSERT( mpi_mul_int( &Z, &X, input_Y ) == 0 ); |
Paul Bakker | dbd443d | 2013-08-16 13:38:47 +0200 | [diff] [blame] | 548 | if( strcmp( result_comparison, "==" ) == 0 ) |
| 549 | TEST_ASSERT( mpi_cmp_mpi( &Z, &A ) == 0 ); |
| 550 | else if( strcmp( result_comparison, "!=" ) == 0 ) |
| 551 | TEST_ASSERT( mpi_cmp_mpi( &Z, &A ) != 0 ); |
| 552 | else |
| 553 | TEST_ASSERT( "unknown operator" == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 554 | |
| 555 | mpi_free( &X ); mpi_free( &Z ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 556 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 557 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 558 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 559 | /* BEGIN_CASE */ |
| 560 | void mpi_div_mpi( int radix_X, char *input_X, int radix_Y, char *input_Y, |
| 561 | int radix_A, char *input_A, int radix_B, char *input_B, |
| 562 | int div_result ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 563 | { |
| 564 | mpi X, Y, Q, R, A, B; |
| 565 | int res; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 566 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &Q ); mpi_init( &R ); |
| 567 | mpi_init( &A ); mpi_init( &B ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 568 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 569 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 570 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 571 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
| 572 | TEST_ASSERT( mpi_read_string( &B, radix_B, input_B ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 573 | res = mpi_div_mpi( &Q, &R, &X, &Y ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 574 | TEST_ASSERT( res == div_result ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 575 | if( res == 0 ) |
| 576 | { |
| 577 | TEST_ASSERT( mpi_cmp_mpi( &Q, &A ) == 0 ); |
| 578 | TEST_ASSERT( mpi_cmp_mpi( &R, &B ) == 0 ); |
| 579 | } |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 580 | |
| 581 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &Q ); mpi_free( &R ); |
| 582 | mpi_free( &A ); mpi_free( &B ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 583 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 584 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 585 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 586 | /* BEGIN_CASE */ |
| 587 | void mpi_div_int( int radix_X, char *input_X, int input_Y, int radix_A, |
| 588 | char *input_A, int radix_B, char *input_B, int div_result ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 589 | { |
| 590 | mpi X, Q, R, A, B; |
| 591 | int res; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 592 | mpi_init( &X ); mpi_init( &Q ); mpi_init( &R ); mpi_init( &A ); |
| 593 | mpi_init( &B ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 594 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 595 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 596 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
| 597 | TEST_ASSERT( mpi_read_string( &B, radix_B, input_B ) == 0 ); |
| 598 | res = mpi_div_int( &Q, &R, &X, input_Y ); |
| 599 | TEST_ASSERT( res == div_result ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 600 | if( res == 0 ) |
| 601 | { |
| 602 | TEST_ASSERT( mpi_cmp_mpi( &Q, &A ) == 0 ); |
| 603 | TEST_ASSERT( mpi_cmp_mpi( &R, &B ) == 0 ); |
| 604 | } |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 605 | |
| 606 | mpi_free( &X ); mpi_free( &Q ); mpi_free( &R ); mpi_free( &A ); |
| 607 | mpi_free( &B ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 608 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 609 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 610 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 611 | /* BEGIN_CASE */ |
| 612 | void mpi_mod_mpi( int radix_X, char *input_X, int radix_Y, char *input_Y, |
| 613 | int radix_A, char *input_A, int div_result ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 614 | { |
Paul Bakker | f02c564 | 2012-11-13 10:25:21 +0000 | [diff] [blame] | 615 | mpi X, Y, A; |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 616 | int res; |
Paul Bakker | f02c564 | 2012-11-13 10:25:21 +0000 | [diff] [blame] | 617 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 618 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 619 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 620 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 621 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
Paul Bakker | f02c564 | 2012-11-13 10:25:21 +0000 | [diff] [blame] | 622 | res = mpi_mod_mpi( &X, &X, &Y ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 623 | TEST_ASSERT( res == div_result ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 624 | if( res == 0 ) |
| 625 | { |
Paul Bakker | f02c564 | 2012-11-13 10:25:21 +0000 | [diff] [blame] | 626 | TEST_ASSERT( mpi_cmp_mpi( &X, &A ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 627 | } |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 628 | |
Paul Bakker | f02c564 | 2012-11-13 10:25:21 +0000 | [diff] [blame] | 629 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 630 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 631 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 632 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 633 | /* BEGIN_CASE */ |
| 634 | void mpi_mod_int( int radix_X, char *input_X, int input_Y, int input_A, |
| 635 | int div_result ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 636 | { |
| 637 | mpi X; |
| 638 | int res; |
Paul Bakker | a755ca1 | 2011-04-24 09:11:17 +0000 | [diff] [blame] | 639 | t_uint r; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 640 | mpi_init( &X ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 641 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 642 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 643 | res = mpi_mod_int( &r, &X, input_Y ); |
| 644 | TEST_ASSERT( res == div_result ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 645 | if( res == 0 ) |
| 646 | { |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 647 | TEST_ASSERT( r == (t_uint) input_A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 648 | } |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 649 | |
| 650 | mpi_free( &X ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 651 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 652 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 653 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 654 | /* BEGIN_CASE */ |
| 655 | void mpi_exp_mod( int radix_A, char *input_A, int radix_E, char *input_E, |
| 656 | int radix_N, char *input_N, int radix_RR, char *input_RR, |
| 657 | int radix_X, char *input_X, int div_result ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 658 | { |
| 659 | mpi A, E, N, RR, Z, X; |
| 660 | int res; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 661 | mpi_init( &A ); mpi_init( &E ); mpi_init( &N ); |
| 662 | mpi_init( &RR ); mpi_init( &Z ); mpi_init( &X ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 663 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 664 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
| 665 | TEST_ASSERT( mpi_read_string( &E, radix_E, input_E ) == 0 ); |
| 666 | TEST_ASSERT( mpi_read_string( &N, radix_N, input_N ) == 0 ); |
| 667 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 668 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 669 | if( strlen( input_RR ) ) |
| 670 | TEST_ASSERT( mpi_read_string( &RR, radix_RR, input_RR ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 671 | |
| 672 | res = mpi_exp_mod( &Z, &A, &E, &N, &RR ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 673 | TEST_ASSERT( res == div_result ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 674 | if( res == 0 ) |
| 675 | { |
| 676 | TEST_ASSERT( mpi_cmp_mpi( &Z, &X ) == 0 ); |
| 677 | } |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 678 | |
| 679 | mpi_free( &A ); mpi_free( &E ); mpi_free( &N ); |
| 680 | mpi_free( &RR ); mpi_free( &Z ); mpi_free( &X ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 681 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 682 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 683 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 684 | /* BEGIN_CASE */ |
| 685 | void mpi_inv_mod( int radix_X, char *input_X, int radix_Y, char *input_Y, |
| 686 | int radix_A, char *input_A, int div_result ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 687 | { |
| 688 | mpi X, Y, Z, A; |
| 689 | int res; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 690 | mpi_init( &X ); mpi_init( &Y ); mpi_init( &Z ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 691 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 692 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 693 | TEST_ASSERT( mpi_read_string( &Y, radix_Y, input_Y ) == 0 ); |
| 694 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 695 | res = mpi_inv_mod( &Z, &X, &Y ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 696 | TEST_ASSERT( res == div_result ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 697 | if( res == 0 ) |
| 698 | { |
| 699 | TEST_ASSERT( mpi_cmp_mpi( &Z, &A ) == 0 ); |
| 700 | } |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 701 | |
| 702 | mpi_free( &X ); mpi_free( &Y ); mpi_free( &Z ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 703 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 704 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 705 | |
Manuel Pégourié-Gonnard | df0142b | 2013-08-22 18:29:07 +0200 | [diff] [blame] | 706 | /* BEGIN_CASE depends_on:POLARSSL_GENPRIME */ |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 707 | void mpi_is_prime( int radix_X, char *input_X, int div_result ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 708 | { |
| 709 | mpi X; |
| 710 | int res; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 711 | mpi_init( &X ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 712 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 713 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
Paul Bakker | 5690efc | 2011-05-26 13:16:06 +0000 | [diff] [blame] | 714 | res = mpi_is_prime( &X, rnd_std_rand, NULL ); |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 715 | TEST_ASSERT( res == div_result ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 716 | |
| 717 | mpi_free( &X ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 718 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 719 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 720 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 721 | /* BEGIN_CASE */ |
| 722 | void mpi_shift_l( int radix_X, char *input_X, int shift_X, int radix_A, |
| 723 | char *input_A) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 724 | { |
| 725 | mpi X, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 726 | mpi_init( &X ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 727 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 728 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 729 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
| 730 | TEST_ASSERT( mpi_shift_l( &X, shift_X ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 731 | TEST_ASSERT( mpi_cmp_mpi( &X, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 732 | |
| 733 | mpi_free( &X ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 734 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 735 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 736 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 737 | /* BEGIN_CASE */ |
| 738 | void mpi_shift_r( int radix_X, char *input_X, int shift_X, int radix_A, |
| 739 | char *input_A ) |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 740 | { |
| 741 | mpi X, A; |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 742 | mpi_init( &X ); mpi_init( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 743 | |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 744 | TEST_ASSERT( mpi_read_string( &X, radix_X, input_X ) == 0 ); |
| 745 | TEST_ASSERT( mpi_read_string( &A, radix_A, input_A ) == 0 ); |
| 746 | TEST_ASSERT( mpi_shift_r( &X, shift_X ) == 0 ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 747 | TEST_ASSERT( mpi_cmp_mpi( &X, &A ) == 0 ); |
Paul Bakker | 6c591fa | 2011-05-05 11:49:20 +0000 | [diff] [blame] | 748 | |
| 749 | mpi_free( &X ); mpi_free( &A ); |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 750 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 751 | /* END_CASE */ |
Paul Bakker | 367dae4 | 2009-06-28 21:50:27 +0000 | [diff] [blame] | 752 | |
Manuel Pégourié-Gonnard | 2014016 | 2013-10-10 12:48:03 +0200 | [diff] [blame] | 753 | /* BEGIN_CASE depends_on:POLARSSL_SELF_TEST */ |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 754 | void mpi_selftest() |
Paul Bakker | e896fea | 2009-07-06 06:40:23 +0000 | [diff] [blame] | 755 | { |
| 756 | TEST_ASSERT( mpi_self_test( 0 ) == 0 ); |
| 757 | } |
Paul Bakker | 33b43f1 | 2013-08-20 11:48:36 +0200 | [diff] [blame] | 758 | /* END_CASE */ |