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 #include <ast.h> 25*b30d1939SAndy Fiddaman 26*b30d1939SAndy Fiddaman #undef _lib_getopt /* we can satisfy the api */ 27*b30d1939SAndy Fiddaman 28*b30d1939SAndy Fiddaman #if _lib_getopt 29*b30d1939SAndy Fiddaman 30*b30d1939SAndy Fiddaman NoN(getopt) 31*b30d1939SAndy Fiddaman 32*b30d1939SAndy Fiddaman #else 33*b30d1939SAndy Fiddaman 34*b30d1939SAndy Fiddaman #undef _BLD_ast /* enable ast imports since we're user static */ 35*b30d1939SAndy Fiddaman 36*b30d1939SAndy Fiddaman #include <error.h> 37*b30d1939SAndy Fiddaman #include <option.h> 38*b30d1939SAndy Fiddaman 39*b30d1939SAndy Fiddaman int opterr = 1; 40*b30d1939SAndy Fiddaman int optind = 1; 41*b30d1939SAndy Fiddaman int optopt = 0; 42*b30d1939SAndy Fiddaman char* optarg = 0; 43*b30d1939SAndy Fiddaman 44*b30d1939SAndy Fiddaman static int lastoptind; 45*b30d1939SAndy Fiddaman 46*b30d1939SAndy Fiddaman extern int 47*b30d1939SAndy Fiddaman getopt(int argc, char* const* argv, const char* optstring) 48*b30d1939SAndy Fiddaman { 49*b30d1939SAndy Fiddaman int n; 50*b30d1939SAndy Fiddaman 51*b30d1939SAndy Fiddaman NoP(argc); 52*b30d1939SAndy Fiddaman opt_info.index = (optind > 1 || optind == lastoptind) ? optind : 0; 53*b30d1939SAndy Fiddaman if (opt_info.index >= argc) 54*b30d1939SAndy Fiddaman return -1; 55*b30d1939SAndy Fiddaman switch (n = optget((char**)argv, optstring)) 56*b30d1939SAndy Fiddaman { 57*b30d1939SAndy Fiddaman case ':': 58*b30d1939SAndy Fiddaman n = '?'; 59*b30d1939SAndy Fiddaman /*FALLTHROUGH*/ 60*b30d1939SAndy Fiddaman case '?': 61*b30d1939SAndy Fiddaman if (opterr && (!optstring || *optstring != ':')) 62*b30d1939SAndy Fiddaman { 63*b30d1939SAndy Fiddaman if (!error_info.id) 64*b30d1939SAndy Fiddaman error_info.id = argv[0]; 65*b30d1939SAndy Fiddaman errormsg(NiL, 2, opt_info.arg); 66*b30d1939SAndy Fiddaman } 67*b30d1939SAndy Fiddaman optopt = opt_info.option[1]; 68*b30d1939SAndy Fiddaman break; 69*b30d1939SAndy Fiddaman case 0: 70*b30d1939SAndy Fiddaman n = -1; 71*b30d1939SAndy Fiddaman break; 72*b30d1939SAndy Fiddaman } 73*b30d1939SAndy Fiddaman optarg = opt_info.arg; 74*b30d1939SAndy Fiddaman lastoptind = optind = opt_info.index; 75*b30d1939SAndy Fiddaman return n; 76*b30d1939SAndy Fiddaman } 77*b30d1939SAndy Fiddaman 78*b30d1939SAndy Fiddaman #endif 79