1 /* 2 * Copyright (c) 1987, 1993 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.1 (Berkeley) 6/4/93"; 36 #endif /* LIBC_SCCS and not lint */ 37 38 #ifndef __STDC__ 39 #define const 40 #endif 41 #include <stdio.h> 42 #include <stdlib.h> 43 #include <string.h> 44 45 /* 46 * get option letter from argument vector 47 */ 48 int opterr = 1, /* if error message should be printed */ 49 optind = 1, /* index into parent argv vector */ 50 optopt, /* character checked for validity */ 51 optreset; /* reset getopt */ 52 char *optarg; /* argument associated with option */ 53 54 #define BADCH (int)'?' 55 #define BADARG (int)':' 56 #define EMSG "" 57 58 int 59 getopt(nargc, nargv, ostr) 60 int nargc; 61 char * const *nargv; 62 const char *ostr; 63 { 64 static char *place = EMSG; /* option letter processing */ 65 char *oli; /* option letter list index */ 66 char *p; 67 68 if (optreset || !*place) { /* update scanning pointer */ 69 optreset = 0; 70 if (optind >= nargc || *(place = nargv[optind]) != '-') { 71 place = EMSG; 72 return(-1); 73 } 74 if (place[1] && *++place == '-') { /* found "--" */ 75 ++optind; 76 place = EMSG; 77 return(-1); 78 } 79 } /* option letter okay? */ 80 if ((optopt = (int)*place++) == (int)':' || 81 !(oli = strchr(ostr, optopt))) { 82 /* 83 * if the user didn't specify '-' as an option, 84 * assume it means -1 (EOF). 85 */ 86 if (optopt == (int)'-') 87 return(-1); 88 if (!*place) 89 ++optind; 90 if (opterr && *ostr != ':') { 91 if (!(p = strrchr(*nargv, '/'))) 92 p = *nargv; 93 else 94 ++p; 95 fprintf(stderr, "%s: illegal option -- %c\n", 96 p, optopt); 97 } 98 return(BADCH); 99 } 100 if (*++oli != ':') { /* don't need argument */ 101 optarg = NULL; 102 if (!*place) 103 ++optind; 104 } 105 else { /* need an argument */ 106 if (*place) /* no white space */ 107 optarg = place; 108 else if (nargc <= ++optind) { /* no arg */ 109 place = EMSG; 110 if (!(p = strrchr(*nargv, '/'))) 111 p = *nargv; 112 else 113 ++p; 114 if (*ostr == ':') 115 return(BADARG); 116 if (opterr) 117 fprintf(stderr, 118 "%s: option requires an argument -- %c\n", 119 p, optopt); 120 return(BADCH); 121 } 122 else /* white space */ 123 optarg = nargv[optind]; 124 place = EMSG; 125 ++optind; 126 } 127 return(optopt); /* dump back option letter */ 128 } 129