From bd82d030011cd8b9655e5ded6b6df9343b42a6bd Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?J=C3=B6rg=20Frings-F=C3=BCrst?= Date: Wed, 4 Feb 2015 14:09:54 +0100 Subject: Imported Upstream version 3.22 --- src/tc-option.c | 119 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 119 insertions(+) create mode 100644 src/tc-option.c (limited to 'src/tc-option.c') diff --git a/src/tc-option.c b/src/tc-option.c new file mode 100644 index 0000000..dbd595c --- /dev/null +++ b/src/tc-option.c @@ -0,0 +1,119 @@ +/* + * option parser test program + * Copyright Jan Engelhardt + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of the WTF Public License version 2 or + * (at your option) any later version. + */ +#include +#include +#include +#include +#include +#include +#include +#include + +static int opt_v = 0, opt_mask = 0; +static char *opt_kstr = NULL; +static long opt_klong = 0; +static double opt_kdbl = 0; +static int opt_kflag = 0, opt_kint = 0; +static int opt_dst = 0; +static hxmc_t *opt_mcstr = NULL; + +static void opt_cbf(const struct HXoptcb *cbi) +{ + printf("cbf was called... with \"%s\"/'%c'\n", + cbi->current->ln, cbi->current->sh); +} + +static const char *opt_eitheror[] = {"neither", "either", "or"}; +static struct HXoption table[] = { + {.ln = "dbl", .type = HXTYPE_DOUBLE, .cb = opt_cbf, + .ptr = &opt_kdbl, .help = "Callback function for doubles"}, + {.ln = "flag", .sh = 'F', .type = HXTYPE_NONE, .cb = opt_cbf, + .ptr = &opt_kflag, .help = "Callback function for flags"}, + {.ln = "long", .sh = 'L', .type = HXTYPE_LONG, .cb = opt_cbf, + .ptr = &opt_klong, .help = "Callback function for integers"}, + {.sh = 'B', .type = HXTYPE_BOOL, .ptr = &opt_v, + .cb = opt_cbf, .help = "Bool test", .htyp = "value"}, + {.sh = 'P', .type = HXTYPE_MCSTR, .ptr = &opt_mcstr, + .help = "Any string"}, + {.ln = "str", .sh = 'S', .type = HXTYPE_STRING, .cb = opt_cbf, + .ptr = &opt_kstr, .help = "Callback function for strings"}, + {.ln = "either", .type = HXTYPE_VAL, .cb = opt_cbf, .ptr = &opt_dst, + .val = 1, .help = "Mutually exclusive selection: either | or"}, + {.ln = "or", .type = HXTYPE_VAL, .ptr = &opt_dst, .val = 2, + .cb = opt_cbf, .help = "Mutually exclusive selection: either | or"}, + {.ln = "quiet", .sh = 'q', .type = HXOPT_DEC, .ptr = &opt_v, + .cb = opt_cbf, .help = "Decrease verbosity"}, + {.ln = "verbose", .sh = 'v', .type = HXOPT_INC, .ptr = &opt_v, + .cb = opt_cbf, .help = "Increase verbosity"}, + {.sh = 'A', .type = HXTYPE_INT | HXOPT_AND, .ptr = &opt_mask, + .cb = opt_cbf, .help = "AND mask test", .htyp = "value"}, + {.sh = 'O', .type = HXTYPE_INT | HXOPT_OR, .ptr = &opt_mask, + .cb = opt_cbf, .help = "OR mask test", .htyp = "value"}, + {.sh = 'X', .type = HXTYPE_INT | HXOPT_XOR, .ptr = &opt_mask, + .cb = opt_cbf, .help = "XOR mask test", .htyp = "value"}, + {.sh = 'G', .type = HXTYPE_NONE, .help = "Just a flag", .cb = opt_cbf}, + {.sh = 'H', .type = HXTYPE_NONE, .help = "Just a flag", .cb = opt_cbf}, + {.sh = 'I', .type = HXTYPE_NONE, .help = "Just a flag", .cb = opt_cbf}, + HXOPT_AUTOHELP, + {.sh = 'J', .type = HXTYPE_NONE, .help = "Just a flag", .cb = opt_cbf}, + HXOPT_TABLEEND, +}; + +static void dump_argv(const char **v) +{ + while (*v != NULL) + printf("[%s] ", *v++); + printf("\n"); +} + +static void t_pthru(void) +{ + const char *argv[] = { + "ARGV0", "-Zomg", "-GZfoo", "bar", + "--unknown-f=13.37", "--unknown-a", + "foo", "bar", NULL + }; + const char **argp = argv; + int argc = ARRAY_SIZE(argv) - 1; + + printf("PTHRU test:\n"); + HX_getopt(table, &argc, &argp, HXOPT_USAGEONERR | HXOPT_PTHRU); + dump_argv(argp); + printf("\n"); +} + +static void t_empty_argv(void) +{ + const char *zero_argv[] = {NULL}, **zero_argp = zero_argv; + int zero_argc = 0; + + printf("Testing argv={NULL}\n"); + HX_getopt(table, &zero_argc, &zero_argp, HXOPT_USAGEONERR); +} + +int main(int argc, const char **argv) +{ + if (HX_init() <= 0) + abort(); + printf("Return value of HX_getopt: %d\n", + HX_getopt(table, &argc, &argv, HXOPT_USAGEONERR)); + t_empty_argv(); + + printf("Either-or is: %s\n", opt_eitheror[opt_dst]); + printf("values: D=%lf I=%d L=%ld S=%s\n", + opt_kdbl, opt_kint, opt_klong, opt_kstr); + printf("Verbosity level: %d\n", opt_v); + printf("Mask: 0x%08X\n", opt_mask); + printf("mcstr: >%s<\n", opt_mcstr); + + t_pthru(); + + HX_exit(); + return EXIT_SUCCESS; +} -- cgit v1.2.3