xref: /illumos-gate/usr/src/cmd/mdb/common/libstand/getopt.c (revision f875b4ebb1dd9fdbeb043557cab38ab3bf7f6e01)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License, Version 1.0 only
6  * (the "License").  You may not use this file except in compliance
7  * with the License.
8  *
9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10  * or http://www.opensolaris.org/os/licensing.
11  * See the License for the specific language governing permissions
12  * and limitations under the License.
13  *
14  * When distributing Covered Code, include this CDDL HEADER in each
15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16  * If applicable, add the following below this CDDL HEADER, with the
17  * fields enclosed by brackets "[]" replaced with your own identifying
18  * information: Portions Copyright [yyyy] [name of copyright owner]
19  *
20  * CDDL HEADER END
21  */
22 /*
23  * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 #pragma ident	"%Z%%M%	%I%	%E% SMI"
28 
29 #include <sys/salib.h>
30 
31 #define	EOF	(-1)
32 
33 int opterr = 1, optind = 1, optopt = 0;
34 char *optarg = NULL;
35 int _sp = 1;
36 
37 extern void warn(const char *, ...);
38 
39 void
40 getopt_reset(void)
41 {
42 	opterr = 1;
43 	optind = 1;
44 	optopt = 0;
45 	optarg = NULL;
46 	_sp = 1;
47 }
48 
49 int
50 getopt(int argc, char *const *argv, const char *opts)
51 {
52 	char c;
53 	char *cp;
54 
55 	if (_sp == 1) {
56 		if (optind >= argc || argv[optind][0] != '-' ||
57 		    argv[optind] == NULL || argv[optind][1] == '\0')
58 			return (EOF);
59 		else if (strcmp(argv[optind], "--") == NULL) {
60 			optind++;
61 			return (EOF);
62 		}
63 	}
64 	optopt = c = (unsigned char)argv[optind][_sp];
65 	if (c == ':' || (cp = strchr(opts, c)) == NULL) {
66 		if (opts[0] != ':')
67 			warn("%s: illegal option -- %c\n", argv[0], c);
68 		if (argv[optind][++_sp] == '\0') {
69 			optind++;
70 			_sp = 1;
71 		}
72 		return ('?');
73 	}
74 
75 	if (*(cp + 1) == ':') {
76 		if (argv[optind][_sp+1] != '\0')
77 			optarg = &argv[optind++][_sp+1];
78 		else if (++optind >= argc) {
79 			if (opts[0] != ':') {
80 				warn("%s: option requires an argument"
81 				    " -- %c\n", argv[0], c);
82 			}
83 			_sp = 1;
84 			optarg = NULL;
85 			return (opts[0] == ':' ? ':' : '?');
86 		} else
87 			optarg = argv[optind++];
88 		_sp = 1;
89 	} else {
90 		if (argv[optind][++_sp] == '\0') {
91 			_sp = 1;
92 			optind++;
93 		}
94 		optarg = NULL;
95 	}
96 	return (c);
97 }
98