annotate tests/test-argv-iter.c @ 11708:f74cfe188f81

argv-iter: new module * MODULES.html.sh: Add argv-iter. * lib/argv-iter.c, lib/argv-iter.h: New files. * modules/argv-iter: New file. * modules/argv-iter-tests: New file. * tests/test-argv-iter.c: Test it.
author Jim Meyering <meyering@redhat.com>
date Sat, 04 Jul 2009 16:44:19 +0200
parents
children 61fffcc71917
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
11708
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
1 /* Test argv iterator
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
2 Copyright (C) 2008-2009 Free Software Foundation, Inc.
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
3
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
4 This program is free software: you can redistribute it and/or modify
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
5 it under the terms of the GNU General Public License as published by
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
6 the Free Software Foundation; either version 3 of the License, or
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
7 (at your option) any later version.
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
8
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
9 This program is distributed in the hope that it will be useful,
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
12 GNU General Public License for more details.
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
13
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
14 You should have received a copy of the GNU General Public License
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
16
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
17 /* Written by Jim Meyering. */
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
18
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
19 #include <config.h>
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
20 #include <stdlib.h>
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
21 #include <stdio.h>
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
22 #include <string.h>
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
23
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
24 #define ARRAY_CARDINALITY(Array) (sizeof (Array) / sizeof *(Array))
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
25 #define STREQ(s1, s2) ((strcmp (s1, s2) == 0))
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
26 #define ASSERT(expr) \
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
27 do \
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
28 { \
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
29 if (!(expr)) \
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
30 { \
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
31 fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
32 fflush (stderr); \
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
33 abort (); \
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
34 } \
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
35 } \
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
36 while (0)
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
37
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
38 #include "argv-iter.h"
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
39
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
40 static FILE *
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
41 write_nul_delimited_argv (char **argv)
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
42 {
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
43 FILE *fp = tmpfile ();
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
44 ASSERT (fp);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
45 while (*argv)
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
46 {
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
47 size_t len = strlen (*argv) + 1;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
48 ASSERT (fwrite (*argv, len, 1, fp) == 1);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
49 argv++;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
50 }
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
51 ASSERT (fflush (fp) == 0);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
52 rewind (fp);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
53 return fp;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
54 }
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
55
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
56 int
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
57 main ()
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
58 {
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
59 /* set_program_name (argv[0]); placate overzealous "syntax-check" test. */
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
60 static char *av[][4] = {
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
61 {NULL},
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
62 {"1", NULL},
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
63 {"1", "2", NULL},
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
64 {"1", "2", "3", NULL}
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
65 };
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
66
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
67 int use_stream;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
68 for (use_stream = 0; use_stream < 2; use_stream++)
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
69 {
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
70 size_t i;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
71 for (i = 0; i < ARRAY_CARDINALITY (av); i++)
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
72 {
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
73 FILE *fp;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
74 struct argv_iterator *ai;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
75 size_t n_found = 0;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
76 if (use_stream)
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
77 {
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
78 /* Generate an identical list to be read via FP. */
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
79 ASSERT ((fp = write_nul_delimited_argv (av[i])) != NULL);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
80 ai = argv_iter_init_stream (fp);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
81 }
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
82 else
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
83 {
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
84 fp = NULL;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
85 ai = argv_iter_init_argv (av[i]);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
86 }
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
87 ASSERT (ai);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
88
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
89 while (1)
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
90 {
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
91 enum argv_iter_err ai_err;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
92 char *s = argv_iter (ai, &ai_err);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
93 ASSERT ((i == n_found) == (ai_err == AI_ERR_EOF));
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
94 ASSERT ((s == NULL) ^ (ai_err == AI_ERR_OK));
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
95 ASSERT (ai_err == AI_ERR_OK || ai_err == AI_ERR_EOF);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
96 if (ai_err == AI_ERR_OK)
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
97 ++n_found;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
98 if (ai_err == AI_ERR_EOF)
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
99 break;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
100 /* In stream mode, the strings are equal, but
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
101 in argv mode the actual pointers are equal. */
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
102 ASSERT (use_stream
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
103 ? STREQ (s, av[i][n_found - 1])
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
104 : s == av[i][n_found - 1]);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
105 }
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
106 ASSERT (argv_iter_n_args (ai) == i);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
107 argv_iter_free (ai);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
108 if (fp)
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
109 ASSERT (fclose (fp) == 0);
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
110 }
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
111 }
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
112
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
113 return 0;
f74cfe188f81 argv-iter: new module
Jim Meyering <meyering@redhat.com>
parents:
diff changeset
114 }