Mercurial > gnulib
annotate lib/long-options.c @ 1755:f486d0e61ad0
(parse_long_options): Remove version-, copyright-,
and author-printing code. Do it via version_etc.
| author | Jim Meyering <jim@meyering.net> |
|---|---|
| date | Fri, 26 Mar 1999 04:19:07 +0000 |
| parents | 265ee2df7a68 |
| children | 702adf3147be |
| rev | line source |
|---|---|
| 317 | 1 /* Utility to accept --help and --version options as unobtrusively as possible. |
|
1643
07db14dfcbca
(parse_long_options): Rename `usage' parameter
Jim Meyering <jim@meyering.net>
parents:
1278
diff
changeset
|
2 Copyright (C) 1993, 1994, 1998, 1999 Free Software Foundation, Inc. |
| 317 | 3 |
| 4 This program is free software; you can redistribute it and/or modify | |
| 5 it under the terms of the GNU General Public License as published by | |
| 6 the Free Software Foundation; either version 2, or (at your option) | |
| 7 any later version. | |
| 8 | |
| 9 This program is distributed in the hope that it will be useful, | |
| 10 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 12 GNU General Public License for more details. | |
| 13 | |
| 14 You should have received a copy of the GNU General Public License | |
|
649
89f4c1937ac7
update FSF address in copyright and remove any trailing blanks
Jim Meyering <jim@meyering.net>
parents:
446
diff
changeset
|
15 along with this program; if not, write to the Free Software Foundation, |
|
89f4c1937ac7
update FSF address in copyright and remove any trailing blanks
Jim Meyering <jim@meyering.net>
parents:
446
diff
changeset
|
16 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ |
| 317 | 17 |
|
649
89f4c1937ac7
update FSF address in copyright and remove any trailing blanks
Jim Meyering <jim@meyering.net>
parents:
446
diff
changeset
|
18 /* Written by Jim Meyering. */ |
| 317 | 19 |
|
1278
9ad625a30b7d
Use #if, not #ifdef with HAVE_ macros
Jim Meyering <jim@meyering.net>
parents:
1199
diff
changeset
|
20 #if HAVE_CONFIG_H |
|
1199
e7da0dec4cd2
(parse_long_options): Check for write error to stdout before exiting.
Jim Meyering <jim@meyering.net>
parents:
880
diff
changeset
|
21 # include <config.h> |
| 317 | 22 #endif |
| 23 | |
| 24 #include <stdio.h> | |
| 25 #include <getopt.h> | |
|
1199
e7da0dec4cd2
(parse_long_options): Check for write error to stdout before exiting.
Jim Meyering <jim@meyering.net>
parents:
880
diff
changeset
|
26 #include "closeout.h" |
| 317 | 27 #include "long-options.h" |
|
1755
f486d0e61ad0
(parse_long_options): Remove version-, copyright-,
Jim Meyering <jim@meyering.net>
parents:
1727
diff
changeset
|
28 #include "version-etc.h" |
| 317 | 29 |
| 1719 | 30 #if ENABLE_NLS |
| 31 # include <libintl.h> | |
| 32 # define _(Text) gettext (Text) | |
| 33 #else | |
| 34 # define _(Text) Text | |
| 35 #endif | |
| 36 | |
| 317 | 37 static struct option const long_options[] = |
| 38 { | |
| 39 {"help", no_argument, 0, 'h'}, | |
| 40 {"version", no_argument, 0, 'v'}, | |
| 41 {0, 0, 0, 0} | |
| 42 }; | |
| 43 | |
| 44 /* Process long options --help and --version, but only if argc == 2. | |
| 45 Be careful not to gobble up `--'. */ | |
| 46 | |
| 47 void | |
| 1719 | 48 parse_long_options (int argc, |
| 49 char **argv, | |
| 50 const char *command_name, | |
| 51 const char *package, | |
| 52 const char *version, | |
| 53 const char *authors, | |
|
1643
07db14dfcbca
(parse_long_options): Rename `usage' parameter
Jim Meyering <jim@meyering.net>
parents:
1278
diff
changeset
|
54 void (*usage_func)()) |
| 317 | 55 { |
| 56 int c; | |
| 57 int saved_opterr; | |
| 58 | |
| 59 saved_opterr = opterr; | |
| 60 | |
| 61 /* Don't print an error message for unrecognized options. */ | |
| 62 opterr = 0; | |
| 63 | |
| 64 if (argc == 2 | |
|
880
3bee11a1c21d
(parse_long_options): Compare getopt_long return
Jim Meyering <jim@meyering.net>
parents:
869
diff
changeset
|
65 && (c = getopt_long (argc, argv, "+", long_options, NULL)) != -1) |
| 317 | 66 { |
| 67 switch (c) | |
| 68 { | |
| 69 case 'h': | |
|
1643
07db14dfcbca
(parse_long_options): Rename `usage' parameter
Jim Meyering <jim@meyering.net>
parents:
1278
diff
changeset
|
70 (*usage_func) (0); |
| 317 | 71 |
| 72 case 'v': | |
|
1755
f486d0e61ad0
(parse_long_options): Remove version-, copyright-,
Jim Meyering <jim@meyering.net>
parents:
1727
diff
changeset
|
73 version_etc (stdout, command_name, package, version, authors); |
|
1199
e7da0dec4cd2
(parse_long_options): Check for write error to stdout before exiting.
Jim Meyering <jim@meyering.net>
parents:
880
diff
changeset
|
74 close_stdout (); /* FIXME: output failure exit status |
|
e7da0dec4cd2
(parse_long_options): Check for write error to stdout before exiting.
Jim Meyering <jim@meyering.net>
parents:
880
diff
changeset
|
75 should be settable via an arg. */ |
| 317 | 76 exit (0); |
|
446
8461c3b8595a
Remove trailing white space.
Jim Meyering <jim@meyering.net>
parents:
317
diff
changeset
|
77 |
| 317 | 78 default: |
| 79 /* Don't process any other long-named options. */ | |
| 80 break; | |
| 81 } | |
| 82 } | |
| 83 | |
| 84 /* Restore previous value. */ | |
| 85 opterr = saved_opterr; | |
| 86 | |
|
869
ca8a87089389
(parse_long_options): Reset optind to zero
Jim Meyering <jim@meyering.net>
parents:
706
diff
changeset
|
87 /* Reset this to zero so that getopt internals get initialized from |
|
ca8a87089389
(parse_long_options): Reset optind to zero
Jim Meyering <jim@meyering.net>
parents:
706
diff
changeset
|
88 the probably-new parameters when/if getopt is called later. */ |
|
ca8a87089389
(parse_long_options): Reset optind to zero
Jim Meyering <jim@meyering.net>
parents:
706
diff
changeset
|
89 optind = 0; |
| 317 | 90 } |