]>
Commit | Line | Data |
---|---|---|
1 | #include "git-compat-util.h" | |
2 | #include "parse-options.h" | |
3 | #include "cache.h" | |
4 | #include "commit.h" | |
5 | #include "color.h" | |
6 | #include "utf8.h" | |
7 | ||
8 | #define OPT_SHORT 1 | |
9 | #define OPT_UNSET 2 | |
10 | ||
11 | int optbug(const struct option *opt, const char *reason) | |
12 | { | |
13 | if (opt->long_name) { | |
14 | if (opt->short_name) | |
15 | return error("BUG: switch '%c' (--%s) %s", | |
16 | opt->short_name, opt->long_name, reason); | |
17 | return error("BUG: option '%s' %s", opt->long_name, reason); | |
18 | } | |
19 | return error("BUG: switch '%c' %s", opt->short_name, reason); | |
20 | } | |
21 | ||
22 | static int get_arg(struct parse_opt_ctx_t *p, const struct option *opt, | |
23 | int flags, const char **arg) | |
24 | { | |
25 | if (p->opt) { | |
26 | *arg = p->opt; | |
27 | p->opt = NULL; | |
28 | } else if (p->argc == 1 && (opt->flags & PARSE_OPT_LASTARG_DEFAULT)) { | |
29 | *arg = (const char *)opt->defval; | |
30 | } else if (p->argc > 1) { | |
31 | p->argc--; | |
32 | *arg = *++p->argv; | |
33 | } else | |
34 | return opterror(opt, "requires a value", flags); | |
35 | return 0; | |
36 | } | |
37 | ||
38 | static void fix_filename(const char *prefix, const char **file) | |
39 | { | |
40 | if (!file || !*file || !prefix || is_absolute_path(*file) | |
41 | || !strcmp("-", *file)) | |
42 | return; | |
43 | *file = xstrdup(prefix_filename(prefix, strlen(prefix), *file)); | |
44 | } | |
45 | ||
46 | static int opt_command_mode_error(const struct option *opt, | |
47 | const struct option *all_opts, | |
48 | int flags) | |
49 | { | |
50 | const struct option *that; | |
51 | struct strbuf message = STRBUF_INIT; | |
52 | struct strbuf that_name = STRBUF_INIT; | |
53 | ||
54 | /* | |
55 | * Find the other option that was used to set the variable | |
56 | * already, and report that this is not compatible with it. | |
57 | */ | |
58 | for (that = all_opts; that->type != OPTION_END; that++) { | |
59 | if (that == opt || | |
60 | that->type != OPTION_CMDMODE || | |
61 | that->value != opt->value || | |
62 | that->defval != *(int *)opt->value) | |
63 | continue; | |
64 | ||
65 | if (that->long_name) | |
66 | strbuf_addf(&that_name, "--%s", that->long_name); | |
67 | else | |
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); | |
73 | return -1; | |
74 | } | |
75 | return opterror(opt, ": incompatible with something else", flags); | |
76 | } | |
77 | ||
78 | static int get_value(struct parse_opt_ctx_t *p, | |
79 | const struct option *opt, | |
80 | const struct option *all_opts, | |
81 | int flags) | |
82 | { | |
83 | const char *s, *arg; | |
84 | const int unset = flags & OPT_UNSET; | |
85 | int err; | |
86 | ||
87 | if (unset && p->opt) | |
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); | |
93 | ||
94 | switch (opt->type) { | |
95 | case OPTION_LOWLEVEL_CALLBACK: | |
96 | return (*(parse_opt_ll_cb *)opt->callback)(p, opt, unset); | |
97 | ||
98 | case OPTION_BIT: | |
99 | if (unset) | |
100 | *(int *)opt->value &= ~opt->defval; | |
101 | else | |
102 | *(int *)opt->value |= opt->defval; | |
103 | return 0; | |
104 | ||
105 | case OPTION_NEGBIT: | |
106 | if (unset) | |
107 | *(int *)opt->value |= opt->defval; | |
108 | else | |
109 | *(int *)opt->value &= ~opt->defval; | |
110 | return 0; | |
111 | ||
112 | case OPTION_COUNTUP: | |
113 | if (*(int *)opt->value < 0) | |
114 | *(int *)opt->value = 0; | |
115 | *(int *)opt->value = unset ? 0 : *(int *)opt->value + 1; | |
116 | return 0; | |
117 | ||
118 | case OPTION_SET_INT: | |
119 | *(int *)opt->value = unset ? 0 : opt->defval; | |
120 | return 0; | |
121 | ||
122 | case OPTION_CMDMODE: | |
123 | /* | |
124 | * Giving the same mode option twice, although is unnecessary, | |
125 | * is not a grave error, so let it pass. | |
126 | */ | |
127 | if (*(int *)opt->value && *(int *)opt->value != opt->defval) | |
128 | return opt_command_mode_error(opt, all_opts, flags); | |
129 | *(int *)opt->value = opt->defval; | |
130 | return 0; | |
131 | ||
132 | case OPTION_STRING: | |
133 | if (unset) | |
134 | *(const char **)opt->value = NULL; | |
135 | else if (opt->flags & PARSE_OPT_OPTARG && !p->opt) | |
136 | *(const char **)opt->value = (const char *)opt->defval; | |
137 | else | |
138 | return get_arg(p, opt, flags, (const char **)opt->value); | |
139 | return 0; | |
140 | ||
141 | case OPTION_FILENAME: | |
142 | err = 0; | |
143 | if (unset) | |
144 | *(const char **)opt->value = NULL; | |
145 | else if (opt->flags & PARSE_OPT_OPTARG && !p->opt) | |
146 | *(const char **)opt->value = (const char *)opt->defval; | |
147 | else | |
148 | err = get_arg(p, opt, flags, (const char **)opt->value); | |
149 | ||
150 | if (!err) | |
151 | fix_filename(p->prefix, (const char **)opt->value); | |
152 | return err; | |
153 | ||
154 | case OPTION_CALLBACK: | |
155 | if (unset) | |
156 | return (*opt->callback)(opt, NULL, 1) ? (-1) : 0; | |
157 | if (opt->flags & PARSE_OPT_NOARG) | |
158 | return (*opt->callback)(opt, NULL, 0) ? (-1) : 0; | |
159 | if (opt->flags & PARSE_OPT_OPTARG && !p->opt) | |
160 | return (*opt->callback)(opt, NULL, 0) ? (-1) : 0; | |
161 | if (get_arg(p, opt, flags, &arg)) | |
162 | return -1; | |
163 | return (*opt->callback)(opt, arg, 0) ? (-1) : 0; | |
164 | ||
165 | case OPTION_INTEGER: | |
166 | if (unset) { | |
167 | *(int *)opt->value = 0; | |
168 | return 0; | |
169 | } | |
170 | if (opt->flags & PARSE_OPT_OPTARG && !p->opt) { | |
171 | *(int *)opt->value = opt->defval; | |
172 | return 0; | |
173 | } | |
174 | if (get_arg(p, opt, flags, &arg)) | |
175 | return -1; | |
176 | *(int *)opt->value = strtol(arg, (char **)&s, 10); | |
177 | if (*s) | |
178 | return opterror(opt, "expects a numerical value", flags); | |
179 | return 0; | |
180 | ||
181 | case OPTION_MAGNITUDE: | |
182 | if (unset) { | |
183 | *(unsigned long *)opt->value = 0; | |
184 | return 0; | |
185 | } | |
186 | if (opt->flags & PARSE_OPT_OPTARG && !p->opt) { | |
187 | *(unsigned long *)opt->value = opt->defval; | |
188 | return 0; | |
189 | } | |
190 | if (get_arg(p, opt, flags, &arg)) | |
191 | return -1; | |
192 | if (!git_parse_ulong(arg, opt->value)) | |
193 | return opterror(opt, | |
194 | "expects a non-negative integer value with an optional k/m/g suffix", | |
195 | flags); | |
196 | return 0; | |
197 | ||
198 | default: | |
199 | die("should not happen, someone must be hit on the forehead"); | |
200 | } | |
201 | } | |
202 | ||
203 | static int parse_short_opt(struct parse_opt_ctx_t *p, const struct option *options) | |
204 | { | |
205 | const struct option *all_opts = options; | |
206 | const struct option *numopt = NULL; | |
207 | ||
208 | for (; options->type != OPTION_END; options++) { | |
209 | if (options->short_name == *p->opt) { | |
210 | p->opt = p->opt[1] ? p->opt + 1 : NULL; | |
211 | return get_value(p, options, all_opts, OPT_SHORT); | |
212 | } | |
213 | ||
214 | /* | |
215 | * Handle the numerical option later, explicit one-digit | |
216 | * options take precedence over it. | |
217 | */ | |
218 | if (options->type == OPTION_NUMBER) | |
219 | numopt = options; | |
220 | } | |
221 | if (numopt && isdigit(*p->opt)) { | |
222 | size_t len = 1; | |
223 | char *arg; | |
224 | int rc; | |
225 | ||
226 | while (isdigit(p->opt[len])) | |
227 | len++; | |
228 | arg = xmemdupz(p->opt, len); | |
229 | p->opt = p->opt[len] ? p->opt + len : NULL; | |
230 | rc = (*numopt->callback)(numopt, arg, 0) ? (-1) : 0; | |
231 | free(arg); | |
232 | return rc; | |
233 | } | |
234 | return -2; | |
235 | } | |
236 | ||
237 | static int parse_long_opt(struct parse_opt_ctx_t *p, const char *arg, | |
238 | const struct option *options) | |
239 | { | |
240 | const struct option *all_opts = options; | |
241 | const char *arg_end = strchrnul(arg, '='); | |
242 | const struct option *abbrev_option = NULL, *ambiguous_option = NULL; | |
243 | int abbrev_flags = 0, ambiguous_flags = 0; | |
244 | ||
245 | for (; options->type != OPTION_END; options++) { | |
246 | const char *rest, *long_name = options->long_name; | |
247 | int flags = 0, opt_flags = 0; | |
248 | ||
249 | if (!long_name) | |
250 | continue; | |
251 | ||
252 | again: | |
253 | if (!skip_prefix(arg, long_name, &rest)) | |
254 | rest = NULL; | |
255 | if (options->type == OPTION_ARGUMENT) { | |
256 | if (!rest) | |
257 | continue; | |
258 | if (*rest == '=') | |
259 | return opterror(options, "takes no value", flags); | |
260 | if (*rest) | |
261 | continue; | |
262 | p->out[p->cpidx++] = arg - 2; | |
263 | return 0; | |
264 | } | |
265 | if (!rest) { | |
266 | /* abbreviated? */ | |
267 | if (!strncmp(long_name, arg, arg_end - arg)) { | |
268 | is_abbreviated: | |
269 | if (abbrev_option) { | |
270 | /* | |
271 | * If this is abbreviated, it is | |
272 | * ambiguous. So when there is no | |
273 | * exact match later, we need to | |
274 | * error out. | |
275 | */ | |
276 | ambiguous_option = abbrev_option; | |
277 | ambiguous_flags = abbrev_flags; | |
278 | } | |
279 | if (!(flags & OPT_UNSET) && *arg_end) | |
280 | p->opt = arg_end + 1; | |
281 | abbrev_option = options; | |
282 | abbrev_flags = flags ^ opt_flags; | |
283 | continue; | |
284 | } | |
285 | /* negation allowed? */ | |
286 | if (options->flags & PARSE_OPT_NONEG) | |
287 | continue; | |
288 | /* negated and abbreviated very much? */ | |
289 | if (starts_with("no-", arg)) { | |
290 | flags |= OPT_UNSET; | |
291 | goto is_abbreviated; | |
292 | } | |
293 | /* negated? */ | |
294 | if (!starts_with(arg, "no-")) { | |
295 | if (starts_with(long_name, "no-")) { | |
296 | long_name += 3; | |
297 | opt_flags |= OPT_UNSET; | |
298 | goto again; | |
299 | } | |
300 | continue; | |
301 | } | |
302 | flags |= OPT_UNSET; | |
303 | if (!skip_prefix(arg + 3, long_name, &rest)) { | |
304 | /* abbreviated and negated? */ | |
305 | if (starts_with(long_name, arg + 3)) | |
306 | goto is_abbreviated; | |
307 | else | |
308 | continue; | |
309 | } | |
310 | } | |
311 | if (*rest) { | |
312 | if (*rest != '=') | |
313 | continue; | |
314 | p->opt = rest + 1; | |
315 | } | |
316 | return get_value(p, options, all_opts, flags ^ opt_flags); | |
317 | } | |
318 | ||
319 | if (ambiguous_option) | |
320 | return error("Ambiguous option: %s " | |
321 | "(could be --%s%s or --%s%s)", | |
322 | arg, | |
323 | (ambiguous_flags & OPT_UNSET) ? "no-" : "", | |
324 | ambiguous_option->long_name, | |
325 | (abbrev_flags & OPT_UNSET) ? "no-" : "", | |
326 | abbrev_option->long_name); | |
327 | if (abbrev_option) | |
328 | return get_value(p, abbrev_option, all_opts, abbrev_flags); | |
329 | return -2; | |
330 | } | |
331 | ||
332 | static int parse_nodash_opt(struct parse_opt_ctx_t *p, const char *arg, | |
333 | const struct option *options) | |
334 | { | |
335 | const struct option *all_opts = options; | |
336 | ||
337 | for (; options->type != OPTION_END; options++) { | |
338 | if (!(options->flags & PARSE_OPT_NODASH)) | |
339 | continue; | |
340 | if (options->short_name == arg[0] && arg[1] == '\0') | |
341 | return get_value(p, options, all_opts, OPT_SHORT); | |
342 | } | |
343 | return -2; | |
344 | } | |
345 | ||
346 | static void check_typos(const char *arg, const struct option *options) | |
347 | { | |
348 | if (strlen(arg) < 3) | |
349 | return; | |
350 | ||
351 | if (starts_with(arg, "no-")) { | |
352 | error ("did you mean `--%s` (with two dashes ?)", arg); | |
353 | exit(129); | |
354 | } | |
355 | ||
356 | for (; options->type != OPTION_END; options++) { | |
357 | if (!options->long_name) | |
358 | continue; | |
359 | if (starts_with(options->long_name, arg)) { | |
360 | error ("did you mean `--%s` (with two dashes ?)", arg); | |
361 | exit(129); | |
362 | } | |
363 | } | |
364 | } | |
365 | ||
366 | static void parse_options_check(const struct option *opts) | |
367 | { | |
368 | int err = 0; | |
369 | char short_opts[128]; | |
370 | ||
371 | memset(short_opts, '\0', sizeof(short_opts)); | |
372 | for (; opts->type != OPTION_END; opts++) { | |
373 | if ((opts->flags & PARSE_OPT_LASTARG_DEFAULT) && | |
374 | (opts->flags & PARSE_OPT_OPTARG)) | |
375 | err |= optbug(opts, "uses incompatible flags " | |
376 | "LASTARG_DEFAULT and OPTARG"); | |
377 | if (opts->short_name) { | |
378 | if (0x7F <= opts->short_name) | |
379 | err |= optbug(opts, "invalid short name"); | |
380 | else if (short_opts[opts->short_name]++) | |
381 | err |= optbug(opts, "short name already used"); | |
382 | } | |
383 | if (opts->flags & PARSE_OPT_NODASH && | |
384 | ((opts->flags & PARSE_OPT_OPTARG) || | |
385 | !(opts->flags & PARSE_OPT_NOARG) || | |
386 | !(opts->flags & PARSE_OPT_NONEG) || | |
387 | opts->long_name)) | |
388 | err |= optbug(opts, "uses feature " | |
389 | "not supported for dashless options"); | |
390 | switch (opts->type) { | |
391 | case OPTION_COUNTUP: | |
392 | case OPTION_BIT: | |
393 | case OPTION_NEGBIT: | |
394 | case OPTION_SET_INT: | |
395 | case OPTION_NUMBER: | |
396 | if ((opts->flags & PARSE_OPT_OPTARG) || | |
397 | !(opts->flags & PARSE_OPT_NOARG)) | |
398 | err |= optbug(opts, "should not accept an argument"); | |
399 | default: | |
400 | ; /* ok. (usually accepts an argument) */ | |
401 | } | |
402 | if (opts->argh && | |
403 | strcspn(opts->argh, " _") != strlen(opts->argh)) | |
404 | err |= optbug(opts, "multi-word argh should use dash to separate words"); | |
405 | } | |
406 | if (err) | |
407 | exit(128); | |
408 | } | |
409 | ||
410 | void parse_options_start(struct parse_opt_ctx_t *ctx, | |
411 | int argc, const char **argv, const char *prefix, | |
412 | const struct option *options, int flags) | |
413 | { | |
414 | memset(ctx, 0, sizeof(*ctx)); | |
415 | ctx->argc = ctx->total = argc - 1; | |
416 | ctx->argv = argv + 1; | |
417 | ctx->out = argv; | |
418 | ctx->prefix = prefix; | |
419 | ctx->cpidx = ((flags & PARSE_OPT_KEEP_ARGV0) != 0); | |
420 | ctx->flags = flags; | |
421 | if ((flags & PARSE_OPT_KEEP_UNKNOWN) && | |
422 | (flags & PARSE_OPT_STOP_AT_NON_OPTION)) | |
423 | die("STOP_AT_NON_OPTION and KEEP_UNKNOWN don't go together"); | |
424 | parse_options_check(options); | |
425 | } | |
426 | ||
427 | static int usage_with_options_internal(struct parse_opt_ctx_t *, | |
428 | const char * const *, | |
429 | const struct option *, int, int); | |
430 | ||
431 | int parse_options_step(struct parse_opt_ctx_t *ctx, | |
432 | const struct option *options, | |
433 | const char * const usagestr[]) | |
434 | { | |
435 | int internal_help = !(ctx->flags & PARSE_OPT_NO_INTERNAL_HELP); | |
436 | int err = 0; | |
437 | ||
438 | /* we must reset ->opt, unknown short option leave it dangling */ | |
439 | ctx->opt = NULL; | |
440 | ||
441 | for (; ctx->argc; ctx->argc--, ctx->argv++) { | |
442 | const char *arg = ctx->argv[0]; | |
443 | ||
444 | if (*arg != '-' || !arg[1]) { | |
445 | if (parse_nodash_opt(ctx, arg, options) == 0) | |
446 | continue; | |
447 | if (ctx->flags & PARSE_OPT_STOP_AT_NON_OPTION) | |
448 | return PARSE_OPT_NON_OPTION; | |
449 | ctx->out[ctx->cpidx++] = ctx->argv[0]; | |
450 | continue; | |
451 | } | |
452 | ||
453 | /* lone -h asks for help */ | |
454 | if (internal_help && ctx->total == 1 && !strcmp(arg + 1, "h")) | |
455 | goto show_usage; | |
456 | ||
457 | if (arg[1] != '-') { | |
458 | ctx->opt = arg + 1; | |
459 | switch (parse_short_opt(ctx, options)) { | |
460 | case -1: | |
461 | goto show_usage_error; | |
462 | case -2: | |
463 | if (ctx->opt) | |
464 | check_typos(arg + 1, options); | |
465 | if (internal_help && *ctx->opt == 'h') | |
466 | goto show_usage; | |
467 | goto unknown; | |
468 | } | |
469 | if (ctx->opt) | |
470 | check_typos(arg + 1, options); | |
471 | while (ctx->opt) { | |
472 | switch (parse_short_opt(ctx, options)) { | |
473 | case -1: | |
474 | goto show_usage_error; | |
475 | case -2: | |
476 | if (internal_help && *ctx->opt == 'h') | |
477 | goto show_usage; | |
478 | ||
479 | /* fake a short option thing to hide the fact that we may have | |
480 | * started to parse aggregated stuff | |
481 | * | |
482 | * This is leaky, too bad. | |
483 | */ | |
484 | ctx->argv[0] = xstrdup(ctx->opt - 1); | |
485 | *(char *)ctx->argv[0] = '-'; | |
486 | goto unknown; | |
487 | } | |
488 | } | |
489 | continue; | |
490 | } | |
491 | ||
492 | if (!arg[2]) { /* "--" */ | |
493 | if (!(ctx->flags & PARSE_OPT_KEEP_DASHDASH)) { | |
494 | ctx->argc--; | |
495 | ctx->argv++; | |
496 | } | |
497 | break; | |
498 | } | |
499 | ||
500 | if (internal_help && !strcmp(arg + 2, "help-all")) | |
501 | return usage_with_options_internal(ctx, usagestr, options, 1, 0); | |
502 | if (internal_help && !strcmp(arg + 2, "help")) | |
503 | goto show_usage; | |
504 | switch (parse_long_opt(ctx, arg + 2, options)) { | |
505 | case -1: | |
506 | goto show_usage_error; | |
507 | case -2: | |
508 | goto unknown; | |
509 | } | |
510 | continue; | |
511 | unknown: | |
512 | if (!(ctx->flags & PARSE_OPT_KEEP_UNKNOWN)) | |
513 | return PARSE_OPT_UNKNOWN; | |
514 | ctx->out[ctx->cpidx++] = ctx->argv[0]; | |
515 | ctx->opt = NULL; | |
516 | } | |
517 | return PARSE_OPT_DONE; | |
518 | ||
519 | show_usage_error: | |
520 | err = 1; | |
521 | show_usage: | |
522 | return usage_with_options_internal(ctx, usagestr, options, 0, err); | |
523 | } | |
524 | ||
525 | int parse_options_end(struct parse_opt_ctx_t *ctx) | |
526 | { | |
527 | memmove(ctx->out + ctx->cpidx, ctx->argv, ctx->argc * sizeof(*ctx->out)); | |
528 | ctx->out[ctx->cpidx + ctx->argc] = NULL; | |
529 | return ctx->cpidx + ctx->argc; | |
530 | } | |
531 | ||
532 | int parse_options(int argc, const char **argv, const char *prefix, | |
533 | const struct option *options, const char * const usagestr[], | |
534 | int flags) | |
535 | { | |
536 | struct parse_opt_ctx_t ctx; | |
537 | ||
538 | parse_options_start(&ctx, argc, argv, prefix, options, flags); | |
539 | switch (parse_options_step(&ctx, options, usagestr)) { | |
540 | case PARSE_OPT_HELP: | |
541 | exit(129); | |
542 | case PARSE_OPT_NON_OPTION: | |
543 | case PARSE_OPT_DONE: | |
544 | break; | |
545 | default: /* PARSE_OPT_UNKNOWN */ | |
546 | if (ctx.argv[0][1] == '-') { | |
547 | error("unknown option `%s'", ctx.argv[0] + 2); | |
548 | } else if (isascii(*ctx.opt)) { | |
549 | error("unknown switch `%c'", *ctx.opt); | |
550 | } else { | |
551 | error("unknown non-ascii option in string: `%s'", | |
552 | ctx.argv[0]); | |
553 | } | |
554 | usage_with_options(usagestr, options); | |
555 | } | |
556 | ||
557 | precompose_argv(argc, argv); | |
558 | return parse_options_end(&ctx); | |
559 | } | |
560 | ||
561 | static int usage_argh(const struct option *opts, FILE *outfile) | |
562 | { | |
563 | const char *s; | |
564 | int literal = (opts->flags & PARSE_OPT_LITERAL_ARGHELP) || !opts->argh; | |
565 | if (opts->flags & PARSE_OPT_OPTARG) | |
566 | if (opts->long_name) | |
567 | s = literal ? "[=%s]" : "[=<%s>]"; | |
568 | else | |
569 | s = literal ? "[%s]" : "[<%s>]"; | |
570 | else | |
571 | s = literal ? " %s" : " <%s>"; | |
572 | return utf8_fprintf(outfile, s, opts->argh ? _(opts->argh) : _("...")); | |
573 | } | |
574 | ||
575 | #define USAGE_OPTS_WIDTH 24 | |
576 | #define USAGE_GAP 2 | |
577 | ||
578 | static int usage_with_options_internal(struct parse_opt_ctx_t *ctx, | |
579 | const char * const *usagestr, | |
580 | const struct option *opts, int full, int err) | |
581 | { | |
582 | FILE *outfile = err ? stderr : stdout; | |
583 | ||
584 | if (!usagestr) | |
585 | return PARSE_OPT_HELP; | |
586 | ||
587 | if (!err && ctx && ctx->flags & PARSE_OPT_SHELL_EVAL) | |
588 | fprintf(outfile, "cat <<\\EOF\n"); | |
589 | ||
590 | fprintf_ln(outfile, _("usage: %s"), _(*usagestr++)); | |
591 | while (*usagestr && **usagestr) | |
592 | /* TRANSLATORS: the colon here should align with the | |
593 | one in "usage: %s" translation */ | |
594 | fprintf_ln(outfile, _(" or: %s"), _(*usagestr++)); | |
595 | while (*usagestr) { | |
596 | if (**usagestr) | |
597 | fprintf_ln(outfile, _(" %s"), _(*usagestr)); | |
598 | else | |
599 | putchar('\n'); | |
600 | usagestr++; | |
601 | } | |
602 | ||
603 | if (opts->type != OPTION_GROUP) | |
604 | fputc('\n', outfile); | |
605 | ||
606 | for (; opts->type != OPTION_END; opts++) { | |
607 | size_t pos; | |
608 | int pad; | |
609 | ||
610 | if (opts->type == OPTION_GROUP) { | |
611 | fputc('\n', outfile); | |
612 | if (*opts->help) | |
613 | fprintf(outfile, "%s\n", _(opts->help)); | |
614 | continue; | |
615 | } | |
616 | if (!full && (opts->flags & PARSE_OPT_HIDDEN)) | |
617 | continue; | |
618 | ||
619 | pos = fprintf(outfile, " "); | |
620 | if (opts->short_name) { | |
621 | if (opts->flags & PARSE_OPT_NODASH) | |
622 | pos += fprintf(outfile, "%c", opts->short_name); | |
623 | else | |
624 | pos += fprintf(outfile, "-%c", opts->short_name); | |
625 | } | |
626 | if (opts->long_name && opts->short_name) | |
627 | pos += fprintf(outfile, ", "); | |
628 | if (opts->long_name) | |
629 | pos += fprintf(outfile, "--%s", opts->long_name); | |
630 | if (opts->type == OPTION_NUMBER) | |
631 | pos += utf8_fprintf(outfile, _("-NUM")); | |
632 | ||
633 | if ((opts->flags & PARSE_OPT_LITERAL_ARGHELP) || | |
634 | !(opts->flags & PARSE_OPT_NOARG)) | |
635 | pos += usage_argh(opts, outfile); | |
636 | ||
637 | if (pos <= USAGE_OPTS_WIDTH) | |
638 | pad = USAGE_OPTS_WIDTH - pos; | |
639 | else { | |
640 | fputc('\n', outfile); | |
641 | pad = USAGE_OPTS_WIDTH; | |
642 | } | |
643 | fprintf(outfile, "%*s%s\n", pad + USAGE_GAP, "", _(opts->help)); | |
644 | } | |
645 | fputc('\n', outfile); | |
646 | ||
647 | if (!err && ctx && ctx->flags & PARSE_OPT_SHELL_EVAL) | |
648 | fputs("EOF\n", outfile); | |
649 | ||
650 | return PARSE_OPT_HELP; | |
651 | } | |
652 | ||
653 | void NORETURN usage_with_options(const char * const *usagestr, | |
654 | const struct option *opts) | |
655 | { | |
656 | usage_with_options_internal(NULL, usagestr, opts, 0, 1); | |
657 | exit(129); | |
658 | } | |
659 | ||
660 | void NORETURN usage_msg_opt(const char *msg, | |
661 | const char * const *usagestr, | |
662 | const struct option *options) | |
663 | { | |
664 | fprintf(stderr, "fatal: %s\n\n", msg); | |
665 | usage_with_options(usagestr, options); | |
666 | } | |
667 | ||
668 | #undef opterror | |
669 | int opterror(const struct option *opt, const char *reason, int flags) | |
670 | { | |
671 | if (flags & OPT_SHORT) | |
672 | return error("switch `%c' %s", opt->short_name, reason); | |
673 | if (flags & OPT_UNSET) | |
674 | return error("option `no-%s' %s", opt->long_name, reason); | |
675 | return error("option `%s' %s", opt->long_name, reason); | |
676 | } |