summaryrefslogtreecommitdiff
path: root/support/charconv/getopt.c
blob: f9dedb09c233f4fa4dff33dbea742b5321a3600c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
/* @(#)getopt
 * parse command options
 * originally from comp.sources.unix/volume3/att_getopt
 * BKi 1993/07/04
 */

/*
* int getopt PROTO((int argc, char **argv, char *opts));
*   argc: number of parameters passed
*   argv[]: parameter string
*   opts: string of allowed parameters,
*     followed by ':' if argument required
*   return option (or EOF)
*     (option argument in: char *optarg)
*
* global: char *optarg: argument
*         int optind: number of argument
*         int optopt
*
* extern int      strcmp();
* extern char    *strchr();
*/
#include "sys_def.h"
#include <string.h>

#ifndef EOF
#define EOF -1
#endif
#ifndef NULL
#define NULL 0L
#endif

int             optind = 1;
int             optopt;
char           *optarg;

int
getopt(argc, argv, opts)
  int             argc;
  char          **argv, *opts;
{
  static int      sp = 1;
  register int    c;
  register char  *cp;

  if (sp == 1)
    if (optind >= argc ||
	argv[optind][0] != '-' || argv[optind][1] == '\0')
      return (EOF);
    else if (strcmp(argv[optind], "--") == 0)
    {
      optind++;
      return (EOF);
    }
  optopt = c = argv[optind][sp];
  if (c == ':' || (cp = strchr(opts, c)) == NULL)
  {
    fprintf(stderr, "%c: illegal option -- \n", c);
    if (argv[optind][++sp] == '\0')
    {
      optind++;
      sp = 1;
    }
    return ('?');
  }
  if (*++cp == ':')
  {
    if (argv[optind][sp + 1] != '\0')
      optarg = &argv[optind++][sp + 1];
    else if (++optind >= argc)
    {
      fprintf(stderr, "%c: option requires an argument -- \n", c);
      sp = 1;
      return ('?');
    } else
      optarg = argv[optind++];
    sp = 1;
  } else
  {
    if (argv[optind][++sp] == '\0')
    {
      sp = 1;
      optind++;
    }
    optarg = NULL;
  }
  return (c);
} /* getopt */