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 20 #ifdef HAVE_CONFIG_H 22 # include <config.h> 23 #endif 24 25 #ifdef _LIBC 26 # include <getopt.h> 27 #else 28 # include "getopt.h" 29 #endif 30 #include "getopt_int.h" 31 32 #include <stdio.h> 33 34 /* This needs to come after some library #include 35 to get __GNU_LIBRARY__ defined. */ 36 #ifdef __GNU_LIBRARY__ 37 #include <stdlib.h> 38 #endif 39 40 #ifndef NULL 41 #define NULL 0 42 #endif 43 44 int 45 getopt_long (int argc, char *__getopt_argv_const *argv, const char *options, 46 const struct option *long_options, int *opt_index) 47 { 48 return _getopt_internal (argc, (char **) argv, options, long_options, 49 opt_index, 0, 0); 50 } 51 52 int 53 _getopt_long_r (int argc, char **argv, const char *options, 54 const struct option *long_options, int *opt_index, 55 struct _getopt_data *d) 56 { 57 return _getopt_internal_r (argc, argv, options, long_options, opt_index, 58 0, 0, d); 59 } 60 61 /* Like getopt_long, but '-' as well as '--' can indicate a long option. 62 If an option that starts with '-' (not '--') doesn't match a long option, 63 but does match a short option, it is parsed as a short option 64 instead. */ 65 66 int 67 getopt_long_only (int argc, char *__getopt_argv_const *argv, 68 const char *options, 69 const struct option *long_options, int *opt_index) 70 { 71 return _getopt_internal (argc, (char **) argv, options, long_options, 72 opt_index, 1, 0); 73 } 74 75 int 76 _getopt_long_only_r (int argc, char **argv, const char *options, 77 const struct option *long_options, int *opt_index, 78 struct _getopt_data *d) 79 { 80 return _getopt_internal_r (argc, argv, options, long_options, opt_index, 81 1, 0, d); 82 } 83 84 85 #ifdef TEST 87 88 #include <stdio.h> 89 90 int 91 main (int argc, char **argv) 92 { 93 int c; 94 int digit_optind = 0; 95 96 while (1) 97 { 98 int this_option_optind = optind ? optind : 1; 99 int option_index = 0; 100 static struct option long_options[] = 101 { 102 {"add", 1, 0, 0}, 103 {"append", 0, 0, 0}, 104 {"delete", 1, 0, 0}, 105 {"verbose", 0, 0, 0}, 106 {"create", 0, 0, 0}, 107 {"file", 1, 0, 0}, 108 {0, 0, 0, 0} 109 }; 110 111 c = getopt_long (argc, argv, "abc:d:0123456789", 112 long_options, &option_index); 113 if (c == -1) 114 break; 115 116 switch (c) 117 { 118 case 0: 119 printf ("option %s", long_options[option_index].name); 120 if (optarg) 121 printf (" with arg %s", optarg); 122 printf ("\n"); 123 break; 124 125 case '0': 126 case '1': 127 case '2': 128 case '3': 129 case '4': 130 case '5': 131 case '6': 132 case '7': 133 case '8': 134 case '9': 135 if (digit_optind != 0 && digit_optind != this_option_optind) 136 printf ("digits occur in two different argv-elements.\n"); 137 digit_optind = this_option_optind; 138 printf ("option %c\n", c); 139 break; 140 141 case 'a': 142 printf ("option a\n"); 143 break; 144 145 case 'b': 146 printf ("option b\n"); 147 break; 148 149 case 'c': 150 printf ("option c with value `%s'\n", optarg); 151 break; 152 153 case 'd': 154 printf ("option d with value `%s'\n", optarg); 155 break; 156 157 case '?': 158 break; 159 160 default: 161 printf ("?? getopt returned character code 0%o ??\n", c); 162 } 163 } 164 165 if (optind < argc) 166 { 167 printf ("non-option ARGV-elements: "); 168 while (optind < argc) 169 printf ("%s ", argv[optind++]); 170 printf ("\n"); 171 } 172 173 exit (0); 174 } 175 176 #endif /* TEST */ 177