Release 970804
[wine] / objects / brush.c
1 /*
2  * GDI brush objects
3  *
4  * Copyright 1993, 1994  Alexandre Julliard
5  */
6
7 #include <stdlib.h>
8 #include "brush.h"
9 #include "bitmap.h"
10 #include "metafile.h"
11 #include "color.h"
12 #include "stddebug.h"
13 #include "debug.h"
14
15
16 /***********************************************************************
17  *           CreateBrushIndirect16    (GDI.50)
18  */
19 HBRUSH16 CreateBrushIndirect16( const LOGBRUSH16 * brush )
20 {
21     BRUSHOBJ * brushPtr;
22     HBRUSH16 hbrush = GDI_AllocObject( sizeof(BRUSHOBJ), BRUSH_MAGIC );
23     if (!hbrush) return 0;
24     brushPtr = (BRUSHOBJ *) GDI_HEAP_LIN_ADDR( hbrush );
25     brushPtr->logbrush.lbStyle = brush->lbStyle;
26     brushPtr->logbrush.lbColor = brush->lbColor;
27     brushPtr->logbrush.lbHatch = brush->lbHatch;
28     return hbrush;
29 }
30
31
32 /***********************************************************************
33  *           CreateBrushIndirect32    (GDI32.27)
34  */
35 HBRUSH32 CreateBrushIndirect32( const LOGBRUSH32 * brush )
36 {
37     BRUSHOBJ * brushPtr;
38     HBRUSH32 hbrush = GDI_AllocObject( sizeof(BRUSHOBJ), BRUSH_MAGIC );
39     if (!hbrush) return 0;
40     brushPtr = (BRUSHOBJ *) GDI_HEAP_LIN_ADDR( hbrush );
41     brushPtr->logbrush.lbStyle = brush->lbStyle;
42     brushPtr->logbrush.lbColor = brush->lbColor;
43     brushPtr->logbrush.lbHatch = brush->lbHatch;
44     return hbrush;
45 }
46
47
48 /***********************************************************************
49  *           CreateHatchBrush16    (GDI.58)
50  */
51 HBRUSH16 CreateHatchBrush16( INT16 style, COLORREF color )
52 {
53     LOGBRUSH32 logbrush = { BS_HATCHED, color, style };
54     dprintf_gdi(stddeb, "CreateHatchBrush16: %d %06lx\n", style, color );
55     if ((style < 0) || (style >= NB_HATCH_STYLES)) return 0;
56     return CreateBrushIndirect32( &logbrush );
57 }
58
59
60 /***********************************************************************
61  *           CreateHatchBrush32    (GDI32.48)
62  */
63 HBRUSH32 CreateHatchBrush32( INT32 style, COLORREF color )
64 {
65     LOGBRUSH32 logbrush = { BS_HATCHED, color, style };
66     dprintf_gdi(stddeb, "CreateHatchBrush32: %d %06lx\n", style, color );
67     if ((style < 0) || (style >= NB_HATCH_STYLES)) return 0;
68     return CreateBrushIndirect32( &logbrush );
69 }
70
71
72 /***********************************************************************
73  *           CreatePatternBrush16    (GDI.60)
74  */
75 HBRUSH16 CreatePatternBrush16( HBITMAP16 hbitmap )
76 {
77     return (HBRUSH16)CreatePatternBrush32( hbitmap );
78 }
79
80
81 /***********************************************************************
82  *           CreatePatternBrush32    (GDI32.54)
83  */
84 HBRUSH32 CreatePatternBrush32( HBITMAP32 hbitmap )
85 {
86     LOGBRUSH32 logbrush = { BS_PATTERN, 0, 0 };
87     BITMAPOBJ *bmp, *newbmp;
88
89     dprintf_gdi(stddeb, "CreatePatternBrush: %04x\n", hbitmap );
90
91       /* Make a copy of the bitmap */
92
93     if (!(bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC )))
94         return 0;
95     logbrush.lbHatch = (INT32)CreateBitmapIndirect16( &bmp->bitmap );
96     newbmp = (BITMAPOBJ *) GDI_GetObjPtr( (HGDIOBJ32)logbrush.lbHatch,
97                                           BITMAP_MAGIC );
98     if (!newbmp) return 0;
99     XCopyArea( display, bmp->pixmap, newbmp->pixmap, BITMAP_GC(bmp),
100                0, 0, bmp->bitmap.bmWidth, bmp->bitmap.bmHeight, 0, 0 );
101     return CreateBrushIndirect32( &logbrush );
102 }
103
104
105 /***********************************************************************
106  *           CreateDIBPatternBrush16    (GDI.445)
107  */
108 HBRUSH16 CreateDIBPatternBrush16( HGLOBAL16 hbitmap, UINT16 coloruse )
109 {
110     LOGBRUSH32 logbrush = { BS_DIBPATTERN, coloruse, 0 };
111     BITMAPINFO *info, *newInfo;
112     INT32 size;
113     
114     dprintf_gdi(stddeb, "CreateDIBPatternBrush: %04x\n", hbitmap );
115
116       /* Make a copy of the bitmap */
117
118     if (!(info = (BITMAPINFO *)GlobalLock16( hbitmap ))) return 0;
119
120     if (info->bmiHeader.biCompression)
121         size = info->bmiHeader.biSizeImage;
122     else
123         size = (info->bmiHeader.biWidth * info->bmiHeader.biBitCount + 31) / 32
124                  * 8 * info->bmiHeader.biHeight;
125     size += DIB_BitmapInfoSize( info, coloruse );
126
127     if (!(logbrush.lbHatch = (INT16)GlobalAlloc16( GMEM_MOVEABLE, size )))
128     {
129         GlobalUnlock16( hbitmap );
130         return 0;
131     }
132     newInfo = (BITMAPINFO *) GlobalLock16( (HGLOBAL16)logbrush.lbHatch );
133     memcpy( newInfo, info, size );
134     GlobalUnlock16( (HGLOBAL16)logbrush.lbHatch );
135     GlobalUnlock16( hbitmap );
136     return CreateBrushIndirect32( &logbrush );
137 }
138
139
140 /***********************************************************************
141  *           CreateDIBPatternBrush32    (GDI32.34)
142  */
143 HBRUSH32 CreateDIBPatternBrush32( HGLOBAL32 hbitmap, UINT32 coloruse )
144 {
145     LOGBRUSH32 logbrush = { BS_DIBPATTERN, coloruse, 0 };
146     BITMAPINFO *info, *newInfo;
147     INT32 size;
148     
149     dprintf_gdi(stddeb, "CreateDIBPatternBrush: %04x\n", hbitmap );
150
151       /* Make a copy of the bitmap */
152
153     if (!(info = (BITMAPINFO *)GlobalLock32( hbitmap ))) return 0;
154
155     if (info->bmiHeader.biCompression)
156         size = info->bmiHeader.biSizeImage;
157     else
158         size = (info->bmiHeader.biWidth * info->bmiHeader.biBitCount + 31) / 32
159                  * 8 * info->bmiHeader.biHeight;
160     size += DIB_BitmapInfoSize( info, coloruse );
161
162     if (!(logbrush.lbHatch = (INT32)GlobalAlloc16( GMEM_MOVEABLE, size )))
163     {
164         GlobalUnlock16( hbitmap );
165         return 0;
166     }
167     newInfo = (BITMAPINFO *) GlobalLock16( (HGLOBAL16)logbrush.lbHatch );
168     memcpy( newInfo, info, size );
169     GlobalUnlock16( (HGLOBAL16)logbrush.lbHatch );
170     GlobalUnlock16( hbitmap );
171     return CreateBrushIndirect32( &logbrush );
172 }
173
174
175 /***********************************************************************
176  *           CreateSolidBrush    (GDI.66)
177  */
178 HBRUSH16 CreateSolidBrush16( COLORREF color )
179 {
180     LOGBRUSH32 logbrush = { BS_SOLID, color, 0 };
181     dprintf_gdi(stddeb, "CreateSolidBrush16: %06lx\n", color );
182     return CreateBrushIndirect32( &logbrush );
183 }
184
185
186 /***********************************************************************
187  *           CreateSolidBrush32    (GDI32.64)
188  */
189 HBRUSH32 CreateSolidBrush32( COLORREF color )
190 {
191     LOGBRUSH32 logbrush = { BS_SOLID, color, 0 };
192     dprintf_gdi(stddeb, "CreateSolidBrush32: %06lx\n", color );
193     return CreateBrushIndirect32( &logbrush );
194 }
195
196
197 /***********************************************************************
198  *           SetBrushOrg    (GDI.148)
199  */
200 DWORD SetBrushOrg( HDC16 hdc, INT16 x, INT16 y )
201 {
202     DWORD retval;
203     DC * dc = (DC *) GDI_GetObjPtr( hdc, DC_MAGIC );
204     if (!dc) return FALSE;
205     retval = dc->w.brushOrgX | (dc->w.brushOrgY << 16);
206     dc->w.brushOrgX = x;
207     dc->w.brushOrgY = y;
208     return retval;
209 }
210
211
212 /***********************************************************************
213  *           SetBrushOrgEx    (GDI32.308)
214  */
215 BOOL32 SetBrushOrgEx( HDC32 hdc, INT32 x, INT32 y, LPPOINT32 oldorg )
216 {
217     DC * dc = (DC *) GDI_GetObjPtr( hdc, DC_MAGIC );
218
219     if (!dc) return FALSE;
220     if (oldorg)
221     {
222         oldorg->x = dc->w.brushOrgX;
223         oldorg->y = dc->w.brushOrgY;
224     }
225     dc->w.brushOrgX = x;
226     dc->w.brushOrgY = y;
227     return TRUE;
228 }
229
230
231 /***********************************************************************
232  *           GetSysColorBrush16    (USER.281)
233  */
234 HBRUSH16 GetSysColorBrush16( INT16 index )
235 {
236     fprintf( stderr, "Unimplemented stub: GetSysColorBrush16(%d)\n", index );
237     return GetStockObject32(LTGRAY_BRUSH);
238 }
239
240
241 /***********************************************************************
242  *           GetSysColorBrush32    (USER32.289)
243  */
244 HBRUSH32 GetSysColorBrush32( INT32 index)
245 {
246     fprintf( stderr, "Unimplemented stub: GetSysColorBrush32(%d)\n", index );
247     return GetStockObject32(LTGRAY_BRUSH);
248 }
249
250
251 /***********************************************************************
252  *           BRUSH_DeleteObject
253  */
254 BOOL32 BRUSH_DeleteObject( HBRUSH16 hbrush, BRUSHOBJ * brush )
255 {
256     switch(brush->logbrush.lbStyle)
257     {
258       case BS_PATTERN:
259           DeleteObject32( (HGDIOBJ32)brush->logbrush.lbHatch );
260           break;
261       case BS_DIBPATTERN:
262           GlobalFree16( (HGLOBAL16)brush->logbrush.lbHatch );
263           break;
264     }
265     return GDI_FreeObject( hbrush );
266 }
267
268
269 /***********************************************************************
270  *           BRUSH_GetObject16
271  */
272 INT16 BRUSH_GetObject16( BRUSHOBJ * brush, INT16 count, LPSTR buffer )
273 {
274     LOGBRUSH16 logbrush;
275
276     logbrush.lbStyle = brush->logbrush.lbStyle;
277     logbrush.lbColor = brush->logbrush.lbColor;
278     logbrush.lbHatch = brush->logbrush.lbHatch;
279     if (count > sizeof(logbrush)) count = sizeof(logbrush);
280     memcpy( buffer, &logbrush, count );
281     return count;
282 }
283
284
285 /***********************************************************************
286  *           BRUSH_GetObject32
287  */
288 INT32 BRUSH_GetObject32( BRUSHOBJ * brush, INT32 count, LPSTR buffer )
289 {
290     if (count > sizeof(brush->logbrush)) count = sizeof(brush->logbrush);
291     memcpy( buffer, &brush->logbrush, count );
292     return count;
293 }
294
295