xref: /illumos-gate/usr/src/contrib/ast/src/lib/libast/comp/getsubopt.c (revision b30d193948be5a7794d7ae3ba0ed9c2f72c88e0f)
1*b30d1939SAndy Fiddaman /***********************************************************************
2*b30d1939SAndy Fiddaman *                                                                      *
3*b30d1939SAndy Fiddaman *               This software is part of the ast package               *
4*b30d1939SAndy Fiddaman *          Copyright (c) 1985-2011 AT&T Intellectual Property          *
5*b30d1939SAndy Fiddaman *                      and is licensed under the                       *
6*b30d1939SAndy Fiddaman *                 Eclipse Public License, Version 1.0                  *
7*b30d1939SAndy Fiddaman *                    by AT&T Intellectual Property                     *
8*b30d1939SAndy Fiddaman *                                                                      *
9*b30d1939SAndy Fiddaman *                A copy of the License is available at                 *
10*b30d1939SAndy Fiddaman *          http://www.eclipse.org/org/documents/epl-v10.html           *
11*b30d1939SAndy Fiddaman *         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *
12*b30d1939SAndy Fiddaman *                                                                      *
13*b30d1939SAndy Fiddaman *              Information and Software Systems Research               *
14*b30d1939SAndy Fiddaman *                            AT&T Research                             *
15*b30d1939SAndy Fiddaman *                           Florham Park NJ                            *
16*b30d1939SAndy Fiddaman *                                                                      *
17*b30d1939SAndy Fiddaman *                 Glenn Fowler <gsf@research.att.com>                  *
18*b30d1939SAndy Fiddaman *                  David Korn <dgk@research.att.com>                   *
19*b30d1939SAndy Fiddaman *                   Phong Vo <kpv@research.att.com>                    *
20*b30d1939SAndy Fiddaman *                                                                      *
21*b30d1939SAndy Fiddaman ***********************************************************************/
22*b30d1939SAndy Fiddaman #pragma prototyped
23*b30d1939SAndy Fiddaman /*
24*b30d1939SAndy Fiddaman  * Xopen 4.2 compatibility
25*b30d1939SAndy Fiddaman  */
26*b30d1939SAndy Fiddaman 
27*b30d1939SAndy Fiddaman #include <ast.h>
28*b30d1939SAndy Fiddaman 
29*b30d1939SAndy Fiddaman #undef	_lib_getsubopt	/* we can satisfy the api */
30*b30d1939SAndy Fiddaman 
31*b30d1939SAndy Fiddaman #if _lib_getsubopt
32*b30d1939SAndy Fiddaman 
33*b30d1939SAndy Fiddaman NoN(getsubopt)
34*b30d1939SAndy Fiddaman 
35*b30d1939SAndy Fiddaman #else
36*b30d1939SAndy Fiddaman 
37*b30d1939SAndy Fiddaman #undef	_BLD_ast	/* enable ast imports since we're user static */
38*b30d1939SAndy Fiddaman 
39*b30d1939SAndy Fiddaman #include <error.h>
40*b30d1939SAndy Fiddaman 
41*b30d1939SAndy Fiddaman extern int
42*b30d1939SAndy Fiddaman getsubopt(register char** op, char* const* tp, char** vp)
43*b30d1939SAndy Fiddaman {
44*b30d1939SAndy Fiddaman 	register char*	b;
45*b30d1939SAndy Fiddaman 	register char*	s;
46*b30d1939SAndy Fiddaman 	register char*	v;
47*b30d1939SAndy Fiddaman 
48*b30d1939SAndy Fiddaman 	if (*(b = *op))
49*b30d1939SAndy Fiddaman 	{
50*b30d1939SAndy Fiddaman 		v = 0;
51*b30d1939SAndy Fiddaman 		s = b;
52*b30d1939SAndy Fiddaman 		for (;;)
53*b30d1939SAndy Fiddaman 		{
54*b30d1939SAndy Fiddaman 			switch (*s++)
55*b30d1939SAndy Fiddaman 			{
56*b30d1939SAndy Fiddaman 			case 0:
57*b30d1939SAndy Fiddaman 				s--;
58*b30d1939SAndy Fiddaman 				break;
59*b30d1939SAndy Fiddaman 			case ',':
60*b30d1939SAndy Fiddaman 				*(s - 1) = 0;
61*b30d1939SAndy Fiddaman 				break;
62*b30d1939SAndy Fiddaman 			case '=':
63*b30d1939SAndy Fiddaman 				if (!v)
64*b30d1939SAndy Fiddaman 				{
65*b30d1939SAndy Fiddaman 					*(s - 1) = 0;
66*b30d1939SAndy Fiddaman 					v = s;
67*b30d1939SAndy Fiddaman 				}
68*b30d1939SAndy Fiddaman 				continue;
69*b30d1939SAndy Fiddaman 			default:
70*b30d1939SAndy Fiddaman 				continue;
71*b30d1939SAndy Fiddaman 			}
72*b30d1939SAndy Fiddaman 			break;
73*b30d1939SAndy Fiddaman 		}
74*b30d1939SAndy Fiddaman 		*op = s;
75*b30d1939SAndy Fiddaman 		*vp = v;
76*b30d1939SAndy Fiddaman 		for (op = (char**)tp; *op; op++)
77*b30d1939SAndy Fiddaman 			if (streq(b, *op))
78*b30d1939SAndy Fiddaman 				return op - (char**)tp;
79*b30d1939SAndy Fiddaman 	}
80*b30d1939SAndy Fiddaman 	*vp = b;
81*b30d1939SAndy Fiddaman 	return -1;
82*b30d1939SAndy Fiddaman }
83*b30d1939SAndy Fiddaman 
84*b30d1939SAndy Fiddaman #endif
85