e7b0dcc838ad3b0e82fb9edf1b2475525327cda6
[ngircd-alex.git] / src / portab / portabtest.c
1 /*
2  * ngIRCd -- The Next Generation IRC Daemon
3  * Copyright (c)2001-2014 Alexander Barton (alex@barton.de) and Contributors.
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 2 of the License, or
8  * (at your option) any later version.
9  * Please read the file COPYING, README and AUTHORS for more information.
10  */
11
12 #include "portab.h"
13
14 /**
15  * @file
16  * Test program for portab.h and friends ;-)
17  */
18
19 #include <stdarg.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <string.h>
23
24 int allow_severity = 0, deny_severity = 0;
25
26 static void
27 Panic(char *Reason)
28 {
29         /* Oops, something failed!? */
30         fprintf(stderr, "Oops, test for %s failed!?\n", Reason);
31         exit(1);
32 } /* Panic */
33
34 static void
35 Check_snprintf(void)
36 {
37         char str[5];
38
39         snprintf(str, sizeof(str), "%s", "1234567890");
40         if (str[4] != '\0')
41                 Panic("snprintf NULL byte");
42         if (strlen(str) != 4)
43                 Panic("snprintf string length");
44 }
45
46 static void
47 Check_strdup(void)
48 {
49         char *ptr;
50
51         ptr = strdup("1234567890");
52         if (!ptr)
53                 Panic("strdup");
54         if (ptr[10] != '\0')
55                 Panic("strdup NULL byte");
56         if (strlen(ptr) != 10)
57                 Panic("strdup string length");
58         free(ptr);
59 }
60
61 static void
62 Check_strndup(void)
63 {
64         char *ptr;
65
66         ptr = strndup("1234567890", 5);
67         if (!ptr)
68                 Panic("strndup");
69         if (ptr[5] != '\0')
70                 Panic("strndup NULL byte");
71         if (strlen(ptr) != 5)
72                 Panic("strndup string length");
73         free(ptr);
74 }
75
76 static void
77 Check_strlcpy(void)
78 {
79         char str[5];
80
81         if (strlcpy(str, "1234567890", sizeof(str)) != 10)
82                 Panic("strlcpy return code");
83         if (str[4] != '\0')
84                 Panic("strlcpy NULL byte");
85         if (strlen(str) != 4)
86                 Panic("strlcpy string length");
87 }
88
89 static void
90 Check_strlcat(void)
91 {
92         char str[5];
93
94         if (strlcpy(str, "12", sizeof(str)) != 2)
95                 Panic("strlcpy for strlcat");
96         if (strlcat(str, "1234567890", sizeof(str)) != 12)
97                 Panic("strlcat return code");
98         if (str[4] != '\0')
99                 Panic("strlcat NULL byte");
100         if (strlen(str) != 4)
101                 Panic("strlcat string length");
102 }
103
104 static void
105 Check_strtok_r(void)
106 {
107         char *ptr, *last;
108
109         ptr = strdup("12,abc");
110
111         ptr = strtok_r(ptr, ",", &last);
112         if (!ptr)
113                 Panic("strtok_r result #1");
114         if (strcmp(ptr, "12") != 0)
115                 Panic("strtok_r token #1");
116
117         ptr = strtok_r(NULL, ",", &last);
118         if (!ptr)
119                 Panic("strtok_r result #2");
120         if (strcmp(ptr, "abc") != 0)
121                 Panic("strtok_r token #2");
122
123         ptr = strtok_r(NULL, ",", &last);
124         if (ptr)
125                 Panic("strtok_r result #3");
126 }
127
128 #ifdef PROTOTYPES
129 static void
130 Check_vsnprintf(const int Len, const char *Format, ...)
131 #else
132 static void
133 Check_vsnprintf(Len, Format, va_alist)
134 const int Len;
135 const char *Format;
136 va_dcl
137 #endif
138 {
139         char str[5];
140         va_list ap;
141         int r;
142
143 #ifdef PROTOTYPES
144         va_start(ap, Format);
145 #else
146         va_start(ap);
147 #endif
148         r = vsnprintf(str, sizeof(str), Format, ap);
149         va_end(ap);
150         if (r != Len) {
151                 /* C99 states that vsnprintf() "returns the number of
152                  * characters that would have been printed if the n were
153                  * unlimited", but according to the Linux manual page "glibc
154                  * until 2.0.6 would return -1 when the output was truncated",
155                  * and other implementations (libUTIL on A/UX) even return the
156                  * number of characters processed ... so we only test our own
157                  * implementation and warn on errors otherwise :-/ */
158 #ifdef HAVE_VSNPRINTF
159                 fprintf(stderr,
160                         "\n ** WARNING: The vsnprintf() function of this system isn't standard\n");
161                 fprintf(stderr,
162                         " ** conformant and returns a WRONG result: %d (should be %d)! The test\n",
163                         r, Len);
164                 fprintf(stderr,
165                         " ** result has been ignored but may lead to errors during execution!\n\n");
166 #else
167                 Panic("vsnprintf return code");
168 #endif
169         }
170         if (str[4] != '\0')
171                 Panic("vsnprintf NULL byte");
172         if (strlen(str) != 4)
173                 Panic("vsnprintf string length");
174 }
175
176 GLOBAL int
177 main(void)
178 {
179         /* validate datatypes */
180         if (false != 0)
181                 Panic("false");
182         if (true != 1)
183                 Panic("true");
184         if (sizeof(UINT8) != 1)
185                 Panic("UINT8");
186         if (sizeof(UINT16) != 2)
187                 Panic("UINT16");
188         if (sizeof(UINT32) != 4)
189                 Panic("UINT32");
190
191         /* check functions */
192         Check_snprintf();
193         Check_strdup();
194         Check_strndup();
195         Check_strlcpy();
196         Check_strlcat();
197         Check_strtok_r();
198         Check_vsnprintf(2+10, "%s%s", "ab", "1234567890");
199
200         return 0;
201 }
202
203 /* -eof- */