//+---------------------------------------------------------------------------
//
// Copyright (C) Microsoft Corporation, 1994-1995
//
// File: fontlink.cpp
//
// Contents: Wrappers for font link functions.
//
//----------------------------------------------------------------------------
#include "ctlspriv.h"
#ifdef FONT_LINK
#include <mlang.h>
#include "fontlink.h"
#include "unicwrap.h"
#undef DrawTextW
#undef DrawTextExW
#undef ExtTextOutW
#undef TextOutW
#undef GetCharWidthW
#undef GetTextExtentPointW
#undef GetTextExtentPoint32W
#ifndef WINNT
//
// Win9x will crash if uLastChar == 0xFFFF. You can't squeak the width of
// the 0xFFFF character by setting uLastChar to 0x10000, since the Win16
// thunk will truncate it to 0x0000, and then the validation layer will
// reject the request since uLastChar > uFirstChar.
//
// So assume that the width of 0xFFFF is equal to the width of 0xFFFE.
// Both are invalid unicode characters, so hopefully the widths are the same.
//
BOOL SafeGetCharWidthW(HDC hdc, UINT uFirstChar, UINT uLastChar, LPINT lpnWidths)
{
BOOL fRc;
ASSERT(uFirstChar <= uLastChar);
ASSERT(uLastChar <= 0xFFFF);
if (uLastChar != 0xFFFF) {
fRc = GetCharWidthW(hdc, uFirstChar, uLastChar, lpnWidths);
} else {
if (uLastChar > uFirstChar) {
// If asking for multiple characters, this means we are asking
// for a range that ends at 0xFFFF. Change it to a range that
// ends at 0xFFFE, and copy the result for 0xFFFE into 0xFFFF.
fRc = GetCharWidthW(hdc, uFirstChar, uLastChar - 1, lpnWidths);
lpnWidths[uLastChar-uFirstChar] = lpnWidths[uLastChar-uFirstChar-1];
} else {
// If asking for just one character, that character must be
// 0xFFFF, so change it to a request for 0xFFFE.
fRc = GetCharWidthW(hdc, 0xFFFE, 0xFFFE, lpnWidths);
}
}
return fRc;
}
#define GetCharWidthW SafeGetCharWidthW
#endif
#ifdef WINNT
HRESULT (*g_pfnGetGlobalFontLinkObject)(IMLangFontLink **) = NULL;
BOOL LoadMLFontLink(IMLangFontLink **ppMLFontLink)
{
ENTERCRITICAL;
*ppMLFontLink = NULL;
if (NULL == g_pfnGetGlobalFontLinkObject)
{
HMODULE hmod = LoadLibrary(TEXT("MLANG.DLL"));
if (hmod)
g_pfnGetGlobalFontLinkObject = (HRESULT (*)(IMLangFontLink **))GetProcAddress(hmod, "GetGlobalFontLinkObject");
}
if (g_pfnGetGlobalFontLinkObject)
g_pfnGetGlobalFontLinkObject(ppMLFontLink);
LEAVECRITICAL;
return (*ppMLFontLink)? TRUE: FALSE;
}
#else
HDPA g_hdpaMLANG = NULL;
typedef struct tagPROCITEM
{
DWORD dwProcessId;
HRESULT (*pfnGetGlobalFontLinkObject)(IMLangFontLink **);
} PROCITEM, *PPROCITEM;
PPROCITEM CreatePROCITEM(void)
{
PPROCITEM pItem = (PPROCITEM)Alloc(sizeof(PROCITEM));
if (pItem)
{
HMODULE hmod = LoadLibrary(TEXT("MLANG.DLL"));
if (hmod)
{
pItem->dwProcessId = GetCurrentProcessId();
pItem->pfnGetGlobalFontLinkObject = (HRESULT (*)(IMLangFontLink **))GetProcAddress(hmod, "GetGlobalFontLinkObject");
}
}
return pItem;
}
int GetPROCITEM(DWORD dwProcessId)
{
int i, cItems = 0;
ASSERTCRITICAL;
if (g_hdpaMLANG)
cItems = DPA_GetPtrCount(g_hdpaMLANG);
for (i = 0; i < cItems; i++)
{
PPROCITEM pItem = (PPROCITEM)DPA_FastGetPtr(g_hdpaMLANG, i);
if (pItem && pItem->dwProcessId == dwProcessId)
return i;
}
return -1;
}
STDAPI_(void) InitMLANG(void)
{
ENTERCRITICAL;
if (NULL == g_hdpaMLANG)
{
ASSERTCRITICAL;
g_hdpaMLANG = DPA_Create(4);
}
int i = GetPROCITEM(GetCurrentProcessId());
// If the previous app with my process id crashed, erase my entry
// so I won't crash, too.
if (0 <= i)
{
Free((PPROCITEM)DPA_FastGetPtr(g_hdpaMLANG, i));
DPA_DeletePtr(g_hdpaMLANG, i);
}
LEAVECRITICAL;
}
STDAPI_(void) DeinitMLANG(int cProcesses)
{
int i = GetPROCITEM(GetCurrentProcessId());
ASSERTCRITICAL;
if (0 <= i)
{
Free((PPROCITEM)DPA_FastGetPtr(g_hdpaMLANG, i));
DPA_DeletePtr(g_hdpaMLANG, i);
}
if (g_hdpaMLANG && 1 == cProcesses) // This is last process detach
{
DPA_Destroy(g_hdpaMLANG);
g_hdpaMLANG = NULL;
}
}
BOOL LoadMLFontLink(IMLangFontLink **ppMLFontLink)
{
PPROCITEM pItem = NULL;
int i;
ENTERCRITICAL;
*ppMLFontLink = NULL;
i = GetPROCITEM(GetCurrentProcessId());
if (0 <= i)
{
pItem = (PPROCITEM)DPA_FastGetPtr(g_hdpaMLANG, i);
}
else
{
pItem = CreatePROCITEM();
if (pItem)
DPA_AppendPtr(g_hdpaMLANG, pItem);
}
if (pItem && pItem->pfnGetGlobalFontLinkObject)
pItem->pfnGetGlobalFontLinkObject(ppMLFontLink);
LEAVECRITICAL;
return (*ppMLFontLink)? TRUE: FALSE;
}
#endif
#define _MAX_WCHAR_BUFFER_SIZE 256 // Should be enough for shell space name strings
#define _MAX_MB_BUFFER_SIZE _MAX_WCHAR_BUFFER_SIZE * sizeof(WCHAR)
//
// Helper function to decide whether we need MLang font link
// On return:
// S_OK : Yes, we need MLang font link and MLang can be loaded succesfully
// S_FALSE : No, we don't need MLang since text can be handled natively with font assciation (ANSI) and font link.
// E_FAIL : Need MLang, but, we couldn't load it
HRESULT FDoFontLink(HDC hdc, IMLangFontLink **ppMLFontLink, LPCWSTR pwszName, int cch)
{
HRESULT hr;
BOOL fNotDisplayable = TRUE;
int cchWChar;
int cchMB = cch * sizeof(WCHAR);
// When possible, we'll use internal buffer to avoid memory operations
char szBuffer[_MAX_MB_BUFFER_SIZE];
WCHAR wszBuffer[_MAX_WCHAR_BUFFER_SIZE];
char *pszBuffer = szBuffer;
WCHAR *pwszBuffer = wszBuffer;
UINT uiCharset;
CHARSETINFO csi;
ASSERT(ppMLFontLink);
uiCharset = GetTextCharsetInfo(hdc, NULL, 0);
TranslateCharsetInfo(IntToPtr_(DWORD *, uiCharset), &csi, TCI_SRCCHARSET);
if (cch>0 && g_uiACP == csi.ciACP)
{
// Alloc buffer if multibyte buffer is not enough
if (cch > _MAX_WCHAR_BUFFER_SIZE)
pszBuffer = (char *)LocalAlloc(LPTR, cchMB);
if (pszBuffer)
{
cchMB = WideCharToMultiByte(CP_ACP, 0, pwszName, cch, pszBuffer, cchMB, NULL, &fNotDisplayable);
// Round-trip verification
if (!fNotDisplayable)
{
// Alloc buffer if wide char buffer is not enough
if (cch > _MAX_WCHAR_BUFFER_SIZE)
pwszBuffer = (WCHAR *)LocalAlloc(LPTR, cch*sizeof(WCHAR));
if (pwszBuffer)
{
cchWChar = MultiByteToWideChar(CP_ACP, 0, pszBuffer, cchMB, pwszBuffer, cch);
if (cch == cchWChar)
{
for (int i=0; i<cch; i++)
{
if (pwszBuffer[i] != pwszName[i])
{
fNotDisplayable = TRUE;
break;
}
}
}
else
{
fNotDisplayable = TRUE;
}
if (pwszBuffer != wszBuffer)
LocalFree(pwszBuffer);
}
else
{
fNotDisplayable = TRUE;
}
}
if (pszBuffer != szBuffer)
LocalFree(pszBuffer);
}
}
if (fNotDisplayable)
{
if (LoadMLFontLink(ppMLFontLink))
hr = S_OK; // Need MLang font link
else
hr = E_FAIL; // Unable to load MLang
}
else
{
hr = S_FALSE; // Doesn't need MLang font link, but, we still need to call GDI in ANSI for Win9x FA to work properly
}
return hr;
}
//
// For _GetCharWidthWFontLink()
//
HRESULT FDoFontLink(HDC hdc, IMLangFontLink **ppMLFontLink, WCHAR wFirstChar, WCHAR wLastChar)
{
WCHAR wszBuffer[_MAX_WCHAR_BUFFER_SIZE];
int i = 0;
int cch = wFirstChar - wLastChar + 1;
WCHAR *pwszBuffer = wszBuffer;
HRESULT hr = E_FAIL;
if (cch > _MAX_WCHAR_BUFFER_SIZE)
pwszBuffer = (WCHAR *)LocalAlloc(LPTR, cch*sizeof(WCHAR));
if (pwszBuffer)
{
while (i < cch)
{
pwszBuffer[i] = wFirstChar+i;
i++;
}
hr = FDoFontLink(hdc, ppMLFontLink, pwszBuffer, cch);
if (pwszBuffer != wszBuffer)
LocalFree(pwszBuffer);
}
return hr;
}
//
// BUGBUG: Review for removing below big table and UsrFromWch() ...
//
__inline BOOL FChsDbcs(UINT chs)
{
return (chs == SHIFTJIS_CHARSET ||
chs == HANGEUL_CHARSET ||
chs == CHINESEBIG5_CHARSET ||
chs == GB2312_CHARSET);
}
__inline int FChsBiDi(int chs)
{
return (chs == ARABIC_CHARSET ||
chs == HEBREW_CHARSET);
}
__inline BOOL FCpgChinese(UINT cpg)
{
if (cpg == CP_ACP)
cpg = GetACP();
return (cpg == CP_TAIWAN || cpg == CP_CHINA);
}
__inline BOOL FCpgTaiwan(UINT cpg)
{
if (cpg == CP_ACP)
cpg = GetACP();
return (cpg == CP_TAIWAN);
}
__inline BOOL FCpgPRC(UINT cpg)
{
if (cpg == CP_ACP)
cpg = GetACP();
return (cpg == CP_CHINA);
}
__inline BOOL FCpgFarEast(UINT cpg)
{
if (cpg == CP_ACP)
cpg = GetACP();
return (cpg == CP_JAPAN || cpg == CP_TAIWAN || cpg == CP_CHINA ||
cpg == CP_KOREA || cpg == CP_MAC_JAPAN);
}
__inline BOOL FCpgDbcs(UINT cpg)
{
return (cpg == CP_JAPAN ||
cpg == CP_KOREA ||
cpg == CP_TAIWAN ||
cpg == CP_CHINA);
}
__inline int FCpgBiDi(int cpg)
{
return (cpg == CP_ARABIC ||
cpg == CP_HEBREW);
}
#ifndef WINNT
HFONT GetBiDiFont(HDC hdc)
{
HFONT hfont = NULL;
HFONT hfontTmp;
LOGFONT lf;
hfontTmp = (HFONT)GetCurrentObject(hdc, OBJ_FONT);
GetObject(hfontTmp, sizeof(lf), &lf);
// BUGBUG: Should I loop on the string to check if it contains BiDi chars?
if ( !FChsBiDi(lf.lfCharSet))
{
lf.lfCharSet = DEFAULT_CHARSET;
hfont = CreateFontIndirect(&lf);
}
return hfont;
}
#endif
// Table to map Unicode high byte value to first sub range for this high byte
const BYTE mpbHighusr[256] =
{
/* 0 1 2 3 4 5 6 7 8 9 a b c d e f */
/* 0 */ 0, 2, 3, 6, 9, 10, 13, 0, 0, 15, 17, 19, 21, 23, 24, 0,
/* 1 */ 26, 28, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 29, 30,
/* 2 */ 31, 35, 38, 39, 40, 43, 46, 47, 0, 0, 0, 0, 0, 0, 0, 0,
/* 3 */ 48, 51, 54, 55, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 4 */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 59, 59,
/* 5 */ 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59,
/* 6 */ 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59,
/* 7 */ 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59,
/* 8 */ 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59,
/* 9 */ 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59, 59,
/* a */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 56, 56, 56, 56,
/* b */ 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56,
/* c */ 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56,
/* d */ 56, 56, 56, 56, 56, 56, 56, 56, 0, 0, 0, 0, 0, 0, 0, 0,
/* e */ 60, 60, 60, 60, 60, 60, 60, 60, 60, 60, 60, 60, 60, 60, 60, 60,
/* f */ 60, 60, 60, 60, 60, 60, 60, 60, 60, 61, 61, 62, 63, 63, 64, 68
};
int UsrFromWch(WCHAR wch)
{
UCHAR bLow = LOBYTE(wch);
int usr;
switch (usr = mpbHighusr[HIBYTE(wch)])
{
case usrBasicLatin:
if (bLow < 0x80)
break;
++usr;
break;
case usrLatinXA:
if (bLow < 0x80)
break;
++usr;
break;
case usrLatinXB:
if (bLow < 0x50)
{
// ASSERT(wch <= 0x217);
break;
}
++usr;
if (bLow < 0xb0)
{
// ASSERT(wch <= 0x2a8);
break;;
}
++usr;
// ASSERT(wch <= 0x2e9);
break;
case usrCombDiacritical:
if (bLow < 0x70)
{
// ASSERT(wch <= 0x345 || wch == 0x360 || wch == 0x361);
break;
}
++usr;
if (bLow < 0xd0)
{
// ASSERT(wch == 0x374 || wch == 0x375 || wch == 0x37a || wch == 0x37e || (wch >= 0x384 && wch <= 0x38a) || wch == 0x38c ||
// (wch >= 0x38e && wch <= 0x3ce));
break;
}
++usr;
// ASSERT(wch <= 0x3d6 || wch == 0x3da || wch == 0x3dc || wch == 0x3de || wch == 0x3e0 || (wch >= 0x3e2 && wch <= 0x3f3));
break;
case usrCyrillic:
// ASSERT((wch >= 0x401 && wch <= 0x40c) || (wch >= 0x40e && wch <= 0x44f) || (wch >= 0x450 && wch <= 0x45c) ||
// (wch >= 0x45e && wch <= 0x486) || (wch >= 0x490 && wch <= 0x4cc) || (wch >= 0x4d0 && wch <= 0x4f9));
break;
case usrArmenian:
if (bLow < 0x90)
{
// ASSERT((wch >= 0x531 && wch <= 0x556) || (wch >= 0x559 && wch <= 0x55f) || (wch >= 0x561 && wch <= 0x587) || wch == 0x589);
break;
}
++usr;
if (bLow >= 0xd0)
{
// ASSERT(wch <= 0x5ea || (wch >= 0x5f0 && wch <= 0x5f4));
break;
}
++usr;
// ASSERT(wch >= 0x5b0 && wch <= 0x5c3);
break;
case usrBasicArabic:
if (bLow < 0x53)
{
// ASSERT(wch == 0x60c || wch == 0x61b || wch == 0x61f || (wch >= 0x621 && wch <= 0x63a) || (wch >= 0x640 && wch <= 0x652));
break;
}
++usr;
// ASSERT((wch >= 0x660 && wch <= 0x66d) || (wch >= 0x670 && wch <= 0x6b7) || (wch >= 0x6ba && wch <= 0x6be) ||
// (wch >= 0x6c0 && wch <= 0x6ce) || (wch >= 0x6d0 && wch <= 0x6ed) || (wch >= 0x6f0 && wch <= 0x6f9));
break;
case usrDevangari:
case usrGurmukhi:
case usrOriya:
case usrTelugu:
case usrThai:
// REVIEW: Added asserts for these
if (bLow < 0x80)
break;
++usr;
break;
case usrMalayalam:
// ASSERT(wch < 0xd80);
break;
case usrBasicGeorgian:
if (bLow >= 0xD0)
break;
++usr;
// ASSERT(bLow >= 0xa0);
break;
case usrHangulJamo:
// ASSERT(wch <= 0x11f9);
break;
case usrLatinExtendedAdd:
// ASSERT(wch <= 0x1ef9);
break;
case usrGreekExtended:
// ASSERT(wch <= 0x1ffe);
break;
case usrGeneralPunct:
if (bLow < 0x70)
{
// ASSERT(wch <= 0x2046 || (wch >= 0x206a && wch <= 0x206f));
break;
}
++usr;
if (bLow < 0xa0)
{
// ASSERT(wch == 0x2070 || (wch >= 0x2074 && wch <= 0x208e));
break;
}
++usr;
if (bLow < 0xd0)
{
// ASSERT(wch <= 0x20aa);
break;
}
++usr;
// ASSERT(wch <= 0x20e1);
break;
case usrLetterlikeSymbols:
if (bLow < 0x50)
{
// ASSERT(wch <= 0x2138);
break;
}
++usr;
if (bLow < 0x90)
{
// ASSERT((wch >= 0x2153 && wch <= 0x2182));
break;
}
++usr;
// ASSERT(wch <= 0x21ea);
break;
case usrMathematicalOps:
// ASSERT(wch <= 0x22f1);
break;
case usrMiscTechnical:
// ASSERT(wch <= 0x237a);
break;
case usrControlPictures:
if (bLow < 0x40)
{
// ASSERT(wch <= 0x2424);
break;
}
++usr;
if (bLow < 0x60)
{
// ASSERT(wch <= 0x244a);
break;
}
++usr;
// ASSERT(wch <= 0x24ea);
break;
case usrBoxDrawing:
if (bLow < 0x80)
break;
++usr;
if (bLow < 0xa0)
{
// ASSERT(wch <= 0x2595);
break;
}
++usr;
// ASSERT(wch <= 0x25ef);
break;
case usrMiscDingbats:
// ASSERT(wch <= 0x2613 || (wch >= 0x261a && wch <= 0x266f));
break;
case usrDingbats:
break;
case usrCJKSymAndPunct:
if (bLow < 0x40)
{
// ASSERT(wch <= 0x3037 || wch == 0x303f);
break;
}
++usr;
if (bLow < 0xa0)
{
// ASSERT((wch >= 0x3041 && wch <= 0x3094) || (wch >= 0x3099 && wch <= 0x309e));
break;
}
++usr;
// ASSERT(wch >= 0x30a1 && wch <= 0x30fe);
break;
case usrBopomofo:
if (bLow < 0x30)
{
// ASSERT(wch >= 0x3105 && wch <= 0x312c);
break;
}
++usr;
if (bLow < 0x90)
{
// ASSERT(wch >= 0x3131 && wch <= 0x318e);
break;
}
++usr;
// ASSERT(wch <= 0x319f);
break;
case usrEnclosedCJKLtMnth:
// ASSERT((wch >= 0x3200 && wch <= 0x321c) || (wch >= 0x3220 && wch <= 0x3243) || (wch >= 0x3260 && wch <= 0x327b) ||
// (wch >= 0x327f && wch <= 0x32b0) || (wch >= 0x32c0 && wch <= 0x32cb) || (wch >= 0x32d0 && wch <= 0x32fe));
break;
case usrCJKCompatibility:
// ASSERT(wch <= 0x3376 || (wch >= 0x337b && wch <= 0x33dd) || (wch >= 0x33e0 && wch <= 0x33FE));
break;
case usrHangul:
// ASSERT(wch <= 0xd7a3);
break;
case usrCJKUnifiedIdeo:
break;
case usrPrivateUseArea:
break;
case usrCJKCompatibilityIdeographs:
// ASSERT(wch <= 0xfa2d);
break;
case usrAlphaPresentationForms:
if (bLow < 0x50)
{
break;
}
++usr;
break;
case usrArabicPresentationFormsA:
// ASSERT(wch <= 0xfdfb);
break;
case usrCombiningHalfMarks:
if (bLow < 0x30)
{
// ASSERT(wch >= 0xfe20 && wch <= 0xfe23);
break;
}
++usr;
if (bLow < 0x50)
{
// ASSERT((wch >= 0xfe30 && wch <= 0xfe44) || wch >= 0xfe49);
break;
}
++usr;
if (bLow < 0x70)
{
// ASSERT((wch >= 0xfe50 && wch <= 0xfe52) || (wch >= 0xfe54 && wch <= 0xfe66) || (wch >= 0xfe68 && wch <= 0xfe6b));
break;
}
++usr;
// REVIEW : Need assert for this range
break;
case usrHFWidthForms:
if (bLow < 0xf0)
{
// ASSERT((wch >= 0xff01 && wch <= 0xff5e) || (wch >= 0xff61 && wch <= 0xffbe) || (wch >= 0xffc2 && wch <= 0xffc7) ||
// (wch >= 0xffca && wch <= 0xffcf) || (wch >= 0xffd2 && wch <= 0xffd7) || (wch >= 0xffda && wch <= 0xffdc) ||
// (wch >= 0xffe0 && wch <= 0xffe6));
break;
}
++usr;
// ASSERT(wch == 0xfffd);
break;
default:
ASSERT(FALSE); // bad Unicode character!!
break;
}
return usr;
}
BOOL _OtherGetCharWidthW(HDC hdc, UINT uFirstChar, UINT uLastChar, LPINT lpnWidths)
{
ASSERT(uFirstChar <= uLastChar);
#ifdef WINNT
return GetCharWidthW(hdc, uFirstChar, uLastChar, lpnWidths);
#else
if (uLastChar <= 127)
{
if (GetCharWidthA(hdc, uFirstChar, uLastChar, lpnWidths))
return TRUE;
}
if (g_fDBCSEnabled)
{
TEXTMETRIC tm;
WCHAR wch;
int iWidth;
BOOL fRet;
// This is a workaround for FE Win95 bug which causes GPF when obtaining widths of
// characters between 0xF000 to 0xF0FF if the font isn't SYMBOL_CHARSET.
if (uLastChar >= 0xF000 && uFirstChar <= 0xF0FF)
{
GetTextMetrics(hdc, &tm);
if (SYMBOL_CHARSET != tm.tmCharSet)
{
fRet = GetCharWidthW(hdc, tm.tmDefaultChar, tm.tmDefaultChar, &iWidth);
for (wch = (WCHAR)uFirstChar; wch <= (WCHAR)uLastChar; wch++)
lpnWidths[wch - uFirstChar] = iWidth;
return fRet;
}
else
goto LCallGetCharWidthW;
}
else if (!FCpgChinese(g_uiACP))
goto LCheck00b7;
GetTextMetrics(hdc, &tm);
if (!FChsDbcs(tm.tmCharSet))
goto LCheck00b7;
if (FCpgPRC(g_uiACP))
// This is a workaround for Win95 PRC bug which causes quite a few Chinese
// characters to have only nearly half the actual width.
{
#define uPUAFirst 0xe815
#define uPUALast 0xe964
int usr;
if (fRet = GetCharWidthW(hdc, uFirstChar, uLastChar, lpnWidths))
{
if (((usr = UsrFromWch((WCHAR)uFirstChar)) == usrCJKUnifiedIdeo ||
usr == usrCJKCompatibilityIdeographs || FBetween(uFirstChar, uPUAFirst, uPUALast)) ||
((usr = UsrFromWch((WCHAR)uLastChar)) == usrCJKUnifiedIdeo ||
usr == usrCJKCompatibilityIdeographs || FBetween(uLastChar, uPUAFirst, uPUALast)))
{
fRet = GetCharWidthW(hdc, 0x4e00, 0x4e00, &iWidth);
for (wch = (WCHAR)uFirstChar; wch <= (WCHAR)uLastChar; wch ++)
if ((usr = UsrFromWch(wch)) == usrCJKUnifiedIdeo ||
usr == usrCJKCompatibilityIdeographs || FBetween(wch, uPUAFirst, uPUALast))
lpnWidths[wch - uFirstChar] = iWidth;
}
}
}
else if (FCpgTaiwan(g_uiACP))
// This is a workaround for Win95 TWN, since GetCharWidthW may return wrong values
// for some characters. We assume all Full-Width characters have the same width, and
// still use GetCharWidthA for the common used Half-Width characters. - willisc
{
UINT ich;
int dxpWidth;
fRet = TRUE;
GetCharWidthW(hdc, 0x4e00, 0x4e00, &dxpWidth); // width of Chinese character '1'
for (ich = uFirstChar; ich <= uLastChar; ich++)
{
if ((ich >= 0x4e00 && ich <= 0x9fff) || (ich >= 0xe000 && ich <= 0xffe5))
// hit most Full-Width characters, always use width of Chinese '1'
lpnWidths[ich - uFirstChar] = dxpWidth;
else if (ich >= 0x20 && ich <= 0x7d)
// hit most Half-Width characters, use trustable GetCharWidthA
GetCharWidthA(hdc, ich, ich, &(lpnWidths[ich - uFirstChar]));
else
{
if (ich == 0x2018 || ich == 0x2019) // these two may be mapped to full
lpnWidths[ich - uFirstChar] = dxpWidth;
else
{ // for others, use WideChar->MultiByte to check its full or half width
UCHAR uChar[3];
if (WideCharToMultiByte(CP_TAIWAN, 0, (LPCWSTR)&ich, 1,
(LPSTR)uChar, 2, NULL, NULL) == 2)
lpnWidths[ich - uFirstChar] = dxpWidth;
else // half-width, use GetCharWidthA
GetCharWidthA(hdc, *uChar, *uChar, &(lpnWidths[ich - uFirstChar]));
}
}
// REVIEW: PETERO: fRet only reflects uLastChar
}
}
return fRet;
}
else
LCheck00b7:
if (FBetween(0x00b7, uFirstChar, uLastChar))
{
// This is a workaround for Win95 bug which causes U+00B7 character to
// be rendered improperly when using the wide API (substituting U+2219
// achieves the desired effect for some reason!)
//
// REVIEW nobuyah: is this a performance bottleneck?
BOOL fRet;
fRet = GetCharWidthW(hdc, uFirstChar, uLastChar, lpnWidths);
if (fRet)
fRet = GetCharWidthW(hdc, 0x2219, 0x2219, lpnWidths + 0x00b7 - uFirstChar);
return (fRet);
}
else
{
LCallGetCharWidthW:
return (GetCharWidthW(hdc, uFirstChar, uLastChar, lpnWidths));
}
#endif
}
//
// _GetCharWidthWFontLink
//
// This is a filter for _GetCharWidthW() calls that does font linking.
//
// The input string is scanned and fonts are switched if not all chars are
// supported by the current font in the HDC.
//
BOOL _GetCharWidthWFontLink(HDC hdc, UINT uFirstChar, UINT uLastChar, LPINT lpnWidths)
{
HFONT hfont = NULL;
HFONT hfontSav = NULL;
HFONT hfontMap = NULL;
WCHAR xch, xchFirst, xchLast = (WCHAR)uLastChar;
DWORD dwFontCodePages, dwCharCodePages;
BOOL fRet = FALSE;
IMLangFontLink *pMLFontLink = NULL;
switch (FDoFontLink(hdc, &pMLFontLink, (WCHAR)uFirstChar, (WCHAR)uLastChar))
{
case S_OK:
break;
case S_FALSE:
UINT ui;
UINT uCharAnsi;
ASSERT(uFirstChar <= uLastChar);
for (ui=uFirstChar; ui<= uLastChar; ui++)
{
uCharAnsi = 0;
if (WideCharToMultiByte(CP_ACP, 0, (LPCWSTR) &ui, 1, (LPSTR) &uCharAnsi, sizeof(uCharAnsi), NULL, NULL))
fRet = GetCharWidthA(hdc, uCharAnsi, uCharAnsi, &(lpnWidths[ui - uFirstChar]));
if (!fRet)
break;
}
return fRet;
default:
return FALSE;
}
hfont = (HFONT)GetCurrentObject(hdc, OBJ_FONT);
pMLFontLink->GetFontCodePages(hdc, hfont, &dwFontCodePages);
// See if whole string can be handled by current font
for (xch = (WCHAR)uFirstChar; xch <= xchLast; xch++)
{
pMLFontLink->GetCharCodePages(xch, &dwCharCodePages);
if (!(dwFontCodePages & dwCharCodePages))
{
// Output the run
if ((xch - uFirstChar) > 0)
fRet = _OtherGetCharWidthW(hdc, uFirstChar, xch - 1, lpnWidths);
break;
}
}
while (xch <= xchLast)
{
xchFirst = xch;
pMLFontLink->MapFont(hdc, dwCharCodePages, hfont, &hfontMap);
hfontSav = (HFONT)SelectObject(hdc, hfontMap);
pMLFontLink->GetFontCodePages(hdc, hfontMap, &dwFontCodePages);
// Collect up run of characters supported by this font
for (xch++; xch <= xchLast; xch++)
{
pMLFontLink->GetCharCodePages(xch, &dwCharCodePages);
if (!(dwFontCodePages & dwCharCodePages))
break;
}
// Output the run
fRet = _OtherGetCharWidthW(hdc, xchFirst, xch - 1, lpnWidths + (xchFirst - uFirstChar));
SelectObject(hdc, hfontSav);
pMLFontLink->ReleaseFont(hfontMap);
// BUGBUG:
if (!fRet)
break;
}
pMLFontLink->Release();
return fRet;
}
BOOL GetCharWidthWrap(HDC hdc, UINT uFirstChar, UINT uLastChar, LPINT lpnWidths)
{
BOOL fRet = FALSE;
#ifndef WINNT
HFONT hfont = NULL;
HFONT hfontSav = NULL;
#endif
// On NT5, we use system API behavior including fontlink
if (g_bRunOnNT5)
return GetCharWidthW(hdc, uFirstChar, uLastChar, lpnWidths);
if (uLastChar > 127) // Optimization, skip for below 127
{
#ifndef WINNT
if (g_fMEEnabled && (hfont = GetBiDiFont(hdc)))
hfontSav = (HFONT)SelectObject(hdc, hfont);
#endif
fRet = _GetCharWidthWFontLink(hdc, uFirstChar, uLastChar, lpnWidths);
}
if (!fRet)
fRet = _OtherGetCharWidthW(hdc, uFirstChar, uLastChar, lpnWidths);
#ifndef WINNT
if (hfont)
{
SelectObject(hdc, hfontSav);
DeleteObject(hfont);
}
#endif
return fRet;
}
BOOL _OtherGetTextExtentPointW(HDC hdc, LPCWSTR lpwch, int cch, LPSIZE lpSize)
{
BOOL fRet;
if (cch == 0)
{
fRet = GetTextExtentPointA(hdc, " ", 1, lpSize);
lpSize->cx = 0;
return fRet;
}
#ifdef WINNT
return GetTextExtentPoint32W(hdc, lpwch, cch, lpSize);
#else
if (g_fMEEnabled || g_fDBCSEnabled)
{
UINT cpg, chs;
CHARSETINFO csi;
chs = GetTextCharsetInfo(hdc, NULL, 0);
TranslateCharsetInfo(IntToPtr_(DWORD *, chs), &csi, TCI_SRCCHARSET);
cpg = csi.ciACP;
if ((FChsBiDi(chs) || FChsDbcs(chs)) && IsValidCodePage(cpg))
{
int cchOut = cch;
int fUsedDefaultChar;
char *pchT;
int cchMax;
int fRet = FALSE;
cchMax = cchOut * sizeof(WCHAR);
pchT = (char *)LocalAlloc(LPTR, cchMax);
if (pchT)
{
cchOut = WideCharToMultiByte(cpg, 0, lpwch, cchOut, pchT, cchMax, NULL, &fUsedDefaultChar);
if (fUsedDefaultChar)
{
LocalFree(pchT);
goto L95GDIHack;
}
fRet = GetTextExtentPointA(hdc, pchT, cchOut, lpSize);
LocalFree(pchT);
}
return fRet;
}
}
L95GDIHack:
if (g_fDBCSEnabled)
{
WCHAR wchX = 'X';
int dxp, dxpX, dxpT;
// GetTextExtentPoint32W() GPFs on Win 95 FE for chars above U+00FF
// Instead use a sum of GetCharWidthWrap() calls, plus the difference
// between GetCharWidthWrap() of 'X' and GetTextExtentPoint32W() of 'X'
fRet = GetTextExtentPoint32W(hdc, &wchX, 1, lpSize);
if (fRet)
{
LPWSTR lpwchT;
LPWSTR lpwchEnd = (LPWSTR)lpwch + cch;
_OtherGetCharWidthW(hdc, 'X', 'X', &dxpX);
for (dxp = 0, lpwchT = (LPWSTR)lpwch; lpwchT < lpwchEnd; lpwchT++)
{
_OtherGetCharWidthW(hdc, *lpwchT, *lpwchT, &dxpT);
dxp += dxpT;
}
lpSize->cx = lpSize->cx - dxpX + dxp;
}
}
else
fRet = GetTextExtentPoint32W(hdc, lpwch, cch, lpSize);
return fRet;
#endif
}
//
// _GetTextExtentPointWFontLink
//
// This is a filter for GetTextExtentPointW() that does font linking.
//
// The input string is scanned and fonts are switched if not all chars are
// supported by the current font in the HDC.
//
BOOL _GetTextExtentPointWFontLink(HDC hdc, LPCWSTR lpwch, int cch, LPSIZE lpSize)
{
HFONT hfont = NULL;
HFONT hfontSav = NULL;
HFONT hfontMap = NULL;
BOOL fRet = FALSE;
int cchDone;
long cchCodePages;
DWORD dwACP, dwFontCodePages, dwCodePages;
SIZE size;
IMLangFontLink *pMLFontLink = NULL;
ASSERT(cch != 0);
switch (FDoFontLink(hdc, &pMLFontLink, lpwch, cch))
{
case S_OK:
break;
case S_FALSE:
{
// Times by the size of WCHAR should be enough for multibyte string buffer
char *lpStr = (char *)LocalAlloc(LPTR, cch*sizeof(WCHAR));
if (lpStr)
{
if (cch = WideCharToMultiByte(CP_ACP,0,lpwch, cch, lpStr, cch*sizeof(WCHAR), NULL, NULL))
fRet = GetTextExtentPointA(hdc, lpStr, cch, lpSize);
LocalFree(lpStr);
}
}
return fRet;
default:
return FALSE;
}
hfont = (HFONT)GetCurrentObject(hdc, OBJ_FONT);
pMLFontLink->GetFontCodePages(hdc, hfont, &dwFontCodePages);
pMLFontLink->CodePageToCodePages(g_uiACP, &dwACP); // Give priority to CP_ACP
// See if whole string can be handled by current font
pMLFontLink->GetStrCodePages(lpwch, cch, dwACP, &dwCodePages, &cchCodePages);
// current font supports whole string ?
if ((dwFontCodePages & dwCodePages) && cch == cchCodePages)
{
pMLFontLink->Release();
return FALSE;
}
// Get Hight of DC font
if (!(fRet = GetTextExtentPointA(hdc, " ", 1, lpSize)))
{
pMLFontLink->Release();
return FALSE;
}
lpSize->cx = 0;
for (cchDone = 0; cchDone < cch; cchDone += cchCodePages)
{
pMLFontLink->GetStrCodePages(lpwch + cchDone, cch - cchDone, dwACP, &dwCodePages, &cchCodePages);
if (!(dwFontCodePages & dwCodePages))
{
pMLFontLink->MapFont(hdc, dwCodePages, hfont, &hfontMap);
hfontSav = (HFONT)SelectObject(hdc, hfontMap);
}
// cchCodePages shouldn't be 0
ASSERT(cchCodePages);
if (cchCodePages > 0)
{
fRet = _OtherGetTextExtentPointW(hdc, lpwch + cchDone, cchCodePages, &size);
lpSize->cx += size.cx;
}
if (NULL != hfontSav)
{
SelectObject(hdc, hfontSav);
pMLFontLink->ReleaseFont(hfontMap);
hfontSav = NULL;
}
}
pMLFontLink->Release();
return fRet;
}
BOOL GetTextExtentPointWrap(HDC hdc, LPCWSTR lpwch, int cch, LPSIZE lpSize)
{
BOOL fRet = FALSE;
#ifndef WINNT
HFONT hfont = NULL;
HFONT hfontSav = NULL;
#endif
// On NT5, we use system API behavior including fontlink
if (g_bRunOnNT5)
return GetTextExtentPointW(hdc, lpwch, cch, lpSize);
if (cch)
{
// Optimize for all < 128 case
if (cch < 256 && lpwch[0] <= 127)
{
char lpchA[256];
int ich;
BOOL fAscii = TRUE;
for (ich = 0; ich < cch; ich++)
{
WCHAR wch = lpwch[ich];
if (wch <= 127)
lpchA[ich] = (char) wch;
else
{
fAscii = FALSE;
break;
}
}
if (fAscii)
return GetTextExtentPointA(hdc, lpchA, cch, lpSize);
}
#ifndef WINNT
if (g_fMEEnabled && (hfont = GetBiDiFont(hdc)))
hfontSav = (HFONT)SelectObject(hdc, hfont);
#endif
fRet = _GetTextExtentPointWFontLink(hdc, lpwch, cch, lpSize);
}
if (!fRet)
fRet = _OtherGetTextExtentPointW(hdc, lpwch, cch, lpSize);
#ifndef WINNT
if (hfont)
{
SelectObject(hdc, hfontSav);
DeleteObject(hfont);
}
#endif
return fRet;
}
BOOL GetTextExtentPoint32Wrap(HDC hdc, LPCWSTR lpwch, int cch, LPSIZE lpSize)
{
return GetTextExtentPointWrap(hdc, lpwch, cch, lpSize);
}
void _RgwchRgdxpCpToRgchRgdxp(const WCHAR *pwchSrc,
const int *pdxpSrc,
char *pchDest,
int *pdxpDest,
int *pcch,
UINT cpg,
int *pfUsedDefaultChar)
{
int cchIn = *pcch;
int cch;
char *pch = pchDest;
char rgch[2];
int fUsedDefaultChar;
if (pfUsedDefaultChar)
*pfUsedDefaultChar = 0;
while (--cchIn >= 0)
{
cch = WideCharToMultiByte(cpg,
0,
pwchSrc++,
1,
rgch,
sizeof(rgch),
NULL,
&fUsedDefaultChar);
if (pfUsedDefaultChar)
*pfUsedDefaultChar |= fUsedDefaultChar;
if (cch == 0)
{
cch = WideCharToMultiByte(CP_ACP,
0,
pwchSrc-1,
1,
rgch,
sizeof(rgch),
NULL,
NULL);
}
if (cch == 0)
{
ASSERT(FALSE);
return;
}
*(pch++) = rgch[0];
*(pdxpDest++) = *(pdxpSrc++);
if (cch == 2)
{
*(pch++) = rgch[1];
*(pdxpDest++) = 0;
}
}
*pcch = (int)(pch - pchDest);
}
BOOL _ExtTextOutWForWin95(HDC hdc, int xp, int yp, UINT eto,
CONST RECT *lprect, LPCWSTR lpwch, UINT cLen,
CONST INT *lpdxp)
{
WCHAR sz[256];
LPWSTR lpwchAlloc = sz;
LPWSTR lpwchT = (LPWSTR)lpwch;
LPWSTR lpwchEnd = (LPWSTR)lpwch + cLen;
BOOL fCopied = FALSE;
BOOL fRet;
// This is a workaround for Win95 bug which causes U+00B7 character to
// be rendered improperly when using the wide API (substituting U+2219
// achieves the desired effect for some reason!)
while (lpwchT < lpwchEnd)
{
if (*lpwchT == 0x00b7)
{
if (!fCopied)
{
if (cLen > 256)
lpwchAlloc = (LPWSTR)LocalAlloc(LPTR, cLen * sizeof(WCHAR));
memcpy(lpwchAlloc, lpwch, cLen * sizeof(WCHAR));
lpwchT = lpwchAlloc + (lpwchT - lpwch);
lpwchEnd = lpwchAlloc + cLen;
fCopied = TRUE;
}
*lpwchT = 0x2219;
}
lpwchT++;
}
fRet = ExtTextOutW(hdc, xp, yp, eto, lprect, fCopied ? lpwchAlloc : lpwch, cLen, lpdxp);
if (lpwchAlloc != sz)
LocalFree(lpwchAlloc);
return fRet;
}
BOOL _OtherExtTextOutW(HDC hdc, int xp, int yp, UINT eto, CONST RECT *lprect,
LPCWSTR lpwch, UINT cLen, CONST INT *lpdxp)
{
UINT cpg = CP_DEFAULT;
if (!(eto & ETO_GLYPH_INDEX) && cLen < 256 && lpwch[0] <= 127)
{
char lpchA[256];
UINT ich;
BOOL fAscii = TRUE;
for (ich = 0; ich < cLen; ich++)
{
WCHAR wch = lpwch[ich];
if (wch <= 127)
lpchA[ich] = (char) wch;
else
{
fAscii = FALSE;
break;
}
}
if (fAscii)
return ExtTextOutA(hdc, xp, yp, eto, lprect, lpchA, cLen, lpdxp);
}
#ifdef WINNT
return (ExtTextOutW(hdc, xp, yp, eto, lprect, lpwch, cLen, lpdxp));
#else
{
UINT chs;
CHARSETINFO csi;
// BUGBUG: Do we need DT_METAFILE handling in comctl32?
ASSERT(GetDeviceCaps(hdc, TECHNOLOGY) != DT_METAFILE);
chs = GetTextCharsetInfo(hdc, NULL, 0);
TranslateCharsetInfo(IntToPtr_(DWORD *, chs), &csi, TCI_SRCCHARSET);
cpg = csi.ciACP;
// This is a workaround for Win95ME bug
if (FChsBiDi(chs) && IsValidCodePage(cpg) && g_fMEEnabled && !g_bRunOnMemphis)
{
int cchOut = cLen;
int *pdxp = NULL;
char *pchT;
int cchMax;
int fRet = FALSE;
cchMax = cchOut * sizeof(WCHAR);
pchT = (char *)LocalAlloc(LPTR, cchMax);
if (pchT)
{
if (lpdxp)
{
pdxp = (int *)LocalAlloc(LPTR, cchMax * sizeof(int));
if (pdxp)
_RgwchRgdxpCpToRgchRgdxp(lpwch, lpdxp, pchT, pdxp, &cchOut,
cpg, NULL);
}
else
cchOut = WideCharToMultiByte(cpg, 0, lpwch, cchOut, pchT, cchMax, NULL, NULL);
fRet = ExtTextOutA(hdc, xp, yp, eto, lprect, pchT, cchOut, pdxp);
LocalFree(pchT);
}
if (pdxp)
LocalFree(pdxp);
return fRet;
}
// This is a workaround for Win95FE bug
if (FChsDbcs(chs) && IsValidCodePage(cpg) && g_fDBCSEnabled)
{
int cchOut = cLen;
int fUsedDefaultChar;
int *pdxp = NULL;
char *pchT;
int cchMax;
int fRet;
cchMax = cchOut * sizeof(WCHAR);
pchT = (char *)LocalAlloc(LPTR, cchMax);
if (pchT)
{
if (lpdxp)
{
pdxp = (int *)LocalAlloc(LPTR, cchMax * sizeof(int));
_RgwchRgdxpCpToRgchRgdxp(lpwch, lpdxp, pchT, pdxp, &cchOut,
cpg, &fUsedDefaultChar);
if (fUsedDefaultChar)
{
LocalFree(pchT);
if (pdxp)
LocalFree(pdxp);
goto L95GDIHack;
}
fRet = ExtTextOutA(hdc, xp, yp, eto, lprect, pchT, cchOut, pdxp);
}
else
{
cchOut = WideCharToMultiByte(cpg, 0, lpwch, cchOut, pchT, cchMax, NULL, &fUsedDefaultChar);
if (fUsedDefaultChar)
{
LocalFree(pchT);
goto L95GDIHack;
}
fRet = ExtTextOutA(hdc, xp, yp, eto, lprect, pchT, cchOut, NULL);
}
LocalFree(pchT);
}
if (pdxp)
LocalFree(pdxp);
return fRet;
}
else
{
L95GDIHack:
if (g_fDBCSEnabled) // Running on an FE system?
{
// This is a work around for Win95FE bugs that cause GPFs in GDI if multiple
// characters above Unicode 0xFF are passed to ExtTextOutW.
LPCWSTR lpwchT = lpwch;
LPCWSTR lpwchStart = lpwchT;
LPCWSTR lpwchEnd = lpwch + cLen;
BOOL fFirst = TRUE;
BOOL fErased = FALSE;
POINT pt;
int cwch;
BOOL fRet;
int dxpMul = 0;
int dypMul = 0;
int dzpAdvance;
CONST int *lpdxpCur;
while (lpwchT < lpwchEnd)
{
if (*lpwchT > 0x00FF)
{
if (fFirst)
{
// Ok, time to figure out the Escapement
// this is done by rendering a space and discovering the
// delta from the current position UGLY but it works!!!
RECT rect;
WCHAR wch = SPACE_CHAR;
POINT ptT;
UINT uiTextAlign = GetTextAlign(hdc);
// Cache current location
MoveToEx(hdc, xp, yp, &pt);
// Render a safe character (clipped) at xp,yp
rect.top = rect.bottom = rect.left = rect.right = 0;
if (!(uiTextAlign & TA_UPDATECP))
SetTextAlign(hdc, TA_UPDATECP);
fRet = _ExtTextOutWForWin95(hdc, xp, yp, ETO_CLIPPED, &rect, &wch, 1, NULL);
if (!(uiTextAlign & TA_UPDATECP))
SetTextAlign(hdc, TA_NOUPDATECP);
// Get the current point location and calculate escapement from that point
MoveToEx(hdc, pt.x, pt.y, &ptT);
if (ptT.x != xp)
dxpMul = ptT.x > xp ? 1 : -1;
else
dypMul = ptT.y > yp ? 1 : -1;
fFirst = FALSE;
}
if ((cwch = lpwchT - lpwchStart) > 0)
{
lpdxpCur = lpdxp ? lpdxp + (lpwchStart - lpwch) : (int *)NULL;
// Output the run of chars less than 0xFF
fRet = _ExtTextOutWForWin95(hdc, xp, yp, eto, lprect, lpwchStart, cwch, lpdxpCur);
if (!fRet)
return fRet;
eto &= ~ETO_OPAQUE; // Don't erase mutliple times!!!
// Calculate advance amount
if (lpdxpCur)
{
dzpAdvance = 0;
while (cwch--)
dzpAdvance += *lpdxpCur++;
}
else
{
SIZE size;
GetTextExtentPointWrap(hdc, lpwchStart, cwch, &size);
dzpAdvance = size.cx;
}
if (dxpMul)
xp += dzpAdvance * dxpMul;
else
yp += dzpAdvance * dypMul;
lpwchStart = lpwchT;
}
// Output chars above 0xFF one at a time to prevent GPF
lpdxpCur = lpdxp ? lpdxp + (lpwchStart - lpwch) : (int *)NULL;
fRet = _ExtTextOutWForWin95(hdc, xp, yp, eto, lprect, lpwchStart, 1, lpdxpCur);
if (!fRet)
return fRet;
eto &= ~ETO_OPAQUE; // Don't erase mutliple times!!!
if (lpdxpCur)
dzpAdvance = *lpdxpCur;
else
{
SIZE size;
GetTextExtentPointWrap(hdc, lpwchStart, 1, &size);
dzpAdvance = size.cx;
}
if (dxpMul)
xp += dzpAdvance * dxpMul;
else
yp += dzpAdvance * dypMul;
lpwchStart++;
}
lpwchT++;
}
if ((cwch = lpwchT - lpwchStart) > 0)
{
fRet = _ExtTextOutWForWin95(hdc, xp, yp, eto, lprect, lpwchStart, cwch,
lpdxp ? lpdxp + (lpwchStart - lpwch) : (int *)NULL);
}
return fRet;
}
else
return (_ExtTextOutWForWin95(hdc, xp, yp, eto, lprect, lpwch, cLen, lpdxp));
}
}
#endif
ASSERT(FALSE);
return FALSE;
}
BOOL _ExtTextOutWFontLink(HDC hdc, int xp, int yp, UINT eto, CONST RECT *lprect,
LPCWSTR lpwch, UINT cLen, CONST INT *lpdxp)
{
HFONT hfont = NULL;
HFONT hfontSav = NULL;
HFONT hfontMap = NULL;
BOOL fRet = FALSE;
UINT ta;
int fDoTa = FALSE;
int fQueryTa = TRUE;
POINT pt;
int cchDone;
DWORD dwACP, dwFontCodePages, dwCodePages;
long cchCodePages;
IMLangFontLink *pMLFontLink = NULL;
if (cLen == 0)
return FALSE;
switch (FDoFontLink(hdc, &pMLFontLink, lpwch, cLen))
{
case S_OK:
break;
case S_FALSE:
{
// Times by the size of WCHAR should be enough for multibyte string buffer
char *lpStr = (char *)LocalAlloc(LPTR, cLen*sizeof(WCHAR));
if (lpStr)
{
if (cLen = WideCharToMultiByte(CP_ACP,0,lpwch, cLen, lpStr, cLen*sizeof(WCHAR), NULL, NULL))
fRet = ExtTextOutA(hdc, xp, yp, eto, lprect, lpStr, cLen, lpdxp);
LocalFree(lpStr);
}
}
return fRet;
default:
return FALSE;
}
hfont = (HFONT)GetCurrentObject(hdc, OBJ_FONT);
pMLFontLink->GetFontCodePages(hdc, hfont, &dwFontCodePages);
pMLFontLink->CodePageToCodePages(g_uiACP, &dwACP); // Give priority to CP_ACP
// See if whole string can be handled by current font
pMLFontLink->GetStrCodePages(lpwch, cLen, dwACP, &dwCodePages, &cchCodePages);
// current font supports whole string ?
if ((dwFontCodePages & dwCodePages) && cLen == (UINT)cchCodePages)
{
pMLFontLink->Release();
return FALSE;
}
for (cchDone = 0; (UINT)cchDone < cLen; cchDone += cchCodePages)
{
pMLFontLink->GetStrCodePages(lpwch + cchDone, cLen - cchDone, dwACP, &dwCodePages, &cchCodePages);
if (!(dwFontCodePages & dwCodePages))
{
pMLFontLink->MapFont(hdc, dwCodePages, hfont, &hfontMap); // BUGBUG: Baseline?
hfontSav = (HFONT)SelectObject(hdc, hfontMap);
}
// cchCodePages shouldn't be 0
ASSERT(cchCodePages);
if (cchCodePages > 0)
{
// If rendering in multiple parts, need to use TA_UPDATECP
if ((UINT)cchCodePages != cLen && fQueryTa)
{
ta = GetTextAlign(hdc);
if ((ta & TA_UPDATECP) == 0) // Don't do the move if x, y aren't being used
{
MoveToEx(hdc, xp, yp, &pt);
fDoTa = TRUE;
}
fQueryTa = FALSE;
}
if (fDoTa)
SetTextAlign(hdc, ta | TA_UPDATECP);
fRet = _OtherExtTextOutW(hdc, xp, yp, eto, lprect, lpwch + cchDone, cchCodePages,
lpdxp ? lpdxp + cchDone : NULL);
eto = eto & ~ETO_OPAQUE; // Don't do mupltiple OPAQUEs!!!
if (fDoTa)
SetTextAlign(hdc, ta);
if (!fRet)
break;
}
if (NULL != hfontSav)
{
SelectObject(hdc, hfontSav);
pMLFontLink->ReleaseFont(hfontMap);
hfontSav = NULL;
}
}
if (fDoTa) // Don't do the move if x, y aren't being used
MoveToEx(hdc, pt.x, pt.y, NULL);
pMLFontLink->Release();
return fRet;
}
BOOL ExtTextOutWrap(HDC hdc, int xp, int yp, UINT eto, CONST RECT *lprect, LPCWSTR lpwch, UINT cLen, CONST INT *lpdxp)
{
BOOL fRet = FALSE;
#ifndef WINNT
HFONT hfont = NULL;
HFONT hfontSav = NULL;
#endif
// On NT5, we use system API behavior including fontlink
if (g_bRunOnNT5)
return ExtTextOutW(hdc, xp, yp, eto, lprect, lpwch, cLen, lpdxp);
if (cLen == 0)
{
char chT;
return ExtTextOutA(hdc, xp, yp, eto, lprect, &chT, cLen, lpdxp);
}
// Optimize for all < 128 case
if (!(eto & ETO_GLYPH_INDEX) && cLen < 256 && lpwch[0] <= 127)
{
char lpchA[256];
UINT ich;
BOOL fAscii = TRUE;
for (ich = 0; ich < cLen; ich++)
{
WCHAR wch = lpwch[ich];
if (wch <= 127)
lpchA[ich] = (char) wch;
else
{
fAscii = FALSE;
break;
}
}
if (fAscii)
return ExtTextOutA(hdc, xp, yp, eto, lprect, lpchA, cLen, lpdxp);
}
#ifdef DEBUG
TEXTMETRIC tm;
// BisharaK: fix bugs#40706, 43200 -- Meta is assumed false for Glyph out.
if (!(eto & ETO_GLYPH_INDEX))
{
switch (GetObjectType(hdc))
{
case OBJ_METADC:
case OBJ_ENHMETADC:
ASSERT(0 && "MetafileExtTextOutW wrapper need.");
break;
default:
break;
}
}
GetTextMetrics(hdc, &tm);
if (tm.tmCharSet == SYMBOL_CHARSET)
{
ASSERT(0 && "SymbolExtTextOutW wrapper need.");
}
else if (tm.tmPitchAndFamily & TMPF_DEVICE)
{
ASSERT(0 && "DevExtTextOutW wrapper need.");
}
else
#endif
{
#ifndef WINNT
if (g_fMEEnabled && !(eto & ETO_GLYPH_INDEX) && (hfont = GetBiDiFont(hdc)))
hfontSav = (HFONT)SelectObject(hdc, hfont);
#endif
// Font linking support for UI rendering
fRet = _ExtTextOutWFontLink(hdc, xp, yp, eto, lprect, lpwch, cLen, lpdxp);
}
if (!fRet)
fRet = _OtherExtTextOutW(hdc, xp, yp, eto, lprect, lpwch, cLen, lpdxp);
#ifndef WINNT
if (hfont)
{
SelectObject(hdc, hfontSav);
DeleteObject(hfont);
}
#endif
return fRet;
}
BOOL TextOutWrap(HDC hdc, int xp, int yp, LPCWSTR lpwch, int cLen)
{
return ExtTextOutWrap(hdc, xp, yp, 0, NULL, lpwch, cLen, NULL);
}
typedef struct {
RECT rcFormat; // Format rectangle.
int cxTabLength; // Tab length in pixels.
int iXSign;
int iYSign;
int cyLineHeight; // Height of a line based on DT_EXTERNALLEADING
int cxMaxWidth; // Width of the format rectangle.
int cxMaxExtent; // Width of the longest line drawn.
int cxRightMargin; // Right margin in pixels (with proper sign) on DT_NOPREFIX flag.
int cxOverhang; // Character overhang.
} DRAWTEXTDATA, *LPDRAWTEXTDATA;
#define CR 13
#define LF 10
#define DT_HFMTMASK 0x03
#define DT_VFMTMASK 0x0C
// FE support both Kanji and English mnemonic characters,
// toggled from control panel. Both mnemonics are embedded in menu
// resource templates. The following prefixes guide their parsing.
#define CH_ENGLISHPREFIX 0x1E
#define CH_KANJIPREFIX 0x1F
#define CCHELLIPSIS 3
static CONST WCHAR szEllipsis[CCHELLIPSIS+1] = TEXT("...");
// Max length of a full path is around 260. But, most of the time, it will
// be less than 128. So, we alloc only this much on stack. If the string is
// longer, we alloc from local heap (which is slower).
//
// BOGUS: For international versions, we need to give some more margin here.
//
#define MAXBUFFSIZE 128
/***************************************************************************\
* There are word breaking characters which are compatible with
* Japanese Windows 3.1 and FarEast Windows 95.
*
* SJ - Country Japan , Charset SHIFTJIS, Codepage 932.
* GB - Country PRC , Charset GB2312 , Codepage 936.
* B5 - Country Taiwan, Charset BIG5 , Codepage 950.
* WS - Country Korea , Charset WANGSUNG, Codepage 949.
* JB - Country Korea , Charset JOHAB , Codepage 1361. *** LATER ***
*
* [START BREAK CHARACTERS]
*
* These character should not be the last charatcer of the line.
*
* Unicode Japan PRC Taiwan Korea
* -------+---------+---------+---------+---------+
*
* + ASCII
*
* U+0024 (SJ+0024) (WS+0024) Dollar sign
* U+0028 (SJ+0028) (WS+0028) Opening parenthesis
* U+003C (SJ+003C) Less-than sign
* U+005C (SJ+005C) Backslash
* U+005B (SJ+005B) (GB+005B) (WS+005B) Opening square bracket
* U+007B (SJ+007B) (GB+007B) (WS+007B) Opening curly bracket
*
* + General punctuation
*
* U+2018 (WS+A1AE) Single Turned Comma Quotation Mark
* U+201C (WS+A1B0) Double Comma Quotation Mark
*
* + CJK symbols and punctuation
*
* U+3008 (WS+A1B4) Opening Angle Bracket
* U+300A (SJ+8173) (WS+A1B6) Opening Double Angle Bracket
* U+300C (SJ+8175) (WS+A1B8) Opening Corner Bracket
* U+300E (SJ+8177) (WS+A1BA) Opening White Corner Bracket
* U+3010 (SJ+9179) (WS+A1BC) Opening Black Lenticular Bracket
* U+3014 (SJ+816B) (WS+A1B2) Opening Tortoise Shell Bracket
*
* + Fullwidth ASCII variants
*
* U+FF04 (WS+A3A4) Fullwidth Dollar Sign
* U+FF08 (SJ+8169) (WS+A3A8) Fullwidth opening parenthesis
* U+FF1C (SJ+8183) Fullwidth less-than sign
* U+FF3B (SJ+816D) (WS+A3DB) Fullwidth opening square bracket
* U+FF5B (SJ+816F) (WS+A3FB) Fullwidth opening curly bracket
*
* + Halfwidth Katakana variants
*
* U+FF62 (SJ+00A2) Halfwidth Opening Corner Bracket
*
* + Fullwidth symbol variants
*
* U+FFE1 (WS+A1CC) Fullwidth Pound Sign
* U+FFE6 (WS+A3DC) Fullwidth Won Sign
*
* [END BREAK CHARACTERS]
*
* These character should not be the top charatcer of the line.
*
* Unicode Japan PRC Taiwan Korea
* -------+---------+---------+---------+---------+
*
* + ASCII
*
* U+0021 (SJ+0021) (GB+0021) (B5+0021) (WS+0021) Exclamation mark
* U+0025 (WS+0025) Percent Sign
* U+0029 (SJ+0029) (WS+0029) Closing parenthesis
* U+002C (SJ+002C) (GB+002C) (B5+002C) (WS+002C) Comma
* U+002E (SJ+002E) (GB+002E) (B5+002E) (WS+002E) Priod
* U+003A (WS+003A) Colon
* U+003B (WS+003B) Semicolon
* U+003E (SJ+003E) Greater-than sign
* U+003F (SJ+003F) (GB+003F) (B5+003F) (WS+003F) Question mark
* U+005D (SJ+005D) (GB+005D) (B5+005D) (WS+005D) Closing square bracket
* U+007D (SJ+007D) (GB+007D) (B5+007D) (WS+007D) Closing curly bracket
*
* + Latin1
*
* U+00A8 (GB+A1A7) Spacing diaeresis
* U+00B0 (WS+A1C6) Degree Sign
* U+00B7 (B5+A150) Middle Dot
*
* + Modifier letters
*
* U+02C7 (GB+A1A6) Modifier latter hacek
* U+02C9 (GB+A1A5) Modifier letter macron
*
* + General punctuation
*
* U+2013 (B5+A156) En Dash
* U+2014 (b5+A158) Em Dash
* U+2015 (GB+A1AA) Quotation dash
* U+2016 (GB+A1AC) Double vertical bar
* U+2018 (GB+A1AE) Single turned comma quotation mark
* U+2019 (GB+A1AF) (B5+A1A6) (WS+A1AF) Single comma quotation mark
* U+201D (GB+A1B1) (B5+A1A8) (WS+A1B1) Double comma quotation mark
* U+2022 (GB+A1A4) Bullet
* U+2025 (B5+A14C) Two Dot Leader
* U+2026 (GB+A1AD) (B5+A14B) Horizontal ellipsis
* U+2027 (B5+A145) Hyphenation Point
* U+2032 (B5+A1AC) (WS+A1C7) Prime
* U+2033 (WS+A1C8) Double Prime
*
* + Letterlike symbols
*
* U+2103 (WS+A1C9) Degrees Centigrade
*
* + Mathemetical opetartors
*
* U+2236 (GB+A1C3) Ratio
*
* + Form and Chart components
*
* U+2574 (B5+A15A) Forms Light Left
*
* + CJK symbols and punctuation
*
* U+3001 (SJ+8141) (GB+A1A2) (B5+A142) Ideographic comma
* U+3002 (SJ+8142) (GB+A1A3) (B5+A143) Ideographic period
* U+3003 (GB+A1A8) Ditto mark
* U+3005 (GB+A1A9) Ideographic iteration
* U+3009 (GB+A1B5) (B5+A172) (WS+A1B5) Closing angle bracket
* U+300B (SJ+8174) (GB+A1B7) (B5+A16E) (WS+A1B7) Closing double angle bracket
* U+300D (SJ+8176) (GB+A1B9) (B5+A176) (WS+A1B9) Closing corner bracket
* U+300F (SJ+8178) (GB+A1BB) (B5+A17A) (WS+A1BB) Closing white corner bracket
* U+3011 (SJ+817A) (GB+A1BF) (B5+A16A) (WS+A1BD) Closing black lenticular bracket
* U+3015 (SJ+816C) (GB+A1B3) (B5+A166) (WS+A1B3) Closing tortoise shell bracket
* U+3017 (GB+A1BD) Closing white lenticular bracket
* U+301E (B5+A1AA) Double Prime Quotation Mark
*
* + Hiragana
*
* U+309B (SJ+814A) Katakana-Hiragana voiced sound mark
* U+309C (SJ+814B) Katakana-Hiragana semi-voiced sound mark
*
* + CNS 11643 compatibility
*
* U+FE30 (B5+A14A) Glyph for Vertical 2 Dot Leader
* U+FE31 (B5+A157) Glyph For Vertical Em Dash
* U+FE33 (B5+A159) Glyph for Vertical Spacing Underscore
* U+FE34 (B5+A15B) Glyph for Vertical Spacing Wavy Underscore
* U+FE36 (B5+A160) Glyph For Vertical Closing Parenthesis
* U+FE38 (B5+A164) Glyph For Vertical Closing Curly Bracket
* U+FE3A (B5+A168) Glyph For Vertical Closing Tortoise Shell Bracket
* U+FE3C (B5+A16C) Glyph For Vertical Closing Black Lenticular Bracket
* U+FE3E (B5+A16E) Closing Double Angle Bracket
* U+FE40 (B5+A174) Glyph For Vertical Closing Angle Bracket
* U+FE42 (B5+A178) Glyph For Vertical Closing Corner Bracket
* U+FE44 (B5+A17C) Glyph For Vertical Closing White Corner Bracket
* U+FE4F (B5+A15C) Spacing Wavy Underscore
*
* + Small variants
*
* U+FE50 (B5+A14D) Small Comma
* U+FE51 (B5+A14E) Small Ideographic Comma
* U+FE52 (B5+A14F) Small Period
* U+FE54 (B5+A151) Small Semicolon
* U+FE55 (B5+A152) Small Colon
* U+FE56 (B5+A153) Small Question Mark
* U+FE57 (B5+A154) Small Exclamation Mark
* U+FE5A (B5+A17E) Small Closing Parenthesis
* U+FE5C (B5+A1A2) Small Closing Curly Bracket
* U+FE5E (B5+A1A4) Small Closing Tortoise Shell Bracket
*
* + Fullwidth ASCII variants
*
* U+FF01 (SJ+8149) (GB+A3A1) (B5+A149) (WS+A3A1) Fullwidth exclamation mark
* U+FF02 (GB+A3A2) Fullwidth Quotation mark
* U+FF05 (WS+A3A5) Fullwidth Percent Sign
* U+FF07 (GB+A3A7) Fullwidth Apostrophe
* U+FF09 (SJ+816A) (GB+A3A9) (B5+A15E) (WS+A3A9) Fullwidth Closing parenthesis
* U+FF0C (SJ+8143) (GB+A3AC) (B5+A141) (WS+A3AC) Fullwidth comma
* U+FF0D (GB+A3AD) Fullwidth Hyphen-minus
* U+FF0E (SJ+8144) (B5+A144) (WS+A3AE) Fullwidth period
* U+FF1A (GB+A3BA) (B4+A147) (WS+A3BA) Fullwidth colon
* U+FF1B (GB+A3BB) (B5+A146) (WS+A3BB) Fullwidth semicolon
* U+FF1E (SJ+8184) Fullwidth Greater-than sign
* U+FF1F (SJ+8148) (GB+A3BF) (B5+A148) (WS+A3BF) Fullwidth question mark
* U+FF3D (SJ+816E) (GB+A3DD) (WS+A3DD) Fullwidth Closing square bracket
* U+FF5C (B5+A155) Fullwidth Vertical Bar
* U+FF5D (SJ+8170) (B5+A162) (WS+A3FD) Fullwidth Closing curly bracket
* U+FF5E (GB+A1AB) Fullwidth Spacing tilde
*
* + Halfwidth Katakana variants
*
* U+FF61 (SJ+00A1) Halfwidth Ideographic period
* U+FF63 (SJ+00A3) Halfwidth Closing corner bracket
* U+FF64 (SJ+00A4) Halfwidth Ideographic comma
* U+FF9E (SJ+00DE) Halfwidth Katakana voiced sound mark
* U+FF9F (SJ+00DF) Halfwidth Katakana semi-voiced sound mark
*
* + Fullwidth symbol variants
*
* U+FFE0 (WS+A1CB) Fullwidth Cent Sign
*
\***************************************************************************/
#if 0 // not currently used --- FYI only
/***************************************************************************\
* Start Break table
* These character should not be the last charatcer of the line.
\***************************************************************************/
CONST BYTE aASCII_StartBreak[] = {
/* 00 0 1 2 3 4 5 6 7 8 9 A B C D E F */
/* 2X */ 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0,
/* 3X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
/* 4X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 5X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0,
/* 6X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 7X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1
};
CONST BYTE aCJKSymbol_StartBreak[] = {
/* 30 0 1 2 3 4 5 6 7 8 9 A B C D E F */
/* 0X */ 1, 0, 1, 0, 1, 0, 1, 0,
/* 1X */ 1, 0, 0, 0, 1
};
CONST BYTE aFullWidthHalfWidthVariants_StartBreak[] = {
/* FF 0 1 2 3 4 5 6 7 8 9 A B C D E F */
/* 0X */ 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0,
/* 1X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
/* 2X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 3X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
/* 4X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 5X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
/* 6X */ 0, 0, 1
};
#endif
/***************************************************************************\
* End Break table.
* These character should not be the top charatcer of the line.
\***************************************************************************/
CONST BYTE aASCII_Latin1_EndBreak[] = {
/* 00 0 1 2 3 4 5 6 7 8 9 A B C D E F */
/* 2X */ 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0,
/* 3X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 1,
/* 4X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 5X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
/* 6X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 7X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
/* 8X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 9X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* AX */ 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0,
/* BX */ 1, 0, 0, 0, 0, 0, 0, 1
};
CONST BYTE aGeneralPunctuation_EndBreak[] = {
/* 20 0 1 2 3 4 5 6 7 8 9 A B C D E F */
/* 1X */ 1, 1, 1, 1, 0, 1, 1, 0, 0, 0, 1, 0, 0,
/* 2X */ 0, 0, 1, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0,
/* 3X */ 0, 0, 1, 1
};
CONST BYTE aCJKSymbol_EndBreak[] = {
/* 30 0 1 2 3 4 5 6 7 8 9 A B C D E F */
/* 0X */ 1, 1, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1,
/* 1X */ 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1
};
CONST BYTE aCNS11643_SmallVariants_EndBreak[] = {
/* FE 0 1 2 3 4 5 6 7 8 9 A B C D E F */
/* 3X */ 1, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0,
/* 4X */ 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
/* 5X */ 1, 1, 1, 0, 1, 1, 1, 1, 0, 0, 1, 0, 1, 0, 1
};
CONST BYTE aFullWidthHalfWidthVariants_EndBreak[] = {
/* FF 0 1 2 3 4 5 6 7 8 9 A B C D E F */
/* 0X */ 1, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 1, 1, 1, 0,
/* 1X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 1,
/* 2X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 3X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
/* 4X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 5X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0,
/* 6X */ 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 7X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 8X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
/* 9X */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1
};
/***************************************************************************\
* UserIsFELineBreak() - Detects Far East word breaking characters. *
* *
* History: *
* 10-Mar-1996 HideyukN Created. *
\***************************************************************************/
#if 0 // not currently used --- FYI only
BOOL UserIsFELineBreakStart(WCHAR wch)
{
switch (wch>>8)
{
case 0x00:
// Check if word breaking chars in ASCII.
if ((wch >= 0x0024) && (wch <= 0x007B))
return ((BOOL)(aASCII_StartBreak[wch - 0x0024]));
else
return FALSE;
case 0x20:
// Check if work breaking chars in "General punctuation"
if ((wch == 0x2018) || (wch == 0x201C))
return TRUE;
else
return FALSE;
case 0x30:
// Check if word breaking chars in "CJK symbols and punctuation"
// and Hiragana.
if ((wch >= 0x3008) && (wch <= 0x3014))
return ((BOOL)(aCJKSymbol_StartBreak[wch - 0x3008]));
else
return FALSE;
case 0xFF:
// Check if word breaking chars in "Fullwidth ASCII variants",
// "Halfwidth Katakana variants" or "Fullwidth Symbol variants".
if ((wch >= 0xFF04) && (wch <= 0xFF62))
return ((BOOL)(aFullWidthHalfWidthVariants_StartBreak[wch - 0xFF04]));
else if ((wch == 0xFFE1) || (wch == 0xFFE6))
return TRUE;
else
return FALSE;
default:
return FALSE;
}
}
#endif
BOOL UserIsFELineBreakEnd(WCHAR wch)
{
switch (wch>>8)
{
case 0x00:
// Check if word breaking chars in ASCII or Latin1.
if ((wch >= 0x0021) && (wch <= 0x00B7))
return ((BOOL)(aASCII_Latin1_EndBreak[wch - 0x0021]));
else
return FALSE;
case 0x02:
// Check if work breaking chars in "Modifier letters"
if ((wch == 0x02C7) || (wch == 0x02C9))
return TRUE;
else
return FALSE;
case 0x20:
// Check if work breaking chars in "General punctuation"
if ((wch >= 0x2013) && (wch <= 0x2033))
return ((BOOL)(aGeneralPunctuation_EndBreak[wch - 0x2013]));
else
return FALSE;
case 0x21:
// Check if work breaking chars in "Letterlike symbols"
if (wch == 0x2103)
return TRUE;
else
return FALSE;
case 0x22:
// Check if work breaking chars in "Mathemetical opetartors"
if (wch == 0x2236)
return TRUE;
else
return FALSE;
case 0x25:
// Check if work breaking chars in "Form and Chart components"
if (wch == 0x2574)
return TRUE;
else
return FALSE;
case 0x30:
// Check if word breaking chars in "CJK symbols and punctuation"
// and Hiragana.
if ((wch >= 0x3001) && (wch <= 0x301E))
return ((BOOL)(aCJKSymbol_EndBreak[wch - 0x3001]));
else if ((wch == 0x309B) || (wch == 0x309C))
return TRUE;
else
return FALSE;
case 0xFE:
// Check if word breaking chars in "CNS 11643 compatibility"
// or "Small variants".
if ((wch >= 0xFE30) && (wch <= 0xFE5E))
return ((BOOL)(aCNS11643_SmallVariants_EndBreak[wch - 0xFE30]));
else
return FALSE;
case 0xFF:
// Check if word breaking chars in "Fullwidth ASCII variants",
// "Halfwidth Katakana variants" or "Fullwidth symbol variants".
if ((wch >= 0xFF01) && (wch <= 0xFF9F))
return ((BOOL)(aFullWidthHalfWidthVariants_EndBreak[wch - 0xFF01]));
else if (wch >= 0xFFE0)
return TRUE;
else
return FALSE;
default:
return FALSE;
}
}
#define UserIsFELineBreak(wChar) UserIsFELineBreakEnd(wChar)
typedef struct _FULLWIDTH_UNICODE {
WCHAR Start;
WCHAR End;
} FULLWIDTH_UNICODE, *PFULLWIDTH_UNICODE;
#define NUM_FULLWIDTH_UNICODES 4
CONST FULLWIDTH_UNICODE FullWidthUnicodes[] =
{
{ 0x4E00, 0x9FFF }, // CJK_UNIFIED_IDOGRAPHS
{ 0x3040, 0x309F }, // HIRAGANA
{ 0x30A0, 0x30FF }, // KATAKANA
{ 0xAC00, 0xD7A3 } // HANGUL
};
BOOL UserIsFullWidth(WCHAR wChar)
{
int index;
// Early out for ASCII.
if (wChar < 0x0080)
{
// if the character < 0x0080, it should be a halfwidth character.
return FALSE;
}
// Scan FullWdith definition table... most of FullWidth character is
// defined here... this is more faster than call NLS API.
for (index = 0; index < NUM_FULLWIDTH_UNICODES; index++)
{
if ((wChar >= FullWidthUnicodes[index].Start) && (wChar <= FullWidthUnicodes[index].End))
return TRUE;
}
// BUGBUG: We need one more case here to match NT5 implementation - beomoh
// if this Unicode character is mapped to Double-Byte character,
// this is also FullWidth character..
return FALSE;
}
LPCWSTR GetNextWordbreak(LPCWSTR lpch,
LPCWSTR lpchEnd,
DWORD dwFormat,
LPDRAWTEXTDATA lpDrawInfo)
{
/* ichNonWhite is used to make sure we always make progress. */
int ichNonWhite = 1;
int ichComplexBreak = 0; // Breaking opportunity for complex scripts
#if ((DT_WORDBREAK & ~0xff) != 0)
#error cannot use BOOLEAN for DT_WORDBREAK, or you should use "!!" before assigning it
#endif
BOOLEAN fBreakSpace = (BOOLEAN)(dwFormat & DT_WORDBREAK);
// If DT_WORDBREAK and DT_NOFULLWIDTHCHARBREAK are both set, we must
// stop assuming FullWidth characters as word as we're doing in
// NT4 and Win95. Instead, CR/LF and/or white space will only be
// a line-break characters.
BOOLEAN fDbcsCharBreak = (fBreakSpace && !(dwFormat & DT_NOFULLWIDTHCHARBREAK));
// We must terminate this loop before lpch == lpchEnd, otherwise, we may gp fault during *lpch.
while (lpch < lpchEnd)
{
switch (*lpch)
{
case CR:
case LF:
return lpch;
case '\t':
case ' ':
if (fBreakSpace)
return (lpch + ichNonWhite);
// FALL THRU //
default:
// Since most Japanese writing don't use space character
// to separate each word, we define each Kanji character
// as a word.
if (fDbcsCharBreak && UserIsFullWidth(*lpch))
{
if (!ichNonWhite)
return lpch;
// if the next character is the last character of this string,
// We return the character, even this is a "KINSOKU" charcter...
if ((lpch+1) != lpchEnd)
{
// Check next character of FullWidth character.
// if the next character is "KINSOKU" character, the character
// should be handled as a part of previous FullWidth character.
// Never handle is as A character, and should not be a Word also.
if (UserIsFELineBreak(*(lpch+1)))
{
// Then if the character is "KINSOKU" character, we return
// the next of this character,...
return (lpch + 1 + 1);
}
}
// Otherwise, we just return the chracter that is next of FullWidth
// Character. Because we treat A FullWidth chacter as A Word.
return (lpch + 1);
}
lpch++;
ichNonWhite = 0;
}
}
return lpch;
}
// This routine returns the count of accelerator mnemonics and the
// character location (starting at 0) of the character to underline.
// A single CH_PREFIX character will be striped and the following character
// underlined, all double CH_PREFIX character sequences will be replaced by
// a single CH_PREFIX (this is done by PSMTextOut). This routine is used
// to determine the actual character length of the string that will be
// printed, and the location the underline should be placed. Only
// cch characters from the input string will be processed. If the lpstrCopy
// parameter is non-NULL, this routine will make a printable copy of the
// string with all single prefix characters removed and all double prefix
// characters collapsed to a single character. If copying, a maximum
// character count must be specified which will limit the number of
// characters copied.
//
// The location of the single CH_PREFIX is returned in the low order
// word, and the count of CH_PREFIX characters that will be striped
// from the string during printing is in the hi order word. If the
// high order word is 0, the low order word is meaningless. If there
// were no single prefix characters (i.e. nothing to underline), the
// low order word will be -1 (to distinguish from location 0).
//
// These routines assume that there is only one single CH_PREFIX character
// in the string.
//
// WARNING! this rountine returns information in BYTE count not CHAR count
// (so it can easily be passed onto GreExtTextOutW which takes byte
// counts as well)
LONG GetPrefixCount(
LPCWSTR lpstr,
int cch,
LPWSTR lpstrCopy,
int charcopycount)
{
int chprintpos = 0; // Num of chars that will be printed
int chcount = 0; // Num of prefix chars that will be removed
int chprefixloc = -1; // Pos (in printed chars) of the prefix
WCHAR ch;
// If not copying, use a large bogus count...
if (lpstrCopy == NULL)
charcopycount = 32767;
while ((cch-- > 0) && *lpstr && charcopycount-- != 0)
{
// Is this guy a prefix character ?
if ((ch = *lpstr++) == CH_PREFIX)
{
// Yup - increment the count of characters removed during print.
chcount++;
// Is the next also a prefix char?
if (*lpstr != CH_PREFIX)
{
// Nope - this is a real one, mark its location.
chprefixloc = chprintpos;
}
else
{
// yup - simply copy it if copying.
if (lpstrCopy != NULL)
*(lpstrCopy++) = CH_PREFIX;
cch--;
lpstr++;
chprintpos++;
}
}
else if (ch == CH_ENGLISHPREFIX) // Still needs to be parsed
{
// Yup - increment the count of characters removed during print.
chcount++;
// Next character is a real one, mark its location.
chprefixloc = chprintpos;
}
else if (ch == CH_KANJIPREFIX) // Still needs to be parsed
{
// We only support Alpha Numeric(CH_ENGLISHPREFIX).
// no support for Kana(CH_KANJIPREFIX).
// Yup - increment the count of characters removed during print.
chcount++;
if(cch)
{
// don't copy the character
chcount++;
lpstr++;
cch--;
}
}
else
{
// Nope - just inc count of char. that will be printed
chprintpos++;
if (lpstrCopy != NULL)
*(lpstrCopy++) = ch;
}
}
if (lpstrCopy != NULL)
*lpstrCopy = 0;
// Return the character counts
return MAKELONG(chprefixloc, chcount);
}
// Returns total width of prefix character. Japanese Windows has
// three shortcut prefixes, '&',\036 and \037. They may have
// different width.
int KKGetPrefixWidth(HDC hdc, LPCWSTR lpStr, int cch)
{
SIZE size;
SIZE iPrefix1 = {-1L,-1L};
SIZE iPrefix2 = {-1L,-1L};
SIZE iPrefix3 = {-1L,-1L};
int iTotal = 0;
while (cch-- > 0 && *lpStr)
{
switch(*lpStr)
{
case CH_PREFIX:
if (lpStr[1] != CH_PREFIX)
{
if (iPrefix1.cx == -1)
GetTextExtentPointWrap(hdc, lpStr, 1, &iPrefix1);
iTotal += iPrefix1.cx;
}
else
{
lpStr++;
cch--;
}
break;
case CH_ENGLISHPREFIX:
if (iPrefix2.cx == -1)
GetTextExtentPointWrap(hdc, lpStr, 1, &iPrefix2);
iTotal += iPrefix2.cx;
break;
case CH_KANJIPREFIX:
if (iPrefix3.cx == -1)
GetTextExtentPointWrap(hdc, lpStr, 1, &iPrefix3);
iTotal += iPrefix3.cx;
// In NT, always alpha numeric mode, Then we have to sum
// KANA accel key prefix non visible char width.
// so always add the extent for next char.
GetTextExtentPointWrap(hdc, lpStr, 1, &size);
iTotal += size.cx;
break;
default:
// No need to taking care of Double byte since 2nd byte of
// DBC is grater than 0x2f but all shortcut keys are less
// than 0x30.
break;
}
lpStr++;
}
return iTotal;
}
// Outputs the text and puts and _ below the character with an &
// before it. Note that this routine isn't used for menus since menus
// have their own special one so that it is specialized and faster...
void PSMTextOut(
HDC hdc,
int xLeft,
int yTop,
LPWSTR lpsz,
int cch,
DWORD dwFlags)
{
int cx;
LONG textsize, result;
WCHAR achWorkBuffer[255];
WCHAR *pchOut = achWorkBuffer;
TEXTMETRICW textMetric;
SIZE size;
RECT rc;
COLORREF color;
if (dwFlags & DT_NOPREFIX)
{
TextOutWrap(hdc, xLeft, yTop, lpsz, cch);
return;
}
if (cch > sizeof(achWorkBuffer)/sizeof(WCHAR))
{
pchOut = (WCHAR*)LocalAlloc(LPTR, (cch+1) * sizeof(WCHAR));
if (pchOut == NULL)
return;
}
result = GetPrefixCount(lpsz, cch, pchOut, cch);
// DT_PREFIXONLY is a new 5.0 option used when switching from keyboard cues off to on.
if (!(dwFlags & DT_PREFIXONLY))
TextOutWrap(hdc, xLeft, yTop, pchOut, cch - HIWORD(result));
// Any true prefix characters to underline?
if (LOWORD(result) == 0xFFFF || dwFlags & DT_HIDEPREFIX)
{
if (pchOut != achWorkBuffer)
LocalFree(pchOut);
return;
}
if (!GetTextMetricsW(hdc, &textMetric))
{
textMetric.tmOverhang = 0;
textMetric.tmAscent = 0;
}
// For proportional fonts, find starting point of underline.
if (LOWORD(result) != 0)
{
// How far in does underline start (if not at 0th byte.).
GetTextExtentPointWrap(hdc, pchOut, LOWORD(result), &size);
xLeft += size.cx;
// Adjust starting point of underline if not at first char and there is
// an overhang. (Italics or bold fonts.)
xLeft = xLeft - textMetric.tmOverhang;
}
// Adjust for proportional font when setting the length of the underline and
// height of text.
GetTextExtentPointWrap(hdc, pchOut + LOWORD(result), 1, &size);
textsize = size.cx;
// Find the width of the underline character. Just subtract out the overhang
// divided by two so that we look better with italic fonts. This is not
// going to effect embolded fonts since their overhang is 1.
cx = LOWORD(textsize) - textMetric.tmOverhang / 2;
// Get height of text so that underline is at bottom.
yTop += textMetric.tmAscent + 1;
// Draw the underline using the foreground color.
SetRect(&rc, xLeft, yTop, xLeft+cx, yTop+1);
color = SetBkColor(hdc, GetTextColor(hdc));
ExtTextOutWrap(hdc, xLeft, yTop, ETO_OPAQUE, &rc, TEXT(""), 0, NULL);
SetBkColor(hdc, color);
if (pchOut != achWorkBuffer)
LocalFree(pchOut);
}
int DT_GetExtentMinusPrefixes(HDC hdc, LPCWSTR lpchStr, int cchCount, UINT wFormat, int iOverhang)
{
int iPrefixCount;
int cxPrefixes = 0;
WCHAR PrefixChar = CH_PREFIX;
SIZE size;
if (!(wFormat & DT_NOPREFIX) &&
(iPrefixCount = HIWORD(GetPrefixCount(lpchStr, cchCount, NULL, 0))))
{
// Kanji Windows has three shortcut prefixes...
if (g_fDBCSEnabled)
{
// 16bit apps compatibility
cxPrefixes = KKGetPrefixWidth(hdc, lpchStr, cchCount) - (iPrefixCount * iOverhang);
}
else
{
cxPrefixes = GetTextExtentPointWrap(hdc, &PrefixChar, 1, &size);
cxPrefixes = size.cx - iOverhang;
cxPrefixes *= iPrefixCount;
}
}
GetTextExtentPointWrap(hdc, lpchStr, cchCount, &size);
return (size.cx - cxPrefixes);
}
// This will draw the given string in the given location without worrying
// about the left/right justification. Gets the extent and returns it.
// If fDraw is TRUE and if NOT DT_CALCRECT, this draws the text.
// NOTE: This returns the extent minus Overhang.
int DT_DrawStr(HDC hdc, int xLeft, int yTop, LPCWSTR lpchStr,
int cchCount, BOOL fDraw, UINT wFormat,
LPDRAWTEXTDATA lpDrawInfo)
{
LPCWSTR lpch;
int iLen;
int cxExtent;
int xOldLeft = xLeft; // Save the xLeft given to compute the extent later
int xTabLength = lpDrawInfo->cxTabLength;
int iTabOrigin = lpDrawInfo->rcFormat.left;
// Check if the tabs need to be expanded
if (wFormat & DT_EXPANDTABS)
{
while (cchCount)
{
// Look for a tab
for (iLen = 0, lpch = lpchStr; iLen < cchCount; iLen++)
if(*lpch++ == TEXT('\t'))
break;
// Draw text, if any, upto the tab
if (iLen)
{
// Draw the substring taking care of the prefixes.
if (fDraw && !(wFormat & DT_CALCRECT)) // Only if we need to draw text
PSMTextOut(hdc, xLeft, yTop, (LPWSTR)lpchStr, iLen, wFormat);
// Get the extent of this sub string and add it to xLeft.
xLeft += DT_GetExtentMinusPrefixes(hdc, lpchStr, iLen, wFormat, lpDrawInfo->cxOverhang) - lpDrawInfo->cxOverhang;
}
//if a TAB was found earlier, calculate the start of next sub-string.
if (iLen < cchCount)
{
iLen++; // Skip the tab
if (xTabLength) // Tab length could be zero
xLeft = (((xLeft - iTabOrigin)/xTabLength) + 1)*xTabLength + iTabOrigin;
}
// Calculate the details of the string that remains to be drawn.
cchCount -= iLen;
lpchStr = lpch;
}
cxExtent = xLeft - xOldLeft;
}
else
{
// If required, draw the text
if (fDraw && !(wFormat & DT_CALCRECT))
PSMTextOut(hdc, xLeft, yTop, (LPWSTR)lpchStr, cchCount, wFormat);
// Compute the extent of the text.
cxExtent = DT_GetExtentMinusPrefixes(hdc, lpchStr, cchCount, wFormat, lpDrawInfo->cxOverhang) - lpDrawInfo->cxOverhang;
}
return cxExtent;
}
// This function draws one complete line with proper justification
void DT_DrawJustifiedLine(HDC hdc, int yTop, LPCWSTR lpchLineSt, int cchCount, UINT wFormat, LPDRAWTEXTDATA lpDrawInfo)
{
LPRECT lprc;
int cxExtent;
int xLeft;
lprc = &(lpDrawInfo->rcFormat);
xLeft = lprc->left;
// Handle the special justifications (right or centered) properly.
if (wFormat & (DT_CENTER | DT_RIGHT))
{
cxExtent = DT_DrawStr(hdc, xLeft, yTop, lpchLineSt, cchCount, FALSE, wFormat, lpDrawInfo)
+ lpDrawInfo->cxOverhang;
if(wFormat & DT_CENTER)
xLeft = lprc->left + (((lprc->right - lprc->left) - cxExtent) >> 1);
else
xLeft = lprc->right - cxExtent;
}
else
xLeft = lprc->left;
// Draw the whole line.
cxExtent = DT_DrawStr(hdc, xLeft, yTop, lpchLineSt, cchCount, TRUE, wFormat, lpDrawInfo)
+ lpDrawInfo->cxOverhang;
if (cxExtent > lpDrawInfo->cxMaxExtent)
lpDrawInfo->cxMaxExtent = cxExtent;
}
// This is called at the begining of DrawText(); This initializes the
// DRAWTEXTDATA structure passed to this function with all the required info.
BOOL DT_InitDrawTextInfo(
HDC hdc,
LPRECT lprc,
UINT wFormat,
LPDRAWTEXTDATA lpDrawInfo,
LPDRAWTEXTPARAMS lpDTparams)
{
SIZE sizeViewPortExt = {0, 0}, sizeWindowExt = {0, 0};
TEXTMETRICW tm;
LPRECT lprcDest;
int iTabLength = 8; // Default Tab length is 8 characters.
int iLeftMargin;
int iRightMargin;
if (lpDTparams)
{
// Only if DT_TABSTOP flag is mentioned, we must use the iTabLength field.
if (wFormat & DT_TABSTOP)
iTabLength = lpDTparams->iTabLength;
iLeftMargin = lpDTparams->iLeftMargin;
iRightMargin = lpDTparams->iRightMargin;
}
else
iLeftMargin = iRightMargin = 0;
// Get the View port and Window extents for the given DC
// If this call fails, hdc must be invalid
if (!GetViewportExtEx(hdc, &sizeViewPortExt))
return FALSE;
GetWindowExtEx(hdc, &sizeWindowExt);
// For the current mapping mode, find out the sign of x from left to right.
lpDrawInfo->iXSign = (((sizeViewPortExt.cx ^ sizeWindowExt.cx) & 0x80000000) ? -1 : 1);
// For the current mapping mode, find out the sign of y from top to bottom.
lpDrawInfo->iYSign = (((sizeViewPortExt.cy ^ sizeWindowExt.cy) & 0x80000000) ? -1 : 1);
// Calculate the dimensions of the current font in this DC.
GetTextMetrics(hdc, &tm);
// cyLineHeight is in pixels (This will be signed).
lpDrawInfo->cyLineHeight = (tm.tmHeight +
((wFormat & DT_EXTERNALLEADING) ? tm.tmExternalLeading : 0)) * lpDrawInfo->iYSign;
// cxTabLength is the tab length in pixels (This will not be signed)
lpDrawInfo->cxTabLength = tm.tmAveCharWidth * iTabLength;
// Set the cxOverhang
lpDrawInfo->cxOverhang = tm.tmOverhang;
// Set up the format rectangle based on the margins.
lprcDest = &(lpDrawInfo->rcFormat);
*lprcDest = *lprc;
// We need to do the following only if the margins are given
if (iLeftMargin | iRightMargin)
{
lprcDest->left += iLeftMargin * lpDrawInfo->iXSign;
lprcDest->right -= (lpDrawInfo->cxRightMargin = iRightMargin * lpDrawInfo->iXSign);
}
else
lpDrawInfo->cxRightMargin = 0; // Initialize to zero.
// cxMaxWidth is unsigned.
lpDrawInfo->cxMaxWidth = (lprcDest->right - lprcDest->left) * lpDrawInfo->iXSign;
lpDrawInfo->cxMaxExtent = 0; // Initialize this to zero.
return TRUE;
}
// In the case of WORDWRAP, we need to treat the white spaces at the
// begining/end of each line specially. This function does that.
// lpStNext = points to the begining of next line.
// lpiCount = points to the count of characters in the current line.
LPCWSTR DT_AdjustWhiteSpaces(LPCWSTR lpStNext, LPINT lpiCount, UINT wFormat)
{
switch (wFormat & DT_HFMTMASK)
{
case DT_LEFT:
// Prevent a white space at the begining of a left justfied text.
// Is there a white space at the begining of next line......
if ((*lpStNext == L' ') || (*lpStNext == L'\t'))
{
// ...then, exclude it from next line.
lpStNext++;
}
break;
case DT_RIGHT:
// Prevent a white space at the end of a RIGHT justified text.
// Is there a white space at the end of current line,.......
if ((*(lpStNext-1) == L' ') || (*(lpStNext - 1) == L'\t'))
{
// .....then, Skip the white space from the current line.
(*lpiCount)--;
}
break;
case DT_CENTER:
// Exclude white spaces from the begining and end of CENTERed lines.
// If there is a white space at the end of current line.......
if ((*(lpStNext-1) == L' ') || (*(lpStNext - 1) == L'\t'))
(*lpiCount)--; //...., don't count it for justification.
// If there is a white space at the begining of next line.......
if ((*lpStNext == L' ') || (*lpStNext == L'\t'))
lpStNext++; //...., exclude it from next line.
break;
}
return lpStNext;
}
// A word needs to be broken across lines and this finds out where to break it.
LPCWSTR DT_BreakAWord(HDC hdc, LPCWSTR lpchText, int iLength, int iWidth, UINT wFormat, int iOverhang)
{
int iLow = 0, iHigh = iLength;
int iNew;
while ((iHigh - iLow) > 1)
{
iNew = iLow + (iHigh - iLow)/2;
if(DT_GetExtentMinusPrefixes(hdc, lpchText, iNew, wFormat, iOverhang) > iWidth)
iHigh = iNew;
else
iLow = iNew;
}
// If the width is too low, we must print atleast one char per line.
// Else, we will be in an infinite loop.
if(!iLow && iLength)
iLow = 1;
return (lpchText+iLow);
}
// This finds out the location where we can break a line.
// Returns LPCSTR to the begining of next line.
// Also returns via lpiLineLength, the length of the current line.
// NOTE: (lpstNextLineStart - lpstCurrentLineStart) is not equal to the
// line length; This is because, we exclude some white spaces at the begining
// and/or end of lines; Also, CR/LF is excluded from the line length.
LPWSTR DT_GetLineBreak(
HDC hdc,
LPCWSTR lpchLineStart,
int cchCount,
DWORD dwFormat,
LPINT lpiLineLength,
LPDRAWTEXTDATA lpDrawInfo)
{
LPCWSTR lpchText, lpchEnd, lpch, lpchLineEnd;
int cxStart, cxExtent, cxNewExtent;
BOOL fAdjustWhiteSpaces = FALSE;
WCHAR ch;
cxStart = lpDrawInfo->rcFormat.left;
cxExtent = cxNewExtent = 0;
lpchText = lpchLineStart;
lpchEnd = lpchLineStart + cchCount;
while(lpchText < lpchEnd)
{
lpchLineEnd = lpch = GetNextWordbreak(lpchText, lpchEnd, dwFormat, lpDrawInfo);
// DT_DrawStr does not return the overhang; Otherwise we will end up
// adding one overhang for every word in the string.
// For simulated Bold fonts, the summation of extents of individual
// words in a line is greater than the extent of the whole line. So,
// always calculate extent from the LineStart.
// BUGTAG: #6054 -- Win95B -- SANKAR -- 3/9/95 --
cxNewExtent = DT_DrawStr(hdc, cxStart, 0, lpchLineStart, (int)(((PBYTE)lpch - (PBYTE)lpchLineStart)/sizeof(WCHAR)),
FALSE, dwFormat, lpDrawInfo);
if ((dwFormat & DT_WORDBREAK) && ((cxNewExtent + lpDrawInfo->cxOverhang) > lpDrawInfo->cxMaxWidth))
{
// Are there more than one word in this line?
if (lpchText != lpchLineStart)
{
lpchLineEnd = lpch = lpchText;
fAdjustWhiteSpaces = TRUE;
}
else
{
//One word is longer than the maximum width permissible.
//See if we are allowed to break that single word.
if((dwFormat & DT_EDITCONTROL) && !(dwFormat & DT_WORD_ELLIPSIS))
{
lpchLineEnd = lpch = DT_BreakAWord(hdc, lpchText, (int)(((PBYTE)lpch - (PBYTE)lpchText)/sizeof(WCHAR)),
lpDrawInfo->cxMaxWidth - cxExtent, dwFormat, lpDrawInfo->cxOverhang); //Break that word
//Note: Since we broke in the middle of a word, no need to
// adjust for white spaces.
}
else
{
fAdjustWhiteSpaces = TRUE;
// Check if we need to end this line with ellipsis
if(dwFormat & DT_WORD_ELLIPSIS)
{
// Don't do this if already at the end of the string.
if (lpch < lpchEnd)
{
// If there are CR/LF at the end, skip them.
if ((ch = *lpch) == CR || ch == LF)
{
if ((++lpch < lpchEnd) && (*lpch == (WCHAR)(ch ^ (LF ^ CR))))
lpch++;
fAdjustWhiteSpaces = FALSE;
}
}
}
}
}
// Well! We found a place to break the line. Let us break from this loop;
break;
}
else
{
// Don't do this if already at the end of the string.
if (lpch < lpchEnd)
{
if ((ch = *lpch) == CR || ch == LF)
{
if ((++lpch < lpchEnd) && (*lpch == (WCHAR)(ch ^ (LF ^ CR))))
lpch++;
fAdjustWhiteSpaces = FALSE;
break;
}
}
}
// Point at the beginning of the next word.
lpchText = lpch;
cxExtent = cxNewExtent;
}
// Calculate the length of current line.
*lpiLineLength = (INT)((PBYTE)lpchLineEnd - (PBYTE)lpchLineStart)/sizeof(WCHAR);
// Adjust the line length and lpch to take care of spaces.
if(fAdjustWhiteSpaces && (lpch < lpchEnd))
lpch = DT_AdjustWhiteSpaces(lpch, lpiLineLength, dwFormat);
// return the begining of next line;
return (LPWSTR)lpch;
}
// This function checks whether the given string fits within the given
// width or we need to add end-ellipse. If it required end-ellipses, it
// returns TRUE and it returns the number of characters that are saved
// in the given string via lpCount.
BOOL NeedsEndEllipsis(
HDC hdc,
LPCWSTR lpchText,
LPINT lpCount,
LPDRAWTEXTDATA lpDTdata,
UINT wFormat)
{
int cchText;
int ichMin, ichMax, ichMid;
int cxMaxWidth;
int iOverhang;
int cxExtent;
SIZE size;
cchText = *lpCount; // Get the current count.
if (cchText == 0)
return FALSE;
cxMaxWidth = lpDTdata->cxMaxWidth;
iOverhang = lpDTdata->cxOverhang;
cxExtent = DT_GetExtentMinusPrefixes(hdc, lpchText, cchText, wFormat, iOverhang);
if (cxExtent <= cxMaxWidth)
return FALSE;
// Reserve room for the "..." ellipses;
// (Assumption: The ellipses don't have any prefixes!)
GetTextExtentPointWrap(hdc, szEllipsis, CCHELLIPSIS, &size);
cxMaxWidth -= size.cx - iOverhang;
// If no room for ellipses, always show first character.
//
ichMax = 1;
if (cxMaxWidth > 0)
{
// Binary search to find characters that will fit.
ichMin = 0;
ichMax = cchText;
while (ichMin < ichMax)
{
// Be sure to round up, to make sure we make progress in
// the loop if ichMax == ichMin + 1.
ichMid = (ichMin + ichMax + 1) / 2;
cxExtent = DT_GetExtentMinusPrefixes(hdc, lpchText, ichMid, wFormat, iOverhang);
if (cxExtent < cxMaxWidth)
ichMin = ichMid;
else
{
if (cxExtent > cxMaxWidth)
ichMax = ichMid - 1;
else
{
// Exact match up up to ichMid: just exit.
ichMax = ichMid;
break;
}
}
}
// Make sure we always show at least the first character...
if (ichMax < 1)
ichMax = 1;
}
*lpCount = ichMax;
return TRUE;
}
// Returns a pointer to the last component of a path string.
//
// in:
// path name, either fully qualified or not
//
// returns:
// pointer into the path where the path is. if none is found
// returns a poiter to the start of the path
//
// c:\foo\bar -> bar
// c:\foo -> foo
// c:\foo\ -> c:\foo\ (REVIEW: is this case busted?)
// c:\ -> c:\ (REVIEW: this case is strange)
// c: -> c:
// foo -> foo
LPWSTR PathFindFileName(LPCWSTR pPath, int cchText)
{
LPCWSTR pT;
for (pT = pPath; cchText > 0 && *pPath; pPath++, cchText--)
{
if ((pPath[0] == L'\\' || pPath[0] == L':') && pPath[1])
pT = pPath + 1;
}
return (LPWSTR)pT;
}
// This adds a path ellipse to the given path name.
// Returns TRUE if the resultant string's extent is less the the
// cxMaxWidth. FALSE, if otherwise.
int AddPathEllipsis(
HDC hdc,
LPWSTR lpszPath,
int cchText,
UINT wFormat,
int cxMaxWidth,
int iOverhang)
{
int iLen;
UINT dxFixed, dxEllipsis;
LPWSTR lpEnd; /* end of the unfixed string */
LPWSTR lpFixed; /* start of text that we always display */
BOOL bEllipsisIn;
int iLenFixed;
SIZE size;
lpFixed = PathFindFileName(lpszPath, cchText);
if (lpFixed != lpszPath)
lpFixed--; // point at the slash
else
return cchText;
lpEnd = lpFixed;
bEllipsisIn = FALSE;
iLenFixed = cchText - (int)(lpFixed - lpszPath);
dxFixed = DT_GetExtentMinusPrefixes(hdc, lpFixed, iLenFixed, wFormat, iOverhang);
// It is assumed that the "..." string does not have any prefixes ('&').
GetTextExtentPointWrap(hdc, szEllipsis, CCHELLIPSIS, &size);
dxEllipsis = size.cx - iOverhang;
while (TRUE)
{
iLen = dxFixed + DT_GetExtentMinusPrefixes(hdc, lpszPath, (int)((PBYTE)lpEnd - (PBYTE)lpszPath)/sizeof(WCHAR),
wFormat, iOverhang) - iOverhang;
if (bEllipsisIn)
iLen += dxEllipsis;
if (iLen <= cxMaxWidth)
break;
bEllipsisIn = TRUE;
if (lpEnd <= lpszPath)
{
// Things didn't fit.
lpEnd = lpszPath;
break;
}
// Step back a character.
lpEnd--;
}
if (bEllipsisIn && (lpEnd + CCHELLIPSIS < lpFixed))
{
// NOTE: the strings could over lap here. So, we use LCopyStruct.
MoveMemory((lpEnd + CCHELLIPSIS), lpFixed, iLenFixed * sizeof(WCHAR));
CopyMemory(lpEnd, szEllipsis, CCHELLIPSIS * sizeof(WCHAR));
cchText = (int)(lpEnd - lpszPath) + CCHELLIPSIS + iLenFixed;
// now we can NULL terminate the string
*(lpszPath + cchText) = TEXT('\0');
}
return cchText;
}
// This function returns the number of characters actually drawn.
int AddEllipsisAndDrawLine(
HDC hdc,
int yLine,
LPCWSTR lpchText,
int cchText,
DWORD dwDTformat,
LPDRAWTEXTDATA lpDrawInfo)
{
LPWSTR pEllipsis = NULL;
WCHAR szTempBuff[MAXBUFFSIZE];
LPWSTR lpDest;
BOOL fAlreadyCopied = FALSE;
// Check if this is a filename with a path AND
// Check if the width is too narrow to hold all the text.
if ((dwDTformat & DT_PATH_ELLIPSIS) &&
((DT_GetExtentMinusPrefixes(hdc, lpchText, cchText, dwDTformat, lpDrawInfo->cxOverhang)) > lpDrawInfo->cxMaxWidth))
{
// We need to add Path-Ellipsis. See if we can do it in-place.
if (!(dwDTformat & DT_MODIFYSTRING)) {
// NOTE: When you add Path-Ellipsis, the string could grow by
// CCHELLIPSIS bytes.
if((cchText + CCHELLIPSIS + 1) <= MAXBUFFSIZE)
lpDest = szTempBuff;
else
{
// Alloc the buffer from local heap.
if(!(pEllipsis = (LPWSTR)LocalAlloc(LPTR, (cchText+CCHELLIPSIS+1)*sizeof(WCHAR))))
return 0;
lpDest = (LPWSTR)pEllipsis;
}
// Source String may not be NULL terminated. So, copy just
// the given number of characters.
CopyMemory(lpDest, lpchText, cchText*sizeof(WCHAR));
lpchText = lpDest; // lpchText points to the copied buff.
fAlreadyCopied = TRUE; // Local copy has been made.
}
// Add the path ellipsis now!
cchText = AddPathEllipsis(hdc, (LPWSTR)lpchText, cchText, dwDTformat, lpDrawInfo->cxMaxWidth, lpDrawInfo->cxOverhang);
}
// Check if end-ellipsis are to be added.
if ((dwDTformat & (DT_END_ELLIPSIS | DT_WORD_ELLIPSIS)) &&
NeedsEndEllipsis(hdc, lpchText, &cchText, lpDrawInfo, dwDTformat))
{
// We need to add end-ellipsis; See if we can do it in-place.
if (!(dwDTformat & DT_MODIFYSTRING) && !fAlreadyCopied)
{
// See if the string is small enough for the buff on stack.
if ((cchText+CCHELLIPSIS+1) <= MAXBUFFSIZE)
lpDest = szTempBuff; // If so, use it.
else {
// Alloc the buffer from local heap.
if (!(pEllipsis = (LPWSTR)LocalAlloc(LPTR, (cchText+CCHELLIPSIS+1)*sizeof(WCHAR))))
return 0;
lpDest = pEllipsis;
}
// Make a copy of the string in the local buff.
CopyMemory(lpDest, lpchText, cchText*sizeof(WCHAR));
lpchText = lpDest;
}
// Add an end-ellipsis at the proper place.
CopyMemory((LPWSTR)(lpchText+cchText), szEllipsis, (CCHELLIPSIS+1)*sizeof(WCHAR));
cchText += CCHELLIPSIS;
}
// Draw the line that we just formed.
DT_DrawJustifiedLine(hdc, yLine, lpchText, cchText, dwDTformat, lpDrawInfo);
// Free the block allocated for End-Ellipsis.
if (pEllipsis)
LocalFree(pEllipsis);
return cchText;
}
#ifdef WINNT
BOOL IsComplexScriptPresent(LPWSTR lpchText, int cchText)
{
if (g_bComplexPlatform) {
for (int i = 0; i < cchText; i++) {
if (InRange(lpchText[i], 0x0590, 0x0FFF)) {
return TRUE;
}
}
}
return FALSE;
}
#else
#define IsComplexScriptPresent(lpchText, cchText) g_bComplexPlatform
#endif
int DrawTextExPrivWrap(
HDC hdc,
LPWSTR lpchText,
int cchText,
LPRECT lprc,
UINT dwDTformat,
LPDRAWTEXTPARAMS lpDTparams)
{
DRAWTEXTDATA DrawInfo;
WORD wFormat = LOWORD(dwDTformat);
LPWSTR lpchTextBegin;
LPWSTR lpchEnd;
LPWSTR lpchNextLineSt;
int iLineLength;
int iySign;
int yLine;
int yLastLineHeight;
HRGN hrgnClip;
int iLineCount;
RECT rc;
BOOL fLastLine;
WCHAR ch;
UINT oldAlign;
// On NT5, we use system API behavior including fontlink
if (g_bRunOnNT5)
return DrawTextExW(hdc, lpchText, cchText, lprc, dwDTformat, lpDTparams);
if ((cchText == 0) && lpchText && (*lpchText))
{
// infoview.exe passes lpchText that points to '\0'
// Lotus Notes doesn't like getting a zero return here
return 1;
}
if (cchText == -1)
cchText = lstrlenW(lpchText);
else if (lpchText[cchText - 1] == L'\0')
cchText--; // accommodate counting of NULLS for ME
// We got the string length, then check if it a complex string or not.
// If yes then call the system DrawTextEx API to do the job it knows how to
// handle the complex scripts.
if (IsComplexScriptPresent(lpchText, cchText))
{
#ifdef WINNT
//Call the system DrawtextExW
return DrawTextExW(hdc, lpchText, cchText, lprc, dwDTformat, lpDTparams);
#else
HFONT hfont = NULL;
HFONT hfontSav = NULL;
int iRet;
if (hfont = GetBiDiFont(hdc))
hfontSav = (HFONT)SelectObject(hdc, hfont);
CStrIn str(lpchText, cchText);
iRet = DrawTextExA(hdc, str, str.strlen(), lprc, dwDTformat, lpDTparams);
if (hfont)
{
SelectObject(hdc, hfontSav);
DeleteObject(hfont);
}
return iRet;
#endif
}
if ((lpDTparams) && (lpDTparams->cbSize != sizeof(DRAWTEXTPARAMS)))
{
ASSERT(0 && "DrawTextExWorker: cbSize is invalid");
return 0;
}
// If DT_MODIFYSTRING is specified, then check for read-write pointer.
if ((dwDTformat & DT_MODIFYSTRING) &&
(dwDTformat & (DT_END_ELLIPSIS | DT_PATH_ELLIPSIS)))
{
if(IsBadWritePtr(lpchText, cchText))
{
ASSERT(0 && "DrawTextExWorker: For DT_MODIFYSTRING, lpchText must be read-write");
return 0;
}
}
// Initialize the DrawInfo structure.
if (!DT_InitDrawTextInfo(hdc, lprc, dwDTformat, (LPDRAWTEXTDATA)&DrawInfo, lpDTparams))
return 0;
// If the rect is too narrow or the margins are too wide.....Just forget it!
//
// If wordbreak is specified, the MaxWidth must be a reasonable value.
// This check is sufficient because this will allow CALCRECT and NOCLIP
// cases. --SANKAR.
//
// This also fixed all of our known problems with AppStudio.
if (DrawInfo.cxMaxWidth <= 0)
{
if (wFormat & DT_WORDBREAK)
{
ASSERT(0 && "DrawTextExW: FAILURE DrawInfo.cxMaxWidth <= 0");
return 1;
}
}
// if we're not doing the drawing, initialise the lpk-dll
if (dwDTformat & DT_RTLREADING)
oldAlign = SetTextAlign(hdc, TA_RTLREADING | GetTextAlign(hdc));
// If we need to clip, let us do that.
if (!(wFormat & DT_NOCLIP))
{
// Save clipping region so we can restore it later.
hrgnClip = CreateRectRgn(0,0,0,0);
if (hrgnClip != NULL)
{
if (GetClipRgn(hdc, hrgnClip) != 1)
{
DeleteObject(hrgnClip);
hrgnClip = (HRGN)-1;
}
rc = *lprc;
IntersectClipRect(hdc, rc.left, rc.top, rc.right, rc.bottom);
}
}
else
hrgnClip = NULL;
lpchTextBegin = lpchText;
lpchEnd = lpchText + cchText;
ProcessDrawText:
iLineCount = 0; // Reset number of lines to 1.
yLine = lprc->top;
if (wFormat & DT_SINGLELINE)
{
iLineCount = 1; // It is a single line.
// Process single line DrawText.
switch (wFormat & DT_VFMTMASK)
{
case DT_BOTTOM:
yLine = lprc->bottom - DrawInfo.cyLineHeight;
break;
case DT_VCENTER:
yLine = lprc->top + ((lprc->bottom - lprc->top - DrawInfo.cyLineHeight) / 2);
break;
}
cchText = AddEllipsisAndDrawLine(hdc, yLine, lpchText, cchText, dwDTformat, &DrawInfo);
yLine += DrawInfo.cyLineHeight;
lpchText += cchText;
}
else
{
// Multiline
// If the height of the rectangle is not an integral multiple of the
// average char height, then it is possible that the last line drawn
// is only partially visible. However, if DT_EDITCONTROL style is
// specified, then we must make sure that the last line is not drawn if
// it is going to be partially visible. This will help imitate the
// appearance of an edit control.
if (wFormat & DT_EDITCONTROL)
yLastLineHeight = DrawInfo.cyLineHeight;
else
yLastLineHeight = 0;
iySign = DrawInfo.iYSign;
fLastLine = FALSE;
// Process multiline DrawText.
while ((lpchText < lpchEnd) && (!fLastLine))
{
// Check if the line we are about to draw is the last line that needs
// to be drawn.
// Let us check if the display goes out of the clip rect and if so
// let us stop here, as an optimisation;
if (!(wFormat & DT_CALCRECT) && // We don't need to calc rect?
!(wFormat & DT_NOCLIP) && // Must we clip the display ?
// Are we outside the rect?
((yLine + DrawInfo.cyLineHeight + yLastLineHeight)*iySign > (lprc->bottom*iySign)))
{
fLastLine = TRUE; // Let us quit this loop
}
// We do the Ellipsis processing only for the last line.
if (fLastLine && (dwDTformat & (DT_END_ELLIPSIS | DT_PATH_ELLIPSIS)))
lpchText += AddEllipsisAndDrawLine(hdc, yLine, lpchText, cchText, dwDTformat, &DrawInfo);
else
{
lpchNextLineSt = (LPWSTR)DT_GetLineBreak(hdc, lpchText, cchText, dwDTformat, &iLineLength, &DrawInfo);
// Check if we need to put ellipsis at the end of this line.
// Also check if this is the last line.
if ((dwDTformat & DT_WORD_ELLIPSIS) ||
((lpchNextLineSt >= lpchEnd) && (dwDTformat & (DT_END_ELLIPSIS | DT_PATH_ELLIPSIS))))
AddEllipsisAndDrawLine(hdc, yLine, lpchText, iLineLength, dwDTformat, &DrawInfo);
else
DT_DrawJustifiedLine(hdc, yLine, lpchText, iLineLength, dwDTformat, &DrawInfo);
cchText -= (int)((PBYTE)lpchNextLineSt - (PBYTE)lpchText) / sizeof(WCHAR);
lpchText = lpchNextLineSt;
}
iLineCount++; // We draw one more line.
yLine += DrawInfo.cyLineHeight;
}
// For Win3.1 and NT compatibility, if the last char is a CR or a LF
// then the height returned includes one more line.
if (!(dwDTformat & DT_EDITCONTROL) &&
(lpchEnd > lpchTextBegin) && // If zero length it will fault.
(((ch = (*(lpchEnd-1))) == CR) || (ch == LF)))
yLine += DrawInfo.cyLineHeight;
}
// If DT_CALCRECT, modify width and height of rectangle to include
// all of the text drawn.
if (wFormat & DT_CALCRECT)
{
DrawInfo.rcFormat.right = DrawInfo.rcFormat.left + DrawInfo.cxMaxExtent * DrawInfo.iXSign;
lprc->right = DrawInfo.rcFormat.right + DrawInfo.cxRightMargin;
// If the Width is more than what was provided, we have to redo all
// the calculations, because, the number of lines can be less now.
// (We need to do this only if we have more than one line).
if((iLineCount > 1) && (DrawInfo.cxMaxExtent > DrawInfo.cxMaxWidth))
{
DrawInfo.cxMaxWidth = DrawInfo.cxMaxExtent;
lpchText = lpchTextBegin;
cchText = (int)((PBYTE)lpchEnd - (PBYTE)lpchTextBegin) / sizeof(WCHAR);
goto ProcessDrawText; // Start all over again!
}
lprc->bottom = yLine;
}
if (hrgnClip != NULL)
{
if (hrgnClip == (HRGN)-1)
ExtSelectClipRgn(hdc, NULL, RGN_COPY);
else
{
ExtSelectClipRgn(hdc, hrgnClip, RGN_COPY);
DeleteObject(hrgnClip);
}
}
if (dwDTformat & DT_RTLREADING)
SetTextAlign(hdc, oldAlign);
// Copy the number of characters actually drawn
if(lpDTparams != NULL)
lpDTparams->uiLengthDrawn = (UINT)((PBYTE)lpchText - (PBYTE)lpchTextBegin) / sizeof(WCHAR);
if (yLine == lprc->top)
return 1;
return (yLine - lprc->top);
}
int DrawTextWrap(HDC hdc, LPCWSTR lpchText, int cchText, LPRECT lprc, UINT format)
{
DRAWTEXTPARAMS DTparams;
LPDRAWTEXTPARAMS lpDTparams = NULL;
if (cchText < -1)
return(0);
if (format & DT_TABSTOP)
{
DTparams.cbSize = sizeof(DRAWTEXTPARAMS);
DTparams.iLeftMargin = DTparams.iRightMargin = 0;
DTparams.iTabLength = (format & 0xff00) >> 8;
lpDTparams = &DTparams;
format &= 0xffff00ff;
}
return DrawTextExPrivWrap(hdc, (LPWSTR)lpchText, cchText, lprc, format, lpDTparams);
}
#endif // FONT_LINK