4 * Copyright 1993 Alexandre Julliard
17 #include "wine/winbase16.h"
27 #include "debugtools.h"
30 DEFAULT_DEBUG_CHANNEL(gdi
);
33 /***********************************************************************
37 static const LOGBRUSH WhiteBrush
= { BS_SOLID
, RGB(255,255,255), 0 };
38 static const LOGBRUSH BlackBrush
= { BS_SOLID
, RGB(0,0,0), 0 };
39 static const LOGBRUSH NullBrush
= { BS_NULL
, 0, 0 };
41 /* FIXME: these should perhaps be BS_HATCHED, at least for 1 bitperpixel */
42 static const LOGBRUSH LtGrayBrush
= { BS_SOLID
, RGB(192,192,192), 0 };
43 static const LOGBRUSH GrayBrush
= { BS_SOLID
, RGB(128,128,128), 0 };
45 /* This is BS_HATCHED, for 1 bitperpixel. This makes the spray work in pbrush */
46 /* NB_HATCH_STYLES is an index into HatchBrushes */
47 static const LOGBRUSH DkGrayBrush
= { BS_HATCHED
, RGB(0,0,0), NB_HATCH_STYLES
};
49 static const LOGPEN WhitePen
= { PS_SOLID
, { 0, 0 }, RGB(255,255,255) };
50 static const LOGPEN BlackPen
= { PS_SOLID
, { 0, 0 }, RGB(0,0,0) };
51 static const LOGPEN NullPen
= { PS_NULL
, { 0, 0 }, 0 };
53 static const LOGFONTW OEMFixedFont
=
54 { 12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, OEM_CHARSET
,
55 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
, {'\0'} };
57 static const LOGFONTW AnsiFixedFont
=
58 { 12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
59 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
, {'\0'} };
61 static const LOGFONTW AnsiVarFont
=
62 { 12, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
63 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
64 {'M','S',' ','S','a','n','s',' ','S','e','r','i','f','\0'} };
66 static const LOGFONTW SystemFont
=
67 { 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
68 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
69 {'S','y','s','t','e','m','\0'} };
71 static const LOGFONTW DeviceDefaultFont
=
72 { 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
73 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
, {'\0'} };
75 static const LOGFONTW SystemFixedFont
=
76 { 16, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
77 0, 0, DEFAULT_QUALITY
, FIXED_PITCH
| FF_MODERN
, {'\0'} };
79 /* FIXME: Is this correct? */
80 static const LOGFONTW DefaultGuiFont
=
81 { -11, 0, 0, 0, FW_NORMAL
, FALSE
, FALSE
, FALSE
, ANSI_CHARSET
,
82 0, 0, DEFAULT_QUALITY
, VARIABLE_PITCH
| FF_SWISS
,
83 {'M','S',' ','S','a','n','s',' ','S','e','r','i','f','\0'} };
85 /* reserve one extra entry for the stock default bitmap */
86 /* this is what Windows does too */
87 #define NB_STOCK_OBJECTS (STOCK_LAST+2)
89 static HGDIOBJ stock_objects
[NB_STOCK_OBJECTS
];
91 static SYSLEVEL GDI_level
= { CRITICAL_SECTION_INIT("GDI_level"), 3 };
92 static WORD GDI_HeapSel
;
94 inline static BOOL
get_bool(char *buffer
)
96 return (buffer
[0] == 'y' || buffer
[0] == 'Y' ||
97 buffer
[0] == 't' || buffer
[0] == 'T' ||
102 /******************************************************************************
105 static HFONT
create_stock_font( char const *fontName
, const LOGFONTW
*font
, HKEY hkey
)
109 char buffer
[MAX_PATH
];
112 if (!hkey
) return CreateFontIndirectW( font
);
115 sprintf(key
, "%s.Height", fontName
);
116 count
= sizeof(buffer
);
117 if(!RegQueryValueExA(hkey
, key
, 0, &type
, buffer
, &count
))
118 lf
.lfHeight
= atoi(buffer
);
120 sprintf(key
, "%s.Bold", fontName
);
121 count
= sizeof(buffer
);
122 if(!RegQueryValueExA(hkey
, key
, 0, &type
, buffer
, &count
))
123 lf
.lfWeight
= get_bool(buffer
) ? FW_BOLD
: FW_NORMAL
;
125 sprintf(key
, "%s.Italic", fontName
);
126 count
= sizeof(buffer
);
127 if(!RegQueryValueExA(hkey
, key
, 0, &type
, buffer
, &count
))
128 lf
.lfItalic
= get_bool(buffer
);
130 sprintf(key
, "%s.Underline", fontName
);
131 count
= sizeof(buffer
);
132 if(!RegQueryValueExA(hkey
, key
, 0, &type
, buffer
, &count
))
133 lf
.lfUnderline
= get_bool(buffer
);
135 sprintf(key
, "%s.StrikeOut", fontName
);
136 count
= sizeof(buffer
);
137 if(!RegQueryValueExA(hkey
, key
, 0, &type
, buffer
, &count
))
138 lf
.lfStrikeOut
= get_bool(buffer
);
139 return CreateFontIndirectW( &lf
);
143 #define TRACE_SEC(handle,text) \
144 TRACE("(%04x): " text " %ld\n", (handle), GDI_level.crst.RecursionCount)
147 /***********************************************************************
150 * GDI initialization.
154 HINSTANCE16 instance
;
159 if (RegOpenKeyA(HKEY_LOCAL_MACHINE
, "Software\\Wine\\Wine\\Config\\Tweak.Fonts", &hkey
))
162 /* create GDI heap */
163 if ((instance
= LoadLibrary16( "GDI.EXE" )) < 32) return FALSE
;
164 GDI_HeapSel
= instance
| 7;
166 /* create stock objects */
167 stock_objects
[WHITE_BRUSH
] = CreateBrushIndirect( &WhiteBrush
);
168 stock_objects
[LTGRAY_BRUSH
] = CreateBrushIndirect( &LtGrayBrush
);
169 stock_objects
[GRAY_BRUSH
] = CreateBrushIndirect( &GrayBrush
);
170 stock_objects
[DKGRAY_BRUSH
] = CreateBrushIndirect( &DkGrayBrush
);
171 stock_objects
[BLACK_BRUSH
] = CreateBrushIndirect( &BlackBrush
);
172 stock_objects
[NULL_BRUSH
] = CreateBrushIndirect( &NullBrush
);
174 stock_objects
[WHITE_PEN
] = CreatePenIndirect( &WhitePen
);
175 stock_objects
[BLACK_PEN
] = CreatePenIndirect( &BlackPen
);
176 stock_objects
[NULL_PEN
] = CreatePenIndirect( &NullPen
);
178 stock_objects
[DEFAULT_PALETTE
] = PALETTE_Init();
179 stock_objects
[DEFAULT_BITMAP
] = CreateBitmap( 1, 1, 1, 1, NULL
);
181 stock_objects
[OEM_FIXED_FONT
] = create_stock_font( "OEMFixed", &OEMFixedFont
, hkey
);
182 stock_objects
[ANSI_FIXED_FONT
] = create_stock_font( "AnsiFixed", &AnsiFixedFont
, hkey
);
183 stock_objects
[ANSI_VAR_FONT
] = create_stock_font( "AnsiVar", &AnsiVarFont
, hkey
);
184 stock_objects
[SYSTEM_FONT
] = create_stock_font( "System", &SystemFont
, hkey
);
185 stock_objects
[DEVICE_DEFAULT_FONT
] = create_stock_font( "DeviceDefault", &DeviceDefaultFont
, hkey
);
186 stock_objects
[SYSTEM_FIXED_FONT
] = create_stock_font( "SystemFixed", &SystemFixedFont
, hkey
);
187 stock_objects
[DEFAULT_GUI_FONT
] = create_stock_font( "DefaultGui", &DefaultGuiFont
, hkey
);
190 /* clear the NOSYSTEM bit on all stock objects*/
191 for (i
= 0; i
< NB_STOCK_OBJECTS
; i
++)
193 if (!stock_objects
[i
])
195 if (i
== 9) continue; /* there's no stock object 9 */
196 ERR( "could not create stock object %d\n", i
);
199 ptr
= GDI_GetObjPtr( stock_objects
[i
], MAGIC_DONTCARE
);
200 ptr
->wMagic
&= ~OBJECT_NOSYSTEM
;
201 GDI_ReleaseObj( stock_objects
[i
] );
204 if (hkey
) RegCloseKey( hkey
);
208 #define FIRST_LARGE_HANDLE 16
209 #define MAX_LARGE_HANDLES ((GDI_HEAP_SIZE >> 2) - FIRST_LARGE_HANDLE)
210 static GDIOBJHDR
*large_handles
[MAX_LARGE_HANDLES
];
211 static int next_large_handle
;
213 /***********************************************************************
216 * Allocate a GDI handle from the large heap. Helper for GDI_AllocObject
218 inline static GDIOBJHDR
*alloc_large_heap( WORD size
, HGDIOBJ
*handle
)
223 for (i
= next_large_handle
+ 1; i
< MAX_LARGE_HANDLES
; i
++)
224 if (!large_handles
[i
]) goto found
;
225 for (i
= 0; i
<= next_large_handle
; i
++)
226 if (!large_handles
[i
]) goto found
;
231 if ((obj
= HeapAlloc( GetProcessHeap(), 0, size
)))
233 large_handles
[i
] = obj
;
234 *handle
= (i
+ FIRST_LARGE_HANDLE
) << 2;
235 next_large_handle
= i
;
241 /***********************************************************************
244 void *GDI_AllocObject( WORD size
, WORD magic
, HGDIOBJ
*handle
)
246 static DWORD count
= 0;
249 _EnterSysLevel( &GDI_level
);
252 /* allocate DCs on the larger heap */
254 case DISABLED_DC_MAGIC
:
257 case METAFILE_DC_MAGIC
:
258 case ENHMETAFILE_MAGIC
:
259 case ENHMETAFILE_DC_MAGIC
:
261 if (!(obj
= alloc_large_heap( size
, handle
))) goto error
;
264 if (!(*handle
= LOCAL_Alloc( GDI_HeapSel
, LMEM_MOVEABLE
, size
))) goto error
;
265 assert( *handle
& 2 );
266 obj
= (GDIOBJHDR
*)LOCAL_Lock( GDI_HeapSel
, *handle
);
271 obj
->wMagic
= magic
|OBJECT_NOSYSTEM
;
272 obj
->dwCount
= ++count
;
274 TRACE_SEC( *handle
, "enter" );
278 _LeaveSysLevel( &GDI_level
);
284 /***********************************************************************
287 * The object ptr must have been obtained with GDI_GetObjPtr.
288 * The new pointer must be released with GDI_ReleaseObj.
290 void *GDI_ReallocObject( WORD size
, HGDIOBJ handle
, void *object
)
294 assert( handle
& 2 ); /* no realloc for large handles */
295 LOCAL_Unlock( GDI_HeapSel
, handle
);
296 if (!(new_handle
= LOCAL_ReAlloc( GDI_HeapSel
, handle
, size
, LMEM_MOVEABLE
)))
298 TRACE_SEC( handle
, "leave" );
299 _LeaveSysLevel( &GDI_level
);
302 assert( new_handle
== handle
); /* moveable handle cannot change */
303 return LOCAL_Lock( GDI_HeapSel
, handle
);
307 /***********************************************************************
310 BOOL
GDI_FreeObject( HGDIOBJ handle
, void *ptr
)
312 GDIOBJHDR
*object
= ptr
;
314 object
->wMagic
= 0; /* Mark it as invalid */
315 if (handle
& 2) /* GDI heap handle */
317 LOCAL_Unlock( GDI_HeapSel
, handle
);
318 LOCAL_Free( GDI_HeapSel
, handle
);
320 else /* large heap handle */
322 int i
= (handle
>> 2) - FIRST_LARGE_HANDLE
;
323 if (i
>= 0 && i
< MAX_LARGE_HANDLES
&& large_handles
[i
])
325 HeapFree( GetProcessHeap(), 0, large_handles
[i
] );
326 large_handles
[i
] = NULL
;
328 else ERR( "Invalid handle %x\n", handle
);
330 TRACE_SEC( handle
, "leave" );
331 _LeaveSysLevel( &GDI_level
);
336 /***********************************************************************
339 * Return a pointer to the GDI object associated to the handle.
340 * Return NULL if the object has the wrong magic number.
341 * The object must be released with GDI_ReleaseObj.
343 void *GDI_GetObjPtr( HGDIOBJ handle
, WORD magic
)
345 GDIOBJHDR
*ptr
= NULL
;
347 _EnterSysLevel( &GDI_level
);
349 if (handle
& 2) /* GDI heap handle */
351 ptr
= (GDIOBJHDR
*)LOCAL_Lock( GDI_HeapSel
, handle
);
352 if (ptr
&& (magic
!= MAGIC_DONTCARE
) && (GDIMAGIC(ptr
->wMagic
) != magic
))
354 LOCAL_Unlock( GDI_HeapSel
, handle
);
358 else /* large heap handle */
360 int i
= (handle
>> 2) - FIRST_LARGE_HANDLE
;
361 if (i
>= 0 && i
< MAX_LARGE_HANDLES
)
363 ptr
= large_handles
[i
];
364 if (ptr
&& (magic
!= MAGIC_DONTCARE
) && (GDIMAGIC(ptr
->wMagic
) != magic
)) ptr
= NULL
;
370 _LeaveSysLevel( &GDI_level
);
371 SetLastError( ERROR_INVALID_HANDLE
);
372 WARN( "Invalid handle %x\n", handle
);
374 else TRACE_SEC( handle
, "enter" );
380 /***********************************************************************
384 void GDI_ReleaseObj( HGDIOBJ handle
)
386 if (handle
& 2) LOCAL_Unlock( GDI_HeapSel
, handle
);
387 TRACE_SEC( handle
, "leave" );
388 _LeaveSysLevel( &GDI_level
);
392 /***********************************************************************
395 void GDI_CheckNotLock(void)
397 _CheckNotSysLevel( &GDI_level
);
401 /***********************************************************************
402 * DeleteObject (GDI.69)
403 * SysDeleteObject (GDI.605)
405 BOOL16 WINAPI
DeleteObject16( HGDIOBJ16 obj
)
407 return DeleteObject( obj
);
411 /***********************************************************************
412 * DeleteObject (GDI32.@)
414 BOOL WINAPI
DeleteObject( HGDIOBJ obj
)
416 /* Check if object is valid */
419 if (HIWORD(obj
)) return FALSE
;
421 if (!(header
= GDI_GetObjPtr( obj
, MAGIC_DONTCARE
))) return FALSE
;
423 if (!(header
->wMagic
& OBJECT_NOSYSTEM
)
424 && (header
->wMagic
>= FIRST_MAGIC
) && (header
->wMagic
<= LAST_MAGIC
))
426 TRACE("Preserving system object %04x\n", obj
);
427 GDI_ReleaseObj( obj
);
431 TRACE("%04x\n", obj
);
435 switch(GDIMAGIC(header
->wMagic
))
437 case PEN_MAGIC
: return GDI_FreeObject( obj
, header
);
438 case BRUSH_MAGIC
: return BRUSH_DeleteObject( obj
, (BRUSHOBJ
*)header
);
439 case FONT_MAGIC
: return GDI_FreeObject( obj
, header
);
440 case PALETTE_MAGIC
: return PALETTE_DeleteObject(obj
,(PALETTEOBJ
*)header
);
441 case BITMAP_MAGIC
: return BITMAP_DeleteObject( obj
, (BITMAPOBJ
*)header
);
442 case REGION_MAGIC
: return REGION_DeleteObject( obj
, (RGNOBJ
*)header
);
444 GDI_ReleaseObj( obj
);
445 return DeleteDC(obj
);
447 WARN("Already deleted\n");
450 WARN("Unknown magic number (%d)\n",GDIMAGIC(header
->wMagic
));
452 GDI_ReleaseObj( obj
);
456 /***********************************************************************
457 * GetStockObject (GDI.87)
459 HGDIOBJ16 WINAPI
GetStockObject16( INT16 obj
)
461 return (HGDIOBJ16
)GetStockObject( obj
);
465 /***********************************************************************
466 * GetStockObject (GDI32.@)
468 HGDIOBJ WINAPI
GetStockObject( INT obj
)
471 if ((obj
< 0) || (obj
>= NB_STOCK_OBJECTS
)) return 0;
472 ret
= stock_objects
[obj
];
473 TRACE("returning %4x\n", ret
);
478 /***********************************************************************
481 INT16 WINAPI
GetObject16( HANDLE16 handle
, INT16 count
, LPVOID buffer
)
485 TRACE("%04x %d %p\n", handle
, count
, buffer
);
486 if (!count
) return 0;
488 if (!(ptr
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
))) return 0;
490 switch(GDIMAGIC(ptr
->wMagic
))
493 result
= PEN_GetObject16( (PENOBJ
*)ptr
, count
, buffer
);
496 result
= BRUSH_GetObject16( (BRUSHOBJ
*)ptr
, count
, buffer
);
499 result
= BITMAP_GetObject16( (BITMAPOBJ
*)ptr
, count
, buffer
);
502 result
= FONT_GetObject16( (FONTOBJ
*)ptr
, count
, buffer
);
505 result
= PALETTE_GetObject( (PALETTEOBJ
*)ptr
, count
, buffer
);
508 GDI_ReleaseObj( handle
);
513 /***********************************************************************
514 * GetObjectA (GDI32.@)
516 INT WINAPI
GetObjectA( HANDLE handle
, INT count
, LPVOID buffer
)
520 TRACE("%08x %d %p\n", handle
, count
, buffer
);
521 if (!count
) return 0;
523 if (!(ptr
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
))) return 0;
525 switch(GDIMAGIC(ptr
->wMagic
))
528 result
= PEN_GetObject( (PENOBJ
*)ptr
, count
, buffer
);
531 result
= BRUSH_GetObject( (BRUSHOBJ
*)ptr
, count
, buffer
);
534 result
= BITMAP_GetObject( (BITMAPOBJ
*)ptr
, count
, buffer
);
537 result
= FONT_GetObjectA( (FONTOBJ
*)ptr
, count
, buffer
);
540 result
= PALETTE_GetObject( (PALETTEOBJ
*)ptr
, count
, buffer
);
545 case DISABLED_DC_MAGIC
:
548 case METAFILE_DC_MAGIC
:
549 case ENHMETAFILE_MAGIC
:
550 case ENHMETAFILE_DC_MAGIC
:
551 FIXME("Magic %04x not implemented\n", GDIMAGIC(ptr
->wMagic
) );
555 ERR("Invalid GDI Magic %04x\n", GDIMAGIC(ptr
->wMagic
));
558 GDI_ReleaseObj( handle
);
562 /***********************************************************************
563 * GetObjectW (GDI32.@)
565 INT WINAPI
GetObjectW( HANDLE handle
, INT count
, LPVOID buffer
)
569 TRACE("%08x %d %p\n", handle
, count
, buffer
);
570 if (!count
) return 0;
572 if (!(ptr
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
))) return 0;
574 switch(GDIMAGIC(ptr
->wMagic
))
577 result
= PEN_GetObject( (PENOBJ
*)ptr
, count
, buffer
);
580 result
= BRUSH_GetObject( (BRUSHOBJ
*)ptr
, count
, buffer
);
583 result
= BITMAP_GetObject( (BITMAPOBJ
*)ptr
, count
, buffer
);
586 result
= FONT_GetObjectW( (FONTOBJ
*)ptr
, count
, buffer
);
589 result
= PALETTE_GetObject( (PALETTEOBJ
*)ptr
, count
, buffer
);
592 FIXME("Magic %04x not implemented\n", GDIMAGIC(ptr
->wMagic
) );
595 GDI_ReleaseObj( handle
);
599 /***********************************************************************
600 * GetObjectType (GDI32.@)
602 DWORD WINAPI
GetObjectType( HANDLE handle
)
606 TRACE("%08x\n", handle
);
608 if (!(ptr
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
))) return 0;
610 switch(GDIMAGIC(ptr
->wMagic
))
637 result
= OBJ_METAFILE
;
639 case METAFILE_DC_MAGIC
:
642 case ENHMETAFILE_MAGIC
:
643 result
= OBJ_ENHMETAFILE
;
645 case ENHMETAFILE_DC_MAGIC
:
646 result
= OBJ_ENHMETADC
;
649 FIXME("Magic %04x not implemented\n", GDIMAGIC(ptr
->wMagic
) );
652 GDI_ReleaseObj( handle
);
656 /***********************************************************************
657 * GetCurrentObject (GDI32.@)
659 HANDLE WINAPI
GetCurrentObject(HDC hdc
,UINT type
)
662 DC
* dc
= DC_GetDCPtr( hdc
);
667 case OBJ_PEN
: ret
= dc
->hPen
; break;
668 case OBJ_BRUSH
: ret
= dc
->hBrush
; break;
669 case OBJ_PAL
: ret
= dc
->hPalette
; break;
670 case OBJ_FONT
: ret
= dc
->hFont
; break;
671 case OBJ_BITMAP
: ret
= dc
->hBitmap
; break;
673 /* the SDK only mentions those above */
674 FIXME("(%08x,%d): unknown type.\n",hdc
,type
);
677 GDI_ReleaseObj( hdc
);
683 /***********************************************************************
684 * SelectObject (GDI.45)
686 HGDIOBJ16 WINAPI
SelectObject16( HDC16 hdc
, HGDIOBJ16 handle
)
688 return (HGDIOBJ16
)SelectObject( hdc
, handle
);
692 /***********************************************************************
693 * SelectObject (GDI32.@)
695 HGDIOBJ WINAPI
SelectObject( HDC hdc
, HGDIOBJ handle
)
698 DC
* dc
= DC_GetDCUpdate( hdc
);
700 TRACE("hdc=%04x %04x\n", hdc
, handle
);
701 if (dc
->funcs
->pSelectObject
)
702 ret
= dc
->funcs
->pSelectObject( dc
, handle
);
703 GDI_ReleaseObj( hdc
);
708 /***********************************************************************
709 * UnrealizeObject (GDI.150)
711 BOOL16 WINAPI
UnrealizeObject16( HGDIOBJ16 obj
)
713 return UnrealizeObject( obj
);
717 /***********************************************************************
718 * UnrealizeObject (GDI32.@)
720 BOOL WINAPI
UnrealizeObject( HGDIOBJ obj
)
723 /* Check if object is valid */
725 GDIOBJHDR
* header
= GDI_GetObjPtr( obj
, MAGIC_DONTCARE
);
726 if (!header
) return FALSE
;
728 TRACE("%04x\n", obj
);
730 /* Unrealize object */
732 switch(GDIMAGIC(header
->wMagic
))
735 result
= PALETTE_UnrealizeObject( obj
, (PALETTEOBJ
*)header
);
739 /* Windows resets the brush origin. We don't need to. */
742 GDI_ReleaseObj( obj
);
747 /***********************************************************************
748 * EnumObjects16 (GDI.71)
750 INT16 WINAPI
EnumObjects16( HDC16 hdc
, INT16 nObjType
,
751 GOBJENUMPROC16 lpEnumFunc
, LPARAM lParam
)
753 /* Solid colors to enumerate */
754 static const COLORREF solid_colors
[] =
755 { RGB(0x00,0x00,0x00), RGB(0xff,0xff,0xff),
756 RGB(0xff,0x00,0x00), RGB(0x00,0xff,0x00),
757 RGB(0x00,0x00,0xff), RGB(0xff,0xff,0x00),
758 RGB(0xff,0x00,0xff), RGB(0x00,0xff,0xff),
759 RGB(0x80,0x00,0x00), RGB(0x00,0x80,0x00),
760 RGB(0x80,0x80,0x00), RGB(0x00,0x00,0x80),
761 RGB(0x80,0x00,0x80), RGB(0x00,0x80,0x80),
762 RGB(0x80,0x80,0x80), RGB(0xc0,0xc0,0xc0)
767 LOGBRUSH16
*brush
= NULL
;
769 TRACE("%04x %d %08lx %08lx\n",
770 hdc
, nObjType
, (DWORD
)lpEnumFunc
, lParam
);
774 /* Enumerate solid pens */
775 if (!(pen
= SEGPTR_NEW(LOGPEN16
))) break;
776 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
778 pen
->lopnStyle
= PS_SOLID
;
779 pen
->lopnWidth
.x
= 1;
780 pen
->lopnWidth
.y
= 0;
781 pen
->lopnColor
= solid_colors
[i
];
782 retval
= lpEnumFunc( SEGPTR_GET(pen
), lParam
);
783 TRACE("solid pen %08lx, ret=%d\n",
784 solid_colors
[i
], retval
);
791 /* Enumerate solid brushes */
792 if (!(brush
= SEGPTR_NEW(LOGBRUSH16
))) break;
793 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
795 brush
->lbStyle
= BS_SOLID
;
796 brush
->lbColor
= solid_colors
[i
];
798 retval
= lpEnumFunc( SEGPTR_GET(brush
), lParam
);
799 TRACE("solid brush %08lx, ret=%d\n",
800 solid_colors
[i
], retval
);
804 /* Now enumerate hatched brushes */
805 if (retval
) for (i
= HS_HORIZONTAL
; i
<= HS_DIAGCROSS
; i
++)
807 brush
->lbStyle
= BS_HATCHED
;
808 brush
->lbColor
= RGB(0,0,0);
810 retval
= lpEnumFunc( SEGPTR_GET(brush
), lParam
);
811 TRACE("hatched brush %d, ret=%d\n",
819 WARN("(%d): Invalid type\n", nObjType
);
826 /***********************************************************************
827 * EnumObjects (GDI32.@)
829 INT WINAPI
EnumObjects( HDC hdc
, INT nObjType
,
830 GOBJENUMPROC lpEnumFunc
, LPARAM lParam
)
832 /* Solid colors to enumerate */
833 static const COLORREF solid_colors
[] =
834 { RGB(0x00,0x00,0x00), RGB(0xff,0xff,0xff),
835 RGB(0xff,0x00,0x00), RGB(0x00,0xff,0x00),
836 RGB(0x00,0x00,0xff), RGB(0xff,0xff,0x00),
837 RGB(0xff,0x00,0xff), RGB(0x00,0xff,0xff),
838 RGB(0x80,0x00,0x00), RGB(0x00,0x80,0x00),
839 RGB(0x80,0x80,0x00), RGB(0x00,0x00,0x80),
840 RGB(0x80,0x00,0x80), RGB(0x00,0x80,0x80),
841 RGB(0x80,0x80,0x80), RGB(0xc0,0xc0,0xc0)
848 TRACE("%04x %d %08lx %08lx\n",
849 hdc
, nObjType
, (DWORD
)lpEnumFunc
, lParam
);
853 /* Enumerate solid pens */
854 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
856 pen
.lopnStyle
= PS_SOLID
;
859 pen
.lopnColor
= solid_colors
[i
];
860 retval
= lpEnumFunc( &pen
, lParam
);
861 TRACE("solid pen %08lx, ret=%d\n",
862 solid_colors
[i
], retval
);
868 /* Enumerate solid brushes */
869 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
871 brush
.lbStyle
= BS_SOLID
;
872 brush
.lbColor
= solid_colors
[i
];
874 retval
= lpEnumFunc( &brush
, lParam
);
875 TRACE("solid brush %08lx, ret=%d\n",
876 solid_colors
[i
], retval
);
880 /* Now enumerate hatched brushes */
881 if (retval
) for (i
= HS_HORIZONTAL
; i
<= HS_DIAGCROSS
; i
++)
883 brush
.lbStyle
= BS_HATCHED
;
884 brush
.lbColor
= RGB(0,0,0);
886 retval
= lpEnumFunc( &brush
, lParam
);
887 TRACE("hatched brush %d, ret=%d\n",
894 /* FIXME: implement Win32 types */
895 WARN("(%d): Invalid type\n", nObjType
);
902 /***********************************************************************
903 * IsGDIObject (GDI.462)
905 * returns type of object if valid (W95 system programming secrets p. 264-5)
907 BOOL16 WINAPI
IsGDIObject16( HGDIOBJ16 handle
)
911 GDIOBJHDR
*object
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
);
914 magic
= GDIMAGIC(object
->wMagic
) - PEN_MAGIC
+ 1;
915 GDI_ReleaseObj( handle
);
921 /***********************************************************************
922 * SetObjectOwner (GDI.461)
924 void WINAPI
SetObjectOwner16( HGDIOBJ16 handle
, HANDLE16 owner
)
930 /***********************************************************************
931 * SetObjectOwner (GDI32.@)
933 void WINAPI
SetObjectOwner( HGDIOBJ handle
, HANDLE owner
)
939 /***********************************************************************
940 * MakeObjectPrivate (GDI.463)
942 * What does that mean ?
943 * Some little docu can be found in "Undocumented Windows",
944 * but this is basically useless.
945 * At least we know that this flags the GDI object's wMagic
946 * with 0x2000 (OBJECT_PRIVATE), so we just do it.
947 * But Wine doesn't react on that yet.
949 void WINAPI
MakeObjectPrivate16( HGDIOBJ16 handle
, BOOL16
private )
951 GDIOBJHDR
*ptr
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
);
954 ERR("invalid GDI object %04x !\n", handle
);
957 ptr
->wMagic
|= OBJECT_PRIVATE
;
958 GDI_ReleaseObj( handle
);
962 /***********************************************************************
965 BOOL WINAPI
GdiFlush(void)
967 return TRUE
; /* FIXME */
971 /***********************************************************************
972 * GdiGetBatchLimit (GDI32.@)
974 DWORD WINAPI
GdiGetBatchLimit(void)
976 return 1; /* FIXME */
980 /***********************************************************************
981 * GdiSetBatchLimit (GDI32.@)
983 DWORD WINAPI
GdiSetBatchLimit( DWORD limit
)
985 return 1; /* FIXME */
989 /***********************************************************************
990 * GdiSeeGdiDo (GDI.452)
992 DWORD WINAPI
GdiSeeGdiDo16( WORD wReqType
, WORD wParam1
, WORD wParam2
,
997 case 0x0001: /* LocalAlloc */
998 return LOCAL_Alloc( GDI_HeapSel
, wParam1
, wParam3
);
999 case 0x0002: /* LocalFree */
1000 return LOCAL_Free( GDI_HeapSel
, wParam1
);
1001 case 0x0003: /* LocalCompact */
1002 return LOCAL_Compact( GDI_HeapSel
, wParam3
, 0 );
1003 case 0x0103: /* LocalHeap */
1006 WARN("(wReqType=%04x): Unknown\n", wReqType
);
1011 /***********************************************************************
1012 * GdiSignalProc32 (GDI.610)
1014 WORD WINAPI
GdiSignalProc( UINT uCode
, DWORD dwThreadOrProcessID
,
1015 DWORD dwFlags
, HMODULE16 hModule
)
1020 /***********************************************************************
1021 * FinalGdiInit (GDI.405)
1023 void WINAPI
FinalGdiInit16( HANDLE16 unknown
)
1027 /***********************************************************************
1028 * GdiFreeResources (GDI.609)
1030 WORD WINAPI
GdiFreeResources16( DWORD reserve
)
1032 return (WORD
)( (int)LOCAL_CountFree( GDI_HeapSel
) * 100 /
1033 (int)LOCAL_HeapSize( GDI_HeapSel
) );
1036 /***********************************************************************
1039 INT16 WINAPI
MulDiv16(
1040 INT16 nMultiplicand
,
1045 if (!nDivisor
) return -32768;
1046 /* We want to deal with a positive divisor to simplify the logic. */
1049 nMultiplicand
= - nMultiplicand
;
1050 nDivisor
= -nDivisor
;
1052 /* If the result is positive, we "add" to round. else,
1053 * we subtract to round. */
1054 if ( ( (nMultiplicand
< 0) && (nMultiplier
< 0) ) ||
1055 ( (nMultiplicand
>= 0) && (nMultiplier
>= 0) ) )
1056 ret
= (((int)nMultiplicand
* nMultiplier
) + (nDivisor
/2)) / nDivisor
;
1058 ret
= (((int)nMultiplicand
* nMultiplier
) - (nDivisor
/2)) / nDivisor
;
1059 if ((ret
> 32767) || (ret
< -32767)) return -32768;
1064 /*******************************************************************
1065 * GetColorAdjustment [GDI32.@]
1069 BOOL WINAPI
GetColorAdjustment(HDC hdc
, LPCOLORADJUSTMENT lpca
)
1071 FIXME("GetColorAdjustment, stub\n");
1075 /*******************************************************************
1076 * GetMiterLimit [GDI32.@]
1080 BOOL WINAPI
GetMiterLimit(HDC hdc
, PFLOAT peLimit
)
1082 FIXME("GetMiterLimit, stub\n");
1086 /*******************************************************************
1087 * SetMiterLimit [GDI32.@]
1091 BOOL WINAPI
SetMiterLimit(HDC hdc
, FLOAT eNewLimit
, PFLOAT peOldLimit
)
1093 FIXME("SetMiterLimit, stub\n");
1097 /*******************************************************************
1098 * GdiComment [GDI32.@]
1102 BOOL WINAPI
GdiComment(HDC hdc
, UINT cbSize
, const BYTE
*lpData
)
1104 FIXME("GdiComment, stub\n");
1107 /*******************************************************************
1108 * SetColorAdjustment [GDI32.@]
1112 BOOL WINAPI
SetColorAdjustment(HDC hdc
, const COLORADJUSTMENT
* lpca
)
1114 FIXME("SetColorAdjustment, stub\n");