1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
|
#include "alfpriv.h"
#include <shlwapi.h>
static
DWORD ALF_DllGetVersion(const char *dll)
{
HMODULE hDll = GetModuleHandleA(dll);
if (hDll) {
DLLGETVERSIONPROC pDllGetVersion;
pDllGetVersion = (DLLGETVERSIONPROC)(void*)GetProcAddress(hDll, "DllGetVersion");
if (pDllGetVersion) {
DLLVERSIONINFO dvi;
HRESULT hr;
ZeroMemory(&dvi, sizeof(dvi));
dvi.cbSize = sizeof(dvi);
hr = (*pDllGetVersion)(&dvi);
if (SUCCEEDED(hr)) {
return MAKELONG(dvi.dwMinorVersion, dvi.dwMajorVersion);
}
}
}
return 0;
}
static int WINAPI
fallbackGetSystemMetricsForDpi(int nIndex, UINT dpi)
{
(void)dpi;
if (LOBYTE(LOWORD(GetVersion)) < 4) {
// old NT does not support several properties, so we fake them
switch (nIndex) {
case SM_CXEDGE:
case SM_CYEDGE:
return 2;
}
}
return GetSystemMetrics(nIndex);
}
static BOOL WINAPI
fallbackIsAppThemed(void)
{
return FALSE;
}
static UINT WINAPI
fallbackGetDpiForWindow(HWND win)
{
(void)win;
UINT dpi = 0;
HDC hdcScreen = GetDC(NULL);
if (hdcScreen) {
dpi = GetDeviceCaps(hdcScreen, LOGPIXELSY);
ReleaseDC(NULL, hdcScreen);
}
if (!dpi) {
dpi = 96; // FIXME! fallback to default DPI
}
return dpi;
}
static BOOL WINAPI
fallbackSystemParametersInfoForDpi(UINT uiAction, UINT uiParam, PVOID pvParam, UINT fWinIni, UINT dpi)
{
(void)dpi;
return SystemParametersInfo(uiAction, uiParam, pvParam, fWinIni);
}
static BOOL WINAPI
fallbackAdjustWindowRectExForDpi(LPRECT lpRect, DWORD dwStyle, BOOL bMenu, DWORD dwExStyle, UINT dpi)
{
(void)dpi;
return AdjustWindowRectEx(lpRect, dwStyle, bMenu, dwExStyle);
}
// FIXME: these support one subclass only, negating the whole point of it
typedef struct {
ALF_COMPAT_SUBCLASSPROC pfnSubclass;
UINT_PTR uIdSubclass;
DWORD_PTR dwRefData;
UINT runCounter;
WNDPROC orig;
} ALFWindowSubclassData;
static LRESULT CALLBACK
fallbackSubclassProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
ALFWindowSubclassData *data = (ALFWindowSubclassData *)GetWindowLongPtr(hwnd, GWLP_USERDATA);
LRESULT ret = 0;
data->runCounter++;
if (data->pfnSubclass)
ret = data->pfnSubclass(hwnd, uMsg, wParam, lParam, data->uIdSubclass, data->dwRefData);
else
ret = CallWindowProc(data->orig, hwnd, uMsg, wParam, lParam);
data->runCounter--;
if (!data->pfnSubclass && !data->runCounter) {
SetWindowLongPtr(hwnd, GWLP_USERDATA, 0);
HeapFree(GetProcessHeap(), 0, data);
}
return ret;
}
static BOOL WINAPI
fallbackSetWindowSubclass(HWND hwnd, ALF_COMPAT_SUBCLASSPROC pfnSubclass, UINT_PTR uIdSubclass, DWORD_PTR dwRefData)
{
ALFWindowSubclassData *data = (ALFWindowSubclassData *)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(ALFWindowSubclassData));
data->pfnSubclass = pfnSubclass;
data->uIdSubclass = uIdSubclass;
data->dwRefData = dwRefData;
data->orig = (WNDPROC)GetWindowLongPtr(hwnd, GWLP_WNDPROC);
SetWindowLongPtr(hwnd, GWLP_USERDATA, (LONG_PTR)data);
SetWindowLongPtr(hwnd, GWLP_WNDPROC, (LONG_PTR)fallbackSubclassProc);
return TRUE;
}
static LRESULT WINAPI
fallbackDefSubclassProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
ALFWindowSubclassData *data = (ALFWindowSubclassData *)GetWindowLongPtr(hwnd, GWLP_USERDATA);
return CallWindowProc(data->orig, hwnd, uMsg, wParam, lParam);
}
static BOOL WINAPI
fallbackRemoveWindowSubclass(HWND hwnd, ALF_COMPAT_SUBCLASSPROC pfnSubclass, UINT_PTR uIdSubclass)
{
(void)pfnSubclass;
(void)uIdSubclass;
ALFWindowSubclassData *data = (ALFWindowSubclassData *)GetWindowLongPtr(hwnd, GWLP_USERDATA);
data->pfnSubclass = 0;
data->uIdSubclass = 0;
SetWindowLongPtr(hwnd, GWLP_WNDPROC, (LONG_PTR)data->orig);
// can't free it while the subclass is running, possibly in a nested SendMessage
// and wants to call DefSubclassProc
if (!data->runCounter) {
SetWindowLongPtr(hwnd, GWLP_USERDATA, 0);
HeapFree(GetProcessHeap(), 0, data);
}
return TRUE;
}
ALFCompatFunctions *
ALF_CreateCompatFuncTable(void)
{
ALFCompatFunctions *compatfn = (ALFCompatFunctions*)HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY|HEAP_GENERATE_EXCEPTIONS, sizeof(ALFCompatFunctions));
#define COMPAT(dll, entrypoint, ordinal, fallback) \
do { \
FARPROC p = GetProcAddress(GetModuleHandleA(#dll), #entrypoint); \
if (!p && ordinal) \
p = GetProcAddress(GetModuleHandleA(#dll), (char*)ordinal); \
CopyMemory(&compatfn->entrypoint, &p, sizeof(void*)); \
\
if (!compatfn->entrypoint) \
compatfn->entrypoint = fallback; \
} while (0)
COMPAT(comctl32.dll, SetWindowSubclass, 410, fallbackSetWindowSubclass);
COMPAT(comctl32.dll, DefSubclassProc, 413, fallbackDefSubclassProc);
COMPAT(comctl32.dll, RemoveWindowSubclass, 412, fallbackRemoveWindowSubclass);
COMPAT(user32.dll, GetSystemMetricsForDpi, 0, fallbackGetSystemMetricsForDpi);
COMPAT(user32.dll, GetDpiForWindow, 0, fallbackGetDpiForWindow);
// FIXME: SystemParametersInfoForDpi is Unicode-Only.
// Writing a wrapper function would have been The Right Way, but such a function
// is yet to be written. So the current practical recommendation is to make
// ANSI builds System DPI aware only.
#ifdef UNICODE
COMPAT(user32.dll, SystemParametersInfoForDpi, 0, fallbackSystemParametersInfoForDpi);
#else
compatfn->SystemParametersInfoForDpi = fallbackSystemParametersInfoForDpi;
#endif
COMPAT(user32.dll, AdjustWindowRectExForDpi, 0, fallbackAdjustWindowRectExForDpi);
// IsAppThemed would return TRUE even when we're linked against comctl32 v5
if (ALF_DllGetVersion("comctl32.dll") >= 0x60000) {
LoadLibraryA("uxtheme.dll");
COMPAT(uxtheme.dll, IsAppThemed, 0, fallbackIsAppThemed);
} else {
compatfn->IsAppThemed = fallbackIsAppThemed;
}
#undef COMPAT
UINT oldErrorMode = SetErrorMode(SEM_NOOPENFILEERRORBOX); // stop win32s from barking about rpcrt4
HMODULE rpc = LoadLibraryA("rpcrt4.dll");
if (rpc) {
// NT always has rpcrt4.dll
compatfn->UuidCreate = (ULONG(WINAPI*)(UUID*))(void*)GetProcAddress(rpc, "UuidCreate");
} else {
// Win32s always has OLE32
HMODULE ole32 = LoadLibraryA("ole32.dll");
compatfn->UuidCreate = (ULONG(WINAPI*)(UUID*))(void*)GetProcAddress(ole32, "CoCreateGuid");
}
SetErrorMode(oldErrorMode);
return compatfn;
}
long
ALF_GetAveCharWidth(HDC hdc)
{
// see: HOWTO: Calculate Dialog Units When Not Using the System Font
SIZE s;
GetTextExtentPoint32A(hdc, "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz", 52, &s);
return (s.cx / 26 + 1) / 2;
}
|
