2 * Copyright (c) 2006 - 2007 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * 3. Neither the name of the Institute nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
41 set_get(unsigned long num
)
46 if (!BN_set_word(bn
, num
))
49 if (BN_get_word(bn
) != num
)
56 #define CHECK(x) do { ret += x; } while(0)
65 CHECK(set_get(0x1ff));
66 CHECK(set_get(0xffff));
67 CHECK(set_get(0xf000));
68 CHECK(set_get(ULONG_MAX
/ 2));
69 CHECK(set_get(ULONG_MAX
- 1));
82 /* test setting and getting of "word" */
83 if (!BN_set_word(bn
, 1))
85 if (!BN_is_bit_set(bn
, 0))
87 if (!BN_is_bit_set(bn
, 0))
90 if (!BN_set_word(bn
, 2))
92 if (!BN_is_bit_set(bn
, 1))
95 if (!BN_set_word(bn
, 3))
97 if (!BN_is_bit_set(bn
, 0))
99 if (!BN_is_bit_set(bn
, 1))
102 if (!BN_set_word(bn
, 0x100))
104 if (!BN_is_bit_set(bn
, 8))
107 if (!BN_set_word(bn
, 0x1000))
109 if (!BN_is_bit_set(bn
, 12))
112 /* test bitsetting */
113 if (!BN_set_word(bn
, 1))
115 if (!BN_set_bit(bn
, 1))
117 if (BN_get_word(bn
) != 3)
119 if (!BN_clear_bit(bn
, 0))
121 if (BN_get_word(bn
) != 2)
124 /* test bitsetting past end of current end */
126 if (!BN_set_bit(bn
, 12))
128 if (BN_get_word(bn
) != 0x1000)
131 /* test bit and byte counting functions */
132 if (BN_num_bits(bn
) != 13)
134 if (BN_num_bytes(bn
) != 2)
150 { "\x01\x00", 2, 256 }
154 test_BN_import_export(void)
162 for (i
= 0; i
< sizeof(ietests
)/sizeof(ietests
[0]); i
++) {
165 if (!BN_bin2bn((unsigned char*)ietests
[i
].data
, ietests
[i
].len
, bn
))
167 if (BN_get_word(bn
) != ietests
[i
].num
)
169 len
= BN_num_bytes(bn
);
170 if (len
!= ietests
[i
].len
)
177 if (memcmp(p
, ietests
[i
].data
, ietests
[i
].len
) != 0)
201 if (BN_get_word(c
) != 3)
206 if (BN_get_word(c
) != 3)
209 BN_set_word(b
, 0xff);
212 if (BN_get_word(c
) != 0x100)
216 if (BN_get_word(c
) != 0x100)
219 BN_set_word(a
, 0xff);
222 if (BN_get_word(c
) != 0x1fe)
226 if (BN_get_word(c
) != 0x1fe)
233 BN_hex2bn(&a
, "50212A3B611D46642C825A16A354CE0FD4D85DD2");
234 BN_hex2bn(&b
, "84B6C7E8D28ACA1614954DA");
238 if (strcmp(p
, "50212A3B611D466434CDC695307D7AB13621B2AC") != 0) {
246 if (strcmp(p
, "50212A3B611D466434CDC695307D7AB13621B2AC") != 0) {
267 if (!BN_set_word(a
, 1))
269 if (!BN_set_word(b
, 1))
272 if (BN_cmp(a
, b
) != 0)
274 if (BN_cmp(b
, a
) != 0)
277 if (!BN_set_word(b
, 2))
280 if (BN_cmp(a
, b
) >= 0)
282 if (BN_cmp(b
, a
) <= 0)
285 BN_set_negative(b
, 1);
287 if (BN_cmp(a
, b
) <= 0)
289 if (BN_cmp(b
, a
) >= 0)
295 BN_hex2bn(&a
, "50212A3B611D46642C825A16A354CE0FD4D85DD1");
296 BN_hex2bn(&b
, "50212A3B611D46642C825A16A354CE0FD4D85DD2");
298 if (BN_cmp(a
, b
) >= 0)
300 if (BN_cmp(b
, a
) <= 0)
303 BN_set_negative(b
, 1);
305 if (BN_cmp(a
, b
) <= 0)
307 if (BN_cmp(b
, a
) >= 0)
320 if (RAND_status() != 1)
327 if (!BN_rand(bn
, 1024, 0, 0))
344 if ((c
= BN_CTX_new()) == NULL
)
347 for (i
= 0; i
< testnum
; i
++) {
352 for (i
= 0; i
< testnum
; i
++)
354 for (i
= 0; i
< testnum
; i
++)
357 for (i
= 0; i
< testnum
; i
++) {
359 if ((bn
= BN_CTX_get(c
)) == NULL
)
364 for (i
= 0; i
< testnum
; i
++) {
366 for (j
= 0; j
< testnum2
; j
++)
367 if ((bn
= BN_CTX_get(c
)) == NULL
)
370 for (i
= 0; i
< testnum
; i
++)
379 main(int argc
, char **argv
)
383 ret
+= test_BN_set_get();
384 ret
+= test_BN_bit();
385 ret
+= test_BN_import_export();
386 ret
+= test_BN_uadd();
387 ret
+= test_BN_cmp();
388 ret
+= test_BN_rand();
389 ret
+= test_BN_CTX();