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