test/gmdifftest.c

   1 /*
   2  * Copyright 2015-2021 The OpenSSL Project Authors. All Rights Reserved.
   3  *
   4  * Licensed under the Apache License 2.0 (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 #include <openssl/crypto.h>
  11
  12 #include "testutil.h"
  13
  14 #define SECS_PER_DAY (24 * 60 * 60)
  15
  16 /*
  17  * Time checking test code. Check times are identical for a wide range of
  18  * offsets. This should be run on a machine with 64 bit time_t or it will
  19  * trigger the very errors the routines fix.
  20  */
  21
  22 static int check_time(long offset)
  23 {
  24     struct tm tm1, tm2, o1;
  25     int off_day, off_sec;
  26     long toffset;
  27     time_t t1, t2;
  28
  29     time(&t1);
  30
  31     t2 = t1 + offset;
  32     OPENSSL_gmtime(&t2, &tm2);
  33     OPENSSL_gmtime(&t1, &tm1);
  34     o1 = tm1;
  35     if (!TEST_true(OPENSSL_gmtime_adj(&tm1, 0, offset))
  36         || !TEST_int_eq(tm1.tm_year, tm2.tm_year)
  37         || !TEST_int_eq(tm1.tm_mon, tm2.tm_mon)
  38         || !TEST_int_eq(tm1.tm_mday, tm2.tm_mday)
  39         || !TEST_int_eq(tm1.tm_hour, tm2.tm_hour)
  40         || !TEST_int_eq(tm1.tm_min, tm2.tm_min)
  41         || !TEST_int_eq(tm1.tm_sec, tm2.tm_sec)
  42         || !TEST_true(OPENSSL_gmtime_diff(&off_day, &off_sec, &o1, &tm1)))
  43         return 0;
  44     toffset = (long)off_day * SECS_PER_DAY + off_sec;
  45     if (!TEST_long_eq(offset, toffset))
  46         return 0;
  47     return 1;
  48 }
  49
  50 static int test_gmtime(int offset)
  51 {
  52     return check_time(offset)
  53            && check_time(-offset)
  54            && check_time(offset * 1000L)
  55            && check_time(-offset * 1000L)
  56            && check_time(offset * 1000000L)
  57            && check_time(-offset * 1000000L);
  58 }
  59
  60 int setup_tests(void)
  61 {
  62     if (sizeof(time_t) < 8)
  63         TEST_info("Skipping; time_t is less than 64-bits");
  64     else
  65         ADD_ALL_TESTS_NOSUBTEST(test_gmtime, 1000);
  66     return 1;
  67 }