1 files changed, 70 insertions, 0 deletions
diff --git a/host/examples/getopt/getopt.c b/host/examples/getopt/getopt.c
new file mode 100644
index 000000000..e571ff9c8
--- /dev/null
+++ b/host/examples/getopt/getopt.c
@@ -0,0 +1,70 @@
+/*
+ * This file was copied from the following newsgroup posting:
+ *
+ * Newsgroups: mod.std.unix
+ * Subject: public domain AT&T getopt source
+ * Date: 3 Nov 85 19:34:15 GMT
+ *
+ * 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.
+ */
+
+#include <stdio.h>
+#include <string.h>
+
+#define ERR(szz,czz) if(opterr){fprintf(stderr,"%s%s%c\n",argv[0],szz,czz);}
+
+int opterr = 1;
+int optind = 1;
+int optopt;
+char *optarg;
+
+int
+getopt(int argc, char **argv, char *opts)
+{
+    static int sp;
+    int c;
+    char *cp;
+
+    sp = 1;
+
+    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 -- ", 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);
+}