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 && large_handles
[i
])
325 HeapFree( GetProcessHeap(), 0, large_handles
[i
] );
326 large_handles
[i
] = NULL
;
329 TRACE_SEC( handle
, "leave" );
330 _LeaveSysLevel( &GDI_level
);
335 /***********************************************************************
338 * Return a pointer to the GDI object associated to the handle.
339 * Return NULL if the object has the wrong magic number.
340 * The object must be released with GDI_ReleaseObj.
342 void *GDI_GetObjPtr( HGDIOBJ handle
, WORD magic
)
344 GDIOBJHDR
*ptr
= NULL
;
346 _EnterSysLevel( &GDI_level
);
348 if (handle
& 2) /* GDI heap handle */
350 ptr
= (GDIOBJHDR
*)LOCAL_Lock( GDI_HeapSel
, handle
);
351 if (ptr
&& (magic
!= MAGIC_DONTCARE
) && (GDIMAGIC(ptr
->wMagic
) != magic
))
353 LOCAL_Unlock( GDI_HeapSel
, handle
);
357 else /* large heap handle */
359 int i
= (handle
>> 2) - FIRST_LARGE_HANDLE
;
362 ptr
= large_handles
[i
];
363 if (ptr
&& (magic
!= MAGIC_DONTCARE
) && (GDIMAGIC(ptr
->wMagic
) != magic
)) ptr
= NULL
;
369 _LeaveSysLevel( &GDI_level
);
370 SetLastError( ERROR_INVALID_HANDLE
);
372 else TRACE_SEC( handle
, "enter" );
378 /***********************************************************************
382 void GDI_ReleaseObj( HGDIOBJ handle
)
384 if (handle
& 2) LOCAL_Unlock( GDI_HeapSel
, handle
);
385 TRACE_SEC( handle
, "leave" );
386 _LeaveSysLevel( &GDI_level
);
390 /***********************************************************************
393 void GDI_CheckNotLock(void)
395 _CheckNotSysLevel( &GDI_level
);
399 /***********************************************************************
400 * DeleteObject (GDI.69)
401 * SysDeleteObject (GDI.605)
403 BOOL16 WINAPI
DeleteObject16( HGDIOBJ16 obj
)
405 return DeleteObject( obj
);
409 /***********************************************************************
410 * DeleteObject (GDI32.@)
412 BOOL WINAPI
DeleteObject( HGDIOBJ obj
)
414 /* Check if object is valid */
417 if (HIWORD(obj
)) return FALSE
;
419 if (!(header
= GDI_GetObjPtr( obj
, MAGIC_DONTCARE
))) return FALSE
;
421 if (!(header
->wMagic
& OBJECT_NOSYSTEM
)
422 && (header
->wMagic
>= FIRST_MAGIC
) && (header
->wMagic
<= LAST_MAGIC
))
424 TRACE("Preserving system object %04x\n", obj
);
425 GDI_ReleaseObj( obj
);
429 TRACE("%04x\n", obj
);
433 switch(GDIMAGIC(header
->wMagic
))
435 case PEN_MAGIC
: return GDI_FreeObject( obj
, header
);
436 case BRUSH_MAGIC
: return BRUSH_DeleteObject( obj
, (BRUSHOBJ
*)header
);
437 case FONT_MAGIC
: return GDI_FreeObject( obj
, header
);
438 case PALETTE_MAGIC
: return PALETTE_DeleteObject(obj
,(PALETTEOBJ
*)header
);
439 case BITMAP_MAGIC
: return BITMAP_DeleteObject( obj
, (BITMAPOBJ
*)header
);
440 case REGION_MAGIC
: return REGION_DeleteObject( obj
, (RGNOBJ
*)header
);
442 GDI_ReleaseObj( obj
);
443 return DeleteDC(obj
);
445 WARN("Already deleted\n");
448 WARN("Unknown magic number (%d)\n",GDIMAGIC(header
->wMagic
));
450 GDI_ReleaseObj( obj
);
454 /***********************************************************************
455 * GetStockObject (GDI.87)
457 HGDIOBJ16 WINAPI
GetStockObject16( INT16 obj
)
459 return (HGDIOBJ16
)GetStockObject( obj
);
463 /***********************************************************************
464 * GetStockObject (GDI32.@)
466 HGDIOBJ WINAPI
GetStockObject( INT obj
)
469 if ((obj
< 0) || (obj
>= NB_STOCK_OBJECTS
)) return 0;
470 ret
= stock_objects
[obj
];
471 TRACE("returning %4x\n", ret
);
476 /***********************************************************************
479 INT16 WINAPI
GetObject16( HANDLE16 handle
, INT16 count
, LPVOID buffer
)
483 TRACE("%04x %d %p\n", handle
, count
, buffer
);
484 if (!count
) return 0;
486 if (!(ptr
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
))) return 0;
488 switch(GDIMAGIC(ptr
->wMagic
))
491 result
= PEN_GetObject16( (PENOBJ
*)ptr
, count
, buffer
);
494 result
= BRUSH_GetObject16( (BRUSHOBJ
*)ptr
, count
, buffer
);
497 result
= BITMAP_GetObject16( (BITMAPOBJ
*)ptr
, count
, buffer
);
500 result
= FONT_GetObject16( (FONTOBJ
*)ptr
, count
, buffer
);
503 result
= PALETTE_GetObject( (PALETTEOBJ
*)ptr
, count
, buffer
);
506 GDI_ReleaseObj( handle
);
511 /***********************************************************************
512 * GetObjectA (GDI32.@)
514 INT WINAPI
GetObjectA( HANDLE handle
, INT count
, LPVOID buffer
)
518 TRACE("%08x %d %p\n", handle
, count
, buffer
);
519 if (!count
) return 0;
521 if (!(ptr
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
))) return 0;
523 switch(GDIMAGIC(ptr
->wMagic
))
526 result
= PEN_GetObject( (PENOBJ
*)ptr
, count
, buffer
);
529 result
= BRUSH_GetObject( (BRUSHOBJ
*)ptr
, count
, buffer
);
532 result
= BITMAP_GetObject( (BITMAPOBJ
*)ptr
, count
, buffer
);
535 result
= FONT_GetObjectA( (FONTOBJ
*)ptr
, count
, buffer
);
538 result
= PALETTE_GetObject( (PALETTEOBJ
*)ptr
, count
, buffer
);
543 case DISABLED_DC_MAGIC
:
546 case METAFILE_DC_MAGIC
:
547 case ENHMETAFILE_MAGIC
:
548 case ENHMETAFILE_DC_MAGIC
:
549 FIXME("Magic %04x not implemented\n", GDIMAGIC(ptr
->wMagic
) );
553 ERR("Invalid GDI Magic %04x\n", GDIMAGIC(ptr
->wMagic
));
556 GDI_ReleaseObj( handle
);
560 /***********************************************************************
561 * GetObjectW (GDI32.@)
563 INT WINAPI
GetObjectW( HANDLE handle
, INT count
, LPVOID buffer
)
567 TRACE("%08x %d %p\n", handle
, count
, buffer
);
568 if (!count
) return 0;
570 if (!(ptr
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
))) return 0;
572 switch(GDIMAGIC(ptr
->wMagic
))
575 result
= PEN_GetObject( (PENOBJ
*)ptr
, count
, buffer
);
578 result
= BRUSH_GetObject( (BRUSHOBJ
*)ptr
, count
, buffer
);
581 result
= BITMAP_GetObject( (BITMAPOBJ
*)ptr
, count
, buffer
);
584 result
= FONT_GetObjectW( (FONTOBJ
*)ptr
, count
, buffer
);
587 result
= PALETTE_GetObject( (PALETTEOBJ
*)ptr
, count
, buffer
);
590 FIXME("Magic %04x not implemented\n", GDIMAGIC(ptr
->wMagic
) );
593 GDI_ReleaseObj( handle
);
597 /***********************************************************************
598 * GetObjectType (GDI32.@)
600 DWORD WINAPI
GetObjectType( HANDLE handle
)
604 TRACE("%08x\n", handle
);
606 if (!(ptr
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
))) return 0;
608 switch(GDIMAGIC(ptr
->wMagic
))
635 result
= OBJ_METAFILE
;
637 case METAFILE_DC_MAGIC
:
640 case ENHMETAFILE_MAGIC
:
641 result
= OBJ_ENHMETAFILE
;
643 case ENHMETAFILE_DC_MAGIC
:
644 result
= OBJ_ENHMETADC
;
647 FIXME("Magic %04x not implemented\n", GDIMAGIC(ptr
->wMagic
) );
650 GDI_ReleaseObj( handle
);
654 /***********************************************************************
655 * GetCurrentObject (GDI32.@)
657 HANDLE WINAPI
GetCurrentObject(HDC hdc
,UINT type
)
660 DC
* dc
= DC_GetDCPtr( hdc
);
665 case OBJ_PEN
: ret
= dc
->hPen
; break;
666 case OBJ_BRUSH
: ret
= dc
->hBrush
; break;
667 case OBJ_PAL
: ret
= dc
->hPalette
; break;
668 case OBJ_FONT
: ret
= dc
->hFont
; break;
669 case OBJ_BITMAP
: ret
= dc
->hBitmap
; break;
671 /* the SDK only mentions those above */
672 FIXME("(%08x,%d): unknown type.\n",hdc
,type
);
675 GDI_ReleaseObj( hdc
);
681 /***********************************************************************
682 * SelectObject (GDI.45)
684 HGDIOBJ16 WINAPI
SelectObject16( HDC16 hdc
, HGDIOBJ16 handle
)
686 return (HGDIOBJ16
)SelectObject( hdc
, handle
);
690 /***********************************************************************
691 * SelectObject (GDI32.@)
693 HGDIOBJ WINAPI
SelectObject( HDC hdc
, HGDIOBJ handle
)
696 DC
* dc
= DC_GetDCUpdate( hdc
);
698 TRACE("hdc=%04x %04x\n", hdc
, handle
);
699 if (dc
->funcs
->pSelectObject
)
700 ret
= dc
->funcs
->pSelectObject( dc
, handle
);
701 GDI_ReleaseObj( hdc
);
706 /***********************************************************************
707 * UnrealizeObject (GDI.150)
709 BOOL16 WINAPI
UnrealizeObject16( HGDIOBJ16 obj
)
711 return UnrealizeObject( obj
);
715 /***********************************************************************
716 * UnrealizeObject (GDI32.@)
718 BOOL WINAPI
UnrealizeObject( HGDIOBJ obj
)
721 /* Check if object is valid */
723 GDIOBJHDR
* header
= GDI_GetObjPtr( obj
, MAGIC_DONTCARE
);
724 if (!header
) return FALSE
;
726 TRACE("%04x\n", obj
);
728 /* Unrealize object */
730 switch(GDIMAGIC(header
->wMagic
))
733 result
= PALETTE_UnrealizeObject( obj
, (PALETTEOBJ
*)header
);
737 /* Windows resets the brush origin. We don't need to. */
740 GDI_ReleaseObj( obj
);
745 /***********************************************************************
746 * EnumObjects16 (GDI.71)
748 INT16 WINAPI
EnumObjects16( HDC16 hdc
, INT16 nObjType
,
749 GOBJENUMPROC16 lpEnumFunc
, LPARAM lParam
)
751 /* Solid colors to enumerate */
752 static const COLORREF solid_colors
[] =
753 { RGB(0x00,0x00,0x00), RGB(0xff,0xff,0xff),
754 RGB(0xff,0x00,0x00), RGB(0x00,0xff,0x00),
755 RGB(0x00,0x00,0xff), RGB(0xff,0xff,0x00),
756 RGB(0xff,0x00,0xff), RGB(0x00,0xff,0xff),
757 RGB(0x80,0x00,0x00), RGB(0x00,0x80,0x00),
758 RGB(0x80,0x80,0x00), RGB(0x00,0x00,0x80),
759 RGB(0x80,0x00,0x80), RGB(0x00,0x80,0x80),
760 RGB(0x80,0x80,0x80), RGB(0xc0,0xc0,0xc0)
765 LOGBRUSH16
*brush
= NULL
;
767 TRACE("%04x %d %08lx %08lx\n",
768 hdc
, nObjType
, (DWORD
)lpEnumFunc
, lParam
);
772 /* Enumerate solid pens */
773 if (!(pen
= SEGPTR_NEW(LOGPEN16
))) break;
774 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
776 pen
->lopnStyle
= PS_SOLID
;
777 pen
->lopnWidth
.x
= 1;
778 pen
->lopnWidth
.y
= 0;
779 pen
->lopnColor
= solid_colors
[i
];
780 retval
= lpEnumFunc( SEGPTR_GET(pen
), lParam
);
781 TRACE("solid pen %08lx, ret=%d\n",
782 solid_colors
[i
], retval
);
789 /* Enumerate solid brushes */
790 if (!(brush
= SEGPTR_NEW(LOGBRUSH16
))) break;
791 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
793 brush
->lbStyle
= BS_SOLID
;
794 brush
->lbColor
= solid_colors
[i
];
796 retval
= lpEnumFunc( SEGPTR_GET(brush
), lParam
);
797 TRACE("solid brush %08lx, ret=%d\n",
798 solid_colors
[i
], retval
);
802 /* Now enumerate hatched brushes */
803 if (retval
) for (i
= HS_HORIZONTAL
; i
<= HS_DIAGCROSS
; i
++)
805 brush
->lbStyle
= BS_HATCHED
;
806 brush
->lbColor
= RGB(0,0,0);
808 retval
= lpEnumFunc( SEGPTR_GET(brush
), lParam
);
809 TRACE("hatched brush %d, ret=%d\n",
817 WARN("(%d): Invalid type\n", nObjType
);
824 /***********************************************************************
825 * EnumObjects (GDI32.@)
827 INT WINAPI
EnumObjects( HDC hdc
, INT nObjType
,
828 GOBJENUMPROC lpEnumFunc
, LPARAM lParam
)
830 /* Solid colors to enumerate */
831 static const COLORREF solid_colors
[] =
832 { RGB(0x00,0x00,0x00), RGB(0xff,0xff,0xff),
833 RGB(0xff,0x00,0x00), RGB(0x00,0xff,0x00),
834 RGB(0x00,0x00,0xff), RGB(0xff,0xff,0x00),
835 RGB(0xff,0x00,0xff), RGB(0x00,0xff,0xff),
836 RGB(0x80,0x00,0x00), RGB(0x00,0x80,0x00),
837 RGB(0x80,0x80,0x00), RGB(0x00,0x00,0x80),
838 RGB(0x80,0x00,0x80), RGB(0x00,0x80,0x80),
839 RGB(0x80,0x80,0x80), RGB(0xc0,0xc0,0xc0)
846 TRACE("%04x %d %08lx %08lx\n",
847 hdc
, nObjType
, (DWORD
)lpEnumFunc
, lParam
);
851 /* Enumerate solid pens */
852 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
854 pen
.lopnStyle
= PS_SOLID
;
857 pen
.lopnColor
= solid_colors
[i
];
858 retval
= lpEnumFunc( &pen
, lParam
);
859 TRACE("solid pen %08lx, ret=%d\n",
860 solid_colors
[i
], retval
);
866 /* Enumerate solid brushes */
867 for (i
= 0; i
< sizeof(solid_colors
)/sizeof(solid_colors
[0]); i
++)
869 brush
.lbStyle
= BS_SOLID
;
870 brush
.lbColor
= solid_colors
[i
];
872 retval
= lpEnumFunc( &brush
, lParam
);
873 TRACE("solid brush %08lx, ret=%d\n",
874 solid_colors
[i
], retval
);
878 /* Now enumerate hatched brushes */
879 if (retval
) for (i
= HS_HORIZONTAL
; i
<= HS_DIAGCROSS
; i
++)
881 brush
.lbStyle
= BS_HATCHED
;
882 brush
.lbColor
= RGB(0,0,0);
884 retval
= lpEnumFunc( &brush
, lParam
);
885 TRACE("hatched brush %d, ret=%d\n",
892 /* FIXME: implement Win32 types */
893 WARN("(%d): Invalid type\n", nObjType
);
900 /***********************************************************************
901 * IsGDIObject (GDI.462)
903 * returns type of object if valid (W95 system programming secrets p. 264-5)
905 BOOL16 WINAPI
IsGDIObject16( HGDIOBJ16 handle
)
909 GDIOBJHDR
*object
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
);
912 magic
= GDIMAGIC(object
->wMagic
) - PEN_MAGIC
+ 1;
913 GDI_ReleaseObj( handle
);
919 /***********************************************************************
920 * SetObjectOwner (GDI.461)
922 void WINAPI
SetObjectOwner16( HGDIOBJ16 handle
, HANDLE16 owner
)
928 /***********************************************************************
929 * SetObjectOwner (GDI32.@)
931 void WINAPI
SetObjectOwner( HGDIOBJ handle
, HANDLE owner
)
937 /***********************************************************************
938 * MakeObjectPrivate (GDI.463)
940 * What does that mean ?
941 * Some little docu can be found in "Undocumented Windows",
942 * but this is basically useless.
943 * At least we know that this flags the GDI object's wMagic
944 * with 0x2000 (OBJECT_PRIVATE), so we just do it.
945 * But Wine doesn't react on that yet.
947 void WINAPI
MakeObjectPrivate16( HGDIOBJ16 handle
, BOOL16
private )
949 GDIOBJHDR
*ptr
= GDI_GetObjPtr( handle
, MAGIC_DONTCARE
);
952 ERR("invalid GDI object %04x !\n", handle
);
955 ptr
->wMagic
|= OBJECT_PRIVATE
;
956 GDI_ReleaseObj( handle
);
960 /***********************************************************************
963 BOOL WINAPI
GdiFlush(void)
965 return TRUE
; /* FIXME */
969 /***********************************************************************
970 * GdiGetBatchLimit (GDI32.@)
972 DWORD WINAPI
GdiGetBatchLimit(void)
974 return 1; /* FIXME */
978 /***********************************************************************
979 * GdiSetBatchLimit (GDI32.@)
981 DWORD WINAPI
GdiSetBatchLimit( DWORD limit
)
983 return 1; /* FIXME */
987 /***********************************************************************
988 * GdiSeeGdiDo (GDI.452)
990 DWORD WINAPI
GdiSeeGdiDo16( WORD wReqType
, WORD wParam1
, WORD wParam2
,
995 case 0x0001: /* LocalAlloc */
996 return LOCAL_Alloc( GDI_HeapSel
, wParam1
, wParam3
);
997 case 0x0002: /* LocalFree */
998 return LOCAL_Free( GDI_HeapSel
, wParam1
);
999 case 0x0003: /* LocalCompact */
1000 return LOCAL_Compact( GDI_HeapSel
, wParam3
, 0 );
1001 case 0x0103: /* LocalHeap */
1004 WARN("(wReqType=%04x): Unknown\n", wReqType
);
1009 /***********************************************************************
1010 * GdiSignalProc32 (GDI.610)
1012 WORD WINAPI
GdiSignalProc( UINT uCode
, DWORD dwThreadOrProcessID
,
1013 DWORD dwFlags
, HMODULE16 hModule
)
1018 /***********************************************************************
1019 * FinalGdiInit (GDI.405)
1021 void WINAPI
FinalGdiInit16( HANDLE16 unknown
)
1025 /***********************************************************************
1026 * GdiFreeResources (GDI.609)
1028 WORD WINAPI
GdiFreeResources16( DWORD reserve
)
1030 return (WORD
)( (int)LOCAL_CountFree( GDI_HeapSel
) * 100 /
1031 (int)LOCAL_HeapSize( GDI_HeapSel
) );
1034 /***********************************************************************
1037 INT16 WINAPI
MulDiv16(
1038 INT16 nMultiplicand
,
1043 if (!nDivisor
) return -32768;
1044 /* We want to deal with a positive divisor to simplify the logic. */
1047 nMultiplicand
= - nMultiplicand
;
1048 nDivisor
= -nDivisor
;
1050 /* If the result is positive, we "add" to round. else,
1051 * we subtract to round. */
1052 if ( ( (nMultiplicand
< 0) && (nMultiplier
< 0) ) ||
1053 ( (nMultiplicand
>= 0) && (nMultiplier
>= 0) ) )
1054 ret
= (((int)nMultiplicand
* nMultiplier
) + (nDivisor
/2)) / nDivisor
;
1056 ret
= (((int)nMultiplicand
* nMultiplier
) - (nDivisor
/2)) / nDivisor
;
1057 if ((ret
> 32767) || (ret
< -32767)) return -32768;
1062 /*******************************************************************
1063 * GetColorAdjustment [GDI32.@]
1067 BOOL WINAPI
GetColorAdjustment(HDC hdc
, LPCOLORADJUSTMENT lpca
)
1069 FIXME("GetColorAdjustment, stub\n");
1073 /*******************************************************************
1074 * GetMiterLimit [GDI32.@]
1078 BOOL WINAPI
GetMiterLimit(HDC hdc
, PFLOAT peLimit
)
1080 FIXME("GetMiterLimit, stub\n");
1084 /*******************************************************************
1085 * SetMiterLimit [GDI32.@]
1089 BOOL WINAPI
SetMiterLimit(HDC hdc
, FLOAT eNewLimit
, PFLOAT peOldLimit
)
1091 FIXME("SetMiterLimit, stub\n");
1095 /*******************************************************************
1096 * GdiComment [GDI32.@]
1100 BOOL WINAPI
GdiComment(HDC hdc
, UINT cbSize
, const BYTE
*lpData
)
1102 FIXME("GdiComment, stub\n");
1105 /*******************************************************************
1106 * SetColorAdjustment [GDI32.@]
1110 BOOL WINAPI
SetColorAdjustment(HDC hdc
, const COLORADJUSTMENT
* lpca
)
1112 FIXME("SetColorAdjustment, stub\n");