1 /* (C) 1998-2002 Red Hat, Inc. -- Licensing details are in the COPYING
2 file accompanying popt source distributions, available from
3 ftp://ftp.rpm.org/pub/rpm/dist. */
4
5 #include "system.h"
6
7 /*@unchecked@*/
8 static int pass2 = 0;
option_callback(UNUSED (poptContext con),UNUSED (enum poptCallbackReason reason),const struct poptOption * opt,char * arg,void * data)9 static void option_callback(/*@unused@*/ UNUSED(poptContext con),
10 /*@unused@*/ UNUSED(enum poptCallbackReason reason),
11 const struct poptOption * opt,
12 char * arg, void * data)
13 /*@globals fileSystem @*/
14 /*@modifies fileSystem @*/
15 {
16 if (pass2)
17 fprintf(stdout, "callback: %c %s %s ", opt->val, (char *) data, arg);
18 }
19
20 /*@unchecked@*/
21 static int arg1 = 0;
22 /*@unchecked@*/ /*@observer@*/
23 static char * arg2 = "(none)";
24 /*@unchecked@*/
25 static int arg3 = 0;
26 /*@unchecked@*/
27 static int inc = 0;
28 /*@unchecked@*/
29 static int shortopt = 0;
30
31 /*@unchecked@*/
32 static int aVal = 141421;
33 /*@unchecked@*/
34 static int bVal = 141421;
35 /*@unchecked@*/
36 static unsigned int aFlag = 0x8aceU;
37 /*@unchecked@*/
38 static unsigned int bFlag = 0x8aceU;
39
40 /*@unchecked@*/
41 static short aShort = (short)4523;
42 /*@unchecked@*/
43 static short bShort = (short)4523;
44 /*@unchecked@*/
45 static int aInt = 271828;
46 /*@unchecked@*/
47 static int bInt = 271828;
48 /*@unchecked@*/
49 static long aLong = 738905609L;
50 /*@unchecked@*/
51 static long bLong = 738905609L;
52 /*@unchecked@*/
53 static long long aLongLong = 738905609LL;
54 /*@unchecked@*/
55 static long long bLongLong = 738905609LL;
56 /*@unchecked@*/
57 static float aFloat = 3.1415926535;
58 /*@unchecked@*/
59 static float bFloat = 3.1415926535;
60 /*@unchecked@*/
61 static double aDouble = 9.86960440108935861883;
62 /*@unchecked@*/
63 static double bDouble = 9.86960440108935861883;
64
65 /*@unchecked@*/ /*@only@*/ /*@null@*/
66 static const char ** aArgv = NULL;
67 /*@unchecked@*/ /*@only@*/ /*@null@*/
68 static void * aBits = NULL;
69 /*@unchecked@*/ /*@observer@*/
70 static const char *attributes[] = {
71 "foo", "bar", "baz", "bing", "bang", "boom"
72 };
73 /*@unchecked@*/
74 static size_t nattributes = (sizeof(attributes) / sizeof(attributes[0]));
75
76 /*@unchecked@*/ /*@null@*/
77 static char * oStr = (char *) -1;
78 /*@unchecked@*/
79 static int singleDash = 0;
80
81 /*@unchecked@*/ /*@observer@*/
82 static char * lStr =
83 "This tests default strings and exceeds the ... limit. "
84 "123456789+123456789+123456789+123456789+123456789+ "
85 "123456789+123456789+123456789+123456789+123456789+ "
86 "123456789+123456789+123456789+123456789+123456789+ "
87 "123456789+123456789+123456789+123456789+123456789+ ";
88 /*@unchecked@*/ /*@null@*/
89 static char * nStr = NULL;
90
91 /*@unchecked@*/
92 static struct poptOption moreCallbackArgs[] = {
93 { NULL, '\0', POPT_ARG_CALLBACK|POPT_CBFLAG_INC_DATA,
94 (void *)option_callback, 0,
95 NULL, NULL },
96 { "cb2", 'c', POPT_ARG_STRING, NULL, (int)'c',
97 "Test argument callbacks", NULL },
98 POPT_TABLEEND
99 };
100
101 /*@unchecked@*/
102 static struct poptOption callbackArgs[] = {
103 { NULL, '\0', POPT_ARG_CALLBACK, (void *)option_callback, 0,
104 "sampledata", NULL },
105 { "cb", 'c', POPT_ARG_STRING, NULL, (int)'c',
106 "Test argument callbacks", NULL },
107 { "longopt", '\0', 0, NULL, (int)'l',
108 "Unused option for help testing", NULL },
109 POPT_TABLEEND
110 };
111
112 /*@unchecked@*/
113 static struct poptOption moreArgs[] = {
114 { "inc", 'I', 0, &inc, 0, "An included argument", NULL },
115 POPT_TABLEEND
116 };
117
118 /*@unchecked@*/
119 static struct poptOption options[] = {
120 { NULL, '\0', POPT_ARG_INCLUDE_TABLE, &moreCallbackArgs, 0,
121 "arg for cb2", NULL },
122 { "arg1", '\0', 0, &arg1, 0, "First argument with a really long"
123 " description. After all, we have to test argument help"
124 " wrapping somehow, right?", NULL },
125 { "arg2", '2', POPT_ARG_STRING | POPT_ARGFLAG_SHOW_DEFAULT, &arg2, 0,
126 "Another argument", "ARG" },
127 { "arg3", '3', POPT_ARG_INT, &arg3, 0,
128 "A third argument", "ANARG" },
129 { "onedash", '\0', POPT_ARGFLAG_ONEDASH, &shortopt, 0,
130 "POPT_ARGFLAG_ONEDASH: Option takes a single -", NULL },
131 { "hidden", '\0', POPT_ARG_STRING | POPT_ARGFLAG_DOC_HIDDEN, NULL, 0,
132 "POPT_ARGFLAG_HIDDEN: A hidden option (--help shouldn't display)",
133 NULL },
134 { "optional", '\0', POPT_ARG_STRING | POPT_ARGFLAG_OPTIONAL, &oStr, 0,
135 "POPT_ARGFLAG_OPTIONAL: Takes an optional string argument", NULL },
136
137 { "val", '\0', POPT_ARG_VAL | POPT_ARGFLAG_SHOW_DEFAULT, &aVal, 125992,
138 "POPT_ARG_VAL: 125992 141421", 0},
139
140 { "int", 'i', POPT_ARG_INT | POPT_ARGFLAG_SHOW_DEFAULT, &aInt, 0,
141 "POPT_ARG_INT: 271828", NULL },
142 { "short", 's', POPT_ARG_SHORT | POPT_ARGFLAG_SHOW_DEFAULT, &aShort, 0,
143 "POPT_ARG_SHORT: 4523", NULL },
144 { "long", 'l', POPT_ARG_LONG | POPT_ARGFLAG_SHOW_DEFAULT, &aLong, 0,
145 "POPT_ARG_LONG: 738905609", NULL },
146 { "longlong", 'L', POPT_ARG_LONGLONG | POPT_ARGFLAG_SHOW_DEFAULT, &aLongLong, 0,
147 "POPT_ARG_LONGLONG: 738905609", NULL },
148 { "float", 'f', POPT_ARG_FLOAT | POPT_ARGFLAG_SHOW_DEFAULT, &aFloat, 0,
149 "POPT_ARG_FLOAT: 3.14159", NULL },
150 { "double", 'd', POPT_ARG_DOUBLE | POPT_ARGFLAG_SHOW_DEFAULT, &aDouble, 0,
151 "POPT_ARG_DOUBLE: 9.8696", NULL },
152
153 { "randint", '\0', POPT_ARG_INT|POPT_ARGFLAG_RANDOM, &aInt, 0,
154 "POPT_ARGFLAG_RANDOM: experimental", NULL },
155 { "randshort", '\0', POPT_ARG_SHORT|POPT_ARGFLAG_RANDOM, &aShort, 0,
156 "POPT_ARGFLAG_RANDOM: experimental", NULL },
157 { "randlong", '\0', POPT_ARG_LONG|POPT_ARGFLAG_RANDOM, &aLong, 0,
158 "POPT_ARGFLAG_RANDOM: experimental", NULL },
159 { "randlonglong", '\0', POPT_ARG_LONGLONG|POPT_ARGFLAG_RANDOM, &aLongLong, 0,
160 "POPT_ARGFLAG_RANDOM: experimental", NULL },
161
162 { "argv", '\0', POPT_ARG_ARGV, &aArgv, 0,
163 "POPT_ARG_ARGV: append string to argv array (can be used multiple times)","STRING"},
164 { "bits", '\0', POPT_ARG_BITSET|POPT_ARGFLAG_DOC_HIDDEN, &aBits, 0,
165 "POPT_ARG_BITSET: add string to bit set (can be used multiple times)","STRING"},
166
167 { "bitset", '\0', POPT_BIT_SET | POPT_ARGFLAG_TOGGLE | POPT_ARGFLAG_SHOW_DEFAULT, &aFlag, 0x7777,
168 "POPT_BIT_SET: |= 0x7777", 0},
169 { "bitclr", '\0', POPT_BIT_CLR | POPT_ARGFLAG_TOGGLE | POPT_ARGFLAG_SHOW_DEFAULT, &aFlag, 0xf842,
170 "POPT_BIT_CLR: &= ~0xf842", 0},
171 { "bitxor", '\0', POPT_ARG_VAL | POPT_ARGFLAG_XOR | POPT_ARGFLAG_SHOW_DEFAULT, &aFlag, (0x8ace^0xfeed),
172 "POPT_ARGFLAG_XOR: ^= (0x8ace^0xfeed)", 0},
173
174 { "nstr", '\0', POPT_ARG_STRING | POPT_ARGFLAG_SHOW_DEFAULT, &nStr, 0,
175 "POPT_ARG_STRING: (null)", NULL},
176 { "lstr", '\0', POPT_ARG_STRING | POPT_ARGFLAG_SHOW_DEFAULT, &lStr, 0,
177 "POPT_ARG_STRING: \"123456789...\"", NULL},
178
179 { NULL, '-', POPT_ARG_NONE | POPT_ARGFLAG_DOC_HIDDEN, &singleDash, 0,
180 NULL, NULL },
181 { NULL, '\0', POPT_ARG_INCLUDE_TABLE, &moreArgs, 0,
182 NULL, NULL },
183 { NULL, '\0', POPT_ARG_INCLUDE_TABLE, &callbackArgs, 0,
184 "Callback arguments", NULL },
185 POPT_AUTOALIAS
186 POPT_AUTOHELP
187 POPT_TABLEEND
188 };
189
resetVars(void)190 static void resetVars(void)
191 /*@globals arg1, arg2, arg3, inc, shortopt,
192 aVal, aFlag, aShort, aInt, aLong, aLongLong, aFloat, aDouble,
193 aArgv, aBits, oStr, singleDash, pass2 @*/
194 /*@modifies arg1, arg2, arg3, inc, shortopt,
195 aVal, aFlag, aShort, aInt, aLong, aLongLong, aFloat, aDouble,
196 aArgv, aBits, oStr, singleDash, pass2 @*/
197 {
198 arg1 = 0;
199 arg2 = "(none)";
200 arg3 = 0;
201 inc = 0;
202 shortopt = 0;
203
204 aVal = bVal;
205 aFlag = bFlag;
206
207 aShort = bShort;
208 aInt = bInt;
209 aLong = bLong;
210 aLongLong = bLongLong;
211 aFloat = bFloat;
212 aDouble = bDouble;
213
214 if (aArgv) {
215 int i;
216 for (i = 0; aArgv[i] != NULL; i++) {
217 /*@-unqualifiedtrans@*/
218 free((void *)aArgv[i]);
219 /*@=unqualifiedtrans@*/
220 aArgv[i] = NULL;
221 }
222 free(aArgv);
223 aArgv = NULL;
224 }
225 if (aBits)
226 (void) poptBitsClr(aBits);
227
228 oStr = (char *) -1;
229
230 singleDash = 0;
231 pass2 = 0;
232 }
233
main(int argc,const char ** argv)234 int main(int argc, const char ** argv)
235 /*@globals pass2, fileSystem, internalState @*/
236 /*@modifies pass2, fileSystem, internalState @*/
237 {
238 int rc;
239 int ec = 0;
240 poptContext optCon;
241 const char ** rest;
242 int help = 0;
243 int usage = 0;
244
245 #if defined(HAVE_MCHECK_H) && defined(HAVE_MTRACE)
246 /*@-moduncon -noeffectuncon@*/
247 mtrace(); /* Trace malloc only if MALLOC_TRACE=mtrace-output-file. */
248 /*@=moduncon =noeffectuncon@*/
249 #endif
250
251 /*@-modobserver@*/
252 resetVars();
253 /*@=modobserver@*/
254 /*@-temptrans@*/
255 optCon = poptGetContext("test1", argc, argv, options, 0);
256 /*@=temptrans@*/
257 (void) poptReadConfigFile(optCon, "./test-poptrc");
258 (void) poptReadDefaultConfig(optCon, 1);
259
260 poptSetExecPath(optCon, ".", 1);
261
262 #if 1
263 while ((rc = poptGetNextOpt(optCon)) > 0) /* Read all the options ... */
264 {};
265
266 poptResetContext(optCon); /* ... and then start over. */
267 /*@-modobserver@*/
268 resetVars();
269 /*@=modobserver@*/
270 #endif
271
272 pass2 = 1;
273 if ((rc = poptGetNextOpt(optCon)) < -1) {
274 fprintf(stderr, "test1: bad argument %s: %s\n",
275 poptBadOption(optCon, POPT_BADOPTION_NOALIAS),
276 poptStrerror(rc));
277 ec = 2;
278 goto exit;
279 }
280
281 if (help) {
282 poptPrintHelp(optCon, stdout, 0);
283 goto exit;
284 }
285 if (usage) {
286 poptPrintUsage(optCon, stdout, 0);
287 goto exit;
288 }
289
290 fprintf(stdout, "arg1: %d arg2: %s", arg1, arg2);
291
292 if (arg3)
293 fprintf(stdout, " arg3: %d", arg3);
294 if (inc)
295 fprintf(stdout, " inc: %d", inc);
296 if (shortopt)
297 fprintf(stdout, " short: %d", shortopt);
298 if (aVal != bVal)
299 fprintf(stdout, " aVal: %d", aVal);
300 if (aFlag != bFlag)
301 fprintf(stdout, " aFlag: 0x%x", aFlag);
302 if (aShort != bShort)
303 fprintf(stdout, " aShort: %hd", aShort);
304 if (aInt != bInt)
305 fprintf(stdout, " aInt: %d", aInt);
306 if (aLong != bLong)
307 fprintf(stdout, " aLong: %ld", aLong);
308 if (aLongLong != bLongLong)
309 fprintf(stdout, " aLongLong: %lld", aLongLong);
310 /*@-realcompare@*/
311 if (aFloat != bFloat)
312 fprintf(stdout, " aFloat: %g", (double)aFloat);
313 if (aDouble != bDouble)
314 fprintf(stdout, " aDouble: %g", aDouble);
315 /*@=realcompare@*/
316 if (aArgv != NULL) {
317 const char **av = aArgv;
318 const char * arg;
319 fprintf(stdout, " aArgv:");
320 while ((arg = *av++) != NULL)
321 fprintf(stdout, " %s", arg);
322 }
323 if (aBits) {
324 const char * separator = " ";
325 size_t i;
326 fprintf(stdout, " aBits:");
327 for (i = 0; i < nattributes; i++) {
328 if (!poptBitsChk(aBits, attributes[i]))
329 continue;
330 fprintf(stdout, "%s%s", separator, attributes[i]);
331 separator = ",";
332 }
333 }
334 /*@-nullpass@*/
335 if (oStr != (char *)-1)
336 fprintf(stdout, " oStr: %s", (oStr ? oStr : "(none)"));
337 /*@=nullpass@*/
338 if (singleDash)
339 fprintf(stdout, " -");
340
341 if (poptPeekArg(optCon) != NULL) {
342 rest = poptGetArgs(optCon);
343 if (rest) {
344 fprintf(stdout, " rest:");
345 while (*rest) {
346 fprintf(stdout, " %s", *rest);
347 rest++;
348 }
349 }
350 }
351
352 fprintf(stdout, "\n");
353
354 exit:
355 optCon = poptFreeContext(optCon);
356 #if defined(HAVE_MCHECK_H) && defined(HAVE_MTRACE)
357 /*@-moduncon -noeffectuncon@*/
358 muntrace(); /* Trace malloc only if MALLOC_TRACE=mtrace-output-file. */
359 /*@=moduncon =noeffectuncon@*/
360 #endif
361 return ec;
362 }
363