1 | /* getopt_long and getopt_long_only entry points for GNU getopt.
|
---|
2 | Copyright (C) 1987, 88, 89, 90, 91, 92, 1993
|
---|
3 | Free Software Foundation, Inc.
|
---|
4 |
|
---|
5 | This program is free software; you can redistribute it and/or modify it
|
---|
6 | under the terms of the GNU General Public License as published by the
|
---|
7 | Free Software Foundation; either version 2, or (at your option) any
|
---|
8 | later version.
|
---|
9 |
|
---|
10 | This program is distributed in the hope that it will be useful,
|
---|
11 | but WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
---|
13 | GNU General Public License for more details.
|
---|
14 |
|
---|
15 | You should have received a copy of the GNU General Public License
|
---|
16 | along with this program; if not, write to the Free Software
|
---|
17 | Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
|
---|
18 | |
---|
19 |
|
---|
20 | #ifdef HAVE_CONFIG_H
|
---|
21 | #include "sysfuncs.h"
|
---|
22 | #endif
|
---|
23 |
|
---|
24 | #include "getopt.h"
|
---|
25 |
|
---|
26 | #if !__STDC__ && !defined(const) && IN_GCC
|
---|
27 | #define const
|
---|
28 | #endif
|
---|
29 |
|
---|
30 | #include <stdio.h>
|
---|
31 |
|
---|
32 | /* Comment out all this code if we are using the GNU C Library, and are not
|
---|
33 | actually compiling the library itself. This code is part of the GNU C
|
---|
34 | Library, but also included in many other GNU distributions. Compiling
|
---|
35 | and linking in this code is a waste when using the GNU C library
|
---|
36 | (especially if it is a shared library). Rather than having every GNU
|
---|
37 | program understand `configure --with-gnu-libc' and omit the object files,
|
---|
38 | it is simpler to just do this in the source for each such file. */
|
---|
39 |
|
---|
40 | #if defined (_LIBC) || !defined (__GNU_LIBRARY__)
|
---|
41 |
|
---|
42 |
|
---|
43 | /* This needs to come after some library #include
|
---|
44 | to get __GNU_LIBRARY__ defined. */
|
---|
45 | #ifdef __GNU_LIBRARY__
|
---|
46 | #include <stdlib.h>
|
---|
47 | #else
|
---|
48 | char *getenv ();
|
---|
49 | #endif
|
---|
50 |
|
---|
51 | #ifndef NULL
|
---|
52 | #define NULL 0
|
---|
53 | #endif
|
---|
54 |
|
---|
55 | int
|
---|
56 | getopt_long (argc, argv, options, long_options, opt_index)
|
---|
57 | int argc;
|
---|
58 | char *const *argv;
|
---|
59 | const char *options;
|
---|
60 | const struct option *long_options;
|
---|
61 | int *opt_index;
|
---|
62 | {
|
---|
63 | return _getopt_internal (argc, argv, options, long_options, opt_index, 0);
|
---|
64 | }
|
---|
65 |
|
---|
66 | /* Like getopt_long, but '-' as well as '--' can indicate a long option.
|
---|
67 | If an option that starts with '-' (not '--') doesn't match a long option,
|
---|
68 | but does match a short option, it is parsed as a short option
|
---|
69 | instead. */
|
---|
70 |
|
---|
71 | int
|
---|
72 | getopt_long_only (argc, argv, options, long_options, opt_index)
|
---|
73 | int argc;
|
---|
74 | char *const *argv;
|
---|
75 | const char *options;
|
---|
76 | const struct option *long_options;
|
---|
77 | int *opt_index;
|
---|
78 | {
|
---|
79 | return _getopt_internal (argc, argv, options, long_options, opt_index, 1);
|
---|
80 | }
|
---|
81 |
|
---|
82 |
|
---|
83 | #endif /* _LIBC or not __GNU_LIBRARY__. */
|
---|
84 | |
---|
85 |
|
---|
86 | #ifdef TEST
|
---|
87 |
|
---|
88 | #include <stdio.h>
|
---|
89 |
|
---|
90 | int
|
---|
91 | main (argc, argv)
|
---|
92 | int argc;
|
---|
93 | char **argv;
|
---|
94 | {
|
---|
95 | int c;
|
---|
96 | int digit_optind = 0;
|
---|
97 |
|
---|
98 | while (1)
|
---|
99 | {
|
---|
100 | int this_option_optind = optind ? optind : 1;
|
---|
101 | int option_index = 0;
|
---|
102 | static struct option long_options[] =
|
---|
103 | {
|
---|
104 | {"add", 1, 0, 0},
|
---|
105 | {"append", 0, 0, 0},
|
---|
106 | {"delete", 1, 0, 0},
|
---|
107 | {"verbose", 0, 0, 0},
|
---|
108 | {"create", 0, 0, 0},
|
---|
109 | {"file", 1, 0, 0},
|
---|
110 | {0, 0, 0, 0}
|
---|
111 | };
|
---|
112 |
|
---|
113 | c = getopt_long (argc, argv, "abc:d:0123456789",
|
---|
114 | long_options, &option_index);
|
---|
115 | if (c == EOF)
|
---|
116 | break;
|
---|
117 |
|
---|
118 | switch (c)
|
---|
119 | {
|
---|
120 | case 0:
|
---|
121 | printf ("option %s", long_options[option_index].name);
|
---|
122 | if (optarg)
|
---|
123 | printf (" with arg %s", optarg);
|
---|
124 | printf ("\n");
|
---|
125 | break;
|
---|
126 |
|
---|
127 | case '0':
|
---|
128 | case '1':
|
---|
129 | case '2':
|
---|
130 | case '3':
|
---|
131 | case '4':
|
---|
132 | case '5':
|
---|
133 | case '6':
|
---|
134 | case '7':
|
---|
135 | case '8':
|
---|
136 | case '9':
|
---|
137 | if (digit_optind != 0 && digit_optind != this_option_optind)
|
---|
138 | printf ("digits occur in two different argv-elements.\n");
|
---|
139 | digit_optind = this_option_optind;
|
---|
140 | printf ("option %c\n", c);
|
---|
141 | break;
|
---|
142 |
|
---|
143 | case 'a':
|
---|
144 | printf ("option a\n");
|
---|
145 | break;
|
---|
146 |
|
---|
147 | case 'b':
|
---|
148 | printf ("option b\n");
|
---|
149 | break;
|
---|
150 |
|
---|
151 | case 'c':
|
---|
152 | printf ("option c with value `%s'\n", optarg);
|
---|
153 | break;
|
---|
154 |
|
---|
155 | case 'd':
|
---|
156 | printf ("option d with value `%s'\n", optarg);
|
---|
157 | break;
|
---|
158 |
|
---|
159 | case '?':
|
---|
160 | break;
|
---|
161 |
|
---|
162 | default:
|
---|
163 | printf ("?? getopt returned character code 0%o ??\n", c);
|
---|
164 | }
|
---|
165 | }
|
---|
166 |
|
---|
167 | if (optind < argc)
|
---|
168 | {
|
---|
169 | printf ("non-option ARGV-elements: ");
|
---|
170 | while (optind < argc)
|
---|
171 | printf ("%s ", argv[optind++]);
|
---|
172 | printf ("\n");
|
---|
173 | }
|
---|
174 |
|
---|
175 | exit (0);
|
---|
176 | }
|
---|
177 |
|
---|
178 | #endif /* TEST */
|
---|