vlmcsd-svn1065-2016-10-12-Hotbird64

src/wingetopt.c

@@ -0,0 +1,76 @@
+/*
+POSIX getopt for Windows
+
+AT&T Public License
+
+Code given out at the 1985 UNIFORUM conference in Dallas.
+*/
+
+#ifdef _MSC_VER
+
+#include "wingetopt.h"
+#include <stdio.h>
+#include <string.h>
+
+#define EOF	(-1)
+#define ERR(s, c)	if(opterr){\
+	char errbuf[2];\
+	errbuf[0] = c; errbuf[1] = '\n';\
+	fputs(argv[0], stderr);\
+	fputs(s, stderr);\
+	fputc(c, stderr);}
+//(void) write(2, argv[0], (unsigned)strlen(argv[0]));\
+	//(void) write(2, s, (unsigned)strlen(s));\
+	//(void) write(2, errbuf, 2);}
+
+int	opterr = 1;
+int	optind = 1;
+int	optopt;
+char	*optarg;
+
+int getopt(int argc, char * const argv[], const 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 = strchr(opts, c)) == NULL) {
+			ERR(": illegal option -- ", (char)c);
+			if (argv[optind][++sp] == '\0') {
+				optind++;
+				sp = 1;
+			}
+			return('?');
+		}
+		if (*++cp == ':') {
+			if (argv[optind][sp + 1] != '\0')
+				optarg = (char*)&argv[optind++][sp + 1];
+			else if (++optind >= argc) {
+				ERR(": option requires an argument -- ", (char)c);
+				sp = 1;
+				return('?');
+			}
+			else
+				optarg = (char*)argv[optind++];
+			sp = 1;
+		}
+		else {
+			if (argv[optind][++sp] == '\0') {
+				sp = 1;
+				optind++;
+			}
+			optarg = NULL;
+		}
+		return(c);
+}
+
+#endif  /* __GNUC__ */