summaryrefslogtreecommitdiff
path: root/include/RFont.h
diff options
context:
space:
mode:
authorandromeda <andromeda@lenovo>2026-04-26 09:24:22 +0200
committerandromeda <andromeda@lenovo>2026-04-26 09:24:22 +0200
commiteb757fdef5a611e92cce10899dedb6bedc350371 (patch)
tree99f50feb4f916d764d021396f5b2089b1f4b427d /include/RFont.h
parentc101e6571135cfd963e3c3f9543e64c445af7fd8 (diff)
modularise
Diffstat (limited to 'include/RFont.h')
-rw-r--r--include/RFont.h3239
1 files changed, 0 insertions, 3239 deletions
diff --git a/include/RFont.h b/include/RFont.h
deleted file mode 100644
index 6d4b511..0000000
--- a/include/RFont.h
+++ /dev/null
@@ -1,3239 +0,0 @@
-/*
-* Copyright (c) 2021-25 ColleagueRiley ColleagueRiley@gmail.com
-*
-* This software is provided 'as-is', without any express or implied
-* warranty. In no event will the authors be held liable for any damages
-* arising from the use of this software.
-*
-* Permission is granted to anyone to use this software for any purpose,
-* including commercial applications, and to alter it and redistribute it
-* freely, subject to the following r estrictions:
-*
-* 1. The origin of this software must not be misrepresented; you must not
-* claim that you wrote the original software. If you use this software
-* in a product, an acknowledgment in the product documentation would be
-* appreciated but is not required.
-* 2. Altered source versions must be plainly marked as such, and must not be
-* misrepresented as being the original software.
-* 3. This notice may not be removed or altered from any source distribution.
-*
-*
-*/
-
-/*
-preprocessor args
-
-make sure
-
-** #define RFONT_IMPLEMENTATION ** - include function defines
-
-is in exactly one of your files or arguments
-
-#define RFONT_INT_DEFINED - int types are already defined
-#define RFONT_C89 - uses cints instead of stdint.h and __inline instead of inline
-#define RFONT_INLINE x - set your own inline
-
-#define RFONT_NO_STDIO - do not include stdio.h
-#define RFONT_EXTERNAL_STB - load stb_truetype from stb_truetype.h instead of using the internal version
-#define RFONT_EXTERNAL_STB_IMPLEMENTATION - the same as RFONT_EXTERNAL_STB but doesn't define STB_TRUETYPE_IMPLEMENTATION
--- NOTE: By default, opengl 3.3 vbos are used for rendering --
-*/
-
-/*
-credits :
-
-stb_truetype.h - a dependency for RFont, most of (a slightly motified version of) stb_truetype.h is included directly into RFont.h
-http://bjoern.hoehrmann.de/utf-8/decoder/dfa/ - UTF-8 decoding function
-fontstash - fontstash was used as a refference for some parts
-*/
-
-/*
-
-... = [add code here]
-
-BASIC TEMPLATE :
-#define RFONT_IMPLEMENTATION
-#include "RFont.h"
-
-...
-
-int main () {
- ...
-
- RFont_renderer renderer = ...;
- RFont_renderer_init(&renderer);
- RFont_font* font = RFont_font_init(&renderer, "font.ttf", 20, 500, 500);
-
- i32 w = ...;
- i32 h = ...;
-
- while (1) {
- ...
- RFont_renderer_set_framebuffer(&renderer, (u32)w, (u32)h);
- RFont_renderer_set_color(&renderer, 0.0f, 1.0f, 0, 1.0f);
- RFont_draw_text(&renderer, font, "text", 100, 100, 20);
- ...
- }
-
- RFont_font_free(&renderer, font);
- RFont_renderer_free(&renderer);
- ...
-}
-*/
-
-#ifndef RFONT_INLINE
- #ifdef RFONT_C89
- #define RFONT_INLINE
- #else
- #define RFONT_INLINE inline
- #endif
-#endif
-
-#ifndef RFONT_API
- #ifdef RFONT_STATIC
- #define RFONT_API static
- #else
- #define RFONT_API extern RFONT_INLINE
- #endif
-#endif
-
-
-#ifndef RFONT_NO_STDIO
-#include <stdio.h>
-#endif
-
-#ifndef RFONT_MALLOC
-#include <stdlib.h>
-#define RFONT_MALLOC malloc
-#define RFONT_FREE free
-#endif
-
-#if !defined(RFONT_MEMCPY) || !defined(RFONT_MEMSET)
- #include <string.h>
-#endif
-
-#ifndef RFONT_MEMSET
- #define RFONT_MEMSET(ptr, value, num) memset(ptr, value, num)
-#endif
-
-#ifndef RFONT_MEMCPY
- #define RFONT_MEMCPY(dist, src, len) memcpy(dist, src, len)
-#endif
-
-#ifndef RFONT_ASSERT
- #include <assert.h>
- #define RFONT_ASSERT(x) assert(x)
-#endif
-
-#if !defined(RFONT_FLOOR) || !defined(RFONT_CEIL) || !defined(RFONT_FABS) || !defined(RFONT_SQRT)
- #include <math.h>
-#endif
-
-#ifndef RFONT_FLOOR
- #define RFONT_FLOOR(x) floor(x)
-#endif
-
-#ifndef RFONT_CEIL
- #define RFONT_CEIL(x) ceil(x)
-#endif
-
-#ifndef RFONT_FABS
- #define RFONT_FABS(x) fabs(x)
-#endif
-
-#ifndef RFONT_SQRT
- #define RFONT_SQRT(x) sqrt(x)
-#endif
-
-#if defined(__STDC__) && !defined(__STDC_VERSION__)
- #define RFONT_C89
-#endif
-
-#if !defined(RFONT_INT_DEFINED)
- #define RFONT_INT_DEFINED
- #if defined(_MSC_VER) || defined(__SYMBIAN32__) || defined(RFONT_C89)
- typedef unsigned char u8;
- typedef signed char i8;
- typedef unsigned short u16;
- typedef signed short i16;
- typedef unsigned int u32;
- typedef signed int i32;
- typedef unsigned long u64;
- typedef signed long i64;
- #else
- #include <stdint.h>
-
- typedef uint8_t u8;
- typedef int8_t i8;
- typedef uint16_t u16;
- typedef int16_t i16;
- typedef uint32_t u32;
- typedef int32_t i32;
- typedef uint64_t u64;
- typedef int64_t i64;
- #endif
-#endif
-
-#if !defined(b8)
- typedef u8 b8;
-#endif
-
-/*
-You can define these yourself if
-you want to change anything
-*/
-
-#ifndef RFont_texture
-typedef size_t RFont_texture;
-#endif
-
-#ifndef RFont_surface
-typedef void* RFont_surface;
-#endif
-
-#ifndef RFONT_MAX_GLYPHS
-#define RFONT_MAX_GLYPHS 256
-#endif
-
-#ifndef RFONT_INIT_VERTS
-#define RFONT_INIT_VERTS 20 * RFONT_MAX_GLYPHS
-#endif
-
-#ifndef RFONT_UNUSED
-#define RFONT_UNUSED(x) (void) (x);
-#endif
-
-#ifndef RFONT_RENDERER_H
-#define RFONT_RENDERER_H
-
-typedef struct RFont_render_data {
- float* verts;
- float* tcoords;
- u16* elements;
-
- RFont_texture atlas;
- size_t nverts;
- size_t nelements;
-} RFont_render_data;
-
-typedef struct RFont_renderer_proc {
- size_t (*size)(void); /*!< get the size of the renderer context */
- void (*initPtr)(void* ctx); /* any initalizations the renderer needs to do */
- RFont_texture (*create_atlas)(void* ctx, u32 atlasWidth, u32 atlasHeight); /* create a bitmap texture based on the given size */
- void (*free_atlas)(void* ctx, RFont_texture atlas);
- void (*bitmap_to_atlas)(void* ctx, RFont_texture atlas, u32 atlasWidth, u32 atlasHeight, u32 maxHeight, u8* bitmap, float w, float h, float* x, float* y); /* add the given bitmap to the texture based on the given coords and size data */
- void (*render)(void* ctx, const RFont_render_data* data); /* render the text, using the vertices, atlas texture, and texture coords given. */
- void (*set_framebuffer)(void* ctx, u32 weight, u32 height); /*!< set the frame buffer size (for ortho, for example) */
- void (*set_color)(void* ctx, float r, float g, float b, float a); /*!< set the current rendering color */
- void (*set_surface)(void* ctx, RFont_surface surface);
- void (*freePtr)(void* ctx); /* free any memory the renderer might need to free */
-} RFont_renderer_proc;
-
-typedef struct RFont_renderer {
- void* ctx; /*!< source renderer data */
- RFont_renderer_proc proc;
-} RFont_renderer;
-
-typedef struct RFont_font RFont_font;
-
-#endif /* RFONT_RENDERER_H */
-
-#ifndef RFONT_H
-#define RFONT_H
-
-RFONT_API size_t RFont_renderer_size(RFont_renderer* renderer);
-
-RFONT_API RFont_renderer* RFont_renderer_init(RFont_renderer_proc proc);
-RFONT_API void RFont_renderer_initPtr(RFont_renderer_proc proc, void* ptr, RFont_renderer* renderer);
-
-RFONT_API void RFont_renderer_set_framebuffer(RFont_renderer* renderer, u32 w, u32 h);
-RFONT_API void RFont_renderer_set_surface(RFont_renderer* renderer, RFont_surface surface);
-RFONT_API void RFont_renderer_set_color(RFont_renderer* renderer, float r, float g, float b, float a);
-
-RFONT_API void RFont_renderer_free(RFont_renderer* renderer);
-RFONT_API void RFont_renderer_freePtr(RFont_renderer* renderer);
-
-#define RFONT_GET_FONT_WIDTH(fontHeight) RFONT_MAX_GLYPHS * fontHeight
-
-typedef struct {
- u32 codepoint; /* the character (for checking) */
- size_t size; /* the size of the glyph */
- i32 x, x2, y, y2; /* coords of the character on the texture */
- RFont_font* font; /* the font that the glyph belongs to */
-
- /* source glyph data */
- i32 src;
- float w, h, x1, y1, advance;
-} RFont_glyph;
-
-typedef struct RFont_src RFont_src;
-
-struct RFont_font {
- RFont_src* src; /* source stb font info */
- float fheight; /* source font height */
- float descent; /* font descent */
- float numOfLongHorMetrics;
- float space_adv;
- u32 maxHeight;
-
- RFont_glyph glyphs[RFONT_MAX_GLYPHS]; /* glyphs */
- size_t glyph_len;
-
- RFont_texture atlas; /* atlas texture */
- size_t atlasWidth, atlasHeight;
- float atlasX, atlasY; /* the current position inside the atlas */
-
- float verts[RFONT_INIT_VERTS * 3];
- float tcoords[RFONT_INIT_VERTS * 2];
- u16 elements[RFONT_INIT_VERTS * 6];
-};
-
-
-/**
- * @brief Converts a codepoint to a utf8 string.
- * @param codepoint The codepoint to convert to utf8.
- * @return The utf8 string.
-*/
-RFONT_API char* RFont_codepoint_to_utf8(u32 codepoint);
-
-#ifndef RFONT_NO_STDIO
-/**
- * @brief Init font stucture with a TTF file path.
- * @param font_name The TTF file path.
- * @param atlasWidth The width of the atlas texture.
- * @param atlasHeight The height of the atlas texture. (This should == the max text size)
- * @return The `RFont_font` created using the TTF file data.
-*/
-RFONT_API RFont_font* RFont_font_init(RFont_renderer* renderer, const char* font_name, u32 maxHeight, size_t atlasWidth, size_t atlasHeight);
-/**
- * @brief Init a given font stucture with a TTF file path.
- * @param font_name The TTF file path.
- * @param atlasWidth The width of the atlas texture.
- * @param atlasHeight The height of the atlas texture. (This should == the max text size)
- * @pram ptr Pointer to the given font structure
- * @return returns the same pointer or NULL if the font failed to load
-*/
-RFONT_API RFont_font* RFont_font_init_ptr(RFont_renderer* renderer, const char* font_name, u32 maxHeight, size_t atlasWidth, size_t atlasHeight, RFont_font* font);
-
-#endif
-
-/**
- * @brief Init font stucture with raw TTF data.
- * @param font_data The raw TTF data.
- * @param atlasWidth The width of the atlas texture.
- * @param atlasHeight The height of the atlas texture. (This should == the max text size)
- * @return The `RFont_font` created from the data.
-*/
-RFONT_API RFont_font* RFont_font_init_data(RFont_renderer* renderer, u8* font_data, u32 maxHeight, size_t atlasWidth, size_t atlasHeight);
-
-/**
- * @brief Init a given font stucture with raw TTF data.
- * @param font_data The raw TTF data.
- * @param atlasWidth The width of the atlas texture.
- * @param atlasHeight The height of the atlas texture. (This should == the max text size)
- * @return The `RFont_font` created from the data.
- * @return returns the same pointer or NULL if the font failed to load
-*/
-RFONT_API RFont_font* RFont_font_init_data_ptr(RFont_renderer* renderer, u8* font_data, u32 maxHeight, size_t atlasWidth, size_t atlasHeight, RFont_font* ptr);
-
-/**
- * @brief Free data from the font stucture, including the stucture itself
- * @param font The font stucture to free
-*/
-RFONT_API void RFont_font_free(RFont_renderer* renderer, RFont_font* font);
-
-/**
- * @brief Free data from the font stucture only (not including the stucture)
- * @param font The strucutre with the font data to free
-*/
-RFONT_API void RFont_font_free_ptr(RFont_renderer* renderer, RFont_font* font);
-
-typedef RFont_glyph (*RFont_glyph_fallback_callback)(RFont_renderer* renderer, RFont_font* font, u32 codepoint, size_t size);
-RFont_glyph_fallback_callback RFont_set_glyph_fallback_callback(RFont_glyph_fallback_callback callback);
-
-/**
- * @brief Add a character to the font's atlas.
- * @param font The font to use.
- * @param ch The character to add to the atlas.
- * @param size The size of the character.
- * @return The `RFont_glyph` created from the data and added to the atlas.
-*/
-RFONT_API RFont_glyph RFont_font_add_char(RFont_renderer* renderer,RFont_font* font, char ch, size_t size);
-
-/**
- * @brief Add a codepoint to the font's atlas.
- * @param font The font to use.
- * @param codepoint The codepoint to add to the atlas.
- * @param size The size of the character.
- * @return The `RFont_glyph` created from the data and added to the atlas.
-*/
-RFONT_API RFont_glyph RFont_font_add_codepoint(RFont_renderer* renderer, RFont_font* font, u32 codepoint, size_t size);
-
-/**
- * @brief Add a codepoint to the font's atlas.
- * @param font The font to use.
- * @param codepoint The codepoint to add to the atlas.
- * @param size The size of the character.
- * @param fallback If the fallback function should not be called.
- * @return The `RFont_glyph` created from the data and added to the atlas.
-*/
-RFONT_API RFont_glyph RFont_font_add_codepoint_ex(RFont_renderer* renderer, RFont_font* font, u32 codepoint, size_t size, b8 fallback);
-
-/**
- * @brief Add a string to the font's atlas.
- * @param font The font to use.
- * @param ch The character to add to the atlas.
- * @param sizes The supported sizes of the character.
- * @param sizeLen length of the size array
-*/
-RFONT_API void RFont_font_add_string(RFont_renderer* renderer, RFont_font* font, const char* string, size_t* sizes, size_t sizeLen);
-
-/**
- * @brief Add a string to the font's atlas based on a given string length.
- * @param font The font to use.
- * @param ch The character to add to the atlas.
- * @param strLen length of the string
- * @param sizes The supported sizes of the character.
- * @param sizeLen length of the size array
-*/
-RFONT_API void RFont_font_add_string_len(RFont_renderer* renderer, RFont_font* font, const char* string, size_t strLen, size_t* sizes, size_t sizeLen);
-
-/**
- * @brief Get the area of the text based on the size using the font.
- * @param font The font stucture to use for drawing
- * @param text The string to draw
- * @param size The size of the text
- * @param [OUTPUT] the output width
- * @param [OUTPUT] the output height
-*/
-RFONT_API void RFont_text_area(RFont_renderer* renderer, RFont_font* font, const char* text, u32 size, u32* w, u32* h);
-
-/**
- * @brief Get the area of the text based on the size using the font, using a given length.
- * @param font The font stucture to use for drawing
- * @param text The string to draw
- * @param size The size of the text
- * @param spacing The spacing of the text
- * @param [OUTPUT] the output width
- * @param [OUTPUT] the output height
-*/
-RFONT_API void RFont_text_area_spacing(RFont_renderer* renderer, RFont_font* font, const char* text, float spacing, u32 size, u32* w, u32* h);
-
-/**
- * @brief Get the area of the text based on the size using the font, using a given length.
- * @param font The font stucture to use for drawing
- * @param text The string to draw
- * @param len The length of the string
- * @param size The size of the text
- * @param stopNL the number of \n s until it stops (0 = don't stop until the end)
- * @param spacing The spacing of the text
- * @param [OUTPUT] the output width
- * @param [OUTPUT] the output height
-*/
-RFONT_API void RFont_text_area_len(RFont_renderer* renderer, RFont_font* font, const char* text, size_t len, u32 size, size_t stopNL, float spacing, u32* w, u32* h);
-
-/**
- * @brief Draw a text string using the font.
- * @param font The font stucture to use for drawing
- * @param text The string to draw
- * @param x The x position of the text
- * @param y The y position of the text
- * @param size The size of the text
- * @return the number of verts rendered
-*/
-RFONT_API size_t RFont_draw_text(RFont_renderer* renderer, RFont_font* font, const char* text, float x, float y, u32 size);
-
-/**
- * @brief Draw a text string using the font and a given spacing.
- * @param font The font stucture to use for drawing
- * @param text The string to draw
- * @param x The x position of the text
- * @param y The y position of the text
- * @param size The size of the text
- * @param spacing The spacing of the text
- * @return the number of verts rendered
-*/
-RFONT_API size_t RFont_draw_text_spacing(RFont_renderer* renderer, RFont_font* font, const char* text, float x, float y, u32 size, float spacing);
-
-/**
- * @brief Draw a text string using the font using a given length and a given spacing.
- * @param font The font stucture to use for drawing
- * @param text The string to draw
- * @param len The length of the string
- * @param x The x position of the text
- * @param y The y position of the text
- * @param size The size of the text
- * @param spacing The spacing of the text
- * @return the number of verts rendered
-*/
-RFONT_API size_t RFont_draw_text_len(RFont_renderer* renderer, RFont_font* font, const char* text, size_t len, float x, float y, u32 size, float spacing);
-#endif /* RFONT_H */
-
-#ifdef RFONT_IMPLEMENTATION
-
-#ifndef RFONT_GET_TEXPOSX
-#define RFONT_GET_TEXPOSX(x, w) (float)((float)(x) / (float)(w))
-#define RFONT_GET_TEXPOSY(y, h) (float)((float)(y) / (float)(h))
-#endif
-
-size_t RFont_renderer_size(RFont_renderer* renderer) {
- size_t size = 0;
- if (renderer->proc.size)
- size = renderer->proc.size();
- return size;
-}
-
-RFont_renderer* RFont_renderer_init(RFont_renderer_proc proc) {
- void* ptr = NULL;
- size_t size;
-
- RFont_renderer* renderer = (RFont_renderer*)RFONT_MALLOC(sizeof(RFont_renderer));
- renderer->proc = proc;
-
- size = RFont_renderer_size(renderer);
- if (size) ptr = RFONT_MALLOC(size);
- RFont_renderer_initPtr(proc, ptr, renderer);
- return renderer;
-}
-
-void RFont_renderer_initPtr(RFont_renderer_proc proc, void* ptr, RFont_renderer* renderer) {
- renderer->ctx = ptr;
- renderer->proc = proc;
- if (renderer->proc.initPtr)
- renderer->proc.initPtr(renderer->ctx);
-}
-
-void RFont_renderer_set_framebuffer(RFont_renderer* renderer, u32 w, u32 h) {
- if (renderer->proc.set_framebuffer)
- renderer->proc.set_framebuffer(renderer->ctx, w, h);
-}
-
-void RFont_renderer_set_surface(RFont_renderer* renderer, RFont_surface surface) {
- if (renderer->proc.set_surface)
- renderer->proc.set_surface(renderer, surface);
-}
-
-void RFont_renderer_set_color(RFont_renderer* renderer, float r, float g, float b, float a) {
- if (renderer->proc.set_color)
- renderer->proc.set_color(renderer->ctx, r, g, b, a);
-}
-
-void RFont_renderer_free(RFont_renderer* renderer) {
- RFont_renderer_freePtr(renderer);
- if (renderer->ctx) RFONT_FREE(renderer->ctx);
- RFONT_FREE(renderer);
-}
-
-void RFont_renderer_freePtr(RFont_renderer* renderer) {
- if (renderer->proc.freePtr)
- renderer->proc.freePtr(renderer->ctx);
-}
-
-#define RFONT_CHAR(p, index) (((char*)p)[index])
-#define RFONT_BYTE(p, index) (((u8*)p)[index])
-#define RFONT_SHORT(arr, index) (i16)((i16)((u8*)arr)[(size_t)(index)]*256 + (i16)(((u8*)arr)[(size_t)(index) + 1]))
-#define RFONT_USHORT(arr, index) (u16)((u16)((u8*)arr)[(size_t)(index)]*256 + (u16)(((u8*)arr)[(size_t)(index) + 1]))
-#define RFONT_ULONG(arr, index) (u32)((u32)(((u8*)arr)[(size_t)(index)]<<24) + (u32)(((u8*)arr)[(size_t)(index) + 1]<<16) + (u32)(((u8*)arr)[(size_t)(index) + 2]<<8) + (u32)(((u8*)arr))[(size_t)(index) + 3])
-
-/*
-stb defines required by RFont
-
-you probably don't care about this part if you're reading just the RFont code
-*/
-
-#ifndef RFONT_EXTERNAL_STB
-typedef struct {
- unsigned char *data;
- int cursor;
- int size;
-} rstbtt__buf;
-
-typedef struct rstbtt_fontinfo rstbtt_fontinfo;
-
-struct rstbtt_fontinfo {
- unsigned char * data; /* pointer to .ttf file */
- int fontstart; /* offset of start of font */
-
- int numGlyphs; /* number of glyphs, needed for range checking */
-
- int loca,head,glyf,hhea,hmtx,kern,gpos,svg; /* table locations as offset from start of .ttf */
- int index_map; /* a cmap mapping for our chosen character encoding */
- int indexToLocFormat; /* format needed to map from glyph index to glyph */
-
- rstbtt__buf cff; /* cff font data */
- rstbtt__buf charstrings; /* the charstring index */
- rstbtt__buf gsubrs; /* global charstring subroutines index */
- rstbtt__buf subrs; /* private charstring subroutines index */
- rstbtt__buf fontdicts; /* array of font dicts */
- rstbtt__buf fdselect; /* map from glyph to fontdict */
-};
-
-RFONT_API int rstbtt_InitFont(rstbtt_fontinfo *info, const unsigned char *data, int offset);
-
-RFONT_API unsigned char* rstbtt_GetGlyphBitmapSubpixel(const rstbtt_fontinfo *info, float scale_x, float scale_y, float shift_x, float shift_y, int glyph, int *width, int *height, int *xoff, int *yoff);
-
-RFONT_API int rstbtt_FindGlyphIndex(const rstbtt_fontinfo *info, int unicode_codepoint);
-
-RFONT_API int rstbtt_GetGlyphKernAdvance(const rstbtt_fontinfo *info, int glyph1, int glyph2);
-RFONT_API int rstbtt_GetGlyphBox(const rstbtt_fontinfo *info, int glyph_index, int *x0, int *y0, int *x1, int *y1);
-#else
-#ifdef RFONT_EXTERNAL_STB_IMPLEMENTATION
- #define RFONT_EXTERNAL_STB
-#endif
-
-#ifndef RFONT_EXTERNAL_STB_IMPLEMENTATION
-#define STB_TRUETYPE_IMPLEMENTATION
-#endif
-#include "stb_truetype.h"
-
-typedef struct stbtt_fontinfo rstbtt_fontinfo;
-
-#define rstbtt_InitFont stbtt_InitFont
-#define rstbtt_GetGlyphBitmapSubpixel stbtt_GetGlyphBitmapSubpixel
-#define rstbtt_FindGlyphIndex stbtt_FindGlyphIndex
-#define rstbtt_GetGlyphKernAdvance stbtt_GetGlyphKernAdvance
-#define rstbtt_GetGlyphBox stbtt_GetGlyphBox
-#endif /* RFONT_EXTERNAL_STB */
-
-struct RFont_src {
- rstbtt_fontinfo info;
-};
-
-/*
-END of stb defines required by RFont
-
-you probably care about this part
-*/
-
-#ifndef RFONT_NO_STDIO
-char* RFont_read_file(const char* font_name) {
- size_t size, out;
- char* ttf_buffer;
- FILE* ttf_file = fopen(font_name, "rb");
-
- if (ttf_file == NULL) return NULL;
-
- fseek(ttf_file, 0U, SEEK_END);
- size = (size_t)ftell(ttf_file);
- if (size <= 0) return NULL;
-
- ttf_buffer = (char*)RFONT_MALLOC(sizeof(char) * (size_t)size);
- fseek(ttf_file, 0U, SEEK_SET);
-
- out = fread(ttf_buffer, 1, (size_t)size, ttf_file);
- RFONT_UNUSED(out);
-
- return ttf_buffer;
-}
-
-RFont_font* RFont_font_init(RFont_renderer* renderer, const char* font_name, u32 maxHeight, size_t atlasWidth, size_t atlasHeight) {
- char* ttf_buffer = RFont_read_file(font_name);
- RFont_font* font = RFont_font_init_data(renderer, (u8*)ttf_buffer, maxHeight, atlasWidth, atlasHeight);
- return font;
-}
-
-RFont_font* RFont_font_init_ptr(RFont_renderer* renderer, const char* font_name, u32 maxHeight, size_t atlasWidth, size_t atlasHeight, RFont_font* ptr) {
- char* ttf_buffer = RFont_read_file(font_name);
- RFont_font* font = RFont_font_init_data_ptr(renderer, (u8*)ttf_buffer, maxHeight, atlasWidth, atlasHeight, ptr);
- return font;
-}
-#endif
-
-RFont_font* RFont_font_init_data(RFont_renderer* renderer, u8* font_data, u32 maxHeight, size_t atlasWidth, size_t atlasHeight) {
- RFont_font* font = (RFont_font*)RFONT_MALLOC(sizeof(RFont_font));
- return RFont_font_init_data_ptr(renderer, font_data, maxHeight, atlasWidth, atlasHeight, font);
-}
-
-RFont_font* RFont_font_init_data_ptr(RFont_renderer* renderer, u8* font_data, u32 maxHeight, size_t atlasWidth, size_t atlasHeight, RFont_font* font) {
- u16 index = 0;
- u16 vert_index = 0;
-
- i32 space_codepoint = 0;
- font->src = (RFont_src*)RFONT_MALLOC(sizeof(RFont_src));
- font->atlasWidth = atlasWidth;
- font->atlasHeight = atlasHeight;
- font->maxHeight = maxHeight;
-
- rstbtt_InitFont(&font->src->info, font_data, 0);
-
- font->fheight = RFONT_SHORT(font->src->info.data, font->src->info.hhea + 4) - RFONT_SHORT(font->src->info.data, font->src->info.hhea + 6);
- font->descent = RFONT_SHORT(font->src->info.data, font->src->info.hhea + 6);
-
- font->numOfLongHorMetrics = RFONT_USHORT(font->src->info.data, font->src->info.hhea + 34);
-
-
- space_codepoint = rstbtt_FindGlyphIndex(&font->src->info, (int)' ');
- if (' ' < font->numOfLongHorMetrics)
- font->space_adv = RFONT_SHORT(font->src->info.data, font->src->info.hmtx + 4 * space_codepoint);
- else
- font->space_adv = RFONT_SHORT(font->src->info.data, font->src->info.hmtx + 4 * (i32)(font->numOfLongHorMetrics - 1));
-
- if (renderer->proc.create_atlas)
- font->atlas = renderer->proc.create_atlas(renderer->ctx, (u32)atlasWidth, (u32)atlasHeight);
-
- font->atlasX = 0;
- font->atlasY = 0;
- font->glyph_len = 0;
-
- for (index = 0; index < RFONT_INIT_VERTS; index += 6) {
- font->elements[index + 0] = vert_index + 0;
- font->elements[index + 1] = vert_index + 1;
- font->elements[index + 2] = vert_index + 2;
- font->elements[index + 3] = vert_index + 3;
- font->elements[index + 4] = vert_index + 0;
- font->elements[index + 5] = vert_index + 2;
- vert_index += 4;
- }
-
- return font;
-}
-
-void RFont_font_free_ptr(RFont_renderer* renderer, RFont_font* font) {
- if (renderer->proc.free_atlas)
- renderer->proc.free_atlas(renderer->ctx, font->atlas);
- RFONT_FREE(font->src);
-}
-
-void RFont_font_free(RFont_renderer* renderer, RFont_font* font) {
- RFONT_FREE(font->src->info.data);
- RFont_font_free_ptr(renderer, font);
- RFONT_FREE(font);
-}
-
-/*
-decode utf8 character to codepoint
-*/
-
-/* Copyright (c) 2008-2010 Bjoern Hoehrmann <bjoern@hoehrmann.de>
- See http://bjoern.hoehrmann.de/utf-8/decoder/dfa/ for details.
-*/
-
-#define RFONT_UTF8_ACCEPT 0
-#define RFont_UTF8_REJECT 12
-
-RFONT_API u32 RFont_decode_utf8(u32* state, u32* codep, u32 byte);
-
-u32 RFont_decode_utf8(u32* state, u32* codep, u32 byte) {
- static const u8 utf8d[] = {
- 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 00..1f */
- 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 20..3f */
- 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 40..5f */
- 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 60..7f */
- 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9, /* 80..9f */
- 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7, /* a0..bf */
- 8,8,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2, /* c0..df */
- 0xa,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x3,0x4,0x3,0x3, /* e0..ef */
- 0xb,0x6,0x6,0x6,0x5,0x8,0x8,0x8,0x8,0x8,0x8,0x8,0x8,0x8,0x8,0x8, /* f0..ff */
- 0x0,0x1,0x2,0x3,0x5,0x8,0x7,0x1,0x1,0x1,0x4,0x6,0x1,0x1,0x1,0x1, /* s0..s0 */
- 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,0,1,0,1,1,1,1,1,1, /* s1..s2 */
- 1,2,1,1,1,1,1,2,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1, /* s3..s4 */
- 1,2,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,3,1,3,1,1,1,1,1,1, /* s5..s6 */
- 1,3,1,1,1,1,1,3,1,3,1,1,1,1,1,1,1,3,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* s7..s8 */
- };
-
- u32 type = utf8d[byte];
-
- *codep = (*state != RFONT_UTF8_ACCEPT) ?
- (byte & 0x3fu) | (*codep << 6) :
- (0xff >> type) & (byte);
-
- *state = utf8d[256 + *state * 16 + type];
- return *state;
-}
-
-void RFont_font_add_string(RFont_renderer* renderer, RFont_font* font, const char* string, size_t* sizes, size_t sizeLen) {
- RFont_font_add_string_len(renderer, font, string, 0, sizes, sizeLen);
-}
-
-void RFont_font_add_string_len(RFont_renderer* renderer, RFont_font* font, const char* string, size_t strLen, size_t* sizes, size_t sizeLen) {
- u32 i;
- char* str;
- for (str = (char*)string; (!strLen || (size_t)(str - string) < strLen) && *str; str++)
- for (i = 0; i < sizeLen; i++)
- RFont_font_add_char(renderer, font, *str, sizes[i]);
-}
-
-RFont_glyph_fallback_callback RFont_glyph_fallback = NULL;
-RFont_glyph_fallback_callback RFont_set_glyph_fallback_callback(RFont_glyph_fallback_callback callback) {
- RFont_glyph_fallback_callback old = RFont_glyph_fallback;
- RFont_glyph_fallback = callback;
- return old;
-}
-
-RFont_glyph RFont_font_add_char(RFont_renderer* renderer, RFont_font* font, char ch, size_t size) {
- static u32 utf8state = 0, codepoint = 0;
-
- if (RFont_decode_utf8(&utf8state, &codepoint, (u8)ch) != RFONT_UTF8_ACCEPT) {
- RFont_glyph g;
- RFONT_MEMSET(&g, 0, sizeof(RFont_glyph));
- return g;
- }
-
- return RFont_font_add_codepoint(renderer, font, codepoint, size);
-}
-
-RFont_glyph RFont_font_add_codepoint(RFont_renderer* renderer, RFont_font* font, u32 codepoint, size_t size) {
- return RFont_font_add_codepoint_ex(renderer, font, codepoint, size, 1);
-}
-
-RFont_glyph RFont_font_add_codepoint_ex(RFont_renderer* renderer, RFont_font* font, u32 codepoint, size_t size, b8 fallback) {
- RFont_glyph* glyph;
- RFont_glyph glyphNull;
-
- u8* bitmap;
- float scale;
-
- i32 x0, y0, x1, y1, w = 0, h = 0, advanceX = 0;
- u32 i;
- for (i = 0; i < font->glyph_len; i++)
- if (font->glyphs[i].codepoint == codepoint && font->glyphs[i].size == size)
- return font->glyphs[i];
-
- RFONT_MEMSET(&glyphNull, 0, sizeof(glyphNull));
- if (i < sizeof(font->glyphs)) {
- glyph = &font->glyphs[i];
- } else {
- return glyphNull;
- }
-
- glyph->src = rstbtt_FindGlyphIndex(&font->src->info, (int)codepoint);
-
- if ((glyph->src == 0 && codepoint) && fallback && RFont_glyph_fallback) {
- RFont_glyph fallbackGlyph = RFont_glyph_fallback(renderer, font, codepoint, size);
- if (fallbackGlyph.codepoint != 0 && fallbackGlyph.size != 0) {
- return fallbackGlyph;
- }
- }
-
- if (glyph->src == 0 && codepoint) return RFont_font_add_codepoint_ex(renderer, font, 0, size, fallback);
- font->glyph_len++;
-
- if (codepoint && rstbtt_GetGlyphBox(&font->src->info, glyph->src, &x0, &y0, &x1, &y1) == 0) {
- return glyphNull;
- }
-
- scale = ((float)size) / font->fheight;
- bitmap = rstbtt_GetGlyphBitmapSubpixel(&font->src->info, 0, scale, 0.0f, 0.0f, glyph->src, &w, &h, 0, 0);
- glyph->w = (float)w;
- glyph->h = (float)h;
-
- if (codepoint) {
- glyph->x1 = (float)floor((float)x0 * scale);
- glyph->y1 = (float)floor((float)-y1 * scale);
- } else glyph->y1 = (float)-((float)h * 0.75f);
-
- glyph->codepoint = codepoint;
- glyph->size = size;
- glyph->font = font;
-
- if (renderer->proc.bitmap_to_atlas)
- renderer->proc.bitmap_to_atlas(renderer->ctx, font->atlas, (u32)font->atlasWidth, (u32)font->atlasHeight, font->maxHeight, bitmap, glyph->w, glyph->h, &font->atlasX, &font->atlasY);
-
- RFONT_FREE(bitmap);
- glyph->x = (i32)(font->atlasX - glyph->w);
- glyph->x2 = (i32)(font->atlasX);
-
- glyph->y = (i32)(font->atlasY);
- glyph->y2 = (i32)((font->atlasY) + glyph->h);
-
- if (glyph->src < font->numOfLongHorMetrics)
- advanceX = RFONT_SHORT(font->src->info.data, font->src->info.hmtx + 4 * glyph->src);
- else
- advanceX = RFONT_SHORT(font->src->info.data, font->src->info.hmtx + 4 * (i32)(font->numOfLongHorMetrics - 1));
-
- glyph->advance = (u32)((float)advanceX * scale);
-
- return *glyph;
-}
-
-void RFont_text_area(RFont_renderer* renderer, RFont_font* font, const char* text, u32 size, u32* w, u32* h) {
- RFont_text_area_len(renderer, font, text, 0, size, 0, 0.0f, w, h);
-}
-
-void RFont_text_area_spacing(RFont_renderer* renderer, RFont_font* font, const char* text, float spacing, u32 size, u32* w, u32* h) {
- RFont_text_area_len(renderer, font, text, 0, size, 0, spacing, w, h);
-}
-
-void RFont_text_area_len(RFont_renderer* renderer, RFont_font* font, const char* text, size_t len, u32 size, size_t stopNL, float spacing, u32* w, u32* h) {
- float x = 0;
- size_t y = 1;
-
- char* str;
-
- float scale = (((float)size) / font->fheight);
- float space_adv = (scale * font->space_adv);
- RFont_glyph glyph;
-
- for (str = (char*)text; (len == 0 || (size_t)(str - text) < len) && *str; str++) {
- if (*str == '\n') {
- if (y == stopNL) {
- if (w) *w = (u32)x;
- if (h) *h = (u32)y * size;
- return;
- }
-
- y++;
- x = 0;
- continue;
- }
-
- if (*str == ' ' || *str == '\t') {
- x += space_adv + spacing;
- continue;
- }
-
- glyph = RFont_font_add_char(renderer, font, *str, size);
-
- if (glyph.codepoint == 0 && glyph.size == 0)
- continue;
-
- x += (float)glyph.advance + spacing;
- }
-
- if (w) *w = (u32)x;
- if(h) *h = (u32)(y * size);
-}
-
-size_t RFont_draw_text(RFont_renderer* renderer, RFont_font* font, const char* text, float x, float y, u32 size) {
- return RFont_draw_text_len(renderer, font, text, 0, x, y, size, 0.0f);
-}
-
-size_t RFont_draw_text_spacing(RFont_renderer* renderer, RFont_font* font, const char* text, float x, float y, u32 size, float spacing) {
- return RFont_draw_text_len(renderer, font, text, 0, x, y, size, spacing);
-}
-
-char* RFont_codepoint_to_utf8(u32 codepoint) {
- static char utf8[5];
- if (codepoint <= 0x7F) {
- utf8[0] = (char)codepoint;
- utf8[1] = 0;
- } else if (codepoint <= 0x7FF) {
- utf8[0] = (char)(0xC0 | (codepoint >> 6));
- utf8[1] = (char)(0x80 | (codepoint & 0x3F));
- utf8[2] = 0;
- } else if (codepoint <= 0xFFFF) {
- utf8[0] = (char)(0xE0 | (codepoint >> 12));
- utf8[1] = (char)(0x80 | ((codepoint >> 6) & 0x3F));
- utf8[2] = (char)(0x80 | (codepoint & 0x3F));
- utf8[3] = 0;
- } else if (codepoint <= 0x10FFFF) {
- utf8[0] = (char)(0xF0 | (codepoint >> 18));
- utf8[1] = (char)(0x80 | ((codepoint >> 12) & 0x3F));
- utf8[2] = (char)(0x80 | ((codepoint >> 6) & 0x3F));
- utf8[3] = (char)(0x80 | (codepoint & 0x3F));
- utf8[4] = 0;
- } else {
- utf8[0] = 0;
- }
-
- return utf8;
-}
-
-size_t RFont_draw_text_len(RFont_renderer* renderer, RFont_font* font, const char* text, size_t len, float x, float y, u32 size, float spacing) {
- RFont_render_data data;
- float startX = x;
- float startY = y;
-
- size_t i = 0;
- size_t tIndex = 0;
-
- char* str;
- RFont_glyph glyph;
- float realX, realY;
-
- float scale = (((float)size) / font->fheight);
- float space_adv = (scale * font->space_adv);
-
- float descent_offset = (-font->descent * scale);
-
- data.verts = font->verts;
- data.tcoords = font->tcoords;
- data.elements = font->elements;
- data.atlas = font->atlas;
- data.nverts = 0;
- data.nelements = 0;
-
- RFONT_UNUSED(startY);
-
- y = (y + (float)size - descent_offset);
-
- for (str = (char*)text; (len == 0 || (size_t)(str - text) < len) && *str; str++) {
- if (*str == '\n') {
- x = startX;
- y += (float)size;
- continue;
- }
-
- if (*str == ' ' || *str == '\t') {
- x += space_adv + spacing;
- continue;
- }
-
- glyph = RFont_font_add_char(renderer, font, *str, size);
-
- if (glyph.codepoint == 0 && glyph.size == 0)
- continue;
-
- if (glyph.font != font) {
- RFont_draw_text_len(renderer, glyph.font, RFont_codepoint_to_utf8(glyph.codepoint), 4, x, y - (float)size + descent_offset, size, spacing);
- x += glyph.advance + spacing;
- continue;
- }
-
- realX = x + glyph.x1;
- realY = y + glyph.y1;
-
- i = data.nverts * 3;
- tIndex = data.nverts * 2;
-
- data.verts[i] = (i32)realX;
- data.verts[i + 1] = realY;
- data.verts[i + 2] = 0;
- /* */
- data.verts[i + 3] = (i32)realX;
- data.verts[i + 4] = realY + glyph.h;
- data.verts[i + 5] = 0;
- /* */
- data.verts[i + 6] = (i32)(realX + glyph.w);
- data.verts[i + 7] = realY + glyph.h;
- data.verts[i + 8] = 0;
- /* */
- /* */
- data.verts[i + 9] = (i32)(realX + glyph.w);
- data.verts[i + 10] = realY;
- data.verts[i + 11] = 0;
-
- /* texture coords */
- data.tcoords[tIndex] = RFONT_GET_TEXPOSX(glyph.x, font->atlasWidth);
- data.tcoords[tIndex + 1] = RFONT_GET_TEXPOSY(glyph.y, font->atlasWidth);
-
- /* */
- data.tcoords[tIndex + 2] = RFONT_GET_TEXPOSX(glyph.x, font->atlasWidth);
- data.tcoords[tIndex + 3] = RFONT_GET_TEXPOSY(glyph.y2, font->atlasHeight);
- /* */
- data.tcoords[tIndex + 4] = RFONT_GET_TEXPOSX(glyph.x2, font->atlasWidth);
- data.tcoords[tIndex + 5] = RFONT_GET_TEXPOSY(glyph.y2, font->atlasHeight);
- /* */
- /* */
- data.tcoords[tIndex + 6] = RFONT_GET_TEXPOSX(glyph.x2, font->atlasWidth);
- data.tcoords[tIndex + 7] = RFONT_GET_TEXPOSY(glyph.y, font->atlasWidth);
-
- x += glyph.advance + spacing;
-
- data.nverts += 4;
- data.nelements += 6;
- }
-
- if (i && renderer->proc.render)
- renderer->proc.render(renderer->ctx, &data);
-
- return data.nelements;
-}
-
-/*
-stb_truetype defines and source code required by RFont
-
-you probably don't care about this part if you're reading just the RFont code
-*/
-
-#ifndef RFONT_EXTERNAL_STB
- typedef char rstbtt__check_size32[sizeof(i32)==4 ? 1 : -1];
- typedef char rstbtt__check_size16[sizeof(i16)==2 ? 1 : -1];
-#ifdef __cplusplus
-extern "C" {
-#endif
-
-enum {
- rstbtt_vmove=1,
- rstbtt_vline,
- rstbtt_vcurve,
- rstbtt_vcubic
-};
-
-typedef struct rstbtt_vertex {
- float x,y,cx,cy,cx1,cy1;
- unsigned char type,padding;
-} rstbtt_vertex;
-
-RFONT_API int rstbtt_GetGlyphShape(const rstbtt_fontinfo *info, int glyph_index, rstbtt_vertex **vertices);
-
-/* @TODO: don't expose this structure */
-typedef struct
-{
- int w,h,stride;
- unsigned char *pixels;
-} rstbtt__bitmap;
-
-/* rasterize a shape with quadratic beziers into a bitmap */
-RFONT_API void rstbtt_Rasterize(rstbtt__bitmap *result, /* 1-channel bitmap to draw into */
- float flatness_in_pixels, /* allowable error of curve in pixels */
- rstbtt_vertex *vertices, /* array of vertices defining shape */
- int num_verts, /* number of vertices in above array */
- float scale_x, float scale_y, /* scale applied to input vertices */
- float shift_x, float shift_y, /* translation applied to input vertices */
- int x_off, int y_off, /* another translation applied to input */
- int invert); /* if non-zero, vertically flip shape */
-
-enum { /* platformID */
- rstbtt_PLATFORM_ID_UNICODE =0,
- rstbtt_PLATFORM_ID_MAC =1,
- rstbtt_PLATFORM_ID_ISO =2,
- rstbtt_PLATFORM_ID_MICROSOFT =3
-};
-
-enum { /* encodingID for rstbtt_PLATFORM_ID_UNICODE */
- rstbtt_UNICODE_EID_UNICODE_1_0 =0,
- rstbtt_UNICODE_EID_UNICODE_1_1 =1,
- rstbtt_UNICODE_EID_ISO_10646 =2,
- rstbtt_UNICODE_EID_UNICODE_2_0_BMP=3,
- rstbtt_UNICODE_EID_UNICODE_2_0_FULL=4
-};
-
-enum { /* encodingID for rstbtt_PLATFORM_ID_MICROSOFT */
- rstbtt_MS_EID_SYMBOL =0,
- rstbtt_MS_EID_UNICODE_BMP =1,
- rstbtt_MS_EID_SHIFTJIS =2,
- rstbtt_MS_EID_UNICODE_FULL =10
-};
-
-enum { /* encodingID for rstbtt_PLATFORM_ID_MAC; same as Script Manager codes */
- rstbtt_MAC_EID_ROMAN =0, rstbtt_MAC_EID_ARABIC =4,
- rstbtt_MAC_EID_JAPANESE =1, rstbtt_MAC_EID_HEBREW =5,
- rstbtt_MAC_EID_CHINESE_TRAD =2, rstbtt_MAC_EID_GREEK =6,
- rstbtt_MAC_EID_KOREAN =3, rstbtt_MAC_EID_RUSSIAN =7
-};
-
-enum { /* languageID for rstbtt_PLATFORM_ID_MICROSOFT; same as LCID...
- problematic because there are e.g. 16 english LCIDs and 16 arabic LCIDs */
- rstbtt_MS_LANG_ENGLISH =0x0409, rstbtt_MS_LANG_ITALIAN =0x0410,
- rstbtt_MS_LANG_CHINESE =0x0804, rstbtt_MS_LANG_JAPANESE =0x0411,
- rstbtt_MS_LANG_DUTCH =0x0413, rstbtt_MS_LANG_KOREAN =0x0412,
- rstbtt_MS_LANG_FRENCH =0x040c, rstbtt_MS_LANG_RUSSIAN =0x0419,
- rstbtt_MS_LANG_GERMAN =0x0407, rstbtt_MS_LANG_SPANISH =0x0409,
- rstbtt_MS_LANG_HEBREW =0x040d, rstbtt_MS_LANG_SWEDISH =0x041D
-};
-
-enum { /* languageID for rstbtt_PLATFORM_ID_MAC */
- rstbtt_MAC_LANG_ENGLISH =0 , rstbtt_MAC_LANG_JAPANESE =11,
- rstbtt_MAC_LANG_ARABIC =12, rstbtt_MAC_LANG_KOREAN =23,
- rstbtt_MAC_LANG_DUTCH =4 , rstbtt_MAC_LANG_RUSSIAN =32,
- rstbtt_MAC_LANG_FRENCH =1 , rstbtt_MAC_LANG_SPANISH =6 ,
- rstbtt_MAC_LANG_GERMAN =2 , rstbtt_MAC_LANG_SWEDISH =5 ,
- rstbtt_MAC_LANG_HEBREW =10, rstbtt_MAC_LANG_CHINESE_SIMPLIFIED =33,
- rstbtt_MAC_LANG_ITALIAN =3 , rstbtt_MAC_LANG_CHINESE_TRAD =19
-};
-
-#ifdef __cplusplus
-}
-#endif
-
-#ifndef rstbtt_MAX_OVERSAMPLE
-#define rstbtt_MAX_OVERSAMPLE 8
-#endif
-
-#if rstbtt_MAX_OVERSAMPLE > 255
-#error "rstbtt_MAX_OVERSAMPLE cannot be > 255"
-#endif
-
-typedef int rstbtt__test_oversample_pow2[(rstbtt_MAX_OVERSAMPLE & (rstbtt_MAX_OVERSAMPLE-1)) == 0 ? 1 : -1];
-
-#ifndef rstbtt_RASTERIZER_VERSION
-#define rstbtt_RASTERIZER_VERSION 2
-#endif
-
-#ifdef _MSC_VER
-#define rstbtt__NOTUSED(v) (void)(v)
-#else
-#define rstbtt__NOTUSED(v) (void)sizeof(v)
-#endif
-
-#undef RFONT_API
-#define RFONT_API extern
-
-
-
-RFONT_API u8 rstbtt__buf_get8(rstbtt__buf *b)
-{
- if (b->cursor >= b->size)
- return 0;
- return b->data[b->cursor++];
-}
-
-RFONT_API u8 rstbtt__buf_peek8(rstbtt__buf *b)
-{
- if (b->cursor >= b->size)
- return 0;
- return b->data[b->cursor];
-}
-
-RFONT_API void rstbtt__buf_seek(rstbtt__buf *b, int o)
-{
- assert(!(o > b->size || o < 0));
- b->cursor = (o > b->size || o < 0) ? b->size : o;
-}
-
-RFONT_API void rstbtt__buf_skip(rstbtt__buf *b, int o)
-{
- rstbtt__buf_seek(b, b->cursor + o);
-}
-
-RFONT_API u32 rstbtt__buf_get(rstbtt__buf *b, int n)
-{
- u32 v = 0;
- int i;
- assert(n >= 1 && n <= 4);
- for (i = 0; i < n; i++)
- v = (v << 8) | rstbtt__buf_get8(b);
- return v;
-}
-
-RFONT_API rstbtt__buf rstbtt__new_buf(const void *p, size_t size)
-{
- rstbtt__buf r;
- assert(size < 0x40000000);
- r.data = (u8*) p;
- r.size = (int) size;
- r.cursor = 0;
- return r;
-}
-
-#define rstbtt__buf_get16(b) (u16)rstbtt__buf_get((b), 2)
-#define rstbtt__buf_get32(b) (u32)rstbtt__buf_get((b), 4)
-
-RFONT_API rstbtt__buf rstbtt__buf_range(const rstbtt__buf *b, int o, int s)
-{
- rstbtt__buf r = rstbtt__new_buf(NULL, 0);
- if (o < 0 || s < 0 || o > b->size || s > b->size - o) return r;
- r.data = b->data + o;
- r.size = s;
- return r;
-}
-
-RFONT_API rstbtt__buf rstbtt__cff_get_index(rstbtt__buf *b)
-{
- int count, start, offsize;
- start = b->cursor;
- count = rstbtt__buf_get16(b);
- if (count) {
- offsize = rstbtt__buf_get8(b);
- assert(offsize >= 1 && offsize <= 4);
- rstbtt__buf_skip(b, offsize * count);
- rstbtt__buf_skip(b, (int)rstbtt__buf_get(b, offsize) - 1);
- }
- return rstbtt__buf_range(b, start, b->cursor - start);
-}
-
-RFONT_API u32 rstbtt__cff_int(rstbtt__buf *b)
-{
- int b0 = rstbtt__buf_get8(b);
- if (b0 >= 32 && b0 <= 246) return (u32)b0 - 139;
- else if (b0 >= 247 && b0 <= 250) return (u32)((b0 - 247)*256 + rstbtt__buf_get8(b) + 108);
- else if (b0 >= 251 && b0 <= 254) return (u32)(-(b0 - 251)*256 - rstbtt__buf_get8(b) - 108);
- else if (b0 == 28) return rstbtt__buf_get16(b);
- else if (b0 == 29) return rstbtt__buf_get32(b);
- assert(0);
- return 0;
-}
-
-RFONT_API void rstbtt__cff_skip_operand(rstbtt__buf *b) {
- int v, b0 = rstbtt__buf_peek8(b);
- assert(b0 >= 28);
- if (b0 == 30) {
- rstbtt__buf_skip(b, 1);
- while (b->cursor < b->size) {
- v = rstbtt__buf_get8(b);
- if ((v & 0xF) == 0xF || (v >> 4) == 0xF)
- break;
- }
- } else {
- rstbtt__cff_int(b);
- }
-}
-
-RFONT_API rstbtt__buf rstbtt__dict_get(rstbtt__buf *b, int key)
-{
- rstbtt__buf_seek(b, 0);
- while (b->cursor < b->size) {
- int start = b->cursor, end, op;
- while (rstbtt__buf_peek8(b) >= 28)
- rstbtt__cff_skip_operand(b);
- end = b->cursor;
- op = rstbtt__buf_get8(b);
- if (op == 12) op = rstbtt__buf_get8(b) | 0x100;
- if (op == key) return rstbtt__buf_range(b, start, end-start);
- }
- return rstbtt__buf_range(b, 0, 0);
-}
-
-RFONT_API void rstbtt__dict_get_ints(rstbtt__buf *b, int key, int outcount, u32 *out)
-{
- int i;
- rstbtt__buf operands = rstbtt__dict_get(b, key);
- for (i = 0; i < outcount && operands.cursor < operands.size; i++)
- out[i] = rstbtt__cff_int(&operands);
-}
-
-RFONT_API int rstbtt__cff_index_count(rstbtt__buf *b)
-{
- rstbtt__buf_seek(b, 0);
- return rstbtt__buf_get16(b);
-}
-
-RFONT_API rstbtt__buf rstbtt__cff_index_get(rstbtt__buf b, int i)
-{
- int count, offsize, start, end;
- rstbtt__buf_seek(&b, 0);
- count = rstbtt__buf_get16(&b);
- offsize = rstbtt__buf_get8(&b);
- assert(i >= 0 && i < count);
- assert(offsize >= 1 && offsize <= 4);
- rstbtt__buf_skip(&b, i*offsize);
- start = (int)rstbtt__buf_get(&b, offsize);
- end = (int)rstbtt__buf_get(&b, offsize);
- return rstbtt__buf_range(&b, 2+(count+1)*offsize+start, end - start);
-}
-
-#define rstbtt_tag4(p,c0,c1,c2,c3) ((p)[0] == (c0) && (p)[1] == (c1) && (p)[2] == (c2) && (p)[3] == (c3))
-#define rstbtt_tag(p,str) rstbtt_tag4(p,str[0],str[1],str[2],str[3])
-
-/* @OPTIMIZE: binary search */
-RFONT_API u32 rstbtt__find_table(u8 *data, u32 fontstart, const char *tag)
-{
- i32 num_tables = RFONT_USHORT(data, fontstart+4);
- u32 tabledir = fontstart + 12;
- i32 i;
- for (i=0; i < num_tables; ++i) {
- u32 loc = tabledir + 16 * (u32)i;
- if (rstbtt_tag(data+loc+0, tag))
- return RFONT_ULONG(data, loc+8);
- }
- return 0;
-}
-
-RFONT_API rstbtt__buf rstbtt__get_subrs(rstbtt__buf cff, rstbtt__buf fontdict)
-{
- u32 subrsoff = 0, private_loc[2] = { 0, 0 };
- rstbtt__buf pdict;
- rstbtt__dict_get_ints(&fontdict, 18, 2, private_loc);
- if (!private_loc[1] || !private_loc[0]) return rstbtt__new_buf(NULL, 0);
- pdict = rstbtt__buf_range(&cff, (int)private_loc[1], (int)private_loc[0]);
- rstbtt__dict_get_ints(&pdict, 19, 1, &subrsoff);
- if (!subrsoff) return rstbtt__new_buf(NULL, 0);
- rstbtt__buf_seek(&cff, (int)(private_loc[1] + subrsoff));
- return rstbtt__cff_get_index(&cff);
-}
-
-RFONT_API void rstbtt_setvertex(rstbtt_vertex *v, u8 type, i32 x, i32 y, i32 cx, i32 cy)
-{
- v->type = type;
- v->x = (i16) x;
- v->y = (i16) y;
- v->cx = (i16) cx;
- v->cy = (i16) cy;
-}
-
-RFONT_API int rstbtt__close_shape(rstbtt_vertex *vertices, int num_vertices, int was_off, int start_off,
- i32 sx, i32 sy, i32 scx, i32 scy, i32 cx, i32 cy)
-{
- if (start_off) {
- if (was_off)
- rstbtt_setvertex(&vertices[num_vertices++], rstbtt_vcurve, (cx+scx)>>1, (cy+scy)>>1, cx,cy);
- rstbtt_setvertex(&vertices[num_vertices++], rstbtt_vcurve, sx,sy,scx,scy);
- } else {
- if (was_off)
- rstbtt_setvertex(&vertices[num_vertices++], rstbtt_vcurve,sx,sy,cx,cy);
- else
- rstbtt_setvertex(&vertices[num_vertices++], rstbtt_vline,sx,sy,0,0);
- }
- return num_vertices;
-}
-
-RFONT_API int rstbtt__GetGlyfOffset(const rstbtt_fontinfo *info, int glyph_index);
-
-RFONT_API int rstbtt__GetGlyphShapeTT(const rstbtt_fontinfo *info, int glyph_index, rstbtt_vertex **pvertices)
-{
- i16 numberOfContours;
- u8 *endPtsOfContours;
- u8 *data = info->data;
- rstbtt_vertex *vertices=0;
- int num_vertices=0;
- int g = rstbtt__GetGlyfOffset(info, glyph_index);
-
- *pvertices = NULL;
-
- if (g < 0) return 0;
-
- numberOfContours = RFONT_SHORT(data, g);
-
- if (numberOfContours > 0) {
- u8 flags=0,flagcount;
- i32 ins, i,j=0,m,n, next_move, was_off=0, off, start_off=0;
- i32 x,y,cx,cy,sx,sy, scx,scy;
- u8 *points;
- endPtsOfContours = (data + g + 10);
- ins = RFONT_USHORT(data, g + 10 + numberOfContours * 2);
- points = data + g + 10 + numberOfContours * 2 + 2 + ins;
-
- n = 1+RFONT_USHORT(endPtsOfContours, numberOfContours*2-2);
-
- m = n + 2*numberOfContours; /* a loose bound on how many vertices we might need */
- vertices = (rstbtt_vertex *) RFONT_MALLOC((size_t)m * sizeof(vertices[0]));
- if (vertices == 0)
- return 0;
-
- next_move = 0;
- flagcount=0;
-
- off = m - n; /* starting offset for uninterpreted data, regardless of how m ends up being calculated */
-
- /* first load flags */
-
- for (i=0; i < n; ++i) {
- if (flagcount == 0) {
- flags = *points++;
- if (flags & 8)
- flagcount = *points++;
- } else
- --flagcount;
- vertices[off+i].type = flags;
- }
-
- /* now load x coordinates */
- x=0;
- for (i=0; i < n; ++i) {
- flags = vertices[off+i].type;
- if (flags & 2) {
- i16 dx = *points++;
- x += (flags & 16) ? dx : -dx; /* ??? */
- } else {
- if (!(flags & 16)) {
- x = x + (i16) (points[0]*256 + points[1]);
- points += 2;
- }
- }
- vertices[off+i].x = (i16) x;
- }
-
- /* now load y coordinates */
- y=0;
- for (i=0; i < n; ++i) {
- flags = vertices[off+i].type;
- if (flags & 4) {
- i16 dy = *points++;
- y += (flags & 32) ? dy : -dy; /* ??? */
- } else {
- if (!(flags & 32)) {
- y = y + (i16) (points[0]*256 + points[1]);
- points += 2;
- }
- }
- vertices[off+i].y = (i16) y;
- }
-
- /* now convert them to our format */
- num_vertices=0;
- sx = sy = cx = cy = scx = scy = 0;
- for (i=0; i < n; ++i) {
- flags = vertices[off+i].type;
- x = (i16) vertices[off+i].x;
- y = (i16) vertices[off+i].y;
-
- if (next_move == i) {
- if (i != 0)
- num_vertices = rstbtt__close_shape(vertices, num_vertices, was_off, start_off, sx,sy,scx,scy,cx,cy);
-
- /* now start the new one */
- start_off = !(flags & 1);
- if (start_off) {
- /* if we start off with an off-curve point, then when we need to find a point on the curve */
- /* where we can start, and we need to save some state for when we wraparound. */
- scx = x;
- scy = y;
- if (!(vertices[off+i+1].type & 1)) {
- /* next point is also a curve point, so interpolate an on-point curve */
- sx = (x + (i32) vertices[off+i+1].x) >> 1;
- sy = (y + (i32) vertices[off+i+1].y) >> 1;
- } else {
- /* otherwise just use the next point as our start point */
- sx = (i32) vertices[off+i+1].x;
- sy = (i32) vertices[off+i+1].y;
- ++i; /* we're using point i+1 as the starting point, so skip it */
- }
- } else {
- sx = x;
- sy = y;
- }
- rstbtt_setvertex(&vertices[num_vertices++], rstbtt_vmove,sx,sy,0,0);
- was_off = 0;
- next_move = 1 + RFONT_USHORT(endPtsOfContours, j*2);
- ++j;
- } else {
- if (!(flags & 1)) { /* if it's a curve */
- if (was_off) /* two off-curve control points in a row means interpolate an on-curve midpoint */
- rstbtt_setvertex(&vertices[num_vertices++], rstbtt_vcurve, (cx+x)>>1, (cy+y)>>1, cx, cy);
- cx = x;
- cy = y;
- was_off = 1;
- } else {
- if (was_off)
- rstbtt_setvertex(&vertices[num_vertices++], rstbtt_vcurve, x,y, cx, cy);
- else
- rstbtt_setvertex(&vertices[num_vertices++], rstbtt_vline, x,y,0,0);
- was_off = 0;
- }
- }
- }
- num_vertices = rstbtt__close_shape(vertices, num_vertices, was_off, start_off, sx,sy,scx,scy,cx,cy);
- } else if (numberOfContours < 0) {
- /* Compound shapes. */
- int more = 1;
- u8 *comp = data + g + 10;
- num_vertices = 0;
- vertices = 0;
- while (more) {
- u16 flags, gidx;
- int comp_num_verts = 0, i;
- rstbtt_vertex *comp_verts = 0, *tmp = 0;
- float mtx[6] = {1,0,0,1,0,0}, m, n;
-
- flags = (u16)RFONT_SHORT(comp, 0); comp+=2;
- gidx = (u16)RFONT_SHORT(comp, 0); comp+=2;
-
- if (flags & 2) { /* XY values */
- if (flags & 1) { /* shorts */
- mtx[4] = RFONT_SHORT(comp, 0); comp+=2;
- mtx[5] = RFONT_SHORT(comp, 0); comp+=2;
- } else {
- mtx[4] = RFONT_CHAR(comp, 0); comp+=1;
- mtx[5] = RFONT_CHAR(comp, 0); comp+=1;
- }
- }
- else {
- /* @TODO handle matching point */
- assert(0);
- }
- if (flags & (1<<3)) { /* WE_HAVE_A_SCALE */
- mtx[0] = mtx[3] = RFONT_SHORT(comp, 0 )/16384.0f; comp+=2;
- mtx[1] = mtx[2] = 0;
- } else if (flags & (1<<6)) { /* WE_HAVE_AN_X_AND_YSCALE */
- mtx[0] = RFONT_SHORT(comp, 0)/16384.0f; comp+=2;
- mtx[1] = mtx[2] = 0;
- mtx[3] = RFONT_SHORT(comp, 0)/16384.0f; comp+=2;
- } else if (flags & (1<<7)) { /* WE_HAVE_A_TWO_BY_TWO */
- mtx[0] = RFONT_SHORT(comp, 0)/16384.0f; comp+=2;
- mtx[1] = RFONT_SHORT(comp, 0)/16384.0f; comp+=2;
- mtx[2] = RFONT_SHORT(comp, 0)/16384.0f; comp+=2;
- mtx[3] = RFONT_SHORT(comp, 0)/16384.0f; comp+=2;
- }
-
- /* Find transformation scales. */
- m = (float) sqrt(mtx[0]*mtx[0] + mtx[1]*mtx[1]);
- n = (float) sqrt(mtx[2]*mtx[2] + mtx[3]*mtx[3]);
-
- /* Get indexed glyph. */
- comp_num_verts = rstbtt_GetGlyphShape(info, gidx, &comp_verts);
- if (comp_num_verts > 0) {
- /* Transform vertices. */
- for (i = 0; i < comp_num_verts; ++i) {
- rstbtt_vertex* v = &comp_verts[i];
- float x,y;
- x=v->x; y=v->y;
- v->x = (float)(m * (mtx[0]*x + mtx[2]*y + mtx[4]));
- v->y = (float)(n * (mtx[1]*x + mtx[3]*y + mtx[5]));
- x=v->cx; y=v->cy;
- v->cx = (float)(m * (mtx[0] * (float)x + mtx[2] * (float)y + mtx[4]));
- v->cy = (float)(n * (mtx[1] * (float)x + mtx[3] * (float)y + mtx[5]));
- }
- /* Append vertices. */
- tmp = (rstbtt_vertex*)RFONT_MALLOC((size_t)(num_vertices + comp_num_verts) * sizeof(rstbtt_vertex));
- if (!tmp) {
- if (vertices) RFONT_FREE(vertices);
- if (comp_verts) RFONT_FREE(comp_verts);
- return 0;
- }
- if (num_vertices > 0) RFONT_MEMCPY(tmp, vertices, (size_t)num_vertices * sizeof(rstbtt_vertex));
- RFONT_MEMCPY(tmp+num_vertices, comp_verts, (size_t)comp_num_verts * sizeof(rstbtt_vertex));
- if (vertices) RFONT_FREE(vertices);
- vertices = tmp;
- RFONT_FREE(comp_verts);
- num_vertices += comp_num_verts;
- }
- /* More components ? */
- more = flags & (1<<5);
- }
- } else {
- /* numberOfCounters == 0, do nothing */
- }
-
- *pvertices = vertices;
- return num_vertices;
-}
-
-typedef struct
-{
- int bounds;
- int started;
- float first_x, first_y;
- float x, y;
- i32 min_x, max_x, min_y, max_y;
-
- rstbtt_vertex *pvertices;
- int num_vertices;
-} rstbtt__csctx;
-
-#define rstbtt__CSCTX_INIT(bounds) {bounds,0, 0,0, 0,0, 0,0,0,0, NULL, 0}
-
-RFONT_API void rstbtt__track_vertex(rstbtt__csctx *c, i32 x, i32 y)
-{
- if (x > c->max_x || !c->started) c->max_x = x;
- if (y > c->max_y || !c->started) c->max_y = y;
- if (x < c->min_x || !c->started) c->min_x = x;
- if (y < c->min_y || !c->started) c->min_y = y;
- c->started = 1;
-}
-
-RFONT_API void rstbtt__csctx_v(rstbtt__csctx *c, u8 type, i32 x, i32 y, i32 cx, i32 cy, i32 cx1, i32 cy1)
-{
- if (c->bounds) {
- rstbtt__track_vertex(c, x, y);
- if (type == rstbtt_vcubic) {
- rstbtt__track_vertex(c, cx, cy);
- rstbtt__track_vertex(c, cx1, cy1);
- }
- } else {
- rstbtt_setvertex(&c->pvertices[c->num_vertices], type, x, y, cx, cy);
- c->pvertices[c->num_vertices].cx1 = (i16) cx1;
- c->pvertices[c->num_vertices].cy1 = (i16) cy1;
- }
- c->num_vertices++;
-}
-
-RFONT_API void rstbtt__csctx_close_shape(rstbtt__csctx *ctx)
-{
- if (ctx->first_x != ctx->x || ctx->first_y != ctx->y)
- rstbtt__csctx_v(ctx, rstbtt_vline, (int)ctx->first_x, (int)ctx->first_y, 0, 0, 0, 0);
-}
-
-RFONT_API void rstbtt__csctx_rmove_to(rstbtt__csctx *ctx, float dx, float dy)
-{
- rstbtt__csctx_close_shape(ctx);
- ctx->first_x = ctx->x = ctx->x + dx;
- ctx->first_y = ctx->y = ctx->y + dy;
- rstbtt__csctx_v(ctx, rstbtt_vmove, (int)ctx->x, (int)ctx->y, 0, 0, 0, 0);
-}
-
-RFONT_API void rstbtt__csctx_rline_to(rstbtt__csctx *ctx, float dx, float dy)
-{
- ctx->x += dx;
- ctx->y += dy;
- rstbtt__csctx_v(ctx, rstbtt_vline, (int)ctx->x, (int)ctx->y, 0, 0, 0, 0);
-}
-
-RFONT_API void rstbtt__csctx_rccurve_to(rstbtt__csctx *ctx, float dx1, float dy1, float dx2, float dy2, float dx3, float dy3)
-{
- float cx1 = ctx->x + dx1;
- float cy1 = ctx->y + dy1;
- float cx2 = cx1 + dx2;
- float cy2 = cy1 + dy2;
- ctx->x = cx2 + dx3;
- ctx->y = cy2 + dy3;
- rstbtt__csctx_v(ctx, rstbtt_vcubic, (int)ctx->x, (int)ctx->y, (int)cx1, (int)cy1, (int)cx2, (int)cy2);
-}
-
-RFONT_API rstbtt__buf rstbtt__get_subr(rstbtt__buf idx, int n)
-{
- int count = rstbtt__cff_index_count(&idx);
- int bias = 107;
- if (count >= 33900)
- bias = 32768;
- else if (count >= 1240)
- bias = 1131;
- n += bias;
- if (n < 0 || n >= count)
- return rstbtt__new_buf(NULL, 0);
- return rstbtt__cff_index_get(idx, n);
-}
-
-RFONT_API rstbtt__buf rstbtt__cid_get_glyph_subrs(const rstbtt_fontinfo *info, int glyph_index)
-{
- rstbtt__buf fdselect = info->fdselect;
- int nranges, start, end, v, fmt, fdselector = -1, i;
-
- rstbtt__buf_seek(&fdselect, 0);
- fmt = rstbtt__buf_get8(&fdselect);
- if (fmt == 0) {
- /* untested */
- rstbtt__buf_skip(&fdselect, glyph_index);
- fdselector = rstbtt__buf_get8(&fdselect);
- } else if (fmt == 3) {
- nranges = rstbtt__buf_get16(&fdselect);
- start = rstbtt__buf_get16(&fdselect);
- for (i = 0; i < nranges; i++) {
- v = rstbtt__buf_get8(&fdselect);
- end = rstbtt__buf_get16(&fdselect);
- if (glyph_index >= start && glyph_index < end) {
- fdselector = v;
- break;
- }
- start = end;
- }
- }
- if (fdselector == -1) rstbtt__new_buf(NULL, 0);
- return rstbtt__get_subrs(info->cff, rstbtt__cff_index_get(info->fontdicts, fdselector));
-}
-
-RFONT_API int rstbtt__run_charstring(const rstbtt_fontinfo *info, int glyph_index, rstbtt__csctx *c)
-{
- int in_header = 1, maskbits = 0, subr_stack_height = 0, sp = 0, v, i, b0;
- int has_subrs = 0, clear_stack;
- float s[48];
- rstbtt__buf subr_stack[10], subrs = info->subrs, b;
- float f;
-
-#define rstbtt__CSERR(s) (0)
-
- /* this currently ignores the initial width value, which isn't needed if we have hmtx */
- b = rstbtt__cff_index_get(info->charstrings, glyph_index);
- while (b.cursor < b.size) {
- i = 0;
- clear_stack = 1;
- b0 = rstbtt__buf_get8(&b);
- switch (b0) {
- /* @TODO implement hinting */
- case 0x13: /* hintmask */
- case 0x14: /* cntrmask */
- if (in_header)
- maskbits += (sp / 2); /* implicit "vstem" */
- in_header = 0;
- rstbtt__buf_skip(&b, (maskbits + 7) / 8);
- break;
-
- case 0x01: /* hstem */
- case 0x03: /* vstem */
- case 0x12: /* hstemhm */
- case 0x17: /* vstemhm */
- maskbits += (sp / 2);
- break;
-
- case 0x15: /* rmoveto */
- in_header = 0;
- if (sp < 2) return rstbtt__CSERR("rmoveto stack");
- rstbtt__csctx_rmove_to(c, s[sp-2], s[sp-1]);
- break;
- case 0x04: /* vmoveto */
- in_header = 0;
- if (sp < 1) return rstbtt__CSERR("vmoveto stack");
- rstbtt__csctx_rmove_to(c, 0, s[sp-1]);
- break;
- case 0x16: /* hmoveto */
- in_header = 0;
- if (sp < 1) return rstbtt__CSERR("hmoveto stack");
- rstbtt__csctx_rmove_to(c, s[sp-1], 0);
- break;
-
- case 0x05: /* rlineto */
- if (sp < 2) return rstbtt__CSERR("rlineto stack");
- for (; i + 1 < sp; i += 2)
- rstbtt__csctx_rline_to(c, s[i], s[i+1]);
- break;
-
- /* hlineto/vlineto and vhcurveto/hvcurveto alternate horizontal and vertical
- starting from a different place. */
-
- case 0x07: /* vlineto */
- if (sp < 1) return rstbtt__CSERR("vlineto stack");
- goto vlineto;
- case 0x06: /* hlineto */
- if (sp < 1) return rstbtt__CSERR("hlineto stack");
- for (;;) {
- if (i >= sp) break;
- rstbtt__csctx_rline_to(c, s[i], 0);
- i++;
- vlineto:
- if (i >= sp) break;
- rstbtt__csctx_rline_to(c, 0, s[i]);
- i++;
- }
- break;
-
- case 0x1F: /* hvcurveto */
- if (sp < 4) return rstbtt__CSERR("hvcurveto stack");
- goto hvcurveto;
- case 0x1E: /* vhcurveto */
- if (sp < 4) return rstbtt__CSERR("vhcurveto stack");
- for (;;) {
- if (i + 3 >= sp) break;
- rstbtt__csctx_rccurve_to(c, 0, s[i], s[i+1], s[i+2], s[i+3], (sp - i == 5) ? s[i + 4] : 0.0f);
- i += 4;
- hvcurveto:
- if (i + 3 >= sp) break;
- rstbtt__csctx_rccurve_to(c, s[i], 0, s[i+1], s[i+2], (sp - i == 5) ? s[i+4] : 0.0f, s[i+3]);
- i += 4;
- }
- break;
-
- case 0x08: /* rrcurveto */
- if (sp < 6) return rstbtt__CSERR("rcurveline stack");
- for (; i + 5 < sp; i += 6)
- rstbtt__csctx_rccurve_to(c, s[i], s[i+1], s[i+2], s[i+3], s[i+4], s[i+5]);
- break;
-
- case 0x18: /* rcurveline */
- if (sp < 8) return rstbtt__CSERR("rcurveline stack");
- for (; i + 5 < sp - 2; i += 6)
- rstbtt__csctx_rccurve_to(c, s[i], s[i+1], s[i+2], s[i+3], s[i+4], s[i+5]);
- if (i + 1 >= sp) return rstbtt__CSERR("rcurveline stack");
- rstbtt__csctx_rline_to(c, s[i], s[i+1]);
- break;
-
- case 0x19: /* rlinecurve */
- if (sp < 8) return rstbtt__CSERR("rlinecurve stack");
- for (; i + 1 < sp - 6; i += 2)
- rstbtt__csctx_rline_to(c, s[i], s[i+1]);
- if (i + 5 >= sp) return rstbtt__CSERR("rlinecurve stack");
- rstbtt__csctx_rccurve_to(c, s[i], s[i+1], s[i+2], s[i+3], s[i+4], s[i+5]);
- break;
-
- case 0x1A: /* vvcurveto */
- case 0x1B: /* hhcurveto */
- if (sp < 4) return rstbtt__CSERR("(vv|hh)curveto stack");
- f = 0.0;
- if (sp & 1) { f = s[i]; i++; }
- for (; i + 3 < sp; i += 4) {
- if (b0 == 0x1B)
- rstbtt__csctx_rccurve_to(c, s[i], f, s[i+1], s[i+2], s[i+3], 0.0);
- else
- rstbtt__csctx_rccurve_to(c, f, s[i], s[i+1], s[i+2], 0.0, s[i+3]);
- f = 0.0;
- }
- break;
-
- case 0x0A: /* callsubr */
- if (!has_subrs) {
- if (info->fdselect.size)
- subrs = rstbtt__cid_get_glyph_subrs(info, glyph_index);
- has_subrs = 1;
- }
- /* fallthrough */
- case 0x1D: /* callgsubr */
- if (sp < 1) return rstbtt__CSERR("call(g|)subr stack");
- v = (int) s[--sp];
- if (subr_stack_height >= 10) return rstbtt__CSERR("recursion limit");
- subr_stack[subr_stack_height++] = b;
- b = rstbtt__get_subr(b0 == 0x0A ? subrs : info->gsubrs, v);
- if (b.size == 0) return rstbtt__CSERR("subr not found");
- b.cursor = 0;
- clear_stack = 0;
- break;
-
- case 0x0B: /* return */
- if (subr_stack_height <= 0) return rstbtt__CSERR("return outside subr");
- b = subr_stack[--subr_stack_height];
- clear_stack = 0;
- break;
-
- case 0x0E: /* endchar */
- rstbtt__csctx_close_shape(c);
- return 1;
-
- case 0x0C: { /* two-byte escape */
- float dx1, dx2, dx3, dx4, dx5, dx6, dy1, dy2, dy3, dy4, dy5, dy6;
- float dx, dy;
- int b1 = rstbtt__buf_get8(&b);
- switch (b1) {
- /* @TODO These "flex" implementations ignore the flex-depth and resolution,
- and always draw beziers. */
- case 0x22: /* hflex */
- if (sp < 7) return rstbtt__CSERR("hflex stack");
- dx1 = s[0];
- dx2 = s[1];
- dy2 = s[2];
- dx3 = s[3];
- dx4 = s[4];
- dx5 = s[5];
- dx6 = s[6];
- rstbtt__csctx_rccurve_to(c, dx1, 0, dx2, dy2, dx3, 0);
- rstbtt__csctx_rccurve_to(c, dx4, 0, dx5, -dy2, dx6, 0);
- break;
-
- case 0x23: /* flex */
- if (sp < 13) return rstbtt__CSERR("flex stack");
- dx1 = s[0];
- dy1 = s[1];
- dx2 = s[2];
- dy2 = s[3];
- dx3 = s[4];
- dy3 = s[5];
- dx4 = s[6];
- dy4 = s[7];
- dx5 = s[8];
- dy5 = s[9];
- dx6 = s[10];
- dy6 = s[11];
- /* fd is s[12] */
- rstbtt__csctx_rccurve_to(c, dx1, dy1, dx2, dy2, dx3, dy3);
- rstbtt__csctx_rccurve_to(c, dx4, dy4, dx5, dy5, dx6, dy6);
- break;
-
- case 0x24: /* hflex1 */
- if (sp < 9) return rstbtt__CSERR("hflex1 stack");
- dx1 = s[0];
- dy1 = s[1];
- dx2 = s[2];
- dy2 = s[3];
- dx3 = s[4];
- dx4 = s[5];
- dx5 = s[6];
- dy5 = s[7];
- dx6 = s[8];
- rstbtt__csctx_rccurve_to(c, dx1, dy1, dx2, dy2, dx3, 0);
- rstbtt__csctx_rccurve_to(c, dx4, 0, dx5, dy5, dx6, -(dy1+dy2+dy5));
- break;
-
- case 0x25: /* flex1 */
- if (sp < 11) return rstbtt__CSERR("flex1 stack");
- dx1 = s[0];
- dy1 = s[1];
- dx2 = s[2];
- dy2 = s[3];
- dx3 = s[4];
- dy3 = s[5];
- dx4 = s[6];
- dy4 = s[7];
- dx5 = s[8];
- dy5 = s[9];
- dx6 = dy6 = s[10];
- dx = dx1+dx2+dx3+dx4+dx5;
- dy = dy1+dy2+dy3+dy4+dy5;
- if (fabs(dx) > fabs(dy))
- dy6 = -dy;
- else
- dx6 = -dx;
- rstbtt__csctx_rccurve_to(c, dx1, dy1, dx2, dy2, dx3, dy3);
- rstbtt__csctx_rccurve_to(c, dx4, dy4, dx5, dy5, dx6, dy6);
- break;
-
- default:
- return rstbtt__CSERR("unimplemented");
- }
- } break;
-
- default:
- if (b0 != 255 && b0 != 28 && (b0 < 32 || b0 > 254))
- return rstbtt__CSERR("reserved operator");
-
- /* push immediate */
- if (b0 == 255) {
- f = (float)(i32)rstbtt__buf_get32(&b) / 0x10000;
- } else {
- rstbtt__buf_skip(&b, -1);
- f = (float)(i16)rstbtt__cff_int(&b);
- }
- if (sp >= 48) return rstbtt__CSERR("push stack overflow");
- s[sp++] = f;
- clear_stack = 0;
- break;
- }
- if (clear_stack) sp = 0;
- }
- return rstbtt__CSERR("no endchar");
-
-#undef rstbtt__CSERR
-}
-
-RFONT_API int rstbtt__GetGlyphShapeT2(const rstbtt_fontinfo *info, int glyph_index, rstbtt_vertex **pvertices)
-{
- /* runs the charstring twice, once to count and once to output (to avoid realloc) */
- rstbtt__csctx count_ctx = rstbtt__CSCTX_INIT(1);
- rstbtt__csctx output_ctx = rstbtt__CSCTX_INIT(0);
- if (rstbtt__run_charstring(info, glyph_index, &count_ctx)) {
- *pvertices = (rstbtt_vertex*)RFONT_MALLOC((size_t)count_ctx.num_vertices * sizeof(rstbtt_vertex));
- output_ctx.pvertices = *pvertices;
- if (rstbtt__run_charstring(info, glyph_index, &output_ctx)) {
- assert(output_ctx.num_vertices == count_ctx.num_vertices);
- return output_ctx.num_vertices;
- }
- }
- *pvertices = NULL;
- return 0;
-}
-
-RFONT_API int rstbtt_GetGlyphShape(const rstbtt_fontinfo *info, int glyph_index, rstbtt_vertex **pvertices)
-{
- if (!info->cff.size)
- return rstbtt__GetGlyphShapeTT(info, glyph_index, pvertices);
- else
- return rstbtt__GetGlyphShapeT2(info, glyph_index, pvertices);
-}
-
-RFONT_API int rstbtt__GetGlyphKernInfoAdvance(const rstbtt_fontinfo *info, int glyph1, int glyph2)
-{
- u8 *data = info->data + info->kern;
- u32 needle, straw;
- int l, r, m;
-
- /* we only look at the first table. it must be 'horizontal' and format 0. */
- if (!info->kern)
- return 0;
- if (RFONT_USHORT(data, 2) < 1) /* number of tables, need at least 1 */
- return 0;
- if (RFONT_USHORT(data, 8) != 1) /* horizontal flag must be set in format */
- return 0;
-
- l = 0;
- r = RFONT_USHORT(data, 10) - 1;
- needle = (u32)(glyph1 << 16 | glyph2);
- while (l <= r) {
- m = (l + r) >> 1;
- straw = RFONT_ULONG(data, 18+(m*6)); /* note: unaligned read */
- if (needle < straw)
- r = m - 1;
- else if (needle > straw)
- l = m + 1;
- else
- return RFONT_SHORT(data, 22+(m*6));
- }
- return 0;
-}
-
-RFONT_API i32 rstbtt__GetCoverageIndex(u8 *coverageTable, int glyph)
-{
- u16 coverageFormat = RFONT_USHORT(coverageTable, 0);
- switch(coverageFormat) {
- case 1: {
- u16 glyphCount = RFONT_USHORT(coverageTable, 2);
-
- /* Binary search. */
- i32 l=0, r=glyphCount-1, m;
- int straw, needle=glyph;
- while (l <= r) {
- u8 *glyphArray = coverageTable + 4;
- u16 glyphID;
- m = (l + r) >> 1;
- glyphID = RFONT_USHORT(glyphArray, 2 * m);
- straw = glyphID;
- if (needle < straw)
- r = m - 1;
- else if (needle > straw)
- l = m + 1;
- else {
- return m;
- }
- }
- } break;
-
- case 2: {
- u16 rangeCount = RFONT_USHORT(coverageTable, 2);
- u8 *rangeArray = coverageTable + 4;
-
- /* Binary search. */
- i32 l=0, r=rangeCount-1, m;
- int strawStart, strawEnd, needle=glyph;
- while (l <= r) {
- u8 *rangeRecord;
- m = (l + r) >> 1;
- rangeRecord = rangeArray + 6 * m;
- strawStart = RFONT_USHORT(rangeRecord, 0);
- strawEnd = RFONT_USHORT(rangeRecord, 2);
- if (needle < strawStart)
- r = m - 1;
- else if (needle > strawEnd)
- l = m + 1;
- else {
- u16 startCoverageIndex = RFONT_USHORT(rangeRecord, 4);
- return startCoverageIndex + glyph - strawStart;
- }
- }
- } break;
-
- default: {
- /* There are no other cases. */
- assert(0);
- } break;
- }
-
- return -1;
-}
-
-RFONT_API i32 rstbtt__GetGlyphClass(u8 *classDefTable, int glyph)
-{
- u16 classDefFormat = RFONT_USHORT(classDefTable, 0);
- switch(classDefFormat)
- {
- case 1: {
- u16 startGlyphID = RFONT_USHORT(classDefTable, 2);
- u16 glyphCount = RFONT_USHORT(classDefTable, 4);
- u8 *classDef1ValueArray = classDefTable + 6;
-
- if (glyph >= startGlyphID && glyph < startGlyphID + glyphCount)
- return (i32)RFONT_USHORT(classDef1ValueArray, 2 * (glyph - startGlyphID));
-
- classDefTable = classDef1ValueArray + 2 * glyphCount;
- } break;
-
- case 2: {
- u16 classRangeCount = RFONT_USHORT(classDefTable, 2);
- u8 *classRangeRecords = classDefTable + 4;
-
- /* Binary search. */
- i32 l=0, r=classRangeCount-1, m;
- int strawStart, strawEnd, needle=glyph;
- while (l <= r) {
- u8 *classRangeRecord;
- m = (l + r) >> 1;
- classRangeRecord = classRangeRecords + 6 * m;
- strawStart = RFONT_USHORT(classRangeRecord, 0);
- strawEnd = RFONT_USHORT(classRangeRecord, 2);
- if (needle < strawStart)
- r = m - 1;
- else if (needle > strawEnd)
- l = m + 1;
- else
- return (i32)RFONT_USHORT(classRangeRecord, 4);
- }
-
- classDefTable = classRangeRecords + 6 * classRangeCount;
- } break;
-
- default: {
- /* There are no other cases. */
- assert(0);
- } break;
- }
-
- return -1;
-}
-
-/* Define to assert(x) if you want to break on unimplemented formats. */
-#define rstbtt_GPOS_TODO_assert(x) assert(x)
-
-RFONT_API i32 rstbtt__GetGlyphGPOSInfoAdvance(const rstbtt_fontinfo *info, int glyph1, int glyph2)
-{
- u16 lookupListOffset;
- u8 *lookupList;
- u16 lookupCount;
- u8 *data;
- i32 i;
-
- if (!info->gpos) return 0;
-
- data = info->data + info->gpos;
-
- if (RFONT_USHORT(data, 0) != 1) return 0; /* Major version 1 */
- if (RFONT_USHORT(data, 2) != 0) return 0; /* Minor version 0 */
-
- lookupListOffset = RFONT_USHORT(data, 8);
- lookupList = data + lookupListOffset;
- lookupCount = RFONT_USHORT(lookupList, 0);
-
- for (i=0; i<lookupCount; ++i) {
- u16 lookupOffset = RFONT_USHORT(lookupList, 2 + 2 * i);
- u8 *lookupTable = lookupList + lookupOffset;
-
- u16 lookupType = RFONT_USHORT(lookupTable, 0);
- u16 subTableCount = RFONT_USHORT(lookupTable, 4);
- u8 *subTableOffsets = lookupTable + 6;
- switch(lookupType) {
- case 2: { /* Pair Adjustment Positioning Subtable */
- i32 sti;
- for (sti=0; sti<subTableCount; sti++) {
- u16 subtableOffset = RFONT_USHORT(subTableOffsets, 2 * sti);
- u8 *table = lookupTable + subtableOffset;
- u16 posFormat = RFONT_USHORT(table, 0);
- u16 coverageOffset = RFONT_USHORT(table, 2);
- i32 coverageIndex = rstbtt__GetCoverageIndex(table + coverageOffset, glyph1);
- if (coverageIndex == -1) continue;
-
- switch (posFormat) {
- case 1: {
- i32 l, r, m;
- int straw, needle;
- u16 valueFormat1 = RFONT_USHORT(table, 4);
- u16 valueFormat2 = RFONT_USHORT(table, 6);
- i32 valueRecordPairSizeInBytes = 2;
- u16 pairSetCount = RFONT_USHORT(table, 8);
- u16 pairPosOffset = RFONT_USHORT(table, 10 + 2 * coverageIndex);
- u8 *pairValueTable = table + pairPosOffset;
- u16 pairValueCount = RFONT_USHORT(pairValueTable, 0);
- u8 *pairValueArray = pairValueTable + 2;
- /* TODO: Support more formats. */
- rstbtt_GPOS_TODO_assert(valueFormat1 == 4);
- if (valueFormat1 != 4) return 0;
- rstbtt_GPOS_TODO_assert(valueFormat2 == 0);
- if (valueFormat2 != 0) return 0;
-
- assert(coverageIndex < pairSetCount);
- rstbtt__NOTUSED(pairSetCount);
-
- needle=glyph2;
- r=pairValueCount-1;
- l=0;
-
- /* Binary search. */
- while (l <= r) {
- u16 secondGlyph;
- u8 *pairValue;
- m = (l + r) >> 1;
- pairValue = pairValueArray + (2 + valueRecordPairSizeInBytes) * m;
- secondGlyph = RFONT_USHORT(pairValue, 0);
- straw = secondGlyph;
- if (needle < straw)
- r = m - 1;
- else if (needle > straw)
- l = m + 1;
- else {
- i16 xAdvance = RFONT_SHORT(pairValue, 2);
- return xAdvance;
- }
- }
- } break;
-
- case 2: {
- u16 valueFormat1 = RFONT_USHORT(table, 4);
- u16 valueFormat2 = RFONT_USHORT(table, 6);
-
- u16 classDef1Offset = RFONT_USHORT(table, 8);
- u16 classDef2Offset = RFONT_USHORT(table, 10);
- int glyph1class = rstbtt__GetGlyphClass(table + classDef1Offset, glyph1);
- int glyph2class = rstbtt__GetGlyphClass(table + classDef2Offset, glyph2);
-
- u16 class1Count = RFONT_USHORT(table, 12);
- u16 class2Count = RFONT_USHORT(table, 14);
- assert(glyph1class < class1Count);
- assert(glyph2class < class2Count);
-
- /* TODO: Support more formats. */
- rstbtt_GPOS_TODO_assert(valueFormat1 == 4);
- if (valueFormat1 != 4) return 0;
- rstbtt_GPOS_TODO_assert(valueFormat2 == 0);
- if (valueFormat2 != 0) return 0;
-
- if (glyph1class >= 0 && glyph1class < class1Count && glyph2class >= 0 && glyph2class < class2Count) {
- u8 *class1Records = table + 16;
- u8 *class2Records = class1Records + 2 * (glyph1class * class2Count);
- i16 xAdvance = RFONT_SHORT(class2Records, 2 * glyph2class);
- return xAdvance;
- }
- } break;
-
- default: {
- /* There are no other cases. */
- assert(0);
- break;
- };
- }
- }
- break;
- };
-
- default:
- /* TODO: Implement other stuff. */
- break;
- }
- }
-
- return 0;
-}
-
-RFONT_API int rstbtt_GetGlyphKernAdvance(const rstbtt_fontinfo *info, int g1, int g2)
-{
- int xAdvance = 0;
-
- if (info->gpos)
- xAdvance += rstbtt__GetGlyphGPOSInfoAdvance(info, g1, g2);
- else if (info->kern)
- xAdvance += rstbtt__GetGlyphKernInfoAdvance(info, g1, g2);
-
- return xAdvance;
-}
-
-typedef struct rstbtt__hheap_chunk
-{
- struct rstbtt__hheap_chunk *next;
-} rstbtt__hheap_chunk;
-
-typedef struct rstbtt__hheap
-{
- struct rstbtt__hheap_chunk *head;
- void *first_free;
- int num_remaining_in_head_chunk;
-} rstbtt__hheap;
-
-RFONT_API void *rstbtt__hheap_alloc(rstbtt__hheap *hh, size_t size)
-{
- if (hh->first_free) {
- void *p = hh->first_free;
- hh->first_free = * (void **) p;
- return p;
- } else {
- if (hh->num_remaining_in_head_chunk == 0) {
- int count = (size < 32 ? 2000 : size < 128 ? 800 : 100);
- rstbtt__hheap_chunk *c = (rstbtt__hheap_chunk *) RFONT_MALLOC(sizeof(rstbtt__hheap_chunk) + size * (size_t)count);
- if (c == NULL)
- return NULL;
- c->next = hh->head;
- hh->head = c;
- hh->num_remaining_in_head_chunk = count;
- }
- --hh->num_remaining_in_head_chunk;
- return (char *) (hh->head) + sizeof(rstbtt__hheap_chunk) + size * (size_t)hh->num_remaining_in_head_chunk;
- }
-}
-
-RFONT_API void rstbtt__hheap_free(rstbtt__hheap *hh, void *p)
-{
- *(void **) p = hh->first_free;
- hh->first_free = p;
-}
-
-RFONT_API void rstbtt__hheap_cleanup(rstbtt__hheap *hh)
-{
- rstbtt__hheap_chunk *c = hh->head;
- while (c) {
- rstbtt__hheap_chunk *n = c->next;
- RFONT_FREE(c);
- c = n;
- }
-}
-
-typedef struct rstbtt__edge {
- float x0,y0, x1,y1;
- int invert;
-} rstbtt__edge;
-
-
-typedef struct rstbtt__active_edge
-{
- struct rstbtt__active_edge *next;
- float fx,fdx,fdy;
- float direction;
- float sy;
- float ey;
-} rstbtt__active_edge;
-
-
-RFONT_API rstbtt__active_edge *rstbtt__new_active(rstbtt__hheap *hh, rstbtt__edge *e, int off_x, float start_point) {
- rstbtt__active_edge *z = (rstbtt__active_edge *) rstbtt__hheap_alloc(hh, sizeof(*z));
- float dxdy = (e->x1 - e->x0) / (e->y1 - e->y0);
- assert(z != NULL);
- /* assert(e->y0 <= start_point); */
- if (!z) return z;
- z->fdx = dxdy;
- z->fdy = dxdy != 0.0f ? (1.0f/dxdy) : 0.0f;
- z->fx = e->x0 + dxdy * (start_point - e->y0);
- z->fx -= (float)off_x;
- z->direction = e->invert ? 1.0f : -1.0f;
- z->sy = e->y0;
- z->ey = e->y1;
- z->next = 0;
- return z;
-}
-
-RFONT_API void rstbtt__handle_clipped_edge(float *scanline, int x, rstbtt__active_edge *e, float x0, float y0, float x1, float y1) {
- if (y0 == y1) return;
- assert(y0 < y1);
- assert(e->sy <= e->ey);
- if (y0 > e->ey) return;
- if (y1 < e->sy) return;
- if (y0 < e->sy) {
- x0 += (x1-x0) * (e->sy - y0) / (y1-y0);
- y0 = e->sy;
- }
- if (y1 > e->ey) {
- x1 += (x1-x0) * (e->ey - y1) / (y1-y0);
- y1 = e->ey;
- }
-
- if (x0 == x)
- assert(x1 <= x+1);
- else if (x0 == x+1)
- assert(x1 >= x);
- else if (x0 <= x)
- assert(x1 <= x);
- else if (x0 >= x+1)
- assert(x1 >= x+1);
- else
- assert(x1 >= x && x1 <= x+1);
-
- if (x0 <= x && x1 <= x)
- scanline[x] += e->direction * (y1-y0);
- else if (x0 >= x+1 && x1 >= x+1)
- ;
- else {
- assert(x0 >= x && x0 <= x+1 && x1 >= x && x1 <= x+1);
- scanline[x] += e->direction * (y1-y0) * (1-((x0 - (float)x)+(x1 - (float)x))/2.0f); /* coverage = 1 - average x position */
- }
-}
-
-RFONT_API void rstbtt__fill_active_edges_new(float *scanline, float *scanline_fill, int len, rstbtt__active_edge *e, float y_top)
-{
- float y_bottom = y_top+1;
-
- while (e) {
- /* brute force every pixel
- compute intersection points with top & bottom */
- assert(e->ey >= y_top);
-
- if (e->fdx == 0) {
- float x0 = e->fx;
- if (x0 < len) {
- if (x0 >= 0) {
- rstbtt__handle_clipped_edge(scanline,(int) x0,e, x0,y_top, x0,y_bottom);
- rstbtt__handle_clipped_edge(scanline_fill-1,(int) x0+1,e, x0,y_top, x0,y_bottom);
- } else {
- rstbtt__handle_clipped_edge(scanline_fill-1,0,e, x0,y_top, x0,y_bottom);
- }
- }
- } else {
- float x0 = e->fx;
- float dx = e->fdx;
- float xb = x0 + dx;
- float x_top, x_bottom;
- float sy0,sy1;
- float dy = e->fdy;
- assert(e->sy <= y_bottom && e->ey >= y_top);
-
- if (e->sy > y_top) {
- x_top = x0 + dx * (e->sy - y_top);
- sy0 = e->sy;
- } else {
- x_top = x0;
- sy0 = y_top;
- }
- if (e->ey < y_bottom) {
- x_bottom = x0 + dx * (e->ey - y_top);
- sy1 = e->ey;
- } else {
- x_bottom = xb;
- sy1 = y_bottom;
- }
-
- if (x_top >= 0 && x_bottom >= 0 && x_top < len && x_bottom < len) {
- /* from here on, we don't have to range check x values */
-
- if ((int) x_top == (int) x_bottom) {
- float height;
- /* simple case, only spans one pixel */
- int x = (int) x_top;
- height = sy1 - sy0;
- assert(x >= 0 && x < len);
- scanline[x] += e->direction * (float)((1-((x_top - (float)x) + (x_bottom-(float)x))/2)) * height;
- scanline_fill[x] += e->direction * height; /* everything right of this pixel is filled */
- } else {
- int x,x1,x2;
- float y_crossing, step, sign, area;
- /* covers 2+ pixels */
- if (x_top > x_bottom) {
- /* flip scanline vertically; signed area is the same */
- float t;
- sy0 = y_bottom - (sy0 - y_top);
- sy1 = y_bottom - (sy1 - y_top);
- t = sy0, sy0 = sy1, sy1 = t;
- t = x_bottom, x_bottom = x_top, x_top = t;
- dx = -dx;
- dy = -dy;
- t = x0, x0 = xb, xb = t;
- }
-
- x1 = (int) x_top;
- x2 = (int) x_bottom;
- /* compute intersection with y axis at x1+1 */
- y_crossing = ((float)x1 + 1.0f - (float)x0) * dy + y_top;
-
- sign = e->direction;
- /* area of the rectangle covered from y0..y_crossing */
- area = sign * (y_crossing-sy0);
- /* area of the triangle (x_top,y0), (x+1,y0), (x+1,y_crossing) */
- scanline[x1] += area * (1-(((float)x_top - (float)x1)+ ((float)(x1+1-x1)) / 2.0f));
-
- step = sign * dy;
- for (x = x1+1; x < x2; ++x) {
- scanline[x] += area + step/2;
- area += step;
- }
- y_crossing += dy * ((float)x2 - (float)(x1+1));
-
- assert(fabs(area) <= 1.01f);
-
- scanline[x2] += area + sign * (1.0f-((float)((float)x2 - (float)x2) + ((float)x_bottom - (float)x2)) / 2.0f) * (float)(sy1-y_crossing);
-
- scanline_fill[x2] += sign * (sy1-sy0);
- }
- } else {
- int x;
- for (x=0; x < len; ++x) {
-
- float y0 = y_top;
- float x1 = (float) (x);
- float x2 = (float) (x+1);
- float x3 = xb;
- float y3 = y_bottom;
-
- float y1 = ((float)x - x0) / dx + y_top;
- float y2 = ((float)x + 1 - x0) / dx + y_top;
-
- if (x0 < x1 && x3 > x2) { /*three segments descending down-right */
- rstbtt__handle_clipped_edge(scanline,x,e, x0,y0, x1,y1);
- rstbtt__handle_clipped_edge(scanline,x,e, x1,y1, x2,y2);
- rstbtt__handle_clipped_edge(scanline,x,e, x2,y2, x3,y3);
- } else if (x3 < x1 && x0 > x2) { /* three segments descending down-left */
- rstbtt__handle_clipped_edge(scanline,x,e, x0,y0, x2,y2);
- rstbtt__handle_clipped_edge(scanline,x,e, x2,y2, x1,y1);
- rstbtt__handle_clipped_edge(scanline,x,e, x1,y1, x3,y3);
- } else if (x0 < x1 && x3 > x1) { /* two segments across x, down-right */
- rstbtt__handle_clipped_edge(scanline,x,e, x0,y0, x1,y1);
- rstbtt__handle_clipped_edge(scanline,x,e, x1,y1, x3,y3);
- } else if (x3 < x1 && x0 > x1) { /* two segments across x, down-left */
- rstbtt__handle_clipped_edge(scanline,x,e, x0,y0, x1,y1);
- rstbtt__handle_clipped_edge(scanline,x,e, x1,y1, x3,y3);
- } else if (x0 < x2 && x3 > x2) { /* two segments across x+1, down-right */
- rstbtt__handle_clipped_edge(scanline,x,e, x0,y0, x2,y2);
- rstbtt__handle_clipped_edge(scanline,x,e, x2,y2, x3,y3);
- } else if (x3 < x2 && x0 > x2) { /* two segments across x+1, down-left */
- rstbtt__handle_clipped_edge(scanline,x,e, x0,y0, x2,y2);
- rstbtt__handle_clipped_edge(scanline,x,e, x2,y2, x3,y3);
- } else { /* one segment */
- rstbtt__handle_clipped_edge(scanline,x,e, x0,y0, x3,y3);
- }
- }
- }
- }
- e = e->next;
- }
-}
-
-/* directly AA rasterize edges w/o supersampling */
-RFONT_API void rstbtt__rasterize_sorted_edges(rstbtt__bitmap *result, rstbtt__edge *e, int n, int vsubsample, int off_x, int off_y)
-{
- rstbtt__hheap hh = { 0, 0, 0 };
- rstbtt__active_edge *active = NULL;
- int y,j=0, i;
- float scanline_data[129], *scanline, *scanline2;
-
- rstbtt__NOTUSED(vsubsample);
-
- if (result->w > 64)
- scanline = (float *) RFONT_MALLOC((size_t)(result->w*2+1) * sizeof(float));
- else
- scanline = scanline_data;
-
- scanline2 = scanline + result->w;
-
- y = off_y;
- e[n].y0 = (float) (off_y + result->h) + 1;
-
- while (j < result->h) {
- /* find center of pixel for this scanline */
- float scan_y_top = (float)y + 0.0f;
- float scan_y_bottom = (float)y + 1.0f;
- rstbtt__active_edge **step = &active;
-
- RFONT_MEMSET(scanline , 0, (size_t)result->w * sizeof(scanline[0]));
- RFONT_MEMSET(scanline2, 0, (size_t)(result->w + 1) * sizeof(scanline[0]));
-
- /* update all active edges;
- remove all active edges that terminate before the top of this scanline */
- while (*step) {
- rstbtt__active_edge * z = *step;
- if (z->ey <= scan_y_top) {
- *step = z->next; /* delete from list (/) */
- assert(z->direction);
- z->direction = 0;
- rstbtt__hheap_free(&hh, z);
- } else {
- step = &((*step)->next); /* advance through list */
- }
- }
-
- /* insert all edges that start before the bottom of this scanline */
- while (e->y0 <= scan_y_bottom) {
- if (e->y0 != e->y1) {
- rstbtt__active_edge *z = rstbtt__new_active(&hh, e, off_x, scan_y_top);
- if (z != NULL) {
- if (j == 0 && off_y != 0) {
- if (z->ey < scan_y_top) {
- /* this can happen due to subpixel positioning and some kind of fp rounding error i think */
- z->ey = scan_y_top;
- }
- }
- assert(z->ey >= scan_y_top); /* if we get really unlucky a tiny bit of an edge can be out of bounds */
- /* insert at front */
- z->next = active;
- active = z;
- }
- }
- ++e;
- }
-
- /* now process all active edges */
- if (active)
- rstbtt__fill_active_edges_new(scanline, scanline2+1, result->w, active, scan_y_top);
-
- {
- float sum = 0;
- for (i=0; i < result->w; ++i) {
- float k;
- int m;
- sum += scanline2[i];
- k = scanline[i] + sum;
- k = (float) fabs(k)*255 + 0.5f;
- m = (int) k;
- if (m > 255) m = 255;
- result->pixels[j*result->stride + i] = (unsigned char) m;
- }
- }
- /* advance all the edges */
- step = &active;
- while (*step) {
- rstbtt__active_edge *z = *step;
- z->fx += z->fdx; /* advance to position for current scanline */
- step = &((*step)->next); /* advance through list */
- }
-
- ++y;
- ++j;
- }
-
- rstbtt__hheap_cleanup(&hh);
-
- if (scanline != scanline_data)
- RFONT_FREE(scanline);
-}
-
-#define rstbtt__COMPARE(a,b) ((a)->y0 < (b)->y0)
-
-RFONT_API void rstbtt__sort_edges_ins_sort(rstbtt__edge *p, int n)
-{
- int i,j;
- for (i=1; i < n; ++i) {
- rstbtt__edge t = p[i], *a = &t;
- j = i;
- while (j > 0) {
- rstbtt__edge *b = &p[j-1];
- int c = rstbtt__COMPARE(a,b);
- if (!c) break;
- p[j] = p[j-1];
- --j;
- }
- if (i != j)
- p[j] = t;
- }
-}
-
-RFONT_API void rstbtt__sort_edges_quicksort(rstbtt__edge *p, int n)
-{
- /* threshold for transitioning to insertion sort */
- while (n > 12) {
- rstbtt__edge t;
- int c01,c12,c,m,i,j;
-
- /* compute median of three */
- m = n >> 1;
- c01 = rstbtt__COMPARE(&p[0],&p[m]);
- c12 = rstbtt__COMPARE(&p[m],&p[n-1]);
- /* if 0 >= mid >= end, or 0 < mid < end, then use mid */
- if (c01 != c12) {
- /* otherwise, we'll need to swap something else to middle */
- int z;
- c = rstbtt__COMPARE(&p[0],&p[n-1]);
- /* 0>mid && mid<n: 0>n => n; 0<n => 0 */
- /* 0<mid && mid>n: 0>n => 0; 0<n => n */
- z = (c == c12) ? 0 : n-1;
- t = p[z];
- p[z] = p[m];
- p[m] = t;
- }
- /* now p[m] is the median-of-three */
- /* swap it to the beginning so it won't move around */
- t = p[0];
- p[0] = p[m];
- p[m] = t;
-
- /* partition loop */
- i=1;
- j=n-1;
- for(;;) {
- /* handling of equality is crucial here */
- /* for sentinels & efficiency with duplicates */
- for (;;++i) {
- if (!rstbtt__COMPARE(&p[i], &p[0])) break;
- }
- for (;;--j) {
- if (!rstbtt__COMPARE(&p[0], &p[j])) break;
- }
- /* make sure we haven't crossed */
- if (i >= j) break;
- t = p[i];
- p[i] = p[j];
- p[j] = t;
-
- ++i;
- --j;
- }
- /* recurse on smaller side, iterate on larger */
- if (j < (n-i)) {
- rstbtt__sort_edges_quicksort(p,j);
- p = p+i;
- n = n-i;
- } else {
- rstbtt__sort_edges_quicksort(p+i, n-i);
- n = j;
- }
- }
-}
-
-RFONT_API void rstbtt__sort_edges(rstbtt__edge *p, int n)
-{
- rstbtt__sort_edges_quicksort(p, n);
- rstbtt__sort_edges_ins_sort(p, n);
-}
-
-typedef struct
-{
- float x,y;
-} rstbtt__point;
-
-RFONT_API void rstbtt__rasterize(rstbtt__bitmap *result, rstbtt__point *pts, int *wcount, int windings, float scale_x, float scale_y, float shift_x, float shift_y, int off_x, int off_y, int invert)
-{
- float y_scale_inv = invert ? -scale_y : scale_y;
- rstbtt__edge *e;
- int n,i,j,k,m;
-#if rstbtt_RASTERIZER_VERSION == 1
- int vsubsample = result->h < 8 ? 15 : 5;
-#elif rstbtt_RASTERIZER_VERSION == 2
- int vsubsample = 1;
-#else
- #error "Unrecognized value of rstbtt_RASTERIZER_VERSION"
-#endif
- /* vsubsample should divide 255 evenly; otherwise we won't reach full opacity
-
- now we have to blow out the windings into explicit edge lists */
- n = 0;
- for (i=0; i < windings; ++i)
- n += wcount[i];
-
- e = (rstbtt__edge *) RFONT_MALLOC(sizeof(*e) * (size_t)(n+1)); /* add an extra one as a sentinel */
- if (e == 0) return;
- n = 0;
-
- m=0;
- for (i=0; i < windings; ++i) {
- rstbtt__point *p = pts + m;
- m += wcount[i];
- j = wcount[i]-1;
- for (k=0; k < wcount[i]; j=k++) {
- int a=k,b=j;
- /* skip the edge if horizontal */
- if (p[j].y == p[k].y)
- continue;
- /* add edge from j to k to the list */
- e[n].invert = 0;
- if (invert ? p[j].y > p[k].y : p[j].y < p[k].y) {
- e[n].invert = 1;
- a=j,b=k;
- }
- e[n].x0 = p[a].x * scale_x + shift_x;
- e[n].y0 = (p[a].y * y_scale_inv + shift_y) * (float)vsubsample;
- e[n].x1 = p[b].x * scale_x + shift_x;
- e[n].y1 = (p[b].y * y_scale_inv + shift_y) * (float)vsubsample;
- ++n;
- }
- }
-
- /* now sort the edges by their highest point (should snap to integer, and then by x)
- rstbtt_sort(e, n, sizeof(e[0]), rstbtt__edge_compare); */
- rstbtt__sort_edges(e, n);
-
- /* now, traverse the scanlines and find the intersections on each scanline, use xor winding rule */
- rstbtt__rasterize_sorted_edges(result, e, n, vsubsample, off_x, off_y);
-
- RFONT_FREE(e);
-}
-
-RFONT_API void rstbtt__add_point(rstbtt__point *points, int n, float x, float y)
-{
- if (!points) return; /* during first pass, it's unallocated */
- points[n].x = x;
- points[n].y = y;
-}
-
-/* tessellate until threshold p is happy... @TODO warped to compensate for non-linear stretching */
-RFONT_API int rstbtt__tesselate_curve(rstbtt__point *points, int *num_points, float x0, float y0, float x1, float y1, float x2, float y2, float objspace_flatness_squared, int n)
-{
- /* midpoint */
- float mx = (x0 + 2*x1 + x2)/4;
- float my = (y0 + 2*y1 + y2)/4;
- /* versus directly drawn line */
- float dx = (x0+x2)/2 - mx;
- float dy = (y0+y2)/2 - my;
- if (n > 16) /* 65536 segments on one curve better be enough! */
- return 1;
- if (dx*dx+dy*dy > objspace_flatness_squared) { /* half-pixel error allowed... need to be smaller if AA */
- rstbtt__tesselate_curve(points, num_points, x0,y0, (x0+x1)/2.0f,(y0+y1)/2.0f, mx,my, objspace_flatness_squared,n+1);
- rstbtt__tesselate_curve(points, num_points, mx,my, (x1+x2)/2.0f,(y1+y2)/2.0f, x2,y2, objspace_flatness_squared,n+1);
- } else {
- rstbtt__add_point(points, *num_points,x2,y2);
- *num_points = *num_points+1;
- }
- return 1;
-}
-
-RFONT_API void rstbtt__tesselate_cubic(rstbtt__point *points, int *num_points, float x0, float y0, float x1, float y1, float x2, float y2, float x3, float y3, float objspace_flatness_squared, int n)
-{
- /* @TODO this "flatness" calculation is just made-up nonsense that seems to work well enough */
- float dx0 = x1-x0;
- float dy0 = y1-y0;
- float dx1 = x2-x1;
- float dy1 = y2-y1;
- float dx2 = x3-x2;
- float dy2 = y3-y2;
- float dx = x3-x0;
- float dy = y3-y0;
- float longlen = (float) (sqrt(dx0*dx0+dy0*dy0)+sqrt(dx1*dx1+dy1*dy1)+sqrt(dx2*dx2+dy2*dy2));
- float shortlen = (float) sqrt(dx*dx+dy*dy);
- float flatness_squared = longlen*longlen-shortlen*shortlen;
-
- if (n > 16) /* 65536 segments on one curve better be enough! */
- return;
-
- if (flatness_squared > objspace_flatness_squared) {
- float x01 = (x0+x1)/2;
- float y01 = (y0+y1)/2;
- float x12 = (x1+x2)/2;
- float y12 = (y1+y2)/2;
- float x23 = (x2+x3)/2;
- float y23 = (y2+y3)/2;
-
- float xa = (x01+x12)/2;
- float ya = (y01+y12)/2;
- float xb = (x12+x23)/2;
- float yb = (y12+y23)/2;
-
- float mx = (xa+xb)/2;
- float my = (ya+yb)/2;
-
- rstbtt__tesselate_cubic(points, num_points, x0,y0, x01,y01, xa,ya, mx,my, objspace_flatness_squared,n+1);
- rstbtt__tesselate_cubic(points, num_points, mx,my, xb,yb, x23,y23, x3,y3, objspace_flatness_squared,n+1);
- } else {
- rstbtt__add_point(points, *num_points,x3,y3);
- *num_points = *num_points+1;
- }
-}
-
-/* returns number of contours */
-RFONT_API rstbtt__point *rstbtt_FlattenCurves(rstbtt_vertex *vertices, int num_verts, float objspace_flatness, int **contour_lengths, int *num_contours)
-{
- rstbtt__point *points=0;
- int num_points=0;
-
- float objspace_flatness_squared = objspace_flatness * objspace_flatness;
- int i,n=0,start=0, pass;
-
- /* count how many "moves" there are to get the contour count */
- for (i=0; i < num_verts; ++i)
- if (vertices[i].type == rstbtt_vmove)
- ++n;
-
- *num_contours = n;
- if (n == 0) return 0;
-
- *contour_lengths = (int *) RFONT_MALLOC((size_t)(sizeof(**contour_lengths) * (size_t)n));
-
- if (*contour_lengths == 0) {
- *num_contours = 0;
- return 0;
- }
-
- /* make two passes through the points so we don't need to realloc */
- for (pass=0; pass < 2; ++pass) {
- float x=0,y=0;
- if (pass == 1) {
- points = (rstbtt__point *) RFONT_MALLOC((size_t)num_points * sizeof(points[0]));
- if (points == NULL) goto error;
- }
- num_points = 0;
- n= -1;
- for (i=0; i < num_verts; ++i) {
- switch (vertices[i].type) {
- case rstbtt_vmove:
- /* start the next contour */
- if (n >= 0)
- (*contour_lengths)[n] = num_points - start;
- ++n;
- start = num_points;
-
- x = vertices[i].x, y = vertices[i].y;
- rstbtt__add_point(points, num_points++, x,y);
- break;
- case rstbtt_vline:
- x = vertices[i].x, y = vertices[i].y;
- rstbtt__add_point(points, num_points++, x, y);
- break;
- case rstbtt_vcurve:
- rstbtt__tesselate_curve(points, &num_points, x,y,
- vertices[i].cx, vertices[i].cy,
- vertices[i].x, vertices[i].y,
- objspace_flatness_squared, 0);
- x = vertices[i].x, y = vertices[i].y;
- break;
- case rstbtt_vcubic:
- rstbtt__tesselate_cubic(points, &num_points, x,y,
- vertices[i].cx, vertices[i].cy,
- vertices[i].cx1, vertices[i].cy1,
- vertices[i].x, vertices[i].y,
- objspace_flatness_squared, 0);
- x = vertices[i].x;
- y = vertices[i].y;
- break;
- }
- }
- (*contour_lengths)[n] = num_points - start;
- }
-
- return points;
-error:
- RFONT_FREE(points);
- RFONT_FREE(*contour_lengths);
- *contour_lengths = 0;
- *num_contours = 0;
- return NULL;
-}
-
-RFONT_API void rstbtt_Rasterize(rstbtt__bitmap *result, float flatness_in_pixels, rstbtt_vertex *vertices, int num_verts, float scale_x, float scale_y, float shift_x, float shift_y, int x_off, int y_off, int invert)
-{
- float scale = scale_x > scale_y ? scale_y : scale_x;
- int winding_count = 0;
- int *winding_lengths = NULL;
- rstbtt__point *windings = rstbtt_FlattenCurves(vertices, num_verts, flatness_in_pixels / scale, &winding_lengths, &winding_count);
- if (windings) {
- rstbtt__rasterize(result, windings, winding_lengths, winding_count, scale_x, scale_y, shift_x, shift_y, x_off, y_off, invert);
- RFONT_FREE(winding_lengths);
- RFONT_FREE(windings);
- }
-}
-
-RFONT_API void rstbtt_GetGlyphBitmapBoxSubpixel(const rstbtt_fontinfo *font, int glyph, float scale_x, float scale_y,float shift_x, float shift_y, int *ix0, int *iy0, int *ix1, int *iy1)
-{
- int x0=0,y0=0,x1,y1; /* =0 suppresses compiler warning */
- if (!rstbtt_GetGlyphBox(font, glyph, &x0,&y0,&x1,&y1)) {
- /* e.g. space character */
- if (ix0) *ix0 = 0;
- if (iy0) *iy0 = 0;
- if (ix1) *ix1 = 0;
- if (iy1) *iy1 = 0;
- } else {
- /* move to integral bboxes (treating pixels as little squares, what pixels get touched)? */
- if (ix0) *ix0 = (int)floor( (float)x0 * scale_x + shift_x);
- if (iy0) *iy0 = (int)floor( (float)-y1 * scale_y + shift_y);
- if (ix1) *ix1 = (int)ceil ( (float)x1 * scale_x + shift_x);
- if (iy1) *iy1 = (int)ceil ((float)-y0 * scale_y + shift_y);
- }
-}
-
-RFONT_API unsigned char *rstbtt_GetGlyphBitmapSubpixel(const rstbtt_fontinfo *info, float scale_x, float scale_y, float shift_x, float shift_y, int glyph, int *width, int *height, int *xoff, int *yoff)
-{
- int ix0,iy0,ix1,iy1;
- rstbtt__bitmap gbm;
- rstbtt_vertex *vertices;
- int num_verts = rstbtt_GetGlyphShape(info, glyph, &vertices);
-
- if (scale_x == 0) scale_x = scale_y;
- if (scale_y == 0) {
- if (scale_x == 0) {
- RFONT_FREE(vertices);
- return NULL;
- }
- scale_y = scale_x;
- }
-
- rstbtt_GetGlyphBitmapBoxSubpixel(info, glyph, scale_x, scale_y, shift_x, shift_y, &ix0,&iy0,&ix1,&iy1);
-
- /* now we get the size */
- gbm.w = (ix1 - ix0);
- gbm.h = (iy1 - iy0);
- gbm.pixels = NULL; /* in case we error */
-
- if (width ) *width = gbm.w;
- if (height) *height = gbm.h;
- if (xoff ) *xoff = ix0;
- if (yoff ) *yoff = iy0;
-
- if (gbm.w && gbm.h) {
- gbm.pixels = (unsigned char *) RFONT_MALLOC((size_t)(gbm.w * gbm.h));
- if (gbm.pixels) {
- gbm.stride = gbm.w;
-
- rstbtt_Rasterize(&gbm, 0.35f, vertices, num_verts, scale_x, scale_y, shift_x, shift_y, ix0, iy0, 1);
- }
- }
- RFONT_FREE(vertices);
- return gbm.pixels;
-}
-
-
-RFONT_API int rstbtt_InitFont(rstbtt_fontinfo *info, const unsigned char* const_data, int fontstart)
-{
- unsigned char* data = (unsigned char*)const_data;
-
- u32 cmap, t;
- i32 i,numTables;
-
- info->data = (unsigned char*)data;
- info->fontstart = fontstart;
- info->cff = rstbtt__new_buf(NULL, 0);
-
- cmap = rstbtt__find_table(data, (u32)fontstart, "cmap"); /* required */
- info->loca = (int)rstbtt__find_table(data, (u32)fontstart, "loca"); /* required */
- info->head = (int)rstbtt__find_table(data, (u32)fontstart, "head"); /* required */
- info->glyf = (int)rstbtt__find_table(data, (u32)fontstart, "glyf"); /* required */
- info->hhea = (int)rstbtt__find_table(data, (u32)fontstart, "hhea"); /* required */
- info->hmtx = (int)rstbtt__find_table(data, (u32)fontstart, "hmtx"); /* required */
- info->kern = (int)rstbtt__find_table(data, (u32)fontstart, "kern"); /* not required */
- info->gpos = (int)rstbtt__find_table(data, (u32)fontstart, "GPOS"); /* not required */
-
- if (!cmap || !info->head || !info->hhea || !info->hmtx)
- return 0;
- if (info->glyf) {
- /* required for truetype */
- if (!info->loca) return 0;
- } else {
- /* initialization for CFF / Type2 fonts (OTF) */
- rstbtt__buf b, topdict, topdictidx;
- u32 cstype = 2, charstrings = 0, fdarrayoff = 0, fdselectoff = 0;
- u32 cff;
-
- cff = rstbtt__find_table(data, (u32)fontstart, "CFF ");
- if (!cff) return 0;
-
- info->fontdicts = rstbtt__new_buf(NULL, 0);
- info->fdselect = rstbtt__new_buf(NULL, 0);
-
- /* @TODO this should use size from table (not 512MB) */
- info->cff = rstbtt__new_buf(data+cff, 512*1024*1024);
- b = info->cff;
-
- /* read the header */
- rstbtt__buf_skip(&b, 2);
- rstbtt__buf_seek(&b, rstbtt__buf_get8(&b)); /* hdrsize */
-
- /* @TODO the name INDEX could list multiple fonts,
- but we just use the first one. */
- rstbtt__cff_get_index(&b); /* name INDEX */
- topdictidx = rstbtt__cff_get_index(&b);
- topdict = rstbtt__cff_index_get(topdictidx, 0);
- rstbtt__cff_get_index(&b); /* string INDEX */
- info->gsubrs = rstbtt__cff_get_index(&b);
-
- rstbtt__dict_get_ints(&topdict, 17, 1, &charstrings);
- rstbtt__dict_get_ints(&topdict, 0x100 | 6, 1, &cstype);
- rstbtt__dict_get_ints(&topdict, 0x100 | 36, 1, &fdarrayoff);
- rstbtt__dict_get_ints(&topdict, 0x100 | 37, 1, &fdselectoff);
- info->subrs = rstbtt__get_subrs(b, topdict);
-
- /* weonly support Type 2 charstrings */
- if (cstype != 2) return 0;
- if (charstrings == 0) return 0;
-
- if (fdarrayoff) {
- /* looks like a CID font */
- if (!fdselectoff) return 0;
- rstbtt__buf_seek(&b, (int)fdarrayoff);
- info->fontdicts = rstbtt__cff_get_index(&b);
- info->fdselect = rstbtt__buf_range(&b, (int)fdselectoff, (int)b.size - (int)fdselectoff);
- }
-
- rstbtt__buf_seek(&b, (int)charstrings);
- info->charstrings = rstbtt__cff_get_index(&b);
- }
-
- t = rstbtt__find_table(data, (u32)fontstart, "maxp");
- if (t)
- info->numGlyphs = RFONT_USHORT(data, t + 4);
- else
- info->numGlyphs = 0xffff;
-
- info->svg = -1;
-
- numTables = RFONT_USHORT(data, cmap + 2);
- info->index_map = 0;
- for (i=0; i < numTables; ++i) {
- u32 encoding_record = (u32)(cmap + 4 + 8 * (u32)i);
- /* find an encoding we understand: */
- switch(RFONT_USHORT(data, encoding_record)) {
- case rstbtt_PLATFORM_ID_MICROSOFT:
- switch (RFONT_USHORT(data, (int)encoding_record+2)) {
- case rstbtt_MS_EID_UNICODE_BMP:
- case rstbtt_MS_EID_UNICODE_FULL:
- /* MS/Unicode */
- info->index_map = (int)(cmap + RFONT_ULONG(data, encoding_record + 4));
- break;
- }
- break;
- case rstbtt_PLATFORM_ID_UNICODE:
- /* Mac/iOS has these */
- /* all the encodingIDs are unicode, so we don't bother to check it */
- info->index_map = (int)(cmap + RFONT_ULONG(data, encoding_record+4));
- break;
- }
- }
- if (info->index_map == 0)
- return 0;
-
- info->indexToLocFormat = RFONT_USHORT(((u8*)data), info->head + 50);
- return 1;
-}
-
-RFONT_API int rstbtt_FindGlyphIndex(const rstbtt_fontinfo *info, int unicode_codepoint) {
- u8 *data = info->data;
- u32 index_map = (u32)info->index_map;
-
- u16 format = RFONT_USHORT(data, index_map);
- if (format == 0) { /* apple byte encoding */
- i32 bytes = RFONT_USHORT(data, index_map + 2);
- if (unicode_codepoint < bytes-6)
- return RFONT_BYTE(data, (int)index_map + 6 + unicode_codepoint);
- return 0;
- } else if (format == 6) {
- u32 first = RFONT_USHORT(data, index_map + 6);
- u32 count = RFONT_USHORT(data, index_map + 8);
- if ((u32) unicode_codepoint >= first && (u32) unicode_codepoint < (u32)(first + count))
- return RFONT_USHORT(data, (int)index_map + 10 + (unicode_codepoint - (int)first)*2);
- return 0;
- } else if (format == 2) {
- assert(0); /* @TODO: high-byte mapping for japanese/chinese/korean */
- return 0;
- } else if (format == 4) { /* standard mapping for windows fonts: binary search collection of ranges */
- u16 segcount = RFONT_USHORT(data, index_map+6) >> 1;
- u16 searchRange = RFONT_USHORT(data, index_map+8) >> 1;
- u16 entrySelector = RFONT_USHORT(data, index_map+10);
- u16 rangeShift = RFONT_USHORT(data, index_map+12) >> 1;
-
- /* do a binary search of the segments */
- u32 endCount = index_map + 14;
- u32 search = endCount;
-
- if (unicode_codepoint > 0xffff)
- return 0;
-
- /* they lie from endCount .. endCount + segCount
- but searchRange is the nearest power of two, so... */
- if (unicode_codepoint >= RFONT_USHORT(data, search + rangeShift*2))
- search += rangeShift*2;
-
- /* now decrement to bias correctly to find smallest */
- search -= 2;
- while (entrySelector) {
- u16 end;
- searchRange >>= 1;
- end = RFONT_USHORT(data, search + searchRange*2);
- if (unicode_codepoint > end)
- search += searchRange*2;
- --entrySelector;
- }
- search += 2;
-
- {
- u16 offset, start;
- u16 item = (u16) ((search - endCount) >> 1);
-
- assert(unicode_codepoint <= RFONT_USHORT(data, endCount + 2*item));
- start = RFONT_USHORT(data, index_map + 14 + segcount*2 + 2 + 2*item);
- if (unicode_codepoint < start)
- return 0;
-
- offset = RFONT_USHORT(data, index_map + 14 + segcount*6 + 2 + 2*item);
- if (offset == 0)
- return (u16) (unicode_codepoint + RFONT_SHORT(data, index_map + 14 + segcount*4 + 2 + 2*item));
-
- return RFONT_USHORT(data, offset + (unicode_codepoint-start)*2 + (int)index_map + 14 + segcount*6 + 2 + 2*item);
- }
- } else if (format == 12 || format == 13) {
- u32 ngroups = RFONT_ULONG(data, index_map+12);
- i32 low,high;
- low = 0; high = (i32)ngroups;
- /* Binary search the right group. */
- while (low < high) {
- i32 mid = low + ((high-low) >> 1); /* rounds down, so low <= mid < high */
- u32 start_char = RFONT_ULONG(data, (int)index_map + 16 + mid * 12);
- u32 end_char = RFONT_ULONG(data, (int)index_map + 16 + mid * 12 + 4);
- if ((u32) unicode_codepoint < start_char)
- high = mid;
- else if ((u32) unicode_codepoint > end_char)
- low = mid+1;
- else {
- u32 start_glyph = RFONT_ULONG(data, (int)index_map + 16 + mid * 12 + 8);
- if (format == 12)
- return (int)((int)start_glyph + unicode_codepoint - (int)start_char);
- else /* format == 13 */
- return (int)start_glyph;
- }
- }
- return 0; /* not found */
- }
- /* @TODO */
- assert(0);
- return 0;
-}
-
-RFONT_API int rstbtt__GetGlyfOffset(const rstbtt_fontinfo *info, int glyph_index)
-{
- int g1,g2;
-
- assert(!info->cff.size);
-
- if (glyph_index >= info->numGlyphs) return -1; /* glyph index out of range */
- if (info->indexToLocFormat >= 2) return -1; /* unknown index->glyph map format */
-
- if (info->indexToLocFormat == 0) {
- g1 = info->glyf + RFONT_USHORT(info->data, info->loca + glyph_index * 2) * 2;
- g2 = info->glyf + RFONT_USHORT(info->data, info->loca + glyph_index * 2 + 2) * 2;
- } else {
- g1 = info->glyf + (int)RFONT_ULONG (info->data, info->loca + glyph_index * 4);
- g2 = info->glyf + (int)RFONT_ULONG (info->data, info->loca + glyph_index * 4 + 4);
- }
-
- return g1==g2 ? -1 : g1; /* if length is 0, return -1 */
-}
-
-RFONT_API int rstbtt__GetGlyphInfoT2(const rstbtt_fontinfo *info, int glyph_index, int *x0, int *y0, int *x1, int *y1)
-{
- rstbtt__csctx c = rstbtt__CSCTX_INIT(1);
- int r = rstbtt__run_charstring(info, glyph_index, &c);
- if (x0) *x0 = r ? c.min_x : 0;
- if (y0) *y0 = r ? c.min_y : 0;
- if (x1) *x1 = r ? c.max_x : 0;
- if (y1) *y1 = r ? c.max_y : 0;
- return r ? c.num_vertices : 0;
-}
-
-RFONT_API int rstbtt_GetGlyphBox(const rstbtt_fontinfo *info, int glyph_index, int *x0, int *y0, int *x1, int *y1)
-{
- if (info->cff.size) {
- rstbtt__GetGlyphInfoT2(info, glyph_index, x0, y0, x1, y1);
- } else {
- int g = rstbtt__GetGlyfOffset(info, glyph_index);
- if (g < 0) return 0;
-
- if (x0) *x0 = RFONT_SHORT(info->data, g + 2);
- if (y0) *y0 = RFONT_SHORT(info->data, g + 4);
- if (x1) *x1 = RFONT_SHORT(info->data, g + 6);
- if (y1) *y1 = RFONT_SHORT(info->data, g + 8);
- }
- return 1;
-}
-
-#if defined(__GNUC__) || defined(__clang__)
-#pragma GCC diagnostic push
-#pragma GCC diagnostic ignored "-Wcast-qual"
-#endif
-
-#if defined(__GNUC__) || defined(__clang__)
-#pragma GCC diagnostic pop
-#endif
-#endif /* n RFONT_EXTERNAL_STB */
-
-/*
-END of stb_truetype defines and source code required by RFont
-*/
-
-#endif /* RFONT_IMPLEMENTATION */