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 /***********************************************************************
49 static const LOGBRUSH WhiteBrush
= { BS_SOLID
, RGB(255,255,255), 0 };
50 static const LOGBRUSH BlackBrush
= { BS_SOLID
, RGB(0,0,0), 0 };
51 static const LOGBRUSH NullBrush
= { BS_NULL
, 0, 0 };
53 static const LOGBRUSH LtGrayBrush
= { BS_SOLID
, RGB(192,192,192), 0 };
54 static const LOGBRUSH GrayBrush
= { BS_SOLID
, RGB(128,128,128), 0 };
55 static const LOGBRUSH DkGrayBrush
= { BS_SOLID
, RGB(64,64,64), 0 };
57 static const LOGPEN WhitePen
= { PS_SOLID
, { 0, 0 }, RGB(255,255,255) };
58 static const LOGPEN BlackPen
= { PS_SOLID
, { 0, 0 }, RGB(0,0,0) };
59 static const LOGPEN NullPen
= { PS_NULL
, { 0, 0 }, 0 };
61 static const LOGBRUSH DCBrush
= { BS_SOLID
, RGB(255,255,255), 0 };
62 static const LOGPEN DCPen
= { PS_SOLID
, { 0, 0 }, RGB(0,0,0) };
64 /* reserve one extra entry for the stock default bitmap */
65 /* this is what Windows does too */
66 #define NB_STOCK_OBJECTS (STOCK_LAST+2)
68 static HGDIOBJ stock_objects
[NB_STOCK_OBJECTS
];
70 static CRITICAL_SECTION gdi_section
;
71 static CRITICAL_SECTION_DEBUG critsect_debug
=
74 { &critsect_debug
.ProcessLocksList
, &critsect_debug
.ProcessLocksList
},
75 0, 0, { (DWORD_PTR
)(__FILE__
": gdi_section") }
77 static CRITICAL_SECTION gdi_section
= { &critsect_debug
, -1, 0, 0, 0, 0 };
80 /****************************************************************************
82 * language-independent stock fonts
86 static const LOGFONTW OEMFixedFont
=
87 { 12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, OEM_CHARSET
,
88 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
, {'\0'} };
90 static const LOGFONTW AnsiFixedFont
=
91 { 12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
92 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
, {'\0'} };
94 static const LOGFONTW AnsiVarFont
=
95 { 12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
96 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
97 {'M','S',' ','S','a','n','s',' ','S','e','r','i','f','\0'} };
99 /******************************************************************************
101 * language-dependent stock fonts
103 * 'ANSI' charset and 'DEFAULT' charset is not same.
104 * The chars in CP_ACP should be drawn with 'DEFAULT' charset.
105 * 'ANSI' charset seems to be identical with ISO-8859-1.
106 * 'DEFAULT' charset is a language-dependent charset.
108 * 'System' font seems to be an alias for language-dependent font.
112 * language-dependent stock fonts for all known charsets
113 * please see TranslateCharsetInfo (dlls/gdi/font.c) and
114 * CharsetBindingInfo (dlls/x11drv/xfont.c),
115 * and modify entries for your language if needed.
117 struct DefaultFontInfo
121 LOGFONTW DeviceDefaultFont
;
122 LOGFONTW SystemFixedFont
;
123 LOGFONTW DefaultGuiFont
; /* Note for this font the lfHeight member should be the point size */
126 static const struct DefaultFontInfo default_fonts
[] =
130 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
131 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
132 {'S','y','s','t','e','m','\0'}
134 { /* Device Default */
135 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
136 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
140 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
141 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
144 { /* DefaultGuiFont */
145 8, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
146 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
147 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
150 { EASTEUROPE_CHARSET
,
152 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, EASTEUROPE_CHARSET
,
153 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
154 {'S','y','s','t','e','m','\0'}
156 { /* Device Default */
157 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, EASTEUROPE_CHARSET
,
158 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
162 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, EASTEUROPE_CHARSET
,
163 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
166 { /* DefaultGuiFont */
167 8, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, EASTEUROPE_CHARSET
,
168 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
169 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
174 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, RUSSIAN_CHARSET
,
175 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
176 {'S','y','s','t','e','m','\0'}
178 { /* Device Default */
179 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, RUSSIAN_CHARSET
,
180 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
184 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, RUSSIAN_CHARSET
,
185 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
188 { /* DefaultGuiFont */
189 8, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, RUSSIAN_CHARSET
,
190 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
191 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
196 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GREEK_CHARSET
,
197 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
198 {'S','y','s','t','e','m','\0'}
200 { /* Device Default */
201 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GREEK_CHARSET
,
202 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
206 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GREEK_CHARSET
,
207 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
210 { /* DefaultGuiFont */
211 8, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GREEK_CHARSET
,
212 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
213 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
218 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, TURKISH_CHARSET
,
219 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
220 {'S','y','s','t','e','m','\0'}
222 { /* Device Default */
223 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, TURKISH_CHARSET
,
224 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
228 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, TURKISH_CHARSET
,
229 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
232 { /* DefaultGuiFont */
233 8, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, TURKISH_CHARSET
,
234 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
235 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
240 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HEBREW_CHARSET
,
241 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
242 {'S','y','s','t','e','m','\0'}
244 { /* Device Default */
245 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HEBREW_CHARSET
,
246 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
250 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HEBREW_CHARSET
,
251 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
254 { /* DefaultGuiFont */
255 8, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HEBREW_CHARSET
,
256 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
257 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
262 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ARABIC_CHARSET
,
263 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
264 {'S','y','s','t','e','m','\0'}
266 { /* Device Default */
267 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ARABIC_CHARSET
,
268 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
272 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ARABIC_CHARSET
,
273 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
276 { /* DefaultGuiFont */
277 8, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ARABIC_CHARSET
,
278 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
279 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
284 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, BALTIC_CHARSET
,
285 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
286 {'S','y','s','t','e','m','\0'}
288 { /* Device Default */
289 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, BALTIC_CHARSET
,
290 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
294 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, BALTIC_CHARSET
,
295 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
298 { /* DefaultGuiFont */
299 8, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, BALTIC_CHARSET
,
300 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
301 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
306 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, THAI_CHARSET
,
307 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
308 {'S','y','s','t','e','m','\0'}
310 { /* Device Default */
311 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, THAI_CHARSET
,
312 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
316 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, THAI_CHARSET
,
317 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
320 { /* DefaultGuiFont */
321 8, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, THAI_CHARSET
,
322 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
323 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
328 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, SHIFTJIS_CHARSET
,
329 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
330 {'S','y','s','t','e','m','\0'}
332 { /* Device Default */
333 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, SHIFTJIS_CHARSET
,
334 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
338 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, SHIFTJIS_CHARSET
,
339 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
342 { /* DefaultGuiFont */
343 9, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, SHIFTJIS_CHARSET
,
344 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
345 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
350 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GB2312_CHARSET
,
351 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
352 {'S','y','s','t','e','m','\0'}
354 { /* Device Default */
355 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GB2312_CHARSET
,
356 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
360 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GB2312_CHARSET
,
361 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
364 { /* DefaultGuiFont */
365 9, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, GB2312_CHARSET
,
366 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
367 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
372 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HANGEUL_CHARSET
,
373 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
374 {'S','y','s','t','e','m','\0'}
376 { /* Device Default */
377 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HANGEUL_CHARSET
,
378 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
382 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HANGEUL_CHARSET
,
383 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
386 { /* DefaultGuiFont */
387 9, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, HANGEUL_CHARSET
,
388 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
389 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
392 { CHINESEBIG5_CHARSET
,
394 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, CHINESEBIG5_CHARSET
,
395 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
396 {'S','y','s','t','e','m','\0'}
398 { /* Device Default */
399 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, CHINESEBIG5_CHARSET
,
400 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
404 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, CHINESEBIG5_CHARSET
,
405 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
408 { /* DefaultGuiFont */
409 9, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, CHINESEBIG5_CHARSET
,
410 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
411 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
416 16, 7, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, JOHAB_CHARSET
,
417 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
418 {'S','y','s','t','e','m','\0'}
420 { /* Device Default */
421 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, JOHAB_CHARSET
,
422 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
426 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, JOHAB_CHARSET
,
427 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
,
430 { /* DefaultGuiFont */
431 8, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, JOHAB_CHARSET
,
432 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
433 {'M','S',' ','S','h','e','l','l',' ','D','l','g','\0'}
439 /*************************************************************************
440 * __wine_make_gdi_object_system (GDI32.@)
442 * USER has to tell GDI that its system brushes and pens are non-deletable.
443 * For a description of the GDI object magics and their flags,
444 * see "Undocumented Windows" (wrong about the OBJECT_NOSYSTEM flag, though).
446 void CDECL
__wine_make_gdi_object_system( HGDIOBJ handle
, BOOL set
)
448 GDIOBJHDR
*ptr
= GDI_GetObjPtr( handle
, 0 );
450 GDI_ReleaseObj( handle
);
453 /******************************************************************************
456 static const struct DefaultFontInfo
* get_default_fonts(UINT charset
)
460 for(n
=0;n
<(sizeof(default_fonts
)/sizeof(default_fonts
[0]));n
++)
462 if ( default_fonts
[n
].charset
== charset
)
463 return &default_fonts
[n
];
466 FIXME( "unhandled charset 0x%08x - use ANSI_CHARSET for default stock objects\n", charset
);
467 return &default_fonts
[0];
471 /******************************************************************************
472 * get_default_charset (internal)
474 * get the language-dependent charset that can handle CP_ACP correctly.
476 static UINT
get_default_charset( void )
482 csi
.ciCharset
= ANSI_CHARSET
;
483 if ( !TranslateCharsetInfo( ULongToPtr(uACP
), &csi
, TCI_SRCCODEPAGE
) )
485 FIXME( "unhandled codepage %u - use ANSI_CHARSET for default stock objects\n", uACP
);
489 return csi
.ciCharset
;
492 static const WCHAR dpi_key_name
[] = {'S','o','f','t','w','a','r','e','\\','F','o','n','t','s','\0'};
493 static const WCHAR dpi_value_name
[] = {'L','o','g','P','i','x','e','l','s','\0'};
495 /******************************************************************************
498 * get the dpi from the registry
500 static DWORD
get_dpi( void )
505 if (RegOpenKeyW(HKEY_CURRENT_CONFIG
, dpi_key_name
, &hkey
) == ERROR_SUCCESS
)
507 DWORD type
, size
, new_dpi
;
509 size
= sizeof(new_dpi
);
510 if(RegQueryValueExW(hkey
, dpi_value_name
, NULL
, &type
, (void *)&new_dpi
, &size
) == ERROR_SUCCESS
)
512 if(type
== REG_DWORD
&& new_dpi
!= 0)
521 /***********************************************************************
524 * Increment the reference count of a GDI object.
526 HGDIOBJ
GDI_inc_ref_count( HGDIOBJ handle
)
530 if ((header
= GDI_GetObjPtr( handle
, 0 )))
533 GDI_ReleaseObj( handle
);
541 /***********************************************************************
544 * Decrement the reference count of a GDI object.
546 BOOL
GDI_dec_ref_count( HGDIOBJ handle
)
550 if ((header
= GDI_GetObjPtr( handle
, 0 )))
552 assert( header
->selcount
);
553 if (!--header
->selcount
&& header
->deleted
)
555 /* handle delayed DeleteObject*/
557 GDI_ReleaseObj( handle
);
558 TRACE( "executing delayed DeleteObject for %p\n", handle
);
559 DeleteObject( handle
);
561 else GDI_ReleaseObj( handle
);
563 return header
!= NULL
;
567 /***********************************************************************
570 * GDI initialization.
572 BOOL WINAPI
DllMain( HINSTANCE inst
, DWORD reason
, LPVOID reserved
)
574 LOGFONTW default_gui_font
;
575 const struct DefaultFontInfo
* deffonts
;
578 if (reason
!= DLL_PROCESS_ATTACH
) return TRUE
;
580 DisableThreadLibraryCalls( inst
);
583 /* create stock objects */
584 stock_objects
[WHITE_BRUSH
] = CreateBrushIndirect( &WhiteBrush
);
585 stock_objects
[LTGRAY_BRUSH
] = CreateBrushIndirect( &LtGrayBrush
);
586 stock_objects
[GRAY_BRUSH
] = CreateBrushIndirect( &GrayBrush
);
587 stock_objects
[DKGRAY_BRUSH
] = CreateBrushIndirect( &DkGrayBrush
);
588 stock_objects
[BLACK_BRUSH
] = CreateBrushIndirect( &BlackBrush
);
589 stock_objects
[NULL_BRUSH
] = CreateBrushIndirect( &NullBrush
);
591 stock_objects
[WHITE_PEN
] = CreatePenIndirect( &WhitePen
);
592 stock_objects
[BLACK_PEN
] = CreatePenIndirect( &BlackPen
);
593 stock_objects
[NULL_PEN
] = CreatePenIndirect( &NullPen
);
595 stock_objects
[DEFAULT_PALETTE
] = PALETTE_Init();
596 stock_objects
[DEFAULT_BITMAP
] = CreateBitmap( 1, 1, 1, 1, NULL
);
598 /* language-independent stock fonts */
599 stock_objects
[OEM_FIXED_FONT
] = CreateFontIndirectW( &OEMFixedFont
);
600 stock_objects
[ANSI_FIXED_FONT
] = CreateFontIndirectW( &AnsiFixedFont
);
601 stock_objects
[ANSI_VAR_FONT
] = CreateFontIndirectW( &AnsiVarFont
);
603 /* language-dependent stock fonts */
604 deffonts
= get_default_fonts(get_default_charset());
605 stock_objects
[SYSTEM_FONT
] = CreateFontIndirectW( &deffonts
->SystemFont
);
606 stock_objects
[DEVICE_DEFAULT_FONT
] = CreateFontIndirectW( &deffonts
->DeviceDefaultFont
);
607 stock_objects
[SYSTEM_FIXED_FONT
] = CreateFontIndirectW( &deffonts
->SystemFixedFont
);
609 /* For the default gui font, we use the lfHeight member in deffonts as a place-holder
610 for the point size so we must convert this into a true height */
611 default_gui_font
= deffonts
->DefaultGuiFont
;
612 default_gui_font
.lfHeight
= -MulDiv(default_gui_font
.lfHeight
, get_dpi(), 72);
613 stock_objects
[DEFAULT_GUI_FONT
] = CreateFontIndirectW( &default_gui_font
);
615 stock_objects
[DC_BRUSH
] = CreateBrushIndirect( &DCBrush
);
616 stock_objects
[DC_PEN
] = CreatePenIndirect( &DCPen
);
618 /* clear the NOSYSTEM bit on all stock objects*/
619 for (i
= 0; i
< NB_STOCK_OBJECTS
; i
++)
621 if (!stock_objects
[i
])
623 if (i
== 9) continue; /* there's no stock object 9 */
624 ERR( "could not create stock object %d\n", i
);
627 __wine_make_gdi_object_system( stock_objects
[i
], TRUE
);
633 #define FIRST_LARGE_HANDLE 16
634 #define MAX_LARGE_HANDLES ((GDI_HEAP_SIZE >> 2) - FIRST_LARGE_HANDLE)
635 static GDIOBJHDR
*large_handles
[MAX_LARGE_HANDLES
];
636 static int next_large_handle
;
638 static const char *gdi_obj_type( unsigned type
)
642 case OBJ_PEN
: return "OBJ_PEN";
643 case OBJ_BRUSH
: return "OBJ_BRUSH";
644 case OBJ_DC
: return "OBJ_DC";
645 case OBJ_METADC
: return "OBJ_METADC";
646 case OBJ_PAL
: return "OBJ_PAL";
647 case OBJ_FONT
: return "OBJ_FONT";
648 case OBJ_BITMAP
: return "OBJ_BITMAP";
649 case OBJ_REGION
: return "OBJ_REGION";
650 case OBJ_METAFILE
: return "OBJ_METAFILE";
651 case OBJ_MEMDC
: return "OBJ_MEMDC";
652 case OBJ_EXTPEN
: return "OBJ_EXTPEN";
653 case OBJ_ENHMETADC
: return "OBJ_ENHMETADC";
654 case OBJ_ENHMETAFILE
: return "OBJ_ENHMETAFILE";
655 case OBJ_COLORSPACE
: return "OBJ_COLORSPACE";
656 default: return "UNKNOWN";
660 static void dump_gdi_objects( void )
664 TRACE( "%u objects:\n", MAX_LARGE_HANDLES
);
666 EnterCriticalSection( &gdi_section
);
667 for (i
= 0; i
< MAX_LARGE_HANDLES
; i
++)
669 if (!large_handles
[i
])
671 TRACE( "index %d handle %p FREE\n", i
, (HGDIOBJ
)(ULONG_PTR
)((i
+ FIRST_LARGE_HANDLE
) << 2) );
674 TRACE( "handle %p obj %p type %s selcount %u deleted %u\n",
675 (HGDIOBJ
)(ULONG_PTR
)((i
+ FIRST_LARGE_HANDLE
) << 2),
676 large_handles
[i
], gdi_obj_type( large_handles
[i
]->type
),
677 large_handles
[i
]->selcount
, large_handles
[i
]->deleted
);
679 LeaveCriticalSection( &gdi_section
);
682 /***********************************************************************
685 * Allocate a GDI handle for an object, which must have been allocated on the process heap.
687 HGDIOBJ
alloc_gdi_handle( GDIOBJHDR
*obj
, WORD type
, const struct gdi_obj_funcs
*funcs
)
691 /* initialize the object header */
699 EnterCriticalSection( &gdi_section
);
700 for (i
= next_large_handle
+ 1; i
< MAX_LARGE_HANDLES
; i
++)
701 if (!large_handles
[i
]) goto found
;
702 for (i
= 0; i
<= next_large_handle
; i
++)
703 if (!large_handles
[i
]) goto found
;
704 LeaveCriticalSection( &gdi_section
);
706 ERR( "out of GDI object handles, expect a crash\n" );
707 if (TRACE_ON(gdi
)) dump_gdi_objects();
711 large_handles
[i
] = obj
;
712 next_large_handle
= i
;
713 LeaveCriticalSection( &gdi_section
);
714 return (HGDIOBJ
)(ULONG_PTR
)((i
+ FIRST_LARGE_HANDLE
) << 2);
718 /***********************************************************************
721 * Free a GDI handle and return a pointer to the object.
723 void *free_gdi_handle( HGDIOBJ handle
)
725 GDIOBJHDR
*object
= NULL
;
728 i
= ((ULONG_PTR
)handle
>> 2) - FIRST_LARGE_HANDLE
;
729 if (i
>= 0 && i
< MAX_LARGE_HANDLES
)
731 EnterCriticalSection( &gdi_section
);
732 object
= large_handles
[i
];
733 large_handles
[i
] = NULL
;
734 LeaveCriticalSection( &gdi_section
);
738 object
->type
= 0; /* mark it as invalid */
739 object
->funcs
= NULL
;
745 /***********************************************************************
748 * Return a pointer to the GDI object associated to the handle.
749 * Return NULL if the object has the wrong magic number.
750 * The object must be released with GDI_ReleaseObj.
752 void *GDI_GetObjPtr( HGDIOBJ handle
, WORD type
)
754 GDIOBJHDR
*ptr
= NULL
;
757 EnterCriticalSection( &gdi_section
);
759 i
= ((UINT_PTR
)handle
>> 2) - FIRST_LARGE_HANDLE
;
760 if (i
>= 0 && i
< MAX_LARGE_HANDLES
)
762 ptr
= large_handles
[i
];
763 if (ptr
&& type
&& ptr
->type
!= type
) ptr
= NULL
;
768 LeaveCriticalSection( &gdi_section
);
769 WARN( "Invalid handle %p\n", handle
);
771 else TRACE("(%p): enter %d\n", handle
, gdi_section
.RecursionCount
);
777 /***********************************************************************
781 void GDI_ReleaseObj( HGDIOBJ handle
)
783 TRACE("(%p): leave %d\n", handle
, gdi_section
.RecursionCount
);
784 LeaveCriticalSection( &gdi_section
);
788 /***********************************************************************
791 void GDI_CheckNotLock(void)
793 if (gdi_section
.OwningThread
== ULongToHandle(GetCurrentThreadId()) && gdi_section
.RecursionCount
)
795 ERR( "BUG: holding GDI lock\n" );
801 /***********************************************************************
802 * DeleteObject (GDI32.@)
804 * Delete a Gdi object.
807 * obj [I] Gdi object to delete
810 * Success: TRUE. If obj was not returned from GetStockObject(), any resources
811 * it consumed are released.
812 * Failure: FALSE, if obj is not a valid Gdi object, or is currently selected
815 BOOL WINAPI
DeleteObject( HGDIOBJ obj
)
817 /* Check if object is valid */
819 struct hdc_list
*hdcs_head
;
820 const struct gdi_obj_funcs
*funcs
;
823 if (HIWORD(obj
)) return FALSE
;
825 if (!(header
= GDI_GetObjPtr( obj
, 0 ))) return FALSE
;
829 TRACE("Preserving system object %p\n", obj
);
830 GDI_ReleaseObj( obj
);
834 while ((hdcs_head
= header
->hdcs
) != NULL
)
836 DC
*dc
= get_dc_ptr(hdcs_head
->hdc
);
838 header
->hdcs
= hdcs_head
->next
;
839 TRACE("hdc %p has interest in %p\n", hdcs_head
->hdc
, obj
);
843 if(dc
->funcs
->pDeleteObject
)
845 GDI_ReleaseObj( obj
); /* release the GDI lock */
846 dc
->funcs
->pDeleteObject( dc
->physDev
, obj
);
847 header
= GDI_GetObjPtr( obj
, 0 ); /* and grab it again */
849 release_dc_ptr( dc
);
851 HeapFree(GetProcessHeap(), 0, hdcs_head
);
852 if (!header
) return FALSE
;
855 if (header
->selcount
)
857 TRACE("delayed for %p because object in use, count %u\n", obj
, header
->selcount
);
858 header
->deleted
= 1; /* mark for delete */
859 GDI_ReleaseObj( obj
);
867 funcs
= header
->funcs
;
868 GDI_ReleaseObj( obj
);
869 if (funcs
&& funcs
->pDeleteObject
)
870 return funcs
->pDeleteObject( obj
);
875 /***********************************************************************
876 * GDI_hdc_using_object
878 * Call this if the dc requires DeleteObject notification
880 BOOL
GDI_hdc_using_object(HGDIOBJ obj
, HDC hdc
)
883 struct hdc_list
**pphdc
;
885 TRACE("obj %p hdc %p\n", obj
, hdc
);
887 if (!(header
= GDI_GetObjPtr( obj
, 0 ))) return FALSE
;
895 for(pphdc
= &header
->hdcs
; *pphdc
; pphdc
= &(*pphdc
)->next
)
896 if((*pphdc
)->hdc
== hdc
)
900 *pphdc
= HeapAlloc(GetProcessHeap(), 0, sizeof(**pphdc
));
902 (*pphdc
)->next
= NULL
;
909 /***********************************************************************
910 * GDI_hdc_not_using_object
913 BOOL
GDI_hdc_not_using_object(HGDIOBJ obj
, HDC hdc
)
916 struct hdc_list
*phdc
, **prev
;
918 TRACE("obj %p hdc %p\n", obj
, hdc
);
920 if (!(header
= GDI_GetObjPtr( obj
, 0 ))) return FALSE
;
929 prev
= &header
->hdcs
;
932 if(phdc
->hdc
== hdc
) {
934 HeapFree(GetProcessHeap(), 0, phdc
);
946 /***********************************************************************
947 * GetStockObject (GDI32.@)
949 HGDIOBJ WINAPI
GetStockObject( INT obj
)
952 if ((obj
< 0) || (obj
>= NB_STOCK_OBJECTS
)) return 0;
953 ret
= stock_objects
[obj
];
954 TRACE("returning %p\n", ret
);
959 /***********************************************************************
960 * GetObjectA (GDI32.@)
962 INT WINAPI
GetObjectA( HGDIOBJ handle
, INT count
, LPVOID buffer
)
964 const struct gdi_obj_funcs
*funcs
;
968 TRACE("%p %d %p\n", handle
, count
, buffer
);
970 if (!(ptr
= GDI_GetObjPtr( handle
, 0 ))) return 0;
972 GDI_ReleaseObj( handle
);
974 if (funcs
&& funcs
->pGetObjectA
)
975 result
= funcs
->pGetObjectA( handle
, count
, buffer
);
977 SetLastError( ERROR_INVALID_HANDLE
);
982 /***********************************************************************
983 * GetObjectW (GDI32.@)
985 INT WINAPI
GetObjectW( HGDIOBJ handle
, INT count
, LPVOID buffer
)
987 const struct gdi_obj_funcs
*funcs
;
990 TRACE("%p %d %p\n", handle
, count
, buffer
);
992 if (!(ptr
= GDI_GetObjPtr( handle
, 0 ))) return 0;
994 GDI_ReleaseObj( handle
);
996 if (funcs
&& funcs
->pGetObjectW
)
997 result
= funcs
->pGetObjectW( handle
, count
, buffer
);
999 SetLastError( ERROR_INVALID_HANDLE
);
1004 /***********************************************************************
1005 * GetObjectType (GDI32.@)
1007 DWORD WINAPI
GetObjectType( HGDIOBJ handle
)
1012 if (!(ptr
= GDI_GetObjPtr( handle
, 0 )))
1014 SetLastError( ERROR_INVALID_HANDLE
);
1018 GDI_ReleaseObj( handle
);
1019 TRACE("%p -> %u\n", handle
, result
);
1023 /***********************************************************************
1024 * GetCurrentObject (GDI32.@)
1026 * Get the currently selected object of a given type in a device context.
1029 * hdc [I] Device context to get the current object from
1030 * type [I] Type of current object to get (OBJ_* defines from "wingdi.h")
1033 * Success: The current object of the given type selected in hdc.
1034 * Failure: A NULL handle.
1037 * - only the following object types are supported:
1044 HGDIOBJ WINAPI
GetCurrentObject(HDC hdc
,UINT type
)
1047 DC
* dc
= get_dc_ptr( hdc
);
1052 case OBJ_EXTPEN
: /* fall through */
1053 case OBJ_PEN
: ret
= dc
->hPen
; break;
1054 case OBJ_BRUSH
: ret
= dc
->hBrush
; break;
1055 case OBJ_PAL
: ret
= dc
->hPalette
; break;
1056 case OBJ_FONT
: ret
= dc
->hFont
; break;
1057 case OBJ_BITMAP
: ret
= dc
->hBitmap
; break;
1059 /* tests show that OBJ_REGION is explicitly ignored */
1060 case OBJ_REGION
: break;
1062 /* the SDK only mentions those above */
1063 FIXME("(%p,%d): unknown type.\n",hdc
,type
);
1066 release_dc_ptr( dc
);
1071 /***********************************************************************
1072 * SelectObject (GDI32.@)
1074 * Select a Gdi object into a device context.
1077 * hdc [I] Device context to associate the object with
1078 * hObj [I] Gdi object to associate with hdc
1081 * Success: A non-NULL handle representing the previously selected object of
1082 * the same type as hObj.
1083 * Failure: A NULL object. If hdc is invalid, GetLastError() returns ERROR_INVALID_HANDLE.
1084 * if hObj is not a valid object handle, no last error is set. In either
1085 * case, hdc is unaffected by the call.
1087 HGDIOBJ WINAPI
SelectObject( HDC hdc
, HGDIOBJ hObj
)
1092 TRACE( "(%p,%p)\n", hdc
, hObj
);
1094 header
= GDI_GetObjPtr( hObj
, 0 );
1097 const struct gdi_obj_funcs
*funcs
= header
->funcs
;
1098 GDI_ReleaseObj( hObj
);
1099 if (funcs
&& funcs
->pSelectObject
) ret
= funcs
->pSelectObject( hObj
, hdc
);
1105 /***********************************************************************
1106 * UnrealizeObject (GDI32.@)
1108 BOOL WINAPI
UnrealizeObject( HGDIOBJ obj
)
1110 BOOL result
= FALSE
;
1111 GDIOBJHDR
* header
= GDI_GetObjPtr( obj
, 0 );
1115 const struct gdi_obj_funcs
*funcs
= header
->funcs
;
1117 GDI_ReleaseObj( obj
);
1118 if (funcs
&& funcs
->pUnrealizeObject
)
1119 result
= header
->funcs
->pUnrealizeObject( obj
);
1127 /* Solid colors to enumerate */
1128 static const COLORREF solid_colors
[] =
1129 { RGB(0x00,0x00,0x00), RGB(0xff,0xff,0xff),
1130 RGB(0xff,0x00,0x00), RGB(0x00,0xff,0x00),
1131 RGB(0x00,0x00,0xff), RGB(0xff,0xff,0x00),
1132 RGB(0xff,0x00,0xff), RGB(0x00,0xff,0xff),
1133 RGB(0x80,0x00,0x00), RGB(0x00,0x80,0x00),
1134 RGB(0x80,0x80,0x00), RGB(0x00,0x00,0x80),
1135 RGB(0x80,0x00,0x80), RGB(0x00,0x80,0x80),
1136 RGB(0x80,0x80,0x80), RGB(0xc0,0xc0,0xc0)
1140 /***********************************************************************
1141 * EnumObjects (GDI32.@)
1143 INT WINAPI
EnumObjects( HDC hdc
, INT nObjType
,
1144 GOBJENUMPROC lpEnumFunc
, LPARAM lParam
)
1151 TRACE("%p %d %p %08lx\n", hdc
, nObjType
, lpEnumFunc
, lParam
);
1155 /* Enumerate solid pens */
1156 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
1158 pen
.lopnStyle
= PS_SOLID
;
1159 pen
.lopnWidth
.x
= 1;
1160 pen
.lopnWidth
.y
= 0;
1161 pen
.lopnColor
= solid_colors
[i
];
1162 retval
= lpEnumFunc( &pen
, lParam
);
1163 TRACE("solid pen %08x, ret=%d\n",
1164 solid_colors
[i
], retval
);
1170 /* Enumerate solid brushes */
1171 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
1173 brush
.lbStyle
= BS_SOLID
;
1174 brush
.lbColor
= solid_colors
[i
];
1176 retval
= lpEnumFunc( &brush
, lParam
);
1177 TRACE("solid brush %08x, ret=%d\n",
1178 solid_colors
[i
], retval
);
1182 /* Now enumerate hatched brushes */
1183 if (retval
) for (i
= HS_HORIZONTAL
; i
<= HS_DIAGCROSS
; i
++)
1185 brush
.lbStyle
= BS_HATCHED
;
1186 brush
.lbColor
= RGB(0,0,0);
1188 retval
= lpEnumFunc( &brush
, lParam
);
1189 TRACE("hatched brush %d, ret=%d\n",
1196 /* FIXME: implement Win32 types */
1197 WARN("(%d): Invalid type\n", nObjType
);
1204 /***********************************************************************
1205 * SetObjectOwner (GDI32.@)
1207 void WINAPI
SetObjectOwner( HGDIOBJ handle
, HANDLE owner
)
1212 /***********************************************************************
1213 * GdiInitializeLanguagePack (GDI32.@)
1215 DWORD WINAPI
GdiInitializeLanguagePack( DWORD arg
)
1221 /***********************************************************************
1222 * GdiFlush (GDI32.@)
1224 BOOL WINAPI
GdiFlush(void)
1226 return TRUE
; /* FIXME */
1230 /***********************************************************************
1231 * GdiGetBatchLimit (GDI32.@)
1233 DWORD WINAPI
GdiGetBatchLimit(void)
1235 return 1; /* FIXME */
1239 /***********************************************************************
1240 * GdiSetBatchLimit (GDI32.@)
1242 DWORD WINAPI
GdiSetBatchLimit( DWORD limit
)
1244 return 1; /* FIXME */
1248 /*******************************************************************
1249 * GetColorAdjustment [GDI32.@]
1253 BOOL WINAPI
GetColorAdjustment(HDC hdc
, LPCOLORADJUSTMENT lpca
)
1259 /*******************************************************************
1260 * GdiComment [GDI32.@]
1264 BOOL WINAPI
GdiComment(HDC hdc
, UINT cbSize
, const BYTE
*lpData
)
1266 DC
*dc
= get_dc_ptr(hdc
);
1270 if (dc
->funcs
->pGdiComment
)
1271 ret
= dc
->funcs
->pGdiComment( dc
->physDev
, cbSize
, lpData
);
1272 release_dc_ptr( dc
);
1277 /*******************************************************************
1278 * SetColorAdjustment [GDI32.@]
1282 BOOL WINAPI
SetColorAdjustment(HDC hdc
, const COLORADJUSTMENT
* lpca
)