The R Project SVN – R – Diff – /trunk/src/extra/graphapp/drawtext.c

    WITHOUT ANY WARRANTY.
    See the file COPYLIB.TXT for details.
 */
+/* Copyright (C) 2022  The R Core Team
+   avoid stack corruption on long lines
+*/
 #include "internal.h"
 #include <stdarg.h>
 #define COMPRESS_WHITESPACE 0
+static size_t max_line_size(const char *s)
+{
+    size_t size = 0;
+    size_t i;
+    for(i = 0; s[i]; i++) {
+	if (s[i] == '\t') size += 8;
+	else size++;
+    }
+    return size + 1;
+}
 static const char *get_next_line(char *line, int width, const char *s)
+{
     const char *t; char  *k;
     int	word_width, line_width;
     int	sp, tab, nl;
+}
 int textheight(int width, const char *s)
+{
     int y;
-    char line[256];
+    size_t size;
     int height;
+    char *line;
+    size = max_line_size(s);
+    line = (char *)malloc(size * sizeof(char));
     height = getheight(current->fnt);
     for(y=0; s; y+=height)
+    {
 	s = get_next_line(line, width, s);
+    }
+    free(line);
     return y;
+}
 static const char *draw_text_left(char *line, rect r, int line_height,
 				  int underline, const char *s)
     int nlines;
     int line_height;
     int u = 0;
     rect clip;
     const char *remains;
-    char line[256];
+    char *line;
+    size_t size;
     initapp(0,0);
     if (! s) return (char *) NULL;
+    size = max_line_size(s);
+    line = (char *)malloc(size * sizeof(char));
     if (! current->fnt)
 	current->fnt = SystemFont;
     clip = getcliprect();
     setcliprect(r);
 	remains = draw_text_right(line, r, line_height, u, s);
     else
 	remains = draw_text_left(line, r, line_height, u, s);
     setcliprect(clip);
+    free(line);
     return remains;
+}
 int gprintf(const char *fmt, ...)
+{

The R Project SVN R

(root)/trunk/src/extra/graphapp/drawtext.c @ 77458 – Rev 45017 → 82565