ncurses 6.0 - patch 20170114
[ncurses.git] / ncurses / tinfo / comp_expand.c
index 7ba438aff8e265346f480ce9e998605a329e69cd..742fa7c248b256ec8f61596ddd94a7a12be9c5ab 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
 /****************************************************************************
- * Copyright (c) 1998,2000,2001 Free Software Foundation, Inc.              *
+ * Copyright (c) 1998-2012,2016 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            *
@@ -35,7 +35,7 @@
 #include <ctype.h>
 #include <tic.h>
 
 #include <ctype.h>
 #include <tic.h>
 
-MODULE_ID("$Id: comp_expand.c,v 1.17 2001/09/22 19:16:52 tom Exp $")
+MODULE_ID("$Id: comp_expand.c,v 1.26 2016/09/24 21:15:51 tom Exp $")
 
 static int
 trailing_spaces(const char *src)
 
 static int
 trailing_spaces(const char *src)
@@ -46,22 +46,32 @@ trailing_spaces(const char *src)
 }
 
 /* this deals with differences over whether 0x7f and 0x80..0x9f are controls */
 }
 
 /* this deals with differences over whether 0x7f and 0x80..0x9f are controls */
-#define REALCTL(s) (UChar(*(s)) < 127 && iscntrl(UChar(*(s))))
+#define REALCTL(s)   (UChar(*(s)) < 127 && iscntrl(UChar(*(s))))
 #define REALPRINT(s) (UChar(*(s)) < 127 && isprint(UChar(*(s))))
 
 #define REALPRINT(s) (UChar(*(s)) < 127 && isprint(UChar(*(s))))
 
+#define P_LIMIT(p)   (length - (size_t)(p))
+
 NCURSES_EXPORT(char *)
 NCURSES_EXPORT(char *)
-_nc_tic_expand
-(const char *srcp, bool tic_format, int numbers)
+_nc_tic_expand(const char *srcp, bool tic_format, int numbers)
 {
     static char *buffer;
     static size_t length;
 
     int bufp;
 {
     static char *buffer;
     static size_t length;
 
     int bufp;
-    const char *str = VALID_STRING(srcp) ? srcp : "";
+    const char *str = VALID_STRING(srcp) ? srcp : "\0\0";
     bool islong = (strlen(str) > 3);
     size_t need = (2 + strlen(str)) * 4;
     int ch;
 
     bool islong = (strlen(str) > 3);
     size_t need = (2 + strlen(str)) * 4;
     int ch;
 
+    if (srcp == 0) {
+#if NO_LEAKS
+       if (buffer != 0) {
+           FreeAndNull(buffer);
+           length = 0;
+       }
+#endif
+       return 0;
+    }
     if (buffer == 0 || need > length) {
        if ((buffer = typeRealloc(char, length = need, buffer)) == 0)
              return 0;
     if (buffer == 0 || need > length) {
        if ((buffer = typeRealloc(char, length = need, buffer)) == 0)
              return 0;
@@ -82,8 +92,9 @@ _nc_tic_expand
                    && str[1] != '\\'
                    && REALPRINT(str + 1)
                    && str[2] == S_QUOTE) {
                    && str[1] != '\\'
                    && REALPRINT(str + 1)
                    && str[2] == S_QUOTE) {
-                   sprintf(buffer + bufp, "{%d}", str[1]);
-                   bufp += strlen(buffer + bufp);
+                   _nc_SPRINTF(buffer + bufp, _nc_SLIMIT(P_LIMIT(bufp))
+                               "{%d}", str[1]);
+                   bufp += (int) strlen(buffer + bufp);
                    str += 2;
                } else {
                    buffer[bufp++] = *str;
                    str += 2;
                } else {
                    buffer[bufp++] = *str;
@@ -111,7 +122,7 @@ _nc_tic_expand
                        if (ch == '\\'
                            || ch == S_QUOTE)
                            buffer[bufp++] = '\\';
                        if (ch == '\\'
                            || ch == S_QUOTE)
                            buffer[bufp++] = '\\';
-                       buffer[bufp++] = ch;
+                       buffer[bufp++] = (char) ch;
                        buffer[bufp++] = S_QUOTE;
                        str = dst;
                    } else {
                        buffer[bufp++] = S_QUOTE;
                        str = dst;
                    } else {
@@ -122,6 +133,8 @@ _nc_tic_expand
                }
                break;
            default:
                }
                break;
            default:
+               if (*str == ',')        /* minitel1 uses this */
+                   buffer[bufp++] = '\\';
                buffer[bufp++] = *str;
                break;
            }
                buffer[bufp++] = *str;
                break;
            }
@@ -140,13 +153,13 @@ _nc_tic_expand
            buffer[bufp++] = 's';
        } else if ((ch == ',' || ch == ':' || ch == '^') && tic_format) {
            buffer[bufp++] = '\\';
            buffer[bufp++] = 's';
        } else if ((ch == ',' || ch == ':' || ch == '^') && tic_format) {
            buffer[bufp++] = '\\';
-           buffer[bufp++] = ch;
+           buffer[bufp++] = (char) ch;
        } else if (REALPRINT(str)
                   && (ch != ','
                       && ch != ':'
                       && !(ch == '!' && !tic_format)
                       && ch != '^'))
        } else if (REALPRINT(str)
                   && (ch != ','
                       && ch != ':'
                       && !(ch == '!' && !tic_format)
                       && ch != '^'))
-           buffer[bufp++] = ch;
+           buffer[bufp++] = (char) ch;
 #if 0                          /* FIXME: this would be more readable (in fact the whole 'islong' logic should be removed) */
        else if (ch == '\b') {
            buffer[bufp++] = '\\';
 #if 0                          /* FIXME: this would be more readable (in fact the whole 'islong' logic should be removed) */
        else if (ch == '\b') {
            buffer[bufp++] = '\\';
@@ -169,10 +182,12 @@ _nc_tic_expand
 #define UnCtl(c) ((c) + '@')
        else if (REALCTL(str) && ch != '\\'
                 && (!islong || isdigit(UChar(str[1])))) {
 #define UnCtl(c) ((c) + '@')
        else if (REALCTL(str) && ch != '\\'
                 && (!islong || isdigit(UChar(str[1])))) {
-           (void) sprintf(&buffer[bufp], "^%c", UnCtl(ch));
+           _nc_SPRINTF(&buffer[bufp], _nc_SLIMIT(P_LIMIT(bufp))
+                       "^%c", UnCtl(ch));
            bufp += 2;
        } else {
            bufp += 2;
        } else {
-           (void) sprintf(&buffer[bufp], "\\%03o", ch);
+           _nc_SPRINTF(&buffer[bufp], _nc_SLIMIT(P_LIMIT(bufp))
+                       "\\%03o", ch);
            bufp += 4;
        }
 
            bufp += 4;
        }