+ while (!checkEndOfFile(file) && num_lines < max_lines)
+ {
+ char line[MAX_LINE_LEN];
+ char *line_ptr;
+ int line_len;
+
+ // read next line of input file
+ if (!getStringFromFile(file, line, MAX_LINE_LEN))
+ break;
+
+ line_len = strlen(line);
+
+ // cut trailing line break (this can be newline and/or carriage return)
+ for (line_ptr = &line[line_len]; line_ptr >= line; line_ptr--)
+ if ((*line_ptr == '\n' || *line_ptr == '\r') && *(line_ptr + 1) == '\0')
+ *line_ptr = '\0';
+
+ // re-add newline (so the result is terminated by newline, but not CR/LF)
+ if (strlen(line) != line_len)
+ strcat(line, "\n");
+
+ buffer = checked_realloc(buffer, strlen(buffer) + strlen(line) + 1);
+
+ strcat(buffer, line);
+
+ num_lines++;
+ }
+
+ closeFile(file);
+
+ if (getTextEncoding(buffer) == TEXT_ENCODING_UTF_8)
+ {
+ char *body_latin1 = getLatin1FromUTF8(buffer);
+
+ checked_free(buffer);
+
+ buffer = body_latin1;
+ }
+
+ return buffer;
+}
+
+static boolean RenderLineToBuffer(char **src_buffer_ptr, char *dst_buffer,
+ int *dst_buffer_len, int line_length,
+ boolean last_line_was_empty)
+{
+ char *text_ptr = *src_buffer_ptr;
+ char *buffer = dst_buffer;
+ int buffer_len = *dst_buffer_len;
+ boolean buffer_filled = FALSE;
+
+ while (*text_ptr)
+ {
+ char *word_ptr;
+ int word_len;
+
+ if (strEqual(text_ptr, " ")) // special case: force line break
+ buffer_filled = TRUE;
+
+ // skip leading whitespaces
+ while (*text_ptr == ' ' || *text_ptr == '\t')
+ text_ptr++;
+
+ word_ptr = text_ptr;
+ word_len = 0;
+
+ // look for end of next word
+ while (*word_ptr != ' ' && *word_ptr != '\t' && *word_ptr != '\0')
+ {
+ word_ptr++;
+ word_len++;
+ }
+
+ if (word_len == 0)
+ {
+ continue;
+ }
+ else if (*text_ptr == '\n') // special case: force empty line
+ {
+ if (buffer_len == 0)
+ text_ptr++;
+
+ // prevent printing of multiple empty lines
+ if (buffer_len > 0 || !last_line_was_empty)
+ buffer_filled = TRUE;
+ }
+ else if (word_len < line_length - buffer_len)
+ {
+ // word fits into text buffer -- add word
+
+ if (buffer_len > 0)
+ buffer[buffer_len++] = ' ';
+
+ strncpy(&buffer[buffer_len], text_ptr, word_len);
+ buffer_len += word_len;
+ buffer[buffer_len] = '\0';
+ text_ptr += word_len;
+ }
+ else if (buffer_len > 0)
+ {
+ // not enough space left for word in text buffer -- print buffer
+
+ buffer_filled = TRUE;
+ }
+ else
+ {
+ // word does not fit at all into empty text buffer -- cut word
+
+ strncpy(buffer, text_ptr, line_length);
+ buffer[line_length] = '\0';
+ text_ptr += line_length;
+ buffer_filled = TRUE;
+ }
+
+ if (buffer_filled)
+ break;
+ }
+
+ *src_buffer_ptr = text_ptr;
+ *dst_buffer_len = buffer_len;
+
+ return buffer_filled;
+}
+
+static boolean getCheckedTokenValueFromString(char *string, char **token,
+ char **value)
+{
+ char *ptr;
+
+ if (!getTokenValueFromString(string, token, value))
+ return FALSE;
+
+ if (**token != '.') // token should begin with dot
+ return FALSE;
+
+ for (ptr = *token; *ptr; ptr++) // token should contain no whitespace
+ if (*ptr == ' ' || *ptr == '\t')
+ return FALSE;
+
+ for (ptr = *value; *ptr; ptr++) // value should contain no whitespace
+ if (*ptr == ' ' || *ptr == '\t')
+ return FALSE;
+
+ return TRUE;
+}
+
+static void DrawTextBuffer_Flush(int x, int y, char *buffer, int base_font_nr,
+ int font_nr, int line_length, int cut_length,
+ int mask_mode, boolean centered,
+ int current_ypos)
+{
+ int buffer_len = strlen(buffer);
+ int base_font_width = getFontWidth(base_font_nr);
+ int font_width = getFontWidth(font_nr);
+ int offset_chars = (centered ? (line_length - buffer_len) / 2 : 0);
+ int line_width = base_font_width * line_length;
+ int buffer_width = font_width * buffer_len;
+ int offset_xsize = (centered ? (line_width - buffer_width) / 2 : 0);
+ int final_cut_length = MAX(0, cut_length - offset_chars);
+ int xx = x + offset_xsize;
+ int yy = y + current_ypos;
+
+ buffer[final_cut_length] = '\0';
+
+ if (mask_mode != -1)
+ DrawTextExt(drawto, xx, yy, buffer, font_nr, mask_mode);
+ else
+ DrawText(xx, yy, buffer, font_nr);
+}
+
+static int DrawTextBufferExt(int x, int y, char *text_buffer, int base_font_nr,
+ int line_length, int cut_length, int max_lines,
+ int line_spacing, int mask_mode, boolean autowrap,
+ boolean centered, boolean parse_comments,
+ boolean is_text_area)
+{
+ char buffer[line_length + 1];
+ int buffer_len;
+ int font_nr = base_font_nr;
+ int font_height = getFontHeight(font_nr);
+ int line_height = font_height + line_spacing;
+ int current_line = 0;
+ int current_ypos = 0;
+ int max_ysize = max_lines * line_height;
+
+ if (text_buffer == NULL || *text_buffer == '\0')
+ return 0;
+
+ if (current_line >= max_lines)
+ return 0;
+
+ if (cut_length == -1)
+ cut_length = line_length;
+
+ buffer[0] = '\0';
+ buffer_len = 0;
+
+ while (*text_buffer && current_ypos < max_ysize)
+ {
+ char line[MAX_LINE_LEN + 1];
+ char *line_ptr;
+ boolean last_line_was_empty = TRUE;
+ int num_line_chars = MAX_LINE_LEN;
+ int i;
+
+ // copy next line from text buffer to line buffer (nearly fgets() style)
+ for (i = 0; i < num_line_chars && *text_buffer; i++)
+ {
+ if ((line[i] = *text_buffer++) == '\n')
+ {
+ // in text areas, 'line_length' sized lines cause additional empty line
+ if (i == line_length && is_text_area)
+ text_buffer--;
+
+ break;
+ }
+ }
+ line[i] = '\0';
+
+ // prevent 'num_line_chars' sized lines to cause additional empty line
+ if (i == num_line_chars && *text_buffer == '\n')
+ text_buffer++;
+
+ // skip comments (lines directly beginning with '#')
+ if (line[0] == '#' && parse_comments)
+ {
+ char *token, *value;
+
+ // try to read generic token/value pair definition after comment sign
+ if (getCheckedTokenValueFromString(line + 1, &token, &value))
+ {
+ // if found, flush the current buffer, if non-empty
+ if (buffer_len > 0 && current_ypos < max_ysize)