mirror of
https://github.com/snowie2000/mactype.git
synced 2025-01-08 11:47:43 +08:00
320 lines
7.4 KiB
C++
320 lines
7.4 KiB
C++
#include "common.h"
|
||
#include "settings.h"
|
||
CRITICAL_SECTION CCriticalSectionLock::m_cs[20];
|
||
OWNED_CRITIAL_SECTION COwnedCriticalSectionLock::m_cs[2];
|
||
LONG CThreadCounter::interlock; //snowie!! C++霑倬怙隕<E68099>｢晏､也筏譏趣ｼ梧ｱ<E6A2A7>
|
||
TCHAR CGdippSettings::m_szexeName[MAX_PATH+1] = {0};
|
||
|
||
#ifdef _UNICODE
|
||
#undef CharPrev
|
||
#define CharPrev(s, c) ((c) - 1)
|
||
#endif
|
||
|
||
//手抜きのパス操作関数群
|
||
BOOL WINAPI PathIsRelative(LPCTSTR pszPath)
|
||
{
|
||
if (!pszPath || !*pszPath) {
|
||
return FALSE;
|
||
}
|
||
|
||
const TCHAR ch1 = pszPath[0];
|
||
const TCHAR ch2 = pszPath[1];
|
||
if (ch1 == _T('\\') && ch2 == _T('\\')) {
|
||
//UNC
|
||
return FALSE;
|
||
}
|
||
if (ch1 == _T('\\') || (ch1 && ch2 == _T(':'))) {
|
||
//絶対パス
|
||
return FALSE;
|
||
}
|
||
return TRUE;
|
||
}
|
||
|
||
BOOL WINAPI PathRemoveFileSpec(LPTSTR pszPath)
|
||
{
|
||
if (!pszPath) {
|
||
return FALSE;
|
||
}
|
||
LPTSTR p = pszPath + _tcslen(pszPath);
|
||
|
||
while (p >= pszPath) {
|
||
switch (*p) {
|
||
case _T('\\'):
|
||
case _T('/'):
|
||
if (p > pszPath) {
|
||
//c:\aaa -> c:\ <
|
||
//c:\ -> c:\ <
|
||
switch (*(p - 1)) {
|
||
case _T('\\'):
|
||
case _T('/'):
|
||
case _T(':'):
|
||
break;
|
||
default:
|
||
goto END;
|
||
}
|
||
}
|
||
case _T(':'):
|
||
// c:aaa -> c:
|
||
p++;
|
||
goto END;
|
||
}
|
||
if (p <= pszPath) {
|
||
break;
|
||
}
|
||
p = CharPrev(NULL, p);
|
||
}
|
||
|
||
END:
|
||
if (*p) {
|
||
*p = _T('\0');
|
||
return TRUE;
|
||
}
|
||
return FALSE;
|
||
}
|
||
|
||
LPTSTR WINAPI PathFindExtension(LPCTSTR pszPath)
|
||
{
|
||
if (!pszPath) {
|
||
return NULL;
|
||
}
|
||
|
||
LPCTSTR p, pszEnd;
|
||
p = pszEnd = pszPath + _tcslen(pszPath);
|
||
|
||
while (p > pszPath) {
|
||
switch (*p) {
|
||
case _T('.'):
|
||
return (LPTSTR)p;
|
||
case _T('\\'):
|
||
case _T('/'):
|
||
case _T(':'):
|
||
return (LPTSTR)pszEnd;
|
||
}
|
||
p = CharPrev(pszPath, p);
|
||
}
|
||
return (LPTSTR)pszEnd;
|
||
}
|
||
|
||
LPTSTR WINAPI PathAddBackslash(LPTSTR pszPath)
|
||
{
|
||
if (!pszPath) {
|
||
return NULL;
|
||
}
|
||
|
||
int cch = _tcslen(pszPath);
|
||
if (cch + 1 >= MAX_PATH) {
|
||
return NULL;
|
||
}
|
||
|
||
LPTSTR p = pszPath + cch;
|
||
switch (*CharPrev(pszPath, p)) {
|
||
case _T('\\'):
|
||
case _T('/'):
|
||
break;
|
||
default:
|
||
p[0] = _T('\\');
|
||
p[1] = _T('\0');
|
||
break;
|
||
}
|
||
return pszPath;
|
||
}
|
||
|
||
LPTSTR WINAPI PathCombine(LPTSTR pszDest, LPCTSTR pszDir, LPCTSTR pszFile)
|
||
{
|
||
if (!pszDest || !pszDir || !pszFile) {
|
||
return NULL;
|
||
}
|
||
|
||
//かなり手抜き
|
||
TCHAR szCurDir[MAX_PATH], szDir[MAX_PATH+1];
|
||
GetCurrentDirectory(MAX_PATH, szCurDir);
|
||
_tcsncpy(szDir, pszDir, MAX_PATH - 1);
|
||
szDir[MAX_PATH - 1] = _T('\0');
|
||
PathAddBackslash(szDir);
|
||
if (!SetCurrentDirectory(szDir)) {
|
||
*pszDest = _T('\0');
|
||
return NULL;
|
||
}
|
||
TCHAR szFile[MAX_PATH];
|
||
_tcsncpy(szFile, pszFile, MAX_PATH - 1);
|
||
szFile[MAX_PATH - 1] = _T('\0');
|
||
GetFullPathName(szFile, MAX_PATH, pszDest, NULL);
|
||
SetCurrentDirectory(szCurDir);
|
||
TRACE(_T("PathCombine: %s\n"), pszDest);
|
||
return pszDest;
|
||
}
|
||
|
||
LPWSTR _StrDupExAtoW(LPCSTR pszMB, int cchMB /*= -1*/, LPWSTR pszStack /*= NULL*/, int cchStack /*= 0*/, int* pcchWC /*= NULL*/, int nACP)
|
||
{
|
||
int _cchWC;
|
||
if (!pcchWC) {
|
||
pcchWC = &_cchWC;
|
||
}
|
||
*pcchWC = 0;
|
||
|
||
if (!pszMB) {
|
||
return NULL;
|
||
}
|
||
if (cchMB == -1) {
|
||
cchMB = strlen(pszMB);
|
||
}
|
||
const int cchWC = MultiByteToWideChar(nACP, 0, pszMB, cchMB, NULL, 0);
|
||
if(cchWC < 0) {
|
||
return NULL;
|
||
}
|
||
|
||
LPWSTR pszWC;
|
||
if(cchWC < cchStack && pszStack) {
|
||
pszWC = pszStack;
|
||
ZeroMemory(pszWC, sizeof(WCHAR) * (cchWC + 1));
|
||
} else {
|
||
pszWC = (LPWSTR)calloc(sizeof(WCHAR), cchWC + 1);
|
||
if (!pszWC) {
|
||
return NULL;
|
||
}
|
||
}
|
||
MultiByteToWideChar(nACP, 0, pszMB, cchMB, pszWC, cchWC);
|
||
pszWC[cchWC] = L'\0';
|
||
*pcchWC = cchWC;
|
||
return pszWC;
|
||
}
|
||
|
||
#ifdef _DEBUG
|
||
typedef struct {
|
||
LPCSTR name;
|
||
UINT flag;
|
||
UINT mask;
|
||
UINT xor;
|
||
} FLAG_NAME_MAP;
|
||
#define DEF_FLAG_NAME(f,m,x) { #f, f, m, x }
|
||
#define END_FLAG() { NULL }
|
||
|
||
LPCSTR Dbg_GetFlagNames(UINT flags, const FLAG_NAME_MAP* p, LPSTR worker)
|
||
{
|
||
if (!worker)
|
||
return "";
|
||
if (!flags || !p)
|
||
return "0";
|
||
|
||
LPSTR wk = worker;
|
||
*wk = '\0';
|
||
while (p->name) {
|
||
if (((flags & p->mask) ^ p->xor) == p->flag) {
|
||
if (wk != worker) {
|
||
memcpy(wk, " | ", 4);
|
||
wk += 3;
|
||
}
|
||
strcpy(wk, p->name);
|
||
wk += strlen(p->name);
|
||
flags &= ~p->mask;
|
||
}
|
||
p++;
|
||
}
|
||
if (flags) {
|
||
if (wk != worker) {
|
||
memcpy(wk, " | ", 4);
|
||
wk += 3;
|
||
}
|
||
sprintf(wk, "%04X", flags);
|
||
}
|
||
return *worker ? worker : "0";
|
||
}
|
||
|
||
void Dbg_TraceExtTextOutW(int nXStart, int nYStart, UINT fuOptions, LPCWSTR lpString, int cbString, const int* lpDx)
|
||
{
|
||
LPWSTR p;
|
||
if (fuOptions & ETO_GLYPH_INDEX) {
|
||
p = (LPWSTR)_alloca((cbString * 5 + 1) * sizeof(WCHAR));
|
||
LPWSTR q = p;
|
||
for (int i = 0; i < cbString; ++i) {
|
||
q += wsprintf(q, _T(" %04X"), lpString[i]);
|
||
}
|
||
} else {
|
||
p = (LPWSTR)_alloca((cbString + 1) * sizeof(WCHAR));
|
||
memcpy(p, lpString, cbString * sizeof(WCHAR));
|
||
p[cbString] = 0;
|
||
}
|
||
|
||
static const FLAG_NAME_MAP c_map[] = {
|
||
DEF_FLAG_NAME(ETO_OPAQUE, ETO_OPAQUE, 0),
|
||
DEF_FLAG_NAME(ETO_CLIPPED, ETO_CLIPPED, 0),
|
||
DEF_FLAG_NAME(ETO_GLYPH_INDEX, ETO_GLYPH_INDEX, 0),
|
||
DEF_FLAG_NAME(ETO_RTLREADING, ETO_RTLREADING, 0),
|
||
DEF_FLAG_NAME(ETO_NUMERICSLOCAL, ETO_NUMERICSLOCAL, 0),
|
||
DEF_FLAG_NAME(ETO_NUMERICSLATIN, ETO_NUMERICSLATIN, 0),
|
||
DEF_FLAG_NAME(ETO_IGNORELANGUAGE, ETO_IGNORELANGUAGE, 0),
|
||
DEF_FLAG_NAME(ETO_PDY, ETO_PDY, 0),
|
||
END_FLAG(),
|
||
};
|
||
CHAR wk[1024];
|
||
TRACE(_T("ExtTextOutW(%d, %d, %hs, \"%ls\", %d, %hs)\n")
|
||
, nXStart, nYStart, Dbg_GetFlagNames(fuOptions, c_map, wk), p, cbString, lpDx ? "{...}" : "NULL");
|
||
}
|
||
|
||
void Dbg_TraceScriptItemize(const WCHAR* pwcInChars, int cInChars)
|
||
{
|
||
LPWSTR p = (LPWSTR)_alloca((cInChars + 1) * sizeof(WCHAR));
|
||
memcpy(p, pwcInChars, cInChars * sizeof(WCHAR));
|
||
p[cInChars] = 0;
|
||
|
||
TRACE(_T("ScriptItemize(\"%ls\", %d)\n"), p, cInChars);
|
||
}
|
||
|
||
void Dbg_TraceScriptShape(const WCHAR* pwcChars, int cChars, const SCRIPT_ANALYSIS* psa, const WORD* pwOutGlyphs, int cGlyphs)
|
||
{
|
||
LPWSTR pc = (LPWSTR)_alloca((cChars + 1) * sizeof(WCHAR));
|
||
memcpy(pc, pwcChars, cChars * sizeof(WCHAR));
|
||
pc[cChars] = 0;
|
||
LPWSTR pg;
|
||
if (pwOutGlyphs) {
|
||
if (psa->fNoGlyphIndex) {
|
||
pg = (LPWSTR)_alloca((cGlyphs + 1) * sizeof(WCHAR));
|
||
memcpy(pg, pwOutGlyphs, cGlyphs * sizeof(WCHAR));
|
||
pg[cGlyphs] = 0;
|
||
} else {
|
||
pg = (LPWSTR)_alloca((cGlyphs * 5 + 1) * sizeof(WCHAR));
|
||
LPWSTR q = pg;
|
||
for (int i = 0; i < cGlyphs; ++i) {
|
||
q += wsprintf(q, _T(" %04X"), pwOutGlyphs[i]);
|
||
}
|
||
}
|
||
}
|
||
|
||
TRACE(_T("ScriptShape(\"%ls\", %d, Script=%d%S%S%S%S%S%S, BidiLevel=%d%S%S%S%S%S%S%S%S"),
|
||
pc, cChars,
|
||
psa->eScript, psa->fRTL ? ", RTL" : "", psa->fLayoutRTL ? ", LayoutRTL" : "",
|
||
psa->fLinkBefore ? ", LinkBefore" : "", psa->fLinkAfter ? ", LinkAfter" : "",
|
||
psa->fLogicalOrder ? ", LogicalOrder" : "", psa->fNoGlyphIndex ? ", NoGlyphIndex" : "",
|
||
psa->s.uBidiLevel, psa->s.fOverrideDirection ? ", OverrideDirection" : "",
|
||
psa->s.fInhibitSymSwap ? ", InhibitSymSwap" : "", psa->s.fCharShape ? ", CharShape" : "",
|
||
psa->s.fDigitSubstitute ? ", DigitSubstitute" : "", psa->s.fInhibitLigate ? ", InhibitLigate" : "",
|
||
psa->s.fDisplayZWG ? ", DisplayZWG" : "", psa->s.fArabicNumContext ? ", ArabicNumContext" : "",
|
||
psa->s.fGcpClusters ? ", GcpClusters" : ""
|
||
);
|
||
|
||
if (pwOutGlyphs) {
|
||
TRACE(_T(", \"%ls\", %d"), pg, cGlyphs);
|
||
}
|
||
|
||
TRACE(_T(")\n"));
|
||
}
|
||
|
||
void Dbg_TractGetTextExtent(LPCSTR lpString, int cbString, LPSIZE lpSize)
|
||
{
|
||
LPSTR p = (LPSTR)_alloca((cbString + 1) * sizeof(CHAR));
|
||
memcpy(p, lpString, cbString * sizeof(CHAR));
|
||
p[cbString] = 0;
|
||
TRACE(_T("GetTextExtentA(\"%hs\", %d) = { %d, %d }\n")
|
||
, p, cbString, lpSize->cx, lpSize->cy);
|
||
}
|
||
|
||
void Dbg_TractGetTextExtent(LPCWSTR lpString, int cbString, LPSIZE lpSize)
|
||
{
|
||
LPWSTR p = (LPWSTR)_alloca((cbString + 1) * sizeof(WCHAR));
|
||
memcpy(p, lpString, cbString * sizeof(WCHAR));
|
||
p[cbString] = 0;
|
||
TRACE(_T("GetTextExtentW(\"%ls\", %d) = { %d, %d }\n")
|
||
, p, cbString, lpSize->cx, lpSize->cy);
|
||
}
|
||
#endif
|