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