/* * Unit test suite for fonts * * Copyright 2002 Mike McCormack * Copyright 2004 Dmitry Timoshkov * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA */ #include #include #include "windef.h" #include "winbase.h" #include "wingdi.h" #include "winuser.h" #include "winnls.h" #include "wine/test.h" #define expect(expected, got) ok(got == expected, "Expected %.8x, got %.8x\n", expected, got) LONG (WINAPI *pGdiGetCharDimensions)(HDC hdc, LPTEXTMETRICW lptm, LONG *height); BOOL (WINAPI *pGetCharABCWidthsW)(HDC hdc, UINT first, UINT last, LPABC abc); DWORD (WINAPI *pGetFontUnicodeRanges)(HDC hdc, LPGLYPHSET lpgs); DWORD (WINAPI *pGetGlyphIndicesA)(HDC hdc, LPCSTR lpstr, INT count, LPWORD pgi, DWORD flags); DWORD (WINAPI *pGetGlyphIndicesW)(HDC hdc, LPCWSTR lpstr, INT count, LPWORD pgi, DWORD flags); static HMODULE hgdi32 = 0; static void init(void) { hgdi32 = GetModuleHandleA("gdi32.dll"); pGdiGetCharDimensions = (void *)GetProcAddress(hgdi32, "GdiGetCharDimensions"); pGetCharABCWidthsW = (void *)GetProcAddress(hgdi32, "GetCharABCWidthsW"); pGetFontUnicodeRanges = (void *)GetProcAddress(hgdi32, "GetFontUnicodeRanges"); pGetGlyphIndicesA = (void *)GetProcAddress(hgdi32, "GetGlyphIndicesA"); pGetGlyphIndicesW = (void *)GetProcAddress(hgdi32, "GetGlyphIndicesW"); } static INT CALLBACK is_truetype_font_installed_proc(const LOGFONT *elf, const TEXTMETRIC *ntm, DWORD type, LPARAM lParam) { if (type != TRUETYPE_FONTTYPE) return 1; return 0; } static BOOL is_truetype_font_installed(const char *name) { HDC hdc = GetDC(0); BOOL ret = FALSE; if (!EnumFontFamiliesA(hdc, name, is_truetype_font_installed_proc, 0)) ret = TRUE; ReleaseDC(0, hdc); return ret; } static INT CALLBACK is_font_installed_proc(const LOGFONT *elf, const TEXTMETRIC *ntm, DWORD type, LPARAM lParam) { return 0; } static BOOL is_font_installed(const char *name) { HDC hdc = GetDC(0); BOOL ret = FALSE; if(!EnumFontFamiliesA(hdc, name, is_font_installed_proc, 0)) ret = TRUE; ReleaseDC(0, hdc); return ret; } static void check_font(const char* test, const LOGFONTA* lf, HFONT hfont) { LOGFONTA getobj_lf; int ret, minlen = 0; if (!hfont) return; ret = GetObject(hfont, sizeof(getobj_lf), &getobj_lf); /* NT4 tries to be clever and only returns the minimum length */ while (lf->lfFaceName[minlen] && minlen < LF_FACESIZE-1) minlen++; minlen += FIELD_OFFSET(LOGFONTA, lfFaceName) + 1; ok(ret == sizeof(LOGFONTA) || ret == minlen, "%s: GetObject returned %d\n", test, ret); ok(!memcmp(&lf, &lf, FIELD_OFFSET(LOGFONTA, lfFaceName)), "%s: fonts don't match\n", test); ok(!lstrcmpA(lf->lfFaceName, getobj_lf.lfFaceName), "%s: font names don't match: %s != %s\n", test, lf->lfFaceName, getobj_lf.lfFaceName); } static HFONT create_font(const char* test, const LOGFONTA* lf) { HFONT hfont = CreateFontIndirectA(lf); ok(hfont != 0, "%s: CreateFontIndirect failed\n", test); if (hfont) check_font(test, lf, hfont); return hfont; } static void test_logfont(void) { LOGFONTA lf; HFONT hfont; memset(&lf, 0, sizeof lf); lf.lfCharSet = ANSI_CHARSET; lf.lfClipPrecision = CLIP_DEFAULT_PRECIS; lf.lfWeight = FW_DONTCARE; lf.lfHeight = 16; lf.lfWidth = 16; lf.lfQuality = DEFAULT_QUALITY; lstrcpyA(lf.lfFaceName, "Arial"); hfont = create_font("Arial", &lf); DeleteObject(hfont); memset(&lf, 'A', sizeof(lf)); hfont = CreateFontIndirectA(&lf); ok(hfont != 0, "CreateFontIndirectA with strange LOGFONT failed\n"); lf.lfFaceName[LF_FACESIZE - 1] = 0; check_font("AAA...", &lf, hfont); DeleteObject(hfont); } static INT CALLBACK font_enum_proc(const LOGFONT *elf, const TEXTMETRIC *ntm, DWORD type, LPARAM lParam) { if (type & RASTER_FONTTYPE) { LOGFONT *lf = (LOGFONT *)lParam; *lf = *elf; return 0; /* stop enumeration */ } return 1; /* continue enumeration */ } static void test_font_metrics(HDC hdc, HFONT hfont, const char *test_str, INT test_str_len, const TEXTMETRICA *tm_orig, const SIZE *size_orig, INT width_orig, INT scale_x, INT scale_y) { HFONT old_hfont; TEXTMETRICA tm; SIZE size; INT width; if (!hfont) return; old_hfont = SelectObject(hdc, hfont); GetTextMetricsA(hdc, &tm); ok(tm.tmHeight == tm_orig->tmHeight * scale_y, "%d != %d\n", tm.tmHeight, tm_orig->tmHeight * scale_y); ok(tm.tmAscent == tm_orig->tmAscent * scale_y, "%d != %d\n", tm.tmAscent, tm_orig->tmAscent * scale_y); ok(tm.tmDescent == tm_orig->tmDescent * scale_y, "%d != %d\n", tm.tmDescent, tm_orig->tmDescent * scale_y); ok(tm.tmAveCharWidth == tm_orig->tmAveCharWidth * scale_x, "%d != %d\n", tm.tmAveCharWidth, tm_orig->tmAveCharWidth * scale_x); GetTextExtentPoint32A(hdc, test_str, test_str_len, &size); ok(size.cx == size_orig->cx * scale_x, "%d != %d\n", size.cx, size_orig->cx * scale_x); ok(size.cy == size_orig->cy * scale_y, "%d != %d\n", size.cy, size_orig->cy * scale_y); GetCharWidthA(hdc, 'A', 'A', &width); ok(width == width_orig * scale_x, "%d != %d\n", width, width_orig * scale_x); SelectObject(hdc, old_hfont); } /* see whether GDI scales bitmap font metrics */ static void test_bitmap_font(void) { static const char test_str[11] = "Test String"; HDC hdc; LOGFONTA bitmap_lf; HFONT hfont, old_hfont; TEXTMETRICA tm_orig; SIZE size_orig; INT ret, i, width_orig, height_orig; hdc = GetDC(0); /* "System" has only 1 pixel size defined, otherwise the test breaks */ ret = EnumFontFamiliesA(hdc, "System", font_enum_proc, (LPARAM)&bitmap_lf); if (ret) { ReleaseDC(0, hdc); trace("no bitmap fonts were found, skipping the test\n"); return; } trace("found bitmap font %s, height %d\n", bitmap_lf.lfFaceName, bitmap_lf.lfHeight); height_orig = bitmap_lf.lfHeight; hfont = create_font("bitmap", &bitmap_lf); old_hfont = SelectObject(hdc, hfont); ok(GetTextMetricsA(hdc, &tm_orig), "GetTextMetricsA failed\n"); ok(GetTextExtentPoint32A(hdc, test_str, sizeof(test_str), &size_orig), "GetTextExtentPoint32A failed\n"); ok(GetCharWidthA(hdc, 'A', 'A', &width_orig), "GetCharWidthA failed\n"); SelectObject(hdc, old_hfont); DeleteObject(hfont); /* test fractional scaling */ for (i = 1; i < height_orig; i++) { hfont = create_font("fractional", &bitmap_lf); test_font_metrics(hdc, hfont, test_str, sizeof(test_str), &tm_orig, &size_orig, width_orig, 1, 1); DeleteObject(hfont); } /* test integer scaling 3x2 */ bitmap_lf.lfHeight = height_orig * 2; bitmap_lf.lfWidth *= 3; hfont = create_font("3x2", &bitmap_lf); todo_wine { test_font_metrics(hdc, hfont, test_str, sizeof(test_str), &tm_orig, &size_orig, width_orig, 3, 2); } DeleteObject(hfont); /* test integer scaling 3x3 */ bitmap_lf.lfHeight = height_orig * 3; bitmap_lf.lfWidth = 0; hfont = create_font("3x3", &bitmap_lf); todo_wine { test_font_metrics(hdc, hfont, test_str, sizeof(test_str), &tm_orig, &size_orig, width_orig, 3, 3); } DeleteObject(hfont); ReleaseDC(0, hdc); } static INT CALLBACK find_font_proc(const LOGFONT *elf, const TEXTMETRIC *ntm, DWORD type, LPARAM lParam) { LOGFONT *lf = (LOGFONT *)lParam; if (elf->lfHeight == lf->lfHeight && !strcmp(elf->lfFaceName, lf->lfFaceName)) { *lf = *elf; return 0; /* stop enumeration */ } return 1; /* continue enumeration */ } #define CP1252_BIT 0x00000001 #define CP1250_BIT 0x00000002 #define CP1251_BIT 0x00000004 #define CP1253_BIT 0x00000008 #define CP1254_BIT 0x00000010 #define CP1255_BIT 0x00000020 #define CP1256_BIT 0x00000040 #define CP1257_BIT 0x00000080 #define CP1258_BIT 0x00000100 #define CP874_BIT 0x00010000 #define CP932_BIT 0x00020000 #define CP936_BIT 0x00040000 #define CP949_BIT 0x00080000 #define CP950_BIT 0x00100000 static void test_bitmap_font_metrics(void) { static const struct font_data { const char face_name[LF_FACESIZE]; int weight, height, ascent, descent, int_leading, ext_leading; int ave_char_width, max_char_width; DWORD ansi_bitfield; } fd[] = { { "MS Sans Serif", FW_NORMAL, 13, 11, 2, 2, 0, 5, 11, CP1252_BIT | CP1250_BIT | CP1251_BIT }, { "MS Sans Serif", FW_NORMAL, 16, 13, 3, 3, 0, 7, 14, CP1252_BIT | CP1250_BIT | CP1251_BIT }, { "MS Sans Serif", FW_NORMAL, 20, 16, 4, 4, 0, 8, 16, CP1252_BIT | CP1251_BIT }, { "MS Sans Serif", FW_NORMAL, 20, 16, 4, 4, 0, 8, 18, CP1250_BIT }, { "MS Sans Serif", FW_NORMAL, 24, 19, 5, 6, 0, 9, 19, CP1252_BIT }, { "MS Sans Serif", FW_NORMAL, 24, 19, 5, 6, 0, 9, 24, CP1250_BIT }, { "MS Sans Serif", FW_NORMAL, 24, 19, 5, 6, 0, 9, 20, CP1251_BIT }, { "MS Sans Serif", FW_NORMAL, 29, 23, 6, 5, 0, 12, 24, CP1252_BIT }, { "MS Sans Serif", FW_NORMAL, 29, 23, 6, 6, 0, 12, 24, CP1250_BIT }, { "MS Sans Serif", FW_NORMAL, 29, 23, 6, 5, 0, 12, 25, CP1251_BIT }, { "MS Sans Serif", FW_NORMAL, 37, 29, 8, 5, 0, 16, 32, CP1252_BIT | CP1250_BIT | CP1251_BIT }, { "MS Serif", FW_NORMAL, 10, 8, 2, 2, 0, 4, 8, CP1252_BIT | CP1250_BIT }, { "MS Serif", FW_NORMAL, 10, 8, 2, 2, 0, 5, 8, CP1251_BIT }, { "MS Serif", FW_NORMAL, 11, 9, 2, 2, 0, 5, 9, CP1252_BIT | CP1250_BIT | CP1251_BIT }, { "MS Serif", FW_NORMAL, 13, 11, 2, 2, 0, 5, 11, CP1252_BIT }, { "MS Serif", FW_NORMAL, 13, 11, 2, 2, 0, 5, 12, CP1250_BIT | CP1251_BIT }, { "MS Serif", FW_NORMAL, 16, 13, 3, 3, 0, 6, 14, CP1252_BIT | CP1250_BIT }, { "MS Serif", FW_NORMAL, 16, 13, 3, 3, 0, 6, 16, CP1251_BIT }, { "MS Serif", FW_NORMAL, 19, 15, 4, 3, 0, 8, 18, CP1252_BIT | CP1250_BIT }, { "MS Serif", FW_NORMAL, 19, 15, 4, 3, 0, 8, 19, CP1251_BIT }, { "MS Serif", FW_NORMAL, 21, 16, 5, 3, 0, 9, 17, CP1252_BIT }, { "MS Serif", FW_NORMAL, 21, 16, 5, 3, 0, 9, 22, CP1250_BIT }, { "MS Serif", FW_NORMAL, 21, 16, 5, 3, 0, 9, 23, CP1251_BIT }, { "MS Serif", FW_NORMAL, 27, 21, 6, 3, 0, 12, 23, CP1252_BIT }, { "MS Serif", FW_NORMAL, 27, 21, 6, 3, 0, 12, 26, CP1250_BIT }, { "MS Serif", FW_NORMAL, 27, 21, 6, 3, 0, 12, 27, CP1251_BIT }, { "MS Serif", FW_NORMAL, 35, 27, 8, 3, 0, 16, 33, CP1252_BIT | CP1250_BIT }, { "MS Serif", FW_NORMAL, 35, 27, 8, 3, 0, 16, 34, CP1251_BIT }, { "Courier", FW_NORMAL, 13, 11, 2, 0, 0, 8, 8, CP1252_BIT | CP1250_BIT | CP1251_BIT }, { "Courier", FW_NORMAL, 16, 13, 3, 0, 0, 9, 9, CP1252_BIT | CP1250_BIT | CP1251_BIT }, { "Courier", FW_NORMAL, 20, 16, 4, 0, 0, 12, 12, CP1252_BIT | CP1250_BIT | CP1251_BIT }, { "System", FW_BOLD, 16, 13, 3, 3, 0, 7, 14, CP1252_BIT }, { "System", FW_BOLD, 16, 13, 3, 3, 0, 7, 15, CP1250_BIT | CP1251_BIT }, { "Small Fonts", FW_NORMAL, 3, 2, 1, 0, 0, 1, 2, CP1252_BIT}, { "Small Fonts", FW_NORMAL, 3, 2, 1, 0, 0, 1, 8, CP1250_BIT | CP1251_BIT }, { "Small Fonts", FW_NORMAL, 5, 4, 1, 1, 0, 3, 4, CP1252_BIT }, { "Small Fonts", FW_NORMAL, 5, 4, 1, 1, 0, 2, 8, CP1250_BIT | CP1251_BIT }, { "Small Fonts", FW_NORMAL, 6, 5, 1, 1, 0, 3, 13, CP1252_BIT }, { "Small Fonts", FW_NORMAL, 6, 5, 1, 1, 0, 3, 8, CP1250_BIT | CP1251_BIT }, { "Small Fonts", FW_NORMAL, 8, 7, 1, 1, 0, 4, 7, CP1252_BIT }, { "Small Fonts", FW_NORMAL, 8, 7, 1, 1, 0, 4, 8, CP1250_BIT | CP1251_BIT }, { "Small Fonts", FW_NORMAL, 10, 8, 2, 2, 0, 4, 8, CP1252_BIT | CP1250_BIT }, { "Small Fonts", FW_NORMAL, 10, 8, 2, 2, 0, 5, 8, CP1251_BIT }, { "Small Fonts", FW_NORMAL, 11, 9, 2, 2, 0, 5, 9, CP1252_BIT | CP1250_BIT | CP1251_BIT }, { "Fixedsys", FW_NORMAL, 15, 12, 3, 3, 0, 8, 8, CP1252_BIT | CP1250_BIT }, { "Fixedsys", FW_NORMAL, 16, 12, 4, 3, 0, 8, 8, CP1251_BIT } /* FIXME: add "Terminal" */ }; HDC hdc; LOGFONT lf; HFONT hfont, old_hfont; TEXTMETRIC tm; INT ret, i; hdc = CreateCompatibleDC(0); assert(hdc); for (i = 0; i < sizeof(fd)/sizeof(fd[0]); i++) { int bit; memset(&lf, 0, sizeof(lf)); lf.lfHeight = fd[i].height; strcpy(lf.lfFaceName, fd[i].face_name); for(bit = 0; bit < 32; bit++) { DWORD fs[2]; CHARSETINFO csi; fs[0] = 1L << bit; fs[1] = 0; if((fd[i].ansi_bitfield & fs[0]) == 0) continue; if(!TranslateCharsetInfo( fs, &csi, TCI_SRCFONTSIG )) continue; lf.lfCharSet = csi.ciCharset; ret = EnumFontFamiliesEx(hdc, &lf, find_font_proc, (LPARAM)&lf, 0); if (ret) continue; trace("found font %s, height %d charset %x\n", lf.lfFaceName, lf.lfHeight, lf.lfCharSet); hfont = create_font(lf.lfFaceName, &lf); old_hfont = SelectObject(hdc, hfont); ok(GetTextMetrics(hdc, &tm), "GetTextMetrics error %d\n", GetLastError()); ok(tm.tmWeight == fd[i].weight, "%s(%d): tm.tmWeight %d != %d\n", fd[i].face_name, fd[i].height, tm.tmWeight, fd[i].weight); ok(tm.tmHeight == fd[i].height, "%s(%d): tm.tmHeight %d != %d\n", fd[i].face_name, fd[i].height, tm.tmHeight, fd[i].height); ok(tm.tmAscent == fd[i].ascent, "%s(%d): tm.tmAscent %d != %d\n", fd[i].face_name, fd[i].height, tm.tmAscent, fd[i].ascent); ok(tm.tmDescent == fd[i].descent, "%s(%d): tm.tmDescent %d != %d\n", fd[i].face_name, fd[i].height, tm.tmDescent, fd[i].descent); ok(tm.tmInternalLeading == fd[i].int_leading, "%s(%d): tm.tmInternalLeading %d != %d\n", fd[i].face_name, fd[i].height, tm.tmInternalLeading, fd[i].int_leading); ok(tm.tmExternalLeading == fd[i].ext_leading, "%s(%d): tm.tmExternalLeading %d != %d\n", fd[i].face_name, fd[i].height, tm.tmExternalLeading, fd[i].ext_leading); ok(tm.tmAveCharWidth == fd[i].ave_char_width, "%s(%d): tm.tmAveCharWidth %d != %d\n", fd[i].face_name, fd[i].height, tm.tmAveCharWidth, fd[i].ave_char_width); /* Don't run the max char width test on System/ANSI_CHARSET. We have extra characters in our font that make the max width bigger */ if(strcmp(lf.lfFaceName, "System") || lf.lfCharSet != ANSI_CHARSET) ok(tm.tmMaxCharWidth == fd[i].max_char_width, "%s(%d): tm.tmMaxCharWidth %d != %d\n", fd[i].face_name, fd[i].height, tm.tmMaxCharWidth, fd[i].max_char_width); SelectObject(hdc, old_hfont); DeleteObject(hfont); } } DeleteDC(hdc); } static void test_GdiGetCharDimensions(void) { HDC hdc; TEXTMETRICW tm; LONG ret; SIZE size; LONG avgwidth, height; static const char szAlphabet[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"; if (!pGdiGetCharDimensions) { skip("GdiGetCharDimensions not available on this platform\n"); return; } hdc = CreateCompatibleDC(NULL); GetTextExtentPoint(hdc, szAlphabet, strlen(szAlphabet), &size); avgwidth = ((size.cx / 26) + 1) / 2; ret = pGdiGetCharDimensions(hdc, &tm, &height); ok(ret == avgwidth, "GdiGetCharDimensions should have returned width of %d instead of %d\n", avgwidth, ret); ok(height == tm.tmHeight, "GdiGetCharDimensions should have set height to %d instead of %d\n", tm.tmHeight, height); ret = pGdiGetCharDimensions(hdc, &tm, NULL); ok(ret == avgwidth, "GdiGetCharDimensions should have returned width of %d instead of %d\n", avgwidth, ret); ret = pGdiGetCharDimensions(hdc, NULL, NULL); ok(ret == avgwidth, "GdiGetCharDimensions should have returned width of %d instead of %d\n", avgwidth, ret); height = 0; ret = pGdiGetCharDimensions(hdc, NULL, &height); ok(ret == avgwidth, "GdiGetCharDimensions should have returned width of %d instead of %d\n", avgwidth, ret); ok(height == size.cy, "GdiGetCharDimensions should have set height to %d instead of %d\n", size.cy, height); DeleteDC(hdc); } static void test_GetCharABCWidthsW(void) { BOOL ret; ABC abc[1]; if (!pGetCharABCWidthsW) return; ret = pGetCharABCWidthsW(NULL, 'a', 'a', abc); ok(!ret, "GetCharABCWidthsW should have returned FALSE\n"); } static void test_text_extents(void) { static const WCHAR wt[] = {'O','n','e','\n','t','w','o',' ','3',0}; LPINT extents; INT i, len, fit1, fit2; LOGFONTA lf; TEXTMETRICA tm; HDC hdc; HFONT hfont; SIZE sz; SIZE sz1, sz2; memset(&lf, 0, sizeof(lf)); strcpy(lf.lfFaceName, "Arial"); lf.lfHeight = 20; hfont = CreateFontIndirectA(&lf); hdc = GetDC(0); hfont = SelectObject(hdc, hfont); GetTextMetricsA(hdc, &tm); GetTextExtentPointA(hdc, "o", 1, &sz); ok(sz.cy == tm.tmHeight, "cy %d tmHeight %d\n", sz.cy, tm.tmHeight); SetLastError(0xdeadbeef); GetTextExtentExPointW(hdc, wt, 1, 1, &fit1, &fit2, &sz1); if (GetLastError() == ERROR_CALL_NOT_IMPLEMENTED) { skip("Skipping remainder of text extents test on a Win9x platform\n"); hfont = SelectObject(hdc, hfont); DeleteObject(hfont); ReleaseDC(0, hdc); return; } len = lstrlenW(wt); extents = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, len * sizeof extents[0]); extents[0] = 1; /* So that the increasing sequence test will fail if the extents array is untouched. */ GetTextExtentExPointW(hdc, wt, len, 32767, &fit1, extents, &sz1); GetTextExtentPointW(hdc, wt, len, &sz2); ok(sz1.cy == sz2.cy, "cy from GetTextExtentExPointW (%d) and GetTextExtentPointW (%d) differ\n", sz1.cy, sz2.cy); /* Because of the '\n' in the string GetTextExtentExPoint and GetTextExtentPoint return different widths under Win2k, but under WinXP they return the same width. So we don't test that here. */ for (i = 1; i < len; ++i) ok(extents[i-1] <= extents[i], "GetTextExtentExPointW generated a non-increasing sequence of partial extents (at position %d)\n", i); ok(extents[len-1] == sz1.cx, "GetTextExtentExPointW extents and size don't match\n"); ok(0 <= fit1 && fit1 <= len, "GetTextExtentExPointW generated illegal value %d for fit\n", fit1); ok(0 < fit1, "GetTextExtentExPointW says we can't even fit one letter in 32767 logical units\n"); GetTextExtentExPointW(hdc, wt, len, extents[2], &fit2, NULL, &sz2); ok(sz1.cx == sz2.cx && sz1.cy == sz2.cy, "GetTextExtentExPointW returned different sizes for the same string\n"); ok(fit2 == 3, "GetTextExtentExPointW extents isn't consistent with fit\n"); GetTextExtentExPointW(hdc, wt, len, extents[2]-1, &fit2, NULL, &sz2); ok(fit2 == 2, "GetTextExtentExPointW extents isn't consistent with fit\n"); GetTextExtentExPointW(hdc, wt, 2, 0, NULL, extents + 2, &sz2); ok(extents[0] == extents[2] && extents[1] == extents[3], "GetTextExtentExPointW with lpnFit == NULL returns incorrect results\n"); GetTextExtentExPointW(hdc, wt, 2, 0, NULL, NULL, &sz1); ok(sz1.cx == sz2.cx && sz1.cy == sz2.cy, "GetTextExtentExPointW with lpnFit and alpDx both NULL returns incorrect results\n"); HeapFree(GetProcessHeap(), 0, extents); hfont = SelectObject(hdc, hfont); DeleteObject(hfont); ReleaseDC(NULL, hdc); } static void test_GetGlyphIndices(void) { HDC hdc; HFONT hfont; DWORD charcount; LOGFONTA lf; DWORD flags = 0; WCHAR testtext[] = {'T','e','s','t',0xffff,0}; WORD glyphs[(sizeof(testtext)/2)-1]; TEXTMETRIC textm; if (!pGetGlyphIndicesW) { skip("GetGlyphIndices not available on platform\n"); return; } if(!is_font_installed("Symbol")) { skip("Symbol is not installed so skipping this test\n"); return; } memset(&lf, 0, sizeof(lf)); strcpy(lf.lfFaceName, "Symbol"); lf.lfHeight = 20; hfont = CreateFontIndirectA(&lf); hdc = GetDC(0); ok(GetTextMetrics(hdc, &textm), "GetTextMetric failed\n"); flags |= GGI_MARK_NONEXISTING_GLYPHS; charcount = pGetGlyphIndicesW(hdc, testtext, (sizeof(testtext)/2)-1, glyphs, flags); ok(charcount == 5, "GetGlyphIndices count of glyphs should = 5 not %d\n", charcount); ok(glyphs[4] == 0x001f, "GetGlyphIndices should have returned a nonexistent char not %04x\n", glyphs[4]); flags = 0; charcount = pGetGlyphIndicesW(hdc, testtext, (sizeof(testtext)/2)-1, glyphs, flags); ok(charcount == 5, "GetGlyphIndices count of glyphs should = 5 not %d\n", charcount); ok(glyphs[4] == textm.tmDefaultChar, "GetGlyphIndices should have returned a %04x not %04x\n", textm.tmDefaultChar, glyphs[4]); } static void test_GetKerningPairs(void) { static const struct kerning_data { const char face_name[LF_FACESIZE]; LONG height; /* some interesting fields from OUTLINETEXTMETRIC */ LONG tmHeight, tmAscent, tmDescent; UINT otmEMSquare; INT otmAscent; INT otmDescent; UINT otmLineGap; UINT otmsCapEmHeight; UINT otmsXHeight; INT otmMacAscent; INT otmMacDescent; UINT otmMacLineGap; UINT otmusMinimumPPEM; /* small subset of kerning pairs to test */ DWORD total_kern_pairs; const KERNINGPAIR kern_pair[26]; } kd[] = { {"Arial", 12, 12, 9, 3, 2048, 7, -2, 1, 5, 2, 8, -2, 0, 9, 26, { {' ','A',-1},{' ','T',0},{' ','Y',0},{'1','1',-1}, {'A',' ',-1},{'A','T',-1},{'A','V',-1},{'A','W',0}, {'A','Y',-1},{'A','v',0},{'A','w',0},{'A','y',0}, {'F',',',-1},{'F','.',-1},{'F','A',-1},{'L',' ',0}, {'L','T',-1},{'L','V',-1},{'L','W',-1},{'L','Y',-1}, {915,912,+1},{915,913,-1},{910,912,+1},{910,913,-1}, {933,970,+1},{933,972,-1} } }, {"Arial", -34, 39, 32, 7, 2048, 25, -7, 5, 17, 9, 31, -7, 1, 9, 26, { {' ','A',-2},{' ','T',-1},{' ','Y',-1},{'1','1',-3}, {'A',' ',-2},{'A','T',-3},{'A','V',-3},{'A','W',-1}, {'A','Y',-3},{'A','v',-1},{'A','w',-1},{'A','y',-1}, {'F',',',-4},{'F','.',-4},{'F','A',-2},{'L',' ',-1}, {'L','T',-3},{'L','V',-3},{'L','W',-3},{'L','Y',-3}, {915,912,+3},{915,913,-3},{910,912,+3},{910,913,-3}, {933,970,+2},{933,972,-3} } }, { "Arial", 120, 120, 97, 23, 2048, 79, -23, 16, 54, 27, 98, -23, 4, 9, 26, { {' ','A',-6},{' ','T',-2},{' ','Y',-2},{'1','1',-8}, {'A',' ',-6},{'A','T',-8},{'A','V',-8},{'A','W',-4}, {'A','Y',-8},{'A','v',-2},{'A','w',-2},{'A','y',-2}, {'F',',',-12},{'F','.',-12},{'F','A',-6},{'L',' ',-4}, {'L','T',-8},{'L','V',-8},{'L','W',-8},{'L','Y',-8}, {915,912,+9},{915,913,-10},{910,912,+9},{910,913,-8}, {933,970,+6},{933,972,-10} } }, #if 0 /* this set fails due to +1/-1 errors (rounding bug?), needs investigation. */ { "Arial", 1024 /* usually 1/2 of EM Square */, 1024, 830, 194, 2048, 668, -193, 137, 459, 229, 830, -194, 30, 9, 26, { {' ','A',-51},{' ','T',-17},{' ','Y',-17},{'1','1',-68}, {'A',' ',-51},{'A','T',-68},{'A','V',-68},{'A','W',-34}, {'A','Y',-68},{'A','v',-17},{'A','w',-17},{'A','y',-17}, {'F',',',-102},{'F','.',-102},{'F','A',-51},{'L',' ',-34}, {'L','T',-68},{'L','V',-68},{'L','W',-68},{'L','Y',-68}, {915,912,+73},{915,913,-84},{910,912,+76},{910,913,-68}, {933,970,+54},{933,972,-83} } } #endif }; LOGFONT lf; HFONT hfont, hfont_old; KERNINGPAIR *kern_pair; HDC hdc; DWORD total_kern_pairs, ret, i, n, matches; hdc = GetDC(0); /* GetKerningPairsA maps unicode set of kerning pairs to current code page * which may render this test unusable, so we're trying to avoid that. */ SetLastError(0xdeadbeef); GetKerningPairsW(hdc, 0, NULL); if (GetLastError() == ERROR_CALL_NOT_IMPLEMENTED) { skip("Skipping the GetKerningPairs test on a Win9x platform\n"); ReleaseDC(0, hdc); return; } for (i = 0; i < sizeof(kd)/sizeof(kd[0]); i++) { OUTLINETEXTMETRICW otm; if (!is_font_installed(kd[i].face_name)) { trace("%s is not installed so skipping this test\n", kd[i].face_name); continue; } trace("testing font %s, height %d\n", kd[i].face_name, kd[i].height); memset(&lf, 0, sizeof(lf)); strcpy(lf.lfFaceName, kd[i].face_name); lf.lfHeight = kd[i].height; hfont = CreateFontIndirect(&lf); assert(hfont != 0); hfont_old = SelectObject(hdc, hfont); SetLastError(0xdeadbeef); otm.otmSize = sizeof(otm); /* just in case for Win9x compatibility */ ok(GetOutlineTextMetricsW(hdc, sizeof(otm), &otm) == sizeof(otm), "GetOutlineTextMetricsW error %d\n", GetLastError()); ok(kd[i].tmHeight == otm.otmTextMetrics.tmHeight, "expected %d, got %d\n", kd[i].tmHeight, otm.otmTextMetrics.tmHeight); ok(kd[i].tmAscent == otm.otmTextMetrics.tmAscent, "expected %d, got %d\n", kd[i].tmAscent, otm.otmTextMetrics.tmAscent); ok(kd[i].tmDescent == otm.otmTextMetrics.tmDescent, "expected %d, got %d\n", kd[i].tmDescent, otm.otmTextMetrics.tmDescent); ok(kd[i].otmEMSquare == otm.otmEMSquare, "expected %u, got %u\n", kd[i].otmEMSquare, otm.otmEMSquare); ok(kd[i].otmAscent == otm.otmAscent, "expected %d, got %d\n", kd[i].otmAscent, otm.otmAscent); ok(kd[i].otmDescent == otm.otmDescent, "expected %d, got %d\n", kd[i].otmDescent, otm.otmDescent); ok(kd[i].otmLineGap == otm.otmLineGap, "expected %u, got %u\n", kd[i].otmLineGap, otm.otmLineGap); todo_wine { ok(kd[i].otmsCapEmHeight == otm.otmsCapEmHeight, "expected %u, got %u\n", kd[i].otmsCapEmHeight, otm.otmsCapEmHeight); ok(kd[i].otmsXHeight == otm.otmsXHeight, "expected %u, got %u\n", kd[i].otmsXHeight, otm.otmsXHeight); ok(kd[i].otmMacAscent == otm.otmMacAscent, "expected %d, got %d\n", kd[i].otmMacAscent, otm.otmMacAscent); ok(kd[i].otmMacDescent == otm.otmMacDescent, "expected %d, got %d\n", kd[i].otmMacDescent, otm.otmMacDescent); /* FIXME: this one sometimes succeeds due to expected 0, enable it when removing todo */ if (0) ok(kd[i].otmMacLineGap == otm.otmMacLineGap, "expected %u, got %u\n", kd[i].otmMacLineGap, otm.otmMacLineGap); ok(kd[i].otmusMinimumPPEM == otm.otmusMinimumPPEM, "expected %u, got %u\n", kd[i].otmusMinimumPPEM, otm.otmusMinimumPPEM); } total_kern_pairs = GetKerningPairsW(hdc, 0, NULL); trace("total_kern_pairs %u\n", total_kern_pairs); kern_pair = HeapAlloc(GetProcessHeap(), 0, total_kern_pairs * sizeof(*kern_pair)); #if 0 /* Win98 (GetKerningPairsA) and XP behave differently here, the test passes on XP */ SetLastError(0xdeadbeef); ret = GetKerningPairsW(hdc, 0, kern_pair); ok(GetLastError() == ERROR_INVALID_PARAMETER, "got error %ld, expected ERROR_INVALID_PARAMETER\n", GetLastError()); ok(ret == 0, "got %lu, expected 0\n", ret); #endif ret = GetKerningPairsW(hdc, 100, NULL); ok(ret == total_kern_pairs, "got %u, expected %u\n", ret, total_kern_pairs); ret = GetKerningPairsW(hdc, total_kern_pairs/2, kern_pair); ok(ret == total_kern_pairs/2, "got %u, expected %u\n", ret, total_kern_pairs/2); ret = GetKerningPairsW(hdc, total_kern_pairs, kern_pair); ok(ret == total_kern_pairs, "got %u, expected %u\n", ret, total_kern_pairs); matches = 0; for (n = 0; n < ret; n++) { DWORD j; #if 0 if (kern_pair[n].wFirst < 127 && kern_pair[n].wSecond < 127) trace("{'%c','%c',%d},\n", kern_pair[n].wFirst, kern_pair[n].wSecond, kern_pair[n].iKernAmount); #endif for (j = 0; j < kd[i].total_kern_pairs; j++) { if (kern_pair[n].wFirst == kd[i].kern_pair[j].wFirst && kern_pair[n].wSecond == kd[i].kern_pair[j].wSecond) { ok(kern_pair[n].iKernAmount == kd[i].kern_pair[j].iKernAmount, "pair %d:%d got %d, expected %d\n", kern_pair[n].wFirst, kern_pair[n].wSecond, kern_pair[n].iKernAmount, kd[i].kern_pair[j].iKernAmount); matches++; } } } ok(matches == kd[i].total_kern_pairs, "got matches %u, expected %u\n", matches, kd[i].total_kern_pairs); HeapFree(GetProcessHeap(), 0, kern_pair); SelectObject(hdc, hfont_old); DeleteObject(hfont); } ReleaseDC(0, hdc); } static void test_GetOutlineTextMetrics(void) { OUTLINETEXTMETRIC *otm; LOGFONT lf; HFONT hfont, hfont_old; HDC hdc; DWORD ret, otm_size; if (!is_font_installed("Arial")) { skip("Arial is not installed\n"); return; } hdc = GetDC(0); memset(&lf, 0, sizeof(lf)); strcpy(lf.lfFaceName, "Arial"); lf.lfHeight = -13; lf.lfWeight = FW_NORMAL; lf.lfPitchAndFamily = DEFAULT_PITCH; lf.lfQuality = PROOF_QUALITY; hfont = CreateFontIndirect(&lf); assert(hfont != 0); hfont_old = SelectObject(hdc, hfont); otm_size = GetOutlineTextMetrics(hdc, 0, NULL); trace("otm buffer size %u (0x%x)\n", otm_size, otm_size); otm = HeapAlloc(GetProcessHeap(), 0, otm_size); memset(otm, 0xAA, otm_size); SetLastError(0xdeadbeef); otm->otmSize = sizeof(*otm); /* just in case for Win9x compatibility */ ret = GetOutlineTextMetrics(hdc, otm->otmSize, otm); ok(ret == 1 /* Win9x */ || ret == otm->otmSize /* XP*/, "expected %u, got %u, error %d\n", otm->otmSize, ret, GetLastError()); if (ret != 1) /* Win9x doesn't care about pointing beyond of the buffer */ { ok(otm->otmpFamilyName == NULL, "expected NULL got %p\n", otm->otmpFamilyName); ok(otm->otmpFaceName == NULL, "expected NULL got %p\n", otm->otmpFaceName); ok(otm->otmpStyleName == NULL, "expected NULL got %p\n", otm->otmpStyleName); ok(otm->otmpFullName == NULL, "expected NULL got %p\n", otm->otmpFullName); } memset(otm, 0xAA, otm_size); SetLastError(0xdeadbeef); otm->otmSize = otm_size; /* just in case for Win9x compatibility */ ret = GetOutlineTextMetrics(hdc, otm->otmSize, otm); ok(ret == 1 /* Win9x */ || ret == otm->otmSize /* XP*/, "expected %u, got %u, error %d\n", otm->otmSize, ret, GetLastError()); if (ret != 1) /* Win9x doesn't care about pointing beyond of the buffer */ { ok(otm->otmpFamilyName != NULL, "expected not NULL got %p\n", otm->otmpFamilyName); ok(otm->otmpFaceName != NULL, "expected not NULL got %p\n", otm->otmpFaceName); ok(otm->otmpStyleName != NULL, "expected not NULL got %p\n", otm->otmpStyleName); ok(otm->otmpFullName != NULL, "expected not NULL got %p\n", otm->otmpFullName); } /* ask about truncated data */ memset(otm, 0xAA, otm_size); SetLastError(0xdeadbeef); otm->otmSize = sizeof(*otm) - sizeof(LPSTR); /* just in case for Win9x compatibility */ ret = GetOutlineTextMetrics(hdc, otm->otmSize, otm); ok(ret == 1 /* Win9x */ || ret == otm->otmSize /* XP*/, "expected %u, got %u, error %d\n", otm->otmSize, ret, GetLastError()); if (ret != 1) /* Win9x doesn't care about pointing beyond of the buffer */ { ok(otm->otmpFamilyName == NULL, "expected NULL got %p\n", otm->otmpFamilyName); ok(otm->otmpFaceName == NULL, "expected NULL got %p\n", otm->otmpFaceName); ok(otm->otmpStyleName == NULL, "expected NULL got %p\n", otm->otmpStyleName); } ok(otm->otmpFullName == (LPSTR)0xAAAAAAAA, "expected 0xAAAAAAAA got %p\n", otm->otmpFullName); HeapFree(GetProcessHeap(), 0, otm); SelectObject(hdc, hfont_old); DeleteObject(hfont); ReleaseDC(0, hdc); } static void testJustification(HDC hdc, PSTR str, RECT *clientArea) { INT x, y, breakCount, outputWidth = 0, /* to test TabbedTextOut() */ justifiedWidth = 0, /* to test GetTextExtentExPointW() */ areaWidth = clientArea->right - clientArea->left, nErrors = 0, e; BOOL lastExtent = FALSE; PSTR pFirstChar, pLastChar; SIZE size; TEXTMETRICA tm; struct err { char extent[100]; int GetTextExtentExPointWWidth; int TabbedTextOutWidth; } error[10]; GetTextMetricsA(hdc, &tm); y = clientArea->top; do { breakCount = 0; while (*str == tm.tmBreakChar) str++; /* skip leading break chars */ pFirstChar = str; do { pLastChar = str; /* if not at the end of the string, ... */ if (*str == '\0') break; /* ... add the next word to the current extent */ while (*str != '\0' && *str++ != tm.tmBreakChar); breakCount++; SetTextJustification(hdc, 0, 0); GetTextExtentPoint32(hdc, pFirstChar, str - pFirstChar - 1, &size); } while ((int) size.cx < areaWidth); /* ignore trailing break chars */ breakCount--; while (*(pLastChar - 1) == tm.tmBreakChar) { pLastChar--; breakCount--; } if (*str == '\0' || breakCount <= 0) pLastChar = str; SetTextJustification(hdc, 0, 0); GetTextExtentPoint32(hdc, pFirstChar, pLastChar - pFirstChar, &size); /* do not justify the last extent */ if (*str != '\0' && breakCount > 0) { SetTextJustification(hdc, areaWidth - size.cx, breakCount); GetTextExtentPoint32(hdc, pFirstChar, pLastChar - pFirstChar, &size); justifiedWidth = size.cx; } else lastExtent = TRUE; x = clientArea->left; outputWidth = LOWORD(TabbedTextOut( hdc, x, y, pFirstChar, pLastChar - pFirstChar, 0, NULL, 0)); /* catch errors and report them */ if (!lastExtent && ((outputWidth != areaWidth) || (justifiedWidth != areaWidth))) { memset(error[nErrors].extent, 0, 100); memcpy(error[nErrors].extent, pFirstChar, pLastChar - pFirstChar); error[nErrors].TabbedTextOutWidth = outputWidth; error[nErrors].GetTextExtentExPointWWidth = justifiedWidth; nErrors++; } y += size.cy; str = pLastChar; } while (*str && y < clientArea->bottom); for (e = 0; e < nErrors; e++) { ok(error[e].TabbedTextOutWidth == areaWidth, "The output text (\"%s\") width should be %d, not %d.\n", error[e].extent, areaWidth, error[e].TabbedTextOutWidth); /* The width returned by GetTextExtentPoint32() is exactly the same returned by GetTextExtentExPointW() - see dlls/gdi32/font.c */ ok(error[e].GetTextExtentExPointWWidth == areaWidth, "GetTextExtentPointW() for \"%s\" should have returned a width of %d, not %d.\n", error[e].extent, areaWidth, error[e].GetTextExtentExPointWWidth); } } static void test_SetTextJustification(void) { HDC hdc; RECT clientArea; LOGFONTA lf; HFONT hfont; HWND hwnd; static char testText[] = "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do " "eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut " "enim ad minim veniam, quis nostrud exercitation ullamco laboris " "nisi ut aliquip ex ea commodo consequat. Duis aute irure dolor in " "reprehenderit in voluptate velit esse cillum dolore eu fugiat " "nulla pariatur. Excepteur sint occaecat cupidatat non proident, " "sunt in culpa qui officia deserunt mollit anim id est laborum."; hwnd = CreateWindowExA(0, "static", "", WS_POPUP, 0,0, 400,400, 0, 0, 0, NULL); GetClientRect( hwnd, &clientArea ); hdc = GetDC( hwnd ); memset(&lf, 0, sizeof lf); lf.lfCharSet = ANSI_CHARSET; lf.lfClipPrecision = CLIP_DEFAULT_PRECIS; lf.lfWeight = FW_DONTCARE; lf.lfHeight = 20; lf.lfQuality = DEFAULT_QUALITY; lstrcpyA(lf.lfFaceName, "Times New Roman"); hfont = create_font("Times New Roman", &lf); SelectObject(hdc, hfont); testJustification(hdc, testText, &clientArea); DeleteObject(hfont); ReleaseDC(hwnd, hdc); DestroyWindow(hwnd); } static BOOL get_glyph_indices(INT charset, UINT code_page, WORD *idx, UINT count, BOOL unicode) { HDC hdc; LOGFONTA lf; HFONT hfont, hfont_old; CHARSETINFO csi; FONTSIGNATURE fs; INT cs; DWORD i, ret; char name[64]; assert(count <= 128); memset(&lf, 0, sizeof(lf)); lf.lfCharSet = charset; lf.lfHeight = 10; lstrcpyA(lf.lfFaceName, "Arial"); SetLastError(0xdeadbeef); hfont = CreateFontIndirectA(&lf); ok(hfont != 0, "CreateFontIndirectA error %u\n", GetLastError()); hdc = GetDC(0); hfont_old = SelectObject(hdc, hfont); cs = GetTextCharsetInfo(hdc, &fs, 0); ok(cs == charset, "expected %d, got %d\n", charset, cs); SetLastError(0xdeadbeef); ret = GetTextFace(hdc, sizeof(name), name); ok(ret, "GetTextFace error %u\n", GetLastError()); if (charset == SYMBOL_CHARSET) { ok(strcmp("Arial", name), "face name should NOT be Arial\n"); ok(fs.fsCsb[0] & (1 << 31), "symbol encoding should be available\n"); } else { ok(!strcmp("Arial", name), "face name should be Arial, not %s\n", name); ok(!(fs.fsCsb[0] & (1 << 31)), "symbol encoding should NOT be available\n"); } if (!TranslateCharsetInfo((DWORD *)cs, &csi, TCI_SRCCHARSET)) { trace("Can't find codepage for charset %d\n", cs); ReleaseDC(0, hdc); return FALSE; } ok(csi.ciACP == code_page, "expected %d, got %d\n", code_page, csi.ciACP); if (unicode) { char ansi_buf[128]; WCHAR unicode_buf[128]; for (i = 0; i < count; i++) ansi_buf[i] = (BYTE)(i + 128); MultiByteToWideChar(code_page, 0, ansi_buf, count, unicode_buf, count); SetLastError(0xdeadbeef); ret = pGetGlyphIndicesW(hdc, unicode_buf, count, idx, 0); ok(ret == count, "GetGlyphIndicesA error %u\n", GetLastError()); } else { char ansi_buf[128]; for (i = 0; i < count; i++) ansi_buf[i] = (BYTE)(i + 128); SetLastError(0xdeadbeef); ret = pGetGlyphIndicesA(hdc, ansi_buf, count, idx, 0); ok(ret == count, "GetGlyphIndicesA error %u\n", GetLastError()); } SelectObject(hdc, hfont_old); DeleteObject(hfont); ReleaseDC(0, hdc); return TRUE; } static void test_font_charset(void) { static struct charset_data { INT charset; UINT code_page; WORD font_idxA[128], font_idxW[128]; } cd[] = { { ANSI_CHARSET, 1252 }, { RUSSIAN_CHARSET, 1251 }, { SYMBOL_CHARSET, CP_SYMBOL } /* keep it as the last one */ }; int i; if (!pGetGlyphIndicesA || !pGetGlyphIndicesW) { skip("Skipping the font charset test on a Win9x platform\n"); return; } if (!is_font_installed("Arial")) { skip("Arial is not installed\n"); return; } for (i = 0; i < sizeof(cd)/sizeof(cd[0]); i++) { if (cd[i].charset == SYMBOL_CHARSET) { if (!is_font_installed("Symbol") && !is_font_installed("Wingdings")) { skip("Symbol or Wingdings is not installed\n"); break; } } get_glyph_indices(cd[i].charset, cd[i].code_page, cd[i].font_idxA, 128, FALSE); get_glyph_indices(cd[i].charset, cd[i].code_page, cd[i].font_idxW, 128, TRUE); ok(!memcmp(cd[i].font_idxA, cd[i].font_idxW, 128*sizeof(WORD)), "%d: indices don't match\n", i); } ok(memcmp(cd[0].font_idxW, cd[1].font_idxW, 128*sizeof(WORD)), "0 vs 1: indices shouldn't match\n"); if (i > 2) { ok(memcmp(cd[0].font_idxW, cd[2].font_idxW, 128*sizeof(WORD)), "0 vs 2: indices shouldn't match\n"); ok(memcmp(cd[1].font_idxW, cd[2].font_idxW, 128*sizeof(WORD)), "1 vs 2: indices shouldn't match\n"); } else skip("Symbol or Wingdings is not installed\n"); } static void test_GetFontUnicodeRanges(void) { LOGFONTA lf; HDC hdc; HFONT hfont, hfont_old; DWORD size; GLYPHSET *gs; if (!pGetFontUnicodeRanges) { skip("GetFontUnicodeRanges not available before W2K\n"); return; } memset(&lf, 0, sizeof(lf)); lstrcpyA(lf.lfFaceName, "Arial"); hfont = create_font("Arial", &lf); hdc = GetDC(0); hfont_old = SelectObject(hdc, hfont); size = pGetFontUnicodeRanges(NULL, NULL); ok(!size, "GetFontUnicodeRanges succeeded unexpectedly\n"); size = pGetFontUnicodeRanges(hdc, NULL); ok(size, "GetFontUnicodeRanges failed unexpectedly\n"); gs = HeapAlloc(GetProcessHeap(), 0, size); size = pGetFontUnicodeRanges(hdc, gs); ok(size, "GetFontUnicodeRanges failed\n"); #if 0 for (i = 0; i < gs->cRanges; i++) trace("%03d wcLow %04x cGlyphs %u\n", i, gs->ranges[i].wcLow, gs->ranges[i].cGlyphs); #endif trace("found %u ranges\n", gs->cRanges); HeapFree(GetProcessHeap(), 0, gs); SelectObject(hdc, hfont_old); DeleteObject(hfont); ReleaseDC(NULL, hdc); } #define MAX_ENUM_FONTS 256 struct enum_font_data { int total; LOGFONT lf[MAX_ENUM_FONTS]; }; static INT CALLBACK arial_enum_proc(const LOGFONT *lf, const TEXTMETRIC *tm, DWORD type, LPARAM lParam) { struct enum_font_data *efd = (struct enum_font_data *)lParam; if (type != TRUETYPE_FONTTYPE) return 1; #if 0 trace("enumed font \"%s\", charset %d, weight %d, italic %d\n", lf->lfFaceName, lf->lfCharSet, lf->lfWeight, lf->lfItalic); #endif if (efd->total < MAX_ENUM_FONTS) efd->lf[efd->total++] = *lf; return 1; } static void get_charset_stats(struct enum_font_data *efd, int *ansi_charset, int *symbol_charset, int *russian_charset) { int i; *ansi_charset = 0; *symbol_charset = 0; *russian_charset = 0; for (i = 0; i < efd->total; i++) { switch (efd->lf[i].lfCharSet) { case ANSI_CHARSET: (*ansi_charset)++; break; case SYMBOL_CHARSET: (*symbol_charset)++; break; case RUSSIAN_CHARSET: (*russian_charset)++; break; } } } static void test_EnumFontFamilies(const char *font_name, INT font_charset) { struct enum_font_data efd; LOGFONT lf; HDC hdc; int i, ret, ansi_charset, symbol_charset, russian_charset; trace("Testing font %s, charset %d\n", *font_name ? font_name : "", font_charset); if (*font_name && !is_truetype_font_installed(font_name)) { skip("%s is not installed\n", font_name); return; } hdc = GetDC(0); /* Observed behaviour: EnumFontFamilies enumerates aliases like "Arial Cyr" * while EnumFontFamiliesEx doesn't. */ if (!*font_name && font_charset == DEFAULT_CHARSET) /* do it only once */ { efd.total = 0; SetLastError(0xdeadbeef); ret = EnumFontFamilies(hdc, NULL, arial_enum_proc, (LPARAM)&efd); ok(ret, "EnumFontFamilies error %u\n", GetLastError()); get_charset_stats(&efd, &ansi_charset, &symbol_charset, &russian_charset); trace("enumerated ansi %d, symbol %d, russian %d fonts for NULL\n", ansi_charset, symbol_charset, russian_charset); ok(efd.total > 0, "no fonts enumerated: NULL\n"); ok(ansi_charset > 0, "NULL family should enumerate ANSI_CHARSET\n"); ok(symbol_charset > 0, "NULL family should enumerate SYMBOL_CHARSET\n"); ok(russian_charset > 0, "NULL family should enumerate RUSSIAN_CHARSET\n"); } efd.total = 0; SetLastError(0xdeadbeef); ret = EnumFontFamilies(hdc, font_name, arial_enum_proc, (LPARAM)&efd); ok(ret, "EnumFontFamilies error %u\n", GetLastError()); get_charset_stats(&efd, &ansi_charset, &symbol_charset, &russian_charset); trace("enumerated ansi %d, symbol %d, russian %d fonts for %s\n", ansi_charset, symbol_charset, russian_charset, *font_name ? font_name : ""); if (*font_name) ok(efd.total > 0, "no fonts enumerated: %s\n", font_name); else ok(!efd.total, "no fonts should be enumerated for empty font_name\n"); for (i = 0; i < efd.total; i++) { /* FIXME: remove completely once Wine is fixed */ if (efd.lf[i].lfCharSet != font_charset) { todo_wine ok(efd.lf[i].lfCharSet == font_charset, "%d: got charset %d\n", i, efd.lf[i].lfCharSet); } else ok(efd.lf[i].lfCharSet == font_charset, "%d: got charset %d\n", i, efd.lf[i].lfCharSet); ok(!lstrcmp(efd.lf[i].lfFaceName, font_name), "expected %s, got %s\n", font_name, efd.lf[i].lfFaceName); } memset(&lf, 0, sizeof(lf)); lf.lfCharSet = ANSI_CHARSET; lstrcpy(lf.lfFaceName, font_name); efd.total = 0; SetLastError(0xdeadbeef); ret = EnumFontFamiliesEx(hdc, &lf, arial_enum_proc, (LPARAM)&efd, 0); ok(ret, "EnumFontFamiliesEx error %u\n", GetLastError()); get_charset_stats(&efd, &ansi_charset, &symbol_charset, &russian_charset); trace("enumerated ansi %d, symbol %d, russian %d fonts for %s ANSI_CHARSET\n", ansi_charset, symbol_charset, russian_charset, *font_name ? font_name : ""); if (font_charset == SYMBOL_CHARSET) { if (*font_name) ok(efd.total == 0, "no fonts should be enumerated: %s ANSI_CHARSET\n", font_name); else ok(efd.total > 0, "no fonts enumerated: %s\n", font_name); } else { ok(efd.total > 0, "no fonts enumerated: %s ANSI_CHARSET\n", font_name); for (i = 0; i < efd.total; i++) { ok(efd.lf[i].lfCharSet == ANSI_CHARSET, "%d: got charset %d\n", i, efd.lf[i].lfCharSet); if (*font_name) ok(!lstrcmp(efd.lf[i].lfFaceName, font_name), "expected %s, got %s\n", font_name, efd.lf[i].lfFaceName); } } /* DEFAULT_CHARSET should enumerate all available charsets */ memset(&lf, 0, sizeof(lf)); lf.lfCharSet = DEFAULT_CHARSET; lstrcpy(lf.lfFaceName, font_name); efd.total = 0; SetLastError(0xdeadbeef); EnumFontFamiliesEx(hdc, &lf, arial_enum_proc, (LPARAM)&efd, 0); ok(ret, "EnumFontFamiliesEx error %u\n", GetLastError()); get_charset_stats(&efd, &ansi_charset, &symbol_charset, &russian_charset); trace("enumerated ansi %d, symbol %d, russian %d fonts for %s DEFAULT_CHARSET\n", ansi_charset, symbol_charset, russian_charset, *font_name ? font_name : ""); ok(efd.total > 0, "no fonts enumerated: %s DEFAULT_CHARSET\n", font_name); for (i = 0; i < efd.total; i++) { if (*font_name) ok(!lstrcmp(efd.lf[i].lfFaceName, font_name), "expected %s, got %s\n", font_name, efd.lf[i].lfFaceName); } if (*font_name) { switch (font_charset) { case ANSI_CHARSET: ok(ansi_charset > 0, "ANSI_CHARSET should enumerate ANSI_CHARSET for %s\n", font_name); ok(!symbol_charset, "ANSI_CHARSET should NOT enumerate SYMBOL_CHARSET for %s\n", font_name); ok(russian_charset > 0, "ANSI_CHARSET should enumerate RUSSIAN_CHARSET for %s\n", font_name); break; case SYMBOL_CHARSET: ok(!ansi_charset, "SYMBOL_CHARSET should NOT enumerate ANSI_CHARSET for %s\n", font_name); ok(symbol_charset, "SYMBOL_CHARSET should enumerate SYMBOL_CHARSET for %s\n", font_name); ok(!russian_charset, "SYMBOL_CHARSET should NOT enumerate RUSSIAN_CHARSET for %s\n", font_name); break; case DEFAULT_CHARSET: ok(ansi_charset > 0, "DEFAULT_CHARSET should enumerate ANSI_CHARSET for %s\n", font_name); ok(symbol_charset > 0, "DEFAULT_CHARSET should enumerate SYMBOL_CHARSET for %s\n", font_name); ok(russian_charset > 0, "DEFAULT_CHARSET should enumerate RUSSIAN_CHARSET for %s\n", font_name); break; } } else { ok(ansi_charset > 0, "DEFAULT_CHARSET should enumerate ANSI_CHARSET for %s\n", *font_name ? font_name : ""); ok(symbol_charset > 0, "DEFAULT_CHARSET should enumerate SYMBOL_CHARSET for %s\n", *font_name ? font_name : ""); ok(russian_charset > 0, "DEFAULT_CHARSET should enumerate RUSSIAN_CHARSET for %s\n", *font_name ? font_name : ""); } memset(&lf, 0, sizeof(lf)); lf.lfCharSet = SYMBOL_CHARSET; lstrcpy(lf.lfFaceName, font_name); efd.total = 0; SetLastError(0xdeadbeef); EnumFontFamiliesEx(hdc, &lf, arial_enum_proc, (LPARAM)&efd, 0); ok(ret, "EnumFontFamiliesEx error %u\n", GetLastError()); get_charset_stats(&efd, &ansi_charset, &symbol_charset, &russian_charset); trace("enumerated ansi %d, symbol %d, russian %d fonts for %s SYMBOL_CHARSET\n", ansi_charset, symbol_charset, russian_charset, *font_name ? font_name : ""); if (*font_name && font_charset == ANSI_CHARSET) ok(efd.total == 0, "no fonts should be enumerated: %s SYMBOL_CHARSET\n", font_name); else { ok(efd.total > 0, "no fonts enumerated: %s SYMBOL_CHARSET\n", font_name); for (i = 0; i < efd.total; i++) { ok(efd.lf[i].lfCharSet == SYMBOL_CHARSET, "%d: got charset %d\n", i, efd.lf[i].lfCharSet); if (*font_name) ok(!lstrcmp(efd.lf[i].lfFaceName, font_name), "expected %s, got %s\n", font_name, efd.lf[i].lfFaceName); } ok(!ansi_charset, "SYMBOL_CHARSET should NOT enumerate ANSI_CHARSET for %s\n", *font_name ? font_name : ""); ok(symbol_charset > 0, "SYMBOL_CHARSET should enumerate SYMBOL_CHARSET for %s\n", *font_name ? font_name : ""); ok(!russian_charset, "SYMBOL_CHARSET should NOT enumerate RUSSIAN_CHARSET for %s\n", *font_name ? font_name : ""); } ReleaseDC(0, hdc); } /* PANOSE is 10 bytes in size, need to pack the structure properly */ #include "pshpack2.h" typedef struct { USHORT version; SHORT xAvgCharWidth; USHORT usWeightClass; USHORT usWidthClass; SHORT fsType; SHORT ySubscriptXSize; SHORT ySubscriptYSize; SHORT ySubscriptXOffset; SHORT ySubscriptYOffset; SHORT ySuperscriptXSize; SHORT ySuperscriptYSize; SHORT ySuperscriptXOffset; SHORT ySuperscriptYOffset; SHORT yStrikeoutSize; SHORT yStrikeoutPosition; SHORT sFamilyClass; PANOSE panose; ULONG ulUnicodeRange1; ULONG ulUnicodeRange2; ULONG ulUnicodeRange3; ULONG ulUnicodeRange4; CHAR achVendID[4]; USHORT fsSelection; USHORT usFirstCharIndex; USHORT usLastCharIndex; /* According to the Apple spec, original version didn't have the below fields, * version numbers were taked from the OpenType spec. */ /* version 0 (TrueType 1.5) */ USHORT sTypoAscender; USHORT sTypoDescender; USHORT sTypoLineGap; USHORT usWinAscent; USHORT usWinDescent; /* version 1 (TrueType 1.66) */ ULONG ulCodePageRange1; ULONG ulCodePageRange2; /* version 2 (OpenType 1.2) */ SHORT sxHeight; SHORT sCapHeight; USHORT usDefaultChar; USHORT usBreakChar; USHORT usMaxContext; } TT_OS2_V2; #include "poppack.h" #ifdef WORDS_BIGENDIAN #define GET_BE_WORD(x) (x) #else #define GET_BE_WORD(x) MAKEWORD(HIBYTE(x), LOBYTE(x)) #endif #define MS_MAKE_TAG(ch0, ch1, ch2, ch3) \ ((DWORD)(BYTE)(ch0) | ((DWORD)(BYTE)(ch1) << 8) | \ ((DWORD)(BYTE)(ch2) << 16) | ((DWORD)(BYTE)(ch3) << 24)) #define MS_OS2_TAG MS_MAKE_TAG('O','S','/','2') static void test_text_metrics(const LOGFONTA *lf) { HDC hdc; HFONT hfont, hfont_old; TEXTMETRICA tmA; TEXTMETRICW tmW; UINT first_unicode_char, last_unicode_char, default_char, break_char; INT test_char; TT_OS2_V2 tt_os2; USHORT version; LONG size, ret; const char *font_name = lf->lfFaceName; trace("Testing font metrics for %s, charset %d\n", font_name, lf->lfCharSet); hdc = GetDC(0); SetLastError(0xdeadbeef); hfont = CreateFontIndirectA(lf); ok(hfont != 0, "CreateFontIndirect error %u\n", GetLastError()); hfont_old = SelectObject(hdc, hfont); if(lf->lfWidth > 0) { HFONT hfont2, hfont_prev; GLYPHMETRICS gm1, gm2; LOGFONTA lf2 = *lf; MAT2 mat2 = { {0,1}, {0,0}, {0,0}, {0,1} }; /* negative widths are handled just as positive ones */ lf2.lfWidth *= -1; SetLastError(0xdeadbeef); hfont2 = CreateFontIndirectA(&lf2); ok(hfont2 != 0, "CreateFontIndirect error %u\n", GetLastError()); hfont_prev = SelectObject(hdc, hfont2); memset(&gm1, 0xaa, sizeof(gm1)); SetLastError(0xdeadbeef); ret = GetGlyphOutlineA(hdc, 'x', GGO_METRICS, &gm1, 0, NULL, &mat2); ok(ret != GDI_ERROR, "GetGlyphOutline error 0x%x\n", GetLastError()); SelectObject(hdc, hfont_prev); DeleteObject(hfont2); memset(&gm2, 0xbb, sizeof(gm2)); SetLastError(0xdeadbeef); ret = GetGlyphOutlineA(hdc, 'x', GGO_METRICS, &gm2, 0, NULL, &mat2); ok(ret != GDI_ERROR, "GetGlyphOutline error 0x%x\n", GetLastError()); ok(gm1.gmBlackBoxX == gm2.gmBlackBoxX && gm1.gmBlackBoxY == gm2.gmBlackBoxY && gm1.gmptGlyphOrigin.x == gm2.gmptGlyphOrigin.x && gm1.gmptGlyphOrigin.y == gm2.gmptGlyphOrigin.y && gm1.gmCellIncX == gm2.gmCellIncX && gm1.gmCellIncY == gm2.gmCellIncY, "gm1=%d,%d,%d,%d,%d,%d gm2=%d,%d,%d,%d,%d,%d\n", gm1.gmBlackBoxX, gm1.gmBlackBoxY, gm1.gmptGlyphOrigin.x, gm1.gmptGlyphOrigin.y, gm1.gmCellIncX, gm1.gmCellIncY, gm2.gmBlackBoxX, gm2.gmBlackBoxY, gm2.gmptGlyphOrigin.x, gm2.gmptGlyphOrigin.y, gm2.gmCellIncX, gm2.gmCellIncY); } size = GetFontData(hdc, MS_OS2_TAG, 0, NULL, 0); if (size == GDI_ERROR) { trace("OS/2 chunk was not found\n"); goto end_of_test; } if (size > sizeof(tt_os2)) { trace("got too large OS/2 chunk of size %u\n", size); size = sizeof(tt_os2); } memset(&tt_os2, 0, sizeof(tt_os2)); ret = GetFontData(hdc, MS_OS2_TAG, 0, &tt_os2, size); ok(ret == size, "GetFontData should return %u not %u\n", size, ret); version = GET_BE_WORD(tt_os2.version); trace("OS/2 chunk version %u, vendor %4.4s\n", version, (LPCSTR)&tt_os2.achVendID); first_unicode_char = GET_BE_WORD(tt_os2.usFirstCharIndex); last_unicode_char = GET_BE_WORD(tt_os2.usLastCharIndex); default_char = GET_BE_WORD(tt_os2.usDefaultChar); break_char = GET_BE_WORD(tt_os2.usBreakChar); trace("for %s first %x, last %x, default %x, break %x\n", font_name, first_unicode_char, last_unicode_char, default_char, break_char); SetLastError(0xdeadbeef); ret = GetTextMetricsA(hdc, &tmA); ok(ret, "GetTextMetricsA error %u\n", GetLastError()); trace("A: first %x, last %x, default %x, break %x\n", tmA.tmFirstChar, tmA.tmLastChar, tmA.tmDefaultChar, tmA.tmBreakChar); #if 0 /* FIXME: This doesn't appear to be what Windows does */ test_char = min(first_unicode_char - 1, 255); ok(tmA.tmFirstChar == test_char, "A: tmFirstChar for %s %02x != %02x\n", font_name, tmA.tmFirstChar, test_char); #endif if (lf->lfCharSet == SYMBOL_CHARSET) { test_char = min(last_unicode_char - 0xf000, 255); ok(tmA.tmLastChar == test_char, "A: tmLastChar for %s %02x != %02x\n", font_name, tmA.tmLastChar, test_char); } else { test_char = min(last_unicode_char, 255); ok(tmA.tmLastChar == test_char, "A: tmLastChar for %s %02x != %02x\n", font_name, tmA.tmLastChar, test_char); } SetLastError(0xdeadbeef); ret = GetTextMetricsW(hdc, &tmW); ok(ret || GetLastError() == ERROR_CALL_NOT_IMPLEMENTED, "GetTextMetricsW error %u\n", GetLastError()); if (ret) { trace("W: first %x, last %x, default %x, break %x\n", tmW.tmFirstChar, tmW.tmLastChar, tmW.tmDefaultChar, tmW.tmBreakChar); if (lf->lfCharSet == SYMBOL_CHARSET) { /* It appears that for fonts with SYMBOL_CHARSET Windows always * sets symbol range to 0 - f0ff */ ok(tmW.tmFirstChar == 0, "W: tmFirstChar for %s %02x != 0\n", font_name, tmW.tmFirstChar); /* FIXME: Windows returns f0ff here, while Wine f0xx */ ok(tmW.tmLastChar >= 0xf000, "W: tmLastChar for %s %02x < 0xf000\n", font_name, tmW.tmLastChar); ok(tmW.tmDefaultChar == 0x1f, "W: tmDefaultChar for %s %02x != 0x1f\n", font_name, tmW.tmDefaultChar); ok(tmW.tmBreakChar == 0x20, "W: tmBreakChar for %s %02x != 0x20\n", font_name, tmW.tmBreakChar); } else { ok(tmW.tmFirstChar == first_unicode_char, "W: tmFirstChar for %s %02x != %02x\n", font_name, tmW.tmFirstChar, first_unicode_char); ok(tmW.tmLastChar == last_unicode_char, "W: tmLastChar for %s %02x != %02x\n", font_name, tmW.tmLastChar, last_unicode_char); } ret = GetDeviceCaps(hdc, LOGPIXELSX); ok(tmW.tmDigitizedAspectX == ret, "W: tmDigitizedAspectX %u != %u\n", tmW.tmDigitizedAspectX, ret); ret = GetDeviceCaps(hdc, LOGPIXELSY); ok(tmW.tmDigitizedAspectX == ret, "W: tmDigitizedAspectY %u != %u\n", tmW.tmDigitizedAspectX, ret); } end_of_test: SelectObject(hdc, hfont_old); DeleteObject(hfont); ReleaseDC(0, hdc); } static INT CALLBACK enum_truetype_font_proc(const LOGFONT *lf, const TEXTMETRIC *ntm, DWORD type, LPARAM lParam) { INT *enumed = (INT *)lParam; if (type == TRUETYPE_FONTTYPE) { (*enumed)++; test_text_metrics(lf); } return 1; } static void test_GetTextMetrics(void) { LOGFONTA lf; HDC hdc; INT enumed; hdc = GetDC(0); memset(&lf, 0, sizeof(lf)); lf.lfCharSet = DEFAULT_CHARSET; enumed = 0; EnumFontFamiliesExA(hdc, &lf, enum_truetype_font_proc, (LPARAM)&enumed, 0); trace("Tested metrics of %d truetype fonts\n", enumed); ReleaseDC(0, hdc); } static void test_nonexistent_font(void) { LOGFONTA lf; HDC hdc; HFONT hfont; char buf[LF_FACESIZE]; if (!is_truetype_font_installed("Arial Black")) { skip("Arial not installed\n"); return; } hdc = GetDC(0); memset(&lf, 0, sizeof(lf)); lf.lfHeight = 100; lf.lfWeight = FW_REGULAR; lf.lfCharSet = ANSI_CHARSET; lf.lfPitchAndFamily = FF_SWISS; strcpy(lf.lfFaceName, "Nonexistent font"); hfont = CreateFontIndirectA(&lf); hfont = SelectObject(hdc, hfont); GetTextFaceA(hdc, sizeof(buf), buf); ok(!lstrcmpiA(buf, "Arial"), "Got %s\n", buf); DeleteObject(SelectObject(hdc, hfont)); ReleaseDC(0, hdc); } START_TEST(font) { init(); test_logfont(); test_bitmap_font(); test_bitmap_font_metrics(); test_GdiGetCharDimensions(); test_GetCharABCWidthsW(); test_text_extents(); test_GetGlyphIndices(); test_GetKerningPairs(); test_GetOutlineTextMetrics(); test_SetTextJustification(); test_font_charset(); test_GetFontUnicodeRanges(); test_nonexistent_font(); /* On Windows Arial has a lot of default charset aliases such as Arial Cyr, * I'd like to avoid them in this test. */ test_EnumFontFamilies("Arial Black", ANSI_CHARSET); test_EnumFontFamilies("Symbol", SYMBOL_CHARSET); if (is_truetype_font_installed("Arial Black") && (is_truetype_font_installed("Symbol") || is_truetype_font_installed("Wingdings"))) { test_EnumFontFamilies("", ANSI_CHARSET); test_EnumFontFamilies("", SYMBOL_CHARSET); test_EnumFontFamilies("", DEFAULT_CHARSET); } else skip("Arial Black or Symbol/Wingdings is not installed\n"); test_GetTextMetrics(); }