1 #include <config.h>
2
3 /*
4 * $Id: getopt.c,v 1.2 2001/12/04 02:06:35 rjs3 Exp $
5 * Copyright (c) 1987, 1993, 1994
6 * The Regents of the University of California. All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 */
36
37 #if defined(LIBC_SCCS) && !defined(lint)
38 static char sccsid[] = "@(#)getopt.c 8.2 (Berkeley) 4/2/94";
39 #endif /* LIBC_SCCS and not lint */
40
41 #include <stdio.h>
42 #include <stdlib.h>
43 #include <string.h>
44
45 int opterr = 1, /* if error message should be printed */
46 optind = 1, /* index into parent argv vector */
47 optopt, /* character checked for validity */
48 optreset; /* reset getopt */
49 char *optarg; /* argument associated with option */
50
51 #define BADCH (int)'?'
52 #define BADARG (int)':'
53 #define EMSG ""
54
55 /*
56 * getopt --
57 * Parse argc/argv argument vector.
58 */
59 int
getopt(int nargc,char * const * nargv,const char * ostr)60 getopt(
61 int nargc,
62 char * const *nargv,
63 const char *ostr)
64 {
65 extern char *__progname;
66 static char *place = EMSG; /* option letter processing */
67 char *oli; /* option letter list index */
68
69 if (optreset || !*place) { /* update scanning pointer */
70 optreset = 0;
71 if (optind >= nargc || *(place = nargv[optind]) != '-') {
72 place = EMSG;
73 return (EOF);
74 }
75 if (place[1] && *++place == '-') { /* found "--" */
76 ++optind;
77 place = EMSG;
78 return (EOF);
79 }
80 } /* option letter okay? */
81 if ((optopt = (int)*place++) == (int)':' ||
82 !(oli = strchr(ostr, optopt))) {
83 /*
84 * if the user didn't specify '-' as an option,
85 * assume it means EOF.
86 */
87 if (optopt == (int)'-')
88 return (EOF);
89 if (!*place)
90 ++optind;
91 if (opterr && *ostr != ':')
92 (void)fprintf(stderr,
93 "%s: illegal option -- %c\n", __progname, optopt);
94 return (BADCH);
95 }
96 if (*++oli != ':') { /* don't need argument */
97 optarg = NULL;
98 if (!*place)
99 ++optind;
100 }
101 else { /* need an argument */
102 if (*place) /* no white space */
103 optarg = place;
104 else if (nargc <= ++optind) { /* no arg */
105 place = EMSG;
106 if (*ostr == ':')
107 return (BADARG);
108 if (opterr)
109 (void)fprintf(stderr,
110 "%s: option requires an argument -- %c\n",
111 __progname, optopt);
112 return (BADCH);
113 }
114 else /* white space */
115 optarg = nargv[optind];
116 place = EMSG;
117 ++optind;
118 }
119 return (optopt); /* dump back option letter */
120 }
121