?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
winetest: Include language settings in OS info.
[wine/multimedia.git] / dlls / winex11.drv / graphics.c
blob7c4e0d588d2dcf1e138634ae9b7f2b617aef51f0
1 /*
2 * X11 graphics driver graphics functions
3 *
4 * Copyright 1993,1994 Alexandre Julliard
5 * Copyright 1998 Huw Davies
6 *
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
11 *
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
16 *
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 */
21
22 /*
23 * FIXME: only some of these functions obey the GM_ADVANCED
24 * graphics mode
25 */
26
27 #include "config.h"
28
29 #include <stdarg.h>
30 #include <math.h>
31 #ifdef HAVE_FLOAT_H
32 # include <float.h>
33 #endif
34 #include <stdlib.h>
35 #ifndef PI
36 #define PI M_PI
37 #endif
38 #include <string.h>
39 #include <limits.h>
40
41 #include "windef.h"
42 #include "winbase.h"
43 #include "winreg.h"
44
45 #include "x11drv.h"
46 #include "x11font.h"
47 #include "wine/debug.h"
48 #include "wine/unicode.h"
49
50 WINE_DEFAULT_DEBUG_CHANNEL(graphics);
51
52 #define ABS(x) ((x)<0?(-(x)):(x))
53
54 /* ROP code to GC function conversion */
55 const int X11DRV_XROPfunction[16] =
56 {
57 GXclear, /* R2_BLACK */
58 GXnor, /* R2_NOTMERGEPEN */
59 GXandInverted, /* R2_MASKNOTPEN */
60 GXcopyInverted, /* R2_NOTCOPYPEN */
61 GXandReverse, /* R2_MASKPENNOT */
62 GXinvert, /* R2_NOT */
63 GXxor, /* R2_XORPEN */
64 GXnand, /* R2_NOTMASKPEN */
65 GXand, /* R2_MASKPEN */
66 GXequiv, /* R2_NOTXORPEN */
67 GXnoop, /* R2_NOP */
68 GXorInverted, /* R2_MERGENOTPEN */
69 GXcopy, /* R2_COPYPEN */
70 GXorReverse, /* R2_MERGEPENNOT */
71 GXor, /* R2_MERGEPEN */
72 GXset /* R2_WHITE */
73 };
74
75
76 /* get the rectangle in device coordinates, with optional mirroring */
77 static RECT get_device_rect( HDC hdc, int left, int top, int right, int bottom )
78 {
79 RECT rect;
80
81 rect.left = left;
82 rect.top = top;
83 rect.right = right;
84 rect.bottom = bottom;
85 if (GetLayout( hdc ) & LAYOUT_RTL)
86 {
87 /* shift the rectangle so that the right border is included after mirroring */
88 /* it would be more correct to do this after LPtoDP but that's not what Windows does */
89 rect.left--;
90 rect.right--;
91 }
92 LPtoDP( hdc, (POINT *)&rect, 2 );
93 if (rect.left > rect.right)
94 {
95 int tmp = rect.left;
96 rect.left = rect.right;
97 rect.right = tmp;
98 }
99 if (rect.top > rect.bottom)
100 {
101 int tmp = rect.top;
102 rect.top = rect.bottom;
103 rect.bottom = tmp;
104 }
105 return rect;
106 }
107
108 /***********************************************************************
109 * X11DRV_GetRegionData
110 *
111 * Calls GetRegionData on the given region and converts the rectangle
112 * array to XRectangle format. The returned buffer must be freed by
113 * caller using HeapFree(GetProcessHeap(),...).
114 * If hdc_lptodp is not 0, the rectangles are converted through LPtoDP.
115 */
116 RGNDATA *X11DRV_GetRegionData( HRGN hrgn, HDC hdc_lptodp )
117 {
118 RGNDATA *data;
119 DWORD size;
120 unsigned int i;
121 RECT *rect, tmp;
122 XRectangle *xrect;
123
124 if (!(size = GetRegionData( hrgn, 0, NULL ))) return NULL;
125 if (sizeof(XRectangle) > sizeof(RECT))
126 {
127 /* add extra size for XRectangle array */
128 int count = (size - sizeof(RGNDATAHEADER)) / sizeof(RECT);
129 size += count * (sizeof(XRectangle) - sizeof(RECT));
130 }
131 if (!(data = HeapAlloc( GetProcessHeap(), 0, size ))) return NULL;
132 if (!GetRegionData( hrgn, size, data ))
133 {
134 HeapFree( GetProcessHeap(), 0, data );
135 return NULL;
136 }
137
138 rect = (RECT *)data->Buffer;
139 xrect = (XRectangle *)data->Buffer;
140 if (hdc_lptodp) /* map to device coordinates */
141 {
142 LPtoDP( hdc_lptodp, (POINT *)rect, data->rdh.nCount * 2 );
143 for (i = 0; i < data->rdh.nCount; i++)
144 {
145 if (rect[i].right < rect[i].left)
146 {
147 INT tmp = rect[i].right;
148 rect[i].right = rect[i].left;
149 rect[i].left = tmp;
150 }
151 if (rect[i].bottom < rect[i].top)
152 {
153 INT tmp = rect[i].bottom;
154 rect[i].bottom = rect[i].top;
155 rect[i].top = tmp;
156 }
157 }
158 }
159
160 if (sizeof(XRectangle) > sizeof(RECT))
161 {
162 int j;
163 /* need to start from the end */
164 for (j = data->rdh.nCount-1; j >= 0; j--)
165 {
166 tmp = rect[j];
167 xrect[j].x = max( min( tmp.left, SHRT_MAX), SHRT_MIN);
168 xrect[j].y = max( min( tmp.top, SHRT_MAX), SHRT_MIN);
169 xrect[j].width = max( min( tmp.right - xrect[j].x, USHRT_MAX), 0);
170 xrect[j].height = max( min( tmp.bottom - xrect[j].y, USHRT_MAX), 0);
171 }
172 }
173 else
174 {
175 for (i = 0; i < data->rdh.nCount; i++)
176 {
177 tmp = rect[i];
178 xrect[i].x = max( min( tmp.left, SHRT_MAX), SHRT_MIN);
179 xrect[i].y = max( min( tmp.top, SHRT_MAX), SHRT_MIN);
180 xrect[i].width = max( min( tmp.right - xrect[i].x, USHRT_MAX), 0);
181 xrect[i].height = max( min( tmp.bottom - xrect[i].y, USHRT_MAX), 0);
182 }
183 }
184 return data;
185 }
186
187
188 static void update_x11_clipping( X11DRV_PDEVICE *physDev )
189 {
190 RGNDATA *data;
191
192 if (!(data = X11DRV_GetRegionData( physDev->region, 0 ))) return;
193 wine_tsx11_lock();
194 XSetClipRectangles( gdi_display, physDev->gc, physDev->dc_rect.left, physDev->dc_rect.top,
195 (XRectangle *)data->Buffer, data->rdh.nCount, YXBanded );
196 wine_tsx11_unlock();
197
198 if (physDev->xrender) X11DRV_XRender_SetDeviceClipping(physDev, data);
199 HeapFree( GetProcessHeap(), 0, data );
200 }
201
202 /***********************************************************************
203 * add_extra_clipping_region
204 *
205 * Temporarily add a region to the current clipping region.
206 * The returned region must be restored with restore_clipping_region.
207 */
208 HRGN add_extra_clipping_region( X11DRV_PDEVICE *dev, HRGN rgn )
209 {
210 HRGN ret, clip;
211
212 if (!(clip = CreateRectRgn( 0, 0, 0, 0 ))) return 0;
213 CombineRgn( clip, dev->region, rgn, RGN_AND );
214 ret = dev->region;
215 dev->region = clip;
216 update_x11_clipping( dev );
217 return ret;
218 }
219
220
221 /***********************************************************************
222 * restore_clipping_region
223 */
224 void restore_clipping_region( X11DRV_PDEVICE *dev, HRGN rgn )
225 {
226 if (!rgn) return;
227 DeleteObject( dev->region );
228 dev->region = rgn;
229 update_x11_clipping( dev );
230 }
231
232
233 /***********************************************************************
234 * X11DRV_SetDeviceClipping
235 */
236 void X11DRV_SetDeviceClipping( PHYSDEV dev, HRGN vis_rgn, HRGN clip_rgn )
237 {
238 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
239
240 CombineRgn( physDev->region, vis_rgn, clip_rgn, clip_rgn ? RGN_AND : RGN_COPY );
241 update_x11_clipping( physDev );
242 }
243
244
245 /***********************************************************************
246 * X11DRV_SetupGCForPatBlt
247 *
248 * Setup the GC for a PatBlt operation using current brush.
249 * If fMapColors is TRUE, X pixels are mapped to Windows colors.
250 * Return FALSE if brush is BS_NULL, TRUE otherwise.
251 */
252 BOOL X11DRV_SetupGCForPatBlt( X11DRV_PDEVICE *physDev, GC gc, BOOL fMapColors )
253 {
254 XGCValues val;
255 unsigned long mask;
256 Pixmap pixmap = 0;
257 POINT pt;
258
259 if (physDev->brush.style == BS_NULL) return FALSE;
260 if (physDev->brush.pixel == -1)
261 {
262 /* Special case used for monochrome pattern brushes.
263 * We need to swap foreground and background because
264 * Windows does it the wrong way...
265 */
266 val.foreground = physDev->backgroundPixel;
267 val.background = physDev->textPixel;
268 }
269 else
270 {
271 val.foreground = physDev->brush.pixel;
272 val.background = physDev->backgroundPixel;
273 }
274 if (fMapColors && X11DRV_PALETTE_XPixelToPalette)
275 {
276 val.foreground = X11DRV_PALETTE_XPixelToPalette[val.foreground];
277 val.background = X11DRV_PALETTE_XPixelToPalette[val.background];
278 }
279
280 val.function = X11DRV_XROPfunction[GetROP2(physDev->dev.hdc)-1];
281 /*
282 ** Let's replace GXinvert by GXxor with (black xor white)
283 ** This solves the selection color and leak problems in excel
284 ** FIXME : Let's do that only if we work with X-pixels, not with Win-pixels
285 */
286 if (val.function == GXinvert)
287 {
288 val.foreground = (WhitePixel( gdi_display, DefaultScreen(gdi_display) ) ^
289 BlackPixel( gdi_display, DefaultScreen(gdi_display) ));
290 val.function = GXxor;
291 }
292 val.fill_style = physDev->brush.fillStyle;
293 switch(val.fill_style)
294 {
295 case FillStippled:
296 case FillOpaqueStippled:
297 if (GetBkMode(physDev->dev.hdc)==OPAQUE) val.fill_style = FillOpaqueStippled;
298 val.stipple = physDev->brush.pixmap;
299 mask = GCStipple;
300 break;
301
302 case FillTiled:
303 if (fMapColors && X11DRV_PALETTE_XPixelToPalette)
304 {
305 register int x, y;
306 XImage *image;
307 wine_tsx11_lock();
308 pixmap = XCreatePixmap( gdi_display, root_window, 8, 8, physDev->depth );
309 image = XGetImage( gdi_display, physDev->brush.pixmap, 0, 0, 8, 8,
310 AllPlanes, ZPixmap );
311 for (y = 0; y < 8; y++)
312 for (x = 0; x < 8; x++)
313 XPutPixel( image, x, y,
314 X11DRV_PALETTE_XPixelToPalette[XGetPixel( image, x, y)] );
315 XPutImage( gdi_display, pixmap, gc, image, 0, 0, 0, 0, 8, 8 );
316 XDestroyImage( image );
317 wine_tsx11_unlock();
318 val.tile = pixmap;
319 }
320 else val.tile = physDev->brush.pixmap;
321 mask = GCTile;
322 break;
323
324 default:
325 mask = 0;
326 break;
327 }
328 GetBrushOrgEx( physDev->dev.hdc, &pt );
329 val.ts_x_origin = physDev->dc_rect.left + pt.x;
330 val.ts_y_origin = physDev->dc_rect.top + pt.y;
331 val.fill_rule = (GetPolyFillMode(physDev->dev.hdc) == WINDING) ? WindingRule : EvenOddRule;
332 wine_tsx11_lock();
333 XChangeGC( gdi_display, gc,
334 GCFunction | GCForeground | GCBackground | GCFillStyle |
335 GCFillRule | GCTileStipXOrigin | GCTileStipYOrigin | mask,
336 &val );
337 if (pixmap) XFreePixmap( gdi_display, pixmap );
338 wine_tsx11_unlock();
339 return TRUE;
340 }
341
342
343 /***********************************************************************
344 * X11DRV_SetupGCForBrush
345 *
346 * Setup physDev->gc for drawing operations using current brush.
347 * Return FALSE if brush is BS_NULL, TRUE otherwise.
348 */
349 BOOL X11DRV_SetupGCForBrush( X11DRV_PDEVICE *physDev )
350 {
351 return X11DRV_SetupGCForPatBlt( physDev, physDev->gc, FALSE );
352 }
353
354
355 /***********************************************************************
356 * X11DRV_SetupGCForPen
357 *
358 * Setup physDev->gc for drawing operations using current pen.
359 * Return FALSE if pen is PS_NULL, TRUE otherwise.
360 */
361 static BOOL X11DRV_SetupGCForPen( X11DRV_PDEVICE *physDev )
362 {
363 XGCValues val;
364 UINT rop2 = GetROP2(physDev->dev.hdc);
365
366 if (physDev->pen.style == PS_NULL) return FALSE;
367
368 switch (rop2)
369 {
370 case R2_BLACK :
371 val.foreground = BlackPixel( gdi_display, DefaultScreen(gdi_display) );
372 val.function = GXcopy;
373 break;
374 case R2_WHITE :
375 val.foreground = WhitePixel( gdi_display, DefaultScreen(gdi_display) );
376 val.function = GXcopy;
377 break;
378 case R2_XORPEN :
379 val.foreground = physDev->pen.pixel;
380 /* It is very unlikely someone wants to XOR with 0 */
381 /* This fixes the rubber-drawings in paintbrush */
382 if (val.foreground == 0)
383 val.foreground = (WhitePixel( gdi_display, DefaultScreen(gdi_display) ) ^
384 BlackPixel( gdi_display, DefaultScreen(gdi_display) ));
385 val.function = GXxor;
386 break;
387 default :
388 val.foreground = physDev->pen.pixel;
389 val.function = X11DRV_XROPfunction[rop2-1];
390 }
391 val.background = physDev->backgroundPixel;
392 val.fill_style = FillSolid;
393 val.line_width = physDev->pen.width;
394 if (val.line_width <= 1) {
395 val.cap_style = CapNotLast;
396 } else {
397 switch (physDev->pen.endcap)
398 {
399 case PS_ENDCAP_SQUARE:
400 val.cap_style = CapProjecting;
401 break;
402 case PS_ENDCAP_FLAT:
403 val.cap_style = CapButt;
404 break;
405 case PS_ENDCAP_ROUND:
406 default:
407 val.cap_style = CapRound;
408 }
409 }
410 switch (physDev->pen.linejoin)
411 {
412 case PS_JOIN_BEVEL:
413 val.join_style = JoinBevel;
414 break;
415 case PS_JOIN_MITER:
416 val.join_style = JoinMiter;
417 break;
418 case PS_JOIN_ROUND:
419 default:
420 val.join_style = JoinRound;
421 }
422
423 if (physDev->pen.dash_len)
424 val.line_style = ((GetBkMode(physDev->dev.hdc) == OPAQUE) && (!physDev->pen.ext))
425 ? LineDoubleDash : LineOnOffDash;
426 else
427 val.line_style = LineSolid;
428
429 wine_tsx11_lock();
430 if (physDev->pen.dash_len)
431 XSetDashes( gdi_display, physDev->gc, 0, physDev->pen.dashes, physDev->pen.dash_len );
432 XChangeGC( gdi_display, physDev->gc,
433 GCFunction | GCForeground | GCBackground | GCLineWidth |
434 GCLineStyle | GCCapStyle | GCJoinStyle | GCFillStyle, &val );
435 wine_tsx11_unlock();
436 return TRUE;
437 }
438
439
440 /***********************************************************************
441 * X11DRV_SetupGCForText
442 *
443 * Setup physDev->gc for text drawing operations.
444 * Return FALSE if the font is null, TRUE otherwise.
445 */
446 BOOL X11DRV_SetupGCForText( X11DRV_PDEVICE *physDev )
447 {
448 XFontStruct* xfs = XFONT_GetFontStruct( physDev->font );
449
450 if( xfs )
451 {
452 XGCValues val;
453
454 val.function = GXcopy; /* Text is always GXcopy */
455 val.foreground = physDev->textPixel;
456 val.background = physDev->backgroundPixel;
457 val.fill_style = FillSolid;
458 val.font = xfs->fid;
459
460 wine_tsx11_lock();
461 XChangeGC( gdi_display, physDev->gc,
462 GCFunction | GCForeground | GCBackground | GCFillStyle |
463 GCFont, &val );
464 wine_tsx11_unlock();
465 return TRUE;
466 }
467 WARN("Physical font failure\n" );
468 return FALSE;
469 }
470
471 /***********************************************************************
472 * X11DRV_XWStoDS
473 *
474 * Performs a world-to-viewport transformation on the specified width.
475 */
476 INT X11DRV_XWStoDS( X11DRV_PDEVICE *physDev, INT width )
477 {
478 POINT pt[2];
479
480 pt[0].x = 0;
481 pt[0].y = 0;
482 pt[1].x = width;
483 pt[1].y = 0;
484 LPtoDP( physDev->dev.hdc, pt, 2 );
485 return pt[1].x - pt[0].x;
486 }
487
488 /***********************************************************************
489 * X11DRV_YWStoDS
490 *
491 * Performs a world-to-viewport transformation on the specified height.
492 */
493 INT X11DRV_YWStoDS( X11DRV_PDEVICE *physDev, INT height )
494 {
495 POINT pt[2];
496
497 pt[0].x = 0;
498 pt[0].y = 0;
499 pt[1].x = 0;
500 pt[1].y = height;
501 LPtoDP( physDev->dev.hdc, pt, 2 );
502 return pt[1].y - pt[0].y;
503 }
504
505 /***********************************************************************
506 * X11DRV_LineTo
507 */
508 BOOL X11DRV_LineTo( PHYSDEV dev, INT x, INT y )
509 {
510 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
511 POINT pt[2];
512
513 if (X11DRV_SetupGCForPen( physDev )) {
514 /* Update the pixmap from the DIB section */
515 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
516
517 GetCurrentPositionEx( dev->hdc, &pt[0] );
518 pt[1].x = x;
519 pt[1].y = y;
520 LPtoDP( dev->hdc, pt, 2 );
521
522 wine_tsx11_lock();
523 XDrawLine(gdi_display, physDev->drawable, physDev->gc,
524 physDev->dc_rect.left + pt[0].x, physDev->dc_rect.top + pt[0].y,
525 physDev->dc_rect.left + pt[1].x, physDev->dc_rect.top + pt[1].y );
526 wine_tsx11_unlock();
527
528 /* Update the DIBSection from the pixmap */
529 X11DRV_UnlockDIBSection(physDev, TRUE);
530 }
531 return TRUE;
532 }
533
534
535
536 /***********************************************************************
537 * X11DRV_DrawArc
538 *
539 * Helper functions for Arc(), Chord() and Pie().
540 * 'lines' is the number of lines to draw: 0 for Arc, 1 for Chord, 2 for Pie.
541 *
542 */
543 static BOOL X11DRV_DrawArc( PHYSDEV dev, INT left, INT top, INT right, INT bottom,
544 INT xstart, INT ystart, INT xend, INT yend, INT lines )
545 {
546 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
547 INT xcenter, ycenter, istart_angle, idiff_angle;
548 INT width, oldwidth;
549 double start_angle, end_angle;
550 XPoint points[4];
551 BOOL update = FALSE;
552 POINT start, end;
553 RECT rc = get_device_rect( dev->hdc, left, top, right, bottom );
554
555 start.x = xstart;
556 start.y = ystart;
557 end.x = xend;
558 end.y = yend;
559 LPtoDP(dev->hdc, &start, 1);
560 LPtoDP(dev->hdc, &end, 1);
561
562 if ((rc.left == rc.right) || (rc.top == rc.bottom)
563 ||(lines && ((rc.right-rc.left==1)||(rc.bottom-rc.top==1)))) return TRUE;
564
565 if (GetArcDirection( dev->hdc ) == AD_CLOCKWISE)
566 { POINT tmp = start; start = end; end = tmp; }
567
568 oldwidth = width = physDev->pen.width;
569 if (!width) width = 1;
570 if(physDev->pen.style == PS_NULL) width = 0;
571
572 if (physDev->pen.style == PS_INSIDEFRAME)
573 {
574 if (2*width > (rc.right-rc.left)) width=(rc.right-rc.left + 1)/2;
575 if (2*width > (rc.bottom-rc.top)) width=(rc.bottom-rc.top + 1)/2;
576 rc.left += width / 2;
577 rc.right -= (width - 1) / 2;
578 rc.top += width / 2;
579 rc.bottom -= (width - 1) / 2;
580 }
581 if(width == 0) width = 1; /* more accurate */
582 physDev->pen.width = width;
583
584 xcenter = (rc.right + rc.left) / 2;
585 ycenter = (rc.bottom + rc.top) / 2;
586 start_angle = atan2( (double)(ycenter-start.y)*(rc.right-rc.left),
587 (double)(start.x-xcenter)*(rc.bottom-rc.top) );
588 end_angle = atan2( (double)(ycenter-end.y)*(rc.right-rc.left),
589 (double)(end.x-xcenter)*(rc.bottom-rc.top) );
590 if ((start.x==end.x)&&(start.y==end.y))
591 { /* A lazy program delivers xstart=xend=ystart=yend=0) */
592 start_angle = 0;
593 end_angle = 2* PI;
594 }
595 else /* notorious cases */
596 if ((start_angle == PI)&&( end_angle <0))
597 start_angle = - PI;
598 else
599 if ((end_angle == PI)&&( start_angle <0))
600 end_angle = - PI;
601 istart_angle = (INT)(start_angle * 180 * 64 / PI + 0.5);
602 idiff_angle = (INT)((end_angle - start_angle) * 180 * 64 / PI + 0.5);
603 if (idiff_angle <= 0) idiff_angle += 360 * 64;
604
605 /* Update the pixmap from the DIB section */
606 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
607
608 /* Fill arc with brush if Chord() or Pie() */
609
610 if ((lines > 0) && X11DRV_SetupGCForBrush( physDev )) {
611 wine_tsx11_lock();
612 XSetArcMode( gdi_display, physDev->gc, (lines==1) ? ArcChord : ArcPieSlice);
613 XFillArc( gdi_display, physDev->drawable, physDev->gc,
614 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
615 rc.right-rc.left-1, rc.bottom-rc.top-1, istart_angle, idiff_angle );
616 wine_tsx11_unlock();
617 update = TRUE;
618 }
619
620 /* Draw arc and lines */
621
622 if (X11DRV_SetupGCForPen( physDev ))
623 {
624 wine_tsx11_lock();
625 XDrawArc( gdi_display, physDev->drawable, physDev->gc,
626 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
627 rc.right-rc.left-1, rc.bottom-rc.top-1, istart_angle, idiff_angle );
628 if (lines) {
629 /* use the truncated values */
630 start_angle=(double)istart_angle*PI/64./180.;
631 end_angle=(double)(istart_angle+idiff_angle)*PI/64./180.;
632 /* calculate the endpoints and round correctly */
633 points[0].x = (int) floor(physDev->dc_rect.left + (rc.right+rc.left)/2.0 +
634 cos(start_angle) * (rc.right-rc.left-width*2+2) / 2. + 0.5);
635 points[0].y = (int) floor(physDev->dc_rect.top + (rc.top+rc.bottom)/2.0 -
636 sin(start_angle) * (rc.bottom-rc.top-width*2+2) / 2. + 0.5);
637 points[1].x = (int) floor(physDev->dc_rect.left + (rc.right+rc.left)/2.0 +
638 cos(end_angle) * (rc.right-rc.left-width*2+2) / 2. + 0.5);
639 points[1].y = (int) floor(physDev->dc_rect.top + (rc.top+rc.bottom)/2.0 -
640 sin(end_angle) * (rc.bottom-rc.top-width*2+2) / 2. + 0.5);
641
642 /* OK, this stuff is optimized for Xfree86
643 * which is probably the server most used by
644 * wine users. Other X servers will not
645 * display correctly. (eXceed for instance)
646 * so if you feel you must make changes, make sure that
647 * you either use Xfree86 or separate your changes
648 * from these (compile switch or whatever)
649 */
650 if (lines == 2) {
651 INT dx1,dy1;
652 points[3] = points[1];
653 points[1].x = physDev->dc_rect.left + xcenter;
654 points[1].y = physDev->dc_rect.top + ycenter;
655 points[2] = points[1];
656 dx1=points[1].x-points[0].x;
657 dy1=points[1].y-points[0].y;
658 if(((rc.top-rc.bottom) | -2) == -2)
659 if(dy1>0) points[1].y--;
660 if(dx1<0) {
661 if (((-dx1)*64)<=ABS(dy1)*37) points[0].x--;
662 if(((-dx1*9))<(dy1*16)) points[0].y--;
663 if( dy1<0 && ((dx1*9)) < (dy1*16)) points[0].y--;
664 } else {
665 if(dy1 < 0) points[0].y--;
666 if(((rc.right-rc.left) | -2) == -2) points[1].x--;
667 }
668 dx1=points[3].x-points[2].x;
669 dy1=points[3].y-points[2].y;
670 if(((rc.top-rc.bottom) | -2 ) == -2)
671 if(dy1 < 0) points[2].y--;
672 if( dx1<0){
673 if( dy1>0) points[3].y--;
674 if(((rc.right-rc.left) | -2) == -2 ) points[2].x--;
675 }else {
676 points[3].y--;
677 if( dx1 * 64 < dy1 * -37 ) points[3].x--;
678 }
679 lines++;
680 }
681 XDrawLines( gdi_display, physDev->drawable, physDev->gc,
682 points, lines+1, CoordModeOrigin );
683 }
684 wine_tsx11_unlock();
685 update = TRUE;
686 }
687
688 /* Update the DIBSection of the pixmap */
689 X11DRV_UnlockDIBSection(physDev, update);
690
691 physDev->pen.width = oldwidth;
692 return TRUE;
693 }
694
695
696 /***********************************************************************
697 * X11DRV_Arc
698 */
699 BOOL X11DRV_Arc( PHYSDEV dev, INT left, INT top, INT right, INT bottom,
700 INT xstart, INT ystart, INT xend, INT yend )
701 {
702 return X11DRV_DrawArc( dev, left, top, right, bottom, xstart, ystart, xend, yend, 0 );
703 }
704
705
706 /***********************************************************************
707 * X11DRV_Pie
708 */
709 BOOL X11DRV_Pie( PHYSDEV dev, INT left, INT top, INT right, INT bottom,
710 INT xstart, INT ystart, INT xend, INT yend )
711 {
712 return X11DRV_DrawArc( dev, left, top, right, bottom, xstart, ystart, xend, yend, 2 );
713 }
714
715 /***********************************************************************
716 * X11DRV_Chord
717 */
718 BOOL X11DRV_Chord( PHYSDEV dev, INT left, INT top, INT right, INT bottom,
719 INT xstart, INT ystart, INT xend, INT yend )
720 {
721 return X11DRV_DrawArc( dev, left, top, right, bottom, xstart, ystart, xend, yend, 1 );
722 }
723
724
725 /***********************************************************************
726 * X11DRV_Ellipse
727 */
728 BOOL X11DRV_Ellipse( PHYSDEV dev, INT left, INT top, INT right, INT bottom )
729 {
730 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
731 INT width, oldwidth;
732 BOOL update = FALSE;
733 RECT rc = get_device_rect( dev->hdc, left, top, right, bottom );
734
735 if ((rc.left == rc.right) || (rc.top == rc.bottom)) return TRUE;
736
737 oldwidth = width = physDev->pen.width;
738 if (!width) width = 1;
739 if(physDev->pen.style == PS_NULL) width = 0;
740
741 if (physDev->pen.style == PS_INSIDEFRAME)
742 {
743 if (2*width > (rc.right-rc.left)) width=(rc.right-rc.left + 1)/2;
744 if (2*width > (rc.bottom-rc.top)) width=(rc.bottom-rc.top + 1)/2;
745 rc.left += width / 2;
746 rc.right -= (width - 1) / 2;
747 rc.top += width / 2;
748 rc.bottom -= (width - 1) / 2;
749 }
750 if(width == 0) width = 1; /* more accurate */
751 physDev->pen.width = width;
752
753 /* Update the pixmap from the DIB section */
754 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
755
756 if (X11DRV_SetupGCForBrush( physDev ))
757 {
758 wine_tsx11_lock();
759 XFillArc( gdi_display, physDev->drawable, physDev->gc,
760 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
761 rc.right-rc.left-1, rc.bottom-rc.top-1, 0, 360*64 );
762 wine_tsx11_unlock();
763 update = TRUE;
764 }
765 if (X11DRV_SetupGCForPen( physDev ))
766 {
767 wine_tsx11_lock();
768 XDrawArc( gdi_display, physDev->drawable, physDev->gc,
769 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
770 rc.right-rc.left-1, rc.bottom-rc.top-1, 0, 360*64 );
771 wine_tsx11_unlock();
772 update = TRUE;
773 }
774
775 /* Update the DIBSection from the pixmap */
776 X11DRV_UnlockDIBSection(physDev, update);
777
778 physDev->pen.width = oldwidth;
779 return TRUE;
780 }
781
782
783 /***********************************************************************
784 * X11DRV_Rectangle
785 */
786 BOOL X11DRV_Rectangle(PHYSDEV dev, INT left, INT top, INT right, INT bottom)
787 {
788 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
789 INT width, oldwidth, oldjoinstyle;
790 BOOL update = FALSE;
791 RECT rc = get_device_rect( dev->hdc, left, top, right, bottom );
792
793 TRACE("(%d %d %d %d)\n", left, top, right, bottom);
794
795 if ((rc.left == rc.right) || (rc.top == rc.bottom)) return TRUE;
796
797 oldwidth = width = physDev->pen.width;
798 if (!width) width = 1;
799 if(physDev->pen.style == PS_NULL) width = 0;
800
801 if (physDev->pen.style == PS_INSIDEFRAME)
802 {
803 if (2*width > (rc.right-rc.left)) width=(rc.right-rc.left + 1)/2;
804 if (2*width > (rc.bottom-rc.top)) width=(rc.bottom-rc.top + 1)/2;
805 rc.left += width / 2;
806 rc.right -= (width - 1) / 2;
807 rc.top += width / 2;
808 rc.bottom -= (width - 1) / 2;
809 }
810 if(width == 1) width = 0;
811 physDev->pen.width = width;
812 oldjoinstyle = physDev->pen.linejoin;
813 if(physDev->pen.type != PS_GEOMETRIC)
814 physDev->pen.linejoin = PS_JOIN_MITER;
815
816 /* Update the pixmap from the DIB section */
817 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
818
819 if ((rc.right > rc.left + width) && (rc.bottom > rc.top + width))
820 {
821 if (X11DRV_SetupGCForBrush( physDev ))
822 {
823 wine_tsx11_lock();
824 XFillRectangle( gdi_display, physDev->drawable, physDev->gc,
825 physDev->dc_rect.left + rc.left + (width + 1) / 2,
826 physDev->dc_rect.top + rc.top + (width + 1) / 2,
827 rc.right-rc.left-width-1, rc.bottom-rc.top-width-1);
828 wine_tsx11_unlock();
829 update = TRUE;
830 }
831 }
832 if (X11DRV_SetupGCForPen( physDev ))
833 {
834 wine_tsx11_lock();
835 XDrawRectangle( gdi_display, physDev->drawable, physDev->gc,
836 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
837 rc.right-rc.left-1, rc.bottom-rc.top-1 );
838 wine_tsx11_unlock();
839 update = TRUE;
840 }
841
842 /* Update the DIBSection from the pixmap */
843 X11DRV_UnlockDIBSection(physDev, update);
844
845 physDev->pen.width = oldwidth;
846 physDev->pen.linejoin = oldjoinstyle;
847 return TRUE;
848 }
849
850 /***********************************************************************
851 * X11DRV_RoundRect
852 */
853 BOOL X11DRV_RoundRect( PHYSDEV dev, INT left, INT top, INT right, INT bottom,
854 INT ell_width, INT ell_height )
855 {
856 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
857 INT width, oldwidth, oldendcap;
858 BOOL update = FALSE;
859 POINT pts[2];
860 RECT rc = get_device_rect( dev->hdc, left, top, right, bottom );
861
862 TRACE("(%d %d %d %d %d %d\n",
863 left, top, right, bottom, ell_width, ell_height);
864
865 if ((rc.left == rc.right) || (rc.top == rc.bottom))
866 return TRUE;
867
868 /* Make sure ell_width and ell_height are >= 1 otherwise XDrawArc gets
869 called with width/height < 0 */
870 pts[0].x = pts[0].y = 0;
871 pts[1].x = ell_width;
872 pts[1].y = ell_height;
873 LPtoDP(dev->hdc, pts, 2);
874 ell_width = max(abs( pts[1].x - pts[0].x ), 1);
875 ell_height = max(abs( pts[1].y - pts[0].y ), 1);
876
877 oldwidth = width = physDev->pen.width;
878 oldendcap = physDev->pen.endcap;
879 if (!width) width = 1;
880 if(physDev->pen.style == PS_NULL) width = 0;
881
882 if (physDev->pen.style == PS_INSIDEFRAME)
883 {
884 if (2*width > (rc.right-rc.left)) width=(rc.right-rc.left + 1)/2;
885 if (2*width > (rc.bottom-rc.top)) width=(rc.bottom-rc.top + 1)/2;
886 rc.left += width / 2;
887 rc.right -= (width - 1) / 2;
888 rc.top += width / 2;
889 rc.bottom -= (width - 1) / 2;
890 }
891 if(width == 0) width = 1;
892 physDev->pen.width = width;
893 physDev->pen.endcap = PS_ENDCAP_SQUARE;
894
895 /* Update the pixmap from the DIB section */
896 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
897
898 if (X11DRV_SetupGCForBrush( physDev ))
899 {
900 wine_tsx11_lock();
901 if (ell_width > (rc.right-rc.left) )
902 if (ell_height > (rc.bottom-rc.top) )
903 XFillArc( gdi_display, physDev->drawable, physDev->gc,
904 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
905 rc.right - rc.left - 1, rc.bottom - rc.top - 1,
906 0, 360 * 64 );
907 else{
908 XFillArc( gdi_display, physDev->drawable, physDev->gc,
909 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
910 rc.right - rc.left - 1, ell_height, 0, 180 * 64 );
911 XFillArc( gdi_display, physDev->drawable, physDev->gc,
912 physDev->dc_rect.left + rc.left,
913 physDev->dc_rect.top + rc.bottom - ell_height - 1,
914 rc.right - rc.left - 1, ell_height, 180 * 64,
915 180 * 64 );
916 }
917 else if (ell_height > (rc.bottom-rc.top) ){
918 XFillArc( gdi_display, physDev->drawable, physDev->gc,
919 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
920 ell_width, rc.bottom - rc.top - 1, 90 * 64, 180 * 64 );
921 XFillArc( gdi_display, physDev->drawable, physDev->gc,
922 physDev->dc_rect.left + rc.right - ell_width - 1, physDev->dc_rect.top + rc.top,
923 ell_width, rc.bottom - rc.top - 1, 270 * 64, 180 * 64 );
924 }else{
925 XFillArc( gdi_display, physDev->drawable, physDev->gc,
926 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
927 ell_width, ell_height, 90 * 64, 90 * 64 );
928 XFillArc( gdi_display, physDev->drawable, physDev->gc,
929 physDev->dc_rect.left + rc.left,
930 physDev->dc_rect.top + rc.bottom - ell_height - 1,
931 ell_width, ell_height, 180 * 64, 90 * 64 );
932 XFillArc( gdi_display, physDev->drawable, physDev->gc,
933 physDev->dc_rect.left + rc.right - ell_width - 1,
934 physDev->dc_rect.top + rc.bottom - ell_height - 1,
935 ell_width, ell_height, 270 * 64, 90 * 64 );
936 XFillArc( gdi_display, physDev->drawable, physDev->gc,
937 physDev->dc_rect.left + rc.right - ell_width - 1,
938 physDev->dc_rect.top + rc.top,
939 ell_width, ell_height, 0, 90 * 64 );
940 }
941 if (ell_width < rc.right - rc.left)
942 {
943 XFillRectangle( gdi_display, physDev->drawable, physDev->gc,
944 physDev->dc_rect.left + rc.left + (ell_width + 1) / 2,
945 physDev->dc_rect.top + rc.top + 1,
946 rc.right - rc.left - ell_width - 1,
947 (ell_height + 1) / 2 - 1);
948 XFillRectangle( gdi_display, physDev->drawable, physDev->gc,
949 physDev->dc_rect.left + rc.left + (ell_width + 1) / 2,
950 physDev->dc_rect.top + rc.bottom - (ell_height) / 2 - 1,
951 rc.right - rc.left - ell_width - 1,
952 (ell_height) / 2 );
953 }
954 if (ell_height < rc.bottom - rc.top)
955 {
956 XFillRectangle( gdi_display, physDev->drawable, physDev->gc,
957 physDev->dc_rect.left + rc.left + 1,
958 physDev->dc_rect.top + rc.top + (ell_height + 1) / 2,
959 rc.right - rc.left - 2,
960 rc.bottom - rc.top - ell_height - 1);
961 }
962 wine_tsx11_unlock();
963 update = TRUE;
964 }
965 /* FIXME: this could be done with on X call
966 * more efficient and probably more correct
967 * on any X server: XDrawArcs will draw
968 * straight horizontal and vertical lines
969 * if width or height are zero.
970 *
971 * BTW this stuff is optimized for an Xfree86 server
972 * read the comments inside the X11DRV_DrawArc function
973 */
974 if (X11DRV_SetupGCForPen( physDev ))
975 {
976 wine_tsx11_lock();
977 if (ell_width > (rc.right-rc.left) )
978 if (ell_height > (rc.bottom-rc.top) )
979 XDrawArc( gdi_display, physDev->drawable, physDev->gc,
980 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
981 rc.right - rc.left - 1, rc.bottom - rc.top - 1, 0 , 360 * 64 );
982 else{
983 XDrawArc( gdi_display, physDev->drawable, physDev->gc,
984 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
985 rc.right - rc.left - 1, ell_height - 1, 0 , 180 * 64 );
986 XDrawArc( gdi_display, physDev->drawable, physDev->gc,
987 physDev->dc_rect.left + rc.left,
988 physDev->dc_rect.top + rc.bottom - ell_height,
989 rc.right - rc.left - 1, ell_height - 1, 180 * 64 , 180 * 64 );
990 }
991 else if (ell_height > (rc.bottom-rc.top) ){
992 XDrawArc( gdi_display, physDev->drawable, physDev->gc,
993 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
994 ell_width - 1 , rc.bottom - rc.top - 1, 90 * 64 , 180 * 64 );
995 XDrawArc( gdi_display, physDev->drawable, physDev->gc,
996 physDev->dc_rect.left + rc.right - ell_width,
997 physDev->dc_rect.top + rc.top,
998 ell_width - 1 , rc.bottom - rc.top - 1, 270 * 64 , 180 * 64 );
999 }else{
1000 XDrawArc( gdi_display, physDev->drawable, physDev->gc,
1001 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.top,
1002 ell_width - 1, ell_height - 1, 90 * 64, 90 * 64 );
1003 XDrawArc( gdi_display, physDev->drawable, physDev->gc,
1004 physDev->dc_rect.left + rc.left, physDev->dc_rect.top + rc.bottom - ell_height,
1005 ell_width - 1, ell_height - 1, 180 * 64, 90 * 64 );
1006 XDrawArc( gdi_display, physDev->drawable, physDev->gc,
1007 physDev->dc_rect.left + rc.right - ell_width,
1008 physDev->dc_rect.top + rc.bottom - ell_height,
1009 ell_width - 1, ell_height - 1, 270 * 64, 90 * 64 );
1010 XDrawArc( gdi_display, physDev->drawable, physDev->gc,
1011 physDev->dc_rect.left + rc.right - ell_width, physDev->dc_rect.top + rc.top,
1012 ell_width - 1, ell_height - 1, 0, 90 * 64 );
1013 }
1014 if (ell_width < rc.right - rc.left)
1015 {
1016 XDrawLine( gdi_display, physDev->drawable, physDev->gc,
1017 physDev->dc_rect.left + rc.left + ell_width / 2,
1018 physDev->dc_rect.top + rc.top,
1019 physDev->dc_rect.left + rc.right - (ell_width+1) / 2,
1020 physDev->dc_rect.top + rc.top);
1021 XDrawLine( gdi_display, physDev->drawable, physDev->gc,
1022 physDev->dc_rect.left + rc.left + ell_width / 2 ,
1023 physDev->dc_rect.top + rc.bottom - 1,
1024 physDev->dc_rect.left + rc.right - (ell_width+1)/ 2,
1025 physDev->dc_rect.top + rc.bottom - 1);
1026 }
1027 if (ell_height < rc.bottom - rc.top)
1028 {
1029 XDrawLine( gdi_display, physDev->drawable, physDev->gc,
1030 physDev->dc_rect.left + rc.right - 1,
1031 physDev->dc_rect.top + rc.top + ell_height / 2,
1032 physDev->dc_rect.left + rc.right - 1,
1033 physDev->dc_rect.top + rc.bottom - (ell_height+1) / 2);
1034 XDrawLine( gdi_display, physDev->drawable, physDev->gc,
1035 physDev->dc_rect.left + rc.left,
1036 physDev->dc_rect.top + rc.top + ell_height / 2,
1037 physDev->dc_rect.left + rc.left,
1038 physDev->dc_rect.top + rc.bottom - (ell_height+1) / 2);
1039 }
1040 wine_tsx11_unlock();
1041 update = TRUE;
1042 }
1043 /* Update the DIBSection from the pixmap */
1044 X11DRV_UnlockDIBSection(physDev, update);
1045
1046 physDev->pen.width = oldwidth;
1047 physDev->pen.endcap = oldendcap;
1048 return TRUE;
1049 }
1050
1051
1052 /***********************************************************************
1053 * X11DRV_SetPixel
1054 */
1055 COLORREF X11DRV_SetPixel( PHYSDEV dev, INT x, INT y, COLORREF color )
1056 {
1057 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1058 unsigned long pixel;
1059 POINT pt;
1060
1061 pt.x = x;
1062 pt.y = y;
1063 LPtoDP( dev->hdc, &pt, 1 );
1064 pixel = X11DRV_PALETTE_ToPhysical( physDev, color );
1065
1066 /* Update the pixmap from the DIB section */
1067 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
1068
1069 /* inefficient but simple... */
1070 wine_tsx11_lock();
1071 XSetForeground( gdi_display, physDev->gc, pixel );
1072 XSetFunction( gdi_display, physDev->gc, GXcopy );
1073 XDrawPoint( gdi_display, physDev->drawable, physDev->gc,
1074 physDev->dc_rect.left + pt.x, physDev->dc_rect.top + pt.y );
1075 wine_tsx11_unlock();
1076
1077 /* Update the DIBSection from the pixmap */
1078 X11DRV_UnlockDIBSection(physDev, TRUE);
1079
1080 return X11DRV_PALETTE_ToLogical(physDev, pixel);
1081 }
1082
1083
1084 /***********************************************************************
1085 * X11DRV_GetPixel
1086 */
1087 COLORREF X11DRV_GetPixel( PHYSDEV dev, INT x, INT y )
1088 {
1089 static Pixmap pixmap = 0;
1090 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1091 XImage * image;
1092 int pixel;
1093 POINT pt;
1094 BOOL memdc = (GetObjectType(dev->hdc) == OBJ_MEMDC);
1095
1096 pt.x = x;
1097 pt.y = y;
1098 LPtoDP( dev->hdc, &pt, 1 );
1099
1100 /* Update the pixmap from the DIB section */
1101 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
1102
1103 wine_tsx11_lock();
1104 if (memdc)
1105 {
1106 image = XGetImage( gdi_display, physDev->drawable,
1107 physDev->dc_rect.left + pt.x, physDev->dc_rect.top + pt.y,
1108 1, 1, AllPlanes, ZPixmap );
1109 }
1110 else
1111 {
1112 /* If we are reading from the screen, use a temporary copy */
1113 /* to avoid a BadMatch error */
1114 if (!pixmap) pixmap = XCreatePixmap( gdi_display, root_window,
1115 1, 1, physDev->depth );
1116 XCopyArea( gdi_display, physDev->drawable, pixmap, get_bitmap_gc(physDev->depth),
1117 physDev->dc_rect.left + pt.x, physDev->dc_rect.top + pt.y, 1, 1, 0, 0 );
1118 image = XGetImage( gdi_display, pixmap, 0, 0, 1, 1, AllPlanes, ZPixmap );
1119 }
1120 pixel = XGetPixel( image, 0, 0 );
1121 XDestroyImage( image );
1122 wine_tsx11_unlock();
1123
1124 /* Update the DIBSection from the pixmap */
1125 X11DRV_UnlockDIBSection(physDev, FALSE);
1126 if( physDev->depth > 1)
1127 pixel = X11DRV_PALETTE_ToLogical(physDev, pixel);
1128 else
1129 /* monochrome bitmaps return black or white */
1130 if( pixel) pixel = 0xffffff;
1131 return pixel;
1132
1133 }
1134
1135
1136 /***********************************************************************
1137 * X11DRV_PaintRgn
1138 */
1139 BOOL X11DRV_PaintRgn( PHYSDEV dev, HRGN hrgn )
1140 {
1141 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1142
1143 if (X11DRV_SetupGCForBrush( physDev ))
1144 {
1145 unsigned int i;
1146 XRectangle *rect;
1147 RGNDATA *data = X11DRV_GetRegionData( hrgn, dev->hdc );
1148
1149 if (!data) return FALSE;
1150 rect = (XRectangle *)data->Buffer;
1151 for (i = 0; i < data->rdh.nCount; i++)
1152 {
1153 rect[i].x += physDev->dc_rect.left;
1154 rect[i].y += physDev->dc_rect.top;
1155 }
1156
1157 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
1158 wine_tsx11_lock();
1159 XFillRectangles( gdi_display, physDev->drawable, physDev->gc, rect, data->rdh.nCount );
1160 wine_tsx11_unlock();
1161 X11DRV_UnlockDIBSection(physDev, TRUE);
1162 HeapFree( GetProcessHeap(), 0, data );
1163 }
1164 return TRUE;
1165 }
1166
1167 /**********************************************************************
1168 * X11DRV_Polyline
1169 */
1170 BOOL X11DRV_Polyline( PHYSDEV dev, const POINT* pt, INT count )
1171 {
1172 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1173 int i;
1174 XPoint *points;
1175
1176 if (!(points = HeapAlloc( GetProcessHeap(), 0, sizeof(XPoint) * count )))
1177 {
1178 WARN("No memory to convert POINTs to XPoints!\n");
1179 return FALSE;
1180 }
1181 for (i = 0; i < count; i++)
1182 {
1183 POINT tmp = pt[i];
1184 LPtoDP(dev->hdc, &tmp, 1);
1185 points[i].x = physDev->dc_rect.left + tmp.x;
1186 points[i].y = physDev->dc_rect.top + tmp.y;
1187 }
1188
1189 if (X11DRV_SetupGCForPen ( physDev ))
1190 {
1191 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
1192 wine_tsx11_lock();
1193 XDrawLines( gdi_display, physDev->drawable, physDev->gc,
1194 points, count, CoordModeOrigin );
1195 wine_tsx11_unlock();
1196 X11DRV_UnlockDIBSection(physDev, TRUE);
1197 }
1198
1199 HeapFree( GetProcessHeap(), 0, points );
1200 return TRUE;
1201 }
1202
1203
1204 /**********************************************************************
1205 * X11DRV_Polygon
1206 */
1207 BOOL X11DRV_Polygon( PHYSDEV dev, const POINT* pt, INT count )
1208 {
1209 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1210 int i;
1211 XPoint *points;
1212 BOOL update = FALSE;
1213
1214 if (!(points = HeapAlloc( GetProcessHeap(), 0, sizeof(XPoint) * (count+1) )))
1215 {
1216 WARN("No memory to convert POINTs to XPoints!\n");
1217 return FALSE;
1218 }
1219 for (i = 0; i < count; i++)
1220 {
1221 POINT tmp = pt[i];
1222 LPtoDP(dev->hdc, &tmp, 1);
1223 points[i].x = physDev->dc_rect.left + tmp.x;
1224 points[i].y = physDev->dc_rect.top + tmp.y;
1225 }
1226 points[count] = points[0];
1227
1228 /* Update the pixmap from the DIB section */
1229 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
1230
1231 if (X11DRV_SetupGCForBrush( physDev ))
1232 {
1233 wine_tsx11_lock();
1234 XFillPolygon( gdi_display, physDev->drawable, physDev->gc,
1235 points, count+1, Complex, CoordModeOrigin);
1236 wine_tsx11_unlock();
1237 update = TRUE;
1238 }
1239 if (X11DRV_SetupGCForPen ( physDev ))
1240 {
1241 wine_tsx11_lock();
1242 XDrawLines( gdi_display, physDev->drawable, physDev->gc,
1243 points, count+1, CoordModeOrigin );
1244 wine_tsx11_unlock();
1245 update = TRUE;
1246 }
1247
1248 /* Update the DIBSection from the pixmap */
1249 X11DRV_UnlockDIBSection(physDev, update);
1250
1251 HeapFree( GetProcessHeap(), 0, points );
1252 return TRUE;
1253 }
1254
1255
1256 /**********************************************************************
1257 * X11DRV_PolyPolygon
1258 */
1259 BOOL X11DRV_PolyPolygon( PHYSDEV dev, const POINT* pt, const INT* counts, UINT polygons )
1260 {
1261 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1262 HRGN hrgn;
1263
1264 /* FIXME: The points should be converted to device coords before */
1265 /* creating the region. */
1266
1267 hrgn = CreatePolyPolygonRgn( pt, counts, polygons, GetPolyFillMode( dev->hdc ) );
1268 X11DRV_PaintRgn( dev, hrgn );
1269 DeleteObject( hrgn );
1270
1271 /* Draw the outline of the polygons */
1272
1273 if (X11DRV_SetupGCForPen ( physDev ))
1274 {
1275 unsigned int i;
1276 int j, max = 0;
1277 XPoint *points;
1278
1279 /* Update the pixmap from the DIB section */
1280 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
1281
1282 for (i = 0; i < polygons; i++) if (counts[i] > max) max = counts[i];
1283 if (!(points = HeapAlloc( GetProcessHeap(), 0, sizeof(XPoint) * (max+1) )))
1284 {
1285 WARN("No memory to convert POINTs to XPoints!\n");
1286 return FALSE;
1287 }
1288 for (i = 0; i < polygons; i++)
1289 {
1290 for (j = 0; j < counts[i]; j++)
1291 {
1292 POINT tmp = *pt;
1293 LPtoDP(dev->hdc, &tmp, 1);
1294 points[j].x = physDev->dc_rect.left + tmp.x;
1295 points[j].y = physDev->dc_rect.top + tmp.y;
1296 pt++;
1297 }
1298 points[j] = points[0];
1299 wine_tsx11_lock();
1300 XDrawLines( gdi_display, physDev->drawable, physDev->gc,
1301 points, j + 1, CoordModeOrigin );
1302 wine_tsx11_unlock();
1303 }
1304
1305 /* Update the DIBSection of the dc's bitmap */
1306 X11DRV_UnlockDIBSection(physDev, TRUE);
1307
1308 HeapFree( GetProcessHeap(), 0, points );
1309 }
1310 return TRUE;
1311 }
1312
1313
1314 /**********************************************************************
1315 * X11DRV_PolyPolyline
1316 */
1317 BOOL X11DRV_PolyPolyline( PHYSDEV dev, const POINT* pt, const DWORD* counts, DWORD polylines )
1318 {
1319 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1320
1321 if (X11DRV_SetupGCForPen ( physDev ))
1322 {
1323 unsigned int i, j, max = 0;
1324 XPoint *points;
1325
1326 /* Update the pixmap from the DIB section */
1327 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
1328
1329 for (i = 0; i < polylines; i++) if (counts[i] > max) max = counts[i];
1330 if (!(points = HeapAlloc( GetProcessHeap(), 0, sizeof(XPoint) * max )))
1331 {
1332 WARN("No memory to convert POINTs to XPoints!\n");
1333 return FALSE;
1334 }
1335 for (i = 0; i < polylines; i++)
1336 {
1337 for (j = 0; j < counts[i]; j++)
1338 {
1339 POINT tmp = *pt;
1340 LPtoDP(dev->hdc, &tmp, 1);
1341 points[j].x = physDev->dc_rect.left + tmp.x;
1342 points[j].y = physDev->dc_rect.top + tmp.y;
1343 pt++;
1344 }
1345 wine_tsx11_lock();
1346 XDrawLines( gdi_display, physDev->drawable, physDev->gc,
1347 points, j, CoordModeOrigin );
1348 wine_tsx11_unlock();
1349 }
1350
1351 /* Update the DIBSection of the dc's bitmap */
1352 X11DRV_UnlockDIBSection(physDev, TRUE);
1353
1354 HeapFree( GetProcessHeap(), 0, points );
1355 }
1356 return TRUE;
1357 }
1358
1359
1360 /**********************************************************************
1361 * X11DRV_InternalFloodFill
1362 *
1363 * Internal helper function for flood fill.
1364 * (xorg,yorg) is the origin of the X image relative to the drawable.
1365 * (x,y) is relative to the origin of the X image.
1366 */
1367 static void X11DRV_InternalFloodFill(XImage *image, X11DRV_PDEVICE *physDev,
1368 int x, int y,
1369 int xOrg, int yOrg,
1370 unsigned long pixel, WORD fillType )
1371 {
1372 int left, right;
1373
1374 #define TO_FLOOD(x,y) ((fillType == FLOODFILLBORDER) ? \
1375 (XGetPixel(image,x,y) != pixel) : \
1376 (XGetPixel(image,x,y) == pixel))
1377
1378 if (!TO_FLOOD(x,y)) return;
1379
1380 /* Find left and right boundaries */
1381
1382 left = right = x;
1383 while ((left > 0) && TO_FLOOD( left-1, y )) left--;
1384 while ((right < image->width) && TO_FLOOD( right, y )) right++;
1385 XFillRectangle( gdi_display, physDev->drawable, physDev->gc,
1386 xOrg + left, yOrg + y, right-left, 1 );
1387
1388 /* Set the pixels of this line so we don't fill it again */
1389
1390 for (x = left; x < right; x++)
1391 {
1392 if (fillType == FLOODFILLBORDER) XPutPixel( image, x, y, pixel );
1393 else XPutPixel( image, x, y, ~pixel );
1394 }
1395
1396 /* Fill the line above */
1397
1398 if (--y >= 0)
1399 {
1400 x = left;
1401 while (x < right)
1402 {
1403 while ((x < right) && !TO_FLOOD(x,y)) x++;
1404 if (x >= right) break;
1405 while ((x < right) && TO_FLOOD(x,y)) x++;
1406 X11DRV_InternalFloodFill(image, physDev, x-1, y,
1407 xOrg, yOrg, pixel, fillType );
1408 }
1409 }
1410
1411 /* Fill the line below */
1412
1413 if ((y += 2) < image->height)
1414 {
1415 x = left;
1416 while (x < right)
1417 {
1418 while ((x < right) && !TO_FLOOD(x,y)) x++;
1419 if (x >= right) break;
1420 while ((x < right) && TO_FLOOD(x,y)) x++;
1421 X11DRV_InternalFloodFill(image, physDev, x-1, y,
1422 xOrg, yOrg, pixel, fillType );
1423 }
1424 }
1425 #undef TO_FLOOD
1426 }
1427
1428
1429 static int ExtFloodFillXGetImageErrorHandler( Display *dpy, XErrorEvent *event, void *arg )
1430 {
1431 return (event->request_code == X_GetImage && event->error_code == BadMatch);
1432 }
1433
1434 /**********************************************************************
1435 * X11DRV_ExtFloodFill
1436 */
1437 BOOL X11DRV_ExtFloodFill( PHYSDEV dev, INT x, INT y, COLORREF color, UINT fillType )
1438 {
1439 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1440 XImage *image;
1441 RECT rect;
1442 POINT pt;
1443
1444 TRACE("X11DRV_ExtFloodFill %d,%d %06x %d\n", x, y, color, fillType );
1445
1446 pt.x = x;
1447 pt.y = y;
1448 LPtoDP( dev->hdc, &pt, 1 );
1449 if (!PtInRegion( physDev->region, pt.x, pt.y )) return FALSE;
1450 GetRgnBox( physDev->region, &rect );
1451
1452 X11DRV_expect_error( gdi_display, ExtFloodFillXGetImageErrorHandler, NULL );
1453 image = XGetImage( gdi_display, physDev->drawable,
1454 physDev->dc_rect.left + rect.left, physDev->dc_rect.top + rect.top,
1455 rect.right - rect.left, rect.bottom - rect.top,
1456 AllPlanes, ZPixmap );
1457 if(X11DRV_check_error()) image = NULL;
1458 if (!image) return FALSE;
1459
1460 if (X11DRV_SetupGCForBrush( physDev ))
1461 {
1462 unsigned long pixel = X11DRV_PALETTE_ToPhysical( physDev, color );
1463
1464 /* Update the pixmap from the DIB section */
1465 X11DRV_LockDIBSection(physDev, DIB_Status_GdiMod);
1466
1467 /* ROP mode is always GXcopy for flood-fill */
1468 wine_tsx11_lock();
1469 XSetFunction( gdi_display, physDev->gc, GXcopy );
1470 X11DRV_InternalFloodFill(image, physDev,
1471 pt.x - rect.left,
1472 pt.y - rect.top,
1473 physDev->dc_rect.left + rect.left,
1474 physDev->dc_rect.top + rect.top,
1475 pixel, fillType );
1476 wine_tsx11_unlock();
1477 /* Update the DIBSection of the dc's bitmap */
1478 X11DRV_UnlockDIBSection(physDev, TRUE);
1479 }
1480
1481 wine_tsx11_lock();
1482 XDestroyImage( image );
1483 wine_tsx11_unlock();
1484 return TRUE;
1485 }
1486
1487 /**********************************************************************
1488 * X11DRV_SetBkColor
1489 */
1490 COLORREF X11DRV_SetBkColor( PHYSDEV dev, COLORREF color )
1491 {
1492 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1493
1494 physDev->backgroundPixel = X11DRV_PALETTE_ToPhysical( physDev, color );
1495 return color;
1496 }
1497
1498 /**********************************************************************
1499 * X11DRV_SetTextColor
1500 */
1501 COLORREF X11DRV_SetTextColor( PHYSDEV dev, COLORREF color )
1502 {
1503 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1504
1505 physDev->textPixel = X11DRV_PALETTE_ToPhysical( physDev, color );
1506 return color;
1507 }
1508
1509
1510 static unsigned char *get_icm_profile( unsigned long *size )
1511 {
1512 Atom type;
1513 int format;
1514 unsigned long count, remaining;
1515 unsigned char *profile, *ret = NULL;
1516
1517 wine_tsx11_lock();
1518 XGetWindowProperty( gdi_display, DefaultRootWindow(gdi_display),
1519 x11drv_atom(_ICC_PROFILE), 0, ~0UL, False, AnyPropertyType,
1520 &type, &format, &count, &remaining, &profile );
1521 *size = get_property_size( format, count );
1522 if (format && count)
1523 {
1524 if ((ret = HeapAlloc( GetProcessHeap(), 0, *size ))) memcpy( ret, profile, *size );
1525 XFree( profile );
1526 }
1527 wine_tsx11_unlock();
1528 return ret;
1529 }
1530
1531 typedef struct
1532 {
1533 unsigned int unknown[6];
1534 unsigned int state[5];
1535 unsigned int count[2];
1536 unsigned char buffer[64];
1537 } sha_ctx;
1538
1539 extern void WINAPI A_SHAInit( sha_ctx * );
1540 extern void WINAPI A_SHAUpdate( sha_ctx *, const unsigned char *, unsigned int );
1541 extern void WINAPI A_SHAFinal( sha_ctx *, unsigned char * );
1542
1543 static const WCHAR mntr_key[] =
1544 {'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
1545 'W','i','n','d','o','w','s',' ','N','T','\\','C','u','r','r','e','n','t',
1546 'V','e','r','s','i','o','n','\\','I','C','M','\\','m','n','t','r',0};
1547
1548 static const WCHAR color_path[] =
1549 {'\\','s','p','o','o','l','\\','d','r','i','v','e','r','s','\\','c','o','l','o','r','\\',0};
1550
1551 /***********************************************************************
1552 * GetICMProfile (X11DRV.@)
1553 */
1554 BOOL X11DRV_GetICMProfile( PHYSDEV dev, LPDWORD size, LPWSTR filename )
1555 {
1556 static const WCHAR srgb[] =
1557 {'s','R','G','B',' ','C','o','l','o','r',' ','S','p','a','c','e',' ',
1558 'P','r','o','f','i','l','e','.','i','c','m',0};
1559 HKEY hkey;
1560 DWORD required, len;
1561 WCHAR profile[MAX_PATH], fullname[2*MAX_PATH + sizeof(color_path)/sizeof(WCHAR)];
1562 unsigned char *buffer;
1563 unsigned long buflen;
1564
1565 if (!size) return FALSE;
1566
1567 GetSystemDirectoryW( fullname, MAX_PATH );
1568 strcatW( fullname, color_path );
1569
1570 len = sizeof(profile)/sizeof(WCHAR);
1571 if (!RegCreateKeyExW( HKEY_LOCAL_MACHINE, mntr_key, 0, NULL, 0, KEY_ALL_ACCESS, NULL, &hkey, NULL ) &&
1572 !RegEnumValueW( hkey, 0, profile, &len, NULL, NULL, NULL, NULL )) /* FIXME handle multiple values */
1573 {
1574 strcatW( fullname, profile );
1575 RegCloseKey( hkey );
1576 }
1577 else if ((buffer = get_icm_profile( &buflen )))
1578 {
1579 static const WCHAR fmt[] = {'%','0','2','x',0};
1580 static const WCHAR icm[] = {'.','i','c','m',0};
1581
1582 unsigned char sha1sum[20];
1583 unsigned int i;
1584 sha_ctx ctx;
1585 HANDLE file;
1586
1587 A_SHAInit( &ctx );
1588 A_SHAUpdate( &ctx, buffer, buflen );
1589 A_SHAFinal( &ctx, sha1sum );
1590
1591 for (i = 0; i < sizeof(sha1sum); i++) sprintfW( &profile[i * 2], fmt, sha1sum[i] );
1592 memcpy( &profile[i * 2], icm, sizeof(icm) );
1593
1594 strcatW( fullname, profile );
1595 file = CreateFileW( fullname, GENERIC_WRITE, 0, NULL, CREATE_NEW, 0, 0 );
1596 if (file != INVALID_HANDLE_VALUE)
1597 {
1598 DWORD written;
1599
1600 if (!WriteFile( file, buffer, buflen, &written, NULL ) || written != buflen)
1601 ERR( "Unable to write color profile\n" );
1602 CloseHandle( file );
1603 }
1604 HeapFree( GetProcessHeap(), 0, buffer );
1605 }
1606 else strcatW( fullname, srgb );
1607
1608 required = strlenW( fullname ) + 1;
1609 if (*size < required)
1610 {
1611 *size = required;
1612 SetLastError( ERROR_INSUFFICIENT_BUFFER );
1613 return FALSE;
1614 }
1615 if (filename)
1616 {
1617 strcpyW( filename, fullname );
1618 if (GetFileAttributesW( filename ) == INVALID_FILE_ATTRIBUTES)
1619 WARN( "color profile not found\n" );
1620 }
1621 *size = required;
1622 return TRUE;
1623 }
1624
1625 /***********************************************************************
1626 * EnumICMProfiles (X11DRV.@)
1627 */
1628 INT X11DRV_EnumICMProfiles( PHYSDEV dev, ICMENUMPROCW proc, LPARAM lparam )
1629 {
1630 X11DRV_PDEVICE *physDev = get_x11drv_dev( dev );
1631 HKEY hkey;
1632 DWORD len_sysdir, len_path, len, index = 0;
1633 WCHAR sysdir[MAX_PATH], *profile;
1634 LONG res;
1635 INT ret;
1636
1637 TRACE("%p, %p, %ld\n", physDev, proc, lparam);
1638
1639 if (RegOpenKeyExW( HKEY_LOCAL_MACHINE, mntr_key, 0, KEY_ALL_ACCESS, &hkey ))
1640 return -1;
1641
1642 len_sysdir = GetSystemDirectoryW( sysdir, MAX_PATH );
1643 len_path = len_sysdir + sizeof(color_path) / sizeof(color_path[0]) - 1;
1644 len = 64;
1645 for (;;)
1646 {
1647 if (!(profile = HeapAlloc( GetProcessHeap(), 0, (len_path + len) * sizeof(WCHAR) )))
1648 {
1649 RegCloseKey( hkey );
1650 return -1;
1651 }
1652 res = RegEnumValueW( hkey, index, profile + len_path, &len, NULL, NULL, NULL, NULL );
1653 while (res == ERROR_MORE_DATA)
1654 {
1655 len *= 2;
1656 HeapFree( GetProcessHeap(), 0, profile );
1657 if (!(profile = HeapAlloc( GetProcessHeap(), 0, (len_path + len) * sizeof(WCHAR) )))
1658 {
1659 RegCloseKey( hkey );
1660 return -1;
1661 }
1662 res = RegEnumValueW( hkey, index, profile + len_path, &len, NULL, NULL, NULL, NULL );
1663 }
1664 if (res != ERROR_SUCCESS)
1665 {
1666 HeapFree( GetProcessHeap(), 0, profile );
1667 break;
1668 }
1669 memcpy( profile, sysdir, len_sysdir * sizeof(WCHAR) );
1670 memcpy( profile + len_sysdir, color_path, sizeof(color_path) - sizeof(WCHAR) );
1671 ret = proc( profile, lparam );
1672 HeapFree( GetProcessHeap(), 0, profile );
1673 if (!ret) break;
1674 index++;
1675 }
1676 RegCloseKey( hkey );
1677 return -1;
1678 }
Maarten's multimedia branch