getopt1.c
上传用户:xiejiait
上传日期:2007-01-06
资源大小:881k
文件大小:5k
源码类别:

SCSI/ASPI

开发平台:

MultiPlatform

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