test/test_test.c

   1 /*
   2  * Copyright 2017 The OpenSSL Project Authors. All Rights Reserved.
   3  *
   4  * Licensed under the OpenSSL license (the "License").  You may not use
   5  * this file except in compliance with the License.  You can obtain a copy
   6  * in the file LICENSE in the source distribution or at
   7  * https://www.openssl.org/source/license.html
   8  */
   9
  10 /*
  11  * Copyright (c) 2017 Oracle and/or its affiliates.  All rights reserved.
  12  */
  13
  14 #include <stdio.h>
  15 #include <string.h>
  16
  17 #include <openssl/opensslconf.h>
  18 #include <openssl/err.h>
  19 #include <openssl/crypto.h>
  20 #include <openssl/bn.h>
  21
  22 #include "e_os.h"
  23 #include "testutil.h"
  24
  25 #define TEST(expected, test) test_case((expected), #test, (test))
  26
  27 static int test_case(int expected, const char *test, int result)
  28 {
  29     if (result != expected) {
  30         fprintf(stderr, "# FATAL: %s != %d\n", test, expected);
  31         return 0;
  32     }
  33     return 1;
  34 }
  35
  36 static int test_int(void)
  37 {
  38     if (!TEST(1, TEST_int_eq(1, 1))
  39         | !TEST(0, TEST_int_eq(1, -1))
  40         | !TEST(1, TEST_int_ne(1, 2))
  41         | !TEST(0, TEST_int_ne(3, 3))
  42         | !TEST(1, TEST_int_lt(4, 9))
  43         | !TEST(0, TEST_int_lt(9, 4))
  44         | !TEST(1, TEST_int_le(4, 9))
  45         | !TEST(1, TEST_int_le(5, 5))
  46         | !TEST(0, TEST_int_le(9, 4))
  47         | !TEST(1, TEST_int_gt(8, 5))
  48         | !TEST(0, TEST_int_gt(5, 8))
  49         | !TEST(1, TEST_int_ge(8, 5))
  50         | !TEST(1, TEST_int_ge(6, 6))
  51         | !TEST(0, TEST_int_ge(5, 8)))
  52         goto err;
  53     return 1;
  54
  55 err:
  56     return 0;
  57 }
  58
  59 static int test_uint(void)
  60 {
  61     if (!TEST(1, TEST_uint_eq(3u, 3u))
  62         | !TEST(0, TEST_uint_eq(3u, 5u))
  63         | !TEST(1, TEST_uint_ne(4u, 2u))
  64         | !TEST(0, TEST_uint_ne(6u, 6u))
  65         | !TEST(1, TEST_uint_lt(5u, 9u))
  66         | !TEST(0, TEST_uint_lt(9u, 5u))
  67         | !TEST(1, TEST_uint_le(5u, 9u))
  68         | !TEST(1, TEST_uint_le(7u, 7u))
  69         | !TEST(0, TEST_uint_le(9u, 5u))
  70         | !TEST(1, TEST_uint_gt(11u, 1u))
  71         | !TEST(0, TEST_uint_gt(1u, 11u))
  72         | !TEST(1, TEST_uint_ge(11u, 1u))
  73         | !TEST(1, TEST_uint_ge(6u, 6u))
  74         | !TEST(0, TEST_uint_ge(1u, 11u)))
  75         goto err;
  76     return 1;
  77
  78 err:
  79     return 0;
  80 }
  81
  82 static int test_char(void)
  83 {
  84     if (!TEST(1, TEST_char_eq('a', 'a'))
  85         | !TEST(0, TEST_char_eq('a', 'A'))
  86         | !TEST(1, TEST_char_ne('a', 'c'))
  87         | !TEST(0, TEST_char_ne('e', 'e'))
  88         | !TEST(1, TEST_char_lt('i', 'x'))
  89         | !TEST(0, TEST_char_lt('x', 'i'))
  90         | !TEST(1, TEST_char_le('i', 'x'))
  91         | !TEST(1, TEST_char_le('n', 'n'))
  92         | !TEST(0, TEST_char_le('x', 'i'))
  93         | !TEST(1, TEST_char_gt('w', 'n'))
  94         | !TEST(0, TEST_char_gt('n', 'w'))
  95         | !TEST(1, TEST_char_ge('w', 'n'))
  96         | !TEST(1, TEST_char_ge('p', 'p'))
  97         | !TEST(0, TEST_char_ge('n', 'w')))
  98         goto err;
  99     return 1;
 100
 101 err:
 102     return 0;
 103 }
 104
 105 static int test_uchar(void)
 106 {
 107     if (!TEST(1, TEST_uchar_eq(49, 49))
 108         | !TEST(0, TEST_uchar_eq(49, 60))
 109         | !TEST(1, TEST_uchar_ne(50, 2))
 110         | !TEST(0, TEST_uchar_ne(66, 66))
 111         | !TEST(1, TEST_uchar_lt(60, 80))
 112         | !TEST(0, TEST_uchar_lt(80, 60))
 113         | !TEST(1, TEST_uchar_le(60, 80))
 114         | !TEST(1, TEST_uchar_le(78, 78))
 115         | !TEST(0, TEST_uchar_le(80, 60))
 116         | !TEST(1, TEST_uchar_gt(88, 37))
 117         | !TEST(0, TEST_uchar_gt(37, 88))
 118         | !TEST(1, TEST_uchar_ge(88, 37))
 119         | !TEST(1, TEST_uchar_ge(66, 66))
 120         | !TEST(0, TEST_uchar_ge(37, 88)))
 121         goto err;
 122     return 1;
 123
 124 err:
 125     return 0;
 126 }
 127
 128 static int test_long(void)
 129 {
 130     if (!TEST(1, TEST_long_eq(123l, 123l))
 131         | !TEST(0, TEST_long_eq(123l, -123l))
 132         | !TEST(1, TEST_long_ne(123l, 500l))
 133         | !TEST(0, TEST_long_ne(1000l, 1000l))
 134         | !TEST(1, TEST_long_lt(-8923l, 102934563l))
 135         | !TEST(0, TEST_long_lt(102934563l, -8923l))
 136         | !TEST(1, TEST_long_le(-8923l, 102934563l))
 137         | !TEST(1, TEST_long_le(12345l, 12345l))
 138         | !TEST(0, TEST_long_le(102934563l, -8923l))
 139         | !TEST(1, TEST_long_gt(84325677l, 12345l))
 140         | !TEST(0, TEST_long_gt(12345l, 84325677l))
 141         | !TEST(1, TEST_long_ge(84325677l, 12345l))
 142         | !TEST(1, TEST_long_ge(465869l, 465869l))
 143         | !TEST(0, TEST_long_ge(12345l, 84325677l)))
 144         goto err;
 145     return 1;
 146
 147 err:
 148     return 0;
 149 }
 150
 151 static int test_ulong(void)
 152 {
 153     if (!TEST(1, TEST_ulong_eq(919ul, 919ul))
 154         | !TEST(0, TEST_ulong_eq(919ul, 10234ul))
 155         | !TEST(1, TEST_ulong_ne(8190ul, 66ul))
 156         | !TEST(0, TEST_ulong_ne(10555ul, 10555ul))
 157         | !TEST(1, TEST_ulong_lt(10234ul, 1000000ul))
 158         | !TEST(0, TEST_ulong_lt(1000000ul, 10234ul))
 159         | !TEST(1, TEST_ulong_le(10234ul, 1000000ul))
 160         | !TEST(1, TEST_ulong_le(100000ul, 100000ul))
 161         | !TEST(0, TEST_ulong_le(1000000ul, 10234ul))
 162         | !TEST(1, TEST_ulong_gt(100000000ul, 22ul))
 163         | !TEST(0, TEST_ulong_gt(22ul, 100000000ul))
 164         | !TEST(1, TEST_ulong_ge(100000000ul, 22ul))
 165         | !TEST(1, TEST_ulong_ge(10555ul, 10555ul))
 166         | !TEST(0, TEST_ulong_ge(22ul, 100000000ul)))
 167         goto err;
 168     return 1;
 169
 170 err:
 171     return 0;
 172 }
 173
 174 static int test_size_t(void)
 175 {
 176     if (!TEST(1, TEST_int_eq((size_t)10, (size_t)10))
 177         | !TEST(0, TEST_int_eq((size_t)10, (size_t)12))
 178         | !TEST(1, TEST_int_ne((size_t)10, (size_t)12))
 179         | !TEST(0, TEST_int_ne((size_t)24, (size_t)24))
 180         | !TEST(1, TEST_int_lt((size_t)30, (size_t)88))
 181         | !TEST(0, TEST_int_lt((size_t)88, (size_t)30))
 182         | !TEST(1, TEST_int_le((size_t)30, (size_t)88))
 183         | !TEST(1, TEST_int_le((size_t)33, (size_t)33))
 184         | !TEST(0, TEST_int_le((size_t)88, (size_t)30))
 185         | !TEST(1, TEST_int_gt((size_t)52, (size_t)33))
 186         | !TEST(0, TEST_int_gt((size_t)33, (size_t)52))
 187         | !TEST(1, TEST_int_ge((size_t)52, (size_t)33))
 188         | !TEST(1, TEST_int_ge((size_t)38, (size_t)38))
 189         | !TEST(0, TEST_int_ge((size_t)33, (size_t)52)))
 190         goto err;
 191     return 1;
 192
 193 err:
 194     return 0;
 195 }
 196
 197 static int test_pointer(void)
 198 {
 199     int x = 0;
 200     char y = 1;
 201
 202     if (!TEST(1, TEST_ptr(&y))
 203         | !TEST(0, TEST_ptr(NULL))
 204         | !TEST(0, TEST_ptr_null(&y))
 205         | !TEST(1, TEST_ptr_null(NULL))
 206         | !TEST(1, TEST_ptr_eq(NULL, NULL))
 207         | !TEST(0, TEST_ptr_eq(NULL, &y))
 208         | !TEST(0, TEST_ptr_eq(&y, NULL))
 209         | !TEST(0, TEST_ptr_eq(&y, &x))
 210         | !TEST(1, TEST_ptr_eq(&x, &x))
 211         | !TEST(0, TEST_ptr_ne(NULL, NULL))
 212         | !TEST(1, TEST_ptr_ne(NULL, &y))
 213         | !TEST(1, TEST_ptr_ne(&y, NULL))
 214         | !TEST(1, TEST_ptr_ne(&y, &x))
 215         | !TEST(0, TEST_ptr_ne(&x, &x)))
 216         goto err;
 217     return 1;
 218
 219 err:
 220     return 0;
 221 }
 222
 223 static int test_bool(void)
 224 {
 225     if (!TEST(0, TEST_true(0))
 226         | !TEST(1, TEST_true(1))
 227         | !TEST(1, TEST_false(0))
 228         | !TEST(0, TEST_false(1)))
 229         goto err;
 230     return 1;
 231
 232 err:
 233     return 0;
 234 }
 235
 236 static int test_string(void)
 237 {
 238     static char buf[] = "abc";
 239
 240     if (!TEST(1, TEST_str_eq(NULL, NULL))
 241         | !TEST(1, TEST_str_eq("abc", buf))
 242         | !TEST(0, TEST_str_eq("abc", NULL))
 243         | !TEST(0, TEST_str_eq("abc", ""))
 244         | !TEST(0, TEST_str_eq(NULL, buf))
 245         | !TEST(0, TEST_str_ne(NULL, NULL))
 246         | !TEST(0, TEST_str_eq("", NULL))
 247         | !TEST(0, TEST_str_eq(NULL, ""))
 248         | !TEST(0, TEST_str_ne("", ""))
 249         | !TEST(0, TEST_str_eq("\1\2\3\4\5", "\1x\3\6\5"))
 250         | !TEST(0, TEST_str_ne("abc", buf))
 251         | !TEST(1, TEST_str_ne("abc", NULL))
 252         | !TEST(1, TEST_str_ne(NULL, buf)))
 253         goto err;
 254     return 1;
 255
 256 err:
 257     return 0;
 258 }
 259
 260 static int test_memory(void)
 261 {
 262     static char buf[] = "xyz";
 263
 264     if (!TEST(1, TEST_mem_eq(NULL, 0, NULL, 0))
 265         | !TEST(1, TEST_mem_eq(NULL, 1, NULL, 2))
 266         | !TEST(0, TEST_mem_eq(NULL, 0, "xyz", 3))
 267         | !TEST(0, TEST_mem_eq(NULL, 7, "abc", 3))
 268         | !TEST(0, TEST_mem_ne(NULL, 0, NULL, 0))
 269         | !TEST(0, TEST_mem_eq(NULL, 0, "", 0))
 270         | !TEST(0, TEST_mem_eq("", 0, NULL, 0))
 271         | !TEST(0, TEST_mem_ne("", 0, "", 0))
 272         | !TEST(0, TEST_mem_eq("xyz", 3, NULL, 0))
 273         | !TEST(0, TEST_mem_eq("xyz", 3, buf, sizeof(buf)))
 274         | !TEST(1, TEST_mem_eq("xyz", 4, buf, sizeof(buf))))
 275         goto err;
 276     return 1;
 277
 278 err:
 279     return 0;
 280 }
 281
 282 static int test_memory_overflow(void)
 283 {
 284     /* Verify that the memory printing overflows without walking the stack */
 285     const char *p = "1234567890123456789012345678901234567890123456789012";
 286     const char *q = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
 287
 288     return TEST(0, TEST_mem_eq(p, strlen(p), q, strlen(q)));
 289 }
 290
 291 static int test_bignum(void)
 292 {
 293     BIGNUM *a = NULL, *b = NULL, *c = NULL;
 294     int r = 0;
 295
 296     if (!TEST(1, TEST_int_eq(BN_dec2bn(&a, "0"), 1))
 297         | !TEST(1, TEST_BN_eq_word(a, 0))
 298         | !TEST(0, TEST_BN_eq_word(a, 30))
 299         | !TEST(1, TEST_BN_abs_eq_word(a, 0))
 300         | !TEST(0, TEST_BN_eq_one(a))
 301         | !TEST(1, TEST_BN_eq_zero(a))
 302         | !TEST(0, TEST_BN_ne_zero(a))
 303         | !TEST(1, TEST_BN_le_zero(a))
 304         | !TEST(0, TEST_BN_lt_zero(a))
 305         | !TEST(1, TEST_BN_ge_zero(a))
 306         | !TEST(0, TEST_BN_gt_zero(a))
 307         | !TEST(1, TEST_BN_even(a))
 308         | !TEST(0, TEST_BN_odd(a))
 309         | !TEST(1, TEST_BN_eq(b, c))
 310         | !TEST(0, TEST_BN_eq(a, b))
 311         | !TEST(1, TEST_BN_ne(NULL, c))
 312         | !TEST(1, TEST_int_eq(BN_dec2bn(&b, "1"), 1))
 313         | !TEST(1, TEST_BN_eq_word(b, 1))
 314         | !TEST(1, TEST_BN_eq_one(b))
 315         | !TEST(0, TEST_BN_abs_eq_word(b, 0))
 316         | !TEST(1, TEST_BN_abs_eq_word(b, 1))
 317         | !TEST(0, TEST_BN_eq_zero(b))
 318         | !TEST(1, TEST_BN_ne_zero(b))
 319         | !TEST(0, TEST_BN_le_zero(b))
 320         | !TEST(0, TEST_BN_lt_zero(b))
 321         | !TEST(1, TEST_BN_ge_zero(b))
 322         | !TEST(1, TEST_BN_gt_zero(b))
 323         | !TEST(0, TEST_BN_even(b))
 324         | !TEST(1, TEST_BN_odd(b))
 325         | !TEST(1, TEST_int_eq(BN_dec2bn(&c, "-334739439"), 10))
 326         | !TEST(0, TEST_BN_eq_word(c, 334739439))
 327         | !TEST(1, TEST_BN_abs_eq_word(c, 334739439))
 328         | !TEST(0, TEST_BN_eq_zero(c))
 329         | !TEST(1, TEST_BN_ne_zero(c))
 330         | !TEST(1, TEST_BN_le_zero(c))
 331         | !TEST(1, TEST_BN_lt_zero(c))
 332         | !TEST(0, TEST_BN_ge_zero(c))
 333         | !TEST(0, TEST_BN_gt_zero(c))
 334         | !TEST(0, TEST_BN_even(c))
 335         | !TEST(1, TEST_BN_odd(c))
 336         | !TEST(1, TEST_BN_eq(a, a))
 337         | !TEST(0, TEST_BN_ne(a, a))
 338         | !TEST(0, TEST_BN_eq(a, b))
 339         | !TEST(1, TEST_BN_ne(a, b))
 340         | !TEST(0, TEST_BN_lt(a, c))
 341         | !TEST(1, TEST_BN_lt(c, b))
 342         | !TEST(0, TEST_BN_lt(b, c))
 343         | !TEST(0, TEST_BN_le(a, c))
 344         | !TEST(1, TEST_BN_le(c, b))
 345         | !TEST(0, TEST_BN_le(b, c))
 346         | !TEST(1, TEST_BN_gt(a, c))
 347         | !TEST(0, TEST_BN_gt(c, b))
 348         | !TEST(1, TEST_BN_gt(b, c))
 349         | !TEST(1, TEST_BN_ge(a, c))
 350         | !TEST(0, TEST_BN_ge(c, b))
 351         | !TEST(1, TEST_BN_ge(b, c)))
 352         goto err;
 353
 354     r = 1;
 355 err:
 356     BN_free(a);
 357     BN_free(b);
 358     BN_free(c);
 359     return r;
 360 }
 361
 362 static int test_long_output(void)
 363 {
 364     const char *p = "1234567890123456789012345678901234567890123456789012";
 365     const char *q = "1234567890klmnopqrs01234567890EFGHIJKLM0123456789XYZ";
 366     const char *r = "1234567890123456789012345678901234567890123456789012"
 367                     "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXY+"
 368                     "12345678901234567890123ABC78901234567890123456789012";
 369     const char *s = "1234567890123456789012345678901234567890123456789012"
 370                     "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXY-"
 371                     "1234567890123456789012345678901234567890123456789012"
 372                     "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
 373
 374     return TEST(0, TEST_str_eq(p,  q))
 375            & TEST(0, TEST_str_eq(q, r))
 376            & TEST(0, TEST_str_eq(r, s))
 377            & TEST(0, TEST_mem_eq(r, strlen(r), s, strlen(s)));
 378 }
 379
 380 static int test_long_bignum(void)
 381 {
 382     int r;
 383     BIGNUM *a = NULL, *b = NULL, *c = NULL, *d = NULL;
 384     const char as[] = "1234567890123456789012345678901234567890123456789012"
 385                       "1234567890123456789012345678901234567890123456789012"
 386                       "1234567890123456789012345678901234567890123456789012"
 387                       "1234567890123456789012345678901234567890123456789012"
 388                       "1234567890123456789012345678901234567890123456789012"
 389                       "1234567890123456789012345678901234567890123456789012"
 390                       "FFFFFF";
 391     const char bs[] = "1234567890123456789012345678901234567890123456789012"
 392                       "1234567890123456789012345678901234567890123456789013"
 393                       "987657";
 394     const char cs[] = "-"        /* 64 characters plus sign */
 395                       "123456789012345678901234567890"
 396                       "123456789012345678901234567890"
 397                       "ABCD";
 398     const char ds[] = "-"        /* 63 characters plus sign */
 399                       "23456789A123456789B123456789C"
 400                       "123456789D123456789E123456789F"
 401                       "ABCD";
 402
 403     r = TEST_true(BN_hex2bn(&a, as))
 404         && TEST_true(BN_hex2bn(&b, bs))
 405         && TEST_true(BN_hex2bn(&c, cs))
 406         && TEST_true(BN_hex2bn(&d, ds))
 407         && (TEST(0, TEST_BN_eq(a, b))
 408             & TEST(0, TEST_BN_eq(b, a))
 409             & TEST(0, TEST_BN_eq(b, NULL))
 410             & TEST(0, TEST_BN_eq(NULL, a))
 411             & TEST(1, TEST_BN_ne(a, NULL))
 412             & TEST(0, TEST_BN_eq(c, d)));
 413     BN_free(a);
 414     BN_free(b);
 415     BN_free(c);
 416     BN_free(d);
 417     return r;
 418 }
 419
 420 static int test_messages(void)
 421 {
 422     TEST_info("This is an %s message.", "info");
 423     TEST_error("This is an %s message.", "error");
 424     return 1;
 425 }
 426
 427 static int test_single_eval(void)
 428 {
 429     int i = 4;
 430     long l = -9000;
 431     char c = 'd';
 432     unsigned char uc = 22;
 433     unsigned long ul = 500;
 434     size_t st = 1234;
 435     char buf[4] = { 0 }, *p = buf;
 436
 437            /* int */
 438     return TEST_int_eq(i++, 4)
 439            && TEST_int_eq(i, 5)
 440            && TEST_int_gt(++i, 5)
 441            && TEST_int_le(5, i++)
 442            && TEST_int_ne(--i, 5)
 443            && TEST_int_eq(12, i *= 2)
 444            /* Long */
 445            && TEST_long_eq(l--, -9000L)
 446            && TEST_long_eq(++l, -9000L)
 447            && TEST_long_ne(-9000L, l /= 2)
 448            && TEST_long_lt(--l, -4500L)
 449            /* char */
 450            && TEST_char_eq(++c, 'e')
 451            && TEST_char_eq('e', c--)
 452            && TEST_char_ne('d', --c)
 453            && TEST_char_le('b', --c)
 454            && TEST_char_lt(c++, 'c')
 455            /* unsigned char */
 456            && TEST_uchar_eq(22, uc++)
 457            && TEST_uchar_eq(uc /= 2, 11)
 458            && TEST_ulong_eq(ul ^= 1, 501)
 459            && TEST_ulong_eq(502, ul ^= 3)
 460            && TEST_ulong_eq(ul = ul * 3 - 6, 1500)
 461            /* size_t */
 462            && TEST_size_t_eq((--i, st++), 1234)
 463            && TEST_size_t_eq(st, 1235)
 464            && TEST_int_eq(11, i)
 465            /* pointers */
 466            && TEST_ptr_eq(p++, buf)
 467            && TEST_ptr_eq(buf + 2, ++p)
 468            && TEST_ptr_eq(buf, p -= 2)
 469            && TEST_ptr(++p)
 470            && TEST_ptr_eq(p, buf + 1)
 471            && TEST_ptr_null(p = NULL)
 472            /* strings */
 473            && TEST_str_eq(p = "123456" + 1, "23456")
 474            && TEST_str_eq("3456", ++p)
 475            && TEST_str_ne(p++, "456")
 476            /* memory */
 477            && TEST_mem_eq(--p, sizeof("3456"), "3456", sizeof("3456"))
 478            && TEST_mem_ne(p++, sizeof("456"), "456", sizeof("456"))
 479            && TEST_mem_eq(p--, sizeof("456"), "456", sizeof("456"));
 480 }
 481
 482 void register_tests(void)
 483 {
 484     ADD_TEST(test_int);
 485     ADD_TEST(test_uint);
 486     ADD_TEST(test_char);
 487     ADD_TEST(test_uchar);
 488     ADD_TEST(test_long);
 489     ADD_TEST(test_ulong);
 490     ADD_TEST(test_size_t);
 491     ADD_TEST(test_pointer);
 492     ADD_TEST(test_bool);
 493     ADD_TEST(test_string);
 494     ADD_TEST(test_memory);
 495     ADD_TEST(test_memory_overflow);
 496     ADD_TEST(test_bignum);
 497     ADD_TEST(test_long_output);
 498     ADD_TEST(test_long_bignum);
 499     ADD_TEST(test_messages);
 500     ADD_TEST(test_single_eval);
 501 }