-remove find() forking, we pretty much should not need this anymore, and it confused...
[oweals/gnunet.git] / src / util / test_strings.c
1 /*
2      This file is part of GNUnet.
3      (C) 2009 Christian Grothoff (and other contributing authors)
4
5      GNUnet is free software; you can redistribute it and/or modify
6      it under the terms of the GNU General Public License as published
7      by the Free Software Foundation; either version 3, or (at your
8      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      General Public License for more details.
14
15      You should have received a copy of the GNU General Public License
16      along with GNUnet; see the file COPYING.  If not, write to the
17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18      Boston, MA 02111-1307, USA.
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   GNUNET_assert (GNUNET_OK ==
112                  GNUNET_STRINGS_fancy_time_to_absolute (bc, &atx));
113   GNUNET_assert (atx.abs_value_us == at.abs_value_us);
114
115   GNUNET_log_skip (2, GNUNET_NO);
116   b = GNUNET_STRINGS_to_utf8 ("TEST", 4, "unknown");
117   GNUNET_log_skip (0, GNUNET_YES);
118   WANT ("TEST", b);
119
120   GNUNET_assert (GNUNET_OK ==
121       GNUNET_STRINGS_fancy_time_to_relative ("15m", &rt));
122   GNUNET_assert (GNUNET_OK ==
123       GNUNET_STRINGS_fancy_time_to_relative ("15 m", &rtx));
124   GNUNET_assert (rt.rel_value_us == rtx.rel_value_us);
125
126   return 0;
127 }
128
129
130 /* end of test_strings.c */