Create an X window for every window, including children.
[wine] / graphics / x11drv / brush.c
1 /*
2  * X11DRV brush objects
3  *
4  * Copyright 1993, 1994  Alexandre Julliard
5  */
6
7 #include "config.h"
8
9 #include "ts_xlib.h"
10
11 #include <stdlib.h>
12 #include "brush.h"
13 #include "bitmap.h"
14 #include "color.h"
15 #include "x11drv.h"
16 #include "debugtools.h"
17
18 DEFAULT_DEBUG_CHANNEL(gdi);
19
20 static const char HatchBrushes[NB_HATCH_STYLES + 1][8] =
21 {
22     { 0x00, 0x00, 0x00, 0xff, 0x00, 0x00, 0x00, 0x00 }, /* HS_HORIZONTAL */
23     { 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08 }, /* HS_VERTICAL   */
24     { 0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80 }, /* HS_FDIAGONAL  */
25     { 0x80, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02, 0x01 }, /* HS_BDIAGONAL  */
26     { 0x08, 0x08, 0x08, 0xff, 0x08, 0x08, 0x08, 0x08 }, /* HS_CROSS      */
27     { 0x81, 0x42, 0x24, 0x18, 0x18, 0x24, 0x42, 0x81 }, /* HS_DIAGCROSS  */
28     { 0xee, 0xbb, 0xee, 0xbb, 0xee, 0xbb, 0xee, 0xbb }  /* Hack for DKGRAY */
29 };
30
31   /* Levels of each primary for dithering */
32 #define PRIMARY_LEVELS  3  
33 #define TOTAL_LEVELS    (PRIMARY_LEVELS*PRIMARY_LEVELS*PRIMARY_LEVELS)
34
35  /* Dithering matrix size  */
36 #define MATRIX_SIZE     8
37 #define MATRIX_SIZE_2   (MATRIX_SIZE*MATRIX_SIZE)
38
39   /* Total number of possible levels for a dithered primary color */
40 #define DITHER_LEVELS   (MATRIX_SIZE_2 * (PRIMARY_LEVELS-1) + 1)
41
42   /* Dithering matrix */
43 static const int dither_matrix[MATRIX_SIZE_2] =
44 {
45      0, 32,  8, 40,  2, 34, 10, 42,
46     48, 16, 56, 24, 50, 18, 58, 26,
47     12, 44,  4, 36, 14, 46,  6, 38,
48     60, 28, 52, 20, 62, 30, 54, 22,
49      3, 35, 11, 43,  1, 33,  9, 41,
50     51, 19, 59, 27, 49, 17, 57, 25,
51     15, 47,  7, 39, 13, 45,  5, 37,
52     63, 31, 55, 23, 61, 29, 53, 21
53 };
54
55   /* Mapping between (R,G,B) triples and EGA colors */
56 static const int EGAmapping[TOTAL_LEVELS] =
57 {
58     0,  /* 000000 -> 000000 */
59     4,  /* 00007f -> 000080 */
60     12, /* 0000ff -> 0000ff */
61     2,  /* 007f00 -> 008000 */
62     6,  /* 007f7f -> 008080 */
63     6,  /* 007fff -> 008080 */
64     10, /* 00ff00 -> 00ff00 */
65     6,  /* 00ff7f -> 008080 */
66     14, /* 00ffff -> 00ffff */
67     1,  /* 7f0000 -> 800000 */
68     5,  /* 7f007f -> 800080 */
69     5,  /* 7f00ff -> 800080 */
70     3,  /* 7f7f00 -> 808000 */
71     8,  /* 7f7f7f -> 808080 */
72     7,  /* 7f7fff -> c0c0c0 */
73     3,  /* 7fff00 -> 808000 */
74     7,  /* 7fff7f -> c0c0c0 */
75     7,  /* 7fffff -> c0c0c0 */
76     9,  /* ff0000 -> ff0000 */
77     5,  /* ff007f -> 800080 */
78     13, /* ff00ff -> ff00ff */
79     3,  /* ff7f00 -> 808000 */
80     7,  /* ff7f7f -> c0c0c0 */
81     7,  /* ff7fff -> c0c0c0 */
82     11, /* ffff00 -> ffff00 */
83     7,  /* ffff7f -> c0c0c0 */
84     15  /* ffffff -> ffffff */
85 };
86
87 #define PIXEL_VALUE(r,g,b) \
88     X11DRV_PALETTE_mapEGAPixel[EGAmapping[((r)*PRIMARY_LEVELS+(g))*PRIMARY_LEVELS+(b)]]
89
90   /* X image for building dithered pixmap */
91 static XImage *ditherImage = NULL;
92
93
94 /***********************************************************************
95  *           BRUSH_DitherColor
96  */
97 static Pixmap BRUSH_DitherColor( DC *dc, COLORREF color )
98 {
99     static COLORREF prevColor = 0xffffffff;
100     unsigned int x, y;
101     Pixmap pixmap;
102
103     if (!ditherImage)
104     {
105         ditherImage = X11DRV_DIB_CreateXImage( MATRIX_SIZE, MATRIX_SIZE, screen_depth );
106         if (!ditherImage) return 0;
107     }
108
109     wine_tsx11_lock();
110     if (color != prevColor)
111     {
112         int r = GetRValue( color ) * DITHER_LEVELS;
113         int g = GetGValue( color ) * DITHER_LEVELS;
114         int b = GetBValue( color ) * DITHER_LEVELS;
115         const int *pmatrix = dither_matrix;
116
117         for (y = 0; y < MATRIX_SIZE; y++)
118         {
119             for (x = 0; x < MATRIX_SIZE; x++)
120             {
121                 int d  = *pmatrix++ * 256;
122                 int dr = ((r + d) / MATRIX_SIZE_2) / 256;
123                 int dg = ((g + d) / MATRIX_SIZE_2) / 256;
124                 int db = ((b + d) / MATRIX_SIZE_2) / 256;
125                 XPutPixel( ditherImage, x, y, PIXEL_VALUE(dr,dg,db) );
126             }
127         }
128         prevColor = color;
129     }
130     
131     pixmap = XCreatePixmap( gdi_display, root_window, MATRIX_SIZE, MATRIX_SIZE, screen_depth );
132     XPutImage( gdi_display, pixmap, BITMAP_colorGC, ditherImage, 0, 0,
133                0, 0, MATRIX_SIZE, MATRIX_SIZE );
134     wine_tsx11_unlock();
135     return pixmap;
136 }
137
138
139 /***********************************************************************
140  *           BRUSH_SelectSolidBrush
141  */
142 static void BRUSH_SelectSolidBrush( DC *dc, COLORREF color )
143 {
144     X11DRV_PDEVICE *physDev = (X11DRV_PDEVICE *)dc->physDev;
145
146     if ((dc->bitsPerPixel > 1) && (screen_depth <= 8) && !COLOR_IsSolid( color ))
147     {
148           /* Dithered brush */
149         physDev->brush.pixmap = BRUSH_DitherColor( dc, color );
150         physDev->brush.fillStyle = FillTiled;
151         physDev->brush.pixel = 0;
152     }
153     else
154     {
155           /* Solid brush */
156         physDev->brush.pixel = X11DRV_PALETTE_ToPhysical( dc, color );
157         physDev->brush.fillStyle = FillSolid;
158     }
159 }
160
161
162 /***********************************************************************
163  *           BRUSH_SelectPatternBrush
164  */
165 static BOOL BRUSH_SelectPatternBrush( DC * dc, HBITMAP hbitmap )
166 {
167     BOOL ret = FALSE;
168     X11DRV_PDEVICE *physDev = (X11DRV_PDEVICE *)dc->physDev;
169     BITMAPOBJ * bmp = (BITMAPOBJ *) GDI_GetObjPtr( hbitmap, BITMAP_MAGIC );
170     if (!bmp) return FALSE;
171
172    if(!bmp->physBitmap)
173         if(!X11DRV_CreateBitmap(hbitmap))
174             goto done;
175
176     if(bmp->funcs != dc->funcs) {
177         WARN("Trying to select non-X11 DDB into an X11 dc\n");
178         goto done;
179     }
180
181     if ((dc->bitsPerPixel == 1) && (bmp->bitmap.bmBitsPixel != 1))
182     {
183         /* Special case: a color pattern on a monochrome DC */
184         physDev->brush.pixmap = TSXCreatePixmap( gdi_display, root_window, 8, 8, 1);
185         /* FIXME: should probably convert to monochrome instead */
186         TSXCopyPlane( gdi_display, (Pixmap)bmp->physBitmap, physDev->brush.pixmap,
187                       BITMAP_monoGC, 0, 0, 8, 8, 0, 0, 1 );
188     }
189     else
190     {
191         physDev->brush.pixmap = TSXCreatePixmap( gdi_display, root_window,
192                                                  8, 8, bmp->bitmap.bmBitsPixel );
193         TSXCopyArea( gdi_display, (Pixmap)bmp->physBitmap, physDev->brush.pixmap,
194                      BITMAP_GC(bmp), 0, 0, 8, 8, 0, 0 );
195     }
196     
197     if (bmp->bitmap.bmBitsPixel > 1)
198     {
199         physDev->brush.fillStyle = FillTiled;
200         physDev->brush.pixel = 0;  /* Ignored */
201     }
202     else
203     {
204         physDev->brush.fillStyle = FillOpaqueStippled;
205         physDev->brush.pixel = -1;  /* Special case (see DC_SetupGCForBrush) */
206     }
207     ret = TRUE;
208  done:
209     GDI_ReleaseObj( hbitmap );
210     return ret;
211 }
212
213
214
215
216 /***********************************************************************
217  *           BRUSH_SelectObject
218  */
219 HBRUSH X11DRV_BRUSH_SelectObject( DC * dc, HBRUSH hbrush, BRUSHOBJ * brush )
220 {
221     HBITMAP16 hBitmap;
222     BITMAPINFO * bmpInfo;
223     HBRUSH16 prevHandle = dc->hBrush;
224     X11DRV_PDEVICE *physDev = (X11DRV_PDEVICE *)dc->physDev;
225     
226     TRACE("hdc=%04x hbrush=%04x\n",
227                 dc->hSelf,hbrush);
228
229     dc->hBrush = hbrush;
230
231     if (physDev->brush.pixmap)
232     {
233         TSXFreePixmap( gdi_display, physDev->brush.pixmap );
234         physDev->brush.pixmap = 0;
235     }
236     physDev->brush.style = brush->logbrush.lbStyle;
237     
238     switch(brush->logbrush.lbStyle)
239     {
240       case BS_NULL:
241         TRACE("BS_NULL\n" );
242         break;
243
244       case BS_SOLID:
245         TRACE("BS_SOLID\n" );
246         BRUSH_SelectSolidBrush( dc, brush->logbrush.lbColor );
247         break;
248         
249       case BS_HATCHED:
250         TRACE("BS_HATCHED\n" );
251         physDev->brush.pixel = X11DRV_PALETTE_ToPhysical( dc, brush->logbrush.lbColor );
252         physDev->brush.pixmap = TSXCreateBitmapFromData( gdi_display, root_window,
253                                  HatchBrushes[brush->logbrush.lbHatch], 8, 8 );
254         physDev->brush.fillStyle = FillStippled;
255         break;
256         
257       case BS_PATTERN:
258         TRACE("BS_PATTERN\n");
259         BRUSH_SelectPatternBrush( dc, (HBRUSH16)brush->logbrush.lbHatch );
260         break;
261
262       case BS_DIBPATTERN:
263         TRACE("BS_DIBPATTERN\n");
264         if ((bmpInfo = (BITMAPINFO *) GlobalLock16( (HGLOBAL16)brush->logbrush.lbHatch )))
265         {
266             int size = DIB_BitmapInfoSize( bmpInfo, brush->logbrush.lbColor );
267             hBitmap = CreateDIBitmap( dc->hSelf, &bmpInfo->bmiHeader,
268                                         CBM_INIT, ((char *)bmpInfo) + size,
269                                         bmpInfo,
270                                         (WORD)brush->logbrush.lbColor );
271             BRUSH_SelectPatternBrush( dc, hBitmap );
272             DeleteObject16( hBitmap );
273             GlobalUnlock16( (HGLOBAL16)brush->logbrush.lbHatch );           
274         }
275         
276         break;
277     }
278     
279     return prevHandle;
280 }