Return to getopt.c CVS log | Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / libnet / sample / win32 |
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: }