elf.h: add ELFCOMPRESS_ZSTD
[musl] / src / misc / getopt_long.c
index 469ee92..6949ab1 100644 (file)
@@ -1,7 +1,11 @@
 #define _GNU_SOURCE
 #include <stddef.h>
+#include <stdlib.h>
+#include <limits.h>
 #include <getopt.h>
 #include <stdio.h>
+#include <string.h>
+#include "stdio_impl.h"
 
 extern int __optpos, __optreset;
 
@@ -31,10 +35,7 @@ static int __getopt_long(int argc, char *const *argv, const char *optstring, con
                int i;
                for (i=optind; ; i++) {
                        if (i >= argc || !argv[i]) return -1;
-                       if (argv[i][0] != '-') continue;
-                       if (!argv[i][1]) continue;
-                       if (argv[i][1] == '-' && !argv[i][2]) return -1;
-                       break;
+                       if (argv[i][0] == '-' && argv[i][1]) break;
                }
                optind = i;
        }
@@ -51,19 +52,22 @@ static int __getopt_long(int argc, char *const *argv, const char *optstring, con
 
 static int __getopt_long_core(int argc, char *const *argv, const char *optstring, const struct option *longopts, int *idx, int longonly)
 {
-
-       if (argv[optind][0] == '-' &&
-               ((longonly && argv[optind][1]) ||
+       optarg = 0;
+       if (longopts && argv[optind][0] == '-' &&
+               ((longonly && argv[optind][1] && argv[optind][1] != '-') ||
                 (argv[optind][1] == '-' && argv[optind][2])))
        {
+               int colon = optstring[optstring[0]=='+'||optstring[0]=='-']==':';
                int i, cnt, match;
-               char *opt;
+               char *arg, *opt, *start = argv[optind]+1;
                for (cnt=i=0; longopts[i].name; i++) {
                        const char *name = longopts[i].name;
-                       opt = argv[optind]+1;
+                       opt = start;
                        if (*opt == '-') opt++;
-                       for (; *name && *name == *opt; name++, opt++);
+                       while (*opt && *opt != '=' && *opt == *name)
+                               name++, opt++;
                        if (*opt && *opt != '=') continue;
+                       arg = opt;
                        match = i;
                        if (!*name) {
                                cnt = 1;
@@ -71,18 +75,45 @@ static int __getopt_long_core(int argc, char *const *argv, const char *optstring
                        }
                        cnt++;
                }
+               if (cnt==1 && longonly && arg-start == mblen(start, MB_LEN_MAX)) {
+                       int l = arg-start;
+                       for (i=0; optstring[i]; i++) {
+                               int j;
+                               for (j=0; j<l && start[j]==optstring[i+j]; j++);
+                               if (j==l) {
+                                       cnt++;
+                                       break;
+                               }
+                       }
+               }
                if (cnt==1) {
                        i = match;
+                       opt = arg;
                        optind++;
                        if (*opt == '=') {
-                               if (!longopts[i].has_arg) return '?';
+                               if (!longopts[i].has_arg) {
+                                       optopt = longopts[i].val;
+                                       if (colon || !opterr)
+                                               return '?';
+                                       __getopt_msg(argv[0],
+                                               ": option does not take an argument: ",
+                                               longopts[i].name,
+                                               strlen(longopts[i].name));
+                                       return '?';
+                               }
                                optarg = opt+1;
-                       } else {
-                               if (longopts[i].has_arg == required_argument) {
-                                       if (!(optarg = argv[optind]))
-                                               return ':';
-                                       optind++;
-                               } else optarg = NULL;
+                       } else if (longopts[i].has_arg == required_argument) {
+                               if (!(optarg = argv[optind])) {
+                                       optopt = longopts[i].val;
+                                       if (colon) return ':';
+                                       if (!opterr) return '?';
+                                       __getopt_msg(argv[0],
+                                               ": option requires an argument: ",
+                                               longopts[i].name,
+                                               strlen(longopts[i].name));
+                                       return '?';
+                               }
+                               optind++;
                        }
                        if (idx) *idx = i;
                        if (longopts[i].flag) {
@@ -92,6 +123,13 @@ static int __getopt_long_core(int argc, char *const *argv, const char *optstring
                        return longopts[i].val;
                }
                if (argv[optind][1] == '-') {
+                       optopt = 0;
+                       if (!colon && opterr)
+                               __getopt_msg(argv[0], cnt ?
+                                       ": option is ambiguous: " :
+                                       ": unrecognized option: ",
+                                       argv[optind]+2,
+                                       strlen(argv[optind]+2));
                        optind++;
                        return '?';
                }