1 /* 2 * Copyright (c) 2000, Boris Popov 3 * 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 Boris Popov. 16 * 4. Neither the name of the author nor the names of any co-contributors 17 * may be used to endorse or promote products derived from this software 18 * without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30 * SUCH DAMAGE. 31 * 32 * $Id: cfopt.c,v 1.3 2000/07/11 01:51:49 bp Exp $ 33 */ 34 #include <sys/param.h> 35 36 #include <stdio.h> 37 #include <string.h> 38 39 #include <cflib.h> 40 41 extern char *__progname; 42 43 int cf_opterr = 1, /* if error message should be printed */ 44 cf_optind = 1, /* index into parent argv vector */ 45 cf_optopt, /* character checked for validity */ 46 cf_optreset; /* reset getopt */ 47 const char* cf_optarg; /* argument associated with option */ 48 49 #define BADCH (int)'?' 50 #define BADARG (int)':' 51 #define EMSG "" 52 53 int 54 cf_getopt(int nargc, char * const *nargv, const char *ostr) 55 { 56 static const char *place = EMSG; /* option letter processing */ 57 char *oli; /* option letter list index */ 58 int tmpind; 59 60 if (cf_optreset || !*place) { /* update scanning pointer */ 61 cf_optreset = 0; 62 tmpind = cf_optind; 63 while (1) { 64 if (tmpind >= nargc) { 65 place = EMSG; 66 return (-1); 67 } 68 if (*(place = nargv[tmpind]) != '-') { 69 tmpind++; 70 continue; /* lookup next option */ 71 } 72 if (place[1] && *++place == '-') { /* found "--" */ 73 cf_optind = ++tmpind; 74 place = EMSG; 75 return (-1); 76 } 77 cf_optind = tmpind; 78 break; 79 } 80 } /* option letter okay? */ 81 if ((cf_optopt = (int)*place++) == (int)':' || 82 !(oli = strchr(ostr, cf_optopt))) { 83 /* 84 * if the user didn't specify '-' as an option, 85 * assume it means -1. 86 */ 87 if (cf_optopt == (int)'-') 88 return (-1); 89 if (!*place) 90 ++cf_optind; 91 if (cf_opterr && *ostr != ':') 92 (void)fprintf(stderr, 93 "%s: illegal option -- %c\n", __progname, cf_optopt); 94 return (BADCH); 95 } 96 if (*++oli != ':') { /* don't need argument */ 97 cf_optarg = NULL; 98 if (!*place) 99 ++cf_optind; 100 } 101 else { /* need an argument */ 102 if (*place) /* no white space */ 103 cf_optarg = place; 104 else if (nargc <= ++cf_optind) { /* no arg */ 105 place = EMSG; 106 if (*ostr == ':') 107 return (BADARG); 108 if (cf_opterr) 109 (void)fprintf(stderr, 110 "%s: option requires an argument -- %c\n", 111 __progname, cf_optopt); 112 return (BADCH); 113 } 114 else /* white space */ 115 cf_optarg = nargv[cf_optind]; 116 place = EMSG; 117 ++cf_optind; 118 } 119 return (cf_optopt); /* dump back option letter */ 120 } 121