]> ncurses.scripts.mit.edu Git - ncurses.git/blobdiff - progs/dump_entry.c
ncurses 6.4 - patch 20240414
[ncurses.git] / progs / dump_entry.c
index 6187d5b13084e76c8364d1dbba14c171149d569d..be332d2e7765c28cd4082329bff1620c19dfd704 100644 (file)
@@ -1,5 +1,6 @@
 /****************************************************************************
- * Copyright (c) 1998-2004,2005 Free Software Foundation, Inc.              *
+ * Copyright 2018-2022,2023 Thomas E. Dickey                                *
+ * Copyright 1998-2016,2017 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            *
 /****************************************************************************
  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
- *     and: Thomas E. Dickey 1996 on                                        *
+ *     and: Thomas E. Dickey                        1996 on                 *
  ****************************************************************************/
 
 #define __INTERNAL_CAPS_VISIBLE
 #include <progs.priv.h>
 
-#include "dump_entry.h"
-#include "termsort.c"          /* this C file is generated */
+#include <dump_entry.h>
+#include <termsort.h>          /* this C file is generated */
 #include <parametrized.h>      /* so is this */
 
-MODULE_ID("$Id: dump_entry.c,v 1.70 2005/07/23 20:03:30 tom Exp $")
+MODULE_ID("$Id: dump_entry.c,v 1.196 2023/05/27 20:13:10 tom Exp $")
 
-#define INDENT                 8
 #define DISCARD(string) string = ABSENT_STRING
 #define PRINTF (void) printf
+#define WRAPPED 32
+
+#define OkIndex(index,array) ((int)(index) >= 0 && (int)(index) < (int) SIZEOF(array))
+#define TcOutput() (outform == F_TERMCAP || outform == F_TCONVERR)
 
 typedef struct {
     char *text;
@@ -55,12 +59,16 @@ static int tversion;                /* terminfo version */
 static int outform;            /* output format to use */
 static int sortmode;           /* sort mode to use */
 static int width = 60;         /* max line width for listings */
+static int height = 65535;     /* max number of lines for listings */
 static int column;             /* current column, limited by 'width' */
 static int oldcol;             /* last value of column before wrap */
 static bool pretty;            /* true if we format if-then-else strings */
+static bool wrapped;           /* true if we wrap too-long strings */
+static bool did_wrap;          /* true if last wrap_concat did wrapping */
+static bool checking;          /* true if we are checking for tic */
+static int quickdump;          /* true if we are dumping compiled data */
 
 static char *save_sgr;
-static char *save_acsc;
 
 static DYNBUF outbuf;
 static DYNBUF tmpbuf;
@@ -71,12 +79,13 @@ static NCURSES_CONST char *const *bool_names;
 static NCURSES_CONST char *const *num_names;
 static NCURSES_CONST char *const *str_names;
 
-static const char *separator, *trailer;
+static const char *separator = "", *trailer = "";
+static int indent = 8;
 
 /* cover various ports and variants of terminfo */
 #define V_ALLCAPS      0       /* all capabilities (SVr4, XSI, ncurses) */
 #define V_SVR1         1       /* SVR1, Ultrix */
-#define V_HPUX         2       /* HP/UX */
+#define V_HPUX         2       /* HP-UX */
 #define V_AIX          3       /* AIX */
 #define V_BSD          4       /* BSD */
 
@@ -86,7 +95,7 @@ static const char *separator, *trailer;
 #define OBSOLETE(n) (n[0] == 'O' && n[1] == 'T')
 #endif
 
-#define isObsolete(f,n) ((f == F_TERMINFO || f == F_VARIABLE) && OBSOLETE(n))
+#define isObsolete(f,n) ((f == F_TERMINFO || f == F_VARIABLE) && (sortmode != S_VARIABLE) && OBSOLETE(n))
 
 #if NCURSES_XNAMES
 #define BoolIndirect(j) ((j >= BOOLCOUNT) ? (j) : ((sortmode == S_NOSORT) ? j : bool_indirect[j]))
@@ -98,6 +107,13 @@ static const char *separator, *trailer;
 #define StrIndirect(j)  ((sortmode == S_NOSORT) ? (j) : str_indirect[j])
 #endif
 
+static GCC_NORETURN void
+failed(const char *s)
+{
+    perror(s);
+    ExitProgram(EXIT_FAILURE);
+}
+
 static void
 strncpy_DYN(DYNBUF * dst, const char *src, size_t need)
 {
@@ -105,8 +121,10 @@ strncpy_DYN(DYNBUF * dst, const char *src, size_t need)
     if (want > dst->size) {
        dst->size += (want + 1024);     /* be generous */
        dst->text = typeRealloc(char, dst->size, dst->text);
+       if (dst->text == 0)
+           failed("strncpy_DYN");
     }
-    (void) strncpy(dst->text + dst->used, src, need);
+    _nc_STRNCPY(dst->text + dst->used, src, need + 1);
     dst->used += need;
     dst->text[dst->used] = 0;
 }
@@ -141,40 +159,57 @@ _nc_leaks_dump_entry(void)
 }
 #endif
 
+#define NameTrans(check,result) \
+           if ((np->nte_index <= OK_ ## check) \
+               && check[np->nte_index]) \
+               return (result[np->nte_index])
+
 NCURSES_CONST char *
 nametrans(const char *name)
-/* translate a capability name from termcap to terminfo */
+/* translate a capability name to termcap from terminfo */
 {
     const struct name_table_entry *np;
 
-    if ((np = _nc_find_entry(name, _nc_get_hash_table(0))) != 0)
+    if ((np = _nc_find_entry(name, _nc_get_hash_table(0))) != 0) {
        switch (np->nte_type) {
        case BOOLEAN:
-           if (bool_from_termcap[np->nte_index])
-               return (boolcodes[np->nte_index]);
+           NameTrans(bool_from_termcap, boolcodes);
            break;
 
        case NUMBER:
-           if (num_from_termcap[np->nte_index])
-               return (numcodes[np->nte_index]);
+           NameTrans(num_from_termcap, numcodes);
            break;
 
        case STRING:
-           if (str_from_termcap[np->nte_index])
-               return (strcodes[np->nte_index]);
+           NameTrans(str_from_termcap, strcodes);
            break;
        }
+    }
 
     return (0);
 }
 
 void
-dump_init(const char *version, int mode, int sort, int twidth, int traceval,
-         bool formatted)
+dump_init(const char *version,
+         int mode,
+         int sort,
+         bool wrap_strings,
+         int twidth,
+         int theight,
+         unsigned traceval,
+         bool formatted,
+         bool check,
+         int quick)
 /* set up for entry display */
 {
     width = twidth;
+    height = theight;
     pretty = formatted;
+    wrapped = wrap_strings;
+    checking = check;
+    quickdump = (quick & 3);
+
+    did_wrap = (width <= 0);
 
     /* versions */
     if (version == 0)
@@ -198,7 +233,7 @@ dump_init(const char *version, int mode, int sort, int twidth, int traceval,
        bool_names = boolnames;
        num_names = numnames;
        str_names = strnames;
-       separator = twidth ? ", " : ",";
+       separator = (twidth > 0 && theight > 1) ? ", " : ",";
        trailer = "\n\t";
        break;
 
@@ -206,7 +241,7 @@ dump_init(const char *version, int mode, int sort, int twidth, int traceval,
        bool_names = boolfnames;
        num_names = numfnames;
        str_names = strfnames;
-       separator = twidth ? ", " : ",";
+       separator = (twidth > 0 && theight > 1) ? ", " : ",";
        trailer = "\n\t";
        break;
 
@@ -219,6 +254,7 @@ dump_init(const char *version, int mode, int sort, int twidth, int traceval,
        trailer = "\\\n\t:";
        break;
     }
+    indent = 8;
 
     /* implement sort modes */
     switch (sortmode = sort) {
@@ -262,7 +298,7 @@ dump_init(const char *version, int mode, int sort, int twidth, int traceval,
                       _nc_progname, width, tversion, outform);
 }
 
-static TERMTYPE *cur_type;
+static TERMTYPE2 *cur_type;
 
 static int
 dump_predicate(PredType type, PredIdx idx)
@@ -285,18 +321,22 @@ dump_predicate(PredType type, PredIdx idx)
     return (FALSE);            /* pacify compiler */
 }
 
-static void set_obsolete_termcaps(TERMTYPE *tp);
+static void set_obsolete_termcaps(TERMTYPE2 *tp);
 
 /* is this the index of a function key string? */
-#define FNKEY(i)       (((i)<= 65 && (i)>= 75) || ((i)<= 216 && (i)>= 268))
+#define FNKEY(i) \
+    (((i) >= STR_IDX(key_f0) && \
+      (i) <= STR_IDX(key_f9)) || \
+     ((i) >= STR_IDX(key_f11) && \
+      (i) <= STR_IDX(key_f63)))
 
 /*
  * If we configure with a different Caps file, the offsets into the arrays
  * will change.  So we use an address expression.
  */
-#define BOOL_IDX(name) (&(name) - &(CUR Booleans[0]))
-#define NUM_IDX(name)  (&(name) - &(CUR Numbers[0]))
-#define STR_IDX(name)  (&(name) - &(CUR Strings[0]))
+#define BOOL_IDX(name) (PredType) (&(name) - &(CUR Booleans[0]))
+#define NUM_IDX(name)  (PredType) (&(name) - &(CUR Numbers[0]))
+#define STR_IDX(name)  (PredType) (&(name) - &(CUR Strings[0]))
 
 static bool
 version_filter(PredType type, PredIdx idx)
@@ -353,14 +393,17 @@ version_filter(PredType type, PredIdx idx)
        }
        break;
 
+#define is_termcap(type) (OkIndex(idx, type##_from_termcap) && \
+                         type##_from_termcap[idx])
+
     case V_BSD:                /* BSD */
        switch (type) {
        case BOOLEAN:
-           return bool_from_termcap[idx];
+           return is_termcap(bool);
        case NUMBER:
-           return num_from_termcap[idx];
+           return is_termcap(num);
        case STRING:
-           return str_from_termcap[idx];
+           return is_termcap(str);
        }
        break;
     }
@@ -368,33 +411,276 @@ version_filter(PredType type, PredIdx idx)
     return (FALSE);            /* pacify the compiler */
 }
 
+static void
+trim_trailing(void)
+{
+    while (outbuf.used > 0 && outbuf.text[outbuf.used - 1] == ' ')
+       outbuf.text[--outbuf.used] = '\0';
+}
+
 static void
 force_wrap(void)
 {
     oldcol = column;
+    trim_trailing();
     strcpy_DYN(&outbuf, trailer);
-    column = INDENT;
+    column = indent;
+}
+
+static int
+op_length(const char *src, int offset)
+{
+    int result = 0;
+
+    if (offset > 0 && src[offset - 1] == '\\') {
+       result = 0;
+    } else {
+       int ch;
+
+       result++;               /* for '%' mark */
+       ch = src[offset + result];
+       if (TcOutput()) {
+           if (ch == '>') {
+               result += 3;
+           } else if (ch == '+') {
+               result += 2;
+           } else {
+               result++;
+           }
+       } else if (ch == '\'') {
+           result += 3;
+       } else if (ch == L_CURL[0]) {
+           int n = result;
+           while ((ch = src[offset + n]) != '\0') {
+               if (ch == R_CURL[0]) {
+                   result = ++n;
+                   break;
+               }
+               n++;
+           }
+       } else if (strchr("pPg", ch) != 0) {
+           result += 2;
+       } else {
+           result++;           /* ordinary operator */
+       }
+    }
+    return result;
+}
+
+/*
+ * When wrapping too-long strings, avoid splitting a backslash sequence, or
+ * a terminfo '%' operator.  That will leave things a little ragged, but avoids
+ * a stray backslash at the end of the line, as well as making the result a
+ * little more readable.
+ */
+static int
+find_split(const char *src, int step, int size)
+{
+    int result = size;
+
+    if (size > 0) {
+       /* check if that would split a backslash-sequence */
+       int mark = size;
+       int n;
+
+       for (n = size - 1; n > 0; --n) {
+           int ch = UChar(src[step + n]);
+           if (ch == '\\') {
+               if (n > 0 && src[step + n - 1] == ch)
+                   --n;
+               mark = n;
+               break;
+           } else if (!isalnum(ch)) {
+               break;
+           }
+       }
+       if (mark < size) {
+           result = mark;
+       } else {
+           /* check if that would split a backslash-sequence */
+           for (n = size - 1; n > 0; --n) {
+               int ch = UChar(src[step + n]);
+               if (ch == '%') {
+                   int need = op_length(src, step + n);
+                   if ((n + need) > size) {
+                       mark = n;
+                   }
+                   break;
+               }
+           }
+           if (mark < size) {
+               result = mark;
+           }
+       }
+    }
+    return result;
+}
+
+/*
+ * If we are going to wrap lines, we cannot leave literal spaces because that
+ * would be ambiguous if we split on that space.
+ */
+static char *
+fill_spaces(const char *src)
+{
+    const char *fill = "\\s";
+    size_t need = strlen(src);
+    size_t size = strlen(fill);
+    char *result = 0;
+    int pass;
+    size_t s, d;
+    for (pass = 0; pass < 2; ++pass) {
+       for (s = d = 0; src[s] != '\0'; ++s) {
+           if (src[s] == ' ') {
+               if (pass) {
+                   _nc_STRCPY(&result[d], fill, need + 1 - d);
+                   d += size;
+               } else {
+                   need += size;
+               }
+           } else {
+               if (pass) {
+                   result[d++] = src[s];
+               } else {
+                   ++d;
+               }
+           }
+       }
+       if (pass) {
+           result[d] = '\0';
+       } else {
+           result = calloc(need + 1, sizeof(char));
+           if (result == 0)
+               failed("fill_spaces");
+       }
+    }
+    return result;
 }
 
+typedef enum {
+    wOFF = 0
+    ,w1ST = 1
+    ,w2ND = 2
+    ,wEND = 4
+    ,wERR = 8
+} WRAPMODE;
+
+#define wrap_1ST(mode) ((mode)&w1ST)
+#define wrap_END(mode) ((mode)&wEND)
+#define wrap_ERR(mode) ((mode)&wERR)
+
 static void
-wrap_concat(const char *src)
+wrap_concat(const char *src, int need, unsigned mode)
 {
-    int need = strlen(src);
-    int want = strlen(separator) + need;
+    int gaps = (int) strlen(separator);
+    int want = gaps + need;
 
-    if (column > INDENT
+    did_wrap = (width <= 0);
+    if (wrap_1ST(mode)
+       && column > indent
        && column + want > width) {
        force_wrap();
     }
-    strcpy_DYN(&outbuf, src);
-    strcpy_DYN(&outbuf, separator);
-    column += need;
+    if ((wrap_END(mode) && !wrap_ERR(mode)) &&
+       wrapped &&
+       (width >= 0) &&
+       (column + want) > width) {
+       int step = 0;
+       int used = width > WRAPPED ? width : WRAPPED;
+       int base = 0;
+       char *p, align[9];
+       const char *my_t = trailer;
+       char *fill = fill_spaces(src);
+       int last = (int) strlen(fill);
+
+       need = last;
+
+       if (TcOutput())
+           trailer = "\\\n\t ";
+
+       if (!TcOutput() && (p = strchr(fill, '=')) != 0) {
+           base = (int) (p + 1 - fill);
+           if (base > 8)
+               base = 8;
+           _nc_SPRINTF(align, _nc_SLIMIT(align) "%*s", base, " ");
+       } else if (column > 8) {
+           base = column - 8;
+           if (base > 8)
+               base = 8;
+           _nc_SPRINTF(align, _nc_SLIMIT(align) "%*s", base, " ");
+       } else {
+           align[base] = '\0';
+       }
+       /* "pretty" overrides wrapping if it already split the line */
+       if (!pretty || strchr(fill, '\n') == 0) {
+           int tag = 0;
+
+           if (TcOutput() && outbuf.used && !wrap_1ST(mode)) {
+               tag = 3;
+           }
+
+           while ((column + (need + gaps)) > used) {
+               int size = used - tag;
+               if (step) {
+                   strcpy_DYN(&outbuf, align);
+                   size -= base;
+               }
+               if (size > (last - step)) {
+                   size = (last - step);
+               }
+               size = find_split(fill, step, size);
+               strncpy_DYN(&outbuf, fill + step, (size_t) size);
+               step += size;
+               need -= size;
+               if (need > 0) {
+                   force_wrap();
+                   did_wrap = TRUE;
+                   tag = 0;
+               }
+           }
+       }
+       if (need > 0) {
+           if (step)
+               strcpy_DYN(&outbuf, align);
+           strcpy_DYN(&outbuf, fill + step);
+       }
+       if (wrap_END(mode))
+           strcpy_DYN(&outbuf, separator);
+       trailer = my_t;
+       force_wrap();
+
+       free(fill);
+    } else {
+       strcpy_DYN(&outbuf, src);
+       if (wrap_END(mode))
+           strcpy_DYN(&outbuf, separator);
+       column += (int) strlen(src);
+    }
+}
+
+static void
+wrap_concat1(const char *src)
+{
+    int need = (int) strlen(src);
+    wrap_concat(src, need, w1ST | wEND);
+}
+
+static void
+wrap_concat3(const char *name, const char *eqls, const char *value)
+{
+    int nlen = (int) strlen(name);
+    int elen = (int) strlen(eqls);
+    int vlen = (int) strlen(value);
+
+    wrap_concat(name, nlen + elen + vlen, w1ST);
+    wrap_concat(eqls, elen + vlen, w2ND);
+    wrap_concat(value, vlen, wEND);
 }
 
 #define IGNORE_SEP_TRAIL(first,last,sep_trail) \
        if ((size_t)(last - first) > sizeof(sep_trail)-1 \
         && !strncmp(first, sep_trail, sizeof(sep_trail)-1)) \
-               first += sizeof(sep_trail)-2
+               first += sizeof(sep_trail)-2
 
 /* Returns the nominal length of the buffer assuming it is termcap format,
  * i.e., the continuation sequence is treated as a single character ":".
@@ -425,45 +711,121 @@ termcap_length(const char *src)
 #define termcap_length(src) strlen(src)
 #endif
 
-static char *
-fmt_complex(char *src, int level)
+static void
+indent_DYN(DYNBUF * buffer, int level)
+{
+    int n;
+
+    for (n = 0; n < level; n++)
+       strncpy_DYN(buffer, "\t", (size_t) 1);
+}
+
+/*
+ * Check if the current line which was begun consists only of a tab and the
+ * given leading text.
+ */
+static bool
+leading_DYN(DYNBUF * buffer, const char *leading)
+{
+    bool result = FALSE;
+    size_t need = strlen(leading);
+    if (buffer->used > need) {
+       need = buffer->used - need;
+       if (!strcmp(buffer->text + need, leading)) {
+           result = TRUE;
+           while (--need != 0) {
+               if (buffer->text[need] == '\n') {
+                   break;
+               }
+               if (buffer->text[need] != '\t') {
+                   result = FALSE;
+                   break;
+               }
+           }
+       }
+    }
+    return result;
+}
+
+bool
+has_params(const char *src, bool formatting)
 {
-    int percent = 0;
+    bool result = FALSE;
+    int len = (int) strlen(src);
     int n;
-    bool if_then = strstr(src, "%?") != 0;
-    bool params = !if_then && (strlen(src) > 50) && (strstr(src, "%p") != 0);
+    bool ifthen = FALSE;
+    bool params = FALSE;
+
+    for (n = 0; n < len - 1; ++n) {
+       if (!strncmp(src + n, "%p", (size_t) 2)) {
+           params = TRUE;
+       } else if (!strncmp(src + n, "%;", (size_t) 2)) {
+           ifthen = TRUE;
+           result = params;
+           break;
+       }
+    }
+    if (!ifthen) {
+       if (formatting) {
+           result = ((len > 50) && params);
+       } else {
+           result = params;
+       }
+    }
+    return result;
+}
+
+static char *
+fmt_complex(TERMTYPE2 *tterm, const char *capability, char *src, int level)
+{
+    bool percent = FALSE;
+    bool params = has_params(src, TRUE);
 
     while (*src != '\0') {
        switch (*src) {
+       case '^':
+           percent = FALSE;
+           strncpy_DYN(&tmpbuf, src++, (size_t) 1);
+           break;
        case '\\':
-           percent = 0;
-           strncpy_DYN(&tmpbuf, src++, 1);
+           percent = FALSE;
+           strncpy_DYN(&tmpbuf, src++, (size_t) 1);
            break;
        case '%':
-           percent = 1;
+           percent = TRUE;
            break;
        case '?':               /* "if" */
        case 't':               /* "then" */
        case 'e':               /* "else" */
            if (percent) {
-               percent = 0;
+               percent = FALSE;
                tmpbuf.text[tmpbuf.used - 1] = '\n';
-               /* treat a "%e%?" as else-if, on the same level */
-               if (!strncmp(src, "e%?", 3)) {
-                   for (n = 0; n < level; n++)
-                       strncpy_DYN(&tmpbuf, "\t", 1);
-                   strncpy_DYN(&tmpbuf, "%", 1);
-                   strncpy_DYN(&tmpbuf, src, 3);
-                   src += 3;
+               /* treat a "%e" as else-if, on the same level */
+               if (*src == 'e') {
+                   indent_DYN(&tmpbuf, level);
+                   strncpy_DYN(&tmpbuf, "%", (size_t) 1);
+                   strncpy_DYN(&tmpbuf, src, (size_t) 1);
+                   src++;
+                   params = has_params(src, TRUE);
+                   if (!params && *src != '\0' && *src != '%') {
+                       strncpy_DYN(&tmpbuf, "\n", (size_t) 1);
+                       indent_DYN(&tmpbuf, level + 1);
+                   }
                } else {
-                   for (n = 0; n <= level; n++)
-                       strncpy_DYN(&tmpbuf, "\t", 1);
-                   strncpy_DYN(&tmpbuf, "%", 1);
-                   strncpy_DYN(&tmpbuf, src, 1);
+                   indent_DYN(&tmpbuf, level + 1);
+                   strncpy_DYN(&tmpbuf, "%", (size_t) 1);
+                   strncpy_DYN(&tmpbuf, src, (size_t) 1);
                    if (*src++ == '?') {
-                       src = fmt_complex(src, level + 1);
+                       src = fmt_complex(tterm, capability, src, level + 1);
+                       if (*src != '\0' && *src != '%') {
+                           strncpy_DYN(&tmpbuf, "\n", (size_t) 1);
+                           indent_DYN(&tmpbuf, level + 1);
+                       }
                    } else if (level == 1) {
-                       _nc_warning("%%%c without %%?", *src);
+                       if (checking)
+                           _nc_warning("%s: %%%c without %%? in %s",
+                                       _nc_first_name(tterm->term_names),
+                                       *src, capability);
                    }
                }
                continue;
@@ -471,49 +833,87 @@ fmt_complex(char *src, int level)
            break;
        case ';':               /* "endif" */
            if (percent) {
-               percent = 0;
+               percent = FALSE;
                if (level > 1) {
                    tmpbuf.text[tmpbuf.used - 1] = '\n';
-                   for (n = 0; n < level; n++)
-                       strncpy_DYN(&tmpbuf, "\t", 1);
-                   strncpy_DYN(&tmpbuf, "%", 1);
-                   strncpy_DYN(&tmpbuf, src++, 1);
+                   indent_DYN(&tmpbuf, level);
+                   strncpy_DYN(&tmpbuf, "%", (size_t) 1);
+                   strncpy_DYN(&tmpbuf, src++, (size_t) 1);
+                   if (src[0] == '%'
+                       && src[1] != '\0'
+                       && (strchr("?e;", src[1])) == 0) {
+                       tmpbuf.text[tmpbuf.used++] = '\n';
+                       indent_DYN(&tmpbuf, level);
+                   }
                    return src;
                }
-               _nc_warning("%%; without %%?");
+               if (checking)
+                   _nc_warning("%s: %%; without %%? in %s",
+                               _nc_first_name(tterm->term_names),
+                               capability);
            }
            break;
        case 'p':
-           if (percent && params) {
+           if (percent && params && !leading_DYN(&tmpbuf, "%")) {
                tmpbuf.text[tmpbuf.used - 1] = '\n';
-               for (n = 0; n <= level; n++)
-                   strncpy_DYN(&tmpbuf, "\t", 1);
-               strncpy_DYN(&tmpbuf, "%", 1);
+               indent_DYN(&tmpbuf, level + 1);
+               strncpy_DYN(&tmpbuf, "%", (size_t) 1);
            }
-           percent = 0;
+           percent = FALSE;
            break;
+       case ' ':
+           strncpy_DYN(&tmpbuf, "\\s", (size_t) 2);
+           ++src;
+           continue;
        default:
-           percent = 0;
+           percent = FALSE;
            break;
        }
-       strncpy_DYN(&tmpbuf, src++, 1);
+       strncpy_DYN(&tmpbuf, src++, (size_t) 1);
     }
     return src;
 }
 
+/*
+ * Make "large" numbers a little easier to read by showing them in hexadecimal
+ * if they are "close" to a power of two.
+ */
+static const char *
+number_format(int value)
+{
+    const char *result = "%d";
+
+    if ((outform != F_TERMCAP) && (value > 255)) {
+       unsigned long lv = (unsigned long) value;
+       int bits = sizeof(unsigned long) * 8;
+       int nn;
+
+       for (nn = 8; nn < bits; ++nn) {
+           unsigned long mm;
+
+           mm = 1UL << nn;
+           if ((mm - 16) <= lv && (mm + 16) > lv) {
+               result = "%#x";
+               break;
+           }
+       }
+    }
+    return result;
+}
+
 #define SAME_CAP(n,cap) (&tterm->Strings[n] == &cap)
+#define EXTRA_CAP 20
 
 int
-fmt_entry(TERMTYPE *tterm,
+fmt_entry(TERMTYPE2 *tterm,
          PredFunc pred,
-         bool content_only,
-         bool suppress_untranslatable,
-         bool infodump,
+         int content_only,
+         int suppress_untranslatable,
+         int infodump,
          int numbers)
 {
     PredIdx i, j;
-    char buffer[MAX_TERMINFO_LENGTH];
-    char *capability;
+    char buffer[MAX_TERMINFO_LENGTH + EXTRA_CAP];
     NCURSES_CONST char *name;
     int predval, len;
     PredIdx num_bools = 0;
@@ -521,9 +921,8 @@ fmt_entry(TERMTYPE *tterm,
     PredIdx num_strings = 0;
     bool outcount = 0;
 
-#define WRAP_CONCAT    \
-       wrap_concat(buffer); \
-       outcount = TRUE
+#define WRAP_CONCAT1(s)                wrap_concat1(s); outcount = TRUE
+#define WRAP_CONCAT            WRAP_CONCAT1(buffer)
 
     len = 12;                  /* terminfo file-header */
 
@@ -534,17 +933,32 @@ fmt_entry(TERMTYPE *tterm,
 
     strcpy_DYN(&outbuf, 0);
     if (content_only) {
-       column = INDENT;        /* FIXME: workaround to prevent empty lines */
+       column = indent;        /* workaround to prevent empty lines */
     } else {
        strcpy_DYN(&outbuf, tterm->term_names);
+
+       /*
+        * Colon is legal in terminfo descriptions, but not in termcap.
+        */
+       if (!infodump) {
+           char *p = outbuf.text;
+           while (*p) {
+               if (*p == ':') {
+                   *p = '=';
+               }
+               ++p;
+           }
+       }
        strcpy_DYN(&outbuf, separator);
-       column = outbuf.used;
-       force_wrap();
+       column = (int) outbuf.used;
+       if (height > 1)
+           force_wrap();
     }
 
     for_each_boolean(j, tterm) {
        i = BoolIndirect(j);
-       name = ExtBoolname(tterm, i, bool_names);
+       name = ExtBoolname(tterm, (int) i, bool_names);
+       assert(strlen(name) < sizeof(buffer) - EXTRA_CAP);
 
        if (!version_filter(BOOLEAN, i))
            continue;
@@ -553,21 +967,22 @@ fmt_entry(TERMTYPE *tterm,
 
        predval = pred(BOOLEAN, i);
        if (predval != FAIL) {
-           (void) strcpy(buffer, name);
+           _nc_STRCPY(buffer, name, sizeof(buffer));
            if (predval <= 0)
-               (void) strcat(buffer, "@");
+               _nc_STRCAT(buffer, "@", sizeof(buffer));
            else if (i + 1 > num_bools)
                num_bools = i + 1;
            WRAP_CONCAT;
        }
     }
 
-    if (column != INDENT)
+    if (column != indent && height > 1)
        force_wrap();
 
     for_each_number(j, tterm) {
        i = NumIndirect(j);
-       name = ExtNumname(tterm, i, num_names);
+       name = ExtNumname(tterm, (int) i, num_names);
+       assert(strlen(name) < sizeof(buffer) - EXTRA_CAP);
 
        if (!version_filter(NUMBER, i))
            continue;
@@ -577,9 +992,16 @@ fmt_entry(TERMTYPE *tterm,
        predval = pred(NUMBER, i);
        if (predval != FAIL) {
            if (tterm->Numbers[i] < 0) {
-               sprintf(buffer, "%s@", name);
+               _nc_SPRINTF(buffer, _nc_SLIMIT(sizeof(buffer))
+                           "%s@", name);
            } else {
-               sprintf(buffer, "%s#%d", name, tterm->Numbers[i]);
+               size_t nn;
+               _nc_SPRINTF(buffer, _nc_SLIMIT(sizeof(buffer))
+                           "%s#", name);
+               nn = strlen(buffer);
+               _nc_SPRINTF(buffer + nn, _nc_SLIMIT(sizeof(buffer) - nn)
+                           number_format(tterm->Numbers[i]),
+                           tterm->Numbers[i]);
                if (i + 1 > num_values)
                    num_values = i + 1;
            }
@@ -587,32 +1009,35 @@ fmt_entry(TERMTYPE *tterm,
        }
     }
 
-    if (column != INDENT)
+    if (column != indent && height > 1)
        force_wrap();
 
-    len += num_bools
-       + num_values * 2
-       + strlen(tterm->term_names) + 1;
+    len += (int) (num_bools
+                 + num_values * 2
+                 + strlen(tterm->term_names) + 1);
     if (len & 1)
        len++;
 
 #undef CUR
 #define CUR tterm->
     if (outform == F_TERMCAP) {
-       if (termcap_reset != ABSENT_STRING) {
-           if (init_3string != ABSENT_STRING
+       if (VALID_STRING(termcap_reset)) {
+           if (VALID_STRING(init_3string)
                && !strcmp(init_3string, termcap_reset))
                DISCARD(init_3string);
 
-           if (reset_2string != ABSENT_STRING
+           if (VALID_STRING(reset_2string)
                && !strcmp(reset_2string, termcap_reset))
                DISCARD(reset_2string);
        }
     }
 
     for_each_string(j, tterm) {
+       char *capability;
        i = StrIndirect(j);
-       name = ExtStrname(tterm, i, str_names);
+       name = ExtStrname(tterm, (int) i, str_names);
+       assert(strlen(name) < sizeof(buffer) - EXTRA_CAP);
+
        capability = tterm->Strings[i];
 
        if (!version_filter(STRING, i))
@@ -638,14 +1063,14 @@ fmt_entry(TERMTYPE *tterm,
            if (PRESENT(insert_character) || PRESENT(parm_ich)) {
                if (SAME_CAP(i, enter_insert_mode)
                    && enter_insert_mode == ABSENT_STRING) {
-                   (void) strcpy(buffer, "im=");
+                   _nc_STRCPY(buffer, "im=", sizeof(buffer));
                    WRAP_CONCAT;
                    continue;
                }
 
                if (SAME_CAP(i, exit_insert_mode)
                    && exit_insert_mode == ABSENT_STRING) {
-                   (void) strcpy(buffer, "ei=");
+                   _nc_STRCPY(buffer, "ei=", sizeof(buffer));
                    WRAP_CONCAT;
                    continue;
                }
@@ -662,8 +1087,12 @@ fmt_entry(TERMTYPE *tterm,
                    set_attributes = save_sgr;
 
                    trimmed_sgr0 = _nc_trim_sgr0(tterm);
-                   if (strcmp(capability, trimmed_sgr0))
+                   if (strcmp(capability, trimmed_sgr0)) {
                        capability = trimmed_sgr0;
+                   } else {
+                       if (trimmed_sgr0 != exit_attribute_mode)
+                           free(trimmed_sgr0);
+                   }
 
                    set_attributes = my_sgr;
                }
@@ -674,45 +1103,67 @@ fmt_entry(TERMTYPE *tterm,
        buffer[0] = '\0';
 
        if (predval != FAIL) {
-           if (capability != ABSENT_STRING
+           if (VALID_STRING(capability)
                && i + 1 > num_strings)
                num_strings = i + 1;
 
            if (!VALID_STRING(capability)) {
-               sprintf(buffer, "%s@", name);
+               _nc_SPRINTF(buffer, _nc_SLIMIT(sizeof(buffer))
+                           "%s@", name);
                WRAP_CONCAT;
-           } else if (outform == F_TERMCAP || outform == F_TCONVERR) {
+           } else if (TcOutput()) {
+               char *srccap = _nc_tic_expand(capability, TRUE, numbers);
                int params = ((i < (int) SIZEOF(parametrized))
                              ? parametrized[i]
-                             : 0);
-               char *srccap = _nc_tic_expand(capability, TRUE, numbers);
+                             : ((*srccap == 'k')
+                                ? 0
+                                : has_params(srccap, FALSE)));
                char *cv = _nc_infotocap(name, srccap, params);
 
                if (cv == 0) {
                    if (outform == F_TCONVERR) {
-                       sprintf(buffer, "%s=!!! %s WILL NOT CONVERT !!!",
-                               name, srccap);
+                       _nc_SPRINTF(buffer, _nc_SLIMIT(sizeof(buffer))
+                                   "%s=!!! %s WILL NOT CONVERT !!!",
+                                   name, srccap);
+                       WRAP_CONCAT;
                    } else if (suppress_untranslatable) {
                        continue;
                    } else {
                        char *s = srccap, *d = buffer;
-                       sprintf(d, "..%s=", name);
-                       d += strlen(d);
+                       int need = 3 + (int) strlen(name);
                        while ((*d = *s++) != 0) {
+                           if ((d - buffer + 2) >= (int) sizeof(buffer)) {
+                               fprintf(stderr,
+                                       "%s: value for %s is too long\n",
+                                       _nc_progname,
+                                       name);
+                               *d = '\0';
+                               break;
+                           }
                            if (*d == ':') {
                                *d++ = '\\';
                                *d = ':';
                            } else if (*d == '\\') {
-                               *++d = *s++;
+                               if ((*++d = *s++) == '\0')
+                                   break;
                            }
                            d++;
+                           *d = '\0';
                        }
+                       need += (int) (d - buffer);
+                       wrap_concat("..", need, w1ST | wERR);
+                       need -= 2;
+                       wrap_concat(name, need, wOFF | wERR);
+                       need -= (int) strlen(name);
+                       wrap_concat("=", need, w2ND | wERR);
+                       need -= 1;
+                       wrap_concat(buffer, need, wEND | wERR);
+                       outcount = TRUE;
                    }
                } else {
-                   sprintf(buffer, "%s=%s", name, cv);
+                   wrap_concat3(name, "=", cv);
                }
-               len += strlen(capability) + 1;
-               WRAP_CONCAT;
+               len += (int) strlen(capability) + 1;
            } else {
                char *src = _nc_tic_expand(capability,
                                           outform == F_TERMINFO, numbers);
@@ -723,33 +1174,35 @@ fmt_entry(TERMTYPE *tterm,
                if (pretty
                    && (outform == F_TERMINFO
                        || outform == F_VARIABLE)) {
-                   fmt_complex(src, 1);
+                   fmt_complex(tterm, name, src, 1);
                } else {
                    strcpy_DYN(&tmpbuf, src);
                }
-               len += strlen(capability) + 1;
-               wrap_concat(tmpbuf.text);
-               outcount = TRUE;
+               len += (int) strlen(capability) + 1;
+               WRAP_CONCAT1(tmpbuf.text);
            }
        }
        /* e.g., trimmed_sgr0 */
-       if (capability != tterm->Strings[i])
+       if (VALID_STRING(capability) &&
+           capability != tterm->Strings[i])
            free(capability);
     }
-    len += num_strings * 2;
+    len += (int) (num_strings * 2);
 
     /*
      * This piece of code should be an effective inverse of the functions
-     * postprocess_terminfo and postprocess_terminfo in parse_entry.c.
+     * postprocess_terminfo() and postprocess_terminfo() in parse_entry.c.
      * Much more work should be done on this to support dumping termcaps.
      */
     if (tversion == V_HPUX) {
-       if (memory_lock) {
-           (void) sprintf(buffer, "meml=%s", memory_lock);
+       if (VALID_STRING(memory_lock)) {
+           _nc_SPRINTF(buffer, _nc_SLIMIT(sizeof(buffer))
+                       "meml=%s", memory_lock);
            WRAP_CONCAT;
        }
-       if (memory_unlock) {
-           (void) sprintf(buffer, "memu=%s", memory_unlock);
+       if (VALID_STRING(memory_unlock)) {
+           _nc_SPRINTF(buffer, _nc_SLIMIT(sizeof(buffer))
+                       "memu=%s", memory_unlock);
            WRAP_CONCAT;
        }
     } else if (tversion == V_AIX) {
@@ -761,7 +1214,7 @@ fmt_entry(TERMTYPE *tterm,
 
            tp = boxchars;
            for (cp = acstrans; *cp; cp++) {
-               sp = strchr(acs_chars, *cp);
+               sp = (strchr) (acs_chars, *cp);
                if (sp)
                    *tp++ = sp[1];
                else {
@@ -772,9 +1225,41 @@ fmt_entry(TERMTYPE *tterm,
            tp[0] = '\0';
 
            if (box_ok) {
-               (void) strcpy(buffer, "box1=");
-               (void) strcat(buffer, _nc_tic_expand(boxchars,
-                                                    outform == F_TERMINFO, numbers));
+               char *tmp = _nc_tic_expand(boxchars,
+                                          (outform == F_TERMINFO),
+                                          numbers);
+               _nc_STRCPY(buffer, "box1=", sizeof(buffer));
+               while (*tmp != '\0') {
+                   size_t have = strlen(buffer);
+                   size_t next = strlen(tmp);
+                   size_t want = have + next + 1;
+                   size_t last = next;
+                   char save = '\0';
+
+                   /*
+                    * If the expanded string is too long for the buffer,
+                    * chop it off and save the location where we chopped it.
+                    */
+                   if (want >= sizeof(buffer)) {
+                       save = tmp[last];
+                       tmp[last] = '\0';
+                   }
+                   _nc_STRCAT(buffer, tmp, sizeof(buffer));
+
+                   /*
+                    * If we chopped the buffer, replace the missing piece and
+                    * shift everything to append the remainder.
+                    */
+                   if (save != '\0') {
+                       next = 0;
+                       tmp[last] = save;
+                       while ((tmp[next] = tmp[last + next]) != '\0') {
+                           ++next;
+                       }
+                   } else {
+                       break;
+                   }
+               }
                WRAP_CONCAT;
            }
        }
@@ -786,10 +1271,12 @@ fmt_entry(TERMTYPE *tterm,
      */
     if (outcount) {
        bool trimmed = FALSE;
-       j = outbuf.used;
-       if (j >= 2
-           && outbuf.text[j - 1] == '\t'
-           && outbuf.text[j - 2] == '\n') {
+       j = (PredIdx) outbuf.used;
+       if (wrapped && did_wrap) {
+           /* EMPTY */ ;
+       } else if (j >= 2
+                  && outbuf.text[j - 1] == '\t'
+                  && outbuf.text[j - 2] == '\n') {
            outbuf.used -= 2;
            trimmed = TRUE;
        } else if (j >= 4
@@ -803,6 +1290,7 @@ fmt_entry(TERMTYPE *tterm,
        if (trimmed) {
            outbuf.text[outbuf.used] = '\0';
            column = oldcol;
+           strcpy_DYN(&outbuf, " ");
        }
     }
 #if 0
@@ -823,9 +1311,9 @@ fmt_entry(TERMTYPE *tterm,
 }
 
 static bool
-kill_string(TERMTYPE *tterm, char *cap)
+kill_string(TERMTYPE2 *tterm, const char *const cap)
 {
-    int n;
+    unsigned n;
     for (n = 0; n < NUM_STRINGS(tterm); ++n) {
        if (cap == tterm->Strings[n]) {
            tterm->Strings[n] = ABSENT_STRING;
@@ -836,7 +1324,7 @@ kill_string(TERMTYPE *tterm, char *cap)
 }
 
 static char *
-find_string(TERMTYPE *tterm, char *name)
+find_string(TERMTYPE2 *tterm, char *name)
 {
     PredIdx n;
     for (n = 0; n < NUM_STRINGS(tterm); ++n) {
@@ -857,18 +1345,20 @@ find_string(TERMTYPE *tterm, char *name)
  * make it smaller.
  */
 static int
-kill_labels(TERMTYPE *tterm, int target)
+kill_labels(TERMTYPE2 *tterm, int target)
 {
     int n;
     int result = 0;
-    char *cap;
-    char name[10];
+    char name[20];
 
     for (n = 0; n <= 10; ++n) {
-       sprintf(name, "lf%d", n);
-       if ((cap = find_string(tterm, name)) != ABSENT_STRING
+       char *cap;
+
+       _nc_SPRINTF(name, _nc_SLIMIT(sizeof(name)) "lf%d", n);
+       cap = find_string(tterm, name);
+       if (VALID_STRING(cap)
            && kill_string(tterm, cap)) {
-           target -= (strlen(cap) + 5);
+           target -= (int) (strlen(cap) + 5);
            ++result;
            if (target < 0)
                break;
@@ -882,18 +1372,20 @@ kill_labels(TERMTYPE *tterm, int target)
  * make it smaller.
  */
 static int
-kill_fkeys(TERMTYPE *tterm, int target)
+kill_fkeys(TERMTYPE2 *tterm, int target)
 {
     int n;
     int result = 0;
-    char *cap;
-    char name[10];
+    char name[20];
 
     for (n = 60; n >= 0; --n) {
-       sprintf(name, "kf%d", n);
-       if ((cap = find_string(tterm, name)) != ABSENT_STRING
+       char *cap;
+
+       _nc_SPRINTF(name, _nc_SLIMIT(sizeof(name)) "kf%d", n);
+       cap = find_string(tterm, name);
+       if (VALID_STRING(cap)
            && kill_string(tterm, cap)) {
-           target -= (strlen(cap) + 5);
+           target -= (int) (strlen(cap) + 5);
            ++result;
            if (target < 0)
                break;
@@ -902,28 +1394,152 @@ kill_fkeys(TERMTYPE *tterm, int target)
     return result;
 }
 
+/*
+ * Check if the given acsc string is a 1-1 mapping, i.e., just-like-vt100.
+ * Also, since this is for termcap, we only care about the line-drawing map.
+ */
+#define isLine(c) (strchr("lmkjtuvwqxn", c) != 0)
+
+static bool
+one_one_mapping(const char *mapping)
+{
+    bool result = TRUE;
+
+    if (VALID_STRING(mapping)) {
+       int n = 0;
+       while (mapping[n] != '\0' && mapping[n + 1] != '\0') {
+           if (isLine(mapping[n]) &&
+               mapping[n] != mapping[n + 1]) {
+               result = FALSE;
+               break;
+           }
+           n += 2;
+       }
+    }
+    return result;
+}
+
 #define FMT_ENTRY() \
                fmt_entry(tterm, pred, \
-                       (already_used > 0), \
+                       0, \
                        suppress_untranslatable, \
                        infodump, numbers)
 
-#define SHOW_WHY if (!already_used) PRINTF
+#define SHOW_WHY PRINTF
 
-int
-dump_entry(TERMTYPE *tterm,
-          bool suppress_untranslatable,
-          bool limited,
-          int already_used,
+static bool
+purged_acs(TERMTYPE2 *tterm)
+{
+    bool result = FALSE;
+
+    if (VALID_STRING(acs_chars)) {
+       if (!one_one_mapping(acs_chars)) {
+           enter_alt_charset_mode = ABSENT_STRING;
+           exit_alt_charset_mode = ABSENT_STRING;
+           SHOW_WHY("# (rmacs/smacs removed for consistency)\n");
+       }
+       result = TRUE;
+    }
+    return result;
+}
+
+static void
+encode_b64(char *target, char *source, unsigned state, int *saved)
+{
+    /* RFC-4648 */
+    static const char data[] =
+    "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
+    "abcdefghijklmnopqrstuvwxyz"
+    "0123456789" "-_";
+    int ch = UChar(source[state]);
+
+    switch (state % 3) {
+    case 0:
+       *target++ = data[(ch >> 2) & 077];
+       *saved = (ch << 4);
+       break;
+    case 1:
+       *target++ = data[((ch >> 4) | *saved) & 077];
+       *saved = (ch << 2);
+       break;
+    case 2:
+       *target++ = data[((ch >> 6) | *saved) & 077];
+       *target++ = data[ch & 077];
+       *saved = 0;
+       break;
+    }
+    *target = '\0';
+}
+
+/*
+ * Dump a single entry.
+ */
+void
+dump_entry(TERMTYPE2 *tterm,
+          int suppress_untranslatable,
+          int limited,
           int numbers,
           PredFunc pred)
-/* dump a single entry */
 {
-    int len, critlen;
+    TERMTYPE2 save_tterm;
+    int critlen;
     const char *legend;
     bool infodump;
 
-    if (outform == F_TERMCAP || outform == F_TCONVERR) {
+    if (quickdump) {
+       char bigbuf[65536];
+       unsigned offset = 0;
+
+       separator = "";
+       trailer = "\n";
+       indent = 0;
+
+       if (_nc_write_object(tterm, bigbuf, &offset, sizeof(bigbuf)) == OK) {
+           char numbuf[80];
+           unsigned n;
+
+           if (quickdump & 1) {
+               if (outbuf.used)
+                   wrap_concat1("\n");
+               wrap_concat1("hex:");
+               for (n = 0; n < offset; ++n) {
+                   _nc_SPRINTF(numbuf, _nc_SLIMIT(sizeof(numbuf))
+                               "%02X", UChar(bigbuf[n]));
+                   wrap_concat1(numbuf);
+               }
+           }
+           if (quickdump & 2) {
+               static char padding[] =
+               {0, 0};
+               int value = 0;
+
+               if (outbuf.used)
+                   wrap_concat1("\n");
+               wrap_concat1("b64:");
+               for (n = 0; n < offset; ++n) {
+                   encode_b64(numbuf, bigbuf, n, &value);
+                   wrap_concat1(numbuf);
+               }
+               switch (n % 3) {
+               case 0:
+                   break;
+               case 1:
+                   encode_b64(numbuf, padding, 1, &value);
+                   wrap_concat1(numbuf);
+                   wrap_concat1("==");
+                   break;
+               case 2:
+                   encode_b64(numbuf, padding, 1, &value);
+                   wrap_concat1(numbuf);
+                   wrap_concat1("=");
+                   break;
+               }
+           }
+       }
+       return;
+    }
+
+    if (TcOutput()) {
        critlen = MAX_TERMCAP_LENGTH;
        legend = "older termcap";
        infodump = FALSE;
@@ -933,21 +1549,22 @@ dump_entry(TERMTYPE *tterm,
        legend = "terminfo";
        infodump = TRUE;
     }
-    critlen -= already_used;
 
     save_sgr = set_attributes;
-    save_acsc = acs_chars;
 
-    if (((len = FMT_ENTRY()) > critlen)
+    if ((FMT_ENTRY() > critlen)
+       && TcOutput()
        && limited) {
+
+       save_tterm = *tterm;
        if (!suppress_untranslatable) {
            SHOW_WHY("# (untranslatable capabilities removed to fit entry within %d bytes)\n",
                     critlen);
            suppress_untranslatable = TRUE;
        }
-       if ((len = FMT_ENTRY()) > critlen) {
+       if (FMT_ENTRY() > critlen) {
            /*
-            * We pick on sgr because it's a nice long string capability that
+            * We pick on sgr because it is a nice long string capability that
             * is really just an optimization hack.  Another good candidate is
             * acsc since it is both long and unused by BSD termcap.
             */
@@ -958,9 +1575,9 @@ dump_entry(TERMTYPE *tterm,
             * Extended names are most likely function-key definitions.  Drop
             * those first.
             */
-           int n;
+           unsigned n;
            for (n = STRCOUNT; n < NUM_STRINGS(tterm); n++) {
-               char *name = ExtStrname(tterm, n, strnames);
+               const char *name = ExtStrname(tterm, (int) n, strnames);
 
                if (VALID_STRING(tterm->Strings[n])) {
                    set_attributes = ABSENT_STRING;
@@ -971,7 +1588,7 @@ dump_entry(TERMTYPE *tterm,
                                 critlen);
                    }
                    changed = TRUE;
-                   if ((len = FMT_ENTRY()) <= critlen)
+                   if (FMT_ENTRY() <= critlen)
                        break;
                }
            }
@@ -982,16 +1599,17 @@ dump_entry(TERMTYPE *tterm,
                         critlen);
                changed = TRUE;
            }
-           if (!changed || ((len = FMT_ENTRY()) > critlen)) {
-               if (VALID_STRING(acs_chars)) {
+           if (!changed || (FMT_ENTRY() > critlen)) {
+               if (purged_acs(tterm)) {
                    acs_chars = ABSENT_STRING;
                    SHOW_WHY("# (acsc removed to fit entry within %d bytes)\n",
                             critlen);
                    changed = TRUE;
                }
            }
-           if (!changed || ((len = FMT_ENTRY()) > critlen)) {
+           if (!changed || (FMT_ENTRY() > critlen)) {
                int oldversion = tversion;
+               int len;
 
                tversion = V_BSD;
                SHOW_WHY("# (terminfo-only capabilities suppressed to fit entry within %d bytes)\n",
@@ -1010,41 +1628,89 @@ dump_entry(TERMTYPE *tterm,
                             critlen);
                    len = FMT_ENTRY();
                }
-               if (len > critlen && !already_used) {
+               if (len > critlen) {
                    (void) fprintf(stderr,
-                                  "warning: %s entry is %d bytes long\n",
+                                  "%s: %s entry is %d bytes long\n",
+                                  _nc_progname,
                                   _nc_first_name(tterm->term_names),
                                   len);
                    SHOW_WHY("# WARNING: this entry, %d bytes long, may core-dump %s libraries!\n",
-                            already_used + len, legend);
+                            len, legend);
                }
                tversion = oldversion;
            }
            set_attributes = save_sgr;
-           acs_chars = save_acsc;
+           *tterm = save_tterm;
+       }
+    } else if (!version_filter(STRING, STR_IDX(acs_chars))) {
+       save_tterm = *tterm;
+       if (purged_acs(tterm)) {
+           (void) FMT_ENTRY();
        }
+       *tterm = save_tterm;
     }
-
-    (void) fputs(outbuf.text, stdout);
-    return len;
 }
 
-int
-dump_uses(const char *name, bool infodump)
+void
+dump_uses(const char *value, bool infodump)
 /* dump "use=" clauses in the appropriate format */
 {
-    char buffer[MAX_TERMINFO_LENGTH];
+    char buffer[MAX_TERMINFO_LENGTH + EXTRA_CAP];
+    int limit = (VALID_STRING(value) ? (int) strlen(value) : 0);
+    const char *cap = infodump ? "use" : "tc";
+
+    if (TcOutput())
+       trim_trailing();
+    if (limit == 0) {
+       _nc_warning("empty \"%s\" field", cap);
+       value = "";
+    } else if (limit > MAX_ALIAS) {
+       _nc_warning("\"%s\" field too long (%d), limit to %d",
+                   cap, limit, MAX_ALIAS);
+       limit = MAX_ALIAS;
+    }
+    _nc_SPRINTF(buffer, _nc_SLIMIT(sizeof(buffer))
+               "%s=%.*s", cap, limit, value);
+    wrap_concat1(buffer);
+}
 
-    strcpy_DYN(&outbuf, 0);
-    (void) sprintf(buffer, "%s%s", infodump ? "use=" : "tc=", name);
-    wrap_concat(buffer);
-    (void) fputs(outbuf.text, stdout);
-    return outbuf.used;
+int
+show_entry(void)
+{
+    /*
+     * Trim any remaining whitespace.
+     */
+    if (outbuf.used != 0) {
+       bool infodump = !TcOutput();
+       char delim = (char) (infodump ? ',' : ':');
+       int j;
+
+       for (j = (int) outbuf.used - 1; j > 0; --j) {
+           char ch = outbuf.text[j];
+           if (ch == '\n') {
+               ;
+           } else if (isspace(UChar(ch))) {
+               outbuf.used = (size_t) j;
+           } else if (!infodump && ch == '\\') {
+               outbuf.used = (size_t) j;
+           } else if (ch == delim && (outbuf.text[j - 1] != '\\')) {
+               outbuf.used = (size_t) (j + 1);
+           } else {
+               break;
+           }
+       }
+       outbuf.text[outbuf.used] = '\0';
+    }
+    if (outbuf.text != 0) {
+       (void) fputs(outbuf.text, stdout);
+       putchar('\n');
+    }
+    return (int) outbuf.used;
 }
 
 void
-compare_entry(void (*hook) (PredType t, PredIdx i, const char *name),
-             TERMTYPE *tp GCC_UNUSED,
+compare_entry(PredHook hook,
+             TERMTYPE2 *tp GCC_UNUSED,
              bool quiet)
 /* compare two entries */
 {
@@ -1055,7 +1721,7 @@ compare_entry(void (*hook) (PredType t, PredIdx i, const char *name),
        fputs("    comparing booleans.\n", stdout);
     for_each_boolean(j, tp) {
        i = BoolIndirect(j);
-       name = ExtBoolname(tp, i, bool_names);
+       name = ExtBoolname(tp, (int) i, bool_names);
 
        if (isObsolete(outform, name))
            continue;
@@ -1067,7 +1733,7 @@ compare_entry(void (*hook) (PredType t, PredIdx i, const char *name),
        fputs("    comparing numbers.\n", stdout);
     for_each_number(j, tp) {
        i = NumIndirect(j);
-       name = ExtNumname(tp, i, num_names);
+       name = ExtNumname(tp, (int) i, num_names);
 
        if (isObsolete(outform, name))
            continue;
@@ -1079,7 +1745,7 @@ compare_entry(void (*hook) (PredType t, PredIdx i, const char *name),
        fputs("    comparing strings.\n", stdout);
     for_each_string(j, tp) {
        i = StrIndirect(j);
-       name = ExtStrname(tp, i, str_names);
+       name = ExtStrname(tp, (int) i, str_names);
 
        if (isObsolete(outform, name))
            continue;
@@ -1103,7 +1769,7 @@ compare_entry(void (*hook) (PredType t, PredIdx i, const char *name),
 #define CUR tp->
 
 static void
-set_obsolete_termcaps(TERMTYPE *tp)
+set_obsolete_termcaps(TERMTYPE2 *tp)
 {
 #include "capdefaults.c"
 }
@@ -1113,18 +1779,17 @@ set_obsolete_termcaps(TERMTYPE *tp)
  * unique.
  */
 void
-repair_acsc(TERMTYPE *tp)
+repair_acsc(TERMTYPE2 *tp)
 {
     if (VALID_STRING(acs_chars)) {
-       size_t n, m;
+       size_t n;
        char mapped[256];
-       char extra = 0;
        unsigned source;
        unsigned target;
        bool fix_needed = FALSE;
 
        for (n = 0, source = 0; acs_chars[n] != 0; n++) {
-           target = acs_chars[n];
+           target = UChar(acs_chars[n]);
            if (source >= target) {
                fix_needed = TRUE;
                break;
@@ -1133,20 +1798,24 @@ repair_acsc(TERMTYPE *tp)
            if (acs_chars[n + 1])
                n++;
        }
+
        if (fix_needed) {
+           size_t m;
+           char extra = 0;
+
            memset(mapped, 0, sizeof(mapped));
            for (n = 0; acs_chars[n] != 0; n++) {
-               source = acs_chars[n];
+               source = UChar(acs_chars[n]);
                if ((target = (unsigned char) acs_chars[n + 1]) != 0) {
-                   mapped[source] = target;
+                   mapped[source] = (char) target;
                    n++;
                } else {
-                   extra = source;
+                   extra = (char) source;
                }
            }
            for (n = m = 0; n < sizeof(mapped); n++) {
                if (mapped[n]) {
-                   acs_chars[m++] = n;
+                   acs_chars[m++] = (char) n;
                    acs_chars[m++] = mapped[n];
                }
            }