652cd316cfca4cdf0065b0d88466f0a766c2afee
[ccan] / ccan / opt / test / run-iter.c
1 #define _GNU_SOURCE
2 #include <ccan/tap/tap.h>
3 #include <stdarg.h>
4 #include <setjmp.h>
5 #include <stdlib.h>
6 #include <stdarg.h>
7 #include "utils.h"
8 #include <ccan/opt/opt.c>
9 #include <ccan/opt/usage.c>
10 #include <ccan/opt/helpers.c>
11
12 /* Test iterators. */
13 int main(int argc, char *argv[])
14 {
15         unsigned i, len;
16         const char *p;
17
18         plan_tests(37);
19         opt_register_table(subtables, NULL);
20
21         p = first_lopt(&i, &len);
22         ok1(i == 0);
23         ok1(len == 3);
24         ok1(strncmp(p, "jjj", len) == 0);
25         p = next_lopt(p, &i, &len);
26         ok1(i == 0);
27         ok1(len == 3);
28         ok1(strncmp(p, "lll", len) == 0);
29         p = next_lopt(p, &i, &len);
30         ok1(i == 1);
31         ok1(len == 3);
32         ok1(strncmp(p, "mmm", len) == 0);
33         p = next_lopt(p, &i, &len);
34         ok1(i == 5);
35         ok1(len == 3);
36         ok1(strncmp(p, "ddd", len) == 0);
37         p = next_lopt(p, &i, &len);
38         ok1(i == 6);
39         ok1(len == 3);
40         ok1(strncmp(p, "eee", len) == 0);
41         p = next_lopt(p, &i, &len);
42         ok1(i == 7);
43         ok1(len == 3);
44         ok1(strncmp(p, "ggg", len) == 0);
45         p = next_lopt(p, &i, &len);
46         ok1(i == 8);
47         ok1(len == 3);
48         ok1(strncmp(p, "hhh", len) == 0);
49         p = next_lopt(p, &i, &len);
50         ok1(!p);
51
52         p = first_sopt(&i);
53         ok1(i == 0);
54         ok1(*p == 'j');
55         p = next_sopt(p, &i);
56         ok1(i == 0);
57         ok1(*p == 'l');
58         p = next_sopt(p, &i);
59         ok1(i == 1);
60         ok1(*p == 'm');
61         p = next_sopt(p, &i);
62         ok1(i == 2);
63         ok1(*p == 'a');
64         p = next_sopt(p, &i);
65         ok1(i == 3);
66         ok1(*p == 'b');
67         p = next_sopt(p, &i);
68         ok1(i == 7);
69         ok1(*p == 'g');
70         p = next_sopt(p, &i);
71         ok1(i == 8);
72         ok1(*p == 'h');
73         p = next_sopt(p, &i);
74         ok1(!p);
75
76         return exit_status();
77 }