xref: /titanic_50/usr/src/lib/libsmbfs/smb/cfopt.c (revision bfed486ad8de8b8ebc6345a8e10accae08bf2f45)
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 #pragma ident	"%Z%%M%	%I%	%E% SMI"
36 
37 #include <sys/param.h>
38 
39 #include <stdio.h>
40 #include <string.h>
41 #include <libintl.h>
42 
43 #include <cflib.h>
44 #include <netsmb/smb_lib.h>
45 
46 int	cf_opterr = 1,		/* if error message should be printed */
47 	cf_optind = 1,		/* index into parent argv vector */
48 	cf_optopt,			/* character checked for validity */
49 	cf_optreset;		/* reset getopt */
50 const char *cf_optarg;		/* argument associated with option */
51 
52 #define	BADCH	(int)'?'
53 #define	BADARG	(int)':'
54 #define	EMSG	""
55 
56 int
57 cf_getopt(nargc, nargv, ostr)
58 	int nargc;
59 	char * const *nargv;
60 	const char *ostr;
61 {
62 	static const char *place = EMSG;	/* option letter processing */
63 	char *oli;				/* option letter list index */
64 	int tmpind;
65 
66 	if (cf_optreset || !*place) {		/* update scanning pointer */
67 		cf_optreset = 0;
68 		tmpind = cf_optind;
69 		while (1) {
70 			if (tmpind >= nargc) {
71 				place = EMSG;
72 				return (-1);
73 			}
74 			if (*(place = nargv[tmpind]) != '-') {
75 				tmpind++;
76 				continue;	/* lookup next option */
77 			}
78 			if (place[1] && *++place == '-') {	/* found "--" */
79 				cf_optind = ++tmpind;
80 				place = EMSG;
81 				return (-1);
82 			}
83 			cf_optind = tmpind;
84 			break;
85 		}
86 	}					/* option letter okay? */
87 	if ((cf_optopt = (int)*place++) == (int)':' ||
88 	    !(oli = strchr(ostr, cf_optopt))) {
89 		/*
90 		 * if the user didn't specify '-' as an option,
91 		 * assume it means -1.
92 		 */
93 		if (cf_optopt == (int)'-')
94 			return (-1);
95 		if (!*place)
96 			++cf_optind;
97 		if (cf_opterr && *ostr != ':')
98 			(void) fprintf(stderr, dgettext(TEXT_DOMAIN,
99 			    "%s: illegal option -- %c\n"),
100 			    __progname, cf_optopt);
101 		return (BADCH);
102 	}
103 	if (*++oli != ':') {			/* don't need argument */
104 		cf_optarg = NULL;
105 		if (!*place)
106 			++cf_optind;
107 	} else {					/* need an argument */
108 		if (*place)			/* no white space */
109 			cf_optarg = place;
110 		else if (nargc <= ++cf_optind) {	/* no arg */
111 			place = EMSG;
112 			if (*ostr == ':')
113 				return (BADARG);
114 			if (cf_opterr)
115 				(void) fprintf(stderr, dgettext(TEXT_DOMAIN,
116 				    "%s: option requires an argument -- %c\n"),
117 				    __progname, cf_optopt);
118 			return (BADCH);
119 		} else				/* white space */
120 			cf_optarg = nargv[cf_optind];
121 		place = EMSG;
122 		++cf_optind;
123 	}
124 	return (cf_optopt);			/* dump back option letter */
125 }
126