annotate tests.c @ 596:4ea7b0e9dcba

Improve string printf() tests.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 13 Jan 2020 17:13:13 +0200
parents 4fd6ee473d1b
children aec713767482
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
1 #include "th_types.h"
274
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
2 #include "th_args.h"
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
3 #include "th_util.h"
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
4 #include "th_string.h"
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
5 #include "th_crypto.h"
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
6 #include "th_config.h"
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
7
364
f2e6e3352f2d Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 363
diff changeset
8
f2e6e3352f2d Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 363
diff changeset
9 #define SET_BUF_SIZE 128
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
10 #define SET_BUF_SIZE_2 ((SET_BUF_SIZE) + 32)
364
f2e6e3352f2d Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 363
diff changeset
11 #define SET_MAX_TESTS 64
f2e6e3352f2d Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 363
diff changeset
12 #define SET_SENTINEL_BYTE 0x0e5
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
13
291
886a42023415 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
14
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
15 #define NCOUNT(xxx) (sizeof(xxx) / sizeof(xxx[0]))
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
16
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
17
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
18 enum
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
19 {
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
20 TST_SUPERFLUOUS = 0x0001,
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
21 TST_CORNERCASE = 0x0002,
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
22 TST_OVERFLOW = 0x0004,
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
23 TST_BROKEN = 0x1000,
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
24 TST_ALL = 0xffff,
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
25 };
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
26
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
27
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
28 typedef struct
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
29 {
502
ebf89497305a Remove some unused functionality for simplification.
Matti Hamalainen <ccr@tnsp.org>
parents: 501
diff changeset
30 char *header;
551
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
31 BOOL
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
32 shown, // Has test result value been shown?
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
33 failed; // Did the test fail? (used by some tests to show extra info)
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
34 } test_ctx;
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
35
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
36
551
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
37 // Global variables
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
38 int tests_failed, // Total number of tests failed
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
39 tests_passed, // Total number of tests passed
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
40 tests_total, // Total number of tests RUN
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
41 sets_total, // Number of test sets
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
42 sets_nenabled; // Number of test sets enabled
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
43
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
44 int sets_enabled[SET_MAX_TESTS];
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
45
551
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
46 char buf1[SET_BUF_SIZE_2],
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
47 buf2[SET_BUF_SIZE_2];
2fbf5c2a662c Add few comments.
Matti Hamalainen <ccr@tnsp.org>
parents: 544
diff changeset
48
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
49 int optFlags = TST_ALL;
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
50
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
51
274
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
52 // Define option arguments
380
ac10155d2b4a Rename th_optarg_t to t_optarg. API break.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
53 static const th_optarg arg_opts[] =
274
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
54 {
587
98812eb78d8e Add new compile-time optional th_optarg struct field o_arg for specifying the option argument description/name. TH_USE_OPT_ARG must be defined at compile time.
Matti Hamalainen <ccr@tnsp.org>
parents: 563
diff changeset
55 { 0, '?', "help" , NULL, "Show this help", OPT_NONE },
98812eb78d8e Add new compile-time optional th_optarg struct field o_arg for specifying the option argument description/name. TH_USE_OPT_ARG must be defined at compile time.
Matti Hamalainen <ccr@tnsp.org>
parents: 563
diff changeset
56 { 1, 'v', "verbose" , NULL, "Be more verbose", OPT_NONE },
98812eb78d8e Add new compile-time optional th_optarg struct field o_arg for specifying the option argument description/name. TH_USE_OPT_ARG must be defined at compile time.
Matti Hamalainen <ccr@tnsp.org>
parents: 563
diff changeset
57 { 2, 's', "sets" , "<sets>", "Perform test sets -s <set>[,<set2>..]", OPT_ARGREQ },
98812eb78d8e Add new compile-time optional th_optarg struct field o_arg for specifying the option argument description/name. TH_USE_OPT_ARG must be defined at compile time.
Matti Hamalainen <ccr@tnsp.org>
parents: 563
diff changeset
58 { 3, 't', "tests" , "<tests>", "Perform only tests (see below)", OPT_ARGREQ },
274
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
59 };
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
60
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
61 static const int arg_nopts = sizeof(arg_opts) / sizeof(arg_opts[0]);
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
62
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
63
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
64 BOOL tprintv(const int level, const char *fmt, va_list ap)
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
65 {
469
fe5b803ae449 Rename the global variable th_verbosityLevel to th_verbosity.
Matti Hamalainen <ccr@tnsp.org>
parents: 465
diff changeset
66 if (level <= th_verbosity)
363
68e8ad3327b8 Improve tests output.
Matti Hamalainen <ccr@tnsp.org>
parents: 362
diff changeset
67 {
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
68 vfprintf(stdout, fmt, ap);
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
69 return TRUE;
363
68e8ad3327b8 Improve tests output.
Matti Hamalainen <ccr@tnsp.org>
parents: 362
diff changeset
70 }
68e8ad3327b8 Improve tests output.
Matti Hamalainen <ccr@tnsp.org>
parents: 362
diff changeset
71 else
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
72 return FALSE;
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
73 }
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
74
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
75
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
76 BOOL tprint(const int level, const char *fmt, ...)
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
77 {
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
78 BOOL retv;
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
79 va_list ap;
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
80 va_start(ap, fmt);
363
68e8ad3327b8 Improve tests output.
Matti Hamalainen <ccr@tnsp.org>
parents: 362
diff changeset
81 retv = tprintv(level, fmt, ap);
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
82 va_end(ap);
363
68e8ad3327b8 Improve tests output.
Matti Hamalainen <ccr@tnsp.org>
parents: 362
diff changeset
83 return retv;
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
84 }
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
85
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
86
274
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
87 void arg_show_help(void)
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
88 {
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
89 th_print_banner(stdout, th_prog_name, "[options]");
592
4fd6ee473d1b Fix tests.c after the addition of the width argument to th_args_help().
Matti Hamalainen <ccr@tnsp.org>
parents: 587
diff changeset
90 th_args_help(stdout, arg_opts, arg_nopts, 0, 80 - 2);
274
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
91 }
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
92
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
93
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
94 BOOL arg_handle_opt(const int optN, char *optArg, char *currArg)
274
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
95 {
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
96 switch (optN)
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
97 {
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
98 case 0:
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
99 arg_show_help();
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
100 exit(0);
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
101 break;
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
102
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
103 case 1:
469
fe5b803ae449 Rename the global variable th_verbosityLevel to th_verbosity.
Matti Hamalainen <ccr@tnsp.org>
parents: 465
diff changeset
104 th_verbosity++;
274
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
105 break;
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
106
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
107 case 2:
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
108 {
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
109 BOOL ret = TRUE;
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
110 char *pos, *pstr, *next;
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
111 pos = pstr = th_strdup(optArg);
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
112 memset(sets_enabled, 0, sizeof(sets_enabled));
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
113
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
114 do {
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
115 if ((next = strchr(pos, ',')) != NULL)
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
116 *next = 0;
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
117
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
118 char *tmp = th_strdup_trim(pos, TH_TRIM_BOTH);
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
119 if (tmp != NULL)
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
120 {
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
121 int val = atoi(tmp);
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
122 if (val > 0 && val <= SET_MAX_TESTS)
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
123 sets_enabled[val - 1] = 1;
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
124 else
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
125 {
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
126 THERR("Invalid test number #%d, out of range [%d .. %d]\n", val, 1, SET_MAX_TESTS);
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
127 ret = FALSE;
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
128 }
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
129 th_free(tmp);
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
130 }
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
131
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
132 if (next != NULL)
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
133 pos = next + 1;
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
134 } while (next != NULL);
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
135 th_free(pstr);
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
136 return ret;
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
137 }
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
138 break;
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
139
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
140 case 3:
366
21bbb2dc4fac Actually parse the -t option argument.
Matti Hamalainen <ccr@tnsp.org>
parents: 365
diff changeset
141 optFlags = atoi(optArg);
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
142 break;
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
143
274
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
144 default:
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
145 THERR("Unknown option '%s'.\n", currArg);
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
146 return FALSE;
274
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
147 }
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
148
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
149 return TRUE;
274
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
150 }
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
151
f875db8634b6 Implement commandline options for test driver.
Matti Hamalainen <ccr@tnsp.org>
parents: 272
diff changeset
152
342
09c2f6abf694 Fix memory leaks in test suite.
Matti Hamalainen <ccr@tnsp.org>
parents: 340
diff changeset
153 void test_end(test_ctx *ctx)
09c2f6abf694 Fix memory leaks in test suite.
Matti Hamalainen <ccr@tnsp.org>
parents: 340
diff changeset
154 {
09c2f6abf694 Fix memory leaks in test suite.
Matti Hamalainen <ccr@tnsp.org>
parents: 340
diff changeset
155 th_free_r(&ctx->header);
09c2f6abf694 Fix memory leaks in test suite.
Matti Hamalainen <ccr@tnsp.org>
parents: 340
diff changeset
156 }
09c2f6abf694 Fix memory leaks in test suite.
Matti Hamalainen <ccr@tnsp.org>
parents: 340
diff changeset
157
09c2f6abf694 Fix memory leaks in test suite.
Matti Hamalainen <ccr@tnsp.org>
parents: 340
diff changeset
158
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
159 void test_start_v(test_ctx *ctx, const char *fmt, va_list ap)
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
160 {
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
161 tests_total++;
502
ebf89497305a Remove some unused functionality for simplification.
Matti Hamalainen <ccr@tnsp.org>
parents: 501
diff changeset
162 memset(ctx, 0, sizeof(test_ctx));
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
163 ctx->header = th_strdup_vprintf(fmt, ap);
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
164 }
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
165
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
166
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
167 void test_start(test_ctx *ctx, const char *fmt, ...)
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
168 {
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
169 va_list ap;
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
170 va_start(ap, fmt);
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
171 test_start_v(ctx, fmt, ap);
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
172 va_end(ap);
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
173 }
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
174
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
175
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
176 void test_result_msg_v(test_ctx *ctx, BOOL check, const char *fmt, va_list ap)
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
177 {
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
178 if (check)
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
179 {
363
68e8ad3327b8 Improve tests output.
Matti Hamalainen <ccr@tnsp.org>
parents: 362
diff changeset
180 if (!ctx->shown && tprint(2, "%s: OK\n", ctx->header))
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
181 ctx->shown = TRUE;
363
68e8ad3327b8 Improve tests output.
Matti Hamalainen <ccr@tnsp.org>
parents: 362
diff changeset
182
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
183 tests_passed++;
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
184 }
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
185 else
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
186 {
363
68e8ad3327b8 Improve tests output.
Matti Hamalainen <ccr@tnsp.org>
parents: 362
diff changeset
187 if (!ctx->shown && tprint(0, "%s: FAIL\n", ctx->header))
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
188 ctx->shown = TRUE;
363
68e8ad3327b8 Improve tests output.
Matti Hamalainen <ccr@tnsp.org>
parents: 362
diff changeset
189
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
190 if (fmt != NULL)
263
423771158575 Add more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 261
diff changeset
191 {
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
192 tprint(0, " - ");
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
193 tprintv(0, fmt, ap);
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
194 tprint(0, "\n");
263
423771158575 Add more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 261
diff changeset
195 }
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
196 tests_failed++;
529
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
197
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
198 ctx->failed = TRUE;
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
199 }
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
200 }
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
201
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
202
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
203 BOOL test_result_msg(test_ctx *ctx, BOOL check, const char *fmt, ...)
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
204 {
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
205 va_list ap;
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
206 va_start(ap, fmt);
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
207 test_result_msg_v(ctx, check, fmt, ap);
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
208 va_end(ap);
305
5afd918cbd79 Have a return value for test result functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 304
diff changeset
209 return check;
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
210 }
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
211
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
212
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
213 BOOL test_result(test_ctx *ctx, BOOL check)
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
214 {
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
215 test_result_msg_v(ctx, check, NULL, NULL);
305
5afd918cbd79 Have a return value for test result functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 304
diff changeset
216 return check;
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
217 }
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
218
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
219
319
f2af6049d958 Improve testing.
Matti Hamalainen <ccr@tnsp.org>
parents: 317
diff changeset
220 void test_snprintf_do(size_t len, const char *msg, const char *fmt, va_list ap)
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
221 {
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
222 int ret1, ret2;
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
223 va_list tmp;
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
224 test_ctx ctx;
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
225
529
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
226 // Setup printf debug value
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
227 th_printf_debug = th_verbosity >= 3;
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
228 th_printf_debug_prefix = " - ";
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
229
263
423771158575 Add more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 261
diff changeset
230 // Test basic *printf() functionality
530
94d4130cc29c Clarify printf test output slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 529
diff changeset
231 test_start(&ctx, "th_vsnprintf(buflen=%" PRIu_SIZE_T ", \"%s\", %s)", len, fmt, msg);
259
33652234f162 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 257
diff changeset
232
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
233 memset(buf1, SET_SENTINEL_BYTE, SET_BUF_SIZE_2); buf1[SET_BUF_SIZE_2-1] = 0;
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
234 memset(buf2, SET_SENTINEL_BYTE, SET_BUF_SIZE_2); buf2[SET_BUF_SIZE_2-1] = 0;
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
235
339
46a0fab6ca1f Fix snprintf() test running.
Matti Hamalainen <ccr@tnsp.org>
parents: 338
diff changeset
236 va_copy(tmp, ap); ret1 = th_vsnprintf(buf1, len, fmt, tmp);
46a0fab6ca1f Fix snprintf() test running.
Matti Hamalainen <ccr@tnsp.org>
parents: 338
diff changeset
237 va_copy(tmp, ap); ret2 = vsnprintf(buf2, len, fmt, tmp);
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
238
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
239 test_result_msg(&ctx, ret1 == ret2, "retval mismatch %d [th] != %d [libc]", ret1, ret2);
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
240 test_result_msg(&ctx, strcmp(buf1, buf2) == 0, "result mismatch '%s' [th] != '%s' [libc]", buf1, buf2);
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
241
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
242 if (optFlags & TST_OVERFLOW)
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
243 {
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
244 test_result_msg(&ctx, (unsigned char) buf1[len] == SET_SENTINEL_BYTE, "buffer #1 overflow, sentinel 0x%02x", buf1[len]);
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
245 test_result_msg(&ctx, (unsigned char) buf2[len] == SET_SENTINEL_BYTE, "buffer #2 overflow, sentinel 0x%02x", buf2[len]);
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
246 }
261
f1decaee6157 Improve tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 259
diff changeset
247
529
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
248 if (ctx.failed && !th_printf_debug && th_verbosity >= 1)
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
249 {
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
250 th_printf_debug = TRUE;
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
251 va_copy(tmp, ap); ret1 = th_vsnprintf(buf1, len, fmt, tmp);
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
252 va_copy(tmp, ap); ret2 = vsnprintf(buf2, len, fmt, tmp);
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
253 }
c44ebf5b08fd Improve printf debugging in tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 527
diff changeset
254
342
09c2f6abf694 Fix memory leaks in test suite.
Matti Hamalainen <ccr@tnsp.org>
parents: 340
diff changeset
255 test_end(&ctx);
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
256 }
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
257
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
258
319
f2af6049d958 Improve testing.
Matti Hamalainen <ccr@tnsp.org>
parents: 317
diff changeset
259 void test_snprintf(const char *msg, const char *fmt, ...)
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
260 {
362
a688d34c11d4 Sanitize test_snprintf().
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
261 test_ctx ctx;
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
262 va_list ap, tmp;
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
263 va_start(ap, fmt);
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
264
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
265 if (optFlags & TST_CORNERCASE)
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
266 {
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
267 va_copy(tmp, ap); test_snprintf_do(0, msg, fmt, tmp);
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
268 va_copy(tmp, ap); test_snprintf_do(1, msg, fmt, tmp);
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
269 va_copy(tmp, ap); test_snprintf_do(2, msg, fmt, tmp);
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
270 va_copy(tmp, ap); test_snprintf_do(16, msg, fmt, tmp);
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
271 }
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
272
319
f2af6049d958 Improve testing.
Matti Hamalainen <ccr@tnsp.org>
parents: 317
diff changeset
273 va_copy(tmp, ap); test_snprintf_do(SET_BUF_SIZE, msg, fmt, tmp);
362
a688d34c11d4 Sanitize test_snprintf().
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
274
a688d34c11d4 Sanitize test_snprintf().
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
275 // Test th_strdup_vprintf()
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
276 if (optFlags & TST_SUPERFLUOUS)
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
277 {
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
278 test_start(&ctx, "th_strdup_vprintf('%s')", fmt);
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
279 va_copy(tmp, ap);
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
280 char *str = th_strdup_vprintf(fmt, tmp);
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
281 test_result_msg(&ctx, str != NULL, "result NULL");
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
282 th_free(str);
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
283 test_end(&ctx);
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
284 }
362
a688d34c11d4 Sanitize test_snprintf().
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
285
441
2991e6b52d95 Get rid of trailing whitespace.
Matti Hamalainen <ccr@tnsp.org>
parents: 412
diff changeset
286 va_end(ap);
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
287 tprint(2,
291
886a42023415 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
288 "-----------------------------------------------------\n");
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
289 }
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
290
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
291
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
292 BOOL test_set_start(const char *str)
264
9b6fd2953d8c Add test header printing function.
Matti Hamalainen <ccr@tnsp.org>
parents: 263
diff changeset
293 {
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
294 if (sets_enabled[sets_total++])
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
295 {
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
296 sets_nenabled++;
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
297 tprint(1,
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
298 "======================================================\n"
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
299 " Set #%d : %s tests\n"
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
300 "======================================================\n",
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
301 sets_total, str);
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
302
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
303 return TRUE;
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
304 }
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
305 else
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
306 return FALSE;
264
9b6fd2953d8c Add test header printing function.
Matti Hamalainen <ccr@tnsp.org>
parents: 263
diff changeset
307 }
9b6fd2953d8c Add test header printing function.
Matti Hamalainen <ccr@tnsp.org>
parents: 263
diff changeset
308
9b6fd2953d8c Add test header printing function.
Matti Hamalainen <ccr@tnsp.org>
parents: 263
diff changeset
309
524
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
310 #define TEST1(fun) do { \
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
311 test_ctx ctx; \
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
312 test_start(&ctx, # fun ); \
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
313 test_result(&ctx, fun); \
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
314 test_end(&ctx); \
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
315 } while (0)
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
316
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
317 #define TEST1A(fmt, fun, fcmp, fres) do { \
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
318 test_ctx ctx; \
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
319 test_start(&ctx, #fun " " #fcmp " " fmt " (" fmt ")", fres, fun); \
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
320 test_result(&ctx, fun fcmp fres ); \
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
321 test_end(&ctx); \
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
322 } while (0)
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
323
263
423771158575 Add more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 261
diff changeset
324 #define TEST2(fun, str1, str2, ret) do { \
502
ebf89497305a Remove some unused functionality for simplification.
Matti Hamalainen <ccr@tnsp.org>
parents: 501
diff changeset
325 test_ctx ctx; \
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
326 test_start(&ctx, # fun "('%s', '%s')", str1, str2); \
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
327 test_result(&ctx, ( fun (str1, str2) == 0) == ret); \
342
09c2f6abf694 Fix memory leaks in test suite.
Matti Hamalainen <ccr@tnsp.org>
parents: 340
diff changeset
328 test_end(&ctx); \
263
423771158575 Add more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 261
diff changeset
329 } while (0)
423771158575 Add more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 261
diff changeset
330
266
3a020aa05f28 More tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 265
diff changeset
331 #define TEST2B(fun, str1, str2, ret) do { \
502
ebf89497305a Remove some unused functionality for simplification.
Matti Hamalainen <ccr@tnsp.org>
parents: 501
diff changeset
332 test_ctx ctx; \
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
333 test_start(&ctx, # fun "('%s', '%s')", str1, str2); \
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
334 test_result(&ctx, fun (str1, str2) == ret); \
342
09c2f6abf694 Fix memory leaks in test suite.
Matti Hamalainen <ccr@tnsp.org>
parents: 340
diff changeset
335 test_end(&ctx); \
266
3a020aa05f28 More tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 265
diff changeset
336 } while (0)
3a020aa05f28 More tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 265
diff changeset
337
465
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
338 #define TEST2C(fun, str1, str2, ret) do { \
502
ebf89497305a Remove some unused functionality for simplification.
Matti Hamalainen <ccr@tnsp.org>
parents: 501
diff changeset
339 test_ctx ctx; \
465
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
340 test_start(&ctx, # fun "('%s', '%s')", str1, str2); \
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
341 test_result(&ctx, (fun (str1, str2) != NULL) == ret); \
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
342 test_end(&ctx); \
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
343 } while (0)
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
344
263
423771158575 Add more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 261
diff changeset
345 #define TEST3(fun, str1, str2, len, ret) do { \
502
ebf89497305a Remove some unused functionality for simplification.
Matti Hamalainen <ccr@tnsp.org>
parents: 501
diff changeset
346 test_ctx ctx; \
303
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
347 test_start(&ctx, # fun "('%s', '%s', %d)", str1, str2, len); \
54ea7a73e5fa Implement test contexts.
Matti Hamalainen <ccr@tnsp.org>
parents: 301
diff changeset
348 test_result(&ctx, ( fun (str1, str2, len) == 0) == ret); \
342
09c2f6abf694 Fix memory leaks in test suite.
Matti Hamalainen <ccr@tnsp.org>
parents: 340
diff changeset
349 test_end(&ctx); \
263
423771158575 Add more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 261
diff changeset
350 } while (0)
423771158575 Add more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 261
diff changeset
351
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
352
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
353 void test_config_values(th_cfgitem_t *cfg)
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
354 {
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
355 th_cfgitem_t *item;
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
356 int nsubtest = 0;
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
357 test_ctx ctx;
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
358
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
359 test_start(&ctx, "Test configuration value search #%d", ++nsubtest);
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
360 test_result(&ctx, (item = th_cfg_find(cfg, "inside_sect", "intval", -1)) != NULL && *item->v.val_int == 112);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
361 test_end(&ctx);
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
362 test_start(&ctx, "Test configuration value search #%d", ++nsubtest);
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
363 test_result(&ctx, (item = th_cfg_find(cfg, "another_sect", "boolval", -1)) != NULL && *item->v.val_bool);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
364 test_end(&ctx);
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
365 test_start(&ctx, "Test configuration value search #%d", ++nsubtest);
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
366 test_result(&ctx, th_cfg_find(cfg, "no_match", NULL, -1) == NULL);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
367 test_end(&ctx);
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
368 test_start(&ctx, "Test configuration value search #%d", ++nsubtest);
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
369 test_result(&ctx, th_cfg_find(cfg, NULL, "no_match", -1) == NULL);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
370 test_end(&ctx);
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
371 test_start(&ctx, "Test configuration value search #%d", ++nsubtest);
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
372 test_result(&ctx, (item = th_cfg_find(cfg, NULL, "hexval", -1)) != NULL && *item->v.val_uint == 0x11223344);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
373 test_end(&ctx);
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
374 test_start(&ctx, "Test configuration value search #%d", ++nsubtest);
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
375 test_result(&ctx, (item = th_cfg_find(cfg, NULL, "a_string_setting", -1)) != NULL && strcmp(*item->v.val_str, "v_str1") == 0);
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
376 test_end(&ctx);
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
377 }
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
378
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
379
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
380 void test_config_free(th_llist_t *node)
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
381 {
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
382 th_free_r(&node->data);
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
383 }
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
384
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
385
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
386 void test_ioctx_error(th_ioctx *fh, const int val, const char *msg)
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
387 {
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
388 (void) fh;
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
389 (void) val;
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
390 tprint(0, "IOCTX ERROR: %s", msg);
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
391 }
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
392
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
393
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
394 void test_ioctx_msg(th_ioctx *fh, const int val, const char *msg)
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
395 {
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
396 (void) fh;
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
397 (void) val;
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
398 tprint(1, "IOCTX MSG: %s", msg);
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
399 }
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
400
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
401
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
402 int test_config_strcmp(const void *v1, const void *v2)
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
403 {
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
404 return strcmp((const char *) v1, (const char *) v2);
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
405 }
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
406
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
407
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
408 static const char *test_config_strings[] =
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
409 {
521
77495c646208 Fix parsing and writing of strings with simple escape sequences in config files.
Matti Hamalainen <ccr@tnsp.org>
parents: 517
diff changeset
410 "zoo", "foo", "b\"ar",
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
411 };
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
412
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
413
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
414 void test_config_read(th_cfgitem_t *cfg, const char *filename)
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
415 {
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
416 int nsubtest;
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
417 th_ioctx *fh = NULL;
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
418 test_ctx ctx;
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
419 th_cfgitem_t *item;
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
420
517
80185b9901ba Be more informative about which config file we are trying to read while testing.
Matti Hamalainen <ccr@tnsp.org>
parents: 516
diff changeset
421 tprint(1, "Reading configuration from '%s'.\n", filename);
80185b9901ba Be more informative about which config file we are trying to read while testing.
Matti Hamalainen <ccr@tnsp.org>
parents: 516
diff changeset
422
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
423 // Attempt to read the previously written file
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
424 if (th_io_fopen(&fh, &th_stdio_io_ops, filename, "r") != THERR_OK)
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
425 {
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
426 int err = th_get_error();
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
427 THERR("Could not open configuration file '%s', %d: %s\n",
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
428 filename, err, th_error_str(err));
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
429 goto out;
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
430 }
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
431
516
cfd536d654a6 Fix ioctx handlers setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 515
diff changeset
432 th_io_set_handlers(fh, test_ioctx_error, test_ioctx_msg);
cfd536d654a6 Fix ioctx handlers setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 515
diff changeset
433
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
434 th_cfg_read(fh, cfg);
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
435
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
436 // Test read values against expected values
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
437 test_config_values(cfg);
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
438
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
439 // Additional tests
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
440 item = th_cfg_find(cfg, NULL, "string_list", -1);
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
441 test_result(&ctx, item != NULL);
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
442 if (item != NULL)
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
443 {
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
444 static const char *nostr = "not to be found";
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
445 th_llist_t **plist = (th_llist_t **) item->v.list;
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
446
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
447 for (nsubtest = 0; nsubtest < (int) NCOUNT(test_config_strings); nsubtest++)
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
448 {
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
449 test_start(&ctx, "Test configuration string list values #%d: '%s'",
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
450 nsubtest + 1, test_config_strings[nsubtest]);
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
451
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
452 test_result(&ctx,
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
453 th_llist_find_func(*plist,
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
454 test_config_strings[nsubtest], test_config_strcmp) != NULL);
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
455 test_end(&ctx);
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
456 }
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
457
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
458 test_start(&ctx, "Test configuration string list values #%d: '%s'",
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
459 ++nsubtest, nostr);
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
460 test_result(&ctx, th_llist_find_func(*plist, nostr, test_config_strcmp) == NULL);
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
461 test_end(&ctx);
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
462
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
463 th_llist_free_func_node(*plist, test_config_free);
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
464 *plist = NULL;
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
465 }
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
466
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
467 out:
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
468 th_io_free(fh);
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
469 }
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
470
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
471
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
472 void test_config(void)
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
473 {
513
e412a39e2b7a Add another test for configuration parsing.
Matti Hamalainen <ccr@tnsp.org>
parents: 512
diff changeset
474 static const char *filename = "cfg.temp";
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
475 test_ctx ctx;
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
476 th_ioctx *fh = NULL;
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
477 th_cfgitem_t *sect1, *sect2, *cfg = NULL, *item;
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
478 char *v_str1 = NULL;
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
479 unsigned int v_uint1;
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
480 int v_int1;
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
481 BOOL v_bool1, v_bool2;
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
482 th_llist_t *v_str_list = NULL;
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
483
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
484 // Create v_str_list
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
485 for (size_t n = 0; n < NCOUNT(test_config_strings); n++)
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
486 th_llist_append(&v_str_list, th_strdup(test_config_strings[n]));
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
487
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
488 // Create the configuration structure
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
489 tprint(2, "Creating configuration structure\n");
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
490 sect1 = NULL;
509
b506bff0a7ab Some cleanup work and refactoring on the configuration file parser and writer.
Matti Hamalainen <ccr@tnsp.org>
parents: 508
diff changeset
491 th_cfg_add_comment(&sect1, "A comment that\nspans multiple\nlines automatically");
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
492 th_cfg_add_string(&sect1, "a_string_setting", &v_str1, "v_str1");
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
493
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
494 th_cfg_add_comment(&sect1, "Hex triplet value setting");
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
495 th_cfg_add_hexvalue(&sect1, "hexval", &v_uint1, 0x11223344);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
496
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
497 th_cfg_add_comment(&sect1, "A boolean value");
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
498 th_cfg_add_bool(&sect1, "boolval", &v_bool1, FALSE);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
499
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
500 th_cfg_add_comment(&sect1, "A string list");
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
501 th_cfg_add_string_list(&sect1, "string_list", &v_str_list);
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
502
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
503 th_cfg_add_section(&cfg, "general", sect1);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
504
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
505 sect1 = NULL;
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
506 th_cfg_add_comment(&sect1, "Another section");
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
507 th_cfg_add_bool(&sect1, "boolval", &v_bool2, TRUE);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
508
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
509 sect2 = NULL;
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
510 th_cfg_add_comment(&sect2, "Section inside a section");
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
511 th_cfg_add_int(&sect2, "intval", &v_int1, 112);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
512 th_cfg_add_section(&sect1, "inside_sect", sect2);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
513
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
514 th_cfg_add_section(&cfg, "another_sect", sect1);
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
515
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
516 // Test ptr
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
517 test_start(&ctx, "Test configuration string list ptr");
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
518 test_result(&ctx, (item = th_cfg_find(cfg, NULL, "string_list", -1)) != NULL && item->v.list == &v_str_list);
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
519 test_end(&ctx);
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
520
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
521 // Test value finding
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
522 test_config_values(cfg);
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
523
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
524 // Attempt to write the file
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
525 if (th_io_fopen(&fh, &th_stdio_io_ops, filename, "w") != THERR_OK)
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
526 {
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
527 int err = th_get_error();
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
528 THERR("Could not create configuration to file '%s', %d: %s\n",
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
529 filename, err, th_error_str(err));
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
530 goto out;
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
531 }
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
532
516
cfd536d654a6 Fix ioctx handlers setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 515
diff changeset
533 th_io_set_handlers(fh, test_ioctx_error, test_ioctx_msg);
cfd536d654a6 Fix ioctx handlers setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 515
diff changeset
534
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
535 th_cfg_write(fh, cfg);
515
d512555bdd0f Close written test config file before trying to read it.
Matti Hamalainen <ccr@tnsp.org>
parents: 513
diff changeset
536 th_io_free(fh);
d512555bdd0f Close written test config file before trying to read it.
Matti Hamalainen <ccr@tnsp.org>
parents: 513
diff changeset
537 fh = NULL;
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
538
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
539 // Test against written configuration file
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
540 test_config_read(cfg, filename);
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
541
513
e412a39e2b7a Add another test for configuration parsing.
Matti Hamalainen <ccr@tnsp.org>
parents: 512
diff changeset
542 // Test against manually edited configuration file
e412a39e2b7a Add another test for configuration parsing.
Matti Hamalainen <ccr@tnsp.org>
parents: 512
diff changeset
543 test_config_read(cfg, "cfg.test01");
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
544
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
545 out:
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
546 // Free the data for v_str_list
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
547 th_io_free(fh);
552
22f6204c4208 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 551
diff changeset
548 th_llist_free_func_node(v_str_list, test_config_free);
512
5c3bfe034915 Improve config file handling tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 509
diff changeset
549 v_str_list = NULL;
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
550 }
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
551
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
552
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
553 int main(int argc, char *argv[])
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
554 {
334
b90173719330 Add more tests (some of which will fail for now due to unimplemented features).
Matti Hamalainen <ccr@tnsp.org>
parents: 333
diff changeset
555 size_t i1, i2, i3, i4;
326
75b22d6f8a71 Simplify and improve integer sprintf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 319
diff changeset
556 char buf[64], buf2[64];
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
557
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
558 //
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
559 // Initialization
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
560 //
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
561 th_init("th-test", "th-libs unit tests", "0.2", NULL, NULL);
469
fe5b803ae449 Rename the global variable th_verbosityLevel to th_verbosity.
Matti Hamalainen <ccr@tnsp.org>
parents: 465
diff changeset
562 th_verbosity = 0;
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
563
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
564 if (sizeof(char) != sizeof(unsigned char))
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
565 {
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
566 THERR("sizeof(char) != sizeof(unsigned char)???\n");
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
567 return -1;
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
568 }
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
569
523
9acbbfea68a9 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 521
diff changeset
570 tests_failed = tests_passed = tests_total =
9acbbfea68a9 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 521
diff changeset
571 sets_total = sets_nenabled = 0;
9acbbfea68a9 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 521
diff changeset
572
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
573 for (i1 = 0; i1 < SET_MAX_TESTS; i1++)
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
574 sets_enabled[i1] = 1;
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
575
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
576 //
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
577 // Parse command line arguments
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
578 //
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
579 if (!th_args_process(argc, argv, arg_opts, arg_nopts,
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
580 arg_handle_opt, NULL, 0))
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
581 return 0;
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
582
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
583 tprint(1, "Enabled test types are 0x%04x.\n", optFlags);
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
584
525
59b8f15c5334 Add (compile-time enabled via TH_PRINTF_DEBUG define) global variable for
Matti Hamalainen <ccr@tnsp.org>
parents: 524
diff changeset
585
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
586 //
405
4e8f26a49e27 Update comment.
Matti Hamalainen <ccr@tnsp.org>
parents: 404
diff changeset
587 // Test series for printf()
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
588 //
544
619e7fcff486 Add more printf() format tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 534
diff changeset
589 char *i_fmts[] = { "", "05", "6", ".4", "1.1", "1.0", "8.5", "08.5", "3", "2.1", "3", "1", "18", "018", ".0", "0" };
596
4ea7b0e9dcba Improve string printf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 592
diff changeset
590 char *i_mods[] = { "", "-", "+", "#", " ", };
343
2b58dd3f5e6c Add more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
591 char *i_types[] = { "d", "u", "i", "x", "X", "o", };
544
619e7fcff486 Add more printf() format tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 534
diff changeset
592
295
bd69fdaad70a Rename test sets.
Matti Hamalainen <ccr@tnsp.org>
parents: 293
diff changeset
593 if (test_set_start("printf() integer"))
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
594 {
526
32245648f0f0 More printf() format specifier tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 525
diff changeset
595 int i_vals[] = {
532
ad64c3f7cf64 Adjust printf int formatting test values and format specifiers.
Matti Hamalainen <ccr@tnsp.org>
parents: 530
diff changeset
596 0, -0, 1, -1, 10, -10, 512, -512, -1024,
ad64c3f7cf64 Adjust printf int formatting test values and format specifiers.
Matti Hamalainen <ccr@tnsp.org>
parents: 530
diff changeset
597 612342, -612342, 0x1fff, 0x8000000, -123456789,
563
7cb58b683677 Fix integer overflow in the test values of 32bit ints.
Matti Hamalainen <ccr@tnsp.org>
parents: 552
diff changeset
598 2147483647, -2147483648 };
315
2b657dcf346e More tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 312
diff changeset
599
327
b0f9f806c8c9 Implement NCOUNT() macro for getting array element counts (sizeof(arr) / sizeof(arr[0]))
Matti Hamalainen <ccr@tnsp.org>
parents: 326
diff changeset
600 for (i1 = 0; i1 < NCOUNT(i_vals); i1++)
315
2b657dcf346e More tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 312
diff changeset
601 {
319
f2af6049d958 Improve testing.
Matti Hamalainen <ccr@tnsp.org>
parents: 317
diff changeset
602 snprintf(buf, sizeof(buf), "%d", i_vals[i1]);
326
75b22d6f8a71 Simplify and improve integer sprintf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 319
diff changeset
603
334
b90173719330 Add more tests (some of which will fail for now due to unimplemented features).
Matti Hamalainen <ccr@tnsp.org>
parents: 333
diff changeset
604 for (i4 = 0; i4 < NCOUNT(i_mods); i4++)
332
799e38f867da Use NCOUNT().
Matti Hamalainen <ccr@tnsp.org>
parents: 331
diff changeset
605 for (i3 = 0; i3 < NCOUNT(i_types); i3++)
799e38f867da Use NCOUNT().
Matti Hamalainen <ccr@tnsp.org>
parents: 331
diff changeset
606 for (i2 = 0; i2 < NCOUNT(i_fmts); i2++)
326
75b22d6f8a71 Simplify and improve integer sprintf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 319
diff changeset
607 {
334
b90173719330 Add more tests (some of which will fail for now due to unimplemented features).
Matti Hamalainen <ccr@tnsp.org>
parents: 333
diff changeset
608 snprintf(buf2, sizeof(buf2), "%%%s%s%s", i_mods[i4], i_fmts[i2], i_types[i3]);
326
75b22d6f8a71 Simplify and improve integer sprintf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 319
diff changeset
609 test_snprintf(buf, buf2, i_vals[i1]);
75b22d6f8a71 Simplify and improve integer sprintf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 319
diff changeset
610 }
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
611 }
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
612 }
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
613
331
6e42d50c08c4 Add tests for 64bit int prints.
Matti Hamalainen <ccr@tnsp.org>
parents: 328
diff changeset
614 if (test_set_start("printf() integer 64bit"))
6e42d50c08c4 Add tests for 64bit int prints.
Matti Hamalainen <ccr@tnsp.org>
parents: 328
diff changeset
615 {
532
ad64c3f7cf64 Adjust printf int formatting test values and format specifiers.
Matti Hamalainen <ccr@tnsp.org>
parents: 530
diff changeset
616 int64_t i_vals64[] = {
544
619e7fcff486 Add more printf() format tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 534
diff changeset
617 0, -0, 1, -1, 10, -10, 512, -512, -1024,
619e7fcff486 Add more printf() format tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 534
diff changeset
618 612342, -612342, 0x1fff, 0x8000000, -123456789,
619e7fcff486 Add more printf() format tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 534
diff changeset
619 4294967295, -2147483648,
532
ad64c3f7cf64 Adjust printf int formatting test values and format specifiers.
Matti Hamalainen <ccr@tnsp.org>
parents: 530
diff changeset
620 0x3342344341fff, 0x1f8000000, };
331
6e42d50c08c4 Add tests for 64bit int prints.
Matti Hamalainen <ccr@tnsp.org>
parents: 328
diff changeset
621
333
a705d21ca25b Simplify tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 332
diff changeset
622 for (i1 = 0; i1 < NCOUNT(i_vals64); i1++)
331
6e42d50c08c4 Add tests for 64bit int prints.
Matti Hamalainen <ccr@tnsp.org>
parents: 328
diff changeset
623 {
395
bffd3caf2d2c Rename TH_PRI{u,d,x}* macros to match with standard ISO C99 inttypes.h PRI*.
Matti Hamalainen <ccr@tnsp.org>
parents: 380
diff changeset
624 snprintf(buf, sizeof(buf), "%" PRId64, i_vals64[i1]);
331
6e42d50c08c4 Add tests for 64bit int prints.
Matti Hamalainen <ccr@tnsp.org>
parents: 328
diff changeset
625
340
cde5415c4201 Fix 64bit int tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 339
diff changeset
626 for (i4 = 0; i4 < NCOUNT(i_mods); i4++)
332
799e38f867da Use NCOUNT().
Matti Hamalainen <ccr@tnsp.org>
parents: 331
diff changeset
627 for (i3 = 0; i3 < NCOUNT(i_types); i3++)
799e38f867da Use NCOUNT().
Matti Hamalainen <ccr@tnsp.org>
parents: 331
diff changeset
628 for (i2 = 0; i2 < NCOUNT(i_fmts); i2++)
331
6e42d50c08c4 Add tests for 64bit int prints.
Matti Hamalainen <ccr@tnsp.org>
parents: 328
diff changeset
629 {
402
ec4c395aadb8 Fix some tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 395
diff changeset
630 snprintf(buf2, sizeof(buf2), "%%%s%sll%s", i_mods[i4], i_fmts[i2], i_types[i3]);
333
a705d21ca25b Simplify tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 332
diff changeset
631 test_snprintf(buf, buf2, i_vals64[i1]);
331
6e42d50c08c4 Add tests for 64bit int prints.
Matti Hamalainen <ccr@tnsp.org>
parents: 328
diff changeset
632 }
6e42d50c08c4 Add tests for 64bit int prints.
Matti Hamalainen <ccr@tnsp.org>
parents: 328
diff changeset
633 }
6e42d50c08c4 Add tests for 64bit int prints.
Matti Hamalainen <ccr@tnsp.org>
parents: 328
diff changeset
634 }
6e42d50c08c4 Add tests for 64bit int prints.
Matti Hamalainen <ccr@tnsp.org>
parents: 328
diff changeset
635
533
ef0d732fabe0 Disable floating point printf implementation tests as the support is not
Matti Hamalainen <ccr@tnsp.org>
parents: 532
diff changeset
636 #ifdef TH_WIP_FLOAT_SUPPORT
296
ec8357d02a52 Add floating point tests (which will fail for now).
Matti Hamalainen <ccr@tnsp.org>
parents: 295
diff changeset
637 if (test_set_start("printf() float"))
ec8357d02a52 Add floating point tests (which will fail for now).
Matti Hamalainen <ccr@tnsp.org>
parents: 295
diff changeset
638 {
544
619e7fcff486 Add more printf() format tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 534
diff changeset
639 double f_vals[] = { 0, 1, 2, 3, 2.02, 612342.234, -2.07, -612342.12, 437692.9876543219, 0x1fff, 0x8000000, 0.15625 };
404
a9152a6ee9db Adjust tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 403
diff changeset
640 char *f_fmts[] = { "%f", "%1.1f", "%8.5f", "%5f", "%-5f", "", "%-5.2f", "%08.5f" };
296
ec8357d02a52 Add floating point tests (which will fail for now).
Matti Hamalainen <ccr@tnsp.org>
parents: 295
diff changeset
641
327
b0f9f806c8c9 Implement NCOUNT() macro for getting array element counts (sizeof(arr) / sizeof(arr[0]))
Matti Hamalainen <ccr@tnsp.org>
parents: 326
diff changeset
642 for (i1 = 0; i1 < NCOUNT(f_vals); i1++)
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
643 {
319
f2af6049d958 Improve testing.
Matti Hamalainen <ccr@tnsp.org>
parents: 317
diff changeset
644 snprintf(buf, sizeof(buf), "%f", f_vals[i1]);
327
b0f9f806c8c9 Implement NCOUNT() macro for getting array element counts (sizeof(arr) / sizeof(arr[0]))
Matti Hamalainen <ccr@tnsp.org>
parents: 326
diff changeset
645 for (i2 = 0; i2 < NCOUNT(f_fmts); i2++)
319
f2af6049d958 Improve testing.
Matti Hamalainen <ccr@tnsp.org>
parents: 317
diff changeset
646 test_snprintf(buf, f_fmts[i2], f_vals[i1]);
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
647 }
296
ec8357d02a52 Add floating point tests (which will fail for now).
Matti Hamalainen <ccr@tnsp.org>
parents: 295
diff changeset
648 }
533
ef0d732fabe0 Disable floating point printf implementation tests as the support is not
Matti Hamalainen <ccr@tnsp.org>
parents: 532
diff changeset
649 #endif
296
ec8357d02a52 Add floating point tests (which will fail for now).
Matti Hamalainen <ccr@tnsp.org>
parents: 295
diff changeset
650
295
bd69fdaad70a Rename test sets.
Matti Hamalainen <ccr@tnsp.org>
parents: 293
diff changeset
651 if (test_set_start("printf() string"))
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
652 {
407
d1a06a38a958 Add some more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 405
diff changeset
653 char *s_vals[] = { "", "XYZXYZ", "xxx yyy zzz ppp fff", NULL, "X", "abcde", "dx", "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ", };
596
4ea7b0e9dcba Improve string printf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 592
diff changeset
654 // char *s_fmts[] = { "%s", "%2s", "%-2s", "%5s", "%-5s", "%16s", "%-16s", "%1s", "%-1s", "% 2s", "%03s", "% -12s", "% 03s", "%-.15s", "%.8s" };
4ea7b0e9dcba Improve string printf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 592
diff changeset
655 char *s_fmts[] = { "", "-" " ", "0", " 0", ".", "-.", };
4ea7b0e9dcba Improve string printf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 592
diff changeset
656 int s_widths[] = { 0, 1, 2, 5, 16, };
265
effb2786f6a6 More work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 264
diff changeset
657
327
b0f9f806c8c9 Implement NCOUNT() macro for getting array element counts (sizeof(arr) / sizeof(arr[0]))
Matti Hamalainen <ccr@tnsp.org>
parents: 326
diff changeset
658 for (i1 = 0; i1 < NCOUNT(s_vals); i1++)
596
4ea7b0e9dcba Improve string printf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 592
diff changeset
659 for (i2 = 0; i2 < NCOUNT(s_fmts); i2++)
4ea7b0e9dcba Improve string printf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 592
diff changeset
660 for (i3 = 0; i3 < NCOUNT(s_widths); i3++)
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
661 {
596
4ea7b0e9dcba Improve string printf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 592
diff changeset
662 snprintf(buf, sizeof(buf), "%%%s%ds", s_fmts[i2], s_widths[i3]);
4ea7b0e9dcba Improve string printf() tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 592
diff changeset
663 test_snprintf(s_vals[i1], buf, s_vals[i1]);
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
664 }
288
89c7696acb82 Add some tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 282
diff changeset
665 }
89c7696acb82 Add some tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 282
diff changeset
666
295
bd69fdaad70a Rename test sets.
Matti Hamalainen <ccr@tnsp.org>
parents: 293
diff changeset
667 if (test_set_start("printf() char"))
288
89c7696acb82 Add some tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 282
diff changeset
668 {
319
f2af6049d958 Improve testing.
Matti Hamalainen <ccr@tnsp.org>
parents: 317
diff changeset
669 const char c_val = 'x';
f2af6049d958 Improve testing.
Matti Hamalainen <ccr@tnsp.org>
parents: 317
diff changeset
670 const char *c_msg = "x";
352
75b20d9bef64 Add few more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 347
diff changeset
671 char *c_fmts[] = { "a%cBC", "%c", "", "%0c", "%1c", "% c", "%-3c", "%3c", "%.3c", "%-.3c", "%-3.3c", "%.c", "%05c", "%-05c", };
328
0146aa9a9524 Simplify char printf tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 327
diff changeset
672
0146aa9a9524 Simplify char printf tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 327
diff changeset
673 for (i1 = 0; i1 < NCOUNT(c_fmts); i1++)
0146aa9a9524 Simplify char printf tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 327
diff changeset
674 test_snprintf(c_msg, c_fmts[i1], c_val);
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
675 }
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
676
356
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
677 if (test_set_start("printf() pointers"))
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
678 {
407
d1a06a38a958 Add some more tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 405
diff changeset
679 char *p_fmts[] = { "%p", "%2p", "%.2p", "%03p", "%04p", "%-3p", "%0.3p", "%8p", "%32p", "%032p", "%-32p", "%-032p", "%16.8p", "%016.8p" };
356
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
680 void *p_vals[] = { NULL, (void *) 1, &p_fmts, };
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
681
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
682 for (i1 = 0; i1 < NCOUNT(p_vals); i1++)
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
683 {
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
684 snprintf(buf, sizeof(buf), "%p", p_vals[i1]);
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
685 for (i2 = 0; i2 < NCOUNT(p_fmts); i2++)
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
686 test_snprintf(buf, p_fmts[i2], p_vals[i1]);
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
687 }
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
688 }
d7f43fce0dce Add tests for printing pointers (%p formatters).
Matti Hamalainen <ccr@tnsp.org>
parents: 352
diff changeset
689
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
690 //
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
691 // String matching functions
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
692 //
465
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
693 if (test_set_start("String compare #1"))
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
694 {
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
695 TEST2(th_strcasecmp, "aSdFq", "asdfq", TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
696 TEST2(th_strcasecmp, "aSdFq", "asFfq", FALSE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
697 TEST2(th_strcasecmp, "abcde", "abcde", TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
698 TEST2(th_strcasecmp, "öäå", "öäå", TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
699 TEST2(th_strcasecmp, "aöäå", "aöäå", TRUE);
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
700 }
255
7549e279fe18 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 254
diff changeset
701
465
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
702 if (test_set_start("String compare #2"))
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
703 {
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
704 TEST3(th_strncasecmp, "aSdFq", "asFfqB", 4, FALSE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
705 TEST3(th_strncasecmp, "aSdFq", "asFfqQ", 2, TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
706 TEST3(th_strncasecmp, "aSdFq", "asDfq", 3, TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
707 TEST3(th_strncasecmp, "aSdFq", "asDfq", 2, TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
708 TEST3(th_strncasecmp, "aSdFq", "asDfq", 0, TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
709 TEST3(th_strncasecmp, "aSdFq", "QsDfq", 0, TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
710 TEST3(th_strncasecmp, "aSdFq", "QsDfq", 1, FALSE);
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
711 }
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
712
465
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
713 if (test_set_start("String compare #3"))
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
714 {
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
715 TEST2C(th_strrcasecmp, "foo aSdFq", " asdfq", TRUE);
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
716 TEST2C(th_strrcasecmp, "aSdFq", " asdfq", FALSE);
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
717 TEST2C(th_strrcasecmp, "foo aSdFq baz", "asdfq", FALSE);
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
718 }
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
719
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
720 if (test_set_start("String matching #1"))
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
721 {
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
722 TEST2B(th_strmatch, "abba ABBAkukka lol", "*lol", TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
723 TEST2B(th_strmatch, "abba ABBAkukka lol", "*lo*", TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
724 TEST2B(th_strmatch, "abba ABBAkukka lol", "*lo", FALSE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
725 TEST2B(th_strmatch, "abba ABBAkukka lol", "abba", FALSE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
726 TEST2B(th_strmatch, "abba ABBAkukka lol", "*bba*", TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
727 TEST2B(th_strmatch, "abba ABBAkukka lol", "abba*", TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
728 TEST2B(th_strmatch, "abba ABBAkukka lol", "abbak*", FALSE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
729 TEST2B(th_strmatch, "abba ABBAöökukka lol", "*abbaö?", FALSE);
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
730 }
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
731
465
6d44592cdab1 Improve tests slightly.
Matti Hamalainen <ccr@tnsp.org>
parents: 457
diff changeset
732 if (test_set_start("String matching #2"))
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
733 {
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
734 TEST2B(th_strcasematch, "abba ABBAkukka lol", "abbak*", FALSE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
735 TEST2B(th_strcasematch, "abba ABBAkukka lol", "*abbak*", TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
736 TEST2B(th_strcasematch, "abba ABBAkukka lol", "*ab?ak*", TRUE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
737 TEST2B(th_strcasematch, "abba ABBAkukka lol", "*abbak?", FALSE);
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
738 TEST2B(th_strcasematch, "abba ABBAkukka lol", "?bba?abba*", TRUE);
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
739 }
266
3a020aa05f28 More tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 265
diff changeset
740
265
effb2786f6a6 More work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 264
diff changeset
741 // Tests that test for things that do not work correctly yet
effb2786f6a6 More work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 264
diff changeset
742 // Unicode / multibyte UTF-8 causes problems here
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
743 if ((optFlags & TST_BROKEN) &&
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
744 test_set_start("Invalid UTF-8 handling"))
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
745 {
457
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
746 TEST2(th_strcasecmp, "ÖÄÅ", "öäå", FALSE); // SHOULD match
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
747 TEST3(th_strncasecmp, "Aäöå", "aöå", 2, TRUE); // should NOT match
85fa3d333556 Actually, revert the boolean changes .. meh.
Matti Hamalainen <ccr@tnsp.org>
parents: 453
diff changeset
748 TEST2B(th_strmatch, "öriÖRI! lol", "?ri?RI!*", FALSE); // should match
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
749 }
266
3a020aa05f28 More tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 265
diff changeset
750
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
751 //
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
752 // printf() PRI* format specifiers, also a compile time test
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
753 //
501
d42574b3dc00 Adjust two test names.
Matti Hamalainen <ccr@tnsp.org>
parents: 492
diff changeset
754 if (test_set_start("PRI* specifiers"))
492
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
755 {
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
756 char tmp[32];
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
757 uint32_t u32 = 0xaabbccdd;
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
758 uint64_t u64 = 0xaabbccdd11223344;
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
759 size_t usiz =
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
760 #if TH_ARCH == 32
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
761 0x11223344;
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
762 #elif TH_ARCH == 64
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
763 0xaabbccdd11223344;
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
764 #else
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
765 #error Unsupported TH_ARCH value.
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
766 #endif
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
767
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
768 snprintf(tmp, sizeof(tmp), "%16" PRIx_SIZE_T "h", usiz);
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
769 #if TH_ARCH == 32
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
770 TEST2(strcmp, tmp, "0000000011223344h", TRUE);
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
771 #else
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
772 TEST2(strcmp, tmp, "aabbccdd11223344h", TRUE);
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
773 #endif
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
774
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
775 snprintf(tmp, sizeof(tmp), "%08" PRIx32 "h", u32);
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
776 TEST2(strcmp, tmp, "aabbccddh", TRUE);
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
777 snprintf(tmp, sizeof(tmp), "%16" PRIx64 "h", u64);
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
778 TEST2(strcmp, tmp, "aabbccdd11223344h", TRUE);
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
779 }
185a6ea03fea Add some tests for PRI* types.
Matti Hamalainen <ccr@tnsp.org>
parents: 469
diff changeset
780
508
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
781 //
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
782 // Configuration file handling
fe5e7bf704e5 Improvements to config tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 506
diff changeset
783 //
523
9acbbfea68a9 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 521
diff changeset
784 if (test_set_start("Configuration file handling"))
505
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
785 {
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
786 test_config();
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
787 }
50d71fc84831 Add simple tests for th_config.
Matti Hamalainen <ccr@tnsp.org>
parents: 502
diff changeset
788
255
7549e279fe18 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 254
diff changeset
789 //
524
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
790 // String functions
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
791 //
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
792 if (test_set_start("String functions"))
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
793 {
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
794 unsigned int tmpUint;
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
795
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
796 TEST1(th_get_hex_triplet("0fac11", &tmpUint) == TRUE);
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
797 TEST1A("0x%06x", tmpUint, ==, 0x0fac11);
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
798 TEST1(th_get_hex_triplet("120fac11", &tmpUint) == TRUE);
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
799 TEST1A("0x%06x", tmpUint, ==, 0x120fac11);
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
800 TEST1(th_get_hex_triplet("x120fac11", &tmpUint) == FALSE);
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
801 }
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
802
19dc326dcdad Add few tests for th_get_hex_triplet().
Matti Hamalainen <ccr@tnsp.org>
parents: 523
diff changeset
803 //
255
7549e279fe18 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 254
diff changeset
804 // Print summary and exit
7549e279fe18 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 254
diff changeset
805 //
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
806 tprint(1,
276
56b0de9f9d44 Improve tests output per verbosity level.
Matti Hamalainen <ccr@tnsp.org>
parents: 274
diff changeset
807 "======================================================\n");
282
f0cb48b34463 Implement selectable tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 276
diff changeset
808
304
3fcf42cce43d Fix some tests and use stdout for output.
Matti Hamalainen <ccr@tnsp.org>
parents: 303
diff changeset
809 tprint(0,
312
f1dfabd89a13 Improve tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 311
diff changeset
810 "%d tests failed, %d passed (%d main tests), %d test sets of %d sets total.\n\n",
365
c39f8e22ca1c Refactor testing a bit.
Matti Hamalainen <ccr@tnsp.org>
parents: 364
diff changeset
811 tests_failed, tests_passed, tests_total, sets_nenabled, sets_total);
255
7549e279fe18 Work on tests.
Matti Hamalainen <ccr@tnsp.org>
parents: 254
diff changeset
812
254
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
813 return 0;
3d1e2af4e4e6 Start of a very simplistic unit test suite. Initially handling just printf()
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
814 }