/***********************************************************
-* Rocks'n'Diamonds -- McDuffin Strikes Back! *
+* Artsoft Retro-Game Library *
*----------------------------------------------------------*
-* (c) 1995-98 Artsoft Entertainment *
-* Holger Schemel *
-* Oststrasse 11a *
-* 33604 Bielefeld *
-* phone: ++49 +521 290471 *
-* email: aeglos@valinor.owl.de *
+* (c) 1994-2006 Artsoft Entertainment *
+* Holger Schemel *
+* Detmolder Strasse 189 *
+* 33604 Bielefeld *
+* Germany *
+* e-mail: info@artsoft.org *
*----------------------------------------------------------*
-* text.c *
+* text.c *
***********************************************************/
+#include <stdio.h>
#include <stdarg.h>
-#include "libgame.h"
-
-#if 1
-#include "main_TMP.h"
-#endif
+#include "text.h"
+#include "misc.h"
/* ========================================================================= */
-/* exported variables */
+/* font functions */
/* ========================================================================= */
-struct FontInfo font;
+#if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
+static GC font_clip_gc = None;
+static void InitFontClipmasks()
+{
+ XGCValues clip_gc_values;
+ unsigned long clip_gc_valuemask;
+ GC copy_clipmask_gc;
+ int i, j;
+
+ /* This stuff is needed because X11 (XSetClipOrigin(), to be precise) is
+ often very slow when preparing a masked XCopyArea() for big Pixmaps.
+ To prevent this, create small (tile-sized) mask Pixmaps which will then
+ be set much faster with XSetClipOrigin() and speed things up a lot. */
+
+ clip_gc_values.graphics_exposures = False;
+ clip_gc_valuemask = GCGraphicsExposures;
+ font_clip_gc = XCreateGC(display, window->drawable,
+ clip_gc_valuemask, &clip_gc_values);
+
+ /* create graphic context structures needed for clipping */
+ clip_gc_values.graphics_exposures = False;
+ clip_gc_valuemask = GCGraphicsExposures;
+ copy_clipmask_gc = XCreateGC(display,
+ gfx.font_bitmap_info[0].bitmap->clip_mask,
+ clip_gc_valuemask, &clip_gc_values);
+
+ /* create only those clipping Pixmaps we really need */
+ for (i = 0; i < gfx.num_fonts; i++)
+ {
+ if (gfx.font_bitmap_info[i].bitmap == NULL)
+ continue;
-/* ========================================================================= */
-/* font functions */
-/* ========================================================================= */
+ gfx.font_bitmap_info[i].clip_mask =
+ checked_calloc(gfx.font_bitmap_info[i].num_chars * sizeof(Pixmap));
+
+ for (j = 0; j < gfx.font_bitmap_info[i].num_chars; j++)
+ {
+ Bitmap *src_bitmap = gfx.font_bitmap_info[i].bitmap;
+ Pixmap src_pixmap = src_bitmap->clip_mask;
+ int xpos = j % gfx.font_bitmap_info[i].num_chars_per_line;
+ int ypos = j / gfx.font_bitmap_info[i].num_chars_per_line;
+ int width = gfx.font_bitmap_info[i].width;
+ int height = gfx.font_bitmap_info[i].height;
+ int src_x = gfx.font_bitmap_info[i].src_x + xpos * width;
+ int src_y = gfx.font_bitmap_info[i].src_y + ypos * height;
+
+ gfx.font_bitmap_info[i].clip_mask[j] =
+ XCreatePixmap(display, window->drawable, width, height, 1);
+
+ XCopyArea(display, src_pixmap, gfx.font_bitmap_info[i].clip_mask[j],
+ copy_clipmask_gc, src_x, src_y, width, height, 0, 0);
+ }
+ }
+
+ XFreeGC(display, copy_clipmask_gc);
+}
+
+static void FreeFontClipmasks()
+{
+ int i, j;
+
+ if (gfx.num_fonts == 0 || gfx.font_bitmap_info[0].bitmap == NULL)
+ return;
-void InitFontInfo(Bitmap bitmap_big, Bitmap bitmap_medium,
- Bitmap bitmap_small)
+ for (i = 0; i < gfx.num_fonts; i++)
+ {
+ if (gfx.font_bitmap_info[i].clip_mask)
+ {
+ for (j = 0; j < gfx.font_bitmap_info[i].num_chars; j++)
+ XFreePixmap(display, gfx.font_bitmap_info[i].clip_mask[j]);
+ free(gfx.font_bitmap_info[i].clip_mask);
+ }
+
+ gfx.font_bitmap_info[i].clip_mask = NULL;
+ gfx.font_bitmap_info[i].num_chars = 0;
+ }
+
+ if (font_clip_gc)
+ XFreeGC(display, font_clip_gc);
+ font_clip_gc = None;
+}
+#endif /* TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND */
+
+void InitFontInfo(struct FontBitmapInfo *font_bitmap_info, int num_fonts,
+ int (*select_font_function)(int),
+ int (*get_font_from_token_function)(char *))
{
- font.bitmap_big = bitmap_big;
- font.bitmap_medium = bitmap_medium;
- font.bitmap_small = bitmap_small;
+ gfx.num_fonts = num_fonts;
+ gfx.font_bitmap_info = font_bitmap_info;
+ gfx.select_font_function = select_font_function;
+ gfx.get_font_from_token_function = get_font_from_token_function;
+
+#if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
+ InitFontClipmasks();
+#endif
}
-int getFontWidth(int font_size, int font_type)
+void FreeFontInfo(struct FontBitmapInfo *font_bitmap_info)
{
- return (font_size == FS_BIG ? FONT1_XSIZE :
- font_size == FS_MEDIUM ? FONT6_XSIZE :
- font_type == FC_SPECIAL1 ? FONT3_XSIZE :
- font_type == FC_SPECIAL2 ? FONT4_XSIZE :
- font_type == FC_SPECIAL3 ? FONT5_XSIZE :
- FONT2_XSIZE);
+ if (font_bitmap_info == NULL)
+ return;
+
+#if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
+ FreeFontClipmasks();
+#endif
+
+ free(font_bitmap_info);
}
-int getFontHeight(int font_size, int font_type)
+struct FontBitmapInfo *getFontBitmapInfo(int font_nr)
{
- return (font_size == FS_BIG ? FONT1_YSIZE :
- font_size == FS_MEDIUM ? FONT6_YSIZE :
- font_type == FC_SPECIAL1 ? FONT3_YSIZE :
- font_type == FC_SPECIAL2 ? FONT4_YSIZE :
- font_type == FC_SPECIAL3 ? FONT5_YSIZE :
- FONT2_YSIZE);
+ int font_bitmap_id = gfx.select_font_function(font_nr);
+
+ return &gfx.font_bitmap_info[font_bitmap_id];
}
-void DrawInitText(char *text, int ypos, int color)
+int getFontWidth(int font_nr)
{
- if (window && font.bitmap_small)
+ int font_bitmap_id = gfx.select_font_function(font_nr);
+
+ return gfx.font_bitmap_info[font_bitmap_id].width;
+}
+
+int getFontHeight(int font_nr)
+{
+ int font_bitmap_id = gfx.select_font_function(font_nr);
+
+ return gfx.font_bitmap_info[font_bitmap_id].height;
+}
+
+int getTextWidth(char *text, int font_nr)
+{
+ return (text != NULL ? strlen(text) * getFontWidth(font_nr) : 0);
+}
+
+static int getFontCharPosition(int font_nr, char c)
+{
+ int font_bitmap_id = gfx.select_font_function(font_nr);
+ struct FontBitmapInfo *font = &gfx.font_bitmap_info[font_bitmap_id];
+ boolean default_font = (font->num_chars == DEFAULT_NUM_CHARS_PER_FONT);
+ int font_pos = (unsigned char)c - 32;
+
+ /* map some special characters to their ascii values in default font */
+ if (default_font)
+ font_pos = MAP_FONT_ASCII(c) - 32;
+
+ /* this allows dynamic special characters together with special font */
+ if (font_pos < 0 || font_pos >= font->num_chars)
+ font_pos = 0;
+
+ return font_pos;
+}
+
+void getFontCharSource(int font_nr, char c, Bitmap **bitmap, int *x, int *y)
+{
+ int font_bitmap_id = gfx.select_font_function(font_nr);
+ struct FontBitmapInfo *font = &gfx.font_bitmap_info[font_bitmap_id];
+ int font_pos = getFontCharPosition(font_nr, c);
+
+ *bitmap = font->bitmap;
+ *x = font->src_x + (font_pos % font->num_chars_per_line) * font->width;
+ *y = font->src_y + (font_pos / font->num_chars_per_line) * font->height;
+}
+
+
+/* ========================================================================= */
+/* simple text drawing functions */
+/* ========================================================================= */
+
+void DrawInitTextExt(char *text, int ypos, int font_nr, boolean force)
+{
+ static unsigned long progress_delay = 0;
+ unsigned long progress_delay_value = 100; /* (in milliseconds) */
+
+ UPDATE_BUSY_STATE();
+
+ if (!force && !DelayReached(&progress_delay, progress_delay_value))
+ return;
+
+ if (window != NULL &&
+ gfx.num_fonts > 0 &&
+ gfx.font_bitmap_info[font_nr].bitmap != NULL)
{
- ClearRectangle(window, 0, ypos, video.width, FONT2_YSIZE);
- DrawTextExt(window, (video.width - strlen(text) * FONT2_XSIZE)/2,
- ypos, text, FS_SMALL, color);
- FlushDisplay();
+ int x = (video.width - getTextWidth(text, font_nr)) / 2;
+ int y = ypos;
+ int width = video.width;
+ int height = getFontHeight(font_nr);
+
+ ClearRectangle(drawto, 0, y, width, height);
+ DrawTextExt(drawto, x, y, text, font_nr, BLIT_OPAQUE);
+
+ /* this makes things significantly faster than directly drawing to window */
+ BlitBitmap(drawto, window, 0, y, width, height, 0, y);
}
}
-void DrawTextFCentered(int y, int font_type, char *format, ...)
+void DrawInitText(char *text, int ypos, int font_nr)
+{
+ DrawInitTextExt(text, ypos, font_nr, TRUE);
+}
+
+void DrawInitTextIfNeeded(char *text, int ypos, int font_nr)
+{
+ DrawInitTextExt(text, ypos, font_nr, FALSE);
+}
+
+void DrawTextF(int x, int y, int font_nr, char *format, ...)
{
char buffer[MAX_OUTPUT_LINESIZE + 1];
- int font_width = getFontWidth(FS_SMALL, font_type);
va_list ap;
va_start(ap, format);
vsprintf(buffer, format, ap);
va_end(ap);
- DrawText(playfield.sx + (playfield.sxsize - strlen(buffer) * font_width) / 2,
- playfield.sy + y, buffer, FS_SMALL, font_type);
+ if (strlen(buffer) > MAX_OUTPUT_LINESIZE)
+ Error(ERR_EXIT, "string too long in DrawTextF() -- aborting");
+
+ DrawText(gfx.sx + x, gfx.sy + y, buffer, font_nr);
}
-void DrawTextF(int x, int y, int font_type, char *format, ...)
+void DrawTextFCentered(int y, int font_nr, char *format, ...)
{
char buffer[MAX_OUTPUT_LINESIZE + 1];
va_list ap;
vsprintf(buffer, format, ap);
va_end(ap);
- DrawText(playfield.sx + x, playfield.sy + y, buffer, FS_SMALL, font_type);
+ if (strlen(buffer) > MAX_OUTPUT_LINESIZE)
+ Error(ERR_EXIT, "string too long in DrawTextFCentered() -- aborting");
+
+ DrawText(gfx.sx + (gfx.sxsize - getTextWidth(buffer, font_nr)) / 2,
+ gfx.sy + y, buffer, font_nr);
}
-void DrawText(int x, int y, char *text, int font_size, int font_type)
+void DrawTextS(int x, int y, int font_nr, char *text)
{
- DrawTextExt(drawto, x, y, text, font_size, font_type);
+ DrawText(gfx.sx + x, gfx.sy + y, text, font_nr);
+}
+
+void DrawTextSCentered(int y, int font_nr, char *text)
+{
+ DrawText(gfx.sx + (gfx.sxsize - getTextWidth(text, font_nr)) / 2,
+ gfx.sy + y, text, font_nr);
+}
- if (x < playfield.dx)
+void DrawTextCentered(int y, int font_nr, char *text)
+{
+ DrawText((gfx.sxsize - getTextWidth(text, font_nr)) / 2, y, text, font_nr);
+}
+
+void DrawTextSAligned(int x, int y, char *text, int font_nr, int align)
+{
+ DrawText(gfx.sx + ALIGNED_XPOS(x, getTextWidth(text, font_nr), align),
+ gfx.sx + y, text, font_nr);
+}
+
+void DrawTextAligned(int x, int y, char *text, int font_nr, int align)
+{
+ DrawText(ALIGNED_XPOS(x, getTextWidth(text, font_nr), align),
+ y, text, font_nr);
+}
+
+void DrawText(int x, int y, char *text, int font_nr)
+{
+ int mask_mode = BLIT_OPAQUE;
+
+ if (DrawingOnBackground(x, y))
+ mask_mode = BLIT_ON_BACKGROUND;
+
+ DrawTextExt(drawto, x, y, text, font_nr, mask_mode);
+
+ if (x < gfx.dx)
redraw_mask |= REDRAW_FIELD;
- else if (y < playfield.vy)
+ else if (y < gfx.vy || gfx.vy == 0)
redraw_mask |= REDRAW_DOOR_1;
}
-void DrawTextExt(DrawBuffer bitmap, int x, int y,
- char *text, int font_size, int font_type)
+void DrawTextExt(DrawBuffer *dst_bitmap, int dst_x, int dst_y, char *text,
+ int font_nr, int mask_mode)
+{
+#if 1
+ struct FontBitmapInfo *font = getFontBitmapInfo(font_nr);
+#else
+ int font_bitmap_id = gfx.select_font_function(font_nr);
+ struct FontBitmapInfo *font = &gfx.font_bitmap_info[font_bitmap_id];
+#endif
+ int font_width = getFontWidth(font_nr);
+ int font_height = getFontHeight(font_nr);
+#if 0
+ int border_1 = gfx.sx + gfx.sxsize;
+ int border_2 = gfx.dx + gfx.dxsize;
+ int dst_x_start = dst_x;
+#endif
+ Bitmap *src_bitmap;
+ int src_x, src_y;
+ char *text_ptr = text;
+
+ if (font->bitmap == NULL)
+ return;
+
+ /* skip text to be printed outside the window (left/right will be clipped) */
+ if (dst_y < 0 || dst_y + font_height > video.height)
+ return;
+
+ /* add offset for drawing font characters */
+ dst_x += font->draw_xoffset;
+ dst_y += font->draw_yoffset;
+
+ while (*text_ptr)
+ {
+ char c = *text_ptr++;
+
+ if (c == '\n')
+ c = ' '; /* print space instead of newline */
+
+ getFontCharSource(font_nr, c, &src_bitmap, &src_x, &src_y);
+
+ /* clip text at the left side of the window */
+ if (dst_x < 0)
+ {
+ dst_x += font_width;
+
+ continue;
+ }
+
+ /* clip text at the right side of the window */
+#if 1
+ if (dst_x + font_width > video.width)
+ break;
+#else
+ /* (this does not work well when trying to print text to whole screen) */
+ if ((dst_x_start < border_1 && dst_x + font_width > border_1) ||
+ (dst_x_start < border_2 && dst_x + font_width > border_2))
+ break;
+#endif
+
+ if (mask_mode == BLIT_INVERSE) /* special mode for text gadgets */
+ {
+ /* first step: draw solid colored rectangle (use "cursor" character) */
+ if (strlen(text) == 1) /* only one char inverted => draw cursor */
+ {
+ Bitmap *cursor_bitmap;
+ int cursor_x, cursor_y;
+
+ getFontCharSource(font_nr, FONT_ASCII_CURSOR, &cursor_bitmap,
+ &cursor_x, &cursor_y);
+
+ BlitBitmap(cursor_bitmap, dst_bitmap, cursor_x, cursor_y,
+ font_width, font_height, dst_x, dst_y);
+ }
+
+#if defined(TARGET_SDL)
+ /* second step: draw masked inverted character */
+ SDLCopyInverseMasked(src_bitmap, dst_bitmap, src_x, src_y,
+ font_width, font_height, dst_x, dst_y);
+#else
+ /* second step: draw masked black rectangle (use "space" character) */
+ SetClipOrigin(src_bitmap, src_bitmap->stored_clip_gc,
+ dst_x - src_x, dst_y - src_y);
+ BlitBitmapMasked(src_bitmap, dst_bitmap, 0, 0,
+ font_width, font_height, dst_x, dst_y);
+#endif
+ }
+ else if (mask_mode == BLIT_MASKED || mask_mode == BLIT_ON_BACKGROUND)
+ {
+ if (mask_mode == BLIT_ON_BACKGROUND)
+ {
+ /* clear font character background */
+ ClearRectangleOnBackground(dst_bitmap, dst_x, dst_y,
+ font_width, font_height);
+ }
+
+#if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
+ /* use special font tile clipmasks */
+ {
+ int font_pos = getFontCharPosition(font_nr, c);
+
+ SetClipMask(src_bitmap, font_clip_gc, font->clip_mask[font_pos]);
+ SetClipOrigin(src_bitmap, font_clip_gc, dst_x, dst_y);
+ }
+#else
+ SetClipOrigin(src_bitmap, src_bitmap->stored_clip_gc,
+ dst_x - src_x, dst_y - src_y);
+#endif
+
+ BlitBitmapMasked(src_bitmap, dst_bitmap, src_x, src_y,
+ font_width, font_height, dst_x, dst_y);
+ }
+ else /* normal, non-masked font blitting */
+ {
+ BlitBitmap(src_bitmap, dst_bitmap, src_x, src_y,
+ font_width, font_height, dst_x, dst_y);
+ }
+
+ dst_x += font_width;
+ }
+}
+
+
+/* ========================================================================= */
+/* text buffer drawing functions */
+/* ========================================================================= */
+
+#define MAX_LINES_FROM_FILE 1024
+
+char *GetTextBufferFromFile(char *filename, int max_lines)
+{
+ FILE *file;
+ char *buffer;
+ int num_lines = 0;
+
+ if (filename == NULL)
+ return NULL;
+
+ if (!(file = fopen(filename, MODE_READ)))
+ return NULL;
+
+ buffer = checked_calloc(1); /* start with valid, but empty text buffer */
+
+ while (!feof(file) && num_lines < max_lines)
+ {
+ char line[MAX_LINE_LEN];
+
+ /* read next line of input file */
+ if (!fgets(line, MAX_LINE_LEN, file))
+ break;
+
+ buffer = checked_realloc(buffer, strlen(buffer) + strlen(line) + 1);
+
+ strcat(buffer, line);
+
+ num_lines++;
+ }
+
+ fclose(file);
+
+ return buffer;
+}
+
+void DrawTextToTextArea_OLD(int x, int y, char *text, int font_nr, int line_length,
+ int area_xsize, int area_ysize, int mask_mode)
{
- Bitmap font_bitmap;
- int font_width, font_height, font_start;
- boolean print_inverse = FALSE;
+ int area_line = 0;
+ int font_height = getFontHeight(font_nr);
+
+ if (text == NULL)
+ return;
+
+ while (*text && area_line < area_ysize)
+ {
+ char buffer[MAX_OUTPUT_LINESIZE + 1];
+ int i;
- if (font_size != FS_SMALL && font_size != FS_BIG && font_size != FS_MEDIUM)
- font_size = FS_SMALL;
- if (font_type < FC_RED || font_type > FC_SPECIAL3)
- font_type = FC_RED;
+ for (i = 0; i < line_length && *text; i++)
+ if ((buffer[i] = *text++) == '\n')
+ break;
+ buffer[MIN(i, area_xsize)] = '\0';
- font_width = getFontWidth(font_size, font_type);
- font_height = getFontHeight(font_size, font_type);
+ DrawTextExt(drawto, x, y + area_line * font_height, buffer, font_nr,
+ mask_mode);
- font_bitmap = (font_size == FS_BIG ? font.bitmap_big :
- font_size == FS_MEDIUM ? font.bitmap_medium :
- font.bitmap_small);
- font_start = (font_type * (font_size == FS_BIG ? FONT1_YSIZE :
- font_size == FS_MEDIUM ? FONT6_YSIZE :
- FONT2_YSIZE) *
- FONT_LINES_PER_FONT);
+ area_line++;
+ }
- if (font_type == FC_SPECIAL3)
- font_start += (FONT4_YSIZE - FONT2_YSIZE) * FONT_LINES_PER_FONT;
+ redraw_mask |= REDRAW_FIELD;
+}
+
+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)
+ while (*text_ptr)
{
- char c = *text++;
+ char *word_ptr;
+ int word_len;
- if (c == '~' && font_size == FS_SMALL)
+ /* 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)
{
- print_inverse = TRUE;
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 (c >= 'a' && c <= 'z')
- c = 'A' + (c - 'a');
- else if (c == 'ä' || c == 'Ä')
- c = 91;
- else if (c == 'ö' || c == 'Ö')
- c = 92;
- else if (c == 'ü' || c == 'Ü')
- c = 93;
+ if (buffer_len > 0)
+ buffer[buffer_len++] = ' ';
- if (c >= 32 && c <= 95)
+ 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)
{
- int src_x = ((c - 32) % FONT_CHARS_PER_LINE) * font_width;
- int src_y = ((c - 32) / FONT_CHARS_PER_LINE) * font_height + font_start;
- int dest_x = x, dest_y = y;
+ /* 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;
+ }
- if (print_inverse)
+ *src_buffer_ptr = text_ptr;
+ *dst_buffer_len = buffer_len;
+
+ return buffer_filled;
+}
+
+#if 0
+void DrawTextWrapped_OLD(int x, int y, char *text, int font_nr, int line_length,
+ int max_lines)
+{
+ char *text_ptr = text;
+ int current_line = 0;
+ int font_height = getFontHeight(font_nr);
+
+ while (*text_ptr && current_line < max_lines)
+ {
+ char buffer[line_length + 1];
+ int buffer_len = 0;
+
+ buffer[0] = '\0';
+
+ RenderLineToBuffer(&text_ptr, buffer, &buffer_len, line_length, TRUE);
+
+ DrawText(x, y + current_line * font_height, buffer, font_nr);
+ current_line++;
+ }
+}
+#endif
+
+#if 0
+int DrawTextFromFile_OLD(int x, int y, char *filename, int font_nr,
+ int line_length, int max_lines, boolean wrap_text)
+{
+ int font_height = getFontHeight(font_nr);
+ char line[MAX_LINE_LEN];
+ char buffer[line_length + 1];
+ int buffer_len;
+ int current_line = 0;
+ FILE *file;
+
+ if (current_line >= max_lines)
+ return 0;
+
+ if (filename == NULL)
+ return 0;
+
+ if (!(file = fopen(filename, MODE_READ)))
+ return 0;
+
+ buffer[0] = '\0';
+ buffer_len = 0;
+
+ while (!feof(file) && current_line < max_lines)
+ {
+ char *line_ptr;
+ boolean last_line_was_empty = TRUE;
+
+ /* read next line of input file */
+ if (!fgets(line, MAX_LINE_LEN, file))
+ break;
+
+ /* skip comments (lines directly beginning with '#') */
+ if (line[0] == '#')
+ continue;
+
+ /* cut trailing newline from input line */
+ for (line_ptr = line; *line_ptr; line_ptr++)
+ {
+ if (*line_ptr == '\n' || *line_ptr == '\r')
{
- BlitBitmap(font_bitmap, bitmap,
- FONT_CHARS_PER_LINE * font_width,
- 3 * font_height + font_start,
- font_width, font_height, x, y);
-
- SetClipOrigin(font_bitmap, font_bitmap->stored_clip_gc,
- dest_x - src_x, dest_y - src_y);
- BlitBitmapMasked(font_bitmap, bitmap,
- 0, 0, font_width, font_height, dest_x, dest_y);
+ *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)
+ {
+#if 1
+ boolean buffer_filled;
+
+ if (wrap_text)
+ {
+ buffer_filled = RenderLineToBuffer(&line_ptr, buffer, &buffer_len,
+ line_length, last_line_was_empty);
}
else
- BlitBitmap(font_bitmap, bitmap,
- src_x, src_y, font_width, font_height, dest_x, dest_y);
+ {
+ if (strlen(line_ptr) <= line_length)
+ {
+ buffer_len = strlen(line_ptr);
+ strcpy(buffer, line_ptr);
+ }
+ else
+ {
+ buffer_len = line_length;
+ strncpy(buffer, line_ptr, line_length);
+ }
+
+ buffer[buffer_len] = '\0';
+ line_ptr += buffer_len;
+
+ buffer_filled = TRUE;
+ }
+#else
+ boolean buffer_filled = RenderLineToBuffer(&line_ptr, buffer, &buffer_len,
+ line_length, last_line_was_empty);
+#endif
+
+ if (buffer_filled)
+ {
+ DrawText(x, y + current_line * font_height, buffer, font_nr);
+ current_line++;
+
+ last_line_was_empty = (buffer_len == 0);
+
+ buffer[0] = '\0';
+ buffer_len = 0;
+ }
}
+ }
+
+ fclose(file);
- x += font_width;
+ if (buffer_len > 0 && current_line < max_lines)
+ {
+ DrawText(x, y + current_line * font_height, buffer, font_nr);
+ current_line++;
}
+
+ return current_line;
}
+#endif
+
+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 font_nr,
+ int line_length, int cut_length, int mask_mode,
+ boolean centered, int current_line)
+{
+ int buffer_len = strlen(buffer);
+ int font_width = getFontWidth(font_nr);
+ int font_height = getFontHeight(font_nr);
+ int offset_chars = (centered ? (line_length - buffer_len) / 2 : 0);
+ int offset_xsize =
+ (centered ? font_width * (line_length - buffer_len) / 2 : 0);
+ int final_cut_length = MAX(0, cut_length - offset_chars);
+ int xx = x + offset_xsize;
+ int yy = y + current_line * font_height;
+
+ 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);
+}
+
+int DrawTextBuffer(int x, int y, char *text_buffer, int font_nr,
+ int line_length, int cut_length, int max_lines,
+ int mask_mode, boolean autowrap, boolean centered,
+ boolean parse_comments)
+{
+#if 0
+ int font_width = getFontWidth(font_nr);
+ int font_height = getFontHeight(font_nr);
+#endif
+ 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;
+#if 1
+ int num_line_chars = MAX_LINE_LEN;
+#else
+ int num_line_chars = (autowrap ? MAX_LINE_LEN : line_length);
+#endif
+ 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,
+ 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
+ {
+ if (strlen(line_ptr) <= line_length)
+ {
+ buffer_len = strlen(line_ptr);
+ strcpy(buffer, line_ptr);
+ }
+ else
+ {
+ buffer_len = line_length;
+ strncpy(buffer, line_ptr, line_length);
+ }
+
+ buffer[buffer_len] = '\0';
+ line_ptr += buffer_len;
+
+ buffer_filled = TRUE;
+ }
+
+ if (buffer_filled)
+ {
+#if 1
+ DrawTextBuffer_Flush(x, y, buffer, font_nr, line_length, cut_length,
+ mask_mode, centered, current_line);
+#else
+ int offset_chars = (centered ? (line_length - buffer_len) / 2 : 0);
+ int offset_xsize =
+ (centered ? font_width * (line_length - buffer_len) / 2 : 0);
+ int final_cut_length = MAX(0, cut_length - offset_chars);
+ int xx = x + offset_xsize;
+
+ buffer[final_cut_length] = '\0';
+
+ if (mask_mode != -1)
+ DrawTextExt(drawto, xx, y + current_line * font_height, buffer,
+ font_nr, mask_mode);
+ else
+ DrawText(xx, y + current_line * font_height, buffer, font_nr);
+#endif
+
+ current_line++;
+
+ last_line_was_empty = (buffer_len == 0);
+
+ buffer[0] = '\0';
+ buffer_len = 0;
+ }
+ }
+ }
+
+ if (buffer_len > 0 && current_line < max_lines)
+ {
+#if 1
+ DrawTextBuffer_Flush(x, y, buffer, font_nr, line_length, cut_length,
+ mask_mode, centered, current_line);
+#else
+ int offset_chars = (centered ? (line_length - buffer_len) / 2 : 0);
+ int offset_xsize =
+ (centered ? font_width * (line_length - buffer_len) / 2 : 0);
+ int final_cut_length = MAX(0, cut_length - offset_chars);
+ int xx = x + offset_xsize;
+
+ buffer[final_cut_length] = '\0';
+
+ if (mask_mode != -1)
+ DrawTextExt(drawto, xx, y + current_line * font_height, buffer,
+ font_nr, mask_mode);
+ else
+ DrawText(xx, y + current_line * font_height, buffer, font_nr);
+#endif
+
+ current_line++;
+ }
+
+ return current_line;
+}
+
+int DrawTextFile(int x, int y, char *filename, int font_nr,
+ int line_length, int cut_length, int max_lines,
+ int mask_mode, boolean autowrap, boolean centered,
+ boolean parse_comments)
+{
+ char *text_buffer = GetTextBufferFromFile(filename, MAX_LINES_FROM_FILE);
+ int num_lines_printed = DrawTextBuffer(x, y, text_buffer, font_nr,
+ line_length, cut_length, max_lines,
+ mask_mode, autowrap, centered,
+ parse_comments);
+ checked_free(text_buffer);
+
+ return num_lines_printed;
+}
+
+#if 0
+void DrawTextWrapped(int x, int y, char *text, int font_nr, int line_length,
+ int max_lines)
+{
+ DrawTextBuffer(x, y, text, font_nr, line_length, -1, max_lines, -1, TRUE,
+ FALSE, FALSE);
+}
+
+void DrawTextToTextArea(int x, int y, char *text, int font_nr, int line_length,
+ int cut_length, int max_lines, int mask_mode)
+{
+ DrawTextBuffer(x, y, text, font_nr, line_length, cut_length, max_lines,
+ mask_mode, FALSE, FALSE, FALSE);
+}
+#endif