3 #include <ccan/tap/tap.h>
9 /* We don't actually want it to exit... */
10 static jmp_buf exited;
11 #define exit(status) longjmp(exited, (status) + 1)
13 #define printf saved_printf
14 static int saved_printf(const char *fmt, ...);
16 #define fprintf saved_fprintf
17 static int saved_fprintf(FILE *ignored, const char *fmt, ...);
19 #define vfprintf(f, fmt, ap) saved_vprintf(fmt, ap)
20 static int saved_vprintf(const char *fmt, va_list ap);
22 #include <ccan/opt/helpers.c>
23 #include <ccan/opt/opt.c>
24 #include <ccan/opt/usage.c>
25 #include <ccan/opt/parse.c>
27 static char *output = NULL;
29 static int saved_vprintf(const char *fmt, va_list ap)
32 int ret = vasprintf(&p, fmt, ap);
35 output = realloc(output, strlen(output) + strlen(p) + 1);
43 static int saved_printf(const char *fmt, ...)
49 ret = saved_vprintf(fmt, ap);
54 static int saved_fprintf(FILE *ignored, const char *fmt, ...)
60 ret = saved_vprintf(fmt, ap);
65 static void set_args(int *argc, char ***argv, ...)
68 *argv = malloc(sizeof(**argv) * 20);
72 ((*argv)[*argc] = va_arg(ap, char*)) != NULL;
78 int main(int argc, char *argv[])
86 opt_register_noarg("-a", opt_set_bool, &arg, "");
87 ok1(parse_args(&argc, &argv, "-a", NULL));
89 opt_register_arg("-b", opt_set_bool_arg, NULL, &arg, "");
90 ok1(parse_args(&argc, &argv, "-b", "no", NULL));
92 ok1(parse_args(&argc, &argv, "-b", "yes", NULL));
94 ok1(parse_args(&argc, &argv, "-b", "false", NULL));
96 ok1(parse_args(&argc, &argv, "-b", "true", NULL));
98 ok1(!parse_args(&argc, &argv, "-b", "unknown", NULL));
100 ok1(strstr(err_output, ": -b: Invalid argument 'unknown'"));
102 /* opt_set_invbool */
106 opt_register_noarg("-a", opt_set_invbool, &arg, "");
107 ok1(parse_args(&argc, &argv, "-a", NULL));
109 opt_register_arg("-b", opt_set_invbool_arg, NULL,
111 ok1(parse_args(&argc, &argv, "-b", "no", NULL));
113 ok1(parse_args(&argc, &argv, "-b", "yes", NULL));
115 ok1(parse_args(&argc, &argv, "-b", "false", NULL));
117 ok1(parse_args(&argc, &argv, "-b", "true", NULL));
119 ok1(!parse_args(&argc, &argv, "-b", "unknown", NULL));
121 ok1(strstr(err_output, ": -b: Invalid argument 'unknown'"));
125 char *arg = cast_const(char *, "wrong");
127 opt_register_arg("-a", opt_set_charp, NULL, &arg, "All");
128 ok1(parse_args(&argc, &argv, "-a", "string", NULL));
129 ok1(strcmp(arg, "string") == 0);
135 opt_register_arg("-a", opt_set_intval, NULL, &arg, "All");
136 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
138 ok1(parse_args(&argc, &argv, "-a", "-9999", NULL));
140 ok1(parse_args(&argc, &argv, "-a", "0", NULL));
142 ok1(!parse_args(&argc, &argv, "-a", "100crap", NULL));
143 if (sizeof(int) == 4)
144 ok1(!parse_args(&argc, &argv, "-a", "4294967296", NULL));
146 fail("Handle other int sizes");
148 /* opt_set_uintval */
150 unsigned int arg = 1000;
152 opt_register_arg("-a", opt_set_uintval, NULL, &arg, "All");
153 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
155 ok1(!parse_args(&argc, &argv, "-a", "-9999", NULL));
156 ok1(parse_args(&argc, &argv, "-a", "0", NULL));
158 ok1(!parse_args(&argc, &argv, "-a", "100crap", NULL));
159 ok1(!parse_args(&argc, &argv, "-a", "4294967296", NULL));
160 if (ULONG_MAX == UINT_MAX) {
161 pass("Can't test overflow");
162 pass("Can't test error message");
165 sprintf(buf, "%lu", ULONG_MAX);
166 ok1(!parse_args(&argc, &argv, "-a", buf, NULL));
167 ok1(strstr(err_output, ": -a: value '")
168 && strstr(err_output, buf)
169 && strstr(err_output, "' does not fit into an integer"));
172 /* opt_set_longval */
176 opt_register_arg("-a", opt_set_longval, NULL, &arg, "All");
177 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
179 ok1(parse_args(&argc, &argv, "-a", "-9999", NULL));
181 ok1(parse_args(&argc, &argv, "-a", "0", NULL));
183 ok1(!parse_args(&argc, &argv, "-a", "100crap", NULL));
184 if (sizeof(long) == 4)
185 ok1(!parse_args(&argc, &argv, "-a", "4294967296", NULL));
186 else if (sizeof(long)== 8)
187 ok1(!parse_args(&argc, &argv, "-a", "18446744073709551616", NULL));
189 fail("FIXME: Handle other long sizes");
191 /* opt_set_ulongval */
193 unsigned long int arg = 1000;
195 opt_register_arg("-a", opt_set_ulongval, NULL, &arg, "All");
196 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
198 ok1(!parse_args(&argc, &argv, "-a", "-9999", NULL));
199 ok1(parse_args(&argc, &argv, "-a", "0", NULL));
201 ok1(!parse_args(&argc, &argv, "-a", "100crap", NULL));
202 if (sizeof(long) == 4)
203 ok1(!parse_args(&argc, &argv, "-a", "4294967296", NULL));
204 else if (sizeof(long)== 8)
205 ok1(!parse_args(&argc, &argv, "-a", "18446744073709551616", NULL));
207 fail("FIXME: Handle other long sizes");
211 const long long k = 1024;
212 const long long M = k * k;
213 const long long G = k * k * k;
214 const long long T = k * k * k * k;
215 const long long P = k * k * k * k * k;
216 const long long E = k * k * k * k * k * k;
218 /* opt_set_uintval_bi */
220 unsigned int arg = 1000;
222 opt_register_arg("-a", opt_set_uintval_bi, NULL,
224 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
226 ok1(!parse_args(&argc, &argv, "-a", "-9999", NULL));
227 ok1(parse_args(&argc, &argv, "-a", "0", NULL));
230 ok1(parse_args(&argc, &argv, "-a", "0k", NULL));
233 ok1(parse_args(&argc, &argv, "-a", "0P", NULL));
235 ok1(!parse_args(&argc, &argv, "-a", "3Q", NULL));
236 ok1(parse_args(&argc, &argv, "-a", "30k", NULL));
238 ok1(!parse_args(&argc, &argv, "-a", "-1K", NULL));
241 /* opt_set_intval_bi */
245 opt_register_arg("-a", opt_set_intval_bi, NULL,
247 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
249 ok1(parse_args(&argc, &argv, "-a", "-9999", NULL));
251 ok1(parse_args(&argc, &argv, "-a", "0", NULL));
254 ok1(parse_args(&argc, &argv, "-a", "0k", NULL));
257 ok1(parse_args(&argc, &argv, "-a", "0P", NULL));
259 ok1(!parse_args(&argc, &argv, "-a", "3Q", NULL));
260 ok1(parse_args(&argc, &argv, "-a", "30k", NULL));
262 ok1(parse_args(&argc, &argv, "-a", "-1K", NULL));
267 /* opt_set_ulongval_bi */
269 unsigned long int arg = 1000;
272 opt_register_arg("-a", opt_set_ulongval_bi, NULL,
274 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
276 ok1(!parse_args(&argc, &argv, "-a", "-9999", NULL));
277 ok1(parse_args(&argc, &argv, "-a", "0", NULL));
280 ok1(parse_args(&argc, &argv, "-a", "0P", NULL));
282 ok1(!parse_args(&argc, &argv, "-a", "1Q", NULL));
283 ok1(parse_args(&argc, &argv, "-a", "100k", NULL));
285 ok1(parse_args(&argc, &argv, "-a", "1K", NULL));
287 ok1(parse_args(&argc, &argv, "-a", "99M", NULL));
289 /*note, 2999M > max signed 32 bit long, 1 << 31*/
290 ok1(parse_args(&argc, &argv, "-a", "2999m", NULL));
291 ok1(arg == 2999 * M);
292 ok1(parse_args(&argc, &argv, "-a", "1G", NULL));
294 ok1(!parse_args(&argc, &argv, "-a", "-1G", NULL));
295 if (sizeof(long) == 4){
296 ok1(!parse_args(&argc, &argv, "-a", "4294967296", NULL));
297 ok1(!parse_args(&argc, &argv, "-a", "1T", NULL));
298 ok1(!parse_args(&argc, &argv, "-a", "1E", NULL));
300 else if (sizeof(long) == 8){
301 ok1(!parse_args(&argc, &argv, "-a",
302 "18446744073709551616", NULL));
303 ok1(!parse_args(&argc, &argv, "-a", "8E", NULL));
304 ok1(parse_args(&argc, &argv, "-a", "3E", NULL));
307 fail("FIXME: Handle other long sizes");
310 /* opt_set_longval_bi */
315 opt_register_arg("-a", opt_set_longval_bi, NULL,
317 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
319 ok1(parse_args(&argc, &argv, "-a", "-9999", NULL));
321 ok1(parse_args(&argc, &argv, "-a", "0P", NULL));
323 ok1(!parse_args(&argc, &argv, "-a", "100crap", NULL));
324 ok1(!parse_args(&argc, &argv, "-a", "1Q", NULL));
325 ok1(parse_args(&argc, &argv, "-a", "100k", NULL));
327 ok1(parse_args(&argc, &argv, "-a", "-100k", NULL));
328 ok1(arg == -100 * k);
329 ok1(parse_args(&argc, &argv, "-a", "1K", NULL));
331 ok1(parse_args(&argc, &argv, "-a", "99M", NULL));
333 ok1(parse_args(&argc, &argv, "-a", "1G", NULL));
335 ok1(parse_args(&argc, &argv, "-a", "-1G", NULL));
337 if (sizeof(long) == 4){
338 ok1(!parse_args(&argc, &argv, "-a", "2147483648", NULL));
339 ok1(!parse_args(&argc, &argv, "-a", "2G", NULL));
340 ok1(!parse_args(&argc, &argv, "-a", "2048m", NULL));
341 ok1(!parse_args(&argc, &argv, "-a", "1T", NULL));
342 ok1(!parse_args(&argc, &argv, "-a", "1E", NULL));
344 else if (sizeof(long) == 8){
345 ok1(!parse_args(&argc, &argv, "-a",
346 "9223372036854775808", NULL));
347 ok1(parse_args(&argc, &argv, "-a", "3E", NULL));
349 ok1(parse_args(&argc, &argv, "-a", "123T", NULL));
353 fail("FIXME: Handle other long sizes");
357 /* opt_set_longlongval_bi */
359 long long int arg = 1000;
361 opt_register_arg("-a", opt_set_longlongval_bi, NULL,
363 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
365 ok1(parse_args(&argc, &argv, "-a", "-9999", NULL));
367 ok1(parse_args(&argc, &argv, "-a", "0P", NULL));
369 ok1(!parse_args(&argc, &argv, "-a", "100crap", NULL));
370 ok1(!parse_args(&argc, &argv, "-a", "1Q", NULL));
371 ok1(!parse_args(&argc, &argv, "-a", "1kk", NULL));
372 ok1(parse_args(&argc, &argv, "-a", "100k", NULL));
374 ok1(parse_args(&argc, &argv, "-a", "-100k", NULL));
375 ok1(arg == -100 * k);
376 ok1(parse_args(&argc, &argv, "-a", "1K", NULL));
378 ok1(parse_args(&argc, &argv, "-a", "-333333M", NULL));
379 ok1(arg == -333333 * M);
380 ok1(parse_args(&argc, &argv, "-a", "1G", NULL));
382 ok1(parse_args(&argc, &argv, "-a", "1024t", NULL));
383 ok1(arg == 1024 * T);
384 ok1(parse_args(&argc, &argv, "-a", "123P", NULL));
386 ok1(parse_args(&argc, &argv, "-a", "-3E", NULL));
389 if (sizeof(long long) == 8){
390 ok1(!parse_args(&argc, &argv, "-a",
391 "9223372036854775808", NULL));
392 /*8E and 922337.. are both 1 << 63*/
393 ok1(!parse_args(&argc, &argv, "-a", "8E", NULL));
396 fail("FIXME: Handle other long long int"
397 " sizes (specifically %zu bytes)",
400 /* opt_set_ulonglongval_bi */
402 unsigned long long int arg = 1000;
404 opt_register_arg("-a", opt_set_ulonglongval_bi, NULL,
406 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
408 ok1(!parse_args(&argc, &argv, "-a", "-9999", NULL));
409 ok1(parse_args(&argc, &argv, "-a", "0", NULL));
411 ok1(!parse_args(&argc, &argv, "-a", "1Q", NULL));
412 ok1(!parse_args(&argc, &argv, "-a", "1kk", NULL));
413 ok1(parse_args(&argc, &argv, "-a", "100G", NULL));
415 ok1(!parse_args(&argc, &argv, "-a", "-100G", NULL));
416 ok1(parse_args(&argc, &argv, "-a", "8191P", NULL));
417 ok1(arg == 8191 * P);
420 /* opt_show_intval_bi */
423 char buf[OPT_SHOW_LEN+2] = { 0 };
424 buf[OPT_SHOW_LEN] = '!';
426 opt_show_intval_bi(buf, &i);
427 ok1(strcmp(buf, "-77") == 0);
429 opt_show_intval_bi(buf, &i);
430 ok1(strcmp(buf, "0") == 0);
431 ok1(buf[OPT_SHOW_LEN] == '!');
433 opt_show_intval_bi(buf, &i);
434 ok1(strcmp(buf, "77") == 0);
435 ok1(buf[OPT_SHOW_LEN] == '!');
437 opt_show_intval_bi(buf, &i);
438 ok1(strcmp(buf, "-1234k") == 0);
439 ok1(buf[OPT_SHOW_LEN] == '!');
441 opt_show_intval_bi(buf, &i);
442 ok1(strcmp(buf, "500M") == 0);
443 ok1(buf[OPT_SHOW_LEN] == '!');
445 opt_show_intval_bi(buf, &i);
446 ok1(strcmp(buf, "1G") == 0);
447 ok1(buf[OPT_SHOW_LEN] == '!');
450 /* opt_show_longval_bi */
453 char buf[OPT_SHOW_LEN+2] = { 0 };
454 buf[OPT_SHOW_LEN] = '!';
456 opt_show_longval_bi(buf, &i);
457 ok1(strcmp(buf, "-77") == 0);
458 ok1(buf[OPT_SHOW_LEN] == '!');
460 opt_show_longval_bi(buf, &i);
461 ok1(strcmp(buf, "77") == 0);
462 ok1(buf[OPT_SHOW_LEN] == '!');
464 opt_show_longval_bi(buf, &i);
465 ok1(strcmp(buf, "-1k") == 0);
466 ok1(buf[OPT_SHOW_LEN] == '!');
468 opt_show_longval_bi(buf, &i);
469 ok1(strcmp(buf, "500M") == 0);
470 ok1(buf[OPT_SHOW_LEN] == '!');
472 opt_show_longval_bi(buf, &i);
473 ok1(strcmp(buf, "1G") == 0);
474 ok1(buf[OPT_SHOW_LEN] == '!');
476 opt_show_longval_bi(buf, &i);
477 ok1(strcmp(buf, "0") == 0);
478 ok1(buf[OPT_SHOW_LEN] == '!');
481 /* opt_show_llongval_bi */
484 char buf[OPT_SHOW_LEN+2] = { 0 };
485 buf[OPT_SHOW_LEN] = '!';
487 opt_show_longlongval_bi(buf, &i);
488 ok1(strcmp(buf, "-7777") == 0);
489 ok1(buf[OPT_SHOW_LEN] == '!');
491 opt_show_longlongval_bi(buf, &i);
492 ok1(strcmp(buf, "7777") == 0);
493 ok1(buf[OPT_SHOW_LEN] == '!');
495 opt_show_longlongval_bi(buf, &i);
496 ok1(strcmp(buf, "-10000M") == 0);
497 ok1(buf[OPT_SHOW_LEN] == '!');
499 opt_show_longlongval_bi(buf, &i);
500 ok1(strcmp(buf, "5P") == 0);
501 ok1(buf[OPT_SHOW_LEN] == '!');
503 opt_show_longlongval_bi(buf, &i);
504 ok1(strcmp(buf, "1E") == 0);
505 ok1(buf[OPT_SHOW_LEN] == '!');
508 /* opt_show_uintval_bi */
511 char buf[OPT_SHOW_LEN+2] = { 0 };
512 buf[OPT_SHOW_LEN] = '!';
514 opt_show_uintval_bi(buf, &i);
515 ok1(strcmp(buf, "77") == 0);
516 ok1(buf[OPT_SHOW_LEN] == '!');
518 opt_show_uintval_bi(buf, &i);
519 ok1(strcmp(buf, "1234k") == 0);
520 ok1(buf[OPT_SHOW_LEN] == '!');
522 opt_show_uintval_bi(buf, &i);
523 ok1(strcmp(buf, "500M") == 0);
524 ok1(buf[OPT_SHOW_LEN] == '!');
526 opt_show_uintval_bi(buf, &i);
527 ok1(strcmp(buf, "1G") == 0);
528 ok1(buf[OPT_SHOW_LEN] == '!');
531 /* opt_show_ulongval_bi */
534 char buf[OPT_SHOW_LEN+2] = { 0 };
535 buf[OPT_SHOW_LEN] = '!';
537 opt_show_ulongval_bi(buf, &i);
538 ok1(strcmp(buf, "77") == 0);
539 ok1(buf[OPT_SHOW_LEN] == '!');
541 opt_show_ulongval_bi(buf, &i);
542 ok1(strcmp(buf, "1k") == 0);
543 ok1(buf[OPT_SHOW_LEN] == '!');
545 opt_show_ulongval_bi(buf, &i);
546 ok1(strcmp(buf, "500M") == 0);
547 ok1(buf[OPT_SHOW_LEN] == '!');
549 opt_show_ulongval_bi(buf, &i);
550 ok1(strcmp(buf, "1G") == 0);
551 ok1(buf[OPT_SHOW_LEN] == '!');
553 opt_show_ulongval_bi(buf, &i);
554 ok1(strcmp(buf, "0") == 0);
555 ok1(buf[OPT_SHOW_LEN] == '!');
558 /* opt_show_ullongval_bi */
561 char buf[OPT_SHOW_LEN+2] = { 0 };
562 buf[OPT_SHOW_LEN] = '!';
564 opt_show_ulonglongval_bi(buf, (unsigned long long *)&i);
565 ok1(strcmp(buf, "7777") == 0);
566 ok1(buf[OPT_SHOW_LEN] == '!');
568 opt_show_ulonglongval_bi(buf, (unsigned long long *)&i);
569 ok1(strcmp(buf, "10000M") == 0);
570 ok1(buf[OPT_SHOW_LEN] == '!');
572 opt_show_ulonglongval_bi(buf, (unsigned long long *)&i);
573 ok1(strcmp(buf, "5P") == 0);
574 ok1(buf[OPT_SHOW_LEN] == '!');
576 opt_show_ulonglongval_bi(buf, (unsigned long long *)&i);
577 ok1(strcmp(buf, "1E") == 0);
578 ok1(buf[OPT_SHOW_LEN] == '!');
583 const long long k = 1000;
584 const long long M = k * k;
585 const long long G = k * k * k;
586 const long long T = k * k * k * k;
587 const long long P = k * k * k * k * k;
588 const long long E = k * k * k * k * k * k;
590 /* opt_set_uintval_si */
592 unsigned int arg = 1000;
594 opt_register_arg("-a", opt_set_uintval_si, NULL,
596 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
598 ok1(!parse_args(&argc, &argv, "-a", "-9999", NULL));
599 ok1(parse_args(&argc, &argv, "-a", "0", NULL));
602 ok1(parse_args(&argc, &argv, "-a", "0k", NULL));
605 ok1(parse_args(&argc, &argv, "-a", "0P", NULL));
607 ok1(!parse_args(&argc, &argv, "-a", "3Q", NULL));
608 ok1(parse_args(&argc, &argv, "-a", "30k", NULL));
610 ok1(!parse_args(&argc, &argv, "-a", "-1K", NULL));
611 if (sizeof(unsigned int) < 8)
612 ok1(!parse_args(&argc, &argv, "-a", "1E", NULL));
614 pass("can't test int truncation when int is so huge");
617 /* opt_set_intval_si */
621 opt_register_arg("-a", opt_set_intval_si, NULL,
623 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
625 ok1(parse_args(&argc, &argv, "-a", "-9999", NULL));
627 ok1(parse_args(&argc, &argv, "-a", "0", NULL));
630 ok1(parse_args(&argc, &argv, "-a", "0k", NULL));
633 ok1(parse_args(&argc, &argv, "-a", "0P", NULL));
635 ok1(!parse_args(&argc, &argv, "-a", "", NULL));
636 ok1(!parse_args(&argc, &argv, "-a", "3Q", NULL));
637 ok1(parse_args(&argc, &argv, "-a", "30k", NULL));
639 ok1(parse_args(&argc, &argv, "-a", "-1K", NULL));
642 ok1(!parse_args(&argc, &argv, "-a", "1E", NULL));
644 pass("can't test int truncation when int is so huge");
648 /* opt_set_ulongval_si */
650 unsigned long int arg = 1000;
653 opt_register_arg("-a", opt_set_ulongval_si, NULL,
655 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
657 ok1(!parse_args(&argc, &argv, "-a", "-9999", NULL));
658 ok1(parse_args(&argc, &argv, "-a", "0P", NULL));
660 ok1(!parse_args(&argc, &argv, "-a", "100crap", NULL));
661 ok1(!parse_args(&argc, &argv, "-a", "1Q", NULL));
662 ok1(parse_args(&argc, &argv, "-a", "100k", NULL));
664 ok1(parse_args(&argc, &argv, "-a", "1K", NULL));
666 ok1(parse_args(&argc, &argv, "-a", "99M", NULL));
668 /*note, 2999M > max signed 32 bit long, 1 << 31*/
669 ok1(parse_args(&argc, &argv, "-a", "2999m", NULL));
670 ok1(arg == 2999 * M);
671 ok1(parse_args(&argc, &argv, "-a", "1G", NULL));
673 ok1(!parse_args(&argc, &argv, "-a", "-1G", NULL));
674 ok1(parse_args(&argc, &argv, "-a", "4G", NULL));
675 ok1(arg == 4000000000U);
676 if (sizeof(long) == 4){
677 ok1(!parse_args(&argc, &argv, "-a", "4294967296", NULL));
678 ok1(!parse_args(&argc, &argv, "-a", "4295M", NULL));
679 ok1(!parse_args(&argc, &argv, "-a", "1T", NULL));
680 ok1(!parse_args(&argc, &argv, "-a", "1E", NULL));
682 else if (sizeof(long)== 8){
683 ok1(!parse_args(&argc, &argv, "-a",
684 "18446744073709551616", NULL));
685 ok1(parse_args(&argc, &argv, "-a", "9E", NULL));
686 ok1(arg == 9000000000000000000ULL);
687 ok1(!parse_args(&argc, &argv, "-a", "19E", NULL));
690 fail("FIXME: Handle other long sizes");
693 /* opt_set_longval_si */
698 opt_register_arg("-a", opt_set_longval_si, NULL,
700 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
702 ok1(parse_args(&argc, &argv, "-a", "-9999", NULL));
704 ok1(parse_args(&argc, &argv, "-a", "0P", NULL));
706 ok1(!parse_args(&argc, &argv, "-a", "100crap", NULL));
707 ok1(!parse_args(&argc, &argv, "-a", "1Q", NULL));
708 ok1(parse_args(&argc, &argv, "-a", "100k", NULL));
710 ok1(parse_args(&argc, &argv, "-a", "-100k", NULL));
711 ok1(arg == -100 * k);
712 ok1(parse_args(&argc, &argv, "-a", "1K", NULL));
714 ok1(parse_args(&argc, &argv, "-a", "99M", NULL));
716 ok1(parse_args(&argc, &argv, "-a", "1G", NULL));
718 ok1(parse_args(&argc, &argv, "-a", "-1G", NULL));
720 if (sizeof(long) == 4){
721 ok1(!parse_args(&argc, &argv, "-a", "2147483648", NULL));
722 ok1(!parse_args(&argc, &argv, "-a", "4G", NULL));
723 ok1(!parse_args(&argc, &argv, "-a", "1T", NULL));
724 ok1(!parse_args(&argc, &argv, "-a", "1E", NULL));
725 ok1(parse_args(&argc, &argv, "-a", "1999m", NULL));
726 ok1(arg == 1999 * M);
728 else if (sizeof(long)== 8){
729 ok1(!parse_args(&argc, &argv, "-a",
730 "9223372036854775808", NULL));
731 ok1(!parse_args(&argc, &argv, "-a", "9224P", NULL));
732 ok1(parse_args(&argc, &argv, "-a", "9E", NULL));
734 ok1(parse_args(&argc, &argv, "-a", "123T", NULL));
738 fail("FIXME: Handle other long sizes");
742 /* opt_set_longlongval_si */
744 long long int arg = 1000;
746 opt_register_arg("-a", opt_set_longlongval_si, NULL,
748 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
750 ok1(parse_args(&argc, &argv, "-a", "-9999", NULL));
752 ok1(parse_args(&argc, &argv, "-a", "0T", NULL));
754 ok1(!parse_args(&argc, &argv, "-a", "100crap", NULL));
755 ok1(!parse_args(&argc, &argv, "-a", "1Q", NULL));
756 ok1(!parse_args(&argc, &argv, "-a", "1kk", NULL));
757 ok1(parse_args(&argc, &argv, "-a", "100k", NULL));
759 ok1(parse_args(&argc, &argv, "-a", "-100k", NULL));
760 ok1(arg == -100 * k);
761 ok1(parse_args(&argc, &argv, "-a", "1K", NULL));
763 ok1(parse_args(&argc, &argv, "-a", "-333333M", NULL));
764 ok1(arg == -333333 * M);
765 ok1(parse_args(&argc, &argv, "-a", "1G", NULL));
767 ok1(parse_args(&argc, &argv, "-a", "1024t", NULL));
768 ok1(arg == 1024 * T);
769 ok1(parse_args(&argc, &argv, "-a", "123P", NULL));
771 ok1(parse_args(&argc, &argv, "-a", "-3E", NULL));
773 ok1(parse_args(&argc, &argv, "-a", "8E", NULL));
774 if (sizeof(long long) == 8){
775 ok1(!parse_args(&argc, &argv, "-a",
776 "9223372036854775808", NULL));
777 ok1(!parse_args(&argc, &argv, "-a",
781 fail("FIXME: Handle other long long int"
782 " sizes (specifically %zu bytes)",
786 /* opt_set_ulonglongval_si */
788 unsigned long long int arg = 1000;
790 opt_register_arg("-a", opt_set_ulonglongval_si, NULL,
792 ok1(parse_args(&argc, &argv, "-a", "9999", NULL));
794 ok1(!parse_args(&argc, &argv, "-a", "-9999", NULL));
795 ok1(parse_args(&argc, &argv, "-a", "0", NULL));
797 ok1(!parse_args(&argc, &argv, "-a", "1Q", NULL));
798 ok1(!parse_args(&argc, &argv, "-a", "1kk", NULL));
799 ok1(parse_args(&argc, &argv, "-a", "100G", NULL));
801 ok1(!parse_args(&argc, &argv, "-a", "-100G", NULL));
802 ok1(parse_args(&argc, &argv, "-a", "8E", NULL));
804 /* opt_show_intval_si */
807 char buf[OPT_SHOW_LEN+2] = { 0 };
808 buf[OPT_SHOW_LEN] = '!';
810 opt_show_intval_si(buf, &i);
811 ok1(strcmp(buf, "-77") == 0);
813 opt_show_intval_si(buf, &i);
814 ok1(strcmp(buf, "0") == 0);
815 ok1(buf[OPT_SHOW_LEN] == '!');
817 opt_show_intval_si(buf, &i);
818 ok1(strcmp(buf, "77") == 0);
819 ok1(buf[OPT_SHOW_LEN] == '!');
821 opt_show_intval_si(buf, &i);
822 ok1(strcmp(buf, "-1234k") == 0);
823 ok1(buf[OPT_SHOW_LEN] == '!');
825 opt_show_intval_si(buf, &i);
826 ok1(strcmp(buf, "500M") == 0);
827 ok1(buf[OPT_SHOW_LEN] == '!');
829 opt_show_intval_si(buf, &i);
830 ok1(strcmp(buf, "1G") == 0);
831 ok1(buf[OPT_SHOW_LEN] == '!');
834 /* opt_show_longval_si */
837 char buf[OPT_SHOW_LEN+2] = { 0 };
838 buf[OPT_SHOW_LEN] = '!';
840 opt_show_longval_si(buf, &i);
841 ok1(strcmp(buf, "-77") == 0);
842 ok1(buf[OPT_SHOW_LEN] == '!');
844 opt_show_longval_si(buf, &i);
845 ok1(strcmp(buf, "77") == 0);
846 ok1(buf[OPT_SHOW_LEN] == '!');
848 opt_show_longval_si(buf, &i);
849 ok1(strcmp(buf, "-1k") == 0);
850 ok1(buf[OPT_SHOW_LEN] == '!');
852 opt_show_longval_si(buf, &i);
853 ok1(strcmp(buf, "500M") == 0);
854 ok1(buf[OPT_SHOW_LEN] == '!');
856 opt_show_longval_si(buf, &i);
857 ok1(strcmp(buf, "1G") == 0);
858 ok1(buf[OPT_SHOW_LEN] == '!');
860 opt_show_longval_si(buf, &i);
861 ok1(strcmp(buf, "0") == 0);
862 ok1(buf[OPT_SHOW_LEN] == '!');
865 /* opt_show_llongval_si */
868 char buf[OPT_SHOW_LEN+2] = { 0 };
869 buf[OPT_SHOW_LEN] = '!';
871 opt_show_longlongval_si(buf, &i);
872 ok1(strcmp(buf, "-7777") == 0);
873 ok1(buf[OPT_SHOW_LEN] == '!');
875 opt_show_longlongval_si(buf, &i);
876 ok1(strcmp(buf, "7777") == 0);
877 ok1(buf[OPT_SHOW_LEN] == '!');
879 opt_show_longlongval_si(buf, &i);
880 ok1(strcmp(buf, "-10240M") == 0);
881 ok1(buf[OPT_SHOW_LEN] == '!');
883 opt_show_longlongval_si(buf, &i);
884 ok1(strcmp(buf, "5P") == 0);
885 ok1(buf[OPT_SHOW_LEN] == '!');
887 opt_show_longlongval_si(buf, &i);
888 ok1(strcmp(buf, "2E") == 0);
889 ok1(buf[OPT_SHOW_LEN] == '!');
892 /* opt_show_uintval_si */
895 char buf[OPT_SHOW_LEN+2] = { 0 };
896 buf[OPT_SHOW_LEN] = '!';
898 opt_show_uintval_si(buf, &i);
899 ok1(strcmp(buf, "77") == 0);
900 ok1(buf[OPT_SHOW_LEN] == '!');
902 opt_show_uintval_si(buf, &i);
903 ok1(strcmp(buf, "1234k") == 0);
904 ok1(buf[OPT_SHOW_LEN] == '!');
906 opt_show_uintval_si(buf, &i);
907 ok1(strcmp(buf, "500M") == 0);
908 ok1(buf[OPT_SHOW_LEN] == '!');
910 opt_show_uintval_si(buf, &i);
911 ok1(strcmp(buf, "1G") == 0);
912 ok1(buf[OPT_SHOW_LEN] == '!');
915 /* opt_show_ulongval_si */
918 char buf[OPT_SHOW_LEN+2] = { 0 };
919 buf[OPT_SHOW_LEN] = '!';
921 opt_show_ulongval_si(buf, &i);
922 ok1(strcmp(buf, "77") == 0);
923 ok1(buf[OPT_SHOW_LEN] == '!');
925 opt_show_ulongval_si(buf, &i);
926 ok1(strcmp(buf, "1k") == 0);
927 ok1(buf[OPT_SHOW_LEN] == '!');
929 opt_show_ulongval_si(buf, &i);
930 ok1(strcmp(buf, "500M") == 0);
931 ok1(buf[OPT_SHOW_LEN] == '!');
933 opt_show_ulongval_si(buf, &i);
934 ok1(strcmp(buf, "1024M") == 0);
935 ok1(buf[OPT_SHOW_LEN] == '!');
937 opt_show_ulongval_si(buf, &i);
938 ok1(strcmp(buf, "0") == 0);
939 ok1(buf[OPT_SHOW_LEN] == '!');
942 /* opt_show_ullongval_si */
945 char buf[OPT_SHOW_LEN+2] = { 0 };
946 buf[OPT_SHOW_LEN] = '!';
948 opt_show_ulonglongval_si(buf, (unsigned long long *)&i);
949 ok1(strcmp(buf, "7777") == 0);
950 ok1(buf[OPT_SHOW_LEN] == '!');
952 opt_show_ulonglongval_si(buf, (unsigned long long *)&i);
953 ok1(strcmp(buf, "10240M") == 0);
954 ok1(buf[OPT_SHOW_LEN] == '!');
956 opt_show_ulonglongval_si(buf, (unsigned long long *)&i);
957 ok1(strcmp(buf, "5P") == 0);
958 ok1(buf[OPT_SHOW_LEN] == '!');
960 opt_show_ulonglongval_si(buf, (unsigned long long *)&i);
961 ok1(strcmp(buf, "1E") == 0);
962 ok1(buf[OPT_SHOW_LEN] == '!');
972 opt_register_noarg("-a", opt_inc_intval, &arg, "");
973 ok1(parse_args(&argc, &argv, "-a", NULL));
975 ok1(parse_args(&argc, &argv, "-a", "-a", NULL));
977 ok1(parse_args(&argc, &argv, "-aa", NULL));
981 /* opt_show_version_and_exit. */
985 opt_register_noarg("-a",
986 opt_version_and_exit, "1.2.3", "");
987 /* parse_args allocates argv */
990 set_args(&argc, &argv, "thisprog", "-a", NULL);
992 exitval = setjmp(exited);
994 opt_parse(&argc, argv, save_err_output);
995 fail("opt_show_version_and_exit returned?");
997 ok1(exitval - 1 == 0);
998 /* We should have freed table!. */
999 ok1(opt_table == NULL);
1001 ok1(strcmp(output, "1.2.3\n") == 0);
1007 /* opt_usage_and_exit. */
1011 opt_register_noarg("-a",
1012 opt_usage_and_exit, "[args]", "");
1014 set_args(&argc, &argv, "thisprog", "-a", NULL);
1016 exitval = setjmp(exited);
1018 opt_parse(&argc, argv, save_err_output);
1019 fail("opt_usage_and_exit returned?");
1021 ok1(exitval - 1 == 0);
1022 /* We should have freed table!. */
1023 ok1(opt_table == NULL);
1025 ok1(strstr(output, "[args]"));
1026 ok1(strstr(output, argv[0]));
1027 ok1(strstr(output, "\n-a"));
1036 char buf[OPT_SHOW_LEN+2] = { 0 };
1037 buf[OPT_SHOW_LEN] = '!';
1040 opt_show_bool(buf, &b);
1041 ok1(strcmp(buf, "true") == 0);
1042 ok1(buf[OPT_SHOW_LEN] == '!');
1045 opt_show_bool(buf, &b);
1046 ok1(strcmp(buf, "false") == 0);
1047 ok1(buf[OPT_SHOW_LEN] == '!');
1050 /* opt_show_invbool */
1053 char buf[OPT_SHOW_LEN+2] = { 0 };
1054 buf[OPT_SHOW_LEN] = '!';
1057 opt_show_invbool(buf, &b);
1058 ok1(strcmp(buf, "false") == 0);
1059 ok1(buf[OPT_SHOW_LEN] == '!');
1062 opt_show_invbool(buf, &b);
1063 ok1(strcmp(buf, "true") == 0);
1064 ok1(buf[OPT_SHOW_LEN] == '!');
1067 /* opt_show_charp */
1069 char str[OPT_SHOW_LEN*2], *p;
1070 char buf[OPT_SHOW_LEN+2] = { 0 };
1071 buf[OPT_SHOW_LEN] = '!';
1076 opt_show_charp(buf, &p);
1077 ok1(strcmp(buf, "\"short\"") == 0);
1078 ok1(buf[OPT_SHOW_LEN] == '!');
1080 /* Truncate test. */
1081 memset(p, 'x', OPT_SHOW_LEN*2);
1082 p[OPT_SHOW_LEN*2-1] = '\0';
1083 opt_show_charp(buf, &p);
1085 ok1(buf[OPT_SHOW_LEN-1] == '"');
1086 ok1(buf[OPT_SHOW_LEN] == '!');
1087 ok1(strspn(buf+1, "x") == OPT_SHOW_LEN-2);
1090 /* opt_show_intval */
1093 char buf[OPT_SHOW_LEN+2] = { 0 };
1094 buf[OPT_SHOW_LEN] = '!';
1097 opt_show_intval(buf, &i);
1098 ok1(strcmp(buf, "-77") == 0);
1099 ok1(buf[OPT_SHOW_LEN] == '!');
1102 opt_show_intval(buf, &i);
1103 ok1(strcmp(buf, "77") == 0);
1104 ok1(buf[OPT_SHOW_LEN] == '!');
1107 /* opt_show_uintval */
1110 char buf[OPT_SHOW_LEN+2] = { 0 };
1111 buf[OPT_SHOW_LEN] = '!';
1114 opt_show_uintval(buf, &ui);
1115 ok1(strcmp(buf, "4294967295") == 0);
1116 ok1(buf[OPT_SHOW_LEN] == '!');
1119 /* opt_show_longval */
1122 char buf[OPT_SHOW_LEN+2] = { 0 };
1123 buf[OPT_SHOW_LEN] = '!';
1126 opt_show_longval(buf, &l);
1127 ok1(strcmp(buf, "1234567890") == 0);
1128 ok1(buf[OPT_SHOW_LEN] == '!');
1131 /* opt_show_ulongval */
1134 char buf[OPT_SHOW_LEN+2] = { 0 };
1135 buf[OPT_SHOW_LEN] = '!';
1138 opt_show_ulongval(buf, &ul);
1139 ok1(strcmp(buf, "4294967295") == 0);
1140 ok1(buf[OPT_SHOW_LEN] == '!');
1143 /* opt_log_stderr. */
1146 opt_register_noarg("-a",
1147 opt_usage_and_exit, "[args]", "");
1149 set_args(&argc, &argv, "thisprog", "--garbage", NULL);
1150 ok1(!opt_parse(&argc, argv, opt_log_stderr));
1152 "thisprog: --garbage: unrecognized option\n"));
1158 /* opt_log_stderr_exit. */
1162 opt_register_noarg("-a",
1163 opt_usage_and_exit, "[args]", "");
1164 set_args(&argc, &argv, "thisprog", "--garbage", NULL);
1165 exitval = setjmp(exited);
1167 opt_parse(&argc, argv, opt_log_stderr_exit);
1168 fail("opt_log_stderr_exit returned?");
1170 ok1(exitval - 1 == 1);
1174 "thisprog: --garbage: unrecognized option\n"));
1179 //diag("%s\n", err_output);
1180 return exit_status();