+int DrawTextBuffer(int x, int y, char *text_buffer, int font_nr,
+ int line_length, int cut_length, int max_lines,
+ int line_spacing, int mask_mode, boolean autowrap,
+ boolean centered, boolean parse_comments)
+{
+ char buffer[line_length + 1];
+ int buffer_len;
+ int current_line = 0;
+
+ 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_line < max_lines)
+ {
+ 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')
+ 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_line < max_lines)
+ {
+ DrawTextBuffer_Flush(x, y, buffer, font_nr, line_length, cut_length,
+ line_spacing, mask_mode, centered, current_line);
+
+ current_line++;
+
+ buffer[0] = '\0';
+ buffer_len = 0;
+ }
+
+ if (strEqual(token, ".font"))
+ font_nr = gfx.get_font_from_token_function(value);
+ else if (strEqual(token, ".autowrap"))
+ autowrap = get_boolean_from_string(value);
+ else if (strEqual(token, ".centered"))
+ centered = get_boolean_from_string(value);
+ else if (strEqual(token, ".parse_comments"))
+ parse_comments = get_boolean_from_string(value);
+ }
+
+ continue;
+ }
+
+ /* cut trailing newline and carriage return from input line */
+ for (line_ptr = line; *line_ptr; line_ptr++)
+ {
+ if (*line_ptr == '\n' || *line_ptr == '\r')
+ {
+ *line_ptr = '\0';
+ break;
+ }
+ }
+
+ if (strlen(line) == 0) /* special case: force empty line */
+ strcpy(line, "\n");
+
+ line_ptr = line;
+
+ while (*line_ptr && current_line < max_lines)
+ {
+ boolean buffer_filled;
+
+ if (autowrap)
+ {
+ buffer_filled = RenderLineToBuffer(&line_ptr, buffer, &buffer_len,
+ line_length, last_line_was_empty);
+ }
+ else