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.1.1.1 2001/06/09 00:28:12 zarzycki Exp $ 33 */ 34 35 #include <sys/types.h> 36 37 #include <stdio.h> 38 #include <string.h> 39 #include <synch.h> 40 #include <libintl.h> 41 42 #include <cflib.h> 43 #include <netsmb/smb_lib.h> 44 #include <assert.h> 45 46 /* lock for the variables below */ 47 mutex_t cf_opt_mutex = DEFAULTMUTEX; 48 49 int cf_opterr = 1, /* if error message should be printed */ 50 cf_optind = 1, /* index into parent argv vector */ 51 cf_optopt, /* character checked for validity */ 52 cf_optreset; /* reset getopt */ 53 const char *cf_optarg; /* argument associated with option */ 54 55 #define BADCH (int)'?' 56 #define BADARG (int)':' 57 #define EMSG "" 58 59 void 60 cf_opt_lock(void) 61 { 62 mutex_lock(&cf_opt_mutex); 63 } 64 65 void 66 cf_opt_unlock(void) 67 { 68 mutex_unlock(&cf_opt_mutex); 69 } 70 71 int 72 cf_getopt(nargc, nargv, ostr) 73 int nargc; 74 char * const *nargv; 75 const char *ostr; 76 { 77 static const char *place = EMSG; /* option letter processing */ 78 char *oli; /* option letter list index */ 79 int tmpind; 80 81 assert(MUTEX_HELD(&cf_opt_mutex)); 82 83 if (cf_optreset || !*place) { /* update scanning pointer */ 84 cf_optreset = 0; 85 tmpind = cf_optind; 86 for (;;) { 87 if (tmpind >= nargc) { 88 place = EMSG; 89 return (-1); 90 } 91 if (*(place = nargv[tmpind]) != '-') { 92 tmpind++; 93 continue; /* lookup next option */ 94 } 95 if (place[1] && *++place == '-') { /* found "--" */ 96 cf_optind = ++tmpind; 97 place = EMSG; 98 return (-1); 99 } 100 cf_optind = tmpind; 101 break; 102 } 103 } /* option letter okay? */ 104 if ((cf_optopt = (int)*place++) == (int)':' || 105 !(oli = strchr(ostr, cf_optopt))) { 106 /* 107 * if the user didn't specify '-' as an option, 108 * assume it means -1. 109 */ 110 if (cf_optopt == (int)'-') 111 return (-1); 112 if (!*place) 113 ++cf_optind; 114 if (cf_opterr && *ostr != ':') 115 (void) fprintf(stderr, dgettext(TEXT_DOMAIN, 116 "%s: illegal option -- %c\n"), 117 __progname, cf_optopt); 118 return (BADCH); 119 } 120 if (*++oli != ':') { /* don't need argument */ 121 cf_optarg = NULL; 122 if (!*place) 123 ++cf_optind; 124 } else { /* need an argument */ 125 if (*place) /* no white space */ 126 cf_optarg = place; 127 else if (nargc <= ++cf_optind) { /* no arg */ 128 place = EMSG; 129 if (*ostr == ':') 130 return (BADARG); 131 if (cf_opterr) 132 (void) fprintf(stderr, dgettext(TEXT_DOMAIN, 133 "%s: option requires an argument -- %c\n"), 134 __progname, cf_optopt); 135 return (BADCH); 136 } else /* white space */ 137 cf_optarg = nargv[cf_optind]; 138 place = EMSG; 139 ++cf_optind; 140 } 141 return (cf_optopt); /* dump back option letter */ 142 } 143