1 #include "git-compat-util.h"
2 #include "parse-options.h"
8 static int parse_options_usage(struct parse_opt_ctx_t
*ctx
,
9 const char * const *usagestr
,
10 const struct option
*opts
, int err
);
15 int optbug(const struct option
*opt
, const char *reason
)
18 return error("BUG: option '%s' %s", opt
->long_name
, reason
);
19 return error("BUG: switch '%c' %s", opt
->short_name
, reason
);
22 static int get_arg(struct parse_opt_ctx_t
*p
, const struct option
*opt
,
23 int flags
, const char **arg
)
28 } else if (p
->argc
== 1 && (opt
->flags
& PARSE_OPT_LASTARG_DEFAULT
)) {
29 *arg
= (const char *)opt
->defval
;
30 } else if (p
->argc
> 1) {
34 return opterror(opt
, "requires a value", flags
);
38 static void fix_filename(const char *prefix
, const char **file
)
40 if (!file
|| !*file
|| !prefix
|| is_absolute_path(*file
)
41 || !strcmp("-", *file
))
43 *file
= xstrdup(prefix_filename(prefix
, strlen(prefix
), *file
));
46 static int opt_command_mode_error(const struct option
*opt
,
47 const struct option
*all_opts
,
50 const struct option
*that
;
51 struct strbuf message
= STRBUF_INIT
;
52 struct strbuf that_name
= STRBUF_INIT
;
55 * Find the other option that was used to set the variable
56 * already, and report that this is not compatible with it.
58 for (that
= all_opts
; that
->type
!= OPTION_END
; that
++) {
60 that
->type
!= OPTION_CMDMODE
||
61 that
->value
!= opt
->value
||
62 that
->defval
!= *(int *)opt
->value
)
66 strbuf_addf(&that_name
, "--%s", that
->long_name
);
68 strbuf_addf(&that_name
, "-%c", that
->short_name
);
69 strbuf_addf(&message
, ": incompatible with %s", that_name
.buf
);
70 strbuf_release(&that_name
);
71 opterror(opt
, message
.buf
, flags
);
72 strbuf_release(&message
);
75 return opterror(opt
, ": incompatible with something else", flags
);
78 static int get_value(struct parse_opt_ctx_t
*p
,
79 const struct option
*opt
,
80 const struct option
*all_opts
,
84 const int unset
= flags
& OPT_UNSET
;
88 return opterror(opt
, "takes no value", flags
);
89 if (unset
&& (opt
->flags
& PARSE_OPT_NONEG
))
90 return opterror(opt
, "isn't available", flags
);
91 if (!(flags
& OPT_SHORT
) && p
->opt
&& (opt
->flags
& PARSE_OPT_NOARG
))
92 return opterror(opt
, "takes no value", flags
);
95 case OPTION_LOWLEVEL_CALLBACK
:
96 return (*(parse_opt_ll_cb
*)opt
->callback
)(p
, opt
, unset
);
100 *(int *)opt
->value
&= ~opt
->defval
;
102 *(int *)opt
->value
|= opt
->defval
;
107 *(int *)opt
->value
|= opt
->defval
;
109 *(int *)opt
->value
&= ~opt
->defval
;
113 *(int *)opt
->value
= unset
? 0 : *(int *)opt
->value
+ 1;
117 *(int *)opt
->value
= unset
? 0 : opt
->defval
;
122 * Giving the same mode option twice, although is unnecessary,
123 * is not a grave error, so let it pass.
125 if (*(int *)opt
->value
&& *(int *)opt
->value
!= opt
->defval
)
126 return opt_command_mode_error(opt
, all_opts
, flags
);
127 *(int *)opt
->value
= opt
->defval
;
131 *(void **)opt
->value
= unset
? NULL
: (void *)opt
->defval
;
136 *(const char **)opt
->value
= NULL
;
137 else if (opt
->flags
& PARSE_OPT_OPTARG
&& !p
->opt
)
138 *(const char **)opt
->value
= (const char *)opt
->defval
;
140 return get_arg(p
, opt
, flags
, (const char **)opt
->value
);
143 case OPTION_FILENAME
:
146 *(const char **)opt
->value
= NULL
;
147 else if (opt
->flags
& PARSE_OPT_OPTARG
&& !p
->opt
)
148 *(const char **)opt
->value
= (const char *)opt
->defval
;
150 err
= get_arg(p
, opt
, flags
, (const char **)opt
->value
);
153 fix_filename(p
->prefix
, (const char **)opt
->value
);
156 case OPTION_CALLBACK
:
158 return (*opt
->callback
)(opt
, NULL
, 1) ? (-1) : 0;
159 if (opt
->flags
& PARSE_OPT_NOARG
)
160 return (*opt
->callback
)(opt
, NULL
, 0) ? (-1) : 0;
161 if (opt
->flags
& PARSE_OPT_OPTARG
&& !p
->opt
)
162 return (*opt
->callback
)(opt
, NULL
, 0) ? (-1) : 0;
163 if (get_arg(p
, opt
, flags
, &arg
))
165 return (*opt
->callback
)(opt
, arg
, 0) ? (-1) : 0;
169 *(int *)opt
->value
= 0;
172 if (opt
->flags
& PARSE_OPT_OPTARG
&& !p
->opt
) {
173 *(int *)opt
->value
= opt
->defval
;
176 if (get_arg(p
, opt
, flags
, &arg
))
178 *(int *)opt
->value
= strtol(arg
, (char **)&s
, 10);
180 return opterror(opt
, "expects a numerical value", flags
);
184 die("should not happen, someone must be hit on the forehead");
188 static int parse_short_opt(struct parse_opt_ctx_t
*p
, const struct option
*options
)
190 const struct option
*all_opts
= options
;
191 const struct option
*numopt
= NULL
;
193 for (; options
->type
!= OPTION_END
; options
++) {
194 if (options
->short_name
== *p
->opt
) {
195 p
->opt
= p
->opt
[1] ? p
->opt
+ 1 : NULL
;
196 return get_value(p
, options
, all_opts
, OPT_SHORT
);
200 * Handle the numerical option later, explicit one-digit
201 * options take precedence over it.
203 if (options
->type
== OPTION_NUMBER
)
206 if (numopt
&& isdigit(*p
->opt
)) {
211 while (isdigit(p
->opt
[len
]))
213 arg
= xmemdupz(p
->opt
, len
);
214 p
->opt
= p
->opt
[len
] ? p
->opt
+ len
: NULL
;
215 rc
= (*numopt
->callback
)(numopt
, arg
, 0) ? (-1) : 0;
222 static int parse_long_opt(struct parse_opt_ctx_t
*p
, const char *arg
,
223 const struct option
*options
)
225 const struct option
*all_opts
= options
;
226 const char *arg_end
= strchrnul(arg
, '=');
227 const struct option
*abbrev_option
= NULL
, *ambiguous_option
= NULL
;
228 int abbrev_flags
= 0, ambiguous_flags
= 0;
230 for (; options
->type
!= OPTION_END
; options
++) {
231 const char *rest
, *long_name
= options
->long_name
;
232 int flags
= 0, opt_flags
= 0;
238 rest
= skip_prefix(arg
, long_name
);
239 if (options
->type
== OPTION_ARGUMENT
) {
243 return opterror(options
, "takes no value", flags
);
246 p
->out
[p
->cpidx
++] = arg
- 2;
251 if (!strncmp(long_name
, arg
, arg_end
- arg
)) {
255 * If this is abbreviated, it is
256 * ambiguous. So when there is no
257 * exact match later, we need to
260 ambiguous_option
= abbrev_option
;
261 ambiguous_flags
= abbrev_flags
;
263 if (!(flags
& OPT_UNSET
) && *arg_end
)
264 p
->opt
= arg_end
+ 1;
265 abbrev_option
= options
;
266 abbrev_flags
= flags
^ opt_flags
;
269 /* negation allowed? */
270 if (options
->flags
& PARSE_OPT_NONEG
)
272 /* negated and abbreviated very much? */
273 if (starts_with("no-", arg
)) {
278 if (!starts_with(arg
, "no-")) {
279 if (starts_with(long_name
, "no-")) {
281 opt_flags
|= OPT_UNSET
;
287 rest
= skip_prefix(arg
+ 3, long_name
);
288 /* abbreviated and negated? */
289 if (!rest
&& starts_with(long_name
, arg
+ 3))
299 return get_value(p
, options
, all_opts
, flags
^ opt_flags
);
302 if (ambiguous_option
)
303 return error("Ambiguous option: %s "
304 "(could be --%s%s or --%s%s)",
306 (ambiguous_flags
& OPT_UNSET
) ? "no-" : "",
307 ambiguous_option
->long_name
,
308 (abbrev_flags
& OPT_UNSET
) ? "no-" : "",
309 abbrev_option
->long_name
);
311 return get_value(p
, abbrev_option
, all_opts
, abbrev_flags
);
315 static int parse_nodash_opt(struct parse_opt_ctx_t
*p
, const char *arg
,
316 const struct option
*options
)
318 const struct option
*all_opts
= options
;
320 for (; options
->type
!= OPTION_END
; options
++) {
321 if (!(options
->flags
& PARSE_OPT_NODASH
))
323 if (options
->short_name
== arg
[0] && arg
[1] == '\0')
324 return get_value(p
, options
, all_opts
, OPT_SHORT
);
329 static void check_typos(const char *arg
, const struct option
*options
)
334 if (starts_with(arg
, "no-")) {
335 error ("did you mean `--%s` (with two dashes ?)", arg
);
339 for (; options
->type
!= OPTION_END
; options
++) {
340 if (!options
->long_name
)
342 if (starts_with(options
->long_name
, arg
)) {
343 error ("did you mean `--%s` (with two dashes ?)", arg
);
349 static void parse_options_check(const struct option
*opts
)
353 for (; opts
->type
!= OPTION_END
; opts
++) {
354 if ((opts
->flags
& PARSE_OPT_LASTARG_DEFAULT
) &&
355 (opts
->flags
& PARSE_OPT_OPTARG
))
356 err
|= optbug(opts
, "uses incompatible flags "
357 "LASTARG_DEFAULT and OPTARG");
358 if (opts
->flags
& PARSE_OPT_NODASH
&&
359 ((opts
->flags
& PARSE_OPT_OPTARG
) ||
360 !(opts
->flags
& PARSE_OPT_NOARG
) ||
361 !(opts
->flags
& PARSE_OPT_NONEG
) ||
363 err
|= optbug(opts
, "uses feature "
364 "not supported for dashless options");
365 switch (opts
->type
) {
372 if ((opts
->flags
& PARSE_OPT_OPTARG
) ||
373 !(opts
->flags
& PARSE_OPT_NOARG
))
374 err
|= optbug(opts
, "should not accept an argument");
376 ; /* ok. (usually accepts an argument) */
379 strcspn(opts
->argh
, " _") != strlen(opts
->argh
))
380 err
|= optbug(opts
, "multi-word argh should use dash to separate words");
386 void parse_options_start(struct parse_opt_ctx_t
*ctx
,
387 int argc
, const char **argv
, const char *prefix
,
388 const struct option
*options
, int flags
)
390 memset(ctx
, 0, sizeof(*ctx
));
391 ctx
->argc
= argc
- 1;
392 ctx
->argv
= argv
+ 1;
394 ctx
->prefix
= prefix
;
395 ctx
->cpidx
= ((flags
& PARSE_OPT_KEEP_ARGV0
) != 0);
397 if ((flags
& PARSE_OPT_KEEP_UNKNOWN
) &&
398 (flags
& PARSE_OPT_STOP_AT_NON_OPTION
))
399 die("STOP_AT_NON_OPTION and KEEP_UNKNOWN don't go together");
400 parse_options_check(options
);
403 static int usage_with_options_internal(struct parse_opt_ctx_t
*,
404 const char * const *,
405 const struct option
*, int, int);
407 int parse_options_step(struct parse_opt_ctx_t
*ctx
,
408 const struct option
*options
,
409 const char * const usagestr
[])
411 int internal_help
= !(ctx
->flags
& PARSE_OPT_NO_INTERNAL_HELP
);
413 /* we must reset ->opt, unknown short option leave it dangling */
416 for (; ctx
->argc
; ctx
->argc
--, ctx
->argv
++) {
417 const char *arg
= ctx
->argv
[0];
419 if (*arg
!= '-' || !arg
[1]) {
420 if (parse_nodash_opt(ctx
, arg
, options
) == 0)
422 if (ctx
->flags
& PARSE_OPT_STOP_AT_NON_OPTION
)
423 return PARSE_OPT_NON_OPTION
;
424 ctx
->out
[ctx
->cpidx
++] = ctx
->argv
[0];
430 if (internal_help
&& *ctx
->opt
== 'h')
431 return parse_options_usage(ctx
, usagestr
, options
, 0);
432 switch (parse_short_opt(ctx
, options
)) {
434 return parse_options_usage(ctx
, usagestr
, options
, 1);
437 check_typos(arg
+ 1, options
);
441 check_typos(arg
+ 1, options
);
443 if (internal_help
&& *ctx
->opt
== 'h')
444 return parse_options_usage(ctx
, usagestr
, options
, 0);
445 switch (parse_short_opt(ctx
, options
)) {
447 return parse_options_usage(ctx
, usagestr
, options
, 1);
449 /* fake a short option thing to hide the fact that we may have
450 * started to parse aggregated stuff
452 * This is leaky, too bad.
454 ctx
->argv
[0] = xstrdup(ctx
->opt
- 1);
455 *(char *)ctx
->argv
[0] = '-';
462 if (!arg
[2]) { /* "--" */
463 if (!(ctx
->flags
& PARSE_OPT_KEEP_DASHDASH
)) {
470 if (internal_help
&& !strcmp(arg
+ 2, "help-all"))
471 return usage_with_options_internal(ctx
, usagestr
, options
, 1, 0);
472 if (internal_help
&& !strcmp(arg
+ 2, "help"))
473 return parse_options_usage(ctx
, usagestr
, options
, 0);
474 switch (parse_long_opt(ctx
, arg
+ 2, options
)) {
476 return parse_options_usage(ctx
, usagestr
, options
, 1);
482 if (!(ctx
->flags
& PARSE_OPT_KEEP_UNKNOWN
))
483 return PARSE_OPT_UNKNOWN
;
484 ctx
->out
[ctx
->cpidx
++] = ctx
->argv
[0];
487 return PARSE_OPT_DONE
;
490 int parse_options_end(struct parse_opt_ctx_t
*ctx
)
492 memmove(ctx
->out
+ ctx
->cpidx
, ctx
->argv
, ctx
->argc
* sizeof(*ctx
->out
));
493 ctx
->out
[ctx
->cpidx
+ ctx
->argc
] = NULL
;
494 return ctx
->cpidx
+ ctx
->argc
;
497 int parse_options(int argc
, const char **argv
, const char *prefix
,
498 const struct option
*options
, const char * const usagestr
[],
501 struct parse_opt_ctx_t ctx
;
503 parse_options_start(&ctx
, argc
, argv
, prefix
, options
, flags
);
504 switch (parse_options_step(&ctx
, options
, usagestr
)) {
507 case PARSE_OPT_NON_OPTION
:
510 default: /* PARSE_OPT_UNKNOWN */
511 if (ctx
.argv
[0][1] == '-') {
512 error("unknown option `%s'", ctx
.argv
[0] + 2);
513 } else if (isascii(*ctx
.opt
)) {
514 error("unknown switch `%c'", *ctx
.opt
);
516 error("unknown non-ascii option in string: `%s'",
519 usage_with_options(usagestr
, options
);
522 precompose_argv(argc
, argv
);
523 return parse_options_end(&ctx
);
526 static int usage_argh(const struct option
*opts
, FILE *outfile
)
529 int literal
= (opts
->flags
& PARSE_OPT_LITERAL_ARGHELP
) || !opts
->argh
;
530 if (opts
->flags
& PARSE_OPT_OPTARG
)
532 s
= literal
? "[=%s]" : "[=<%s>]";
534 s
= literal
? "[%s]" : "[<%s>]";
536 s
= literal
? " %s" : " <%s>";
537 return utf8_fprintf(outfile
, s
, opts
->argh
? _(opts
->argh
) : _("..."));
540 #define USAGE_OPTS_WIDTH 24
543 static int usage_with_options_internal(struct parse_opt_ctx_t
*ctx
,
544 const char * const *usagestr
,
545 const struct option
*opts
, int full
, int err
)
547 FILE *outfile
= err
? stderr
: stdout
;
550 return PARSE_OPT_HELP
;
552 if (!err
&& ctx
&& ctx
->flags
& PARSE_OPT_SHELL_EVAL
)
553 fprintf(outfile
, "cat <<\\EOF\n");
555 fprintf_ln(outfile
, _("usage: %s"), _(*usagestr
++));
556 while (*usagestr
&& **usagestr
)
557 /* TRANSLATORS: the colon here should align with the
558 one in "usage: %s" translation */
559 fprintf_ln(outfile
, _(" or: %s"), _(*usagestr
++));
562 fprintf_ln(outfile
, _(" %s"), _(*usagestr
));
568 if (opts
->type
!= OPTION_GROUP
)
569 fputc('\n', outfile
);
571 for (; opts
->type
!= OPTION_END
; opts
++) {
575 if (opts
->type
== OPTION_GROUP
) {
576 fputc('\n', outfile
);
578 fprintf(outfile
, "%s\n", _(opts
->help
));
581 if (!full
&& (opts
->flags
& PARSE_OPT_HIDDEN
))
584 pos
= fprintf(outfile
, " ");
585 if (opts
->short_name
) {
586 if (opts
->flags
& PARSE_OPT_NODASH
)
587 pos
+= fprintf(outfile
, "%c", opts
->short_name
);
589 pos
+= fprintf(outfile
, "-%c", opts
->short_name
);
591 if (opts
->long_name
&& opts
->short_name
)
592 pos
+= fprintf(outfile
, ", ");
594 pos
+= fprintf(outfile
, "--%s", opts
->long_name
);
595 if (opts
->type
== OPTION_NUMBER
)
596 pos
+= utf8_fprintf(outfile
, _("-NUM"));
598 if ((opts
->flags
& PARSE_OPT_LITERAL_ARGHELP
) ||
599 !(opts
->flags
& PARSE_OPT_NOARG
))
600 pos
+= usage_argh(opts
, outfile
);
602 if (pos
<= USAGE_OPTS_WIDTH
)
603 pad
= USAGE_OPTS_WIDTH
- pos
;
605 fputc('\n', outfile
);
606 pad
= USAGE_OPTS_WIDTH
;
608 fprintf(outfile
, "%*s%s\n", pad
+ USAGE_GAP
, "", _(opts
->help
));
610 fputc('\n', outfile
);
612 if (!err
&& ctx
&& ctx
->flags
& PARSE_OPT_SHELL_EVAL
)
613 fputs("EOF\n", outfile
);
615 return PARSE_OPT_HELP
;
618 void NORETURN
usage_with_options(const char * const *usagestr
,
619 const struct option
*opts
)
621 usage_with_options_internal(NULL
, usagestr
, opts
, 0, 1);
625 void NORETURN
usage_msg_opt(const char *msg
,
626 const char * const *usagestr
,
627 const struct option
*options
)
629 fprintf(stderr
, "%s\n\n", msg
);
630 usage_with_options(usagestr
, options
);
633 static int parse_options_usage(struct parse_opt_ctx_t
*ctx
,
634 const char * const *usagestr
,
635 const struct option
*opts
, int err
)
637 return usage_with_options_internal(ctx
, usagestr
, opts
, 0, err
);
641 int opterror(const struct option
*opt
, const char *reason
, int flags
)
643 if (flags
& OPT_SHORT
)
644 return error("switch `%c' %s", opt
->short_name
, reason
);
645 if (flags
& OPT_UNSET
)
646 return error("option `no-%s' %s", opt
->long_name
, reason
);
647 return error("option `%s' %s", opt
->long_name
, reason
);