121 lines
3.8 KiB
C
121 lines
3.8 KiB
C
#include "duet.h"
|
|
|
|
extern font_t font_duet;
|
|
|
|
/* topti functions exposed to each implementation */
|
|
int topti_glyph_index(font_t const *f, uint32_t code_point);
|
|
int topti_offset(font_t const *f, uint glyph);
|
|
uint32_t topti_utf8_next(uint8_t const **str_pointer);
|
|
|
|
/* 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 8x9 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] and [left]
|
|
@data Glyph data
|
|
@left Left-position of subglyph
|
|
@top Top-Position of subglyph
|
|
@width Subglyph width
|
|
@height Subglyph height
|
|
@dataw Glyph width
|
|
@datah Total font height
|
|
@fg @bg Foreground and background colors */
|
|
static void topti_glyph(uint16_t *vram, uint32_t const * data, int left,
|
|
int top, int width, int height, int dataw, int datah, int fg, int bg)
|
|
{
|
|
/* A C version of what is usually done in assembler */
|
|
for(int y = 0; y < height; y++) {
|
|
for(int x = 0; x < width; x++) {
|
|
int bit_number = (top + y) * dataw + (left + x);
|
|
int bit = (data[bit_number >> 5] >> (31 - (bit_number & 31))) & 1;
|
|
|
|
/* Swithing x -> datah-y-1 and y -> x here gives vertical glyphs */
|
|
if((bit ? fg : bg) != C_NONE)
|
|
vram[DWIDTH*x + (datah-y-1)] = bit ? fg : bg;
|
|
}
|
|
}
|
|
}
|
|
|
|
static void topti_render(int x, int y, char const *str_char, font_t const *f,
|
|
int fg, int bg, int size)
|
|
{
|
|
uint8_t const *str = (void *)str_char;
|
|
uint8_t const *str0 = str;
|
|
|
|
/* Raw glyph data */
|
|
uint32_t const *data = 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;
|
|
|
|
/* Character spacing waiting to be drawn, in pixels */
|
|
int space = 0;
|
|
|
|
/* Read each character from the input string */
|
|
while(1)
|
|
{
|
|
uint32_t code_point = topti_utf8_next(&str);
|
|
if(!code_point || (size >= 0 && str - str0 > size)) break;
|
|
|
|
int glyph = topti_glyph_index(f, code_point);
|
|
if(glyph < 0) continue;
|
|
|
|
int dataw = f->prop ? f->glyph_width[glyph] : f->width;
|
|
|
|
/* Draw character spacing if background is opaque */
|
|
if(space && bg >= 0) drect(x, y, x+height-1, y+space-1, bg);
|
|
y += space;
|
|
if(y >= DHEIGHT) break;
|
|
|
|
int index = topti_offset(f, glyph);
|
|
|
|
/* Compute horizontal intersection between glyph and screen */
|
|
|
|
int width = dataw, left = 0;
|
|
|
|
if(y + dataw <= 0)
|
|
{
|
|
y += dataw;
|
|
space = f->char_spacing;
|
|
continue;
|
|
}
|
|
if(y < 0) left = -y, width += y;
|
|
if(y + width > DHEIGHT) width = DHEIGHT - y;
|
|
|
|
/* Render glyph */
|
|
|
|
topti_glyph(gint_vram + 396 * y + x, data + index, left, top, width,
|
|
height, dataw, f->data_height, fg, bg);
|
|
|
|
/* Switching x -> y here (and some other places, but mostly here) gives
|
|
vertical text */
|
|
y += dataw;
|
|
space = f->char_spacing;
|
|
}
|
|
}
|
|
|
|
void duet_text_opt(int x, int y, int fg, int bg, int halign, int valign,
|
|
char const *str, int size)
|
|
{
|
|
if(halign != DTEXT_LEFT || valign != DTEXT_TOP)
|
|
{
|
|
int w, h;
|
|
dnsize(str, size, &font_duet, &w, &h);
|
|
|
|
if(halign == DTEXT_RIGHT) x -= h - 1;
|
|
if(halign == DTEXT_CENTER) x -= (h >> 1);
|
|
if(valign == DTEXT_BOTTOM) y -= w - 1;
|
|
if(valign == DTEXT_MIDDLE) y -= (w >> 1);
|
|
}
|
|
|
|
topti_render(x, y, str, &font_duet, fg, bg, size);
|
|
}
|