4 * Copyright 1993 Alexandre Julliard
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
36 #include "gdi_private.h"
37 #include "wine/debug.h"
39 WINE_DEFAULT_DEBUG_CHANNEL(gdi
);
41 #define HGDIOBJ_32(h16) ((HGDIOBJ)(ULONG_PTR)(h16))
43 #define GDI_HEAP_SIZE 0xffe0
45 HMODULE gdi32_module
= 0;
47 /***********************************************************************
51 static const LOGBRUSH WhiteBrush
= { BS_SOLID
, RGB(255,255,255), 0 };
52 static const LOGBRUSH BlackBrush
= { BS_SOLID
, RGB(0,0,0), 0 };
53 static const LOGBRUSH NullBrush
= { BS_NULL
, 0, 0 };
55 static const LOGBRUSH LtGrayBrush
= { BS_SOLID
, RGB(192,192,192), 0 };
56 static const LOGBRUSH GrayBrush
= { BS_SOLID
, RGB(128,128,128), 0 };
57 static const LOGBRUSH DkGrayBrush
= { BS_SOLID
, RGB(64,64,64), 0 };
59 static const LOGPEN WhitePen
= { PS_SOLID
, { 0, 0 }, RGB(255,255,255) };
60 static const LOGPEN BlackPen
= { PS_SOLID
, { 0, 0 }, RGB(0,0,0) };
61 static const LOGPEN NullPen
= { PS_NULL
, { 0, 0 }, 0 };
63 static const LOGBRUSH DCBrush
= { BS_SOLID
, RGB(255,255,255), 0 };
64 static const LOGPEN DCPen
= { PS_SOLID
, { 0, 0 }, RGB(0,0,0) };
66 /* reserve one extra entry for the stock default bitmap */
67 /* this is what Windows does too */
68 #define NB_STOCK_OBJECTS (STOCK_LAST+2)
70 static HGDIOBJ stock_objects
[NB_STOCK_OBJECTS
];
72 static CRITICAL_SECTION gdi_section
;
73 static CRITICAL_SECTION_DEBUG critsect_debug
=
76 { &critsect_debug
.ProcessLocksList
, &critsect_debug
.ProcessLocksList
},
77 0, 0, { (DWORD_PTR
)(__FILE__
": gdi_section") }
79 static CRITICAL_SECTION gdi_section
= { &critsect_debug
, -1, 0, 0, 0, 0 };
82 /****************************************************************************
84 * language-independent stock fonts
88 static const LOGFONTW OEMFixedFont
=
89 { 12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, OEM_CHARSET
,
90 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
, {'\0'} };
92 static const LOGFONTW AnsiFixedFont
=
93 { 12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
94 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
95 {'C','o','u','r','i','e','r','\0'} };
97 static const LOGFONTW AnsiVarFont
=
98 { 12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
99 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
100 {'M','S',' ','S','a','n','s',' ','S','e','r','i','f','\0'} };
102 /******************************************************************************
104 * language-dependent stock fonts
106 * 'ANSI' charset and 'DEFAULT' charset is not same.
107 * The chars in CP_ACP should be drawn with 'DEFAULT' charset.
108 * 'ANSI' charset seems to be identical with ISO-8859-1.
109 * 'DEFAULT' charset is a language-dependent charset.
111 * 'System' font seems to be an alias for language-dependent font.
115 * language-dependent stock fonts for all known charsets
116 * please see TranslateCharsetInfo (dlls/gdi/font.c) and
117 * CharsetBindingInfo (dlls/x11drv/xfont.c),
118 * and modify entries for your language if needed.
120 struct DefaultFontInfo
124 LOGFONTW DeviceDefaultFont
;
125 LOGFONTW SystemFixedFont
;
126 LOGFONTW DefaultGuiFont
;
129 static const struct DefaultFontInfo default_fonts
[] =
133 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
134 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
135 {'S','y','s','t','e','m','\0'}
137 { /* Device Default */
138 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
139 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
140 {'S','y','s','t','e','m','\0'}
143 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
144 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
145 {'C','o','u','r','i','e','r','\0'}
147 { /* DefaultGuiFont */
148 -11, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
149 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
150 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
153 { EASTEUROPE_CHARSET
,
155 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, EASTEUROPE_CHARSET
,
156 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
157 {'S','y','s','t','e','m','\0'}
159 { /* Device Default */
160 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, EASTEUROPE_CHARSET
,
161 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
162 {'S','y','s','t','e','m','\0'}
165 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, EASTEUROPE_CHARSET
,
166 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
167 {'C','o','u','r','i','e','r','\0'}
169 { /* DefaultGuiFont */
170 -11, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, EASTEUROPE_CHARSET
,
171 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
172 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
177 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, RUSSIAN_CHARSET
,
178 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
179 {'S','y','s','t','e','m','\0'}
181 { /* Device Default */
182 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, RUSSIAN_CHARSET
,
183 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
184 {'S','y','s','t','e','m','\0'}
187 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, RUSSIAN_CHARSET
,
188 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
189 {'C','o','u','r','i','e','r','\0'}
191 { /* DefaultGuiFont */
192 -11, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, RUSSIAN_CHARSET
,
193 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
194 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
199 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, GREEK_CHARSET
,
200 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
201 {'S','y','s','t','e','m','\0'}
203 { /* Device Default */
204 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, GREEK_CHARSET
,
205 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
206 {'S','y','s','t','e','m','\0'}
209 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GREEK_CHARSET
,
210 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
211 {'C','o','u','r','i','e','r','\0'}
213 { /* DefaultGuiFont */
214 -11, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GREEK_CHARSET
,
215 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
216 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
221 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, TURKISH_CHARSET
,
222 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
223 {'S','y','s','t','e','m','\0'}
225 { /* Device Default */
226 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, TURKISH_CHARSET
,
227 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
228 {'S','y','s','t','e','m','\0'}
231 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, TURKISH_CHARSET
,
232 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
233 {'C','o','u','r','i','e','r','\0'}
235 { /* DefaultGuiFont */
236 -11, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, TURKISH_CHARSET
,
237 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
238 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
243 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, HEBREW_CHARSET
,
244 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
245 {'S','y','s','t','e','m','\0'}
247 { /* Device Default */
248 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, HEBREW_CHARSET
,
249 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
250 {'S','y','s','t','e','m','\0'}
253 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HEBREW_CHARSET
,
254 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
255 {'C','o','u','r','i','e','r','\0'}
257 { /* DefaultGuiFont */
258 -11, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HEBREW_CHARSET
,
259 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
260 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
265 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, ARABIC_CHARSET
,
266 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
267 {'S','y','s','t','e','m','\0'}
269 { /* Device Default */
270 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, ARABIC_CHARSET
,
271 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
272 {'S','y','s','t','e','m','\0'}
275 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ARABIC_CHARSET
,
276 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
277 {'C','o','u','r','i','e','r','\0'}
279 { /* DefaultGuiFont */
280 -11, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ARABIC_CHARSET
,
281 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
282 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
287 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, BALTIC_CHARSET
,
288 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
289 {'S','y','s','t','e','m','\0'}
291 { /* Device Default */
292 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, BALTIC_CHARSET
,
293 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
294 {'S','y','s','t','e','m','\0'}
297 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, BALTIC_CHARSET
,
298 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
299 {'C','o','u','r','i','e','r','\0'}
301 { /* DefaultGuiFont */
302 -11, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, BALTIC_CHARSET
,
303 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
304 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
309 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, THAI_CHARSET
,
310 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
311 {'S','y','s','t','e','m','\0'}
313 { /* Device Default */
314 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, THAI_CHARSET
,
315 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
316 {'S','y','s','t','e','m','\0'}
319 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, THAI_CHARSET
,
320 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
321 {'C','o','u','r','i','e','r','\0'}
323 { /* DefaultGuiFont */
324 -11, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, THAI_CHARSET
,
325 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
326 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
331 18, 8, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, SHIFTJIS_CHARSET
,
332 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
333 {'S','y','s','t','e','m','\0'}
335 { /* Device Default */
336 18, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, SHIFTJIS_CHARSET
,
337 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
338 {'S','y','s','t','e','m','\0'}
341 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, SHIFTJIS_CHARSET
,
342 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
343 {'C','o','u','r','i','e','r','\0'}
345 { /* DefaultGuiFont */
346 -12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, SHIFTJIS_CHARSET
,
347 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
348 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
353 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, GB2312_CHARSET
,
354 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
355 {'S','y','s','t','e','m','\0'}
357 { /* Device Default */
358 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, GB2312_CHARSET
,
359 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
360 {'S','y','s','t','e','m','\0'}
363 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GB2312_CHARSET
,
364 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
365 {'C','o','u','r','i','e','r','\0'}
367 { /* DefaultGuiFont */
368 -12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GB2312_CHARSET
,
369 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
370 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
375 16, 8, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HANGEUL_CHARSET
,
376 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
377 {'S','y','s','t','e','m','\0'}
379 { /* Device Default */
380 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HANGEUL_CHARSET
,
381 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
382 {'S','y','s','t','e','m','\0'}
385 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HANGEUL_CHARSET
,
386 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
387 {'C','o','u','r','i','e','r','\0'}
389 { /* DefaultGuiFont */
390 -12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HANGEUL_CHARSET
,
391 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
392 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
395 { CHINESEBIG5_CHARSET
,
397 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, CHINESEBIG5_CHARSET
,
398 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
399 {'S','y','s','t','e','m','\0'}
401 { /* Device Default */
402 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, CHINESEBIG5_CHARSET
,
403 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
404 {'S','y','s','t','e','m','\0'}
407 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, CHINESEBIG5_CHARSET
,
408 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
409 {'C','o','u','r','i','e','r','\0'}
411 { /* DefaultGuiFont */
412 -12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, CHINESEBIG5_CHARSET
,
413 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
414 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
419 16, 7, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, JOHAB_CHARSET
,
420 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
421 {'S','y','s','t','e','m','\0'}
423 { /* Device Default */
424 16, 0, 0, 0, FW_BOLD
, FALSE
, FALSE
, FALSE
, JOHAB_CHARSET
,
425 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
426 {'S','y','s','t','e','m','\0'}
429 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, JOHAB_CHARSET
,
430 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
431 {'C','o','u','r','i','e','r','\0'}
433 { /* DefaultGuiFont */
434 -12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, JOHAB_CHARSET
,
435 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
436 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
442 /*************************************************************************
443 * __wine_make_gdi_object_system (GDI32.@)
445 * USER has to tell GDI that its system brushes and pens are non-deletable.
446 * For a description of the GDI object magics and their flags,
447 * see "Undocumented Windows" (wrong about the OBJECT_NOSYSTEM flag, though).
449 void CDECL
__wine_make_gdi_object_system( HGDIOBJ handle
, BOOL set
)
451 GDIOBJHDR
*ptr
= GDI_GetObjPtr( handle
, 0 );
453 GDI_ReleaseObj( handle
);
456 /******************************************************************************
459 static const struct DefaultFontInfo
* get_default_fonts(UINT charset
)
463 for(n
=0;n
<(sizeof(default_fonts
)/sizeof(default_fonts
[0]));n
++)
465 if ( default_fonts
[n
].charset
== charset
)
466 return &default_fonts
[n
];
469 FIXME( "unhandled charset 0x%08x - use ANSI_CHARSET for default stock objects\n", charset
);
470 return &default_fonts
[0];
474 /******************************************************************************
475 * get_default_charset (internal)
477 * get the language-dependent charset that can handle CP_ACP correctly.
479 static UINT
get_default_charset( void )
485 csi
.ciCharset
= ANSI_CHARSET
;
486 if ( !TranslateCharsetInfo( ULongToPtr(uACP
), &csi
, TCI_SRCCODEPAGE
) )
488 FIXME( "unhandled codepage %u - use ANSI_CHARSET for default stock objects\n", uACP
);
492 return csi
.ciCharset
;
496 /***********************************************************************
499 * Increment the reference count of a GDI object.
501 HGDIOBJ
GDI_inc_ref_count( HGDIOBJ handle
)
505 if ((header
= GDI_GetObjPtr( handle
, 0 )))
508 GDI_ReleaseObj( handle
);
516 /***********************************************************************
519 * Decrement the reference count of a GDI object.
521 BOOL
GDI_dec_ref_count( HGDIOBJ handle
)
525 if ((header
= GDI_GetObjPtr( handle
, 0 )))
527 assert( header
->selcount
);
528 if (!--header
->selcount
&& header
->deleted
)
530 /* handle delayed DeleteObject*/
532 GDI_ReleaseObj( handle
);
533 TRACE( "executing delayed DeleteObject for %p\n", handle
);
534 DeleteObject( handle
);
536 else GDI_ReleaseObj( handle
);
538 return header
!= NULL
;
542 /***********************************************************************
545 * GDI initialization.
547 BOOL WINAPI
DllMain( HINSTANCE inst
, DWORD reason
, LPVOID reserved
)
549 const struct DefaultFontInfo
* deffonts
;
552 if (reason
!= DLL_PROCESS_ATTACH
) return TRUE
;
555 DisableThreadLibraryCalls( inst
);
558 /* create stock objects */
559 stock_objects
[WHITE_BRUSH
] = CreateBrushIndirect( &WhiteBrush
);
560 stock_objects
[LTGRAY_BRUSH
] = CreateBrushIndirect( &LtGrayBrush
);
561 stock_objects
[GRAY_BRUSH
] = CreateBrushIndirect( &GrayBrush
);
562 stock_objects
[DKGRAY_BRUSH
] = CreateBrushIndirect( &DkGrayBrush
);
563 stock_objects
[BLACK_BRUSH
] = CreateBrushIndirect( &BlackBrush
);
564 stock_objects
[NULL_BRUSH
] = CreateBrushIndirect( &NullBrush
);
566 stock_objects
[WHITE_PEN
] = CreatePenIndirect( &WhitePen
);
567 stock_objects
[BLACK_PEN
] = CreatePenIndirect( &BlackPen
);
568 stock_objects
[NULL_PEN
] = CreatePenIndirect( &NullPen
);
570 stock_objects
[DEFAULT_PALETTE
] = PALETTE_Init();
571 stock_objects
[DEFAULT_BITMAP
] = CreateBitmap( 1, 1, 1, 1, NULL
);
573 /* language-independent stock fonts */
574 stock_objects
[OEM_FIXED_FONT
] = CreateFontIndirectW( &OEMFixedFont
);
575 stock_objects
[ANSI_FIXED_FONT
] = CreateFontIndirectW( &AnsiFixedFont
);
576 stock_objects
[ANSI_VAR_FONT
] = CreateFontIndirectW( &AnsiVarFont
);
578 /* language-dependent stock fonts */
579 deffonts
= get_default_fonts(get_default_charset());
580 stock_objects
[SYSTEM_FONT
] = CreateFontIndirectW( &deffonts
->SystemFont
);
581 stock_objects
[DEVICE_DEFAULT_FONT
] = CreateFontIndirectW( &deffonts
->DeviceDefaultFont
);
582 stock_objects
[SYSTEM_FIXED_FONT
] = CreateFontIndirectW( &deffonts
->SystemFixedFont
);
583 stock_objects
[DEFAULT_GUI_FONT
] = CreateFontIndirectW( &deffonts
->DefaultGuiFont
);
585 stock_objects
[DC_BRUSH
] = CreateBrushIndirect( &DCBrush
);
586 stock_objects
[DC_PEN
] = CreatePenIndirect( &DCPen
);
588 /* clear the NOSYSTEM bit on all stock objects*/
589 for (i
= 0; i
< NB_STOCK_OBJECTS
; i
++)
591 if (!stock_objects
[i
])
593 if (i
== 9) continue; /* there's no stock object 9 */
594 ERR( "could not create stock object %d\n", i
);
597 __wine_make_gdi_object_system( stock_objects
[i
], TRUE
);
603 #define FIRST_LARGE_HANDLE 16
604 #define MAX_LARGE_HANDLES ((GDI_HEAP_SIZE >> 2) - FIRST_LARGE_HANDLE)
605 static GDIOBJHDR
*large_handles
[MAX_LARGE_HANDLES
];
606 static int next_large_handle
;
607 static LONG debug_count
;
609 static const char *gdi_obj_type( unsigned type
)
613 case OBJ_PEN
: return "OBJ_PEN";
614 case OBJ_BRUSH
: return "OBJ_BRUSH";
615 case OBJ_DC
: return "OBJ_DC";
616 case OBJ_METADC
: return "OBJ_METADC";
617 case OBJ_PAL
: return "OBJ_PAL";
618 case OBJ_FONT
: return "OBJ_FONT";
619 case OBJ_BITMAP
: return "OBJ_BITMAP";
620 case OBJ_REGION
: return "OBJ_REGION";
621 case OBJ_METAFILE
: return "OBJ_METAFILE";
622 case OBJ_MEMDC
: return "OBJ_MEMDC";
623 case OBJ_EXTPEN
: return "OBJ_EXTPEN";
624 case OBJ_ENHMETADC
: return "OBJ_ENHMETADC";
625 case OBJ_ENHMETAFILE
: return "OBJ_ENHMETAFILE";
626 case OBJ_COLORSPACE
: return "OBJ_COLORSPACE";
627 default: return "UNKNOWN";
631 static void dump_gdi_objects( void )
635 TRACE( "%u objects:\n", MAX_LARGE_HANDLES
);
637 EnterCriticalSection( &gdi_section
);
638 for (i
= 0; i
< MAX_LARGE_HANDLES
; i
++)
640 if (!large_handles
[i
])
642 TRACE( "index %d handle %p FREE\n", i
, (HGDIOBJ
)(ULONG_PTR
)((i
+ FIRST_LARGE_HANDLE
) << 2) );
645 TRACE( "handle %p obj %p type %s selcount %u deleted %u\n",
646 (HGDIOBJ
)(ULONG_PTR
)((i
+ FIRST_LARGE_HANDLE
) << 2),
647 large_handles
[i
], gdi_obj_type( large_handles
[i
]->type
),
648 large_handles
[i
]->selcount
, large_handles
[i
]->deleted
);
650 LeaveCriticalSection( &gdi_section
);
653 /***********************************************************************
656 * Allocate a GDI handle for an object, which must have been allocated on the process heap.
658 HGDIOBJ
alloc_gdi_handle( GDIOBJHDR
*obj
, WORD type
, const struct gdi_obj_funcs
*funcs
)
662 /* initialize the object header */
670 EnterCriticalSection( &gdi_section
);
671 for (i
= next_large_handle
+ 1; i
< MAX_LARGE_HANDLES
; i
++)
672 if (!large_handles
[i
]) goto found
;
673 for (i
= 0; i
<= next_large_handle
; i
++)
674 if (!large_handles
[i
]) goto found
;
675 LeaveCriticalSection( &gdi_section
);
677 ERR( "out of GDI object handles, expect a crash\n" );
678 if (TRACE_ON(gdi
)) dump_gdi_objects();
682 large_handles
[i
] = obj
;
683 next_large_handle
= i
;
684 LeaveCriticalSection( &gdi_section
);
685 TRACE( "allocated %s %p %u/%u\n",
686 gdi_obj_type(type
), (HGDIOBJ
)(ULONG_PTR
)((i
+ FIRST_LARGE_HANDLE
) << 2),
687 InterlockedIncrement( &debug_count
), MAX_LARGE_HANDLES
);
688 return (HGDIOBJ
)(ULONG_PTR
)((i
+ FIRST_LARGE_HANDLE
) << 2);
692 /***********************************************************************
695 * Free a GDI handle and return a pointer to the object.
697 void *free_gdi_handle( HGDIOBJ handle
)
699 GDIOBJHDR
*object
= NULL
;
702 i
= ((ULONG_PTR
)handle
>> 2) - FIRST_LARGE_HANDLE
;
703 if (i
>= 0 && i
< MAX_LARGE_HANDLES
)
705 EnterCriticalSection( &gdi_section
);
706 object
= large_handles
[i
];
707 large_handles
[i
] = NULL
;
708 LeaveCriticalSection( &gdi_section
);
712 TRACE( "freed %s %p %u/%u\n", gdi_obj_type( object
->type
), handle
,
713 InterlockedDecrement( &debug_count
) + 1, MAX_LARGE_HANDLES
);
714 object
->type
= 0; /* mark it as invalid */
715 object
->funcs
= NULL
;
721 /***********************************************************************
724 * Return a pointer to the GDI object associated to the handle.
725 * Return NULL if the object has the wrong magic number.
726 * The object must be released with GDI_ReleaseObj.
728 void *GDI_GetObjPtr( HGDIOBJ handle
, WORD type
)
730 GDIOBJHDR
*ptr
= NULL
;
733 EnterCriticalSection( &gdi_section
);
735 i
= ((UINT_PTR
)handle
>> 2) - FIRST_LARGE_HANDLE
;
736 if (i
>= 0 && i
< MAX_LARGE_HANDLES
)
738 ptr
= large_handles
[i
];
739 if (ptr
&& type
&& ptr
->type
!= type
) ptr
= NULL
;
744 LeaveCriticalSection( &gdi_section
);
745 WARN( "Invalid handle %p\n", handle
);
752 /***********************************************************************
756 void GDI_ReleaseObj( HGDIOBJ handle
)
758 LeaveCriticalSection( &gdi_section
);
762 /***********************************************************************
765 void GDI_CheckNotLock(void)
767 if (gdi_section
.OwningThread
== ULongToHandle(GetCurrentThreadId()) && gdi_section
.RecursionCount
)
769 ERR( "BUG: holding GDI lock\n" );
775 /***********************************************************************
776 * DeleteObject (GDI32.@)
778 * Delete a Gdi object.
781 * obj [I] Gdi object to delete
784 * Success: TRUE. If obj was not returned from GetStockObject(), any resources
785 * it consumed are released.
786 * Failure: FALSE, if obj is not a valid Gdi object, or is currently selected
789 BOOL WINAPI
DeleteObject( HGDIOBJ obj
)
791 /* Check if object is valid */
793 struct hdc_list
*hdcs_head
;
794 const struct gdi_obj_funcs
*funcs
;
797 if (HIWORD(obj
)) return FALSE
;
799 if (!(header
= GDI_GetObjPtr( obj
, 0 ))) return FALSE
;
803 TRACE("Preserving system object %p\n", obj
);
804 GDI_ReleaseObj( obj
);
808 while ((hdcs_head
= header
->hdcs
) != NULL
)
810 DC
*dc
= get_dc_ptr(hdcs_head
->hdc
);
812 header
->hdcs
= hdcs_head
->next
;
813 TRACE("hdc %p has interest in %p\n", hdcs_head
->hdc
, obj
);
817 PHYSDEV physdev
= GET_DC_PHYSDEV( dc
, pDeleteObject
);
818 GDI_ReleaseObj( obj
); /* release the GDI lock */
819 physdev
->funcs
->pDeleteObject( physdev
, obj
);
820 header
= GDI_GetObjPtr( obj
, 0 ); /* and grab it again */
821 release_dc_ptr( dc
);
823 HeapFree(GetProcessHeap(), 0, hdcs_head
);
824 if (!header
) return FALSE
;
827 if (header
->selcount
)
829 TRACE("delayed for %p because object in use, count %u\n", obj
, header
->selcount
);
830 header
->deleted
= 1; /* mark for delete */
831 GDI_ReleaseObj( obj
);
839 funcs
= header
->funcs
;
840 GDI_ReleaseObj( obj
);
841 if (funcs
&& funcs
->pDeleteObject
)
842 return funcs
->pDeleteObject( obj
);
847 /***********************************************************************
848 * GDI_hdc_using_object
850 * Call this if the dc requires DeleteObject notification
852 BOOL
GDI_hdc_using_object(HGDIOBJ obj
, HDC hdc
)
855 struct hdc_list
**pphdc
;
857 TRACE("obj %p hdc %p\n", obj
, hdc
);
859 if (!(header
= GDI_GetObjPtr( obj
, 0 ))) return FALSE
;
867 for(pphdc
= &header
->hdcs
; *pphdc
; pphdc
= &(*pphdc
)->next
)
868 if((*pphdc
)->hdc
== hdc
)
872 *pphdc
= HeapAlloc(GetProcessHeap(), 0, sizeof(**pphdc
));
874 (*pphdc
)->next
= NULL
;
881 /***********************************************************************
882 * GDI_hdc_not_using_object
885 BOOL
GDI_hdc_not_using_object(HGDIOBJ obj
, HDC hdc
)
888 struct hdc_list
*phdc
, **prev
;
890 TRACE("obj %p hdc %p\n", obj
, hdc
);
892 if (!(header
= GDI_GetObjPtr( obj
, 0 ))) return FALSE
;
901 prev
= &header
->hdcs
;
904 if(phdc
->hdc
== hdc
) {
906 HeapFree(GetProcessHeap(), 0, phdc
);
918 /***********************************************************************
919 * GetStockObject (GDI32.@)
921 HGDIOBJ WINAPI
GetStockObject( INT obj
)
924 if ((obj
< 0) || (obj
>= NB_STOCK_OBJECTS
)) return 0;
925 ret
= stock_objects
[obj
];
926 TRACE("returning %p\n", ret
);
931 /***********************************************************************
932 * GetObjectA (GDI32.@)
934 INT WINAPI
GetObjectA( HGDIOBJ handle
, INT count
, LPVOID buffer
)
936 const struct gdi_obj_funcs
*funcs
;
940 TRACE("%p %d %p\n", handle
, count
, buffer
);
942 if (!(ptr
= GDI_GetObjPtr( handle
, 0 ))) return 0;
944 GDI_ReleaseObj( handle
);
946 if (funcs
&& funcs
->pGetObjectA
)
948 if (buffer
&& ((ULONG_PTR
)buffer
>> 16) == 0) /* catch apps getting argument order wrong */
949 SetLastError( ERROR_NOACCESS
);
951 result
= funcs
->pGetObjectA( handle
, count
, buffer
);
954 SetLastError( ERROR_INVALID_HANDLE
);
959 /***********************************************************************
960 * GetObjectW (GDI32.@)
962 INT WINAPI
GetObjectW( HGDIOBJ handle
, INT count
, LPVOID buffer
)
964 const struct gdi_obj_funcs
*funcs
;
967 TRACE("%p %d %p\n", handle
, count
, buffer
);
969 if (!(ptr
= GDI_GetObjPtr( handle
, 0 ))) return 0;
971 GDI_ReleaseObj( handle
);
973 if (funcs
&& funcs
->pGetObjectW
)
975 if (buffer
&& ((ULONG_PTR
)buffer
>> 16) == 0) /* catch apps getting argument order wrong */
976 SetLastError( ERROR_NOACCESS
);
978 result
= funcs
->pGetObjectW( handle
, count
, buffer
);
981 SetLastError( ERROR_INVALID_HANDLE
);
986 /***********************************************************************
987 * GetObjectType (GDI32.@)
989 DWORD WINAPI
GetObjectType( HGDIOBJ handle
)
994 if (!(ptr
= GDI_GetObjPtr( handle
, 0 )))
996 SetLastError( ERROR_INVALID_HANDLE
);
1000 GDI_ReleaseObj( handle
);
1001 TRACE("%p -> %u\n", handle
, result
);
1005 /***********************************************************************
1006 * GetCurrentObject (GDI32.@)
1008 * Get the currently selected object of a given type in a device context.
1011 * hdc [I] Device context to get the current object from
1012 * type [I] Type of current object to get (OBJ_* defines from "wingdi.h")
1015 * Success: The current object of the given type selected in hdc.
1016 * Failure: A NULL handle.
1019 * - only the following object types are supported:
1026 HGDIOBJ WINAPI
GetCurrentObject(HDC hdc
,UINT type
)
1029 DC
* dc
= get_dc_ptr( hdc
);
1034 case OBJ_EXTPEN
: /* fall through */
1035 case OBJ_PEN
: ret
= dc
->hPen
; break;
1036 case OBJ_BRUSH
: ret
= dc
->hBrush
; break;
1037 case OBJ_PAL
: ret
= dc
->hPalette
; break;
1038 case OBJ_FONT
: ret
= dc
->hFont
; break;
1039 case OBJ_BITMAP
: ret
= dc
->hBitmap
; break;
1041 /* tests show that OBJ_REGION is explicitly ignored */
1042 case OBJ_REGION
: break;
1044 /* the SDK only mentions those above */
1045 FIXME("(%p,%d): unknown type.\n",hdc
,type
);
1048 release_dc_ptr( dc
);
1053 /***********************************************************************
1054 * SelectObject (GDI32.@)
1056 * Select a Gdi object into a device context.
1059 * hdc [I] Device context to associate the object with
1060 * hObj [I] Gdi object to associate with hdc
1063 * Success: A non-NULL handle representing the previously selected object of
1064 * the same type as hObj.
1065 * Failure: A NULL object. If hdc is invalid, GetLastError() returns ERROR_INVALID_HANDLE.
1066 * if hObj is not a valid object handle, no last error is set. In either
1067 * case, hdc is unaffected by the call.
1069 HGDIOBJ WINAPI
SelectObject( HDC hdc
, HGDIOBJ hObj
)
1074 TRACE( "(%p,%p)\n", hdc
, hObj
);
1076 header
= GDI_GetObjPtr( hObj
, 0 );
1079 const struct gdi_obj_funcs
*funcs
= header
->funcs
;
1080 GDI_ReleaseObj( hObj
);
1081 if (funcs
&& funcs
->pSelectObject
) ret
= funcs
->pSelectObject( hObj
, hdc
);
1087 /***********************************************************************
1088 * UnrealizeObject (GDI32.@)
1090 BOOL WINAPI
UnrealizeObject( HGDIOBJ obj
)
1092 BOOL result
= FALSE
;
1093 GDIOBJHDR
* header
= GDI_GetObjPtr( obj
, 0 );
1097 const struct gdi_obj_funcs
*funcs
= header
->funcs
;
1099 GDI_ReleaseObj( obj
);
1100 if (funcs
&& funcs
->pUnrealizeObject
)
1101 result
= header
->funcs
->pUnrealizeObject( obj
);
1109 /* Solid colors to enumerate */
1110 static const COLORREF solid_colors
[] =
1111 { RGB(0x00,0x00,0x00), RGB(0xff,0xff,0xff),
1112 RGB(0xff,0x00,0x00), RGB(0x00,0xff,0x00),
1113 RGB(0x00,0x00,0xff), RGB(0xff,0xff,0x00),
1114 RGB(0xff,0x00,0xff), RGB(0x00,0xff,0xff),
1115 RGB(0x80,0x00,0x00), RGB(0x00,0x80,0x00),
1116 RGB(0x80,0x80,0x00), RGB(0x00,0x00,0x80),
1117 RGB(0x80,0x00,0x80), RGB(0x00,0x80,0x80),
1118 RGB(0x80,0x80,0x80), RGB(0xc0,0xc0,0xc0)
1122 /***********************************************************************
1123 * EnumObjects (GDI32.@)
1125 INT WINAPI
EnumObjects( HDC hdc
, INT nObjType
,
1126 GOBJENUMPROC lpEnumFunc
, LPARAM lParam
)
1133 TRACE("%p %d %p %08lx\n", hdc
, nObjType
, lpEnumFunc
, lParam
);
1137 /* Enumerate solid pens */
1138 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
1140 pen
.lopnStyle
= PS_SOLID
;
1141 pen
.lopnWidth
.x
= 1;
1142 pen
.lopnWidth
.y
= 0;
1143 pen
.lopnColor
= solid_colors
[i
];
1144 retval
= lpEnumFunc( &pen
, lParam
);
1145 TRACE("solid pen %08x, ret=%d\n",
1146 solid_colors
[i
], retval
);
1152 /* Enumerate solid brushes */
1153 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
1155 brush
.lbStyle
= BS_SOLID
;
1156 brush
.lbColor
= solid_colors
[i
];
1158 retval
= lpEnumFunc( &brush
, lParam
);
1159 TRACE("solid brush %08x, ret=%d\n",
1160 solid_colors
[i
], retval
);
1164 /* Now enumerate hatched brushes */
1165 if (retval
) for (i
= HS_HORIZONTAL
; i
<= HS_DIAGCROSS
; i
++)
1167 brush
.lbStyle
= BS_HATCHED
;
1168 brush
.lbColor
= RGB(0,0,0);
1170 retval
= lpEnumFunc( &brush
, lParam
);
1171 TRACE("hatched brush %d, ret=%d\n",
1178 /* FIXME: implement Win32 types */
1179 WARN("(%d): Invalid type\n", nObjType
);
1186 /***********************************************************************
1187 * SetObjectOwner (GDI32.@)
1189 void WINAPI
SetObjectOwner( HGDIOBJ handle
, HANDLE owner
)
1194 /***********************************************************************
1195 * GdiInitializeLanguagePack (GDI32.@)
1197 DWORD WINAPI
GdiInitializeLanguagePack( DWORD arg
)
1203 /***********************************************************************
1204 * GdiFlush (GDI32.@)
1206 BOOL WINAPI
GdiFlush(void)
1208 return TRUE
; /* FIXME */
1212 /***********************************************************************
1213 * GdiGetBatchLimit (GDI32.@)
1215 DWORD WINAPI
GdiGetBatchLimit(void)
1217 return 1; /* FIXME */
1221 /***********************************************************************
1222 * GdiSetBatchLimit (GDI32.@)
1224 DWORD WINAPI
GdiSetBatchLimit( DWORD limit
)
1226 return 1; /* FIXME */
1230 /*******************************************************************
1231 * GetColorAdjustment [GDI32.@]
1235 BOOL WINAPI
GetColorAdjustment(HDC hdc
, LPCOLORADJUSTMENT lpca
)
1241 /*******************************************************************
1242 * GdiComment [GDI32.@]
1246 BOOL WINAPI
GdiComment(HDC hdc
, UINT cbSize
, const BYTE
*lpData
)
1248 DC
*dc
= get_dc_ptr(hdc
);
1253 PHYSDEV physdev
= GET_DC_PHYSDEV( dc
, pGdiComment
);
1254 ret
= physdev
->funcs
->pGdiComment( physdev
, cbSize
, lpData
);
1255 release_dc_ptr( dc
);
1260 /*******************************************************************
1261 * SetColorAdjustment [GDI32.@]
1265 BOOL WINAPI
SetColorAdjustment(HDC hdc
, const COLORADJUSTMENT
* lpca
)