kernel32: Add stub for SetThreadStackGuarantee.
[wine] / dlls / d3dx9_36 / font.c
1 /*
2  * Copyright (C) 2008 Tony Wasserka
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17  *
18  */
19
20 #include "config.h"
21 #include "wine/port.h"
22
23 #include "wine/debug.h"
24 #include "wine/unicode.h"
25 #include "d3dx9_36_private.h"
26
27 WINE_DEFAULT_DEBUG_CHANNEL(d3dx);
28
29 typedef struct ID3DXFontImpl
30 {
31     ID3DXFont ID3DXFont_iface;
32     LONG ref;
33
34     IDirect3DDevice9 *device;
35     D3DXFONT_DESCW desc;
36
37     HDC hdc;
38     HFONT hfont;
39 } ID3DXFontImpl;
40
41 static inline ID3DXFontImpl *impl_from_ID3DXFont(ID3DXFont *iface)
42 {
43     return CONTAINING_RECORD(iface, ID3DXFontImpl, ID3DXFont_iface);
44 }
45
46 static HRESULT WINAPI ID3DXFontImpl_QueryInterface(ID3DXFont *iface, REFIID riid, void **out)
47 {
48     TRACE("iface %p, riid %s, out %p.\n", iface, debugstr_guid(riid), out);
49
50     if (IsEqualGUID(riid, &IID_ID3DXFont)
51             || IsEqualGUID(riid, &IID_IUnknown))
52     {
53         IUnknown_AddRef(iface);
54         *out = iface;
55         return S_OK;
56     }
57
58     WARN("%s not implemented, returning E_NOINTERFACE.\n", debugstr_guid(riid));
59
60     *out = NULL;
61     return E_NOINTERFACE;
62 }
63
64 static ULONG WINAPI ID3DXFontImpl_AddRef(ID3DXFont *iface)
65 {
66     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
67     ULONG ref=InterlockedIncrement(&This->ref);
68     TRACE("(%p)->(): AddRef from %d\n", This, ref-1);
69     return ref;
70 }
71
72 static ULONG WINAPI ID3DXFontImpl_Release(ID3DXFont *iface)
73 {
74     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
75     ULONG ref=InterlockedDecrement(&This->ref);
76
77     TRACE("(%p)->(): ReleaseRef to %d\n", This, ref);
78
79     if(ref==0) {
80         DeleteObject(This->hfont);
81         DeleteDC(This->hdc);
82         IDirect3DDevice9_Release(This->device);
83         HeapFree(GetProcessHeap(), 0, This);
84     }
85     return ref;
86 }
87
88 static HRESULT WINAPI ID3DXFontImpl_GetDevice(ID3DXFont *iface, LPDIRECT3DDEVICE9 *device)
89 {
90     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
91
92     TRACE("(%p)->(%p)\n", This, device);
93
94     if( !device ) return D3DERR_INVALIDCALL;
95     *device = This->device;
96     IDirect3DDevice9_AddRef(This->device);
97
98     return D3D_OK;
99 }
100
101 static HRESULT WINAPI ID3DXFontImpl_GetDescA(ID3DXFont *iface, D3DXFONT_DESCA *desc)
102 {
103     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
104
105     TRACE("(%p)->(%p)\n", This, desc);
106
107     if( !desc ) return D3DERR_INVALIDCALL;
108     memcpy(desc, &This->desc, FIELD_OFFSET(D3DXFONT_DESCA, FaceName));
109     WideCharToMultiByte(CP_ACP, 0, This->desc.FaceName, -1, desc->FaceName, sizeof(desc->FaceName) / sizeof(CHAR), NULL, NULL);
110
111     return D3D_OK;
112 }
113
114 static HRESULT WINAPI ID3DXFontImpl_GetDescW(ID3DXFont *iface, D3DXFONT_DESCW *desc)
115 {
116     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
117
118     TRACE("(%p)->(%p)\n", This, desc);
119
120     if( !desc ) return D3DERR_INVALIDCALL;
121     *desc = This->desc;
122
123     return D3D_OK;
124 }
125
126 static BOOL WINAPI ID3DXFontImpl_GetTextMetricsA(ID3DXFont *iface, TEXTMETRICA *metrics)
127 {
128     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
129     TRACE("(%p)->(%p)\n", This, metrics);
130     return GetTextMetricsA(This->hdc, metrics);
131 }
132
133 static BOOL WINAPI ID3DXFontImpl_GetTextMetricsW(ID3DXFont *iface, TEXTMETRICW *metrics)
134 {
135     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
136     TRACE("(%p)->(%p)\n", This, metrics);
137     return GetTextMetricsW(This->hdc, metrics);
138 }
139
140 static HDC WINAPI ID3DXFontImpl_GetDC(ID3DXFont *iface)
141 {
142     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
143     TRACE("(%p)->()\n", This);
144     return This->hdc;
145 }
146
147 static HRESULT WINAPI ID3DXFontImpl_GetGlyphData(ID3DXFont *iface, UINT glyph,
148         LPDIRECT3DTEXTURE9 *texture, RECT *blackbox, POINT *cellinc)
149 {
150     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
151     FIXME("(%p)->(%u, %p, %p, %p): stub\n", This, glyph, texture, blackbox, cellinc);
152     return D3D_OK;
153 }
154
155 static HRESULT WINAPI ID3DXFontImpl_PreloadCharacters(ID3DXFont *iface, UINT first, UINT last)
156 {
157     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
158     FIXME("(%p)->(%u, %u): stub\n", This, first, last);
159     return D3D_OK;
160 }
161
162 static HRESULT WINAPI ID3DXFontImpl_PreloadGlyphs(ID3DXFont *iface, UINT first, UINT last)
163 {
164     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
165     FIXME("(%p)->(%u, %u): stub\n", This, first, last);
166     return D3D_OK;
167 }
168
169 static HRESULT WINAPI ID3DXFontImpl_PreloadTextA(ID3DXFont *iface, LPCSTR string, INT count)
170 {
171     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
172     FIXME("(%p)->(%s, %d): stub\n", This, string, count);
173     return D3D_OK;
174 }
175
176 static HRESULT WINAPI ID3DXFontImpl_PreloadTextW(ID3DXFont *iface, LPCWSTR string, INT count)
177 {
178     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
179     FIXME("(%p)->(%s, %d): stub\n", This, debugstr_w(string), count);
180     return D3D_OK;
181 }
182
183 static INT WINAPI ID3DXFontImpl_DrawTextA(ID3DXFont *iface, LPD3DXSPRITE sprite, LPCSTR string,
184         INT count, LPRECT rect, DWORD format, D3DCOLOR color)
185 {
186     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
187     FIXME("(%p)->(%p, %s, %d, %p, %d, %#x): stub\n", This, sprite, string, count, rect,  format, color);
188     return 1;
189 }
190
191 static INT WINAPI ID3DXFontImpl_DrawTextW(ID3DXFont *iface, LPD3DXSPRITE sprite, LPCWSTR string,
192         INT count, LPRECT rect, DWORD format, D3DCOLOR color)
193 {
194     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
195     FIXME("(%p)->(%p, %s, %d, %p, %d, %#x): stub\n", This, sprite, debugstr_w(string), count, rect,  format, color);
196     return 1;
197 }
198
199 static HRESULT WINAPI ID3DXFontImpl_OnLostDevice(ID3DXFont *iface)
200 {
201     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
202     FIXME("(%p)->(): stub\n", This);
203     return D3D_OK;
204 }
205
206 static HRESULT WINAPI ID3DXFontImpl_OnResetDevice(ID3DXFont *iface)
207 {
208     ID3DXFontImpl *This=impl_from_ID3DXFont(iface);
209     FIXME("(%p)->(): stub\n", This);
210     return D3D_OK;
211 }
212
213 static const ID3DXFontVtbl D3DXFont_Vtbl =
214 {
215     /*** IUnknown methods ***/
216     ID3DXFontImpl_QueryInterface,
217     ID3DXFontImpl_AddRef,
218     ID3DXFontImpl_Release,
219     /*** ID3DXFont methods ***/
220     ID3DXFontImpl_GetDevice,
221     ID3DXFontImpl_GetDescA,
222     ID3DXFontImpl_GetDescW,
223     ID3DXFontImpl_GetTextMetricsA,
224     ID3DXFontImpl_GetTextMetricsW,
225     ID3DXFontImpl_GetDC,
226     ID3DXFontImpl_GetGlyphData,
227     ID3DXFontImpl_PreloadCharacters,
228     ID3DXFontImpl_PreloadGlyphs,
229     ID3DXFontImpl_PreloadTextA,
230     ID3DXFontImpl_PreloadTextW,
231     ID3DXFontImpl_DrawTextA,
232     ID3DXFontImpl_DrawTextW,
233     ID3DXFontImpl_OnLostDevice,
234     ID3DXFontImpl_OnResetDevice
235 };
236
237 HRESULT WINAPI D3DXCreateFontA(LPDIRECT3DDEVICE9 device, INT height, UINT width, UINT weight, UINT miplevels, BOOL italic, DWORD charset,
238                                DWORD precision, DWORD quality, DWORD pitchandfamily, LPCSTR facename, LPD3DXFONT *font)
239 {
240     D3DXFONT_DESCA desc;
241
242     if( !device || !font ) return D3DERR_INVALIDCALL;
243
244     desc.Height=height;
245     desc.Width=width;
246     desc.Weight=weight;
247     desc.MipLevels=miplevels;
248     desc.Italic=italic;
249     desc.CharSet=charset;
250     desc.OutputPrecision=precision;
251     desc.Quality=quality;
252     desc.PitchAndFamily=pitchandfamily;
253     if(facename != NULL) lstrcpyA(desc.FaceName, facename);
254     else desc.FaceName[0] = '\0';
255
256     return D3DXCreateFontIndirectA(device, &desc, font);
257 }
258
259 HRESULT WINAPI D3DXCreateFontW(LPDIRECT3DDEVICE9 device, INT height, UINT width, UINT weight, UINT miplevels, BOOL italic, DWORD charset,
260                                DWORD precision, DWORD quality, DWORD pitchandfamily, LPCWSTR facename, LPD3DXFONT *font)
261 {
262     D3DXFONT_DESCW desc;
263
264     if( !device || !font ) return D3DERR_INVALIDCALL;
265
266     desc.Height=height;
267     desc.Width=width;
268     desc.Weight=weight;
269     desc.MipLevels=miplevels;
270     desc.Italic=italic;
271     desc.CharSet=charset;
272     desc.OutputPrecision=precision;
273     desc.Quality=quality;
274     desc.PitchAndFamily=pitchandfamily;
275     if(facename != NULL) strcpyW(desc.FaceName, facename);
276     else desc.FaceName[0] = '\0';
277
278     return D3DXCreateFontIndirectW(device, &desc, font);
279 }
280
281 /***********************************************************************
282  *           D3DXCreateFontIndirectA    (D3DX9_36.@)
283  */
284 HRESULT WINAPI D3DXCreateFontIndirectA(LPDIRECT3DDEVICE9 device, CONST D3DXFONT_DESCA *desc, LPD3DXFONT *font)
285 {
286     D3DXFONT_DESCW widedesc;
287
288     if( !device || !desc || !font ) return D3DERR_INVALIDCALL;
289
290     /* Copy everything but the last structure member. This requires the
291        two D3DXFONT_DESC structures to be equal until the FaceName member */
292     memcpy(&widedesc, desc, FIELD_OFFSET(D3DXFONT_DESCA, FaceName));
293     MultiByteToWideChar(CP_ACP, 0, desc->FaceName, -1,
294                         widedesc.FaceName, sizeof(widedesc.FaceName)/sizeof(WCHAR));
295     return D3DXCreateFontIndirectW(device, &widedesc, font);
296 }
297
298 /***********************************************************************
299  *           D3DXCreateFontIndirectW    (D3DX9_36.@)
300  */
301 HRESULT WINAPI D3DXCreateFontIndirectW(LPDIRECT3DDEVICE9 device, CONST D3DXFONT_DESCW *desc, LPD3DXFONT *font)
302 {
303     D3DDEVICE_CREATION_PARAMETERS cpars;
304     D3DDISPLAYMODE mode;
305     ID3DXFontImpl *object;
306     IDirect3D9 *d3d;
307     HRESULT hr;
308
309     FIXME("(%p, %p, %p): stub\n", device, desc, font);
310
311     if( !device || !desc || !font ) return D3DERR_INVALIDCALL;
312
313     /* the device MUST support D3DFMT_A8R8G8B8 */
314     IDirect3DDevice9_GetDirect3D(device, &d3d);
315     IDirect3DDevice9_GetCreationParameters(device, &cpars);
316     IDirect3DDevice9_GetDisplayMode(device, 0, &mode);
317     hr = IDirect3D9_CheckDeviceFormat(d3d, cpars.AdapterOrdinal, cpars.DeviceType, mode.Format, 0, D3DRTYPE_TEXTURE, D3DFMT_A8R8G8B8);
318     if(FAILED(hr)) {
319         IDirect3D9_Release(d3d);
320         return D3DXERR_INVALIDDATA;
321     }
322     IDirect3D9_Release(d3d);
323
324     object=HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(ID3DXFontImpl));
325     if(object==NULL) {
326         *font=NULL;
327         return E_OUTOFMEMORY;
328     }
329     object->ID3DXFont_iface.lpVtbl = &D3DXFont_Vtbl;
330     object->ref=1;
331     object->device=device;
332     object->desc=*desc;
333
334     object->hdc = CreateCompatibleDC(NULL);
335     if( !object->hdc ) {
336         HeapFree(GetProcessHeap(), 0, object);
337         return D3DXERR_INVALIDDATA;
338     }
339
340     object->hfont = CreateFontW(desc->Height, desc->Width, 0, 0, desc->Weight, desc->Italic, FALSE, FALSE, desc->CharSet,
341                                 desc->OutputPrecision, CLIP_DEFAULT_PRECIS, desc->Quality, desc->PitchAndFamily, desc->FaceName);
342     if( !object->hfont ) {
343         DeleteDC(object->hdc);
344         HeapFree(GetProcessHeap(), 0, object);
345         return D3DXERR_INVALIDDATA;
346     }
347     SelectObject(object->hdc, object->hfont);
348
349     IDirect3DDevice9_AddRef(device);
350     *font=&object->ID3DXFont_iface;
351
352     return D3D_OK;
353 }