1*9a0e4156SSadaf Ebrahimi #include <string.h>
2*9a0e4156SSadaf Ebrahimi #include <stdio.h>
3*9a0e4156SSadaf Ebrahimi
4*9a0e4156SSadaf Ebrahimi // global
5*9a0e4156SSadaf Ebrahimi int opterr = 1, /* if error message should be printed */
6*9a0e4156SSadaf Ebrahimi optind = 1, /* index into parent argv vector */
7*9a0e4156SSadaf Ebrahimi optopt, /* character checked for validity */
8*9a0e4156SSadaf Ebrahimi optreset; /* reset getopt */
9*9a0e4156SSadaf Ebrahimi const char *optarg; /* argument associated with option */
10*9a0e4156SSadaf Ebrahimi
11*9a0e4156SSadaf Ebrahimi #define BADCH (int)'?'
12*9a0e4156SSadaf Ebrahimi #define BADARG (int)':'
13*9a0e4156SSadaf Ebrahimi #define EMSG ""
14*9a0e4156SSadaf Ebrahimi
15*9a0e4156SSadaf Ebrahimi /*
16*9a0e4156SSadaf Ebrahimi * getopt --
17*9a0e4156SSadaf Ebrahimi * Parse argc/argv argument vector.
18*9a0e4156SSadaf Ebrahimi */
19*9a0e4156SSadaf Ebrahimi int
getopt(int nargc,char * const nargv[],const char * ostr)20*9a0e4156SSadaf Ebrahimi getopt (int nargc, char * const nargv[], const char *ostr)
21*9a0e4156SSadaf Ebrahimi {
22*9a0e4156SSadaf Ebrahimi static const char *place = EMSG; /* option letter processing */
23*9a0e4156SSadaf Ebrahimi const char *oli; /* option letter list index */
24*9a0e4156SSadaf Ebrahimi
25*9a0e4156SSadaf Ebrahimi if (optreset || !*place) { /* update scanning pointer */
26*9a0e4156SSadaf Ebrahimi optreset = 0;
27*9a0e4156SSadaf Ebrahimi if (optind >= nargc || *(place = nargv[optind]) != '-') {
28*9a0e4156SSadaf Ebrahimi place = EMSG;
29*9a0e4156SSadaf Ebrahimi return (-1);
30*9a0e4156SSadaf Ebrahimi }
31*9a0e4156SSadaf Ebrahimi if (place[1] && *++place == '-') { /* found "--" */
32*9a0e4156SSadaf Ebrahimi ++optind;
33*9a0e4156SSadaf Ebrahimi place = EMSG;
34*9a0e4156SSadaf Ebrahimi return (-1);
35*9a0e4156SSadaf Ebrahimi }
36*9a0e4156SSadaf Ebrahimi } /* option letter okay? */
37*9a0e4156SSadaf Ebrahimi if ((optopt = (int)*place++) == (int)':' ||
38*9a0e4156SSadaf Ebrahimi !(oli = strchr (ostr, optopt))) {
39*9a0e4156SSadaf Ebrahimi /*
40*9a0e4156SSadaf Ebrahimi * if the user didn't specify '-' as an option,
41*9a0e4156SSadaf Ebrahimi * assume it means -1.
42*9a0e4156SSadaf Ebrahimi */
43*9a0e4156SSadaf Ebrahimi if (optopt == (int)'-')
44*9a0e4156SSadaf Ebrahimi return (-1);
45*9a0e4156SSadaf Ebrahimi if (!*place)
46*9a0e4156SSadaf Ebrahimi ++optind;
47*9a0e4156SSadaf Ebrahimi if (opterr && *ostr != ':')
48*9a0e4156SSadaf Ebrahimi (void)printf ("illegal option -- %c\n", optopt);
49*9a0e4156SSadaf Ebrahimi return (BADCH);
50*9a0e4156SSadaf Ebrahimi }
51*9a0e4156SSadaf Ebrahimi if (*++oli != ':') { /* don't need argument */
52*9a0e4156SSadaf Ebrahimi optarg = NULL;
53*9a0e4156SSadaf Ebrahimi if (!*place)
54*9a0e4156SSadaf Ebrahimi ++optind;
55*9a0e4156SSadaf Ebrahimi }
56*9a0e4156SSadaf Ebrahimi else { /* need an argument */
57*9a0e4156SSadaf Ebrahimi if (*place) /* no white space */
58*9a0e4156SSadaf Ebrahimi optarg = place;
59*9a0e4156SSadaf Ebrahimi else if (nargc <= ++optind) { /* no arg */
60*9a0e4156SSadaf Ebrahimi place = EMSG;
61*9a0e4156SSadaf Ebrahimi if (*ostr == ':')
62*9a0e4156SSadaf Ebrahimi return (BADARG);
63*9a0e4156SSadaf Ebrahimi if (opterr)
64*9a0e4156SSadaf Ebrahimi (void)printf ("option requires an argument -- %c\n", optopt);
65*9a0e4156SSadaf Ebrahimi return (BADCH);
66*9a0e4156SSadaf Ebrahimi }
67*9a0e4156SSadaf Ebrahimi else /* white space */
68*9a0e4156SSadaf Ebrahimi optarg = nargv[optind];
69*9a0e4156SSadaf Ebrahimi place = EMSG;
70*9a0e4156SSadaf Ebrahimi ++optind;
71*9a0e4156SSadaf Ebrahimi }
72*9a0e4156SSadaf Ebrahimi return optopt; /* dump back option letter */
73*9a0e4156SSadaf Ebrahimi }
74