reactos/rostests/apitests/gdi32/AddFontMemResourceEx.c

/*
 * PROJECT:         ReactOS api tests
 * LICENSE:         GPL - See COPYING in the top level directory
 * PURPOSE:         Test for AddFontMemResourceEx
 * PROGRAMMERS:     Mark Jansen
 *
 * PanosePitchTest + TTCTestV by Katayama Hirofumi MZ, licensed under CC BY
 * Shadows_Into_Light by Kimberly Geswein, licensed under OFL
 *                    Captured from firefox, embedded on reactos.org
 */


#include <apitest.h>
#include <wingdi.h>
#include <winuser.h>

typedef struct _fnt_res
{
    const char* FontName;
    TEXTMETRICA tm;
} fnt_res;

typedef struct _fnt_test
{
    const char* ResourceName;
    int NumFaces;
    fnt_res res[4];
} fnt_test;



static fnt_test test_data[] =
{
    {
        .ResourceName = "PanosePitchTest.ttf",
        .NumFaces = 2,
        .res =
        {
            {
                .FontName = "PanosePitchTest",
                .tm.tmHeight = 11,
                .tm.tmAscent = 11,
                .tm.tmDescent = 0,
                .tm.tmInternalLeading = -5,
                .tm.tmExternalLeading = 1,
                .tm.tmAveCharWidth = 8,
                .tm.tmMaxCharWidth = 11,
                .tm.tmWeight = FW_NORMAL,
                .tm.tmOverhang = 0,
                .tm.tmDigitizedAspectX = 96,
                .tm.tmDigitizedAspectY = 96,
                .tm.tmFirstChar = 63,
                .tm.tmLastChar = 65,
                .tm.tmDefaultChar = 165,
                .tm.tmBreakChar = 65,
                .tm.tmItalic = 0,
                .tm.tmUnderlined = 0,
                .tm.tmStruckOut = 0,
                .tm.tmPitchAndFamily = TMPF_TRUETYPE | TMPF_VECTOR,
                .tm.tmCharSet = SHIFTJIS_CHARSET,
            },
            {
                .FontName = "@PanosePitchTest",
                .tm.tmHeight = 11,
                .tm.tmAscent = 11,
                .tm.tmDescent = 0,
                .tm.tmInternalLeading = -5,
                .tm.tmExternalLeading = 1,
                .tm.tmAveCharWidth = 8,
                .tm.tmMaxCharWidth = 11,
                .tm.tmWeight = FW_NORMAL,
                .tm.tmOverhang = 0,
                .tm.tmDigitizedAspectX = 96,
                .tm.tmDigitizedAspectY = 96,
                .tm.tmFirstChar = 63,
                .tm.tmLastChar = 65,
                .tm.tmDefaultChar = 165,
                .tm.tmBreakChar = 65,
                .tm.tmItalic = 0,
                .tm.tmUnderlined = 0,
                .tm.tmStruckOut = 0,
                .tm.tmPitchAndFamily = TMPF_TRUETYPE | TMPF_VECTOR,
                .tm.tmCharSet = SHIFTJIS_CHARSET,
            },
        },
    },
    {
        .ResourceName = "TTCTestV.ttc",
        .NumFaces = 3,
        .res =
        {
            {
                .FontName = "No1Of3in1",
                .tm.tmHeight = 12,
                .tm.tmAscent = 12,
                .tm.tmDescent = 0,
                .tm.tmInternalLeading = -4,
                .tm.tmExternalLeading = 1,
                .tm.tmAveCharWidth = -525,
                .tm.tmMaxCharWidth = 6,
                .tm.tmWeight = FW_NORMAL,
                .tm.tmOverhang = 0,
                .tm.tmDigitizedAspectX = 96,
                .tm.tmDigitizedAspectY = 96,
                .tm.tmFirstChar = 63,
                .tm.tmLastChar = 65,
                .tm.tmDefaultChar = 64,
                .tm.tmBreakChar = 65,
                .tm.tmItalic = 0,
                .tm.tmUnderlined = 0,
                .tm.tmStruckOut = 0,
                .tm.tmPitchAndFamily = TMPF_TRUETYPE | TMPF_VECTOR | TMPF_FIXED_PITCH,
                .tm.tmCharSet = ANSI_CHARSET,
            },
            {
                .FontName = "No2Of3in1",
                .tm.tmHeight = 12,
                .tm.tmAscent = 12,
                .tm.tmDescent = 0,
                .tm.tmInternalLeading = -4,
                .tm.tmExternalLeading = 1,
                .tm.tmAveCharWidth = 8,
                .tm.tmMaxCharWidth = 7,
                .tm.tmWeight = FW_NORMAL,
                .tm.tmOverhang = 0,
                .tm.tmDigitizedAspectX = 96,
                .tm.tmDigitizedAspectY = 96,
                .tm.tmFirstChar = 63,
                .tm.tmLastChar = 65,
                .tm.tmDefaultChar = 64,
                .tm.tmBreakChar = 65,
                .tm.tmItalic = 0,
                .tm.tmUnderlined = 0,
                .tm.tmStruckOut = 0,
                .tm.tmPitchAndFamily = TMPF_TRUETYPE | TMPF_VECTOR | TMPF_FIXED_PITCH,
                .tm.tmCharSet = ANSI_CHARSET,
            },
            {
                .FontName = "No3Of3in1V",
                .tm.tmHeight = 12,
                .tm.tmAscent = 12,
                .tm.tmDescent = 0,
                .tm.tmInternalLeading = -4,
                .tm.tmExternalLeading = 1,
                .tm.tmAveCharWidth = 8,
                .tm.tmMaxCharWidth = 13,
                .tm.tmWeight = FW_NORMAL,
                .tm.tmOverhang = 0,
                .tm.tmDigitizedAspectX = 96,
                .tm.tmDigitizedAspectY = 96,
                .tm.tmFirstChar = 63,
                .tm.tmLastChar = 65,
                .tm.tmDefaultChar = 64,
                .tm.tmBreakChar = 65,
                .tm.tmItalic = 0,
                .tm.tmUnderlined = 0,
                .tm.tmStruckOut = 0,
                .tm.tmPitchAndFamily = FF_MODERN | TMPF_TRUETYPE | TMPF_VECTOR,
                .tm.tmCharSet = ANSI_CHARSET,
            },
        },
    },
    {
        .ResourceName = "Shadows_Into_Light.ttf",
        .NumFaces = 1,
        .res =
        {
            {
                .FontName = "ufaXaAlLOxCUGYJ7KN51UP2Q==",
                .tm.tmHeight = 26,
                .tm.tmAscent = 19,
                .tm.tmDescent = 7,
                .tm.tmInternalLeading = 10,
                .tm.tmExternalLeading = 0,
                .tm.tmAveCharWidth = 7,
                .tm.tmMaxCharWidth = 23,
                .tm.tmWeight = FW_NORMAL,
                .tm.tmOverhang = 0,
                .tm.tmDigitizedAspectX = 96,
                .tm.tmDigitizedAspectY = 96,
                .tm.tmFirstChar = 30,
                .tm.tmLastChar = 255,
                .tm.tmDefaultChar = 31,
                .tm.tmBreakChar = 32,
                .tm.tmItalic = 0,
                .tm.tmUnderlined = 0,
                .tm.tmStruckOut = 0,
                .tm.tmPitchAndFamily = TMPF_TRUETYPE | TMPF_VECTOR | TMPF_FIXED_PITCH,
                .tm.tmCharSet = ANSI_CHARSET,
            },
        },
    },
};


#define ok_int2(expression) \
    do { \
        int _value = (expression); \
        ok(_value == (res->expression), "Wrong value for '%s', expected: %d, got: %d for %s/%s\n", \
           #expression, (int)(res->expression), _value, test_name, res->FontName); \
    } while (0)

#define ok_hex2(expression) \
    do { \
        int _value = (expression); \
        ok(_value == (res->expression), "Wrong value for '%s', expected: 0x%x, got: 0x%x for %s/%s\n", \
           #expression, (int)(res->expression), _value, test_name, res->FontName); \
    } while (0)


static void test_font_caps(HDC hdc, int test_index)
{
    HGDIOBJ old;
    TEXTMETRICA tm = { 0 };
    char name[64];
    BOOL ret;
    HFONT font;
    int n;
    const char* test_name = test_data[test_index].ResourceName;

    for (n = 0; test_data[test_index].res[n].FontName; ++n)
    {
        fnt_res* res = test_data[test_index].res + n;
        font = CreateFontA(0, 0, 0, 0, FW_DONTCARE, FALSE, FALSE, FALSE, DEFAULT_CHARSET,
                     OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY, DEFAULT_PITCH, res->FontName);

        if (font)
        {
            old = SelectObject(hdc, font);

            memset(&tm, 0xaa, sizeof(tm));
            ret = GetTextMetricsA(hdc, &tm);
            ok(ret, "GetTextMetricsA() for %s/%s\n", test_name, res->FontName);

            SetLastError(0xdeadbeef);
            ret = GetTextFaceA(hdc, sizeof(name), name);
            ok(ret, "GetTextFaceA error %lu for %s/%s\n", GetLastError(), test_name, res->FontName);
            if (ret)
            {
                ok(!strcmp(name, res->FontName), "FontName was %s, expected %s for %s/%s", name, res->FontName, test_name, res->FontName);
            }

            ok_int2(tm.tmHeight);
            ok_int2(tm.tmAscent);
            ok_int2(tm.tmDescent);
            ok_int2(tm.tmInternalLeading);
            ok_int2(tm.tmExternalLeading);
            ok_int2(tm.tmAveCharWidth);
            ok_int2(tm.tmMaxCharWidth);
            ok_int2(tm.tmWeight);
            ok_int2(tm.tmOverhang);
            ok_int2(tm.tmDigitizedAspectX);
            ok_int2(tm.tmDigitizedAspectY);
            ok_int2(tm.tmFirstChar);
            ok_int2(tm.tmLastChar);
            ok_int2(tm.tmDefaultChar);
            ok_int2(tm.tmBreakChar);
            ok_int2(tm.tmItalic);
            ok_int2(tm.tmUnderlined);
            ok_int2(tm.tmStruckOut);
            ok_hex2(tm.tmPitchAndFamily);
            ok_int2(tm.tmCharSet);

            SelectObject(hdc, old);
            DeleteObject(font);
        }
    }
}


/* Not working as of 2017-04-08 on ReactOS */
static BOOL is_font_available(HDC hdc, const char* fontName)
{
    char name[64];
    BOOL ret;

    HFONT font = CreateFontA(0, 0, 0, 0, FW_DONTCARE, FALSE, FALSE, FALSE, DEFAULT_CHARSET,
                            OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY, DEFAULT_PITCH, fontName);
    HGDIOBJ old = SelectObject(hdc, font);


    SetLastError(0xdeadbeef);

    ret = GetTextFaceA(hdc, sizeof(name), name);
    ok(ret, "GetTextFaceA error %lu for %s\n", GetLastError(), fontName);
    SelectObject(hdc, old);
    DeleteObject(font);

    if (ret)
    {
        return !_strcmpi(name, fontName);
    }
    return FALSE;
}



START_TEST(AddFontMemResourceEx)
{
    HMODULE mod;
    HRSRC hRsrc;

    HGLOBAL hTemplate;
    DWORD dwSize, dwNumFonts;
    LPVOID pFont;

    HANDLE hFont;
    fnt_test* data;
    int n;

    HDC hdc = CreateCompatibleDC(NULL);
    BOOL is_font_available_broken = is_font_available(hdc, "Nonexisting font name here");

    ok(!is_font_available_broken, "Validating font is broken! (CORE-13053)!\n");

    for (n = 0; n < _countof(test_data); ++n)
    {
        data = test_data + n;

        mod = GetModuleHandle(NULL);
        hRsrc = FindResourceA(mod, data->ResourceName, MAKEINTRESOURCE(RT_RCDATA));

        hTemplate = LoadResource(mod, hRsrc);
        dwSize = SizeofResource(mod, hRsrc);
        pFont = LockResource(hTemplate);

        dwNumFonts = 0;
        hFont = AddFontMemResourceEx(pFont, dwSize, NULL, &dwNumFonts);
        ok(dwNumFonts == data->NumFaces, "dwNumFonts was %lu, expected %d for %s\n", dwNumFonts, data->NumFaces, data->ResourceName);
        ok(hFont != NULL, "Expected valid handle for %s\n", data->ResourceName);

        if (hFont)
        {
            test_font_caps(hdc, n);
            RemoveFontMemResourceEx(hFont);
            if (!is_font_available_broken)
            {
                ok (!is_font_available(hdc, data->ResourceName), "Expected font to be unregistered again for %s\n", data->ResourceName);
            }
            else
            {
                skip("Font unregister test for %s\n", data->ResourceName);
            }
        }

        UnlockResource(hTemplate);
        FreeResource(hTemplate);
    }

    DeleteDC(hdc);
}