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