COMMON: Fix crash when line length limit exceeded

Author: chrisws

ChangeLog

@@ -1,3 +1,6 @@
+2021-01-18 (12.21)
+	COMMON: Fix crash when line length limit exceeded
+
 2021-01-18 (12.21)
 	COMMON: Handle octal escapes correctly
 

src/common/scan.c

@@ -4651,6 +4651,7 @@ int comp_pass1(const char *section, const char *text) {
 
     char *ps = new_text;
     char *p = ps;
+    int line_size = 0;
     while (*p) {
       if (*p == '\n') {
         // proceed
@@ -4669,11 +4670,17 @@ int comp_pass1(const char *section, const char *text) {
           break;
         }
         ps = p + 1;
+        line_size = 0;
       }
       if (comp_error) {
         break;
       }
       p++;
+      if (++line_size >= SB_SOURCELINE_SIZE) {
+        *p = '\0';
+        sc_raise(ERR_LINE_LENGTH, p - 50);
+        break;
+      }
     }
   }
 

src/languages/messages.en.h

@@ -229,3 +229,4 @@
 #define ERR_DIRWALK_NAME        "DIRWALK: name %s/%s too long"
 #define ERR_DIRWALK_MISSING_USE "DIRWALK: missing USE statement"
 #define ERR_DIRWALK_CANT_OPEN   "DIRWALK: can't open %s"
+#define ERR_LINE_LENGTH         "Line length limit exceeded at text: '%s'"