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