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