Home | History | Annotate | Line # | Download | only in lib
getopt1.c revision 1.2 
      1 /* getopt_long and getopt_long_only entry points for GNU getopt.
      2    Copyright (C) 1987,88,89,90,91,92,93,94,96,97,98,2004
      3      Free Software Foundation, Inc.
      4    This file is part of the GNU C Library.
      5 
      6    This program is free software; you can redistribute it and/or modify
      7    it under the terms of the GNU General Public License as published by
      8    the Free Software Foundation; either version 2, or (at your option)
      9    any later version.
     10 
     11    This program is distributed in the hope that it will be useful,
     12    but WITHOUT ANY WARRANTY; without even the implied warranty of
     13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     14    GNU General Public License for more details.
     15 
     16    You should have received a copy of the GNU General Public License along
     17    with this program; if not, write to the Free Software Foundation,
     18    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
     19 #include <sys/cdefs.h>
     20 __RCSID("$NetBSD: getopt1.c,v 1.2 2016/05/17 14:00:09 christos Exp $");
     21 
     22 
     23 #ifdef HAVE_CONFIG_H
     25 # include <config.h>
     26 #endif
     27 
     28 #ifdef _LIBC
     29 # include <getopt.h>
     30 #else
     31 # include "getopt.h"
     32 #endif
     33 #include "getopt_int.h"
     34 
     35 #include <stdio.h>
     36 
     37 /* This needs to come after some library #include
     38    to get __GNU_LIBRARY__ defined.  */
     39 #ifdef __GNU_LIBRARY__
     40 #include <stdlib.h>
     41 #endif
     42 
     43 #ifndef	NULL
     44 #define NULL 0
     45 #endif
     46 
     47 int
     48 getopt_long (int argc, char *__getopt_argv_const *argv, const char *options,
     49 	     const struct option *long_options, int *opt_index)
     50 {
     51   return _getopt_internal (argc, (char **) argv, options, long_options,
     52 			   opt_index, 0, 0);
     53 }
     54 
     55 int
     56 _getopt_long_r (int argc, char **argv, const char *options,
     57 		const struct option *long_options, int *opt_index,
     58 		struct _getopt_data *d)
     59 {
     60   return _getopt_internal_r (argc, argv, options, long_options, opt_index,
     61 			     0, 0, d);
     62 }
     63 
     64 /* Like getopt_long, but '-' as well as '--' can indicate a long option.
     65    If an option that starts with '-' (not '--') doesn't match a long option,
     66    but does match a short option, it is parsed as a short option
     67    instead.  */
     68 
     69 int
     70 getopt_long_only (int argc, char *__getopt_argv_const *argv,
     71 		  const char *options,
     72 		  const struct option *long_options, int *opt_index)
     73 {
     74   return _getopt_internal (argc, (char **) argv, options, long_options,
     75 			   opt_index, 1, 0);
     76 }
     77 
     78 int
     79 _getopt_long_only_r (int argc, char **argv, const char *options,
     80 		     const struct option *long_options, int *opt_index,
     81 		     struct _getopt_data *d)
     82 {
     83   return _getopt_internal_r (argc, argv, options, long_options, opt_index,
     84 			     1, 0, d);
     85 }
     86 
     87 
     88 #ifdef TEST
     90 
     91 #include <stdio.h>
     92 
     93 int
     94 main (int argc, char **argv)
     95 {
     96   int c;
     97   int digit_optind = 0;
     98 
     99   while (1)
    100     {
    101       int this_option_optind = optind ? optind : 1;
    102       int option_index = 0;
    103       static struct option long_options[] =
    104       {
    105 	{"add", 1, 0, 0},
    106 	{"append", 0, 0, 0},
    107 	{"delete", 1, 0, 0},
    108 	{"verbose", 0, 0, 0},
    109 	{"create", 0, 0, 0},
    110 	{"file", 1, 0, 0},
    111 	{0, 0, 0, 0}
    112       };
    113 
    114       c = getopt_long (argc, argv, "abc:d:0123456789",
    115 		       long_options, &option_index);
    116       if (c == -1)
    117 	break;
    118 
    119       switch (c)
    120 	{
    121 	case 0:
    122 	  printf ("option %s", long_options[option_index].name);
    123 	  if (optarg)
    124 	    printf (" with arg %s", optarg);
    125 	  printf ("\n");
    126 	  break;
    127 
    128 	case '0':
    129 	case '1':
    130 	case '2':
    131 	case '3':
    132 	case '4':
    133 	case '5':
    134 	case '6':
    135 	case '7':
    136 	case '8':
    137 	case '9':
    138 	  if (digit_optind != 0 && digit_optind != this_option_optind)
    139 	    printf ("digits occur in two different argv-elements.\n");
    140 	  digit_optind = this_option_optind;
    141 	  printf ("option %c\n", c);
    142 	  break;
    143 
    144 	case 'a':
    145 	  printf ("option a\n");
    146 	  break;
    147 
    148 	case 'b':
    149 	  printf ("option b\n");
    150 	  break;
    151 
    152 	case 'c':
    153 	  printf ("option c with value `%s'\n", optarg);
    154 	  break;
    155 
    156 	case 'd':
    157 	  printf ("option d with value `%s'\n", optarg);
    158 	  break;
    159 
    160 	case '?':
    161 	  break;
    162 
    163 	default:
    164 	  printf ("?? getopt returned character code 0%o ??\n", c);
    165 	}
    166     }
    167 
    168   if (optind < argc)
    169     {
    170       printf ("non-option ARGV-elements: ");
    171       while (optind < argc)
    172 	printf ("%s ", argv[optind++]);
    173       printf ("\n");
    174     }
    175 
    176   exit (0);
    177 }
    178 
    179 #endif /* TEST */
    180