1 /* getopt_long and getopt_long_only entry points for GNU getopt.
2 Copyright (C) 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1996, 1997,
3 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009,
4 2010 Free Software Foundation, Inc.
5 
6 NOTE: The canonical source of this file is maintained with the GNU C Library.
7 Bugs can be reported to bug-glibc@gnu.org.
8 
9 GNU Make is free software; you can redistribute it and/or modify it under the
10 terms of the GNU General Public License as published by the Free Software
11 Foundation; either version 3 of the License, or (at your option) any later
12 version.
13 
14 GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY
15 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
16 A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
17 
18 You should have received a copy of the GNU General Public License along with
19 this program.  If not, see <http://www.gnu.org/licenses/>.  */
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 
56 /* This needs to come after some library #include
57    to get __GNU_LIBRARY__ defined.  */
58 #ifdef __GNU_LIBRARY__
59 #include <stdlib.h>
60 #endif
61 
62 #ifndef	NULL
63 #define NULL 0
64 #endif
65 
66 int
getopt_long(int argc,char * const * argv,const char * options,const struct option * long_options,int * opt_index)67 getopt_long (int argc, char *const *argv, const char *options,
68              const struct option *long_options, int *opt_index)
69 {
70   return _getopt_internal (argc, argv, options, long_options, opt_index, 0);
71 }
72 
73 /* Like getopt_long, but '-' as well as '--' can indicate a long option.
74    If an option that starts with '-' (not '--') doesn't match a long option,
75    but does match a short option, it is parsed as a short option
76    instead.  */
77 
78 int
getopt_long_only(int argc,char * const * argv,const char * options,const struct option * long_options,int * opt_index)79 getopt_long_only (int argc, char *const *argv, const char *options,
80                   const struct option *long_options, int *opt_index)
81 {
82   return _getopt_internal (argc, argv, options, long_options, opt_index, 1);
83 }
84 
85 
86 #endif	/* Not ELIDE_CODE.  */
87 
88 #ifdef TEST
89 
90 #include <stdio.h>
91 
92 int
main(int argc,char ** argv)93 main (int argc, 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 == -1)
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 */
179