]> git.ozlabs.org Git - ccan/blob - ccan/string/test/run.c
f68e7ec56c5c886293be9b5f8e4c086e6076ebfb
[ccan] / ccan / string / test / run.c
1 #include "string/string.h"
2 #include <stdlib.h>
3 #include <stdio.h>
4 #include "string/string.c"
5 #include "tap/tap.h"
6
7 /* FIXME: ccanize */
8 #define ARRAY_SIZE(arr) (sizeof(arr) / sizeof(arr[0]))
9
10 static char *substrings[] = { "far", "bar", "baz", "b", "ba", "z", "ar", NULL };
11
12 #define NUM_SUBSTRINGS (ARRAY_SIZE(substrings) - 1)
13
14 static char *strdup_rev(const char *s)
15 {
16         char *ret = strdup(s);
17         unsigned int i;
18
19         for (i = 0; i < strlen(s); i++)
20                 ret[i] = s[strlen(s) - i - 1];
21         return ret;
22 }
23
24 int main(int argc, char *argv[])
25 {
26         unsigned int i, j, n;
27         char **split, *str;
28         void *ctx;
29         char *strings[NUM_SUBSTRINGS * NUM_SUBSTRINGS];
30         int length;
31         struct stat st;
32
33         n = 0;
34         for (i = 0; i < NUM_SUBSTRINGS; i++) {
35                 for (j = 0; j < NUM_SUBSTRINGS; j++) {
36                         strings[n] = malloc(strlen(substrings[i])
37                                             + strlen(substrings[j]) + 1);
38                         sprintf(strings[n++], "%s%s",
39                                 substrings[i], substrings[j]);
40                 }
41         }
42
43         plan_tests(n * n * 5 + 19);
44         for (i = 0; i < n; i++) {
45                 for (j = 0; j < n; j++) {
46                         unsigned int k, identical = 0;
47                         char *reva, *revb;
48
49                         /* Find first difference. */
50                         for (k = 0; strings[i][k]==strings[j][k]; k++) {
51                                 if (k == strlen(strings[i])) {
52                                         identical = 1;
53                                         break;
54                                 }
55                         }
56
57                         if (identical) 
58                                 ok1(streq(strings[i], strings[j]));
59                         else
60                                 ok1(!streq(strings[i], strings[j]));
61
62                         /* Postfix test should be equivalent to prefix
63                          * test on reversed string. */
64                         reva = strdup_rev(strings[i]);
65                         revb = strdup_rev(strings[j]);
66
67                         if (!strings[i][k]) {
68                                 ok1(strstarts(strings[j], strings[i]));
69                                 ok1(strends(revb, reva));
70                         } else {
71                                 ok1(!strstarts(strings[j], strings[i]));
72                                 ok1(!strends(revb, reva));
73                         }
74                         if (!strings[j][k]) {
75                                 ok1(strstarts(strings[i], strings[j]));
76                                 ok1(strends(reva, revb));
77                         } else {
78                                 ok1(!strstarts(strings[i], strings[j]));
79                                 ok1(!strends(reva, revb));
80                         }
81                 }
82         }
83
84         split = strsplit(NULL, "hello  world", " ", &n);
85         ok1(n == 3);
86         ok1(streq(split[0], "hello"));
87         ok1(streq(split[1], ""));
88         ok1(streq(split[2], "world"));
89         ok1(split[3] == NULL);
90         talloc_free(split);
91
92         split = strsplit(NULL, "hello  world", " ", NULL);
93         ok1(streq(split[0], "hello"));
94         ok1(streq(split[1], ""));
95         ok1(streq(split[2], "world"));
96         ok1(split[3] == NULL);
97         talloc_free(split);
98
99         split = strsplit(NULL, "hello  world", "o ", NULL);
100         ok1(streq(split[0], "hell"));
101         ok1(streq(split[1], ""));
102         ok1(streq(split[2], ""));
103         ok1(streq(split[3], "w"));
104         ok1(streq(split[4], "rld"));
105         ok1(split[5] == NULL);
106
107         ctx = split;
108         split = strsplit(ctx, "hello  world", "o ", NULL);
109         ok1(talloc_parent(split) == ctx);
110         talloc_free(ctx);
111
112         str = strjoin(NULL, substrings, ", ");
113         ok1(streq(str, "far, bar, baz, b, ba, z, ar, "));
114         ctx = str;
115         str = strjoin(ctx, substrings, "");
116         ok1(streq(str, "farbarbazbbazar"));
117         ok1(talloc_parent(str) == ctx);
118         talloc_free(ctx);
119
120         str = grab_file(NULL, "ccan/string/test/run-grab.c");
121         split = strsplit(NULL, str, "\n", NULL);
122         length = strlen(split[0]);
123         ok1(streq(split[0], "/* This is test for grab_file() function */"));
124         for(i = 1; split[i]; i++)       
125                 length += strlen(split[i]);
126         ok1(streq(split[i-1], "/* End of grab_file() test */"));
127         if (stat("ccan/string/test/run-grab.c", &st) != 0) 
128                 err(1, "Could not stat self");
129         ok1(st.st_size == length);
130                 
131         return exit_status();
132 }