]> ncurses.scripts.mit.edu Git - ncurses.git/blobdiff - progs/tic.c
ncurses 5.7 - patch 20091227
[ncurses.git] / progs / tic.c
index cc73a4db220cca19d333182f84e3929b8b199787..3d894acd2d406b850c465268400a2b6c2933c31b 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
 /****************************************************************************
- * Copyright (c) 1998,1999,2000 Free Software Foundation, Inc.              *
+ * Copyright (c) 1998-2008,2009 Free Software Foundation, Inc.              *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
@@ -29,6 +29,7 @@
 /****************************************************************************
  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
 /****************************************************************************
  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
+ *     and: Thomas E. Dickey                        1996 on                 *
  ****************************************************************************/
 
 /*
  ****************************************************************************/
 
 /*
  */
 
 #include <progs.priv.h>
  */
 
 #include <progs.priv.h>
+#include <sys/stat.h>
 
 #include <dump_entry.h>
 
 #include <dump_entry.h>
-#include <term_entry.h>
+#include <transform.h>
 
 
-MODULE_ID("$Id: tic.c,v 1.69 2000/04/08 23:53:49 tom Exp $")
+MODULE_ID("$Id: tic.c,v 1.139 2009/12/12 17:30:12 Nicholas.Marriott Exp $")
 
 const char *_nc_progname = "tic";
 
 static FILE *log_fp;
 static FILE *tmp_fp;
 
 const char *_nc_progname = "tic";
 
 static FILE *log_fp;
 static FILE *tmp_fp;
+static bool capdump = FALSE;   /* running as infotocap? */
+static bool infodump = FALSE;  /* running as captoinfo? */
 static bool showsummary = FALSE;
 static const char *to_remove;
 
 static bool showsummary = FALSE;
 static const char *to_remove;
 
-static void (*save_check_termtype) (TERMTYPE *);
-static void check_termtype(TERMTYPE * tt);
-
-static const char usage_string[] = "[-h] [-v[n]] [-e names] [-CILNRTcfrswx1] source-file\n";
+static void (*save_check_termtype) (TERMTYPE *, bool);
+static void check_termtype(TERMTYPE *tt, bool);
+
+static const char usage_string[] = "\
+[-e names] \
+[-o dir] \
+[-R name] \
+[-v[n]] \
+[-V] \
+[-w[n]] \
+[-\
+1\
+a\
+C\
+c\
+f\
+G\
+g\
+I\
+L\
+N\
+r\
+s\
+T\
+t\
+U\
+x\
+] \
+source-file\n";
+
+#if NO_LEAKS
+static void
+free_namelist(char **src)
+{
+    if (src != 0) {
+       int n;
+       for (n = 0; src[n] != 0; ++n)
+           free(src[n]);
+       free(src);
+    }
+}
+#endif
 
 static void
 
 static void
-cleanup(void)
+cleanup(char **namelst GCC_UNUSED)
 {
 {
+#if NO_LEAKS
+    free_namelist(namelst);
+#endif
     if (tmp_fp != 0)
        fclose(tmp_fp);
     if (to_remove != 0) {
     if (tmp_fp != 0)
        fclose(tmp_fp);
     if (to_remove != 0) {
@@ -74,8 +119,8 @@ static void
 failed(const char *msg)
 {
     perror(msg);
 failed(const char *msg)
 {
     perror(msg);
-    cleanup();
-    exit(EXIT_FAILURE);
+    cleanup((char **) 0);
+    ExitProgram(EXIT_FAILURE);
 }
 
 static void
 }
 
 static void
@@ -85,23 +130,28 @@ usage(void)
     {
        "Options:",
        "  -1         format translation output one capability per line",
     {
        "Options:",
        "  -1         format translation output one capability per line",
-       "  -C         translate entries to termcap source form",
-       "  -I         translate entries to terminfo source form",
-       "  -L         translate entries to full terminfo source form",
-       "  -N         disable smart defaults for source translation",
-       "  -R         restrict translation to given terminfo/termcap version",
-       "  -T         remove size-restrictions on compiled description",
 #if NCURSES_XNAMES
        "  -a         retain commented-out capabilities (sets -x also)",
 #endif
 #if NCURSES_XNAMES
        "  -a         retain commented-out capabilities (sets -x also)",
 #endif
+       "  -C         translate entries to termcap source form",
        "  -c         check only, validate input without compiling or translating",
        "  -c         check only, validate input without compiling or translating",
+       "  -e<names>  translate/compile only entries named by comma-separated list",
        "  -f         format complex strings for readability",
        "  -G         format %{number} to %'char'",
        "  -g         format %'char' to %{number}",
        "  -f         format complex strings for readability",
        "  -G         format %{number} to %'char'",
        "  -g         format %'char' to %{number}",
-       "  -e<names>  translate/compile only entries named by comma-separated list",
+       "  -I         translate entries to terminfo source form",
+       "  -L         translate entries to full terminfo source form",
+       "  -N         disable smart defaults for source translation",
        "  -o<dir>    set output directory for compiled entry writes",
        "  -o<dir>    set output directory for compiled entry writes",
+       "  -R<name>   restrict translation to given terminfo/termcap version",
        "  -r         force resolution of all use entries in source translation",
        "  -s         print summary statistics",
        "  -r         force resolution of all use entries in source translation",
        "  -s         print summary statistics",
+       "  -T         remove size-restrictions on compiled description",
+#if NCURSES_XNAMES
+       "  -t         suppress commented-out capabilities",
+#endif
+       "  -U         suppress post-processing of entries",
+       "  -V         print version",
        "  -v[n]      set verbosity level",
        "  -w[n]      set format width for translation output",
 #if NCURSES_XNAMES
        "  -v[n]      set verbosity level",
        "  -w[n]      set format width for translation output",
 #if NCURSES_XNAMES
@@ -114,11 +164,11 @@ usage(void)
     size_t j;
 
     fprintf(stderr, "Usage: %s %s\n", _nc_progname, usage_string);
     size_t j;
 
     fprintf(stderr, "Usage: %s %s\n", _nc_progname, usage_string);
-    for (j = 0; j < sizeof(tbl) / sizeof(tbl[0]); j++) {
+    for (j = 0; j < SIZEOF(tbl); j++) {
        fputs(tbl[j], stderr);
        putc('\n', stderr);
     }
        fputs(tbl[j], stderr);
        putc('\n', stderr);
     }
-    exit(EXIT_FAILURE);
+    ExitProgram(EXIT_FAILURE);
 }
 
 #define L_BRACE '{'
 }
 
 #define L_BRACE '{'
@@ -144,11 +194,11 @@ write_it(ENTRY * ep)
            d = result;
            t = s;
            while ((ch = *t++) != 0) {
            d = result;
            t = s;
            while ((ch = *t++) != 0) {
-               *d++ = ch;
+               *d++ = (char) ch;
                if (ch == '\\') {
                    *d++ = *t++;
                } else if ((ch == '%')
                if (ch == '\\') {
                    *d++ = *t++;
                } else if ((ch == '%')
-                   && (*t == L_BRACE)) {
+                          && (*t == L_BRACE)) {
                    char *v = 0;
                    long value = strtol(t + 1, &v, 0);
                    if (v != 0
                    char *v = 0;
                    long value = strtol(t + 1, &v, 0);
                    if (v != 0
@@ -158,7 +208,7 @@ write_it(ENTRY * ep)
                        && value < 127
                        && isprint((int) value)) {
                        *d++ = S_QUOTE;
                        && value < 127
                        && isprint((int) value)) {
                        *d++ = S_QUOTE;
-                       *d++ = (int) value;
+                       *d++ = (char) value;
                        *d++ = S_QUOTE;
                        t = (v + 1);
                    }
                        *d++ = S_QUOTE;
                        t = (v + 1);
                    }
@@ -179,7 +229,7 @@ static bool
 immedhook(ENTRY * ep GCC_UNUSED)
 /* write out entries with no use capabilities immediately to save storage */
 {
 immedhook(ENTRY * ep GCC_UNUSED)
 /* write out entries with no use capabilities immediately to save storage */
 {
-#ifndef HAVE_BIG_CORE
+#if !HAVE_BIG_CORE
     /*
      * This is strictly a core-economy kluge.  The really clean way to handle
      * compilation is to slurp the whole file into core and then do all the
     /*
      * This is strictly a core-economy kluge.  The really clean way to handle
      * compilation is to slurp the whole file into core and then do all the
@@ -246,7 +296,7 @@ put_translate(int c)
            putchar(c);
            in_name = FALSE;
        } else if (c != '>') {
            putchar(c);
            in_name = FALSE;
        } else if (c != '>') {
-           namebuf[used++] = c;
+           namebuf[used++] = (char) c;
        } else {                /* ah! candidate name! */
            char *up;
            NCURSES_CONST char *tp;
        } else {                /* ah! candidate name! */
            char *up;
            NCURSES_CONST char *tp;
@@ -289,23 +339,45 @@ put_translate(int c)
 static char *
 stripped(char *src)
 {
 static char *
 stripped(char *src)
 {
-    while (isspace(*src))
+    while (isspace(UChar(*src)))
        src++;
     if (*src != '\0') {
        src++;
     if (*src != '\0') {
-       char *dst = strcpy(malloc(strlen(src) + 1), src);
-       size_t len = strlen(dst);
-       while (--len != 0 && isspace(dst[len]))
+       char *dst;
+       size_t len;
+
+       if ((dst = strdup(src)) == NULL)
+           failed("strdup");
+       len = strlen(dst);
+       while (--len != 0 && isspace(UChar(dst[len])))
            dst[len] = '\0';
        return dst;
     }
     return 0;
 }
 
            dst[len] = '\0';
        return dst;
     }
     return 0;
 }
 
+static FILE *
+open_input(const char *filename)
+{
+    FILE *fp = fopen(filename, "r");
+    struct stat sb;
+
+    if (fp == 0) {
+       fprintf(stderr, "%s: Can't open %s\n", _nc_progname, filename);
+       ExitProgram(EXIT_FAILURE);
+    }
+    if (fstat(fileno(fp), &sb) < 0
+       || (sb.st_mode & S_IFMT) != S_IFREG) {
+       fprintf(stderr, "%s: %s is not a file\n", _nc_progname, filename);
+       ExitProgram(EXIT_FAILURE);
+    }
+    return fp;
+}
+
 /* Parse the "-e" option-value into a list of names */
 /* Parse the "-e" option-value into a list of names */
-static const char **
+static char **
 make_namelist(char *src)
 {
 make_namelist(char *src)
 {
-    const char **dst = 0;
+    char **dst = 0;
 
     char *s, *base;
     unsigned pass, n, nn;
 
     char *s, *base;
     unsigned pass, n, nn;
@@ -314,9 +386,7 @@ make_namelist(char *src)
     if (src == 0) {
        /* EMPTY */ ;
     } else if (strchr(src, '/') != 0) {                /* a filename */
     if (src == 0) {
        /* EMPTY */ ;
     } else if (strchr(src, '/') != 0) {                /* a filename */
-       FILE *fp = fopen(src, "r");
-       if (fp == 0)
-           failed(src);
+       FILE *fp = open_input(src);
 
        for (pass = 1; pass <= 2; pass++) {
            nn = 0;
 
        for (pass = 1; pass <= 2; pass++) {
            nn = 0;
@@ -324,11 +394,13 @@ make_namelist(char *src)
                if ((s = stripped(buffer)) != 0) {
                    if (dst != 0)
                        dst[nn] = s;
                if ((s = stripped(buffer)) != 0) {
                    if (dst != 0)
                        dst[nn] = s;
+                   else
+                       free(s);
                    nn++;
                }
            }
            if (pass == 1) {
                    nn++;
                }
            }
            if (pass == 1) {
-               dst = typeCalloc(const char *, nn + 1);
+               dst = typeCalloc(char *, nn + 1);
                rewind(fp);
            }
        }
                rewind(fp);
            }
        }
@@ -351,19 +423,19 @@ make_namelist(char *src)
                    break;
            }
            if (pass == 1)
                    break;
            }
            if (pass == 1)
-               dst = typeCalloc(const char *, nn + 1);
+               dst = typeCalloc(char *, nn + 1);
        }
     }
        }
     }
-    if (showsummary) {
+    if (showsummary && (dst != 0)) {
        fprintf(log_fp, "Entries that will be compiled:\n");
        for (n = 0; dst[n] != 0; n++)
        fprintf(log_fp, "Entries that will be compiled:\n");
        for (n = 0; dst[n] != 0; n++)
-           fprintf(log_fp, "%d:%s\n", n + 1, dst[n]);
+           fprintf(log_fp, "%u:%s\n", n + 1, dst[n]);
     }
     return dst;
 }
 
 static bool
     }
     return dst;
 }
 
 static bool
-matches(const char **needle, const char *haystack)
+matches(char **needle, const char *haystack)
 /* does entry in needle list match |-separated field in haystack? */
 {
     bool code = FALSE;
 /* does entry in needle list match |-separated field in haystack? */
 {
     bool code = FALSE;
@@ -412,29 +484,26 @@ main(int argc, char *argv[])
 
     int width = 60;
     bool formatted = FALSE;    /* reformat complex strings? */
 
     int width = 60;
     bool formatted = FALSE;    /* reformat complex strings? */
+    bool literal = FALSE;      /* suppress post-processing? */
     int numbers = 0;           /* format "%'char'" to/from "%{number}" */
     int numbers = 0;           /* format "%'char'" to/from "%{number}" */
-    bool infodump = FALSE;     /* running as captoinfo? */
-    bool capdump = FALSE;      /* running as infotocap? */
     bool forceresolve = FALSE; /* force resolution */
     bool limited = TRUE;
     char *tversion = (char *) NULL;
     const char *source_file = "terminfo";
     bool forceresolve = FALSE; /* force resolution */
     bool limited = TRUE;
     char *tversion = (char *) NULL;
     const char *source_file = "terminfo";
-    const char **namelst = 0;
+    char **namelst = 0;
     char *outdir = (char *) NULL;
     bool check_only = FALSE;
     char *outdir = (char *) NULL;
     bool check_only = FALSE;
+    bool suppress_untranslatable = FALSE;
 
     log_fp = stderr;
 
 
     log_fp = stderr;
 
-    if ((_nc_progname = strrchr(argv[0], '/')) == NULL)
-       _nc_progname = argv[0];
-    else
-       _nc_progname++;
+    _nc_progname = _nc_rootname(argv[0]);
 
 
-    if ((infodump = (strcmp(_nc_progname, "captoinfo") == 0)) != FALSE) {
+    if ((infodump = same_program(_nc_progname, PROG_CAPTOINFO)) != FALSE) {
        outform = F_TERMINFO;
        sortmode = S_TERMINFO;
     }
        outform = F_TERMINFO;
        sortmode = S_TERMINFO;
     }
-    if ((capdump = (strcm