(parse_long_options): Check for write error to stdout before exiting.
[gnulib.git] / lib / long-options.c
1 /* Utility to accept --help and --version options as unobtrusively as possible.
2    Copyright (C) 1993, 1994, 1998 Free Software Foundation, Inc.
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
15    along with this program; if not, write to the Free Software Foundation,
16    Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
17
18 /* Written by Jim Meyering.  */
19
20 #ifdef HAVE_CONFIG_H
21 # include <config.h>
22 #endif
23
24 #include <stdio.h>
25 #include <getopt.h>
26 #include "closeout.h"
27 #include "long-options.h"
28
29 static struct option const long_options[] =
30 {
31   {"help", no_argument, 0, 'h'},
32   {"version", no_argument, 0, 'v'},
33   {0, 0, 0, 0}
34 };
35
36 /* Process long options --help and --version, but only if argc == 2.
37    Be careful not to gobble up `--'.  */
38
39 void
40 parse_long_options (argc, argv, command_name, package, version, usage)
41      int argc;
42      char **argv;
43      const char *command_name;
44      const char *package;
45      const char *version;
46      void (*usage)();
47 {
48   int c;
49   int saved_opterr;
50
51   saved_opterr = opterr;
52
53   /* Don't print an error message for unrecognized options.  */
54   opterr = 0;
55
56   if (argc == 2
57       && (c = getopt_long (argc, argv, "+", long_options, NULL)) != -1)
58     {
59       switch (c)
60         {
61         case 'h':
62           (*usage) (0);
63
64         case 'v':
65           printf ("%s (%s) %s\n", command_name, package, version);
66           close_stdout (); /* FIXME: output failure exit status
67                               should be settable via an arg.  */
68           exit (0);
69
70         default:
71           /* Don't process any other long-named options.  */
72           break;
73         }
74     }
75
76   /* Restore previous value.  */
77   opterr = saved_opterr;
78
79   /* Reset this to zero so that getopt internals get initialized from
80      the probably-new parameters when/if getopt is called later.  */
81   optind = 0;
82 }