DataMuseum.dk

top - metrics - download

    Length: 2719 (0xa9f)
    Types: TextFile
    Names: »getopt1.c«

└─⟦a05ed705a⟧ Bits:30007078 DKUUG GNU 2/12/89
    └─⟦4ef0278ca⟧ »./binutils.tar.Z« 
        └─⟦3761b9c35⟧ 
            └─⟦this⟧ »binutils/getopt1.c« 

TextFile

/* Getopt for GNU.
   Copyright (C) 1987, 1989 Free Software Foundation, Inc.

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 1, or (at your option)
   any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */


\f


#include "getopt.h"

int
getopt_long (argc, argv, options, long_options, opt_index)
     int argc;
     char **argv;
     char *options;
     struct option *long_options;
     int *opt_index;
{
  int val;
  _getopt_long_options = long_options;
  val = getopt (argc, argv, options);
  if (val == 0)
    *opt_index = option_index;
  return val;
}
\f


#ifdef TEST

#include <stdio.h>

int
main (argc, argv)
     int argc;
     char **argv;
{
  char c;
  int digit_optind = 0;

  while (1)
    {
      int this_option_optind = optind;
      char *name = '\0';
      int option_index = 0;
      static struct option long_options[]
	= {{ "add", 1, 0, 0 },
	   { "append", 0, 0, 0 },
	   { "delete", 1, 0, 0 },
	   { "verbose", 0, 0, 0 },
	   { "create", 0, 0, 0 },
	   { "file", 1, 0, 0 },
	   { 0, 0, 0, 0}};

      c = getopt_long (argc, argv, "abc:d:0123456789",
		       long_options, &option_index);
      if (c == EOF)
	break;
      if (option_index)
	{
	  printf ("option %s", (long_options[option_index]).name);
	  if (optarg)
	    printf (" with arg %s", optarg);
	  printf ("\n");
	}
      else
	switch (c)
	  {
	  case '0':
	  case '1':
	  case '2':
	  case '3':
	  case '4':
	  case '5':
	  case '6':
	  case '7':
	  case '8':
	  case '9':
	    if (digit_optind != 0 && digit_optind != this_option_optind)
	      printf ("digits occur in two different argv-elements.\n");
	    digit_optind = this_option_optind;
	    printf ("option %c\n", c);
	    break;

	  case 'a':
	    printf ("option a\n");
	    break;

	  case 'b':
	    printf ("option b\n");
	    break;

	  case 'c':
	    printf ("option c with value `%s'\n", optarg);
	    break;

	  case '?':
	    break;

	  default:
	    printf ("?? getopt returned character code 0%o ??\n", c);
	  }
    }

  if (optind < argc)
    {
      printf ("non-option ARGV-elements: ");
      while (optind < argc)
	printf ("%s ", argv[optind++]);
      printf ("\n");
    }

  return 0;
}

#endif /* TEST */