From 3a941f4ae2213f26118f5cfde03ca793b31ca838 Mon Sep 17 00:00:00 2001 From: Jonathan McCrohan Date: Tue, 8 May 2012 14:52:05 +0100 Subject: Imported Upstream version 2.2.3 --- getopt.c | 104 --------------------------------------------------------------- 1 file changed, 104 deletions(-) delete mode 100644 getopt.c (limited to 'getopt.c') diff --git a/getopt.c b/getopt.c deleted file mode 100644 index 4218991..0000000 --- a/getopt.c +++ /dev/null @@ -1,104 +0,0 @@ -/* - * * @(#)getopt.c 2.3 (smail) 5/30/87 - */ - -/* - * Here's something you've all been waiting for: the AT&T public domain - * source for getopt(3). It is the code which was given out at the 1985 - * UNIFORUM conference in Dallas. I obtained it by electronic mail directly - * from AT&T. The people there assure me that it is indeed in the public - * domain. - * - * There is no manual page. That is because the one they gave out at UNIFORUM - * was slightly different from the current System V Release 2 manual page. - * The difference apparently involved a note about the famous rules 5 and 6, - * recommending using white space between an option and its first argument, - * and not grouping options that have arguments. Getopt itself is currently - * lenient about both of these things White space is allowed, but not - * mandatory, and the last option in a group can have an argument. That - * particular version of the man page evidently has no official existence, - * and my source at AT&T did not send a copy. The current SVR2 man page - * reflects the actual behavior of this getopt. However, I am not about to - * post a copy of anything licensed by AT&T. - */ - -#ifdef BSD - #include -#else - #define index strchr - #include -#endif - -/* LINTLIBRARY */ -#ifndef NULL -#define NULL 0 -#endif - -#define EOF (-1) -#define ERR(s, c) if(opterr){\ - extern int write(int, void *, unsigned);\ - char errbuf[2];\ - errbuf[0] = (char)c; errbuf[1] = '\n';\ - (void) write(2, strlwr(argv[0]), (unsigned)strlen(argv[0]));\ - (void) write(2, s, (unsigned)strlen(s));\ - (void) write(2, errbuf, 2);} - -extern char *index(); - -int opterr = 1; -int optind = 1; -int optopt; -char *optarg; - -int getopt(int argc, char *argv[], char *opts) -{ - static int sp = 1; - register int c; - register char *cp; - - if (sp == 1) - { - if (optind >= argc || argv[optind][0] != '-' || - argv[optind][1] == '\0') - return (EOF); - else if (strcmp(argv[optind], "--") == 0) - { - optind++; - return (EOF); - } - } - optopt = c = argv[optind][sp]; - if (c == ':' || (cp = index(opts, c)) == NULL) - { - ERR(": illegal option -- ", c); - if (argv[optind][++sp] == '\0') - { - optind++; - sp = 1; - } - return ('?'); - } - if (*++cp == ':') - { - if (argv[optind][sp + 1] != '\0') - optarg = &argv[optind++][sp + 1]; - else if (++optind >= argc) - { - ERR(": option requires an argument -- ", c); - sp = 1; - return ('?'); - } - else optarg = argv[optind++]; - sp = 1; - } - else - { - if (argv[optind][++sp] == '\0') - { - sp = 1; - optind++; - } - optarg = NULL; - } - return (c); -} -- cgit v1.2.3