diff options
author | Igor Pashev <pashev.igor@gmail.com> | 2012-06-24 22:28:35 +0000 |
---|---|---|
committer | Igor Pashev <pashev.igor@gmail.com> | 2012-06-24 22:28:35 +0000 |
commit | 3950ffe2a485479f6561c27364d3d7df5a21d124 (patch) | |
tree | 468c6e14449d1b1e279222ec32f676b0311917d2 /src/lib/libast/comp/getsubopt.c | |
download | ksh-upstream.tar.gz |
Imported Upstream version 93u+upstream
Diffstat (limited to 'src/lib/libast/comp/getsubopt.c')
-rw-r--r-- | src/lib/libast/comp/getsubopt.c | 84 |
1 files changed, 84 insertions, 0 deletions
diff --git a/src/lib/libast/comp/getsubopt.c b/src/lib/libast/comp/getsubopt.c new file mode 100644 index 0000000..9d7162c --- /dev/null +++ b/src/lib/libast/comp/getsubopt.c @@ -0,0 +1,84 @@ +/*********************************************************************** +* * +* This software is part of the ast package * +* Copyright (c) 1985-2011 AT&T Intellectual Property * +* and is licensed under the * +* Eclipse Public License, Version 1.0 * +* by AT&T Intellectual Property * +* * +* A copy of the License is available at * +* http://www.eclipse.org/org/documents/epl-v10.html * +* (with md5 checksum b35adb5213ca9657e911e9befb180842) * +* * +* Information and Software Systems Research * +* AT&T Research * +* Florham Park NJ * +* * +* Glenn Fowler <gsf@research.att.com> * +* David Korn <dgk@research.att.com> * +* Phong Vo <kpv@research.att.com> * +* * +***********************************************************************/ +#pragma prototyped +/* + * Xopen 4.2 compatibility + */ + +#include <ast.h> + +#undef _lib_getsubopt /* we can satisfy the api */ + +#if _lib_getsubopt + +NoN(getsubopt) + +#else + +#undef _BLD_ast /* enable ast imports since we're user static */ + +#include <error.h> + +extern int +getsubopt(register char** op, char* const* tp, char** vp) +{ + register char* b; + register char* s; + register char* v; + + if (*(b = *op)) + { + v = 0; + s = b; + for (;;) + { + switch (*s++) + { + case 0: + s--; + break; + case ',': + *(s - 1) = 0; + break; + case '=': + if (!v) + { + *(s - 1) = 0; + v = s; + } + continue; + default: + continue; + } + break; + } + *op = s; + *vp = v; + for (op = (char**)tp; *op; op++) + if (streq(b, *op)) + return op - (char**)tp; + } + *vp = b; + return -1; +} + +#endif |