git.ozlabs.org Git - ccan/blob - ccan/opt/test/run-usage.c

   1 #define _GNU_SOURCE
   2 #include <ccan/tap/tap.h>
   3 #include <stdarg.h>
   4 #include <setjmp.h>
   5 #include <stdlib.h>
   6 #include <stdarg.h>
   7 #include "utils.h"
   8 #include <ccan/opt/opt.c>
   9 #include <ccan/opt/usage.c>
  10 #include <ccan/opt/helpers.c>
  11 #include <ccan/opt/parse.c>
  12
  13 static char *my_cb(void *p)
  14 {
  15         return NULL;
  16 }
  17
  18 static void reset_options(void)
  19 {
  20         free(opt_table);
  21         opt_table = NULL;
  22         opt_count = opt_num_short = opt_num_short_arg = opt_num_long = 0;
  23 }
  24
  25 /* Test helpers. */
  26 int main(int argc, char *argv[])
  27 {
  28         char *output;
  29         char *longname = strdup("aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa");
  30         char *shortname = strdup("shortname");
  31
  32         plan_tests(48);
  33         opt_register_table(subtables, NULL);
  34         opt_register_noarg("--kkk|-k", my_cb, NULL, "magic kkk option");
  35         opt_register_noarg("-?", opt_usage_and_exit, "<MyArgs>...",
  36                            "This message");
  37         opt_register_arg("--longname", opt_set_charp, opt_show_charp,
  38                          &longname, "a really long option default");
  39         opt_register_arg("--shortname", opt_set_charp, opt_show_charp,
  40                          &shortname, "a short option default");
  41         output = opt_usage("my name", "ExTrA Args");
  42         diag("%s", output);
  43         ok1(strstr(output, "Usage: my name"));
  44         ok1(strstr(output, "--jjj|-j|--lll|-l <arg>"));
  45         ok1(strstr(output, "ExTrA Args"));
  46         ok1(strstr(output, "-a "));
  47         ok1(strstr(output, " Description of a\n"));
  48         ok1(strstr(output, "-b <arg>"));
  49         ok1(strstr(output, " Description of b (default: b)\n"));
  50         ok1(strstr(output, "--ddd "));
  51         ok1(strstr(output, " Description of ddd\n"));
  52         ok1(strstr(output, "--eee <filename> "));
  53         ok1(strstr(output, " (default: eee)\n"));
  54         ok1(strstr(output, "long table options:\n"));
  55         ok1(strstr(output, "--ggg|-g "));
  56         ok1(strstr(output, " Description of ggg\n"));
  57         ok1(strstr(output, "-h|--hhh <arg>"));
  58         ok1(strstr(output, " Description of hhh\n"));
  59         ok1(strstr(output, "--kkk|-k"));
  60         ok1(strstr(output, "magic kkk option"));
  61         /* This entry is hidden. */
  62         ok1(!strstr(output, "--mmm|-m"));
  63         free(output);
  64
  65         /* NULL should use string from registered options. */
  66         output = opt_usage("my name", NULL);
  67         diag("%s", output);
  68         ok1(strstr(output, "Usage: my name"));
  69         ok1(strstr(output, "--jjj|-j|--lll|-l <arg>"));
  70         ok1(strstr(output, "<MyArgs>..."));
  71         ok1(strstr(output, "-a "));
  72         ok1(strstr(output, " Description of a\n"));
  73         ok1(strstr(output, "-b <arg>"));
  74         ok1(strstr(output, " Description of b (default: b)\n"));
  75         ok1(strstr(output, "--ddd "));
  76         ok1(strstr(output, " Description of ddd\n"));
  77         ok1(strstr(output, "--eee <filename> "));
  78         ok1(strstr(output, " (default: eee)\n"));
  79         ok1(strstr(output, "long table options:\n"));
  80         ok1(strstr(output, "--ggg|-g "));
  81         ok1(strstr(output, " Description of ggg\n"));
  82         ok1(strstr(output, "-h|--hhh <arg>"));
  83         ok1(strstr(output, " Description of hhh\n"));
  84         ok1(strstr(output, "--kkk|-k"));
  85         ok1(strstr(output, "magic kkk option"));
  86         ok1(strstr(output, "--longname"));
  87         ok1(strstr(output, "a really long option default"));
  88         ok1(strstr(output, "(default: \"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\"...)"));
  89         ok1(strstr(output, "--shortname"));
  90         ok1(strstr(output, "a short option default"));
  91         ok1(strstr(output, "(default: \"shortname\")"));
  92         /* This entry is hidden. */
  93         ok1(!strstr(output, "--mmm|-m"));
  94         free(output);
  95
  96         reset_options();
  97         /* Empty table test. */
  98         output = opt_usage("nothing", NULL);
  99         ok1(strstr(output, "Usage: nothing \n"));
 100         free(output);
 101
 102         /* No short args. */
 103         opt_register_noarg("--aaa", test_noarg, NULL, "AAAAll");
 104         output = opt_usage("onearg", NULL);
 105         ok1(strstr(output, "Usage: onearg \n"));
 106         ok1(strstr(output, "--aaa"));
 107         ok1(strstr(output, "AAAAll"));
 108         free(output);
 109
 110         return exit_status();
 111 }