1 | /* |
1 | /* |
2 | * getopt.c - Enhanced implementation of BSD getopt(1) |
2 | * getopt.c - Enhanced implementation of BSD getopt(1) |
3 | * Copyright (c) 1997-2005 Frodo Looijaard <frodo@frodo.looijaard.name> |
3 | * Copyright (c) 1997-2014 Frodo Looijaard <frodo@frodo.looijaard.name> |
4 | * |
4 | * |
5 | * This program is free software; you can redistribute it and/or modify |
5 | * This program is free software; you can redistribute it and/or modify |
6 | * it under the terms of the GNU General Public License as published by |
6 | * it under the terms of the GNU General Public License as published by |
7 | * the Free Software Foundation; either version 2 of the License, or |
7 | * the Free Software Foundation; either version 2 of the License, or |
8 | * (at your option) any later version. |
8 | * (at your option) any later version. |
… | |
… | |
10 | * This program is distributed in the hope that it will be useful, |
10 | * This program is distributed in the hope that it will be useful, |
11 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
11 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
12 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
12 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
13 | * GNU General Public License for more details. |
13 | * GNU General Public License for more details. |
14 | * |
14 | * |
15 | * You should have received a copy of the GNU General Public License |
15 | * You should have received a copy of the GNU General Public License along |
16 | * along with this program; if not, write to the Free Software |
16 | * with this program; if not, write to the Free Software Foundation, Inc., |
17 | * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
17 | * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. |
18 | */ |
18 | */ |
19 | |
19 | |
20 | /* |
20 | /* |
21 | * Version 1.0-b4: Tue Sep 23 1997. First public release. |
21 | * Version 1.0-b4: Tue Sep 23 1997. First public release. |
22 | * Version 1.0: Wed Nov 19 1997. |
22 | * Version 1.0: Wed Nov 19 1997. |
23 | * Bumped up the version number to 1.0 |
23 | * Bumped up the version number to 1.0 |
24 | * Fixed minor typo (CSH instead of TCSH) |
24 | * Fixed minor typo (CSH instead of TCSH) |
25 | * Version 1.0.1: Tue Jun 3 1998 |
25 | * Version 1.0.1: Tue Jun 3 1998 |
26 | * Fixed sizeof instead of strlen bug |
26 | * Fixed sizeof instead of strlen bug |
27 | * Bumped up the version number to 1.0.1 |
27 | * Bumped up the version number to 1.0.1 |
… | |
… | |
31 | * Version 1.0.5: Tue Jun 22 1999 |
31 | * Version 1.0.5: Tue Jun 22 1999 |
32 | * Make -u option work (not present) |
32 | * Make -u option work (not present) |
33 | * Version 1.0.6: Tue Jun 27 2000 |
33 | * Version 1.0.6: Tue Jun 27 2000 |
34 | * No important changes |
34 | * No important changes |
35 | * Version 1.1.0: Tue Jun 30 2000 |
35 | * Version 1.1.0: Tue Jun 30 2000 |
36 | * Added NLS support (partly written by Arkadiusz Miśkiewicz |
36 | * Added NLS support (partly written by Arkadiusz Miśkiewicz |
37 | * <misiek@pld.org.pl>) |
37 | * <misiek@pld.org.pl>) |
38 | * Version 1.1.4: Mon Nov 7 2005 |
38 | * Version 1.1.4: Mon Nov 7 2005 |
39 | * Fixed a few type's in the manpage |
39 | * Fixed a few type's in the manpage |
40 | * Version 1.1.5: Sun Aug 12 2012 |
40 | * Version 1.1.5: Sun Aug 12 2012 |
41 | * Sync with util-linux-2.21, fixed build problems, many new translations |
41 | * Sync with util-linux-2.21, fixed build problems, many new translations |
42 | */ |
42 | */ |
43 | |
43 | |
44 | /* Exit codes: |
44 | /* Exit codes: |
45 | * 0) No errors, succesful operation. |
45 | * 0) No errors, successful operation. |
46 | * 1) getopt(3) returned an error. |
46 | * 1) getopt(3) returned an error. |
47 | * 2) A problem with parameter parsing for getopt(1). |
47 | * 2) A problem with parameter parsing for getopt(1). |
48 | * 3) Internal error, out of memory |
48 | * 3) Internal error, out of memory |
49 | * 4) Returned for -T |
49 | * 4) Returned for -T |
50 | */ |
50 | */ |
… | |
… | |
67 | |
67 | |
68 | #include "util-linux-compat.h" |
68 | #include "util-linux-compat.h" |
69 | #include "nls.h" |
69 | #include "nls.h" |
70 | #include "xalloc.h" |
70 | #include "xalloc.h" |
71 | |
71 | |
72 | /* NON_OPT is the code that is returned when a non-option is found in '+' |
72 | /* NON_OPT is the code that is returned when a non-option is found in '+' |
73 | * mode */ |
73 | * mode */ |
74 | #define NON_OPT 1 |
74 | #define NON_OPT 1 |
75 | /* LONG_OPT is the code that is returned when a long option is found. */ |
75 | /* LONG_OPT is the code that is returned when a long option is found. */ |
76 | #define LONG_OPT 2 |
76 | #define LONG_OPT 2 |
77 | |
77 | |
… | |
… | |
91 | |
91 | |
92 | /* Function prototypes */ |
92 | /* Function prototypes */ |
93 | static const char *normalize(const char *arg); |
93 | static const char *normalize(const char *arg); |
94 | static int generate_output(char *argv[], int argc, const char *optstr, |
94 | static int generate_output(char *argv[], int argc, const char *optstr, |
95 | const struct option *longopts); |
95 | const struct option *longopts); |
96 | int main(int argc, char *argv[]); |
|
|
97 | static void parse_error(const char *message); |
96 | static void parse_error(const char *message); |
98 | static void add_long_options(char *options); |
97 | static void add_long_options(char *options); |
99 | static void add_longopt(const char *name, int has_arg); |
98 | static void add_longopt(const char *name, int has_arg); |
100 | static void print_help(void); |
99 | static void print_help(void); |
101 | static void set_shell(const char *new_shell); |
100 | static void set_shell(const char *new_shell); |
… | |
… | |
123 | strcpy(BUFFER, arg); |
122 | strcpy(BUFFER, arg); |
124 | return BUFFER; |
123 | return BUFFER; |
125 | } |
124 | } |
126 | |
125 | |
127 | /* |
126 | /* |
128 | * Each character in arg may take upto four characters in the |
127 | * Each character in arg may take up to four characters in the |
129 | * result: For a quote we need a closing quote, a backslash, a quote |
128 | * result: For a quote we need a closing quote, a backslash, a quote |
130 | * and an opening quote! We need also the global opening and closing |
129 | * and an opening quote! We need also the global opening and closing |
131 | * quote, and one extra character for '\0'. |
130 | * quote, and one extra character for '\0'. |
132 | */ |
131 | */ |
133 | BUFFER = xmalloc(strlen(arg) * 4 + 3); |
132 | BUFFER = xmalloc(strlen(arg) * 4 + 3); |
… | |
… | |
166 | *bufptr++ = '\''; |
165 | *bufptr++ = '\''; |
167 | *bufptr++ = '\0'; |
166 | *bufptr++ = '\0'; |
168 | return BUFFER; |
167 | return BUFFER; |
169 | } |
168 | } |
170 | |
169 | |
171 | /* |
170 | /* |
172 | * Generate the output. argv[0] is the program name (used for reporting errors). |
171 | * Generate the output. argv[0] is the program name (used for reporting errors). |
173 | * argv[1..] contains the options to be parsed. argc must be the number of |
172 | * argv[1..] contains the options to be parsed. argc must be the number of |
174 | * elements in argv (ie. 1 if there are no options, only the program name), |
173 | * elements in argv (ie. 1 if there are no options, only the program name), |
175 | * optstr must contain the short options, and longopts the long options. |
174 | * optstr must contain the short options, and longopts the long options. |
176 | * Other settings are found in global variables. |
175 | * Other settings are found in global variables. |
… | |
… | |
223 | * we already sent a message, we just exit with a helpful hint. |
222 | * we already sent a message, we just exit with a helpful hint. |
224 | */ |
223 | */ |
225 | static void __attribute__ ((__noreturn__)) parse_error(const char *message) |
224 | static void __attribute__ ((__noreturn__)) parse_error(const char *message) |
226 | { |
225 | { |
227 | if (message) |
226 | if (message) |
228 | fprintf(stderr, "%s: %s\n", program_invocation_short_name, message); |
227 | warnx("%s", message); |
229 | fprintf(stderr, _("Try `%s --help' for more information.\n"), |
228 | fprintf(stderr, _("Try `%s --help' for more information.\n"), |
230 | program_invocation_short_name); |
229 | program_invocation_short_name); |
231 | exit(PARAMETER_EXIT_CODE); |
230 | exit(PARAMETER_EXIT_CODE); |
232 | } |
231 | } |
233 | |
232 | |
… | |
… | |
272 | } |
271 | } |
273 | long_options_nr++; |
272 | long_options_nr++; |
274 | } |
273 | } |
275 | |
274 | |
276 | |
275 | |
277 | /* |
276 | /* |
278 | * Register several long options. options is a string of long options, |
277 | * Register several long options. options is a string of long options, |
279 | * separated by commas or whitespace. This nukes options! |
278 | * separated by commas or whitespace. This nukes options! |
280 | */ |
279 | */ |
281 | static void add_long_options(char *options) |
280 | static void add_long_options(char *options) |
282 | { |
281 | { |
… | |
… | |
366 | {"alternative", no_argument, NULL, 'a'}, |
365 | {"alternative", no_argument, NULL, 'a'}, |
367 | {"name", required_argument, NULL, 'n'}, |
366 | {"name", required_argument, NULL, 'n'}, |
368 | {"version", no_argument, NULL, 'V'}, |
367 | {"version", no_argument, NULL, 'V'}, |
369 | {NULL, 0, NULL, 0} |
368 | {NULL, 0, NULL, 0} |
370 | }; |
369 | }; |
|
|
370 | |
371 | setlocale(LC_ALL, ""); |
371 | setlocale(LC_ALL, ""); |
372 | bindtextdomain(PACKAGE, LOCALEDIR); |
372 | bindtextdomain(PACKAGE, LOCALEDIR); |
373 | textdomain(PACKAGE); |
373 | textdomain(PACKAGE); |
374 | |
374 | |
375 | init_longopt(); |
375 | init_longopt(); |
… | |
… | |
388 | return EXIT_SUCCESS; |
388 | return EXIT_SUCCESS; |
389 | } else |
389 | } else |
390 | parse_error(_("missing optstring argument")); |
390 | parse_error(_("missing optstring argument")); |
391 | } |
391 | } |
392 | |
392 | |
393 | |
|
|
394 | if (argv[1][0] != '-' || compatible) { |
393 | if (argv[1][0] != '-' || compatible) { |
395 | quote = 0; |
394 | quote = 0; |
396 | optstr = xmalloc(strlen(argv[1]) + 1); |
395 | optstr = xmalloc(strlen(argv[1]) + 1); |
397 | strcpy(optstr, argv[1] + strspn(argv[1], "-+")); |
396 | strcpy(optstr, argv[1] + strspn(argv[1], "-+")); |
398 | argv[1] = argv[0]; |
397 | argv[1] = argv[0]; |
… | |
… | |
442 | case ':': |
441 | case ':': |
443 | parse_error(NULL); |
442 | parse_error(NULL); |
444 | default: |
443 | default: |
445 | parse_error(_("internal error, contact the author.")); |
444 | parse_error(_("internal error, contact the author.")); |
446 | } |
445 | } |
447 | |
446 | |
448 | if (!optstr) { |
447 | if (!optstr) { |
449 | if (optind >= argc) |
448 | if (optind >= argc) |
450 | parse_error(_("missing optstring argument")); |
449 | parse_error(_("missing optstring argument")); |
451 | else { |
450 | else { |
452 | optstr = xmalloc(strlen(argv[optind]) + 1); |
451 | optstr = xmalloc(strlen(argv[optind]) + 1); |
… | |
… | |
456 | } |
455 | } |
457 | if (name) |
456 | if (name) |
458 | argv[optind - 1] = name; |
457 | argv[optind - 1] = name; |
459 | else |
458 | else |
460 | argv[optind - 1] = argv[0]; |
459 | argv[optind - 1] = argv[0]; |
|
|
460 | |
461 | return generate_output(argv + optind - 1, argc-optind + 1, |
461 | return generate_output(argv + optind - 1, argc-optind + 1, |
462 | optstr, long_options); |
462 | optstr, long_options); |
463 | } |
463 | } |