test/crossparse.c

   1 #include <config.h>
   2 #include <stdio.h>
   3 #include <stdlib.h>
   4 #include <string.h>
   5 #include <getopt.h>
   6 #include <cdecl.h>
   7 #include "test.h"
   8
   9 #define PROGNAME "crossparse"
  10 static const char *progname = PROGNAME;
  11 static const char sopts[] = "ECVH";
  12 static const struct option lopts[] = {
  13         { "cdecl",   0, NULL, 'C' },
  14         { "english", 0, NULL, 'E' },
  15         { "version", 0, NULL, 'V' },
  16         { "help",    0, NULL, 'H' },
  17         { 0 }
  18 };
  19
  20 static void print_usage(FILE *f)
  21 {
  22         fprintf(f, "Usage: %s [options]\n", progname);
  23 }
  24
  25 static void print_help(void)
  26 {
  27         print_usage(stdout);
  28         puts("Detailed help coming soon.");
  29 }
  30
  31 enum {
  32         MODE_CDECL,
  33         MODE_ENGLISH,
  34 };
  35
  36 typedef struct cdecl *parse_func(const char *);
  37 typedef size_t render_func(char *, size_t, struct cdecl *);
  38
  39 char *rerender(const char *str, const char *parse_name,  parse_func *parse,
  40                                 const char *render_name, render_func *render)
  41 {
  42         struct cdecl *decl = NULL;
  43         char *buf = NULL;
  44         size_t len;
  45
  46         decl = parse(str);
  47         if (!decl) {
  48                 fprintf(stderr, "%s: %s: failed to parse input: %s\n",
  49                                 progname, parse_name, cdecl_get_error()->str);
  50                 goto err;
  51         }
  52
  53         len = render(NULL, 0, decl);
  54         buf = malloc_nofail(len+1);
  55         if (render(buf, len+1, decl) != len) {
  56                 fprintf(stderr, "%s: %s: inconsistent length returned\n",
  57                                 progname, render_name);
  58                 goto err;
  59         }
  60
  61         cdecl_free(decl);
  62         return buf;
  63 err:
  64         cdecl_free(decl);
  65         free(buf);
  66
  67         fprintf(stderr, "%s: the failed input was: %s\n", progname, str);
  68         return NULL;
  69 }
  70 #define rerender(str, p, r) (rerender(str, #p, p, #r, r))
  71
  72 int main(int argc, char **argv)
  73 {
  74         char *buf1 = NULL, *buf2 = NULL, *buf3 = NULL;
  75         int opt, mode = MODE_CDECL;
  76         int ret = EXIT_FAILURE;
  77
  78         if (argc > 0)
  79                 progname = argv[0];
  80
  81         while ((opt = getopt_long(argc, argv, sopts, lopts, NULL)) != -1) {
  82                 switch (opt) {
  83                 case 'C':
  84                         mode = MODE_CDECL;
  85                         break;
  86                 case 'E':
  87                         mode = MODE_ENGLISH;
  88                         break;
  89                 case 'V':
  90                         test_print_version(PROGNAME);
  91                         return EXIT_SUCCESS;
  92                 case 'H':
  93                         print_help();
  94                         return EXIT_SUCCESS;
  95                 default:
  96                         print_usage(stderr);
  97                         return EXIT_FAILURE;
  98                 }
  99         }
 100
 101         if (!argv[optind]) {
 102                 print_usage(stderr);
 103                 return EXIT_FAILURE;
 104         }
 105
 106         if (mode == MODE_ENGLISH) {
 107                 buf1 = rerender(argv[optind], cdecl_parse_english, cdecl_declare);
 108                 if (!buf1)
 109                         goto out;
 110                 buf2 = rerender(buf1, cdecl_parse_decl, cdecl_explain);
 111                 if (!buf2)
 112                         goto out;
 113                 buf3 = rerender(buf2, cdecl_parse_english, cdecl_declare);
 114                 if (!buf3)
 115                         goto out;
 116         } else {
 117                 buf1 = rerender(argv[optind], cdecl_parse_decl, cdecl_explain);
 118                 if (!buf1)
 119                         goto out;
 120                 buf2 = rerender(buf1, cdecl_parse_english, cdecl_declare);
 121                 if (!buf2)
 122                         goto out;
 123                 buf3 = rerender(buf2, cdecl_parse_decl, cdecl_explain);
 124                 if (!buf3)
 125                         goto out;
 126         }
 127
 128         if (!strcmp(buf1, buf3))
 129                 ret = EXIT_SUCCESS;
 130 out:
 131         free(buf1);
 132         free(buf2);
 133         free(buf3);
 134         return ret;
 135 }