| 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 | } |