LLVG_FONT_impl_freetype.c

Go to the documentation of this file.

/*
 * C
 *
 * Copyright 2020-2026 MicroEJ Corp. All rights reserved.
 * MicroEJ Corp. PROPRIETARY/CONFIDENTIAL. Use is subject to license terms.
 */
 
#include "vg_configuration.h"
 
#if defined VG_FEATURE_FONT &&                                                              \
    (defined VG_FEATURE_FONT_FREETYPE_VECTOR || defined VG_FEATURE_FONT_FREETYPE_BITMAP) && \
    (VG_FEATURE_FONT == VG_FEATURE_FONT_FREETYPE_VECTOR || VG_FEATURE_FONT == VG_FEATURE_FONT_FREETYPE_BITMAP)
 
// -----------------------------------------------------------------------------
// Includes
// -----------------------------------------------------------------------------
 
#include <math.h>
#include <string.h>
#include <aftypes.h>
 
#include <LLVG_impl.h>
#include <LLVG_FONT_impl.h>
 
#if defined VG_FEATURE_FONT_EXTERNAL && (VG_FEATURE_FONT_EXTERNAL == 1)
#include <LLEXT_RES_impl.h>
#include <freetype/internal/ftmemory.h>
#endif
 
#include "vg_freetype.h"
#include "vg_helper.h"
#include "vg_trace.h"
#include "ui_util.h"
 
// -----------------------------------------------------------------------------
// Macros and Defines
// -----------------------------------------------------------------------------
 
/*
 * @brief Computes the scale to apply to the font.
 */
#define GET_SCALE(s, f) ((s) / (f)->units_per_EM)
 
/*
 * @brief Macro to add a FONT event and its type.
 */
#define LOG_MICROVG_FONT_START(fn) LOG_MICROVG_START(LOG_MICROVG_FONT_ID, CONCAT_DEFINES(LOG_MICROVG_FONT_, fn))
#define LOG_MICROVG_FONT_END(fn) LOG_MICROVG_END(LOG_MICROVG_FONT_ID, CONCAT_DEFINES(LOG_MICROVG_FONT_, fn))
 
// -----------------------------------------------------------------------------
// Types
// -----------------------------------------------------------------------------
 
/*
 * @brief Structure to load a resource by calling SNIX_get_resource()
 */
typedef struct {
    void *data;
    uint32_t size;
} SNIX_resource;
 
// -----------------------------------------------------------------------------
// Extern functions
// -----------------------------------------------------------------------------
 
/*
 * @brief SNIX_get_resource() available since MicroEJ Architecture version 7.13
 */
extern int32_t SNIX_get_resource(jchar *path, SNIX_resource *resource);
 
// -----------------------------------------------------------------------------
// Internal function definitions
// -----------------------------------------------------------------------------
 
/*
 * @brief Disposes Freetype font when the associated Java object VectorFont is
 * garbaged collected.
 */
static void __dispose_registered_font(void *faceHandle);
 
/*
 * @brief Disposes Freetype font.
 */
static void __dispose_font(void *faceHandle);
 
/*
 * @brief Opens a font that has been loaded into memory.
 *
 * @see FT_New_Memory_Face in freetype.h
 *
 * @param[in] face: a handle to a new face object.
 * @param[in] data: a pointer to the beginning of the font data.
 * @param[in] length: the size of the memory chunk used by the font data.
 *
 * @return FreeType error code.
 */
static FT_Error __load_memory_font(FT_Face *face, void *data, int length);
 
/*
 * @brief Opens a font that has been compiled with the application.
 *
 * @see FT_New_Memory_Face in freetype.h
 *
 * @param[in] face: a handle to a new face object.
 * @param[in] font_name: a path to the font file.
 *
 * @return FreeType error code.
 */
static FT_Error __load_internal_font(FT_Face *face, jchar *font_name);
 
/*
 * @brief Gets the description of the given native resource: a vector font.
 * @see SNI_getDescriptionFunction
 */
static void __register_font_description(void *resource, char *buffer, uint32_t bufferLength);
 
#if defined VG_FEATURE_FONT_EXTERNAL && (VG_FEATURE_FONT_EXTERNAL == 1)
 
/*
 * @brief Opens a font that has not been compiled with the application.
 *
 * @see FT_Open_Face in freetype.h
 *
 * @param[in] face: a handle to a new face object.
 * @param[in] font_name: a path to the font file.
 *
 * @return FreeType error code.
 */
static FT_Error __load_external_font(FT_Face *face, jchar *font_name);
 
/*
 * @brief Reads a chunk from an external resource.
 *
 * @see FT_Stream_IoFunc in ftsystem.h
 *
 * @param[in] stream: a handle to the source stream.
 * @param[in] offset: the offset of read in stream.
 * @param[in] buffer: the address of the read buffer.
 * @param[in] count: the number of bytes to read from the stream.
 *
 * @return the number of bytes effectively read by the stream.
 */
static unsigned long __read_external_resource(FT_Stream stream, unsigned long offset, unsigned char *buffer,
                                              unsigned long count);
 
/*
 * @brief Closes a given input stream.
 *
 * @see FT_Stream_IoFunc in ftsystem.h
 *
 * @param[in] stream: a handle to the target stream.
 */
static void __close_external_resource(FT_Stream stream);
 
#endif // VG_FEATURE_FONT_EXTERNAL
 
// -----------------------------------------------------------------------------
// Global Variables
// -----------------------------------------------------------------------------
 
FT_Library library;
FT_Renderer renderer;
 
#if defined VG_FEATURE_FONT && defined VG_FEATURE_FONT_FREETYPE_VECTOR && \
    (VG_FEATURE_FONT == VG_FEATURE_FONT_FREETYPE_VECTOR)
const char *renderer_name = "microvg";
#endif
#if defined VG_FEATURE_FONT && defined VG_FEATURE_FONT_FREETYPE_BITMAP && \
    (VG_FEATURE_FONT == VG_FEATURE_FONT_FREETYPE_BITMAP)
const char *renderer_name = "smooth";
#endif
 
// -----------------------------------------------------------------------------
// vg_freetype.h functions
// -----------------------------------------------------------------------------
 
// See the header file for the function documentation
void VG_FREETYPE_initialize(void) {
    FT_Error error = FT_Init_FreeType(&library);
    if (FT_ERR(Ok) == error) {
        renderer = FT_RENDERER(FT_Get_Module(library, renderer_name));
        if (0 != renderer) {
            MEJ_LOG_INFO_MICROVG("Freetype renderer: %s\n", FT_MODULE_CLASS(renderer)->module_name);
        } else {
            MEJ_LOG_ERROR_MICROVG("No renderer found with name %s\n", renderer_name);
        }
    } else {
        MEJ_LOG_ERROR_MICROVG("Internal freetype error initializing library, ID = %d\n", error);
    }
}
 
// See the header file for the function documentation
jfloat VG_FREETYPE_string_width(jchar *text, jint length, jint face_handle, jfloat size, jfloat letter_spacing) {
    float scaled_width = 0.f;
 
    if (size >= 0) {
        FT_Face face = (FT_Face)face_handle;
        float scale = GET_SCALE(size, face);
 
        int nb_chars = 0;
        long unscaled_width = 0;
 
        // Layout variables
        FT_UInt glyph_index;  // current glyph index
        FT_UInt previous_glyph_index = 0; // previous glyph index for kerning
 
        int advance_x;
        int previous_advance_x = 0;
        int previous_offset_x = 0;
        int advance_y;
        int offset_x;
        int offset_y;
 
        VG_HELPER_layout_configure(face_handle, text, length);
 
        while (VG_HELPER_layout_load_glyph(&glyph_index, &advance_x, &advance_y, &offset_x, &offset_y)) {
            // At that point the current glyph has been loaded by Freetype
            if (0 == previous_glyph_index) {
                // first glyph: remove the first blank line
                if (0 != face->glyph->metrics.width) {
                    unscaled_width -= face->glyph->metrics.horiBearingX;
                } else {
                    unscaled_width -= face->glyph->advance.x;
                }
            }
 
            unscaled_width += advance_x;
            previous_glyph_index = glyph_index;
            nb_chars++;
            // Last call to VG_HELPER_layout_load_glyph clear advance_x and offset_x.
            // We need to keep them for last glyph measurement
            previous_advance_x = advance_x;
            previous_offset_x = offset_x;
        }
 
        // last glyph: remove the last blank line
        if (0 != face->glyph->metrics.width) {
            unscaled_width -= previous_advance_x;
            unscaled_width += face->glyph->metrics.horiBearingX; // glyph's left blank line
            unscaled_width += face->glyph->metrics.width; // glyph's width
            unscaled_width += previous_offset_x; // glyph's offset_x
        } else {
            if (0 != unscaled_width) {
                unscaled_width -= previous_advance_x;
            }
        }
        scaled_width = ((scale * (float)unscaled_width) + (((float)nb_chars - 1) * letter_spacing));
    }
 
    return scaled_width;
}
 
// -----------------------------------------------------------------------------
// LLVG_FONT_impl.h functions
// -----------------------------------------------------------------------------
 
// See the header file for the function documentation
jint LLVG_FONT_IMPL_load_font(jchar *font_name, jboolean complex_layout) {
    LOG_MICROVG_FONT_START(load);
 
    FT_Face face = 0;
    jint ret = LLVG_FONT_UNLOADED;
 
    // Check that complex layouter is available for complex text layout
    if (complex_layout && !LLVG_FONT_IMPL_has_complex_layouter()) {
        ret = LLVG_FONT_UNLOADED;
    } else {
        // try to load an internal resource
        FT_Error error = __load_internal_font(&face, font_name);
 
#if defined VG_FEATURE_FONT_EXTERNAL && (VG_FEATURE_FONT_EXTERNAL == 1)
        if (FT_ERR(Cannot_Open_Resource) == error) {
            // try to load an external resource
            error = __load_external_font(&face, font_name);
        }
#endif // VG_FEATURE_FONT_EXTERNAL
 
        if (FT_ERR(Ok) == error) {
            // Use Unicode
            FT_Select_Charmap(face, ft_encoding_unicode);
            MEJ_LOG_INFO_MICROVG("Freetype font loaded: %s\n", (const char *)font_name);
 
            SNI_registerResource((void *)face, (SNI_closeFunction) & __dispose_registered_font,
                                 &__register_font_description);
 
#if defined VG_FEATURE_FONT_COMPLEX_LAYOUT && (VG_FEATURE_FONT_COMPLEX_LAYOUT == 1)
            if (JTRUE == complex_layout) {
                face->face_flags |= FT_FACE_FLAG_COMPLEX_LAYOUT;
            }
#endif // VG_FEATURE_FONT_COMPLEX_LAYOUT
 
            ret = (jint)face;
        } else if (FT_ERR(Cannot_Open_Resource) != error) {
            MEJ_LOG_ERROR_MICROVG("An error occurred during font loading: 0x%x, refer to fterrdef.h\n", error);
        } else {
            MEJ_LOG_ERROR_MICROVG("Resource not found: %s\n", (const char *)font_name);
        }
    }
 
    LOG_MICROVG_FONT_END(load);
    return ret;
}
 
// See the header file for the function documentation
jfloat LLVG_FONT_IMPL_string_width(jchar *text, jint faceHandle, jfloat size, jfloat letterSpacing) {
    LOG_MICROVG_FONT_START(stringWidth);
    jfloat ret;
 
    if (LLVG_FONT_UNLOADED == faceHandle) {
        ret = (jfloat)LLVG_RESOURCE_CLOSED;
    } else {
        int length = (int)SNI_getArrayLength(text);
        ret = VG_FREETYPE_string_width(text, length, faceHandle, size, letterSpacing);
    }
 
    LOG_MICROVG_FONT_END(stringWidth);
    return ret;
}
 
// See the header file for the function documentation
jfloat LLVG_FONT_IMPL_string_height(jchar *text, jint faceHandle, jfloat size) {
    LOG_MICROVG_FONT_START(stringHeight);
    jfloat ret;
 
    if (LLVG_FONT_UNLOADED == faceHandle) {
        ret = (jfloat)LLVG_RESOURCE_CLOSED;
    } else {
        FT_Face face = (FT_Face)faceHandle;
        float scaled_height = 0.f;
 
        if (size >= 0) {
            float scale = GET_SCALE(size, face);
 
            FT_Pos horiBearingYTop = 0;
            FT_Pos horiBearingYBottom = 0;
 
            // Layout variables
            FT_UInt glyph_index;  // current glyph index
            FT_UInt previous_glyph_index = 0; // previous glyph index for kerning
 
            int advance_x;
            int advance_y;
            int offset_x;
            int offset_y;
 
            int length = (int)SNI_getArrayLength(text);
            VG_HELPER_layout_configure(faceHandle, text, length);
 
            while (VG_HELPER_layout_load_glyph(&glyph_index, &advance_x, &advance_y, &offset_x, &offset_y)) {
                // At that point the current glyph has been loaded by Freetype
 
                FT_Pos yBottom = face->glyph->metrics.horiBearingY - face->glyph->metrics.height;
                horiBearingYBottom = (0 == previous_glyph_index) ? yBottom : MIN(yBottom, horiBearingYBottom);
                horiBearingYTop = MAX(face->glyph->metrics.horiBearingY, horiBearingYTop);
 
                previous_glyph_index = glyph_index;
            }
 
            scaled_height = scale * (float)(horiBearingYTop - horiBearingYBottom);
        }
 
        ret = scaled_height;
    }
 
    LOG_MICROVG_FONT_END(stringHeight);
    return ret;
}
 
// See the header file for the function documentation
jfloat LLVG_FONT_IMPL_get_baseline_position(jint faceHandle, jfloat size) {
    LOG_MICROVG_FONT_START(baseline);
    jfloat ret;
 
    if (LLVG_FONT_UNLOADED == faceHandle) {
        ret = (jfloat)LLVG_RESOURCE_CLOSED;
    } else {
        FT_Face face = (FT_Face)faceHandle;
        float advance_y = 0.f;
 
        if (size >= 0) {
            float scale = GET_SCALE(size, face);
            advance_y = (face->ascender * scale);
        }
        ret = advance_y;
    }
 
    LOG_MICROVG_FONT_END(baseline);
    return ret;
}
 
// See the header file for the function documentation
jfloat LLVG_FONT_IMPL_get_height(jint faceHandle, jfloat size) {
    LOG_MICROVG_FONT_START(height);
    jfloat ret;
 
    if (LLVG_FONT_UNLOADED == faceHandle) {
        ret = (jfloat)LLVG_RESOURCE_CLOSED;
    } else {
        FT_Face face = (FT_Face)faceHandle;
        float scale = GET_SCALE(size, face);
        ret = face->height * scale;
    }
 
    LOG_MICROVG_FONT_END(height);
    return ret;
}
 
// See the header file for the function documentation
void LLVG_FONT_IMPL_dispose(jint faceHandle) {
    // unregister the resource since the VEE does not need to call it anymore
    SNI_unregisterResource((void *)faceHandle, (SNI_closeFunction) & __dispose_registered_font);
    __dispose_font((void *)faceHandle);
}
 
// See the header file for the function documentation
bool LLVG_FONT_IMPL_has_complex_layouter(void) {
#ifdef VG_FEATURE_FONT_COMPLEX_LAYOUT
    return true;
#else
    return false;
#endif
}
 
// -----------------------------------------------------------------------------
// Internal functions
// -----------------------------------------------------------------------------
 
static void __dispose_font(void *faceHandle) {
    FT_Face face = (FT_Face)faceHandle;
 
#if defined VG_FEATURE_FONT_EXTERNAL && (VG_FEATURE_FONT_EXTERNAL == 1)
    // FT_Done_Face() sets the stream to NULL: have to save it to close the
    // external resource
    FT_Stream stream = face->stream;
#endif // VG_FEATURE_FONT_EXTERNAL
 
    FT_Done_Face(face);
 
#if defined VG_FEATURE_FONT_EXTERNAL && (VG_FEATURE_FONT_EXTERNAL == 1)
    // frees the stream when the font is external (Freetype doesn't recommend
    // to read the flag FT_FACE_FLAG_EXTERNAL_STREAM)
    if (&__close_external_resource == stream->close) {
        ft_mem_free(library->memory, stream);
    }
#endif // VG_FEATURE_FONT_EXTERNAL
}
 
/*
 * Only called when killing a KF feature (automatic SNI resource management): have
 * to wait the end of GPU before closing the image.
 */
static void __dispose_registered_font(void *faceHandle) {
    // ensure GPU is not working in our font...
    LLUI_DISPLAY_waitAsynchronousDrawingEnd();
    // ... and close it
    __dispose_font(faceHandle);
}
 
static FT_Error __load_memory_font(FT_Face *face, void *data, int length) {
    return FT_New_Memory_Face(library, data, length, 0, face);
}
 
static FT_Error __load_internal_font(FT_Face *face, jchar *font_name) {
    SNIX_resource font_resource;
    FT_Error error;
 
    if (0 == SNIX_get_resource(font_name, &font_resource)) {
        error = __load_memory_font(face, font_resource.data, font_resource.size);
    } else {
        error = FT_ERR(Cannot_Open_Resource);
    }
    return error;
}
 
#if defined VG_FEATURE_FONT_EXTERNAL && (VG_FEATURE_FONT_EXTERNAL == 1)
 
static FT_Error __load_external_font(FT_Face *face, jchar *font_name) {
    FT_Error error;
 
    // try to load an external resource (respect LLEXT_RES_open path naming convention)
    char const *ext_path = &(((char const *)(font_name))[1]) /* first '/' */;
    RES_ID resource_id = LLEXT_RES_open(ext_path);
 
    if (0 <= resource_id) {
        int32_t resource_size = LLEXT_RES_available(resource_id);
 
        // check if the external resource is byte addressable
        int32_t base_address = LLEXT_RES_getBaseAddress(resource_id);
 
        if (-1 != base_address) {
            // load the font as "memory" font
            // cppcheck-suppress [misra-c2012-11.6] base_address is an address
            error = __load_memory_font(face, (void *)base_address, resource_size);
 
            // we can close the resource because we know its address
            LLEXT_RES_close(resource_id);
        } else {
            // load the font as external font
 
            FT_Open_Args args;
            args.flags = FT_OPEN_STREAM;
            args.driver = NULL;
            args.stream = (FT_StreamRec *)ft_mem_alloc(library->memory, sizeof(FT_StreamRec), &error);
 
            if (FT_ERR(Ok) == error) {
                args.stream->base = NULL;
                args.stream->size = resource_size;
                args.stream->pos = 0;
                args.stream->descriptor.value = resource_id;
                // args.stream->pathname = NULL; // not used
                args.stream->read = &__read_external_resource;
                args.stream->close = &__close_external_resource;
 
                error = FT_Open_Face(library, &args, 0, face);
            } else {
                error = FT_ERR(Out_Of_Memory);
            }
        }
    } else {
        error = FT_ERR(Cannot_Open_Resource);
    }
 
    return error;
}
 
static unsigned long __read_external_resource(FT_Stream stream, unsigned long offset, unsigned char *buffer,
                                              unsigned long count) {
    int32_t size = count;
    RES_ID resource_id = (RES_ID)(stream->descriptor.value);
    LLEXT_RES_seek(resource_id, offset);
    LLEXT_RES_read(resource_id, buffer, &size);
    return size;
}
 
static void __close_external_resource(FT_Stream stream) {
    RES_ID resource_id = (RES_ID)(stream->descriptor.value);
    LLEXT_RES_close(resource_id);
}
 
#endif // VG_FEATURE_FONT_EXTERNAL
 
static void __register_font_description(void *resource, char *buffer, uint32_t bufferLength) {
    (void)resource;
    REGISTERDESC("VectorFont", buffer, bufferLength);
}
 
// -----------------------------------------------------------------------------
// TestResource functions
// -----------------------------------------------------------------------------
 
jlong Java_com_microej_microvg_test_TestResource_getSNICloseFunctionForFont(void) {
    return (jlong) & __dispose_registered_font;
}
 
// cppcheck-suppress [misra-c2012-3.2]
#endif \
    // defined VG_FEATURE_FONT && \
    // (defined VG_FEATURE_FONT_FREETYPE_VECTOR || defined VG_FEATURE_FONT_FREETYPE_BITMAP) && \
    // (VG_FEATURE_FONT == VG_FEATURE_FONT_FREETYPE_VECTOR || VG_FEATURE_FONT == VG_FEATURE_FONT_FREETYPE_BITMAP)
 
// -----------------------------------------------------------------------------
// EOF
// -----------------------------------------------------------------------------