Mercurial > gnulib
annotate lib/long-options.c @ 1727:265ee2df7a68
restore blank lines in --version output
| author | Jim Meyering <jim@meyering.net> |
|---|---|
| date | Sun, 07 Mar 1999 17:48:10 +0000 |
| parents | 6b18b85b9da9 |
| children | f486d0e61ad0 |
| 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" |
| 28 | |
| 1719 | 29 #if ENABLE_NLS |
| 30 # include <libintl.h> | |
| 31 # define _(Text) gettext (Text) | |
| 32 #else | |
| 33 # define _(Text) Text | |
| 34 #endif | |
| 35 | |
| 317 | 36 static struct option const long_options[] = |
| 37 { | |
| 38 {"help", no_argument, 0, 'h'}, | |
| 39 {"version", no_argument, 0, 'v'}, | |
| 40 {0, 0, 0, 0} | |
| 41 }; | |
| 42 | |
| 43 /* Process long options --help and --version, but only if argc == 2. | |
| 44 Be careful not to gobble up `--'. */ | |
| 45 | |
| 46 void | |
| 1719 | 47 parse_long_options (int argc, |
| 48 char **argv, | |
| 49 const char *command_name, | |
| 50 const char *package, | |
| 51 const char *version, | |
| 52 const char *authors, | |
|
1643
07db14dfcbca
(parse_long_options): Rename `usage' parameter
Jim Meyering <jim@meyering.net>
parents:
1278
diff
changeset
|
53 void (*usage_func)()) |
| 317 | 54 { |
| 55 int c; | |
| 56 int saved_opterr; | |
| 57 | |
| 58 saved_opterr = opterr; | |
| 59 | |
| 60 /* Don't print an error message for unrecognized options. */ | |
| 61 opterr = 0; | |
| 62 | |
| 63 if (argc == 2 | |
|
880
3bee11a1c21d
(parse_long_options): Compare getopt_long return
Jim Meyering <jim@meyering.net>
parents:
869
diff
changeset
|
64 && (c = getopt_long (argc, argv, "+", long_options, NULL)) != -1) |
| 317 | 65 { |
| 66 switch (c) | |
| 67 { | |
| 68 case 'h': | |
|
1643
07db14dfcbca
(parse_long_options): Rename `usage' parameter
Jim Meyering <jim@meyering.net>
parents:
1278
diff
changeset
|
69 (*usage_func) (0); |
| 317 | 70 |
| 71 case 'v': | |
|
706
f9f8782ba476
(parse_long_options): Separate package name
Jim Meyering <jim@meyering.net>
parents:
649
diff
changeset
|
72 printf ("%s (%s) %s\n", command_name, package, version); |
|
1723
565c8d2d7914
(parse_long_options): Add the `...NO warranty...' message.
Jim Meyering <jim@meyering.net>
parents:
1719
diff
changeset
|
73 printf (_("\ |
|
1727
265ee2df7a68
restore blank lines in --version output
Jim Meyering <jim@meyering.net>
parents:
1724
diff
changeset
|
74 \n\ |
|
1724
6b18b85b9da9
(parse_long_options): Include `Copyright...' line in --version output.
Jim Meyering <jim@meyering.net>
parents:
1723
diff
changeset
|
75 Copyright (C) 1999 Free Software Foundation, Inc.\n\ |
|
1723
565c8d2d7914
(parse_long_options): Add the `...NO warranty...' message.
Jim Meyering <jim@meyering.net>
parents:
1719
diff
changeset
|
76 This is free software; see the source for copying conditions. There is NO\n\ |
|
565c8d2d7914
(parse_long_options): Add the `...NO warranty...' message.
Jim Meyering <jim@meyering.net>
parents:
1719
diff
changeset
|
77 warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\ |
|
1727
265ee2df7a68
restore blank lines in --version output
Jim Meyering <jim@meyering.net>
parents:
1724
diff
changeset
|
78 \n\ |
|
1723
565c8d2d7914
(parse_long_options): Add the `...NO warranty...' message.
Jim Meyering <jim@meyering.net>
parents:
1719
diff
changeset
|
79 ")); |
| 1719 | 80 printf (_("Written by %s.\n"), authors); |
|
1199
e7da0dec4cd2
(parse_long_options): Check for write error to stdout before exiting.
Jim Meyering <jim@meyering.net>
parents:
880
diff
changeset
|
81 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
|
82 should be settable via an arg. */ |
| 317 | 83 exit (0); |
|
446
8461c3b8595a
Remove trailing white space.
Jim Meyering <jim@meyering.net>
parents:
317
diff
changeset
|
84 |
| 317 | 85 default: |
| 86 /* Don't process any other long-named options. */ | |
| 87 break; | |
| 88 } | |
| 89 } | |
| 90 | |
| 91 /* Restore previous value. */ | |
| 92 opterr = saved_opterr; | |
| 93 | |
|
869
ca8a87089389
(parse_long_options): Reset optind to zero
Jim Meyering <jim@meyering.net>
parents:
706
diff
changeset
|
94 /* 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
|
95 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
|
96 optind = 0; |
| 317 | 97 } |