]> git.draconx.ca Git - cdecl99.git/blobdiff - src/cdecl99.c
Port to use getline.h from dxcommon.
[cdecl99.git] / src / cdecl99.c
index 5ddc889f05168d279d32eb88612231a848f1a8f3..0622e6726dec5a2df183d02ff53f2facd48573da 100644 (file)
@@ -1,6 +1,6 @@
 /*
  * Command line utility for making sense of C declarations.
- * Copyright © 2011-2012, 2020-2023 Nick Bowler
+ * Copyright © 2011-2012, 2020-2024 Nick Bowler
  *
  * This program is free software: you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
 #include <locale.h>
 #include <assert.h>
 #include <stdarg.h>
+#include <inttypes.h>
 
 #include <getopt.h>
 #include <gettext.h>
-#include <readline.h>
-#include <localcharset.h>
 #include <mbswidth.h>
 
 #include "cdecl99.h"
 #include "cdecl.h"
 #include "help.h"
 #include "xtra.h"
-#include "copysym.h"
 #include "options.h"
+#include "version.h"
+#include "getline.h"
+
+#if HAVE_READLINE_READLINE_H
+#  include <readline/readline.h>
+#endif
+#if HAVE_RL_ADD_HISTORY && HAVE_READLINE_HISTORY_H
+#  include <readline/history.h>
+
+/* call add_history only if the line is non-blank */
+static void do_add_history(const char *line)
+{
+       if (line[strspn(line, " \t")])
+               add_history(line);
+}
+#else
+static void do_add_history(const char *line)
+{
+}
+#endif
 
 static const char *progname = "cdecl99";
-static bool interactive = true;
+static bool batch_mode;
 
 void print_error(const char *fmt, ...)
 {
        va_list(ap);
 
-       if (!interactive)
-               fprintf(stderr, "%s: ", progname);
-       fprintf(stderr, "%s", _("error: "));
+       fprintf(stderr, batch_mode ? "%s: %s" : "%.0s%s",
+                       progname, _("error: "));
 
        va_start(ap, fmt);
        vfprintf(stderr, fmt, ap);
@@ -60,13 +77,7 @@ void print_error(const char *fmt, ...)
 
 static void print_version(void)
 {
-       const char *copysign = copyright_symbol(locale_charset());
-
-       puts(PACKAGE_STRING);
-       printf("Copyright %s 2023 Nick Bowler.\n", copysign);
-       puts("License GPLv3+: GNU GPL version 3 or any later version.");
-       puts("This is free software: you are free to change and redistribute it.");
-       puts("There is NO WARRANTY, to the extent permitted by law.");
+       do_print_version(PACKAGE_STRING);
 }
 
 static void print_usage(FILE *f)
@@ -95,10 +106,9 @@ static void print_help(const struct option *lopts)
 
                help_print_option(opt, help.arg, help.desc, 20);
        }
-       putchar('\n');
 
-       puts(_("For more information, see the cdecl99(1) man page."));
-       putchar('\n');
+       printf("\n%s\n\n",
+              _("For more information, see the cdecl99(1) man page."));
 
        /*
         * TRANSLATORS: Please add *another line* indicating where users should
@@ -107,70 +117,75 @@ static void print_help(const struct option *lopts)
        printf(_("Report bugs to <%s>.\n"), PACKAGE_BUGREPORT);
 }
 
-static int is_blank_line(const char *line)
+static int do_getline(char **linebuf, size_t *n)
 {
-       return !line[strspn(line, " \t")];
+       int rc;
+
+       if ((rc = dx_getline(linebuf, n, stdin)) < 0) {
+               if (rc == DX_GETLINE_ENOMEM)
+                       print_error("%s", _("failed to allocate memory"));
+               else
+                       print_error("%s", strerror(errno));
+               return 0;
+       }
+
+       return rc;
 }
 
-static int repl(void)
+static int do_readline(char **linebuf, size_t *n, bool batch)
 {
-       char *line;
+#if !HAVE_READLINE
+       if (!batch) {
+               fputs("> ", stdout);
+               fflush(stdout);
+       }
 
-       for (; (line = readline("> ")); free(line)) {
-               if (!is_blank_line(line))
-                       add_history(line);
+       return do_getline(linebuf, n);
+#else
+       if (batch)
+               return do_getline(linebuf, n);
 
-               if (run_command(line, true) > 0)
-                       break;
-       }
+       free(*linebuf);
+       if (!(*linebuf = readline("> ")))
+               return 0;
 
-       free(line);
-       return 0;
+       do_add_history(*linebuf);
+       return 1;
+#endif
 }
 
-static int repl_cmdline(unsigned count, char **commands)
+static int repl(bool batch)
 {
-       int ret = 0;
-       unsigned i;
+       char *line = NULL;
+       bool fail = 0;
+       size_t n = 0;
 
-       for (i = 0; i < count; i++) {
-               int rc = run_command(commands[i], false);
-               if (rc < 0)
-                       ret = -1;
-               else if (rc > 0)
+       while (do_readline(&line, &n, batch)) {
+               int rc = run_command(line, batch);
+               if (rc > 0)
                        break;
+               if (rc < 0)
+                       fail = batch;
        }
 
-       return ret;
+       free(line);
+       return fail ? EXIT_FAILURE : 0;
 }
 
-static int repl_noninteractive(void)
+static int repl_cmdline(unsigned count, char **commands)
 {
-       int rc, ret = 0, saved_errno;
-       char *line = NULL;
-       size_t n;
-
-       while (getline(&line, &n, stdin) >= 0) {
-               char *c = strchr(line, '\n');
-               if (c)
-                       *c = '\0';
+       bool fail = 0;
+       unsigned i;
 
-               rc = run_command(line, false);
-               if (rc < 0)
-                       ret = -1;
-               else if (rc > 0)
+       for (i = 0; i < count; i++) {
+               int rc = run_command(commands[i], true);
+               if (rc > 0)
                        break;
+               if (rc < 0)
+                       fail = true;
        }
 
-       saved_errno = errno;
-       free(line);
-
-       if (ferror(stdin)) {
-               print_error("%s", strerror(saved_errno));
-               return -1;
-       }
-
-       return ret;
+       return fail ? EXIT_FAILURE : 0;
 }
 
 /* Initialize gettext */
@@ -207,10 +222,10 @@ static int initialize(int argc, char **argv)
                        quiet = 1;
                        break;
                case 'b':
-                       interactive = false;
+                       batch_mode = true;
                        break;
                case 'i':
-                       interactive = true;
+                       batch_mode = false;
                        break;
                case 'f':
                        filename = optarg;
@@ -231,8 +246,8 @@ static int initialize(int argc, char **argv)
        }
 
        if (optind < argc) {
-               fprintf(stderr, "%s: ", progname);
-               fprintf(stderr, _("excess command-line arguments:"));
+               fprintf(stderr, "%s: %s", progname,
+                               _("excess command-line arguments:"));
                for (i = optind; i < argc; i++) {
                        fprintf(stderr, " %s", argv[i]);
                }
@@ -243,10 +258,10 @@ static int initialize(int argc, char **argv)
 
        /* --filename and --execute imply --batch. */
        if (filename || execute)
-               interactive = false;
+               batch_mode = true;
 
        /* --batch implies --quiet */
-       if (interactive && !quiet)
+       if (!batch_mode && !quiet)
                print_version();
 
        /* --execute supersedes --filename */
@@ -263,21 +278,15 @@ static int initialize(int argc, char **argv)
 
 int main(int argc, char **argv)
 {
-       int rc, execute;
+       int execute;
 
        switch ((execute = initialize(argc, argv))) {
        case INIT_EXIT_SUCCESS: return EXIT_SUCCESS;
        case INIT_EXIT_FAILURE: return EXIT_FAILURE;
        }
 
-       if (interactive)
-               rc = repl();
-       else if (execute)
-               rc = repl_cmdline(execute, argv);
+       if (execute)
+               return repl_cmdline(execute, argv);
        else
-               rc = repl_noninteractive();
-
-       if (rc != 0)
-               return EXIT_FAILURE;
-       return EXIT_SUCCESS;
+               return repl(batch_mode);
 }