1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
|
// SPDX-License-Identifier: MIT
// SPDX-FileCopyrightText: 2022 Jan Engelhardt
/*
* option parser test program
*/
#include <errno.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <libHX/defs.h>
#include <libHX/init.h>
#include <libHX/map.h>
#include <libHX/option.h>
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 = "quack", .type = HXOPT_INC, .ptr = &opt_v,
.cb = opt_cbf, .help = "Increase 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)
return EXIT_FAILURE;
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;
}
|
