src/util/test_strings.c

   1 /*
   2      This file is part of GNUnet.
   3      Copyright (C) 2009 GNUnet e.V.
   4
   5      GNUnet is free software: you can redistribute it and/or modify it
   6      under the terms of the GNU Affero General Public License as published
   7      by the Free Software Foundation, either version 3 of the License,
   8      or (at your option) any later version.
   9
  10      GNUnet is distributed in the hope that it will be useful, but
  11      WITHOUT ANY WARRANTY; without even the implied warranty of
  12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13      Affero General Public License for more details.
  14
  15      You should have received a copy of the GNU Affero General Public License
  16      along with this program.  If not, see <http://www.gnu.org/licenses/>.
  17
  18      SPDX-License-Identifier: AGPL3.0-or-later
  19  */
  20 /**
  21  * @file util/test_strings.c
  22  * @brief testcase for strings.c
  23  */
  24 #include "platform.h"
  25 #include "gnunet_util_lib.h"
  26
  27
  28 #define WANT(a, b) if (0 != strcmp(a, b)) { fprintf(stderr, "Got `%s', wanted `%s'\n", b, a); GNUNET_free(b); GNUNET_break(0); return 1; } else { GNUNET_free(b); }
  29 #define WANTNF(a, b) do { if (0 != strcmp(a, b)) { fprintf(stderr, "Got `%s', wanted `%s'\n", b, a); GNUNET_break(0); return 1; } } while (0)
  30 #define WANTB(a, b, l) if (0 != memcmp(a, b, l)) { GNUNET_break(0); return 1; } else { }
  31
  32 int
  33 main(int argc, char *argv[])
  34 {
  35   char buf[128];
  36   char *r;
  37   char *b;
  38   const char *bc;
  39   struct GNUNET_TIME_Absolute at;
  40   struct GNUNET_TIME_Absolute atx;
  41   struct GNUNET_TIME_Relative rt;
  42   struct GNUNET_TIME_Relative rtx;
  43   const char *hdir;
  44
  45   GNUNET_log_setup("test_strings", "ERROR", NULL);
  46   sprintf(buf, "4 %s", _(/* size unit */ "b"));
  47   b = GNUNET_STRINGS_byte_size_fancy(4);
  48   WANT(buf, b);
  49   sprintf(buf, "10 %s", _(/* size unit */ "KiB"));
  50   b = GNUNET_STRINGS_byte_size_fancy(10240);
  51   WANT(buf, b);
  52   sprintf(buf, "10 %s", _(/* size unit */ "TiB"));
  53   b = GNUNET_STRINGS_byte_size_fancy(10240LL * 1024LL * 1024LL * 1024LL);
  54   WANT(buf, b);
  55   sprintf(buf, "4 %s", _(/* time unit */ "ms"));
  56   bc = GNUNET_STRINGS_relative_time_to_string(GNUNET_TIME_relative_multiply
  57                                                 (GNUNET_TIME_UNIT_MILLISECONDS,
  58                                                 4), GNUNET_YES);
  59   WANTNF(buf, bc);
  60   sprintf(buf, "7 %s", _(/* time unit */ "s"));
  61   bc = GNUNET_STRINGS_relative_time_to_string(GNUNET_TIME_relative_multiply
  62                                                 (GNUNET_TIME_UNIT_MILLISECONDS,
  63                                                 7 * 1000), GNUNET_YES);
  64   WANTNF(buf, bc);
  65   sprintf(buf, "7 %s", _(/* time unit */ "h"));
  66   bc = GNUNET_STRINGS_relative_time_to_string(GNUNET_TIME_relative_multiply
  67                                                 (GNUNET_TIME_UNIT_MILLISECONDS,
  68                                                 7 * 60 * 60 * 1000), GNUNET_YES);
  69   WANTNF(buf, bc);
  70 #ifndef MINGW
  71   hdir = getenv("HOME");
  72 #else
  73   hdir = getenv("USERPROFILE");
  74 #endif
  75   GNUNET_snprintf(buf, sizeof(buf), "%s%s", hdir, DIR_SEPARATOR_STR);
  76   b = GNUNET_STRINGS_filename_expand("~");
  77   GNUNET_assert(b != NULL);
  78   WANT(buf, b);
  79   GNUNET_STRINGS_buffer_fill(buf, sizeof(buf), 3, "a", "btx", "c");
  80   WANTB("a\0btx\0c", buf, 8);
  81   if (6 != GNUNET_STRINGS_buffer_tokenize(buf, sizeof(buf), 2, &r, &b))
  82     return 1;
  83   r = GNUNET_strdup(r);
  84   WANT("a", r);
  85   b = GNUNET_strdup(b);
  86   WANT("btx", b);
  87   if (0 != GNUNET_STRINGS_buffer_tokenize(buf, 2, 2, &r, &b))
  88     return 1;
  89   at.abs_value_us = 5000000;
  90   bc = GNUNET_STRINGS_absolute_time_to_string(at);
  91   /* bc should be something like "Wed Dec 31 17:00:05 1969"
  92    * where the details of the day and hour depend on the timezone;
  93    * however, the "0:05 19" should always be there; hence: */
  94   if (NULL == strstr(bc, "0:05 19"))
  95     {
  96       fprintf(stderr, "Got %s\n", bc);
  97       GNUNET_break(0);
  98       return 1;
  99     }
 100   b = GNUNET_STRINGS_to_utf8("TEST", 4, "ASCII");
 101   WANT("TEST", b);
 102
 103   at = GNUNET_TIME_UNIT_FOREVER_ABS;
 104   bc = GNUNET_STRINGS_absolute_time_to_string(at);
 105   GNUNET_assert(GNUNET_OK ==
 106                 GNUNET_STRINGS_fancy_time_to_absolute(bc, &atx));
 107   GNUNET_assert(atx.abs_value_us == at.abs_value_us);
 108
 109   at.abs_value_us = 50000000000;
 110   bc = GNUNET_STRINGS_absolute_time_to_string(at);
 111
 112   GNUNET_assert(GNUNET_OK ==
 113                 GNUNET_STRINGS_fancy_time_to_absolute(bc, &atx));
 114
 115   if (atx.abs_value_us != at.abs_value_us)
 116     {
 117 #ifdef WINDOWS
 118       DWORD tzv;
 119       TIME_ZONE_INFORMATION tzi;
 120       tzv = GetTimeZoneInformation(&tzi);
 121       if (TIME_ZONE_ID_INVALID != tzv)
 122         {
 123           atx.abs_value_us -= 1000LL * 1000LL * tzi.Bias * 60LL;
 124         }
 125       if (atx.abs_value_us == at.abs_value_us)
 126         fprintf(stderr,
 127                 "WARNING:  GNUNET_STRINGS_fancy_time_to_absolute() miscalculates timezone!\n");
 128 #endif
 129       GNUNET_assert(0);
 130     }
 131
 132   GNUNET_log_skip(2, GNUNET_NO);
 133   b = GNUNET_STRINGS_to_utf8("TEST", 4, "unknown");
 134   GNUNET_log_skip(0, GNUNET_YES);
 135   WANT("TEST", b);
 136
 137   GNUNET_assert(GNUNET_OK ==
 138                 GNUNET_STRINGS_fancy_time_to_relative("15m", &rt));
 139   GNUNET_assert(GNUNET_OK ==
 140                 GNUNET_STRINGS_fancy_time_to_relative("15 m", &rtx));
 141   GNUNET_assert(rt.rel_value_us == rtx.rel_value_us);
 142
 143   return 0;
 144 }
 145
 146
 147 /* end of test_strings.c */