testing FT_Set_Transform with FT_Render_Glyph and accessing advance vector

font_transform_test.c

//make font_transform_test CFLAGS=`freetype-config --cflags ` LDLIBS=`freetype-config --libs` LDLIBS+=`pkg-config fontconfig --libs` LDLIBS+='-lm'

/*
 * Xpost - a Level-2 Postscript interpreter
 * Copyright (C) 2013, Michael Joshua Ryan
 * Copyright (C) 2013, Vincent Torri
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 * - Redistributions of source code must retain the above copyright notice,
 *   this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright notice,
 *   this list of conditions and the following disclaimer in the documentation
 *   and/or other materials provided with the distribution.
 * - Neither the name of the Xpost software product nor the names of its
 *   contributors may be used to endorse or promote products derived from this
 *   software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#define HAVE_FONTCONFIG
#define HAVE_FREETYPE

#ifdef HAVE_CONFIG_H
# include <config.h>
#endif

#include <stdlib.h>

#ifdef HAVE_FONTCONFIG
# include <fontconfig/fontconfig.h>
#endif

#ifdef HAVE_FREETYPE
# include <ft2build.h>
# include FT_FREETYPE_H
#endif

//#include "xpost_log.h"
//#include "xpost_object.h"
typedef float real;
//#include "xpost_font.h"

#ifdef HAVE_FONTCONFIG
static FcConfig *_xpost_font_fc_config = NULL;
#endif

#ifdef HAVE_FREETYPE
static FT_Library _xpost_font_ft_library = NULL;
#endif

int
xpost_font_init(void)
{
#ifdef HAVE_FREETYPE
    FT_Error err_ft;

    err_ft = FT_Init_FreeType(&_xpost_font_ft_library);
    if (!err_ft)
    {
# ifdef HAVE_FONTCONFIG
        FcBool err_fc;

        err_fc = FcInit();
        if (!err_fc)
        {
            FT_Done_FreeType(_xpost_font_ft_library);
            return 0;
        }

        _xpost_font_fc_config = FcInitLoadConfigAndFonts();
        if (_xpost_font_fc_config == NULL)
            ;//XPOST_LOG_ERR("cannot load Fc config and fonts");

        return 1;
# endif
    }

    return 0;
#endif

return 1;
}

void
xpost_font_quit(void)
{
#ifdef HAVE_FONTCONFIG
    FcConfigDestroy(_xpost_font_fc_config);
    FcFini();
#endif

#ifdef HAVE_FREETYPE
    FT_Done_FreeType(_xpost_font_ft_library);
#endif
}

#ifdef HAVE_FREETYPE
static char *
_xpost_font_face_filename_and_index_get(const char *name, int *idx)
{
# ifdef HAVE_FONTCONFIG
    FcPattern *pattern;
    FcPattern *match;
    char *file;
    char *filename;
    FcResult result;

    /* FIXME: parse name first ? */

    pattern = FcNameParse((const FcChar8 *)name);
    if (!pattern)
        return NULL;

    if (!FcConfigSubstitute (_xpost_font_fc_config, pattern, FcMatchPattern))
        goto destroy_pattern;

    FcDefaultSubstitute(pattern);
    match = FcFontMatch(_xpost_font_fc_config, pattern, &result);
    //if (result != FcResultMatch) goto destroy_pattern;
    switch (result) {
        case FcResultMatch: break;
        case FcResultNoMatch: goto destroy_pattern;
        case FcResultTypeMismatch: break;
        case FcResultNoId: break;
        case FcResultOutOfMemory: goto destroy_pattern;
    }

    result = FcPatternGetString(match, FC_FILE, 0, (FcChar8 **)&file);
    if (result != FcResultMatch)
        goto destroy_match;

    ;//XPOST_LOG_INFO("Font %s found in file %s", name, file);

    result = FcPatternGetInteger(match, FC_INDEX, 0, idx);
    if (result != FcResultMatch)
        goto destroy_match;

    ;//XPOST_LOG_INFO("Font %s has index %d", name, *idx);

    filename = strdup(file);

    FcPatternDestroy(match);
    FcPatternDestroy(pattern);

    return filename;

  destroy_match:
    FcPatternDestroy(match);
  destroy_pattern:
    FcPatternDestroy(pattern);
# endif

    return NULL;
}
#endif

void *
xpost_font_face_new_from_name(const char *name)
{
#ifdef HAVE_FREETYPE
    FT_Face face;
    FT_Error err;
    char *filename;
    int idx;

    filename = _xpost_font_face_filename_and_index_get(name, &idx);
    if (!filename)
        return NULL;

    err = FT_New_Face(_xpost_font_ft_library, filename, idx, &face) ;
    if (err == FT_Err_Unknown_File_Format)
    {
        ;//XPOST_LOG_ERR("Font format unsupported");
        free(filename);
        return NULL;
    }
    else if (err)
    {
        ;//XPOST_LOG_ERR("Font file %s can not be opened or read or is broken", filename);
        free(filename);
        return NULL;
    }

    free(filename);

    return face;
#else
    (void)name;
#endif

    return NULL;
}

void
xpost_font_face_free(void *face)
{
#ifdef HAVE_FREETYPE
    if (!face)
        return;

    FT_Done_Face(face);
#else
    (void)face;
#endif
}

void
xpost_font_face_scale(void *face, real scale)
{
#ifdef HAVE_FREETYPE
    FT_Set_Char_Size((FT_Face)face, 0, (FT_F26Dot6)(scale * 64), 96, 96);
#else
    (void)face;
    (void)scale;
#endif
}

void
xpost_font_face_transform(void *face, float *mat)
{
#ifdef HAVE_FREETYPE
    FT_Matrix matrix;
    FT_Vector pen;
    matrix.xx = (FT_Fixed)(mat[0] * 64.0);
    matrix.xy = (FT_Fixed)(mat[1] * 64.0);
    matrix.yx = (FT_Fixed)(mat[2] * 64.0);
    matrix.yy = (FT_Fixed)(mat[3] * 64.0);
    pen.x = (FT_F26Dot6)(mat[4] * 64.0);
    pen.y = (FT_F26Dot6)(mat[5] * 64.0);
    FT_Set_Transform((FT_Face)face, &matrix, 0);
#else
    (void)face;
    (void)mat;
#endif
}

unsigned int
xpost_font_face_glyph_index_get(void *face, char c)
{
#ifdef HAVE_FREETYPE
    return FT_Get_Char_Index(face, c);
#else
    (void)face;
    (void)c;
    return -1;
#endif
}

int
xpost_font_face_glyph_render(void *face, unsigned int glyph_index)
{
#ifdef HAVE_FREETYPE
    FT_Error err;

    err = FT_Load_Glyph(face, glyph_index, FT_LOAD_DEFAULT);
    if (!err)
    {
        if (((FT_Face)face)->glyph->format != FT_GLYPH_FORMAT_BITMAP)
        {
            err = FT_Render_Glyph(((FT_Face)face)->glyph, FT_RENDER_MODE_NORMAL);
            if (!err)
                return 1;
            else
            {
                ;//XPOST_LOG_ERR("Can not render  non bitmap glyph (error : %d)", err);
                return 0;
            }
        }
        else
            return 1;
    }
    else
    {
        ;//XPOST_LOG_ERR("Can not load glyph (error : %d)", err);
        return 0;
    }
#else
    (void)face;
    (void)glyph_index;
    return 0;
#endif

    return 0;
}

int main(void) {
    FT_Face face;
    long advance_x, advance_y;
    xpost_font_init();

    face = xpost_font_face_new_from_name("Courier");
    xpost_font_face_scale(face, 10.0);
    xpost_font_face_glyph_render(face, xpost_font_face_glyph_index_get(face, 'A'));
    advance_x = ((FT_Face)face)->glyph->advance.x;
    advance_y = ((FT_Face)face)->glyph->advance.y;
    printf("pre: x = %ld, y = %ld\n", advance_x, advance_y);

    xpost_font_face_transform(face, (float[]){sqrt(2.0), sqrt(2.0), -sqrt(2.0), sqrt(2.0), 0.0, 0.0});
    xpost_font_face_glyph_render(face, xpost_font_face_glyph_index_get(face, 'A'));
    advance_x = ((FT_Face)face)->glyph->advance.x;
    advance_y = ((FT_Face)face)->glyph->advance.y;
    printf("post: x = %ld, y = %ld\n", advance_x, advance_y);

    xpost_font_face_free(face);
}

Output:
$ ./font_transform_test
pre: x = 512, y = 0
post: x = 1, y = 1

The problem was the conversion from float to FT_Fixed. It should be:
matrix.xx = (FT_Fixed)(mat[0] * 0x10000L);
matrix.xy = (FT_Fixed)(mat[1] * 0x10000L);
matrix.yx = (FT_Fixed)(mat[2] * 0x10000L);
matrix.yy = (FT_Fixed)(mat[3] * 0x10000L);