#define GINT_NEED_VRAM
#include <gint/defs/types.h>
#include <gint/defs/attributes.h>
#include <gint/display.h>
#include <display/common.h>
#include "topti-asm.h"

/* Default font */
extern font_t gint_font10x12;
font_t const * gint_default_font = &gint_font10x12;
font_t const * topti_font = &gint_font10x12;

/* topti_glyph(): Render a glyph on the VRAM
   Prints a glyph naively using word accesses, because for most fonts with a
   small size (including gint's 10x12 font) this will be more efficient than
   the complex logic for longword accesses.

   This function assumes that at least one of [fg] and [bg] is not transparent.

   @vram    Target position on VRAM, adjusted to [top], not adjusted to [left]
   @data    Glyph data
   @left    Left-position of subglyph
   @top     Top-Position of subglyph
   @width   Subglyph width
   @height  Subglyph height
   @dataw   Glyph width
   @fg @bg  Foreground and background colors */
GSECTION(".pretext")
void topti_glyph(uint16_t *vram, uint32_t const * data, int left, int top,
	int width, int height, int dataw, int fg, int bg)
{
	int index = top * dataw + left;

	/* Most common situation: opaque text on transparent background */
	if(bg < 0) topti_glyph_fg(vram + left, data, fg, height, width,
		dataw - width, index);
	/* Full text on opaque background */
	else if(fg >= 0) topti_glyph_fg_bg(vram + left, data, (fg << 16) | bg,
		height, width, dataw - width, index);
	/* Draw background but not text */
	else topti_glyph_bg(vram + left, data, bg, height, width,
		dataw - width, index);
}

GSECTION(".pretext")
void topti_render(int x, int y, const char *str, size_t size, font_t const *f,
	int fg, int bg)
{
	/* Raw glyph data */
	uint32_t const * data = f->prop
		? (void *)(f->sized_data + charset_size(f->charset))
		: f->data;

	/* Storage height, top position within glyph */
	int height = f->data_height, top = 0;

	/* Vertical clipping */
	if(x > 395 || y > 223 || y + height <= 0) return;
	if(y + height > 224) height = 224 - y;
	if(y < 0) top = -y, height += y, y = 0;

	/* Move to top row */
	uint16_t *target = vram + 396 * y;

	/* Character spacing */
	int space = 2;

	/* Read each character from the input string */
	while(size--)
	{
		int glyph = charset_decode(f->charset, *str++);
		if(glyph < 0) continue;

		int index = topti_offset(f, glyph);

		/* Compute horizontal intersection between glyph and screen */

		int dataw = f->prop ? f->sized_data[glyph] : f->width;
		int width = dataw, left = 0;

		if(x + dataw <= 0)
		{
			x += dataw + space;
			continue;
		}
		if(x < 0) left = -x, width += x;
		if(x + width > 396) width = 396 - x;

		/* Render glyph */

		topti_glyph(target + x, data + index, left, top, width, height,
			dataw, fg, bg);

		x += dataw + space;
	}
}