Annotation of OpenXM/src/asir-doc/jtexindex/C/getopt1.c, Revision 1.1
1.1 ! noro 1: /* getopt_long and getopt_long_only entry points for GNU getopt.
! 2: Copyright (C) 1987, 88, 89, 90, 91, 92, 1993, 1994
! 3: Free Software Foundation, Inc.
! 4:
! 5: This program is free software; you can redistribute it and/or modify it
! 6: under the terms of the GNU General Public License as published by the
! 7: Free Software Foundation; either version 2, or (at your option) any
! 8: later version.
! 9:
! 10: This program is distributed in the hope that it will be useful,
! 11: but WITHOUT ANY WARRANTY; without even the implied warranty of
! 12: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
! 13: GNU General Public License for more details.
! 14:
! 15: You should have received a copy of the GNU General Public License
! 16: along with this program; if not, write to the Free Software
! 17: Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
! 18:
! 19: #ifdef HAVE_CONFIG_H
! 20: #include <config.h>
! 21: #endif
! 22:
! 23: #include "getopt.h"
! 24:
! 25: #if !defined (__STDC__) || !__STDC__
! 26: /* This is a separate conditional since some stdc systems
! 27: reject `defined (const)'. */
! 28: #ifndef const
! 29: #define const
! 30: #endif
! 31: #endif
! 32:
! 33: #include <stdio.h>
! 34:
! 35: /* Comment out all this code if we are using the GNU C Library, and are not
! 36: actually compiling the library itself. This code is part of the GNU C
! 37: Library, but also included in many other GNU distributions. Compiling
! 38: and linking in this code is a waste when using the GNU C library
! 39: (especially if it is a shared library). Rather than having every GNU
! 40: program understand `configure --with-gnu-libc' and omit the object files,
! 41: it is simpler to just do this in the source for each such file. */
! 42:
! 43: #if defined (_LIBC) || !defined (__GNU_LIBRARY__)
! 44:
! 45:
! 46: /* This needs to come after some library #include
! 47: to get __GNU_LIBRARY__ defined. */
! 48: #ifdef __GNU_LIBRARY__
! 49: #include <stdlib.h>
! 50: #else
! 51: char *getenv ();
! 52: #endif
! 53:
! 54: #ifndef NULL
! 55: #define NULL 0
! 56: #endif
! 57:
! 58: int
! 59: getopt_long (argc, argv, options, long_options, opt_index)
! 60: int argc;
! 61: char *const *argv;
! 62: const char *options;
! 63: const struct option *long_options;
! 64: int *opt_index;
! 65: {
! 66: return _getopt_internal (argc, argv, options, long_options, opt_index, 0);
! 67: }
! 68:
! 69: /* Like getopt_long, but '-' as well as '--' can indicate a long option.
! 70: If an option that starts with '-' (not '--') doesn't match a long option,
! 71: but does match a short option, it is parsed as a short option
! 72: instead. */
! 73:
! 74: int
! 75: getopt_long_only (argc, argv, options, long_options, opt_index)
! 76: int argc;
! 77: char *const *argv;
! 78: const char *options;
! 79: const struct option *long_options;
! 80: int *opt_index;
! 81: {
! 82: return _getopt_internal (argc, argv, options, long_options, opt_index, 1);
! 83: }
! 84:
! 85:
! 86: #endif /* _LIBC or not __GNU_LIBRARY__. */
! 87:
! 88: #ifdef TEST
! 89:
! 90: #include <stdio.h>
! 91:
! 92: int
! 93: main (argc, argv)
! 94: int argc;
! 95: char **argv;
! 96: {
! 97: int c;
! 98: int digit_optind = 0;
! 99:
! 100: while (1)
! 101: {
! 102: int this_option_optind = optind ? optind : 1;
! 103: int option_index = 0;
! 104: static struct option long_options[] =
! 105: {
! 106: {"add", 1, 0, 0},
! 107: {"append", 0, 0, 0},
! 108: {"delete", 1, 0, 0},
! 109: {"verbose", 0, 0, 0},
! 110: {"create", 0, 0, 0},
! 111: {"file", 1, 0, 0},
! 112: {0, 0, 0, 0}
! 113: };
! 114:
! 115: c = getopt_long (argc, argv, "abc:d:0123456789",
! 116: long_options, &option_index);
! 117: if (c == EOF)
! 118: break;
! 119:
! 120: switch (c)
! 121: {
! 122: case 0:
! 123: printf ("option %s", long_options[option_index].name);
! 124: if (optarg)
! 125: printf (" with arg %s", optarg);
! 126: printf ("\n");
! 127: break;
! 128:
! 129: case '0':
! 130: case '1':
! 131: case '2':
! 132: case '3':
! 133: case '4':
! 134: case '5':
! 135: case '6':
! 136: case '7':
! 137: case '8':
! 138: case '9':
! 139: if (digit_optind != 0 && digit_optind != this_option_optind)
! 140: printf ("digits occur in two different argv-elements.\n");
! 141: digit_optind = this_option_optind;
! 142: printf ("option %c\n", c);
! 143: break;
! 144:
! 145: case 'a':
! 146: printf ("option a\n");
! 147: break;
! 148:
! 149: case 'b':
! 150: printf ("option b\n");
! 151: break;
! 152:
! 153: case 'c':
! 154: printf ("option c with value `%s'\n", optarg);
! 155: break;
! 156:
! 157: case 'd':
! 158: printf ("option d with value `%s'\n", optarg);
! 159: break;
! 160:
! 161: case '?':
! 162: break;
! 163:
! 164: default:
! 165: printf ("?? getopt returned character code 0%o ??\n", c);
! 166: }
! 167: }
! 168:
! 169: if (optind < argc)
! 170: {
! 171: printf ("non-option ARGV-elements: ");
! 172: while (optind < argc)
! 173: printf ("%s ", argv[optind++]);
! 174: printf ("\n");
! 175: }
! 176:
! 177: exit (0);
! 178: }
! 179:
! 180: #endif /* TEST */
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to getopt1.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / asir-doc / jtexindex / C