-/* @(#)getopt.c 3.2 */
-#define ERR(s, c) if(opterr){\
- fputs(argv[0], stderr);\
- fputs(s, stderr);\
- fputc(c, stderr);\
- fputc('\n', stderr);}
-
-int opterr = 1;
-int optind = 1;
-char *optarg;
-char *index();
-
-int
-getopt (argc, argv, opts)
- char **argv, *opts;
-{
- static int sp = 1;
- char c;
- char *cp;
-
- if (sp == 1)
- if (optind >= argc ||
- argv[optind][0] != '-' || argv[optind][1] == '\0')
- return EOF;
- else if (strcmp(argv[optind], "--") == NULL) {
- optind++;
- return EOF;
- }
- else if (strcmp(argv[optind], "-?") == NULL) {
- optind++;
- return '?';
- }
- c = argv[optind][sp];
- if (c == ':' || (cp=index(opts, c)) == NULL) {
- ERR (": illegal option -- ", c);
- if (argv[optind][++sp] == '\0') {
- optind++;
- sp = 1;
- }
- return '?';
- }
- if (*++cp == ':') {
- if (argv[optind][2] != '\0')
- optarg = &argv[optind++][sp+1];
- else if (++optind >= argc) {
- ERR (": option requires an argument -- ", c);
- sp = 1;
- return '?';
- } else
- optarg = argv[optind++];
- sp = 1;
- }
- else if (argv[optind][++sp] == '\0') {
- sp = 1;
- optind++;
- }
- return c;
-}