7 extern int __optpos, __optreset;
9 static void permute(char *const *argv, int dest, int src)
11 char **av = (char **)argv;
14 for (i=src; i>dest; i--)
19 void __getopt_msg(const char *, const char *, const char *, size_t);
21 static int __getopt_long_core(int argc, char *const *argv, const char *optstring, const struct option *longopts, int *idx, int longonly);
23 static int __getopt_long(int argc, char *const *argv, const char *optstring, const struct option *longopts, int *idx, int longonly)
25 int ret, skipped, resumed;
26 const char *optstring2 = optstring + 1;
27 if (!optind || __optreset) {
32 if (optind >= argc || !argv[optind]) return -1;
34 if (optstring[0] != '+' && optstring[0] != '-') {
36 for (i=optind; ; i++) {
37 if (i >= argc || !argv[i]) return -1;
38 if (argv[i][0] == '-' && argv[i][1]) break;
41 optstring2 = optstring;
44 ret = __getopt_long_core(argc, argv, optstring2, longopts, idx, longonly);
45 if (resumed > skipped) {
46 int i, cnt = optind-resumed;
48 permute(argv, skipped, optind-1);
49 optind = skipped + cnt;
54 static int __getopt_long_core(int argc, char *const *argv, const char *optstring, const struct option *longopts, int *idx, int longonly)
57 if (longopts && argv[optind][0] == '-' &&
58 ((longonly && argv[optind][1]) ||
59 (argv[optind][1] == '-' && argv[optind][2])))
63 for (cnt=i=0; longopts[i].name; i++) {
64 const char *name = longopts[i].name;
66 if (*opt == '-') opt++;
67 for (; *name && *name == *opt; name++, opt++);
68 if (*opt && *opt != '=') continue;
79 optopt = longopts[i].val;
81 if (!longopts[i].has_arg) {
82 if (optstring[0] == ':' || !opterr)
85 ": option does not take an argument: ",
87 strlen(longopts[i].name));
92 if (longopts[i].has_arg == required_argument) {
93 if (!(optarg = argv[optind])) {
94 if (optstring[0] == ':' || !opterr)
97 ": option requires an argument: ",
99 strlen(longopts[i].name));
103 } else optarg = NULL;
106 if (longopts[i].flag) {
107 *longopts[i].flag = longopts[i].val;
110 return longopts[i].val;
112 if (argv[optind][1] == '-') {
113 if (optstring[0] != ':' && opterr)
114 __getopt_msg(argv[0], cnt ?
115 ": option is ambiguous: " :
116 ": unrecognized option: ",
118 strlen(argv[optind]+2));
123 return getopt(argc, argv, optstring);
126 int getopt_long(int argc, char *const *argv, const char *optstring, const struct option *longopts, int *idx)
128 return __getopt_long(argc, argv, optstring, longopts, idx, 0);
131 int getopt_long_only(int argc, char *const *argv, const char *optstring, const struct option *longopts, int *idx)
133 return __getopt_long(argc, argv, optstring, longopts, idx, 1);