ncurses 5.7 - patch 20090822
[ncurses.git] / ncurses / trace / visbuf.c
index 0540ee6d8184d3d0ecdb01636897fc9cd808bd57..0b64ccc65a7fb47d1764dfa837d39a2eea768be3 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
- * Copyright (c) 2001-2005,2006 Free Software Foundation, Inc.              *
+ * Copyright (c) 2001-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            *
 #include <tic.h>
 #include <ctype.h>
 
-MODULE_ID("$Id: visbuf.c,v 1.21 2006/12/02 21:20:28 tom Exp $")
+MODULE_ID("$Id: visbuf.c,v 1.33 2009/07/11 14:44:20 tom Exp $")
 
-static const char d_quote[] = {D_QUOTE, 0};
-static const char l_brace[] = {L_BRACE, 0};
-static const char r_brace[] = {R_BRACE, 0};
+#define NUM_VISBUFS 4
+
+#define NormalLen(len) (size_t) (((size_t)(len) + 1) * 4)
+#define WideLen(len)   (size_t) (((size_t)(len) + 1) * 4 * MB_CUR_MAX)
+
+#ifdef TRACE
+static const char d_quote[] = StringOf(D_QUOTE);
+static const char l_brace[] = StringOf(L_BRACE);
+static const char r_brace[] = StringOf(R_BRACE);
+#endif
 
 static char *
 _nc_vischar(char *tp, unsigned c)
 {
     if (c == '"' || c == '\\') {
        *tp++ = '\\';
-       *tp++ = c;
+       *tp++ = (char) c;
     } else if (is7bits(c) && (isgraph(c) || c == ' ')) {
-       *tp++ = c;
+       *tp++ = (char) c;
     } else if (c == '\n') {
        *tp++ = '\\';
        *tp++ = 'n';
@@ -68,10 +75,14 @@ _nc_vischar(char *tp, unsigned c)
     } else if (c == '\033') {
        *tp++ = '\\';
        *tp++ = 'e';
+    } else if (UChar(c) == 0x7f) {
+       *tp++ = '\\';
+       *tp++ = '^';
+       *tp++ = '?';
     } else if (is7bits(c) && iscntrl(UChar(c))) {
        *tp++ = '\\';
        *tp++ = '^';
-       *tp++ = '@' + c;
+       *tp++ = (char) ('@' + c);
     } else {
        sprintf(tp, "\\%03lo", (unsigned long) ChCharOf(c));
        tp += strlen(tp);
@@ -83,7 +94,7 @@ _nc_vischar(char *tp, unsigned c)
 static const char *
 _nc_visbuf2n(int bufnum, const char *buf, int len)
 {
-    char *vbuf;
+    const char *vbuf;
     char *tp;
     int c;
 
@@ -93,23 +104,34 @@ _nc_visbuf2n(int bufnum, const char *buf, int len)
        return ("(cancelled)");
 
     if (len < 0)
-       len = strlen(buf);
+       len = (int) strlen(buf);
 
 #ifdef TRACE
-    tp = vbuf = _nc_trace_buf(bufnum, (unsigned) (len * 4) + 5);
+    vbuf = tp = _nc_trace_buf(bufnum, NormalLen(len));
 #else
     {
-       static char *mybuf[2];
-       mybuf[bufnum] = typeRealloc(char, (unsigned) (len * 4) + 5, mybuf[bufnum]);
-       tp = vbuf = mybuf[bufnum];
+       static char *mybuf[NUM_VISBUFS];
+       if (bufnum < 0) {
+           for (c = 0; c < NUM_VISBUFS; ++c) {
+               FreeAndNull(mybuf[c]);
+           }
+           tp = 0;
+       } else {
+           mybuf[bufnum] = typeRealloc(char, NormalLen(len), mybuf[bufnum]);
+           vbuf = tp = mybuf[bufnum];
+       }
     }
 #endif
-    *tp++ = D_QUOTE;
-    while ((--len >= 0) && (c = *buf++) != '\0') {
-       tp = _nc_vischar(tp, UChar(c));
+    if (tp != 0) {
+       *tp++ = D_QUOTE;
+       while ((--len >= 0) && (c = *buf++) != '\0') {
+           tp = _nc_vischar(tp, UChar(c));
+       }
+       *tp++ = D_QUOTE;
+       *tp++ = '\0';
+    } else {
+       vbuf = ("(_nc_visbuf2n failed)");
     }
-    *tp++ = D_QUOTE;
-    *tp++ = '\0';
     return (vbuf);
 }
 
@@ -150,7 +172,7 @@ _nc_wchstrlen(const cchar_t *s)
 static const char *
 _nc_viswbuf2n(int bufnum, const wchar_t *buf, int len)
 {
-    char *vbuf;
+    const char *vbuf;
     char *tp;
     wchar_t c;
 
@@ -158,31 +180,35 @@ _nc_viswbuf2n(int bufnum, const wchar_t *buf, int len)
        return ("(null)");
 
     if (len < 0)
-       len = wcslen(buf);
+       len = (int) wcslen(buf);
 
 #ifdef TRACE
-    tp = vbuf = _nc_trace_buf(bufnum, (unsigned) (len * 4) + 5);
+    vbuf = tp = _nc_trace_buf(bufnum, WideLen(len));
 #else
     {
-       static char *mybuf[2];
-       mybuf[bufnum] = typeRealloc(char, (unsigned) (len * 4) + 5, mybuf[bufnum]);
-       tp = vbuf = mybuf[bufnum];
+       static char *mybuf[NUM_VISBUFS];
+       mybuf[bufnum] = typeRealloc(char, WideLen(len), mybuf[bufnum]);
+       vbuf = tp = mybuf[bufnum];
     }
 #endif
-    *tp++ = D_QUOTE;
-    while ((--len >= 0) && (c = *buf++) != '\0') {
-       char temp[CCHARW_MAX + 80];
-       int j = wctomb(temp, c), k;
-       if (j <= 0) {
-           sprintf(temp, "\\u%08X", (wint_t) c);
-           j = strlen(temp);
-       }
-       for (k = 0; k < j; ++k) {
-           tp = _nc_vischar(tp, UChar(temp[k]));
+    if (tp != 0) {
+       *tp++ = D_QUOTE;
+       while ((--len >= 0) && (c = *buf++) != '\0') {
+           char temp[CCHARW_MAX + 80];
+           int j = wctomb(temp, c), k;
+           if (j <= 0) {
+               sprintf(temp, "\\u%08X", (unsigned) c);
+               j = (int) strlen(temp);
+           }
+           for (k = 0; k < j; ++k) {
+               tp = _nc_vischar(tp, UChar(temp[k]));
+           }
        }
+       *tp++ = D_QUOTE;
+       *tp++ = '\0';
+    } else {
+       vbuf = ("(_nc_viswbuf2n failed)");
     }
-    *tp++ = D_QUOTE;
-    *tp++ = '\0';
     return (vbuf);
 }
 
@@ -235,70 +261,74 @@ _nc_viscbuf2(int bufnum, const NCURSES_CH_T * buf, int len)
     int first;
     const char *found;
 
+    if (result != 0) {
 #if USE_WIDEC_SUPPORT
-    if (len < 0)
-       len = _nc_wchstrlen(buf);
+       if (len < 0)
+           len = _nc_wchstrlen(buf);
 #endif /* USE_WIDEC_SUPPORT */
 
-    /*
-     * Display one or more strings followed by attributes.
-     */
-    first = 0;
-    while (first < len) {
-       attr_t attr = AttrOf(buf[first]);
-       int last = len - 1;
-       int j;
-
-       for (j = first + 1; j < len; ++j) {
-           if (!SameAttrOf(buf[j], buf[first])) {
-               last = j - 1;
-               break;
+       /*
+        * Display one or more strings followed by attributes.
+        */
+       first = 0;
+       while (first < len) {
+           attr_t attr = AttrOf(buf[first]);
+           int last = len - 1;
+           int j;
+
+           for (j = first + 1; j < len; ++j) {
+               if (!SameAttrOf(buf[j], buf[first])) {
+                   last = j - 1;
+                   break;
+               }
            }
-       }
 
-       result = _nc_trace_bufcat(bufnum, l_brace);
-       result = _nc_trace_bufcat(bufnum, d_quote);
-       for (j = first; j <= last; ++j) {
-           if ((found = _nc_altcharset_name(attr, (chtype) CharOf(buf[j]))) != 0) {
-               result = _nc_trace_bufcat(bufnum, found);
-               attr &= ~A_ALTCHARSET;
-           } else
+           result = _nc_trace_bufcat(bufnum, l_brace);
+           result = _nc_trace_bufcat(bufnum, d_quote);
+           for (j = first; j <= last; ++j) {
+               found = _nc_altcharset_name(attr, (chtype) CharOf(buf[j]));
+               if (found != 0) {
+                   result = _nc_trace_bufcat(bufnum, found);
+                   attr &= ~A_ALTCHARSET;
+               } else
 #if USE_WIDEC_SUPPORT
-           if (!isWidecExt(buf[j])) {
-               PUTC_DATA;
-
-               PUTC_INIT;
-               for (PUTC_i = 0; PUTC_i < CCHARW_MAX; ++PUTC_i) {
-                   int k;
-
-                   PUTC_ch = buf[j].chars[PUTC_i];
-                   if (PUTC_ch == L'\0')
-                       break;
-                   PUTC_n = wcrtomb(PUTC_buf, buf[j].chars[PUTC_i], &PUT_st);
-                   if (PUTC_n <= 0)
-                       break;
-                   for (k = 0; k < PUTC_n; k++) {
-                       char temp[80];
-                       _nc_vischar(temp, UChar(PUTC_buf[k]));
-                       result = _nc_trace_bufcat(bufnum, temp);
+               if (!isWidecExt(buf[j])) {
+                   PUTC_DATA;
+
+                   PUTC_INIT;
+                   for (PUTC_i = 0; PUTC_i < CCHARW_MAX; ++PUTC_i) {
+                       int k;
+
+                       PUTC_ch = buf[j].chars[PUTC_i];
+                       if (PUTC_ch == L'\0')
+                           break;
+                       PUTC_n = (int) wcrtomb(PUTC_buf,
+                                              buf[j].chars[PUTC_i], &PUT_st);
+                       if (PUTC_n <= 0)
+                           break;
+                       for (k = 0; k < PUTC_n; k++) {
+                           char temp[80];
+                           _nc_vischar(temp, UChar(PUTC_buf[k]));
+                           result = _nc_trace_bufcat(bufnum, temp);
+                       }
                    }
                }
-           }
 #else
-           {
-               char temp[80];
-               _nc_vischar(temp, UChar(buf[j]));
-               result = _nc_trace_bufcat(bufnum, temp);
-           }
+               {
+                   char temp[80];
+                   _nc_vischar(temp, UChar(buf[j]));
+                   result = _nc_trace_bufcat(bufnum, temp);
+               }
 #endif /* USE_WIDEC_SUPPORT */
+           }
+           result = _nc_trace_bufcat(bufnum, d_quote);
+           if (attr != A_NORMAL) {
+               result = _nc_trace_bufcat(bufnum, " | ");
+               result = _nc_trace_bufcat(bufnum, _traceattr2(bufnum + 20, attr));
+           }
+           result = _nc_trace_bufcat(bufnum, r_brace);
+           first = last + 1;
        }
-       result = _nc_trace_bufcat(bufnum, d_quote);
-       if (attr != A_NORMAL) {
-           result = _nc_trace_bufcat(bufnum, " | ");
-           result = _nc_trace_bufcat(bufnum, _traceattr2(bufnum + 20, attr));
-       }
-       result = _nc_trace_bufcat(bufnum, r_brace);
-       first = last + 1;
     }
     return result;
 }