diff options
Diffstat (limited to 'plugins/getopt1.c')
-rw-r--r-- | plugins/getopt1.c | 176 |
1 files changed, 176 insertions, 0 deletions
diff --git a/plugins/getopt1.c b/plugins/getopt1.c new file mode 100644 index 00000000..bbac373b --- /dev/null +++ b/plugins/getopt1.c | |||
@@ -0,0 +1,176 @@ | |||
1 | /* getopt_long and getopt_long_only entry points for GNU getopt. | ||
2 | Copyright (C) 1987, 88, 89, 90, 91, 92, 1993, 1994 | ||
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 | #ifdef HAVE_CONFIG_H | ||
20 | #include <config.h> | ||
21 | #endif | ||
22 | |||
23 | #include "getopt.h" | ||
24 | |||
25 | #if !defined (__STDC__) || !__STDC__ | ||
26 | /* This is a separate conditional since some stdc systems | ||
27 | reject `defined (const)'. */ | ||
28 | #ifndef const | ||
29 | #define const | ||
30 | #endif | ||
31 | #endif | ||
32 | |||
33 | #include <stdio.h> | ||
34 | |||
35 | /* Comment out all this code if we are using the GNU C Library, and are not | ||
36 | actually compiling the library itself. This code is part of the GNU C | ||
37 | Library, but also included in many other GNU distributions. Compiling | ||
38 | and linking in this code is a waste when using the GNU C library | ||
39 | (especially if it is a shared library). Rather than having every GNU | ||
40 | program understand `configure --with-gnu-libc' and omit the object files, | ||
41 | it is simpler to just do this in the source for each such file. */ | ||
42 | |||
43 | #if defined (_LIBC) || !defined (__GNU_LIBRARY__) | ||
44 | |||
45 | |||
46 | /* This needs to come after some library #include | ||
47 | to get __GNU_LIBRARY__ defined. */ | ||
48 | #ifdef __GNU_LIBRARY__ | ||
49 | #include <stdlib.h> | ||
50 | #else | ||
51 | char *getenv (); | ||
52 | #endif | ||
53 | |||
54 | #ifndef NULL | ||
55 | #define NULL 0 | ||
56 | #endif | ||
57 | |||
58 | int | ||
59 | getopt_long (argc, argv, options, long_options, opt_index) | ||
60 | int argc; | ||
61 | char *const *argv; | ||
62 | const char *options; | ||
63 | const struct option *long_options; | ||
64 | int *opt_index; | ||
65 | { | ||
66 | return _getopt_internal (argc, argv, options, long_options, opt_index, 0); | ||
67 | } | ||
68 | |||
69 | /* Like getopt_long, but '-' as well as '--' can indicate a long option. | ||
70 | If an option that starts with '-' (not '--') doesn't match a long option, | ||
71 | but does match a short option, it is parsed as a short option | ||
72 | instead. */ | ||
73 | |||
74 | int | ||
75 | getopt_long_only (argc, argv, options, long_options, opt_index) | ||
76 | int argc; | ||
77 | char *const *argv; | ||
78 | const char *options; | ||
79 | const struct option *long_options; | ||
80 | int *opt_index; | ||
81 | { | ||
82 | return _getopt_internal (argc, argv, options, long_options, opt_index, 1); | ||
83 | } | ||
84 | |||
85 | |||
86 | #endif /* _LIBC or not __GNU_LIBRARY__. */ | ||
87 | |||
88 | #ifdef TEST | ||
89 | |||
90 | #include <stdio.h> | ||
91 | |||
92 | int | ||
93 | main (argc, argv) | ||
94 | int argc; | ||
95 | char **argv; | ||
96 | { | ||
97 | int c; | ||
98 | int digit_optind = 0; | ||
99 | |||
100 | while (1) { | ||
101 | int this_option_optind = optind ? optind : 1; | ||
102 | int option_index = 0; | ||
103 | static struct option long_options[] = { | ||
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 | case 0: | ||
120 | printf ("option %s", long_options[option_index].name); | ||
121 | if (optarg) | ||
122 | printf (" with arg %s", optarg); | ||
123 | printf ("\n"); | ||
124 | break; | ||
125 | |||
126 | case '0': | ||
127 | case '1': | ||
128 | case '2': | ||
129 | case '3': | ||
130 | case '4': | ||
131 | case '5': | ||
132 | case '6': | ||
133 | case '7': | ||
134 | case '8': | ||
135 | case '9': | ||
136 | if (digit_optind != 0 && digit_optind != this_option_optind) | ||
137 | printf ("digits occur in two different argv-elements.\n"); | ||
138 | digit_optind = this_option_optind; | ||
139 | printf ("option %c\n", c); | ||
140 | break; | ||
141 | |||
142 | case 'a': | ||
143 | printf ("option a\n"); | ||
144 | break; | ||
145 | |||
146 | case 'b': | ||
147 | printf ("option b\n"); | ||
148 | break; | ||
149 | |||
150 | case 'c': | ||
151 | printf ("option c with value `%s'\n", optarg); | ||
152 | break; | ||
153 | |||
154 | case 'd': | ||
155 | printf ("option d with value `%s'\n", optarg); | ||
156 | break; | ||
157 | |||
158 | case '?': | ||
159 | break; | ||
160 | |||
161 | default: | ||
162 | printf ("?? getopt returned character code 0%o ??\n", c); | ||
163 | } | ||
164 | } | ||
165 | |||
166 | if (optind < argc) { | ||
167 | printf ("non-option ARGV-elements: "); | ||
168 | while (optind < argc) | ||
169 | printf ("%s ", argv[optind++]); | ||
170 | printf ("\n"); | ||
171 | } | ||
172 | |||
173 | exit (0); | ||
174 | } | ||
175 | |||
176 | #endif /* TEST */ | ||