xref: /freebsd/contrib/mandoc/compat_getsubopt.c (revision 0957b409)
1 #include "config.h"
2 
3 #if HAVE_GETSUBOPT
4 
5 int dummy;
6 
7 #else
8 
9 /*	$Id: compat_getsubopt.c,v 1.5 2014/08/17 20:53:50 schwarze Exp $	*/
10 /*	$OpenBSD: getsubopt.c,v 1.4 2005/08/08 08:05:36 espie Exp $	*/
11 
12 /*-
13  * Copyright (c) 1990, 1993
14  *	The Regents of the University of California.  All rights reserved.
15  *
16  * Redistribution and use in source and binary forms, with or without
17  * modification, are permitted provided that the following conditions
18  * are met:
19  * 1. Redistributions of source code must retain the above copyright
20  *    notice, this list of conditions and the following disclaimer.
21  * 2. Redistributions in binary form must reproduce the above copyright
22  *    notice, this list of conditions and the following disclaimer in the
23  *    documentation and/or other materials provided with the distribution.
24  * 3. Neither the name of the University nor the names of its contributors
25  *    may be used to endorse or promote products derived from this software
26  *    without specific prior written permission.
27  *
28  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
29  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
30  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
31  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
32  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
33  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
34  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
36  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
37  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38  * SUCH DAMAGE.
39  */
40 
41 #include <unistd.h>
42 #include <stdlib.h>
43 #include <string.h>
44 
45 int
46 getsubopt(char **optionp, char * const *tokens, char **valuep)
47 {
48 	int cnt;
49 	char *suboptarg;
50 	char *p;
51 
52 	suboptarg = *valuep = NULL;
53 
54 	if (!optionp || !*optionp)
55 		return(-1);
56 
57 	/* skip leading white-space, commas */
58 	for (p = *optionp; *p && (*p == ',' || *p == ' ' || *p == '\t'); ++p);
59 
60 	if (!*p) {
61 		*optionp = p;
62 		return(-1);
63 	}
64 
65 	/* save the start of the token, and skip the rest of the token. */
66 	for (suboptarg = p;
67 	    *++p && *p != ',' && *p != '=' && *p != ' ' && *p != '\t';);
68 
69 	if (*p) {
70 		/*
71 		 * If there's an equals sign, set the value pointer, and
72 		 * skip over the value part of the token.  Terminate the
73 		 * token.
74 		 */
75 		if (*p == '=') {
76 			*p = '\0';
77 			for (*valuep = ++p;
78 			    *p && *p != ',' && *p != ' ' && *p != '\t'; ++p);
79 			if (*p)
80 				*p++ = '\0';
81 		} else
82 			*p++ = '\0';
83 		/* Skip any whitespace or commas after this token. */
84 		for (; *p && (*p == ',' || *p == ' ' || *p == '\t'); ++p);
85 	}
86 
87 	/* set optionp for next round. */
88 	*optionp = p;
89 
90 	for (cnt = 0; *tokens; ++tokens, ++cnt)
91 		if (!strcmp(suboptarg, *tokens))
92 			return(cnt);
93 	return(-1);
94 }
95 
96 #endif
97