libc/newlib/libc/sys/linux/getoptlong.c

65 lines
1.5 KiB
C

#include <unistd.h>
#include <string.h>
#include <getopt.h>
/* Written 2000 by Werner Almesberger */
static const char *__resume;
int getopt_long(int argc,char *const argv[],const char *optstring,
const struct option *longopts,int *longindex)
{
char *here;
optarg = NULL;
if (!__resume) {
if (argc == optind || *argv[optind] != '-') return -1;
if (argv[optind][1] == '-') {
const struct option *opt;
optarg = strchr(argv[optind],'=');
if (optarg) optarg++;
for (opt = longopts; opt->name &&
(optarg || strcmp(opt->name,argv[optind]+2)) &&
(!optarg || strlen(opt->name) != optarg-argv[optind]-3 ||
strncmp(opt->name,argv[optind]+2,optarg-argv[optind]-3));
opt++);
optind++;
if (!opt->name) return '?';
if ((opt->has_arg == no_argument && optarg) ||
(opt->has_arg == required_argument && !optarg)) return ':';
if (longindex) *longindex = opt-longopts;
if (!opt->flag) return opt->val;
*opt->flag = opt->val;
return 0;
}
else {
__resume = argv[optind]+1;
}
}
here = strchr(optstring,*__resume);
if (!here) {
optind++;
__resume = NULL;
return '?';
}
if (here[1] != ':') {
if (!*++__resume) __resume = NULL;
}
else {
if (__resume[1]) optarg = (char *) __resume+1;
else {
optarg = (char *) argv[++optind];
if (optind == argc || *argv[optind] == '-') {
optind++;
__resume = NULL;
return ':';
}
}
__resume = NULL;
}
if (!__resume) optind++;
return *here;
}