@@ -46,27 +46,27 @@ static int mtest_opponent(void)
46
46
switch (abs (rand ()) % 7 ) {
47
47
case 0 :
48
48
mp_clear (& a );
49
- mp_init (& a );
49
+ DO ( mp_init (& a ) );
50
50
break ;
51
51
case 1 :
52
52
mp_clear (& b );
53
- mp_init (& b );
53
+ DO ( mp_init (& b ) );
54
54
break ;
55
55
case 2 :
56
56
mp_clear (& c );
57
- mp_init (& c );
57
+ DO ( mp_init (& c ) );
58
58
break ;
59
59
case 3 :
60
60
mp_clear (& d );
61
- mp_init (& d );
61
+ DO ( mp_init (& d ) );
62
62
break ;
63
63
case 4 :
64
64
mp_clear (& e );
65
- mp_init (& e );
65
+ DO ( mp_init (& e ) );
66
66
break ;
67
67
case 5 :
68
68
mp_clear (& f );
69
- mp_init (& f );
69
+ DO ( mp_init (& f ) );
70
70
break ;
71
71
case 6 :
72
72
break ; /* don't clear any */
@@ -83,13 +83,13 @@ static int mtest_opponent(void)
83
83
if (strcmp (cmd , "mul2d" ) == 0 ) {
84
84
++ mul2d_n ;
85
85
FGETS (buf , 4095 , stdin );
86
- mp_read_radix (& a , buf , 64 );
86
+ DO ( mp_read_radix (& a , buf , 64 ) );
87
87
FGETS (buf , 4095 , stdin );
88
88
sscanf (buf , "%u" , & rr );
89
89
FGETS (buf , 4095 , stdin );
90
- mp_read_radix (& b , buf , 64 );
90
+ DO ( mp_read_radix (& b , buf , 64 ) );
91
91
92
- mp_mul_2d (& a , (int )rr , & a );
92
+ DO ( mp_mul_2d (& a , (int )rr , & a ) );
93
93
a .sign = b .sign ;
94
94
if (mp_cmp (& a , & b ) != MP_EQ ) {
95
95
printf ("mul2d failed, rr == %u\n" , rr );
@@ -100,13 +100,13 @@ static int mtest_opponent(void)
100
100
} else if (strcmp (cmd , "div2d" ) == 0 ) {
101
101
++ div2d_n ;
102
102
FGETS (buf , 4095 , stdin );
103
- mp_read_radix (& a , buf , 64 );
103
+ DO ( mp_read_radix (& a , buf , 64 ) );
104
104
FGETS (buf , 4095 , stdin );
105
105
sscanf (buf , "%u" , & rr );
106
106
FGETS (buf , 4095 , stdin );
107
- mp_read_radix (& b , buf , 64 );
107
+ DO ( mp_read_radix (& b , buf , 64 ) );
108
108
109
- mp_div_2d (& a , (int )rr , & a , & e );
109
+ DO ( mp_div_2d (& a , (int )rr , & a , & e ) );
110
110
a .sign = b .sign ;
111
111
if ((a .used == b .used ) && (a .used == 0 )) {
112
112
a .sign = b .sign = MP_ZPOS ;
@@ -120,13 +120,13 @@ static int mtest_opponent(void)
120
120
} else if (strcmp (cmd , "add" ) == 0 ) {
121
121
++ add_n ;
122
122
FGETS (buf , 4095 , stdin );
123
- mp_read_radix (& a , buf , 64 );
123
+ DO ( mp_read_radix (& a , buf , 64 ) );
124
124
FGETS (buf , 4095 , stdin );
125
- mp_read_radix (& b , buf , 64 );
125
+ DO ( mp_read_radix (& b , buf , 64 ) );
126
126
FGETS (buf , 4095 , stdin );
127
- mp_read_radix (& c , buf , 64 );
128
- mp_copy (& a , & d );
129
- mp_add (& d , & b , & d );
127
+ DO ( mp_read_radix (& c , buf , 64 ) );
128
+ DO ( mp_copy (& a , & d ) );
129
+ DO ( mp_add (& d , & b , & d ) );
130
130
if (mp_cmp (& c , & d ) != MP_EQ ) {
131
131
printf ("add %lu failure!\n" , add_n );
132
132
draw (& a );
@@ -139,9 +139,9 @@ static int mtest_opponent(void)
139
139
/* test the sign/unsigned storage functions */
140
140
141
141
rr = (unsigned )mp_sbin_size (& c );
142
- mp_to_sbin (& c , (unsigned char * ) cmd , (size_t )rr , NULL );
142
+ DO ( mp_to_sbin (& c , (unsigned char * ) cmd , (size_t )rr , NULL ) );
143
143
memset (cmd + rr , rand () & 0xFF , sizeof (cmd ) - rr );
144
- mp_from_sbin (& d , (unsigned char * ) cmd , (size_t )rr );
144
+ DO ( mp_from_sbin (& d , (unsigned char * ) cmd , (size_t )rr ) );
145
145
if (mp_cmp (& c , & d ) != MP_EQ ) {
146
146
printf ("mp_signed_bin failure!\n" );
147
147
draw (& c );
@@ -150,9 +150,9 @@ static int mtest_opponent(void)
150
150
}
151
151
152
152
rr = (unsigned )mp_ubin_size (& c );
153
- mp_to_ubin (& c , (unsigned char * ) cmd , (size_t )rr , NULL );
153
+ DO ( mp_to_ubin (& c , (unsigned char * ) cmd , (size_t )rr , NULL ) );
154
154
memset (cmd + rr , rand () & 0xFF , sizeof (cmd ) - rr );
155
- mp_from_ubin (& d , (unsigned char * ) cmd , (size_t )rr );
155
+ DO ( mp_from_ubin (& d , (unsigned char * ) cmd , (size_t )rr ) );
156
156
if (mp_cmp_mag (& c , & d ) != MP_EQ ) {
157
157
printf ("mp_unsigned_bin failure!\n" );
158
158
draw (& c );
@@ -163,13 +163,13 @@ static int mtest_opponent(void)
163
163
} else if (strcmp (cmd , "sub" ) == 0 ) {
164
164
++ sub_n ;
165
165
FGETS (buf , 4095 , stdin );
166
- mp_read_radix (& a , buf , 64 );
166
+ DO ( mp_read_radix (& a , buf , 64 ) );
167
167
FGETS (buf , 4095 , stdin );
168
- mp_read_radix (& b , buf , 64 );
168
+ DO ( mp_read_radix (& b , buf , 64 ) );
169
169
FGETS (buf , 4095 , stdin );
170
- mp_read_radix (& c , buf , 64 );
171
- mp_copy (& a , & d );
172
- mp_sub (& d , & b , & d );
170
+ DO ( mp_read_radix (& c , buf , 64 ) );
171
+ DO ( mp_copy (& a , & d ) );
172
+ DO ( mp_sub (& d , & b , & d ) );
173
173
if (mp_cmp (& c , & d ) != MP_EQ ) {
174
174
printf ("sub %lu failure!\n" , sub_n );
175
175
draw (& a );
@@ -181,13 +181,13 @@ static int mtest_opponent(void)
181
181
} else if (strcmp (cmd , "mul" ) == 0 ) {
182
182
++ mul_n ;
183
183
FGETS (buf , 4095 , stdin );
184
- mp_read_radix (& a , buf , 64 );
184
+ DO ( mp_read_radix (& a , buf , 64 ) );
185
185
FGETS (buf , 4095 , stdin );
186
- mp_read_radix (& b , buf , 64 );
186
+ DO ( mp_read_radix (& b , buf , 64 ) );
187
187
FGETS (buf , 4095 , stdin );
188
- mp_read_radix (& c , buf , 64 );
189
- mp_copy (& a , & d );
190
- mp_mul (& d , & b , & d );
188
+ DO ( mp_read_radix (& c , buf , 64 ) );
189
+ DO ( mp_copy (& a , & d ) );
190
+ DO ( mp_mul (& d , & b , & d ) );
191
191
if (mp_cmp (& c , & d ) != MP_EQ ) {
192
192
printf ("mul %lu failure!\n" , mul_n );
193
193
draw (& a );
@@ -199,15 +199,15 @@ static int mtest_opponent(void)
199
199
} else if (strcmp (cmd , "div" ) == 0 ) {
200
200
++ div_n ;
201
201
FGETS (buf , 4095 , stdin );
202
- mp_read_radix (& a , buf , 64 );
202
+ DO ( mp_read_radix (& a , buf , 64 ) );
203
203
FGETS (buf , 4095 , stdin );
204
- mp_read_radix (& b , buf , 64 );
204
+ DO ( mp_read_radix (& b , buf , 64 ) );
205
205
FGETS (buf , 4095 , stdin );
206
- mp_read_radix (& c , buf , 64 );
206
+ DO ( mp_read_radix (& c , buf , 64 ) );
207
207
FGETS (buf , 4095 , stdin );
208
- mp_read_radix (& d , buf , 64 );
208
+ DO ( mp_read_radix (& d , buf , 64 ) );
209
209
210
- mp_div (& a , & b , & e , & f );
210
+ DO ( mp_div (& a , & b , & e , & f ) );
211
211
if ((mp_cmp (& c , & e ) != MP_EQ ) || (mp_cmp (& d , & f ) != MP_EQ )) {
212
212
printf ("div %lu %d, %d, failure!\n" , div_n , mp_cmp (& c , & e ),
213
213
mp_cmp (& d , & f ));
@@ -223,11 +223,11 @@ static int mtest_opponent(void)
223
223
} else if (strcmp (cmd , "sqr" ) == 0 ) {
224
224
++ sqr_n ;
225
225
FGETS (buf , 4095 , stdin );
226
- mp_read_radix (& a , buf , 64 );
226
+ DO ( mp_read_radix (& a , buf , 64 ) );
227
227
FGETS (buf , 4095 , stdin );
228
- mp_read_radix (& b , buf , 64 );
229
- mp_copy (& a , & c );
230
- mp_sqr (& c , & c );
228
+ DO ( mp_read_radix (& b , buf , 64 ) );
229
+ DO ( mp_copy (& a , & c ) );
230
+ DO ( mp_sqr (& c , & c ) );
231
231
if (mp_cmp (& b , & c ) != MP_EQ ) {
232
232
printf ("sqr %lu failure!\n" , sqr_n );
233
233
draw (& a );
@@ -238,13 +238,13 @@ static int mtest_opponent(void)
238
238
} else if (strcmp (cmd , "gcd" ) == 0 ) {
239
239
++ gcd_n ;
240
240
FGETS (buf , 4095 , stdin );
241
- mp_read_radix (& a , buf , 64 );
241
+ DO ( mp_read_radix (& a , buf , 64 ) );
242
242
FGETS (buf , 4095 , stdin );
243
- mp_read_radix (& b , buf , 64 );
243
+ DO ( mp_read_radix (& b , buf , 64 ) );
244
244
FGETS (buf , 4095 , stdin );
245
- mp_read_radix (& c , buf , 64 );
246
- mp_copy (& a , & d );
247
- mp_gcd (& d , & b , & d );
245
+ DO ( mp_read_radix (& c , buf , 64 ) );
246
+ DO ( mp_copy (& a , & d ) );
247
+ DO ( mp_gcd (& d , & b , & d ) );
248
248
d .sign = c .sign ;
249
249
if (mp_cmp (& c , & d ) != MP_EQ ) {
250
250
printf ("gcd %lu failure!\n" , gcd_n );
@@ -257,13 +257,13 @@ static int mtest_opponent(void)
257
257
} else if (strcmp (cmd , "lcm" ) == 0 ) {
258
258
++ lcm_n ;
259
259
FGETS (buf , 4095 , stdin );
260
- mp_read_radix (& a , buf , 64 );
260
+ DO ( mp_read_radix (& a , buf , 64 ) );
261
261
FGETS (buf , 4095 , stdin );
262
- mp_read_radix (& b , buf , 64 );
262
+ DO ( mp_read_radix (& b , buf , 64 ) );
263
263
FGETS (buf , 4095 , stdin );
264
- mp_read_radix (& c , buf , 64 );
265
- mp_copy (& a , & d );
266
- mp_lcm (& d , & b , & d );
264
+ DO ( mp_read_radix (& c , buf , 64 ) );
265
+ DO ( mp_copy (& a , & d ) );
266
+ DO ( mp_lcm (& d , & b , & d ) );
267
267
d .sign = c .sign ;
268
268
if (mp_cmp (& c , & d ) != MP_EQ ) {
269
269
printf ("lcm %lu failure!\n" , lcm_n );
@@ -276,15 +276,15 @@ static int mtest_opponent(void)
276
276
} else if (strcmp (cmd , "expt" ) == 0 ) {
277
277
++ expt_n ;
278
278
FGETS (buf , 4095 , stdin );
279
- mp_read_radix (& a , buf , 64 );
279
+ DO ( mp_read_radix (& a , buf , 64 ) );
280
280
FGETS (buf , 4095 , stdin );
281
- mp_read_radix (& b , buf , 64 );
281
+ DO ( mp_read_radix (& b , buf , 64 ) );
282
282
FGETS (buf , 4095 , stdin );
283
- mp_read_radix (& c , buf , 64 );
283
+ DO ( mp_read_radix (& c , buf , 64 ) );
284
284
FGETS (buf , 4095 , stdin );
285
- mp_read_radix (& d , buf , 64 );
286
- mp_copy (& a , & e );
287
- mp_exptmod (& e , & b , & c , & e );
285
+ DO ( mp_read_radix (& d , buf , 64 ) );
286
+ DO ( mp_copy (& a , & e ) );
287
+ DO ( mp_exptmod (& e , & b , & c , & e ) );
288
288
if (mp_cmp (& d , & e ) != MP_EQ ) {
289
289
printf ("expt %lu failure!\n" , expt_n );
290
290
draw (& a );
@@ -297,32 +297,32 @@ static int mtest_opponent(void)
297
297
} else if (strcmp (cmd , "invmod" ) == 0 ) {
298
298
++ inv_n ;
299
299
FGETS (buf , 4095 , stdin );
300
- mp_read_radix (& a , buf , 64 );
300
+ DO ( mp_read_radix (& a , buf , 64 ) );
301
301
FGETS (buf , 4095 , stdin );
302
- mp_read_radix (& b , buf , 64 );
302
+ DO ( mp_read_radix (& b , buf , 64 ) );
303
303
FGETS (buf , 4095 , stdin );
304
- mp_read_radix (& c , buf , 64 );
305
- mp_invmod (& a , & b , & d );
306
- mp_mulmod (& d , & a , & b , & e );
304
+ DO ( mp_read_radix (& c , buf , 64 ) );
305
+ DO ( mp_invmod (& a , & b , & d ) );
306
+ DO ( mp_mulmod (& d , & a , & b , & e ) );
307
307
if (mp_cmp_d (& e , 1uL ) != MP_EQ ) {
308
308
printf ("inv [wrong value from MPI?!] failure\n" );
309
309
draw (& a );
310
310
draw (& b );
311
311
draw (& c );
312
312
draw (& d );
313
313
draw (& e );
314
- mp_gcd (& a , & b , & e );
314
+ DO ( mp_gcd (& a , & b , & e ) );
315
315
draw (& e );
316
316
goto LBL_ERR ;
317
317
}
318
318
319
319
} else if (strcmp (cmd , "div2" ) == 0 ) {
320
320
++ div2_n ;
321
321
FGETS (buf , 4095 , stdin );
322
- mp_read_radix (& a , buf , 64 );
322
+ DO ( mp_read_radix (& a , buf , 64 ) );
323
323
FGETS (buf , 4095 , stdin );
324
- mp_read_radix (& b , buf , 64 );
325
- mp_div_2 (& a , & c );
324
+ DO ( mp_read_radix (& b , buf , 64 ) );
325
+ DO ( mp_div_2 (& a , & c ) );
326
326
if (mp_cmp (& c , & b ) != MP_EQ ) {
327
327
printf ("div_2 %lu failure\n" , div2_n );
328
328
draw (& a );
@@ -333,10 +333,10 @@ static int mtest_opponent(void)
333
333
} else if (strcmp (cmd , "mul2" ) == 0 ) {
334
334
++ mul2_n ;
335
335
FGETS (buf , 4095 , stdin );
336
- mp_read_radix (& a , buf , 64 );
336
+ DO ( mp_read_radix (& a , buf , 64 ) );
337
337
FGETS (buf , 4095 , stdin );
338
- mp_read_radix (& b , buf , 64 );
339
- mp_mul_2 (& a , & c );
338
+ DO ( mp_read_radix (& b , buf , 64 ) );
339
+ DO ( mp_mul_2 (& a , & c ) );
340
340
if (mp_cmp (& c , & b ) != MP_EQ ) {
341
341
printf ("mul_2 %lu failure\n" , mul2_n );
342
342
draw (& a );
@@ -347,12 +347,12 @@ static int mtest_opponent(void)
347
347
} else if (strcmp (cmd , "add_d" ) == 0 ) {
348
348
++ add_d_n ;
349
349
FGETS (buf , 4095 , stdin );
350
- mp_read_radix (& a , buf , 64 );
350
+ DO ( mp_read_radix (& a , buf , 64 ) );
351
351
FGETS (buf , 4095 , stdin );
352
352
sscanf (buf , "%d" , & ix );
353
353
FGETS (buf , 4095 , stdin );
354
- mp_read_radix (& b , buf , 64 );
355
- mp_add_d (& a , (mp_digit )ix , & c );
354
+ DO ( mp_read_radix (& b , buf , 64 ) );
355
+ DO ( mp_add_d (& a , (mp_digit )ix , & c ) );
356
356
if (mp_cmp (& b , & c ) != MP_EQ ) {
357
357
printf ("add_d %lu failure\n" , add_d_n );
358
358
draw (& a );
@@ -364,12 +364,12 @@ static int mtest_opponent(void)
364
364
} else if (strcmp (cmd , "sub_d" ) == 0 ) {
365
365
++ sub_d_n ;
366
366
FGETS (buf , 4095 , stdin );
367
- mp_read_radix (& a , buf , 64 );
367
+ DO ( mp_read_radix (& a , buf , 64 ) );
368
368
FGETS (buf , 4095 , stdin );
369
369
sscanf (buf , "%d" , & ix );
370
370
FGETS (buf , 4095 , stdin );
371
- mp_read_radix (& b , buf , 64 );
372
- mp_sub_d (& a , (mp_digit )ix , & c );
371
+ DO ( mp_read_radix (& b , buf , 64 ) );
372
+ DO ( mp_sub_d (& a , (mp_digit )ix , & c ) );
373
373
if (mp_cmp (& b , & c ) != MP_EQ ) {
374
374
printf ("sub_d %lu failure\n" , sub_d_n );
375
375
draw (& a );
0 commit comments