dmusic: COM cleanup of IDirectMusic8.
[wine] / dlls / gdiplus / graphics.c
1 /*
2  * Copyright (C) 2007 Google (Evan Stade)
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17  */
18
19 #include <stdarg.h>
20 #include <math.h>
21 #include <limits.h>
22
23 #include "windef.h"
24 #include "winbase.h"
25 #include "winuser.h"
26 #include "wingdi.h"
27 #include "wine/unicode.h"
28
29 #define COBJMACROS
30 #include "objbase.h"
31 #include "ocidl.h"
32 #include "olectl.h"
33 #include "ole2.h"
34
35 #include "winreg.h"
36 #include "shlwapi.h"
37
38 #include "gdiplus.h"
39 #include "gdiplus_private.h"
40 #include "wine/debug.h"
41 #include "wine/list.h"
42
43 WINE_DEFAULT_DEBUG_CHANNEL(gdiplus);
44
45 /* looks-right constants */
46 #define ANCHOR_WIDTH (2.0)
47 #define MAX_ITERS (50)
48
49 /* Converts angle (in degrees) to x/y coordinates */
50 static void deg2xy(REAL angle, REAL x_0, REAL y_0, REAL *x, REAL *y)
51 {
52     REAL radAngle, hypotenuse;
53
54     radAngle = deg2rad(angle);
55     hypotenuse = 50.0; /* arbitrary */
56
57     *x = x_0 + cos(radAngle) * hypotenuse;
58     *y = y_0 + sin(radAngle) * hypotenuse;
59 }
60
61 /* Converts from gdiplus path point type to gdi path point type. */
62 static BYTE convert_path_point_type(BYTE type)
63 {
64     BYTE ret;
65
66     switch(type & PathPointTypePathTypeMask){
67         case PathPointTypeBezier:
68             ret = PT_BEZIERTO;
69             break;
70         case PathPointTypeLine:
71             ret = PT_LINETO;
72             break;
73         case PathPointTypeStart:
74             ret = PT_MOVETO;
75             break;
76         default:
77             ERR("Bad point type\n");
78             return 0;
79     }
80
81     if(type & PathPointTypeCloseSubpath)
82         ret |= PT_CLOSEFIGURE;
83
84     return ret;
85 }
86
87 static REAL graphics_res(GpGraphics *graphics)
88 {
89     if (graphics->image) return graphics->image->xres;
90     else return (REAL)GetDeviceCaps(graphics->hdc, LOGPIXELSX);
91 }
92
93 static COLORREF get_gdi_brush_color(const GpBrush *brush)
94 {
95     ARGB argb;
96
97     switch (brush->bt)
98     {
99         case BrushTypeSolidColor:
100         {
101             const GpSolidFill *sf = (const GpSolidFill *)brush;
102             argb = sf->color;
103             break;
104         }
105         case BrushTypeHatchFill:
106         {
107             const GpHatch *hatch = (const GpHatch *)brush;
108             argb = hatch->forecol;
109             break;
110         }
111         case BrushTypeLinearGradient:
112         {
113             const GpLineGradient *line = (const GpLineGradient *)brush;
114             argb = line->startcolor;
115             break;
116         }
117         case BrushTypePathGradient:
118         {
119             const GpPathGradient *grad = (const GpPathGradient *)brush;
120             argb = grad->centercolor;
121             break;
122         }
123         default:
124             FIXME("unhandled brush type %d\n", brush->bt);
125             argb = 0;
126             break;
127     }
128     return ARGB2COLORREF(argb);
129 }
130
131 static HBITMAP create_hatch_bitmap(const GpHatch *hatch)
132 {
133     HBITMAP hbmp;
134     BITMAPINFOHEADER bmih;
135     DWORD *bits;
136     int x, y;
137
138     bmih.biSize = sizeof(bmih);
139     bmih.biWidth = 8;
140     bmih.biHeight = 8;
141     bmih.biPlanes = 1;
142     bmih.biBitCount = 32;
143     bmih.biCompression = BI_RGB;
144     bmih.biSizeImage = 0;
145
146     hbmp = CreateDIBSection(0, (BITMAPINFO *)&bmih, DIB_RGB_COLORS, (void **)&bits, NULL, 0);
147     if (hbmp)
148     {
149         const char *hatch_data;
150
151         if (get_hatch_data(hatch->hatchstyle, &hatch_data) == Ok)
152         {
153             for (y = 0; y < 8; y++)
154             {
155                 for (x = 0; x < 8; x++)
156                 {
157                     if (hatch_data[y] & (0x80 >> x))
158                         bits[y * 8 + x] = hatch->forecol;
159                     else
160                         bits[y * 8 + x] = hatch->backcol;
161                 }
162             }
163         }
164         else
165         {
166             FIXME("Unimplemented hatch style %d\n", hatch->hatchstyle);
167
168             for (y = 0; y < 64; y++)
169                 bits[y] = hatch->forecol;
170         }
171     }
172
173     return hbmp;
174 }
175
176 static GpStatus create_gdi_logbrush(const GpBrush *brush, LOGBRUSH *lb)
177 {
178     switch (brush->bt)
179     {
180         case BrushTypeSolidColor:
181         {
182             const GpSolidFill *sf = (const GpSolidFill *)brush;
183             lb->lbStyle = BS_SOLID;
184             lb->lbColor = ARGB2COLORREF(sf->color);
185             lb->lbHatch = 0;
186             return Ok;
187         }
188
189         case BrushTypeHatchFill:
190         {
191             const GpHatch *hatch = (const GpHatch *)brush;
192             HBITMAP hbmp;
193
194             hbmp = create_hatch_bitmap(hatch);
195             if (!hbmp) return OutOfMemory;
196
197             lb->lbStyle = BS_PATTERN;
198             lb->lbColor = 0;
199             lb->lbHatch = (ULONG_PTR)hbmp;
200             return Ok;
201         }
202
203         default:
204             FIXME("unhandled brush type %d\n", brush->bt);
205             lb->lbStyle = BS_SOLID;
206             lb->lbColor = get_gdi_brush_color(brush);
207             lb->lbHatch = 0;
208             return Ok;
209     }
210 }
211
212 static GpStatus free_gdi_logbrush(LOGBRUSH *lb)
213 {
214     switch (lb->lbStyle)
215     {
216         case BS_PATTERN:
217             DeleteObject((HGDIOBJ)(ULONG_PTR)lb->lbHatch);
218             break;
219     }
220     return Ok;
221 }
222
223 static HBRUSH create_gdi_brush(const GpBrush *brush)
224 {
225     LOGBRUSH lb;
226     HBRUSH gdibrush;
227
228     if (create_gdi_logbrush(brush, &lb) != Ok) return 0;
229
230     gdibrush = CreateBrushIndirect(&lb);
231     free_gdi_logbrush(&lb);
232
233     return gdibrush;
234 }
235
236 static INT prepare_dc(GpGraphics *graphics, GpPen *pen)
237 {
238     LOGBRUSH lb;
239     HPEN gdipen;
240     REAL width;
241     INT save_state, i, numdashes;
242     GpPointF pt[2];
243     DWORD dash_array[MAX_DASHLEN];
244
245     save_state = SaveDC(graphics->hdc);
246
247     EndPath(graphics->hdc);
248
249     if(pen->unit == UnitPixel){
250         width = pen->width;
251     }
252     else{
253         /* Get an estimate for the amount the pen width is affected by the world
254          * transform. (This is similar to what some of the wine drivers do.) */
255         pt[0].X = 0.0;
256         pt[0].Y = 0.0;
257         pt[1].X = 1.0;
258         pt[1].Y = 1.0;
259         GdipTransformMatrixPoints(graphics->worldtrans, pt, 2);
260         width = sqrt((pt[1].X - pt[0].X) * (pt[1].X - pt[0].X) +
261                      (pt[1].Y - pt[0].Y) * (pt[1].Y - pt[0].Y)) / sqrt(2.0);
262
263         width *= pen->width * convert_unit(graphics_res(graphics),
264                               pen->unit == UnitWorld ? graphics->unit : pen->unit);
265     }
266
267     if(pen->dash == DashStyleCustom){
268         numdashes = min(pen->numdashes, MAX_DASHLEN);
269
270         TRACE("dashes are: ");
271         for(i = 0; i < numdashes; i++){
272             dash_array[i] = roundr(width * pen->dashes[i]);
273             TRACE("%d, ", dash_array[i]);
274         }
275         TRACE("\n and the pen style is %x\n", pen->style);
276
277         create_gdi_logbrush(pen->brush, &lb);
278         gdipen = ExtCreatePen(pen->style, roundr(width), &lb,
279                               numdashes, dash_array);
280         free_gdi_logbrush(&lb);
281     }
282     else
283     {
284         create_gdi_logbrush(pen->brush, &lb);
285         gdipen = ExtCreatePen(pen->style, roundr(width), &lb, 0, NULL);
286         free_gdi_logbrush(&lb);
287     }
288
289     SelectObject(graphics->hdc, gdipen);
290
291     return save_state;
292 }
293
294 static void restore_dc(GpGraphics *graphics, INT state)
295 {
296     DeleteObject(SelectObject(graphics->hdc, GetStockObject(NULL_PEN)));
297     RestoreDC(graphics->hdc, state);
298 }
299
300 static GpStatus get_graphics_transform(GpGraphics *graphics, GpCoordinateSpace dst_space,
301         GpCoordinateSpace src_space, GpMatrix **matrix);
302
303 /* This helper applies all the changes that the points listed in ptf need in
304  * order to be drawn on the device context.  In the end, this should include at
305  * least:
306  *  -scaling by page unit
307  *  -applying world transformation
308  *  -converting from float to int
309  * Native gdiplus uses gdi32 to do all this (via SetMapMode, SetViewportExtEx,
310  * SetWindowExtEx, SetWorldTransform, etc.) but we cannot because we are using
311  * gdi to draw, and these functions would irreparably mess with line widths.
312  */
313 static void transform_and_round_points(GpGraphics *graphics, POINT *pti,
314     GpPointF *ptf, INT count)
315 {
316     REAL unitscale;
317     GpMatrix *matrix;
318     int i;
319
320     unitscale = convert_unit(graphics_res(graphics), graphics->unit);
321
322     /* apply page scale */
323     if(graphics->unit != UnitDisplay)
324         unitscale *= graphics->scale;
325
326     GdipCloneMatrix(graphics->worldtrans, &matrix);
327     GdipScaleMatrix(matrix, unitscale, unitscale, MatrixOrderAppend);
328     GdipTransformMatrixPoints(matrix, ptf, count);
329     GdipDeleteMatrix(matrix);
330
331     for(i = 0; i < count; i++){
332         pti[i].x = roundr(ptf[i].X);
333         pti[i].y = roundr(ptf[i].Y);
334     }
335 }
336
337 static void gdi_alpha_blend(GpGraphics *graphics, INT dst_x, INT dst_y, INT dst_width, INT dst_height,
338                             HDC hdc, INT src_x, INT src_y, INT src_width, INT src_height)
339 {
340     if (GetDeviceCaps(graphics->hdc, SHADEBLENDCAPS) == SB_NONE)
341     {
342         TRACE("alpha blending not supported by device, fallback to StretchBlt\n");
343
344         StretchBlt(graphics->hdc, dst_x, dst_y, dst_width, dst_height,
345                    hdc, src_x, src_y, src_width, src_height, SRCCOPY);
346     }
347     else
348     {
349         BLENDFUNCTION bf;
350
351         bf.BlendOp = AC_SRC_OVER;
352         bf.BlendFlags = 0;
353         bf.SourceConstantAlpha = 255;
354         bf.AlphaFormat = AC_SRC_ALPHA;
355
356         GdiAlphaBlend(graphics->hdc, dst_x, dst_y, dst_width, dst_height,
357                       hdc, src_x, src_y, src_width, src_height, bf);
358     }
359 }
360
361 /* Draw non-premultiplied ARGB data to the given graphics object */
362 static GpStatus alpha_blend_pixels(GpGraphics *graphics, INT dst_x, INT dst_y,
363     const BYTE *src, INT src_width, INT src_height, INT src_stride)
364 {
365     if (graphics->image && graphics->image->type == ImageTypeBitmap)
366     {
367         GpBitmap *dst_bitmap = (GpBitmap*)graphics->image;
368         INT x, y;
369
370         for (x=0; x<src_width; x++)
371         {
372             for (y=0; y<src_height; y++)
373             {
374                 ARGB dst_color, src_color;
375                 GdipBitmapGetPixel(dst_bitmap, x+dst_x, y+dst_y, &dst_color);
376                 src_color = ((ARGB*)(src + src_stride * y))[x];
377                 GdipBitmapSetPixel(dst_bitmap, x+dst_x, y+dst_y, color_over(dst_color, src_color));
378             }
379         }
380
381         return Ok;
382     }
383     else if (graphics->image && graphics->image->type == ImageTypeMetafile)
384     {
385         ERR("This should not be used for metafiles; fix caller\n");
386         return NotImplemented;
387     }
388     else
389     {
390         HDC hdc;
391         HBITMAP hbitmap;
392         BITMAPINFOHEADER bih;
393         BYTE *temp_bits;
394
395         hdc = CreateCompatibleDC(0);
396
397         bih.biSize = sizeof(BITMAPINFOHEADER);
398         bih.biWidth = src_width;
399         bih.biHeight = -src_height;
400         bih.biPlanes = 1;
401         bih.biBitCount = 32;
402         bih.biCompression = BI_RGB;
403         bih.biSizeImage = 0;
404         bih.biXPelsPerMeter = 0;
405         bih.biYPelsPerMeter = 0;
406         bih.biClrUsed = 0;
407         bih.biClrImportant = 0;
408
409         hbitmap = CreateDIBSection(hdc, (BITMAPINFO*)&bih, DIB_RGB_COLORS,
410             (void**)&temp_bits, NULL, 0);
411
412         convert_32bppARGB_to_32bppPARGB(src_width, src_height, temp_bits,
413             4 * src_width, src, src_stride);
414
415         SelectObject(hdc, hbitmap);
416         gdi_alpha_blend(graphics, dst_x, dst_y, src_width, src_height,
417                         hdc, 0, 0, src_width, src_height);
418         DeleteDC(hdc);
419         DeleteObject(hbitmap);
420
421         return Ok;
422     }
423 }
424
425 static GpStatus alpha_blend_pixels_hrgn(GpGraphics *graphics, INT dst_x, INT dst_y,
426     const BYTE *src, INT src_width, INT src_height, INT src_stride, HRGN hregion)
427 {
428     GpStatus stat=Ok;
429
430     if (graphics->image && graphics->image->type == ImageTypeBitmap)
431     {
432         int i, size;
433         RGNDATA *rgndata;
434         RECT *rects;
435
436         size = GetRegionData(hregion, 0, NULL);
437
438         rgndata = GdipAlloc(size);
439         if (!rgndata)
440             return OutOfMemory;
441
442         GetRegionData(hregion, size, rgndata);
443
444         rects = (RECT*)&rgndata->Buffer;
445
446         for (i=0; stat == Ok && i<rgndata->rdh.nCount; i++)
447         {
448             stat = alpha_blend_pixels(graphics, rects[i].left, rects[i].top,
449                 &src[(rects[i].left - dst_x) * 4 + (rects[i].top - dst_y) * src_stride],
450                 rects[i].right - rects[i].left, rects[i].bottom - rects[i].top,
451                 src_stride);
452         }
453
454         GdipFree(rgndata);
455
456         return stat;
457     }
458     else if (graphics->image && graphics->image->type == ImageTypeMetafile)
459     {
460         ERR("This should not be used for metafiles; fix caller\n");
461         return NotImplemented;
462     }
463     else
464     {
465         int save;
466
467         save = SaveDC(graphics->hdc);
468
469         ExtSelectClipRgn(graphics->hdc, hregion, RGN_AND);
470
471         stat = alpha_blend_pixels(graphics, dst_x, dst_y, src, src_width,
472             src_height, src_stride);
473
474         RestoreDC(graphics->hdc, save);
475
476         return stat;
477     }
478 }
479
480 static ARGB blend_colors(ARGB start, ARGB end, REAL position)
481 {
482     ARGB result=0;
483     ARGB i;
484     INT a1, a2, a3;
485
486     a1 = (start >> 24) & 0xff;
487     a2 = (end >> 24) & 0xff;
488
489     a3 = (int)(a1*(1.0f - position)+a2*(position));
490
491     result |= a3 << 24;
492
493     for (i=0xff; i<=0xff0000; i = i << 8)
494         result |= (int)((start&i)*(1.0f - position)+(end&i)*(position))&i;
495     return result;
496 }
497
498 static ARGB blend_line_gradient(GpLineGradient* brush, REAL position)
499 {
500     REAL blendfac;
501
502     /* clamp to between 0.0 and 1.0, using the wrap mode */
503     if (brush->wrap == WrapModeTile)
504     {
505         position = fmodf(position, 1.0f);
506         if (position < 0.0f) position += 1.0f;
507     }
508     else /* WrapModeFlip* */
509     {
510         position = fmodf(position, 2.0f);
511         if (position < 0.0f) position += 2.0f;
512         if (position > 1.0f) position = 2.0f - position;
513     }
514
515     if (brush->blendcount == 1)
516         blendfac = position;
517     else
518     {
519         int i=1;
520         REAL left_blendpos, left_blendfac, right_blendpos, right_blendfac;
521         REAL range;
522
523         /* locate the blend positions surrounding this position */
524         while (position > brush->blendpos[i])
525             i++;
526
527         /* interpolate between the blend positions */
528         left_blendpos = brush->blendpos[i-1];
529         left_blendfac = brush->blendfac[i-1];
530         right_blendpos = brush->blendpos[i];
531         right_blendfac = brush->blendfac[i];
532         range = right_blendpos - left_blendpos;
533         blendfac = (left_blendfac * (right_blendpos - position) +
534                     right_blendfac * (position - left_blendpos)) / range;
535     }
536
537     if (brush->pblendcount == 0)
538         return blend_colors(brush->startcolor, brush->endcolor, blendfac);
539     else
540     {
541         int i=1;
542         ARGB left_blendcolor, right_blendcolor;
543         REAL left_blendpos, right_blendpos;
544
545         /* locate the blend colors surrounding this position */
546         while (blendfac > brush->pblendpos[i])
547             i++;
548
549         /* interpolate between the blend colors */
550         left_blendpos = brush->pblendpos[i-1];
551         left_blendcolor = brush->pblendcolor[i-1];
552         right_blendpos = brush->pblendpos[i];
553         right_blendcolor = brush->pblendcolor[i];
554         blendfac = (blendfac - left_blendpos) / (right_blendpos - left_blendpos);
555         return blend_colors(left_blendcolor, right_blendcolor, blendfac);
556     }
557 }
558
559 static ARGB transform_color(ARGB color, const ColorMatrix *matrix)
560 {
561     REAL val[5], res[4];
562     int i, j;
563     unsigned char a, r, g, b;
564
565     val[0] = ((color >> 16) & 0xff) / 255.0; /* red */
566     val[1] = ((color >> 8) & 0xff) / 255.0; /* green */
567     val[2] = (color & 0xff) / 255.0; /* blue */
568     val[3] = ((color >> 24) & 0xff) / 255.0; /* alpha */
569     val[4] = 1.0; /* translation */
570
571     for (i=0; i<4; i++)
572     {
573         res[i] = 0.0;
574
575         for (j=0; j<5; j++)
576             res[i] += matrix->m[j][i] * val[j];
577     }
578
579     a = min(max(floorf(res[3]*255.0), 0.0), 255.0);
580     r = min(max(floorf(res[0]*255.0), 0.0), 255.0);
581     g = min(max(floorf(res[1]*255.0), 0.0), 255.0);
582     b = min(max(floorf(res[2]*255.0), 0.0), 255.0);
583
584     return (a << 24) | (r << 16) | (g << 8) | b;
585 }
586
587 static int color_is_gray(ARGB color)
588 {
589     unsigned char r, g, b;
590
591     r = (color >> 16) & 0xff;
592     g = (color >> 8) & 0xff;
593     b = color & 0xff;
594
595     return (r == g) && (g == b);
596 }
597
598 static void apply_image_attributes(const GpImageAttributes *attributes, LPBYTE data,
599     UINT width, UINT height, INT stride, ColorAdjustType type)
600 {
601     UINT x, y, i;
602
603     if (attributes->colorkeys[type].enabled ||
604         attributes->colorkeys[ColorAdjustTypeDefault].enabled)
605     {
606         const struct color_key *key;
607         BYTE min_blue, min_green, min_red;
608         BYTE max_blue, max_green, max_red;
609
610         if (attributes->colorkeys[type].enabled)
611             key = &attributes->colorkeys[type];
612         else
613             key = &attributes->colorkeys[ColorAdjustTypeDefault];
614
615         min_blue = key->low&0xff;
616         min_green = (key->low>>8)&0xff;
617         min_red = (key->low>>16)&0xff;
618
619         max_blue = key->high&0xff;
620         max_green = (key->high>>8)&0xff;
621         max_red = (key->high>>16)&0xff;
622
623         for (x=0; x<width; x++)
624             for (y=0; y<height; y++)
625             {
626                 ARGB *src_color;
627                 BYTE blue, green, red;
628                 src_color = (ARGB*)(data + stride * y + sizeof(ARGB) * x);
629                 blue = *src_color&0xff;
630                 green = (*src_color>>8)&0xff;
631                 red = (*src_color>>16)&0xff;
632                 if (blue >= min_blue && green >= min_green && red >= min_red &&
633                     blue <= max_blue && green <= max_green && red <= max_red)
634                     *src_color = 0x00000000;
635             }
636     }
637
638     if (attributes->colorremaptables[type].enabled ||
639         attributes->colorremaptables[ColorAdjustTypeDefault].enabled)
640     {
641         const struct color_remap_table *table;
642
643         if (attributes->colorremaptables[type].enabled)
644             table = &attributes->colorremaptables[type];
645         else
646             table = &attributes->colorremaptables[ColorAdjustTypeDefault];
647
648         for (x=0; x<width; x++)
649             for (y=0; y<height; y++)
650             {
651                 ARGB *src_color;
652                 src_color = (ARGB*)(data + stride * y + sizeof(ARGB) * x);
653                 for (i=0; i<table->mapsize; i++)
654                 {
655                     if (*src_color == table->colormap[i].oldColor.Argb)
656                     {
657                         *src_color = table->colormap[i].newColor.Argb;
658                         break;
659                     }
660                 }
661             }
662     }
663
664     if (attributes->colormatrices[type].enabled ||
665         attributes->colormatrices[ColorAdjustTypeDefault].enabled)
666     {
667         const struct color_matrix *colormatrices;
668
669         if (attributes->colormatrices[type].enabled)
670             colormatrices = &attributes->colormatrices[type];
671         else
672             colormatrices = &attributes->colormatrices[ColorAdjustTypeDefault];
673
674         for (x=0; x<width; x++)
675             for (y=0; y<height; y++)
676             {
677                 ARGB *src_color;
678                 src_color = (ARGB*)(data + stride * y + sizeof(ARGB) * x);
679
680                 if (colormatrices->flags == ColorMatrixFlagsDefault ||
681                     !color_is_gray(*src_color))
682                 {
683                     *src_color = transform_color(*src_color, &colormatrices->colormatrix);
684                 }
685                 else if (colormatrices->flags == ColorMatrixFlagsAltGray)
686                 {
687                     *src_color = transform_color(*src_color, &colormatrices->graymatrix);
688                 }
689             }
690     }
691
692     if (attributes->gamma_enabled[type] ||
693         attributes->gamma_enabled[ColorAdjustTypeDefault])
694     {
695         REAL gamma;
696
697         if (attributes->gamma_enabled[type])
698             gamma = attributes->gamma[type];
699         else
700             gamma = attributes->gamma[ColorAdjustTypeDefault];
701
702         for (x=0; x<width; x++)
703             for (y=0; y<height; y++)
704             {
705                 ARGB *src_color;
706                 BYTE blue, green, red;
707                 src_color = (ARGB*)(data + stride * y + sizeof(ARGB) * x);
708
709                 blue = *src_color&0xff;
710                 green = (*src_color>>8)&0xff;
711                 red = (*src_color>>16)&0xff;
712
713                 /* FIXME: We should probably use a table for this. */
714                 blue = floorf(powf(blue / 255.0, gamma) * 255.0);
715                 green = floorf(powf(green / 255.0, gamma) * 255.0);
716                 red = floorf(powf(red / 255.0, gamma) * 255.0);
717
718                 *src_color = (*src_color & 0xff000000) | (red << 16) | (green << 8) | blue;
719             }
720     }
721 }
722
723 /* Given a bitmap and its source rectangle, find the smallest rectangle in the
724  * bitmap that contains all the pixels we may need to draw it. */
725 static void get_bitmap_sample_size(InterpolationMode interpolation, WrapMode wrap,
726     GpBitmap* bitmap, REAL srcx, REAL srcy, REAL srcwidth, REAL srcheight,
727     GpRect *rect)
728 {
729     INT left, top, right, bottom;
730
731     switch (interpolation)
732     {
733     case InterpolationModeHighQualityBilinear:
734     case InterpolationModeHighQualityBicubic:
735     /* FIXME: Include a greater range for the prefilter? */
736     case InterpolationModeBicubic:
737     case InterpolationModeBilinear:
738         left = (INT)(floorf(srcx));
739         top = (INT)(floorf(srcy));
740         right = (INT)(ceilf(srcx+srcwidth));
741         bottom = (INT)(ceilf(srcy+srcheight));
742         break;
743     case InterpolationModeNearestNeighbor:
744     default:
745         left = roundr(srcx);
746         top = roundr(srcy);
747         right = roundr(srcx+srcwidth);
748         bottom = roundr(srcy+srcheight);
749         break;
750     }
751
752     if (wrap == WrapModeClamp)
753     {
754         if (left < 0)
755             left = 0;
756         if (top < 0)
757             top = 0;
758         if (right >= bitmap->width)
759             right = bitmap->width-1;
760         if (bottom >= bitmap->height)
761             bottom = bitmap->height-1;
762     }
763     else
764     {
765         /* In some cases we can make the rectangle smaller here, but the logic
766          * is hard to get right, and tiling suggests we're likely to use the
767          * entire source image. */
768         if (left < 0 || right >= bitmap->width)
769         {
770             left = 0;
771             right = bitmap->width-1;
772         }
773
774         if (top < 0 || bottom >= bitmap->height)
775         {
776             top = 0;
777             bottom = bitmap->height-1;
778         }
779     }
780
781     rect->X = left;
782     rect->Y = top;
783     rect->Width = right - left + 1;
784     rect->Height = bottom - top + 1;
785 }
786
787 static ARGB sample_bitmap_pixel(GDIPCONST GpRect *src_rect, LPBYTE bits, UINT width,
788     UINT height, INT x, INT y, GDIPCONST GpImageAttributes *attributes)
789 {
790     if (attributes->wrap == WrapModeClamp)
791     {
792         if (x < 0 || y < 0 || x >= width || y >= height)
793             return attributes->outside_color;
794     }
795     else
796     {
797         /* Tiling. Make sure co-ordinates are positive as it simplifies the math. */
798         if (x < 0)
799             x = width*2 + x % (width * 2);
800         if (y < 0)
801             y = height*2 + y % (height * 2);
802
803         if ((attributes->wrap & 1) == 1)
804         {
805             /* Flip X */
806             if ((x / width) % 2 == 0)
807                 x = x % width;
808             else
809                 x = width - 1 - x % width;
810         }
811         else
812             x = x % width;
813
814         if ((attributes->wrap & 2) == 2)
815         {
816             /* Flip Y */
817             if ((y / height) % 2 == 0)
818                 y = y % height;
819             else
820                 y = height - 1 - y % height;
821         }
822         else
823             y = y % height;
824     }
825
826     if (x < src_rect->X || y < src_rect->Y || x >= src_rect->X + src_rect->Width || y >= src_rect->Y + src_rect->Height)
827     {
828         ERR("out of range pixel requested\n");
829         return 0xffcd0084;
830     }
831
832     return ((DWORD*)(bits))[(x - src_rect->X) + (y - src_rect->Y) * src_rect->Width];
833 }
834
835 static ARGB resample_bitmap_pixel(GDIPCONST GpRect *src_rect, LPBYTE bits, UINT width,
836     UINT height, GpPointF *point, GDIPCONST GpImageAttributes *attributes,
837     InterpolationMode interpolation)
838 {
839     static int fixme;
840
841     switch (interpolation)
842     {
843     default:
844         if (!fixme++)
845             FIXME("Unimplemented interpolation %i\n", interpolation);
846         /* fall-through */
847     case InterpolationModeBilinear:
848     {
849         REAL leftxf, topyf;
850         INT leftx, rightx, topy, bottomy;
851         ARGB topleft, topright, bottomleft, bottomright;
852         ARGB top, bottom;
853         float x_offset;
854
855         leftxf = floorf(point->X);
856         leftx = (INT)leftxf;
857         rightx = (INT)ceilf(point->X);
858         topyf = floorf(point->Y);
859         topy = (INT)topyf;
860         bottomy = (INT)ceilf(point->Y);
861
862         if (leftx == rightx && topy == bottomy)
863             return sample_bitmap_pixel(src_rect, bits, width, height,
864                 leftx, topy, attributes);
865
866         topleft = sample_bitmap_pixel(src_rect, bits, width, height,
867             leftx, topy, attributes);
868         topright = sample_bitmap_pixel(src_rect, bits, width, height,
869             rightx, topy, attributes);
870         bottomleft = sample_bitmap_pixel(src_rect, bits, width, height,
871             leftx, bottomy, attributes);
872         bottomright = sample_bitmap_pixel(src_rect, bits, width, height,
873             rightx, bottomy, attributes);
874
875         x_offset = point->X - leftxf;
876         top = blend_colors(topleft, topright, x_offset);
877         bottom = blend_colors(bottomleft, bottomright, x_offset);
878
879         return blend_colors(top, bottom, point->Y - topyf);
880     }
881     case InterpolationModeNearestNeighbor:
882         return sample_bitmap_pixel(src_rect, bits, width, height,
883             roundr(point->X), roundr(point->Y), attributes);
884     }
885 }
886
887 static REAL intersect_line_scanline(const GpPointF *p1, const GpPointF *p2, REAL y)
888 {
889     return (p1->X - p2->X) * (p2->Y - y) / (p2->Y - p1->Y) + p2->X;
890 }
891
892 static INT brush_can_fill_path(GpBrush *brush)
893 {
894     switch (brush->bt)
895     {
896     case BrushTypeSolidColor:
897         return 1;
898     case BrushTypeHatchFill:
899     {
900         GpHatch *hatch = (GpHatch*)brush;
901         return ((hatch->forecol & 0xff000000) == 0xff000000) &&
902                ((hatch->backcol & 0xff000000) == 0xff000000);
903     }
904     case BrushTypeLinearGradient:
905     case BrushTypeTextureFill:
906     /* Gdi32 isn't much help with these, so we should use brush_fill_pixels instead. */
907     default:
908         return 0;
909     }
910 }
911
912 static void brush_fill_path(GpGraphics *graphics, GpBrush* brush)
913 {
914     switch (brush->bt)
915     {
916     case BrushTypeSolidColor:
917     {
918         GpSolidFill *fill = (GpSolidFill*)brush;
919         HBITMAP bmp = ARGB2BMP(fill->color);
920
921         if (bmp)
922         {
923             RECT rc;
924             /* partially transparent fill */
925
926             SelectClipPath(graphics->hdc, RGN_AND);
927             if (GetClipBox(graphics->hdc, &rc) != NULLREGION)
928             {
929                 HDC hdc = CreateCompatibleDC(NULL);
930
931                 if (!hdc) break;
932
933                 SelectObject(hdc, bmp);
934                 gdi_alpha_blend(graphics, rc.left, rc.top, rc.right - rc.left, rc.bottom - rc.top,
935                                 hdc, 0, 0, 1, 1);
936                 DeleteDC(hdc);
937             }
938
939             DeleteObject(bmp);
940             break;
941         }
942         /* else fall through */
943     }
944     default:
945     {
946         HBRUSH gdibrush, old_brush;
947
948         gdibrush = create_gdi_brush(brush);
949         if (!gdibrush) return;
950
951         old_brush = SelectObject(graphics->hdc, gdibrush);
952         FillPath(graphics->hdc);
953         SelectObject(graphics->hdc, old_brush);
954         DeleteObject(gdibrush);
955         break;
956     }
957     }
958 }
959
960 static INT brush_can_fill_pixels(GpBrush *brush)
961 {
962     switch (brush->bt)
963     {
964     case BrushTypeSolidColor:
965     case BrushTypeHatchFill:
966     case BrushTypeLinearGradient:
967     case BrushTypeTextureFill:
968     case BrushTypePathGradient:
969         return 1;
970     default:
971         return 0;
972     }
973 }
974
975 static GpStatus brush_fill_pixels(GpGraphics *graphics, GpBrush *brush,
976     DWORD *argb_pixels, GpRect *fill_area, UINT cdwStride)
977 {
978     switch (brush->bt)
979     {
980     case BrushTypeSolidColor:
981     {
982         int x, y;
983         GpSolidFill *fill = (GpSolidFill*)brush;
984         for (x=0; x<fill_area->Width; x++)
985             for (y=0; y<fill_area->Height; y++)
986                 argb_pixels[x + y*cdwStride] = fill->color;
987         return Ok;
988     }
989     case BrushTypeHatchFill:
990     {
991         int x, y;
992         GpHatch *fill = (GpHatch*)brush;
993         const char *hatch_data;
994
995         if (get_hatch_data(fill->hatchstyle, &hatch_data) != Ok)
996             return NotImplemented;
997
998         for (x=0; x<fill_area->Width; x++)
999             for (y=0; y<fill_area->Height; y++)
1000             {
1001                 int hx, hy;
1002
1003                 /* FIXME: Account for the rendering origin */
1004                 hx = (x + fill_area->X) % 8;
1005                 hy = (y + fill_area->Y) % 8;
1006
1007                 if ((hatch_data[7-hy] & (0x80 >> hx)) != 0)
1008                     argb_pixels[x + y*cdwStride] = fill->forecol;
1009                 else
1010                     argb_pixels[x + y*cdwStride] = fill->backcol;
1011             }
1012
1013         return Ok;
1014     }
1015     case BrushTypeLinearGradient:
1016     {
1017         GpLineGradient *fill = (GpLineGradient*)brush;
1018         GpPointF draw_points[3], line_points[3];
1019         GpStatus stat;
1020         static const GpRectF box_1 = { 0.0, 0.0, 1.0, 1.0 };
1021         GpMatrix *world_to_gradient; /* FIXME: Store this in the brush? */
1022         int x, y;
1023
1024         draw_points[0].X = fill_area->X;
1025         draw_points[0].Y = fill_area->Y;
1026         draw_points[1].X = fill_area->X+1;
1027         draw_points[1].Y = fill_area->Y;
1028         draw_points[2].X = fill_area->X;
1029         draw_points[2].Y = fill_area->Y+1;
1030
1031         /* Transform the points to a co-ordinate space where X is the point's
1032          * position in the gradient, 0.0 being the start point and 1.0 the
1033          * end point. */
1034         stat = GdipTransformPoints(graphics, CoordinateSpaceWorld,
1035             CoordinateSpaceDevice, draw_points, 3);
1036
1037         if (stat == Ok)
1038         {
1039             line_points[0] = fill->startpoint;
1040             line_points[1] = fill->endpoint;
1041             line_points[2].X = fill->startpoint.X + (fill->startpoint.Y - fill->endpoint.Y);
1042             line_points[2].Y = fill->startpoint.Y + (fill->endpoint.X - fill->startpoint.X);
1043
1044             stat = GdipCreateMatrix3(&box_1, line_points, &world_to_gradient);
1045         }
1046
1047         if (stat == Ok)
1048         {
1049             stat = GdipInvertMatrix(world_to_gradient);
1050
1051             if (stat == Ok)
1052                 stat = GdipTransformMatrixPoints(world_to_gradient, draw_points, 3);
1053
1054             GdipDeleteMatrix(world_to_gradient);
1055         }
1056
1057         if (stat == Ok)
1058         {
1059             REAL x_delta = draw_points[1].X - draw_points[0].X;
1060             REAL y_delta = draw_points[2].X - draw_points[0].X;
1061
1062             for (y=0; y<fill_area->Height; y++)
1063             {
1064                 for (x=0; x<fill_area->Width; x++)
1065                 {
1066                     REAL pos = draw_points[0].X + x * x_delta + y * y_delta;
1067
1068                     argb_pixels[x + y*cdwStride] = blend_line_gradient(fill, pos);
1069                 }
1070             }
1071         }
1072
1073         return stat;
1074     }
1075     case BrushTypeTextureFill:
1076     {
1077         GpTexture *fill = (GpTexture*)brush;
1078         GpPointF draw_points[3];
1079         GpStatus stat;
1080         GpMatrix *world_to_texture;
1081         int x, y;
1082         GpBitmap *bitmap;
1083         int src_stride;
1084         GpRect src_area;
1085
1086         if (fill->image->type != ImageTypeBitmap)
1087         {
1088             FIXME("metafile texture brushes not implemented\n");
1089             return NotImplemented;
1090         }
1091
1092         bitmap = (GpBitmap*)fill->image;
1093         src_stride = sizeof(ARGB) * bitmap->width;
1094
1095         src_area.X = src_area.Y = 0;
1096         src_area.Width = bitmap->width;
1097         src_area.Height = bitmap->height;
1098
1099         draw_points[0].X = fill_area->X;
1100         draw_points[0].Y = fill_area->Y;
1101         draw_points[1].X = fill_area->X+1;
1102         draw_points[1].Y = fill_area->Y;
1103         draw_points[2].X = fill_area->X;
1104         draw_points[2].Y = fill_area->Y+1;
1105
1106         /* Transform the points to the co-ordinate space of the bitmap. */
1107         stat = GdipTransformPoints(graphics, CoordinateSpaceWorld,
1108             CoordinateSpaceDevice, draw_points, 3);
1109
1110         if (stat == Ok)
1111         {
1112             stat = GdipCloneMatrix(fill->transform, &world_to_texture);
1113         }
1114
1115         if (stat == Ok)
1116         {
1117             stat = GdipInvertMatrix(world_to_texture);
1118
1119             if (stat == Ok)
1120                 stat = GdipTransformMatrixPoints(world_to_texture, draw_points, 3);
1121
1122             GdipDeleteMatrix(world_to_texture);
1123         }
1124
1125         if (stat == Ok && !fill->bitmap_bits)
1126         {
1127             BitmapData lockeddata;
1128
1129             fill->bitmap_bits = GdipAlloc(sizeof(ARGB) * bitmap->width * bitmap->height);
1130             if (!fill->bitmap_bits)
1131                 stat = OutOfMemory;
1132
1133             if (stat == Ok)
1134             {
1135                 lockeddata.Width = bitmap->width;
1136                 lockeddata.Height = bitmap->height;
1137                 lockeddata.Stride = src_stride;
1138                 lockeddata.PixelFormat = PixelFormat32bppARGB;
1139                 lockeddata.Scan0 = fill->bitmap_bits;
1140
1141                 stat = GdipBitmapLockBits(bitmap, &src_area, ImageLockModeRead|ImageLockModeUserInputBuf,
1142                     PixelFormat32bppARGB, &lockeddata);
1143             }
1144
1145             if (stat == Ok)
1146                 stat = GdipBitmapUnlockBits(bitmap, &lockeddata);
1147
1148             if (stat == Ok)
1149                 apply_image_attributes(fill->imageattributes, fill->bitmap_bits,
1150                     bitmap->width, bitmap->height,
1151                     src_stride, ColorAdjustTypeBitmap);
1152
1153             if (stat != Ok)
1154             {
1155                 GdipFree(fill->bitmap_bits);
1156                 fill->bitmap_bits = NULL;
1157             }
1158         }
1159
1160         if (stat == Ok)
1161         {
1162             REAL x_dx = draw_points[1].X - draw_points[0].X;
1163             REAL x_dy = draw_points[1].Y - draw_points[0].Y;
1164             REAL y_dx = draw_points[2].X - draw_points[0].X;
1165             REAL y_dy = draw_points[2].Y - draw_points[0].Y;
1166
1167             for (y=0; y<fill_area->Height; y++)
1168             {
1169                 for (x=0; x<fill_area->Width; x++)
1170                 {
1171                     GpPointF point;
1172                     point.X = draw_points[0].X + x * x_dx + y * y_dx;
1173                     point.Y = draw_points[0].Y + y * x_dy + y * y_dy;
1174
1175                     argb_pixels[x + y*cdwStride] = resample_bitmap_pixel(
1176                         &src_area, fill->bitmap_bits, bitmap->width, bitmap->height,
1177                         &point, fill->imageattributes, graphics->interpolation);
1178                 }
1179             }
1180         }
1181
1182         return stat;
1183     }
1184     case BrushTypePathGradient:
1185     {
1186         GpPathGradient *fill = (GpPathGradient*)brush;
1187         GpPath *flat_path;
1188         GpMatrix *world_to_device;
1189         GpStatus stat;
1190         int i, figure_start=0;
1191         GpPointF start_point, end_point, center_point;
1192         BYTE type;
1193         REAL min_yf, max_yf, line1_xf, line2_xf;
1194         INT min_y, max_y, min_x, max_x;
1195         INT x, y;
1196         ARGB outer_color;
1197         static int transform_fixme_once;
1198
1199         if (fill->focus.X != 0.0 || fill->focus.Y != 0.0)
1200         {
1201             static int once;
1202             if (!once++)
1203                 FIXME("path gradient focus not implemented\n");
1204         }
1205
1206         if (fill->gamma)
1207         {
1208             static int once;
1209             if (!once++)
1210                 FIXME("path gradient gamma correction not implemented\n");
1211         }
1212
1213         if (fill->blendcount)
1214         {
1215             static int once;
1216             if (!once++)
1217                 FIXME("path gradient blend not implemented\n");
1218         }
1219
1220         if (fill->pblendcount)
1221         {
1222             static int once;
1223             if (!once++)
1224                 FIXME("path gradient preset blend not implemented\n");
1225         }
1226
1227         if (!transform_fixme_once)
1228         {
1229             BOOL is_identity=TRUE;
1230             GdipIsMatrixIdentity(fill->transform, &is_identity);
1231             if (!is_identity)
1232             {
1233                 FIXME("path gradient transform not implemented\n");
1234                 transform_fixme_once = 1;
1235             }
1236         }
1237
1238         stat = GdipClonePath(fill->path, &flat_path);
1239
1240         if (stat != Ok)
1241             return stat;
1242
1243         stat = get_graphics_transform(graphics, CoordinateSpaceDevice,
1244             CoordinateSpaceWorld, &world_to_device);
1245         if (stat == Ok)
1246         {
1247             stat = GdipTransformPath(flat_path, world_to_device);
1248
1249             if (stat == Ok)
1250             {
1251                 center_point = fill->center;
1252                 stat = GdipTransformMatrixPoints(world_to_device, &center_point, 1);
1253             }
1254
1255             if (stat == Ok)
1256                 stat = GdipFlattenPath(flat_path, NULL, 0.5);
1257
1258             GdipDeleteMatrix(world_to_device);
1259         }
1260
1261         if (stat != Ok)
1262         {
1263             GdipDeletePath(flat_path);
1264             return stat;
1265         }
1266
1267         for (i=0; i<flat_path->pathdata.Count; i++)
1268         {
1269             int start_center_line=0, end_center_line=0;
1270             int seen_start=0, seen_end=0, seen_center=0;
1271             REAL center_distance;
1272             ARGB start_color, end_color;
1273             REAL dy, dx;
1274
1275             type = flat_path->pathdata.Types[i];
1276
1277             if ((type&PathPointTypePathTypeMask) == PathPointTypeStart)
1278                 figure_start = i;
1279
1280             start_point = flat_path->pathdata.Points[i];
1281
1282             start_color = fill->surroundcolors[min(i, fill->surroundcolorcount-1)];
1283
1284             if ((type&PathPointTypeCloseSubpath) == PathPointTypeCloseSubpath || i+1 >= flat_path->pathdata.Count)
1285             {
1286                 end_point = flat_path->pathdata.Points[figure_start];
1287                 end_color = fill->surroundcolors[min(figure_start, fill->surroundcolorcount-1)];
1288             }
1289             else if ((flat_path->pathdata.Types[i+1] & PathPointTypePathTypeMask) == PathPointTypeLine)
1290             {
1291                 end_point = flat_path->pathdata.Points[i+1];
1292                 end_color = fill->surroundcolors[min(i+1, fill->surroundcolorcount-1)];
1293             }
1294             else
1295                 continue;
1296
1297             outer_color = start_color;
1298
1299             min_yf = center_point.Y;
1300             if (min_yf > start_point.Y) min_yf = start_point.Y;
1301             if (min_yf > end_point.Y) min_yf = end_point.Y;
1302
1303             if (min_yf < fill_area->Y)
1304                 min_y = fill_area->Y;
1305             else
1306                 min_y = (INT)ceil(min_yf);
1307
1308             max_yf = center_point.Y;
1309             if (max_yf < start_point.Y) max_yf = start_point.Y;
1310             if (max_yf < end_point.Y) max_yf = end_point.Y;
1311
1312             if (max_yf > fill_area->Y + fill_area->Height)
1313                 max_y = fill_area->Y + fill_area->Height;
1314             else
1315                 max_y = (INT)ceil(max_yf);
1316
1317             dy = end_point.Y - start_point.Y;
1318             dx = end_point.X - start_point.X;
1319
1320             /* This is proportional to the distance from start-end line to center point. */
1321             center_distance = dy * (start_point.X - center_point.X) +
1322                 dx * (center_point.Y - start_point.Y);
1323
1324             for (y=min_y; y<max_y; y++)
1325             {
1326                 REAL yf = (REAL)y;
1327
1328                 if (!seen_start && yf >= start_point.Y)
1329                 {
1330                     seen_start = 1;
1331                     start_center_line ^= 1;
1332                 }
1333                 if (!seen_end && yf >= end_point.Y)
1334                 {
1335                     seen_end = 1;
1336                     end_center_line ^= 1;
1337                 }
1338                 if (!seen_center && yf >= center_point.Y)
1339                 {
1340                     seen_center = 1;
1341                     start_center_line ^= 1;
1342                     end_center_line ^= 1;
1343                 }
1344
1345                 if (start_center_line)
1346                     line1_xf = intersect_line_scanline(&start_point, &center_point, yf);
1347                 else
1348                     line1_xf = intersect_line_scanline(&start_point, &end_point, yf);
1349
1350                 if (end_center_line)
1351                     line2_xf = intersect_line_scanline(&end_point, &center_point, yf);
1352                 else
1353                     line2_xf = intersect_line_scanline(&start_point, &end_point, yf);
1354
1355                 if (line1_xf < line2_xf)
1356                 {
1357                     min_x = (INT)ceil(line1_xf);
1358                     max_x = (INT)ceil(line2_xf);
1359                 }
1360                 else
1361                 {
1362                     min_x = (INT)ceil(line2_xf);
1363                     max_x = (INT)ceil(line1_xf);
1364                 }
1365
1366                 if (min_x < fill_area->X)
1367                     min_x = fill_area->X;
1368                 if (max_x > fill_area->X + fill_area->Width)
1369                     max_x = fill_area->X + fill_area->Width;
1370
1371                 for (x=min_x; x<max_x; x++)
1372                 {
1373                     REAL xf = (REAL)x;
1374                     REAL distance;
1375
1376                     if (start_color != end_color)
1377                     {
1378                         REAL blend_amount, pdy, pdx;
1379                         pdy = yf - center_point.Y;
1380                         pdx = xf - center_point.X;
1381                         blend_amount = ( (center_point.Y - start_point.Y) * pdx + (start_point.X - center_point.X) * pdy ) / ( dy * pdx - dx * pdy );
1382                         outer_color = blend_colors(start_color, end_color, blend_amount);
1383                     }
1384
1385                     distance = (end_point.Y - start_point.Y) * (start_point.X - xf) +
1386                         (end_point.X - start_point.X) * (yf - start_point.Y);
1387
1388                     distance = distance / center_distance;
1389
1390                     argb_pixels[(x-fill_area->X) + (y-fill_area->Y)*cdwStride] =
1391                         blend_colors(outer_color, fill->centercolor, distance);
1392                 }
1393             }
1394         }
1395
1396         GdipDeletePath(flat_path);
1397         return stat;
1398     }
1399     default:
1400         return NotImplemented;
1401     }
1402 }
1403
1404 /* GdipDrawPie/GdipFillPie helper function */
1405 static void draw_pie(GpGraphics *graphics, REAL x, REAL y, REAL width,
1406     REAL height, REAL startAngle, REAL sweepAngle)
1407 {
1408     GpPointF ptf[4];
1409     POINT pti[4];
1410
1411     ptf[0].X = x;
1412     ptf[0].Y = y;
1413     ptf[1].X = x + width;
1414     ptf[1].Y = y + height;
1415
1416     deg2xy(startAngle+sweepAngle, x + width / 2.0, y + width / 2.0, &ptf[2].X, &ptf[2].Y);
1417     deg2xy(startAngle, x + width / 2.0, y + width / 2.0, &ptf[3].X, &ptf[3].Y);
1418
1419     transform_and_round_points(graphics, pti, ptf, 4);
1420
1421     Pie(graphics->hdc, pti[0].x, pti[0].y, pti[1].x, pti[1].y, pti[2].x,
1422         pti[2].y, pti[3].x, pti[3].y);
1423 }
1424
1425 /* Draws the linecap the specified color and size on the hdc.  The linecap is in
1426  * direction of the line from x1, y1 to x2, y2 and is anchored on x2, y2. Probably
1427  * should not be called on an hdc that has a path you care about. */
1428 static void draw_cap(GpGraphics *graphics, COLORREF color, GpLineCap cap, REAL size,
1429     const GpCustomLineCap *custom, REAL x1, REAL y1, REAL x2, REAL y2)
1430 {
1431     HGDIOBJ oldbrush = NULL, oldpen = NULL;
1432     GpMatrix *matrix = NULL;
1433     HBRUSH brush = NULL;
1434     HPEN pen = NULL;
1435     PointF ptf[4], *custptf = NULL;
1436     POINT pt[4], *custpt = NULL;
1437     BYTE *tp = NULL;
1438     REAL theta, dsmall, dbig, dx, dy = 0.0;
1439     INT i, count;
1440     LOGBRUSH lb;
1441     BOOL customstroke;
1442
1443     if((x1 == x2) && (y1 == y2))
1444         return;
1445
1446     theta = gdiplus_atan2(y2 - y1, x2 - x1);
1447
1448     customstroke = (cap == LineCapCustom) && custom && (!custom->fill);
1449     if(!customstroke){
1450         brush = CreateSolidBrush(color);
1451         lb.lbStyle = BS_SOLID;
1452         lb.lbColor = color;
1453         lb.lbHatch = 0;
1454         pen = ExtCreatePen(PS_GEOMETRIC | PS_SOLID | PS_ENDCAP_FLAT |
1455                            PS_JOIN_MITER, 1, &lb, 0,
1456                            NULL);
1457         oldbrush = SelectObject(graphics->hdc, brush);
1458         oldpen = SelectObject(graphics->hdc, pen);
1459     }
1460
1461     switch(cap){
1462         case LineCapFlat:
1463             break;
1464         case LineCapSquare:
1465         case LineCapSquareAnchor:
1466         case LineCapDiamondAnchor:
1467             size = size * (cap & LineCapNoAnchor ? ANCHOR_WIDTH : 1.0) / 2.0;
1468             if(cap == LineCapDiamondAnchor){
1469                 dsmall = cos(theta + M_PI_2) * size;
1470                 dbig = sin(theta + M_PI_2) * size;
1471             }
1472             else{
1473                 dsmall = cos(theta + M_PI_4) * size;
1474                 dbig = sin(theta + M_PI_4) * size;
1475             }
1476
1477             ptf[0].X = x2 - dsmall;
1478             ptf[1].X = x2 + dbig;
1479
1480             ptf[0].Y = y2 - dbig;
1481             ptf[3].Y = y2 + dsmall;
1482
1483             ptf[1].Y = y2 - dsmall;
1484             ptf[2].Y = y2 + dbig;
1485
1486             ptf[3].X = x2 - dbig;
1487             ptf[2].X = x2 + dsmall;
1488
1489             transform_and_round_points(graphics, pt, ptf, 4);
1490             Polygon(graphics->hdc, pt, 4);
1491
1492             break;
1493         case LineCapArrowAnchor:
1494             size = size * 4.0 / sqrt(3.0);
1495
1496             dx = cos(M_PI / 6.0 + theta) * size;
1497             dy = sin(M_PI / 6.0 + theta) * size;
1498
1499             ptf[0].X = x2 - dx;
1500             ptf[0].Y = y2 - dy;
1501
1502             dx = cos(- M_PI / 6.0 + theta) * size;
1503             dy = sin(- M_PI / 6.0 + theta) * size;
1504
1505             ptf[1].X = x2 - dx;
1506             ptf[1].Y = y2 - dy;
1507
1508             ptf[2].X = x2;
1509             ptf[2].Y = y2;
1510
1511             transform_and_round_points(graphics, pt, ptf, 3);
1512             Polygon(graphics->hdc, pt, 3);
1513
1514             break;
1515         case LineCapRoundAnchor:
1516             dx = dy = ANCHOR_WIDTH * size / 2.0;
1517
1518             ptf[0].X = x2 - dx;
1519             ptf[0].Y = y2 - dy;
1520             ptf[1].X = x2 + dx;
1521             ptf[1].Y = y2 + dy;
1522
1523             transform_and_round_points(graphics, pt, ptf, 2);
1524             Ellipse(graphics->hdc, pt[0].x, pt[0].y, pt[1].x, pt[1].y);
1525
1526             break;
1527         case LineCapTriangle:
1528             size = size / 2.0;
1529             dx = cos(M_PI_2 + theta) * size;
1530             dy = sin(M_PI_2 + theta) * size;
1531
1532             ptf[0].X = x2 - dx;
1533             ptf[0].Y = y2 - dy;
1534             ptf[1].X = x2 + dx;
1535             ptf[1].Y = y2 + dy;
1536
1537             dx = cos(theta) * size;
1538             dy = sin(theta) * size;
1539
1540             ptf[2].X = x2 + dx;
1541             ptf[2].Y = y2 + dy;
1542
1543             transform_and_round_points(graphics, pt, ptf, 3);
1544             Polygon(graphics->hdc, pt, 3);
1545
1546             break;
1547         case LineCapRound:
1548             dx = dy = size / 2.0;
1549
1550             ptf[0].X = x2 - dx;
1551             ptf[0].Y = y2 - dy;
1552             ptf[1].X = x2 + dx;
1553             ptf[1].Y = y2 + dy;
1554
1555             dx = -cos(M_PI_2 + theta) * size;
1556             dy = -sin(M_PI_2 + theta) * size;
1557
1558             ptf[2].X = x2 - dx;
1559             ptf[2].Y = y2 - dy;
1560             ptf[3].X = x2 + dx;
1561             ptf[3].Y = y2 + dy;
1562
1563             transform_and_round_points(graphics, pt, ptf, 4);
1564             Pie(graphics->hdc, pt[0].x, pt[0].y, pt[1].x, pt[1].y, pt[2].x,
1565                 pt[2].y, pt[3].x, pt[3].y);
1566
1567             break;
1568         case LineCapCustom:
1569             if(!custom)
1570                 break;
1571
1572             count = custom->pathdata.Count;
1573             custptf = GdipAlloc(count * sizeof(PointF));
1574             custpt = GdipAlloc(count * sizeof(POINT));
1575             tp = GdipAlloc(count);
1576
1577             if(!custptf || !custpt || !tp || (GdipCreateMatrix(&matrix) != Ok))
1578                 goto custend;
1579
1580             memcpy(custptf, custom->pathdata.Points, count * sizeof(PointF));
1581
1582             GdipScaleMatrix(matrix, size, size, MatrixOrderAppend);
1583             GdipRotateMatrix(matrix, (180.0 / M_PI) * (theta - M_PI_2),
1584                              MatrixOrderAppend);
1585             GdipTranslateMatrix(matrix, x2, y2, MatrixOrderAppend);
1586             GdipTransformMatrixPoints(matrix, custptf, count);
1587
1588             transform_and_round_points(graphics, custpt, custptf, count);
1589
1590             for(i = 0; i < count; i++)
1591                 tp[i] = convert_path_point_type(custom->pathdata.Types[i]);
1592
1593             if(custom->fill){
1594                 BeginPath(graphics->hdc);
1595                 PolyDraw(graphics->hdc, custpt, tp, count);
1596                 EndPath(graphics->hdc);
1597                 StrokeAndFillPath(graphics->hdc);
1598             }
1599             else
1600                 PolyDraw(graphics->hdc, custpt, tp, count);
1601
1602 custend:
1603             GdipFree(custptf);
1604             GdipFree(custpt);
1605             GdipFree(tp);
1606             GdipDeleteMatrix(matrix);
1607             break;
1608         default:
1609             break;
1610     }
1611
1612     if(!customstroke){
1613         SelectObject(graphics->hdc, oldbrush);
1614         SelectObject(graphics->hdc, oldpen);
1615         DeleteObject(brush);
1616         DeleteObject(pen);
1617     }
1618 }
1619
1620 /* Shortens the line by the given percent by changing x2, y2.
1621  * If percent is > 1.0 then the line will change direction.
1622  * If percent is negative it can lengthen the line. */
1623 static void shorten_line_percent(REAL x1, REAL  y1, REAL *x2, REAL *y2, REAL percent)
1624 {
1625     REAL dist, theta, dx, dy;
1626
1627     if((y1 == *y2) && (x1 == *x2))
1628         return;
1629
1630     dist = sqrt((*x2 - x1) * (*x2 - x1) + (*y2 - y1) * (*y2 - y1)) * -percent;
1631     theta = gdiplus_atan2((*y2 - y1), (*x2 - x1));
1632     dx = cos(theta) * dist;
1633     dy = sin(theta) * dist;
1634
1635     *x2 = *x2 + dx;
1636     *y2 = *y2 + dy;
1637 }
1638
1639 /* Shortens the line by the given amount by changing x2, y2.
1640  * If the amount is greater than the distance, the line will become length 0.
1641  * If the amount is negative, it can lengthen the line. */
1642 static void shorten_line_amt(REAL x1, REAL y1, REAL *x2, REAL *y2, REAL amt)
1643 {
1644     REAL dx, dy, percent;
1645
1646     dx = *x2 - x1;
1647     dy = *y2 - y1;
1648     if(dx == 0 && dy == 0)
1649         return;
1650
1651     percent = amt / sqrt(dx * dx + dy * dy);
1652     if(percent >= 1.0){
1653         *x2 = x1;
1654         *y2 = y1;
1655         return;
1656     }
1657
1658     shorten_line_percent(x1, y1, x2, y2, percent);
1659 }
1660
1661 /* Draws lines between the given points, and if caps is true then draws an endcap
1662  * at the end of the last line. */
1663 static GpStatus draw_polyline(GpGraphics *graphics, GpPen *pen,
1664     GDIPCONST GpPointF * pt, INT count, BOOL caps)
1665 {
1666     POINT *pti = NULL;
1667     GpPointF *ptcopy = NULL;
1668     GpStatus status = GenericError;
1669
1670     if(!count)
1671         return Ok;
1672
1673     pti = GdipAlloc(count * sizeof(POINT));
1674     ptcopy = GdipAlloc(count * sizeof(GpPointF));
1675
1676     if(!pti || !ptcopy){
1677         status = OutOfMemory;
1678         goto end;
1679     }
1680
1681     memcpy(ptcopy, pt, count * sizeof(GpPointF));
1682
1683     if(caps){
1684         if(pen->endcap == LineCapArrowAnchor)
1685             shorten_line_amt(ptcopy[count-2].X, ptcopy[count-2].Y,
1686                              &ptcopy[count-1].X, &ptcopy[count-1].Y, pen->width);
1687         else if((pen->endcap == LineCapCustom) && pen->customend)
1688             shorten_line_amt(ptcopy[count-2].X, ptcopy[count-2].Y,
1689                              &ptcopy[count-1].X, &ptcopy[count-1].Y,
1690                              pen->customend->inset * pen->width);
1691
1692         if(pen->startcap == LineCapArrowAnchor)
1693             shorten_line_amt(ptcopy[1].X, ptcopy[1].Y,
1694                              &ptcopy[0].X, &ptcopy[0].Y, pen->width);
1695         else if((pen->startcap == LineCapCustom) && pen->customstart)
1696             shorten_line_amt(ptcopy[1].X, ptcopy[1].Y,
1697                              &ptcopy[0].X, &ptcopy[0].Y,
1698                              pen->customstart->inset * pen->width);
1699
1700         draw_cap(graphics, get_gdi_brush_color(pen->brush), pen->endcap, pen->width, pen->customend,
1701                  pt[count - 2].X, pt[count - 2].Y, pt[count - 1].X, pt[count - 1].Y);
1702         draw_cap(graphics, get_gdi_brush_color(pen->brush), pen->startcap, pen->width, pen->customstart,
1703                          pt[1].X, pt[1].Y, pt[0].X, pt[0].Y);
1704     }
1705
1706     transform_and_round_points(graphics, pti, ptcopy, count);
1707
1708     if(Polyline(graphics->hdc, pti, count))
1709         status = Ok;
1710
1711 end:
1712     GdipFree(pti);
1713     GdipFree(ptcopy);
1714
1715     return status;
1716 }
1717
1718 /* Conducts a linear search to find the bezier points that will back off
1719  * the endpoint of the curve by a distance of amt. Linear search works
1720  * better than binary in this case because there are multiple solutions,
1721  * and binary searches often find a bad one. I don't think this is what
1722  * Windows does but short of rendering the bezier without GDI's help it's
1723  * the best we can do. If rev then work from the start of the passed points
1724  * instead of the end. */
1725 static void shorten_bezier_amt(GpPointF * pt, REAL amt, BOOL rev)
1726 {
1727     GpPointF origpt[4];
1728     REAL percent = 0.00, dx, dy, origx, origy, diff = -1.0;
1729     INT i, first = 0, second = 1, third = 2, fourth = 3;
1730
1731     if(rev){
1732         first = 3;
1733         second = 2;
1734         third = 1;
1735         fourth = 0;
1736     }
1737
1738     origx = pt[fourth].X;
1739     origy = pt[fourth].Y;
1740     memcpy(origpt, pt, sizeof(GpPointF) * 4);
1741
1742     for(i = 0; (i < MAX_ITERS) && (diff < amt); i++){
1743         /* reset bezier points to original values */
1744         memcpy(pt, origpt, sizeof(GpPointF) * 4);
1745         /* Perform magic on bezier points. Order is important here.*/
1746         shorten_line_percent(pt[third].X, pt[third].Y, &pt[fourth].X, &pt[fourth].Y, percent);
1747         shorten_line_percent(pt[second].X, pt[second].Y, &pt[third].X, &pt[third].Y, percent);
1748         shorten_line_percent(pt[third].X, pt[third].Y, &pt[fourth].X, &pt[fourth].Y, percent);
1749         shorten_line_percent(pt[first].X, pt[first].Y, &pt[second].X, &pt[second].Y, percent);
1750         shorten_line_percent(pt[second].X, pt[second].Y, &pt[third].X, &pt[third].Y, percent);
1751         shorten_line_percent(pt[third].X, pt[third].Y, &pt[fourth].X, &pt[fourth].Y, percent);
1752
1753         dx = pt[fourth].X - origx;
1754         dy = pt[fourth].Y - origy;
1755
1756         diff = sqrt(dx * dx + dy * dy);
1757         percent += 0.0005 * amt;
1758     }
1759 }
1760
1761 /* Draws bezier curves between given points, and if caps is true then draws an
1762  * endcap at the end of the last line. */
1763 static GpStatus draw_polybezier(GpGraphics *graphics, GpPen *pen,
1764     GDIPCONST GpPointF * pt, INT count, BOOL caps)
1765 {
1766     POINT *pti;
1767     GpPointF *ptcopy;
1768     GpStatus status = GenericError;
1769
1770     if(!count)
1771         return Ok;
1772
1773     pti = GdipAlloc(count * sizeof(POINT));
1774     ptcopy = GdipAlloc(count * sizeof(GpPointF));
1775
1776     if(!pti || !ptcopy){
1777         status = OutOfMemory;
1778         goto end;
1779     }
1780
1781     memcpy(ptcopy, pt, count * sizeof(GpPointF));
1782
1783     if(caps){
1784         if(pen->endcap == LineCapArrowAnchor)
1785             shorten_bezier_amt(&ptcopy[count-4], pen->width, FALSE);
1786         else if((pen->endcap == LineCapCustom) && pen->customend)
1787             shorten_bezier_amt(&ptcopy[count-4], pen->width * pen->customend->inset,
1788                                FALSE);
1789
1790         if(pen->startcap == LineCapArrowAnchor)
1791             shorten_bezier_amt(ptcopy, pen->width, TRUE);
1792         else if((pen->startcap == LineCapCustom) && pen->customstart)
1793             shorten_bezier_amt(ptcopy, pen->width * pen->customstart->inset, TRUE);
1794
1795         /* the direction of the line cap is parallel to the direction at the
1796          * end of the bezier (which, if it has been shortened, is not the same
1797          * as the direction from pt[count-2] to pt[count-1]) */
1798         draw_cap(graphics, get_gdi_brush_color(pen->brush), pen->endcap, pen->width, pen->customend,
1799             pt[count - 1].X - (ptcopy[count - 1].X - ptcopy[count - 2].X),
1800             pt[count - 1].Y - (ptcopy[count - 1].Y - ptcopy[count - 2].Y),
1801             pt[count - 1].X, pt[count - 1].Y);
1802
1803         draw_cap(graphics, get_gdi_brush_color(pen->brush), pen->startcap, pen->width, pen->customstart,
1804             pt[0].X - (ptcopy[0].X - ptcopy[1].X),
1805             pt[0].Y - (ptcopy[0].Y - ptcopy[1].Y), pt[0].X, pt[0].Y);
1806     }
1807
1808     transform_and_round_points(graphics, pti, ptcopy, count);
1809
1810     PolyBezier(graphics->hdc, pti, count);
1811
1812     status = Ok;
1813
1814 end:
1815     GdipFree(pti);
1816     GdipFree(ptcopy);
1817
1818     return status;
1819 }
1820
1821 /* Draws a combination of bezier curves and lines between points. */
1822 static GpStatus draw_poly(GpGraphics *graphics, GpPen *pen, GDIPCONST GpPointF * pt,
1823     GDIPCONST BYTE * types, INT count, BOOL caps)
1824 {
1825     POINT *pti = GdipAlloc(count * sizeof(POINT));
1826     BYTE *tp = GdipAlloc(count);
1827     GpPointF *ptcopy = GdipAlloc(count * sizeof(GpPointF));
1828     INT i, j;
1829     GpStatus status = GenericError;
1830
1831     if(!count){
1832         status = Ok;
1833         goto end;
1834     }
1835     if(!pti || !tp || !ptcopy){
1836         status = OutOfMemory;
1837         goto end;
1838     }
1839
1840     for(i = 1; i < count; i++){
1841         if((types[i] & PathPointTypePathTypeMask) == PathPointTypeBezier){
1842             if((i + 2 >= count) || !(types[i + 1] & PathPointTypeBezier)
1843                 || !(types[i + 1] & PathPointTypeBezier)){
1844                 ERR("Bad bezier points\n");
1845                 goto end;
1846             }
1847             i += 2;
1848         }
1849     }
1850
1851     memcpy(ptcopy, pt, count * sizeof(GpPointF));
1852
1853     /* If we are drawing caps, go through the points and adjust them accordingly,
1854      * and draw the caps. */
1855     if(caps){
1856         switch(types[count - 1] & PathPointTypePathTypeMask){
1857             case PathPointTypeBezier:
1858                 if(pen->endcap == LineCapArrowAnchor)
1859                     shorten_bezier_amt(&ptcopy[count - 4], pen->width, FALSE);
1860                 else if((pen->endcap == LineCapCustom) && pen->customend)
1861                     shorten_bezier_amt(&ptcopy[count - 4],
1862                                        pen->width * pen->customend->inset, FALSE);
1863
1864                 draw_cap(graphics, get_gdi_brush_color(pen->brush), pen->endcap, pen->width, pen->customend,
1865                     pt[count - 1].X - (ptcopy[count - 1].X - ptcopy[count - 2].X),
1866                     pt[count - 1].Y - (ptcopy[count - 1].Y - ptcopy[count - 2].Y),
1867                     pt[count - 1].X, pt[count - 1].Y);
1868
1869                 break;
1870             case PathPointTypeLine:
1871                 if(pen->endcap == LineCapArrowAnchor)
1872                     shorten_line_amt(ptcopy[count - 2].X, ptcopy[count - 2].Y,
1873                                      &ptcopy[count - 1].X, &ptcopy[count - 1].Y,
1874                                      pen->width);
1875                 else if((pen->endcap == LineCapCustom) && pen->customend)
1876                     shorten_line_amt(ptcopy[count - 2].X, ptcopy[count - 2].Y,
1877                                      &ptcopy[count - 1].X, &ptcopy[count - 1].Y,
1878                                      pen->customend->inset * pen->width);
1879
1880                 draw_cap(graphics, get_gdi_brush_color(pen->brush), pen->endcap, pen->width, pen->customend,
1881                          pt[count - 2].X, pt[count - 2].Y, pt[count - 1].X,
1882                          pt[count - 1].Y);
1883
1884                 break;
1885             default:
1886                 ERR("Bad path last point\n");
1887                 goto end;
1888         }
1889
1890         /* Find start of points */
1891         for(j = 1; j < count && ((types[j] & PathPointTypePathTypeMask)
1892             == PathPointTypeStart); j++);
1893
1894         switch(types[j] & PathPointTypePathTypeMask){
1895             case PathPointTypeBezier:
1896                 if(pen->startcap == LineCapArrowAnchor)
1897                     shorten_bezier_amt(&ptcopy[j - 1], pen->width, TRUE);
1898                 else if((pen->startcap == LineCapCustom) && pen->customstart)
1899                     shorten_bezier_amt(&ptcopy[j - 1],
1900                                        pen->width * pen->customstart->inset, TRUE);
1901
1902                 draw_cap(graphics, get_gdi_brush_color(pen->brush), pen->startcap, pen->width, pen->customstart,
1903                     pt[j - 1].X - (ptcopy[j - 1].X - ptcopy[j].X),
1904                     pt[j - 1].Y - (ptcopy[j - 1].Y - ptcopy[j].Y),
1905                     pt[j - 1].X, pt[j - 1].Y);
1906
1907                 break;
1908             case PathPointTypeLine:
1909                 if(pen->startcap == LineCapArrowAnchor)
1910                     shorten_line_amt(ptcopy[j].X, ptcopy[j].Y,
1911                                      &ptcopy[j - 1].X, &ptcopy[j - 1].Y,
1912                                      pen->width);
1913                 else if((pen->startcap == LineCapCustom) && pen->customstart)
1914                     shorten_line_amt(ptcopy[j].X, ptcopy[j].Y,
1915                                      &ptcopy[j - 1].X, &ptcopy[j - 1].Y,
1916                                      pen->customstart->inset * pen->width);
1917
1918                 draw_cap(graphics, get_gdi_brush_color(pen->brush), pen->startcap, pen->width, pen->customstart,
1919                          pt[j].X, pt[j].Y, pt[j - 1].X,
1920                          pt[j - 1].Y);
1921
1922                 break;
1923             default:
1924                 ERR("Bad path points\n");
1925                 goto end;
1926         }
1927     }
1928
1929     transform_and_round_points(graphics, pti, ptcopy, count);
1930
1931     for(i = 0; i < count; i++){
1932         tp[i] = convert_path_point_type(types[i]);
1933     }
1934
1935     PolyDraw(graphics->hdc, pti, tp, count);
1936
1937     status = Ok;
1938
1939 end:
1940     GdipFree(pti);
1941     GdipFree(ptcopy);
1942     GdipFree(tp);
1943
1944     return status;
1945 }
1946
1947 GpStatus trace_path(GpGraphics *graphics, GpPath *path)
1948 {
1949     GpStatus result;
1950
1951     BeginPath(graphics->hdc);
1952     result = draw_poly(graphics, NULL, path->pathdata.Points,
1953                        path->pathdata.Types, path->pathdata.Count, FALSE);
1954     EndPath(graphics->hdc);
1955     return result;
1956 }
1957
1958 typedef struct _GraphicsContainerItem {
1959     struct list entry;
1960     GraphicsContainer contid;
1961
1962     SmoothingMode smoothing;
1963     CompositingQuality compqual;
1964     InterpolationMode interpolation;
1965     CompositingMode compmode;
1966     TextRenderingHint texthint;
1967     REAL scale;
1968     GpUnit unit;
1969     PixelOffsetMode pixeloffset;
1970     UINT textcontrast;
1971     GpMatrix* worldtrans;
1972     GpRegion* clip;
1973     INT origin_x, origin_y;
1974 } GraphicsContainerItem;
1975
1976 static GpStatus init_container(GraphicsContainerItem** container,
1977         GDIPCONST GpGraphics* graphics){
1978     GpStatus sts;
1979
1980     *container = GdipAlloc(sizeof(GraphicsContainerItem));
1981     if(!(*container))
1982         return OutOfMemory;
1983
1984     (*container)->contid = graphics->contid + 1;
1985
1986     (*container)->smoothing = graphics->smoothing;
1987     (*container)->compqual = graphics->compqual;
1988     (*container)->interpolation = graphics->interpolation;
1989     (*container)->compmode = graphics->compmode;
1990     (*container)->texthint = graphics->texthint;
1991     (*container)->scale = graphics->scale;
1992     (*container)->unit = graphics->unit;
1993     (*container)->textcontrast = graphics->textcontrast;
1994     (*container)->pixeloffset = graphics->pixeloffset;
1995     (*container)->origin_x = graphics->origin_x;
1996     (*container)->origin_y = graphics->origin_y;
1997
1998     sts = GdipCloneMatrix(graphics->worldtrans, &(*container)->worldtrans);
1999     if(sts != Ok){
2000         GdipFree(*container);
2001         *container = NULL;
2002         return sts;
2003     }
2004
2005     sts = GdipCloneRegion(graphics->clip, &(*container)->clip);
2006     if(sts != Ok){
2007         GdipDeleteMatrix((*container)->worldtrans);
2008         GdipFree(*container);
2009         *container = NULL;
2010         return sts;
2011     }
2012
2013     return Ok;
2014 }
2015
2016 static void delete_container(GraphicsContainerItem* container){
2017     GdipDeleteMatrix(container->worldtrans);
2018     GdipDeleteRegion(container->clip);
2019     GdipFree(container);
2020 }
2021
2022 static GpStatus restore_container(GpGraphics* graphics,
2023         GDIPCONST GraphicsContainerItem* container){
2024     GpStatus sts;
2025     GpMatrix *newTrans;
2026     GpRegion *newClip;
2027
2028     sts = GdipCloneMatrix(container->worldtrans, &newTrans);
2029     if(sts != Ok)
2030         return sts;
2031
2032     sts = GdipCloneRegion(container->clip, &newClip);
2033     if(sts != Ok){
2034         GdipDeleteMatrix(newTrans);
2035         return sts;
2036     }
2037
2038     GdipDeleteMatrix(graphics->worldtrans);
2039     graphics->worldtrans = newTrans;
2040
2041     GdipDeleteRegion(graphics->clip);
2042     graphics->clip = newClip;
2043
2044     graphics->contid = container->contid - 1;
2045
2046     graphics->smoothing = container->smoothing;
2047     graphics->compqual = container->compqual;
2048     graphics->interpolation = container->interpolation;
2049     graphics->compmode = container->compmode;
2050     graphics->texthint = container->texthint;
2051     graphics->scale = container->scale;
2052     graphics->unit = container->unit;
2053     graphics->textcontrast = container->textcontrast;
2054     graphics->pixeloffset = container->pixeloffset;
2055     graphics->origin_x = container->origin_x;
2056     graphics->origin_y = container->origin_y;
2057
2058     return Ok;
2059 }
2060
2061 static GpStatus get_graphics_bounds(GpGraphics* graphics, GpRectF* rect)
2062 {
2063     RECT wnd_rect;
2064     GpStatus stat=Ok;
2065     GpUnit unit;
2066
2067     if(graphics->hwnd) {
2068         if(!GetClientRect(graphics->hwnd, &wnd_rect))
2069             return GenericError;
2070
2071         rect->X = wnd_rect.left;
2072         rect->Y = wnd_rect.top;
2073         rect->Width = wnd_rect.right - wnd_rect.left;
2074         rect->Height = wnd_rect.bottom - wnd_rect.top;
2075     }else if (graphics->image){
2076         stat = GdipGetImageBounds(graphics->image, rect, &unit);
2077         if (stat == Ok && unit != UnitPixel)
2078             FIXME("need to convert from unit %i\n", unit);
2079     }else{
2080         rect->X = 0;
2081         rect->Y = 0;
2082         rect->Width = GetDeviceCaps(graphics->hdc, HORZRES);
2083         rect->Height = GetDeviceCaps(graphics->hdc, VERTRES);
2084     }
2085
2086     return stat;
2087 }
2088
2089 /* on success, rgn will contain the region of the graphics object which
2090  * is visible after clipping has been applied */
2091 static GpStatus get_visible_clip_region(GpGraphics *graphics, GpRegion *rgn)
2092 {
2093     GpStatus stat;
2094     GpRectF rectf;
2095     GpRegion* tmp;
2096
2097     if((stat = get_graphics_bounds(graphics, &rectf)) != Ok)
2098         return stat;
2099
2100     if((stat = GdipCreateRegion(&tmp)) != Ok)
2101         return stat;
2102
2103     if((stat = GdipCombineRegionRect(tmp, &rectf, CombineModeReplace)) != Ok)
2104         goto end;
2105
2106     if((stat = GdipCombineRegionRegion(tmp, graphics->clip, CombineModeIntersect)) != Ok)
2107         goto end;
2108
2109     stat = GdipCombineRegionRegion(rgn, tmp, CombineModeReplace);
2110
2111 end:
2112     GdipDeleteRegion(tmp);
2113     return stat;
2114 }
2115
2116 void get_font_hfont(GpGraphics *graphics, GDIPCONST GpFont *font, HFONT *hfont)
2117 {
2118     HDC hdc = CreateCompatibleDC(0);
2119     GpPointF pt[3];
2120     REAL angle, rel_width, rel_height;
2121     LOGFONTW lfw;
2122     HFONT unscaled_font;
2123     TEXTMETRICW textmet;
2124
2125     pt[0].X = 0.0;
2126     pt[0].Y = 0.0;
2127     pt[1].X = 1.0;
2128     pt[1].Y = 0.0;
2129     pt[2].X = 0.0;
2130     pt[2].Y = 1.0;
2131     if (graphics)
2132         GdipTransformPoints(graphics, CoordinateSpaceDevice, CoordinateSpaceWorld, pt, 3);
2133     angle = -gdiplus_atan2((pt[1].Y - pt[0].Y), (pt[1].X - pt[0].X));
2134     rel_width = sqrt((pt[1].Y-pt[0].Y)*(pt[1].Y-pt[0].Y)+
2135                      (pt[1].X-pt[0].X)*(pt[1].X-pt[0].X));
2136     rel_height = sqrt((pt[2].Y-pt[0].Y)*(pt[2].Y-pt[0].Y)+
2137                       (pt[2].X-pt[0].X)*(pt[2].X-pt[0].X));
2138
2139     lfw = font->lfw;
2140     lfw.lfHeight = roundr(-font->pixel_size * rel_height);
2141     unscaled_font = CreateFontIndirectW(&lfw);
2142
2143     SelectObject(hdc, unscaled_font);
2144     GetTextMetricsW(hdc, &textmet);
2145
2146     lfw = font->lfw;
2147     lfw.lfHeight = roundr(-font->pixel_size * rel_height);
2148     lfw.lfWidth = roundr(textmet.tmAveCharWidth * rel_width / rel_height);
2149     lfw.lfEscapement = lfw.lfOrientation = roundr((angle / M_PI) * 1800.0);
2150
2151     *hfont = CreateFontIndirectW(&lfw);
2152
2153     DeleteDC(hdc);
2154     DeleteObject(unscaled_font);
2155 }
2156
2157 GpStatus WINGDIPAPI GdipCreateFromHDC(HDC hdc, GpGraphics **graphics)
2158 {
2159     TRACE("(%p, %p)\n", hdc, graphics);
2160
2161     return GdipCreateFromHDC2(hdc, NULL, graphics);
2162 }
2163
2164 GpStatus WINGDIPAPI GdipCreateFromHDC2(HDC hdc, HANDLE hDevice, GpGraphics **graphics)
2165 {
2166     GpStatus retval;
2167
2168     TRACE("(%p, %p, %p)\n", hdc, hDevice, graphics);
2169
2170     if(hDevice != NULL) {
2171         FIXME("Don't know how to handle parameter hDevice\n");
2172         return NotImplemented;
2173     }
2174
2175     if(hdc == NULL)
2176         return OutOfMemory;
2177
2178     if(graphics == NULL)
2179         return InvalidParameter;
2180
2181     *graphics = GdipAlloc(sizeof(GpGraphics));
2182     if(!*graphics)  return OutOfMemory;
2183
2184     if((retval = GdipCreateMatrix(&(*graphics)->worldtrans)) != Ok){
2185         GdipFree(*graphics);
2186         return retval;
2187     }
2188
2189     if((retval = GdipCreateRegion(&(*graphics)->clip)) != Ok){
2190         GdipFree((*graphics)->worldtrans);
2191         GdipFree(*graphics);
2192         return retval;
2193     }
2194
2195     (*graphics)->hdc = hdc;
2196     (*graphics)->hwnd = WindowFromDC(hdc);
2197     (*graphics)->owndc = FALSE;
2198     (*graphics)->smoothing = SmoothingModeDefault;
2199     (*graphics)->compqual = CompositingQualityDefault;
2200     (*graphics)->interpolation = InterpolationModeBilinear;
2201     (*graphics)->pixeloffset = PixelOffsetModeDefault;
2202     (*graphics)->compmode = CompositingModeSourceOver;
2203     (*graphics)->unit = UnitDisplay;
2204     (*graphics)->scale = 1.0;
2205     (*graphics)->busy = FALSE;
2206     (*graphics)->textcontrast = 4;
2207     list_init(&(*graphics)->containers);
2208     (*graphics)->contid = 0;
2209
2210     TRACE("<-- %p\n", *graphics);
2211
2212     return Ok;
2213 }
2214
2215 GpStatus graphics_from_image(GpImage *image, GpGraphics **graphics)
2216 {
2217     GpStatus retval;
2218
2219     *graphics = GdipAlloc(sizeof(GpGraphics));
2220     if(!*graphics)  return OutOfMemory;
2221
2222     if((retval = GdipCreateMatrix(&(*graphics)->worldtrans)) != Ok){
2223         GdipFree(*graphics);
2224         return retval;
2225     }
2226
2227     if((retval = GdipCreateRegion(&(*graphics)->clip)) != Ok){
2228         GdipFree((*graphics)->worldtrans);
2229         GdipFree(*graphics);
2230         return retval;
2231     }
2232
2233     (*graphics)->hdc = NULL;
2234     (*graphics)->hwnd = NULL;
2235     (*graphics)->owndc = FALSE;
2236     (*graphics)->image = image;
2237     (*graphics)->smoothing = SmoothingModeDefault;
2238     (*graphics)->compqual = CompositingQualityDefault;
2239     (*graphics)->interpolation = InterpolationModeBilinear;
2240     (*graphics)->pixeloffset = PixelOffsetModeDefault;
2241     (*graphics)->compmode = CompositingModeSourceOver;
2242     (*graphics)->unit = UnitDisplay;
2243     (*graphics)->scale = 1.0;
2244     (*graphics)->busy = FALSE;
2245     (*graphics)->textcontrast = 4;
2246     list_init(&(*graphics)->containers);
2247     (*graphics)->contid = 0;
2248
2249     TRACE("<-- %p\n", *graphics);
2250
2251     return Ok;
2252 }
2253
2254 GpStatus WINGDIPAPI GdipCreateFromHWND(HWND hwnd, GpGraphics **graphics)
2255 {
2256     GpStatus ret;
2257     HDC hdc;
2258
2259     TRACE("(%p, %p)\n", hwnd, graphics);
2260
2261     hdc = GetDC(hwnd);
2262
2263     if((ret = GdipCreateFromHDC(hdc, graphics)) != Ok)
2264     {
2265         ReleaseDC(hwnd, hdc);
2266         return ret;
2267     }
2268
2269     (*graphics)->hwnd = hwnd;
2270     (*graphics)->owndc = TRUE;
2271
2272     return Ok;
2273 }
2274
2275 /* FIXME: no icm handling */
2276 GpStatus WINGDIPAPI GdipCreateFromHWNDICM(HWND hwnd, GpGraphics **graphics)
2277 {
2278     TRACE("(%p, %p)\n", hwnd, graphics);
2279
2280     return GdipCreateFromHWND(hwnd, graphics);
2281 }
2282
2283 GpStatus WINGDIPAPI GdipCreateMetafileFromEmf(HENHMETAFILE hemf, BOOL delete,
2284     GpMetafile **metafile)
2285 {
2286     IStream *stream = NULL;
2287     UINT read;
2288     ENHMETAHEADER *copy;
2289     GpStatus retval = Ok;
2290
2291     TRACE("(%p,%i,%p)\n", hemf, delete, metafile);
2292
2293     if(!hemf || !metafile)
2294         return InvalidParameter;
2295
2296     read = GetEnhMetaFileBits(hemf, 0, NULL);
2297     copy = GdipAlloc(read);
2298     GetEnhMetaFileBits(hemf, read, (BYTE *)copy);
2299
2300     if(CreateStreamOnHGlobal(copy, TRUE, &stream) != S_OK){
2301         ERR("could not make stream\n");
2302         GdipFree(copy);
2303         retval = GenericError;
2304         goto err;
2305     }
2306
2307     *metafile = GdipAlloc(sizeof(GpMetafile));
2308     if(!*metafile){
2309         retval = OutOfMemory;
2310         goto err;
2311     }
2312
2313     if(OleLoadPicture(stream, 0, FALSE, &IID_IPicture,
2314         (LPVOID*) &((*metafile)->image.picture)) != S_OK)
2315     {
2316         retval = GenericError;
2317         goto err;
2318     }
2319
2320
2321     (*metafile)->image.type = ImageTypeMetafile;
2322     memcpy(&(*metafile)->image.format, &ImageFormatWMF, sizeof(GUID));
2323     (*metafile)->image.palette_flags = 0;
2324     (*metafile)->image.palette_count = 0;
2325     (*metafile)->image.palette_size = 0;
2326     (*metafile)->image.palette_entries = NULL;
2327     (*metafile)->image.xres = (REAL)copy->szlDevice.cx;
2328     (*metafile)->image.yres = (REAL)copy->szlDevice.cy;
2329     (*metafile)->bounds.X = (REAL)copy->rclBounds.left;
2330     (*metafile)->bounds.Y = (REAL)copy->rclBounds.top;
2331     (*metafile)->bounds.Width = (REAL)(copy->rclBounds.right - copy->rclBounds.left);
2332     (*metafile)->bounds.Height = (REAL)(copy->rclBounds.bottom - copy->rclBounds.top);
2333     (*metafile)->unit = UnitPixel;
2334
2335     if(delete)
2336         DeleteEnhMetaFile(hemf);
2337
2338     TRACE("<-- %p\n", *metafile);
2339
2340 err:
2341     if (retval != Ok)
2342         GdipFree(*metafile);
2343     IStream_Release(stream);
2344     return retval;
2345 }
2346
2347 GpStatus WINGDIPAPI GdipCreateMetafileFromWmf(HMETAFILE hwmf, BOOL delete,
2348     GDIPCONST WmfPlaceableFileHeader * placeable, GpMetafile **metafile)
2349 {
2350     UINT read;
2351     BYTE *copy;
2352     HENHMETAFILE hemf;
2353     GpStatus retval = Ok;
2354
2355     TRACE("(%p, %d, %p, %p)\n", hwmf, delete, placeable, metafile);
2356
2357     if(!hwmf || !metafile || !placeable)
2358         return InvalidParameter;
2359
2360     *metafile = NULL;
2361     read = GetMetaFileBitsEx(hwmf, 0, NULL);
2362     if(!read)
2363         return GenericError;
2364     copy = GdipAlloc(read);
2365     GetMetaFileBitsEx(hwmf, read, copy);
2366
2367     hemf = SetWinMetaFileBits(read, copy, NULL, NULL);
2368     GdipFree(copy);
2369
2370     retval = GdipCreateMetafileFromEmf(hemf, FALSE, metafile);
2371
2372     if (retval == Ok)
2373     {
2374         (*metafile)->image.xres = (REAL)placeable->Inch;
2375         (*metafile)->image.yres = (REAL)placeable->Inch;
2376         (*metafile)->bounds.X = ((REAL)placeable->BoundingBox.Left) / ((REAL)placeable->Inch);
2377         (*metafile)->bounds.Y = ((REAL)placeable->BoundingBox.Top) / ((REAL)placeable->Inch);
2378         (*metafile)->bounds.Width = (REAL)(placeable->BoundingBox.Right -
2379                                            placeable->BoundingBox.Left);
2380         (*metafile)->bounds.Height = (REAL)(placeable->BoundingBox.Bottom -
2381                                             placeable->BoundingBox.Top);
2382
2383         if (delete) DeleteMetaFile(hwmf);
2384     }
2385     return retval;
2386 }
2387
2388 GpStatus WINGDIPAPI GdipCreateMetafileFromWmfFile(GDIPCONST WCHAR *file,
2389     GDIPCONST WmfPlaceableFileHeader * placeable, GpMetafile **metafile)
2390 {
2391     HMETAFILE hmf = GetMetaFileW(file);
2392
2393     TRACE("(%s, %p, %p)\n", debugstr_w(file), placeable, metafile);
2394
2395     if(!hmf) return InvalidParameter;
2396
2397     return GdipCreateMetafileFromWmf(hmf, TRUE, placeable, metafile);
2398 }
2399
2400 GpStatus WINGDIPAPI GdipCreateMetafileFromFile(GDIPCONST WCHAR *file,
2401     GpMetafile **metafile)
2402 {
2403     FIXME("(%p, %p): stub\n", file, metafile);
2404     return NotImplemented;
2405 }
2406
2407 GpStatus WINGDIPAPI GdipCreateMetafileFromStream(IStream *stream,
2408     GpMetafile **metafile)
2409 {
2410     FIXME("(%p, %p): stub\n", stream, metafile);
2411     return NotImplemented;
2412 }
2413
2414 GpStatus WINGDIPAPI GdipCreateStreamOnFile(GDIPCONST WCHAR * filename,
2415     UINT access, IStream **stream)
2416 {
2417     DWORD dwMode;
2418     HRESULT ret;
2419
2420     TRACE("(%s, %u, %p)\n", debugstr_w(filename), access, stream);
2421
2422     if(!stream || !filename)
2423         return InvalidParameter;
2424
2425     if(access & GENERIC_WRITE)
2426         dwMode = STGM_SHARE_DENY_WRITE | STGM_WRITE | STGM_CREATE;
2427     else if(access & GENERIC_READ)
2428         dwMode = STGM_SHARE_DENY_WRITE | STGM_READ | STGM_FAILIFTHERE;
2429     else
2430         return InvalidParameter;
2431
2432     ret = SHCreateStreamOnFileW(filename, dwMode, stream);
2433
2434     return hresult_to_status(ret);
2435 }
2436
2437 GpStatus WINGDIPAPI GdipDeleteGraphics(GpGraphics *graphics)
2438 {
2439     GraphicsContainerItem *cont, *next;
2440     GpStatus stat;
2441     TRACE("(%p)\n", graphics);
2442
2443     if(!graphics) return InvalidParameter;
2444     if(graphics->busy) return ObjectBusy;
2445
2446     if (graphics->image && graphics->image->type == ImageTypeMetafile)
2447     {
2448         stat = METAFILE_GraphicsDeleted((GpMetafile*)graphics->image);
2449         if (stat != Ok)
2450             return stat;
2451     }
2452
2453     if(graphics->owndc)
2454         ReleaseDC(graphics->hwnd, graphics->hdc);
2455
2456     LIST_FOR_EACH_ENTRY_SAFE(cont, next, &graphics->containers, GraphicsContainerItem, entry){
2457         list_remove(&cont->entry);
2458         delete_container(cont);
2459     }
2460
2461     GdipDeleteRegion(graphics->clip);
2462     GdipDeleteMatrix(graphics->worldtrans);
2463     GdipFree(graphics);
2464
2465     return Ok;
2466 }
2467
2468 GpStatus WINGDIPAPI GdipDrawArc(GpGraphics *graphics, GpPen *pen, REAL x,
2469     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
2470 {
2471     INT save_state, num_pts;
2472     GpPointF points[MAX_ARC_PTS];
2473     GpStatus retval;
2474
2475     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y,
2476           width, height, startAngle, sweepAngle);
2477
2478     if(!graphics || !pen || width <= 0 || height <= 0)
2479         return InvalidParameter;
2480
2481     if(graphics->busy)
2482         return ObjectBusy;
2483
2484     if (!graphics->hdc)
2485     {
2486         FIXME("graphics object has no HDC\n");
2487         return Ok;
2488     }
2489
2490     num_pts = arc2polybezier(points, x, y, width, height, startAngle, sweepAngle);
2491
2492     save_state = prepare_dc(graphics, pen);
2493
2494     retval = draw_polybezier(graphics, pen, points, num_pts, TRUE);
2495
2496     restore_dc(graphics, save_state);
2497
2498     return retval;
2499 }
2500
2501 GpStatus WINGDIPAPI GdipDrawArcI(GpGraphics *graphics, GpPen *pen, INT x,
2502     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
2503 {
2504     TRACE("(%p, %p, %d, %d, %d, %d, %.2f, %.2f)\n", graphics, pen, x, y,
2505           width, height, startAngle, sweepAngle);
2506
2507     return GdipDrawArc(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
2508 }
2509
2510 GpStatus WINGDIPAPI GdipDrawBezier(GpGraphics *graphics, GpPen *pen, REAL x1,
2511     REAL y1, REAL x2, REAL y2, REAL x3, REAL y3, REAL x4, REAL y4)
2512 {
2513     INT save_state;
2514     GpPointF pt[4];
2515     GpStatus retval;
2516
2517     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x1, y1,
2518           x2, y2, x3, y3, x4, y4);
2519
2520     if(!graphics || !pen)
2521         return InvalidParameter;
2522
2523     if(graphics->busy)
2524         return ObjectBusy;
2525
2526     if (!graphics->hdc)
2527     {
2528         FIXME("graphics object has no HDC\n");
2529         return Ok;
2530     }
2531
2532     pt[0].X = x1;
2533     pt[0].Y = y1;
2534     pt[1].X = x2;
2535     pt[1].Y = y2;
2536     pt[2].X = x3;
2537     pt[2].Y = y3;
2538     pt[3].X = x4;
2539     pt[3].Y = y4;
2540
2541     save_state = prepare_dc(graphics, pen);
2542
2543     retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
2544
2545     restore_dc(graphics, save_state);
2546
2547     return retval;
2548 }
2549
2550 GpStatus WINGDIPAPI GdipDrawBezierI(GpGraphics *graphics, GpPen *pen, INT x1,
2551     INT y1, INT x2, INT y2, INT x3, INT y3, INT x4, INT y4)
2552 {
2553     INT save_state;
2554     GpPointF pt[4];
2555     GpStatus retval;
2556
2557     TRACE("(%p, %p, %d, %d, %d, %d, %d, %d, %d, %d)\n", graphics, pen, x1, y1,
2558           x2, y2, x3, y3, x4, y4);
2559
2560     if(!graphics || !pen)
2561         return InvalidParameter;
2562
2563     if(graphics->busy)
2564         return ObjectBusy;
2565
2566     if (!graphics->hdc)
2567     {
2568         FIXME("graphics object has no HDC\n");
2569         return Ok;
2570     }
2571
2572     pt[0].X = x1;
2573     pt[0].Y = y1;
2574     pt[1].X = x2;
2575     pt[1].Y = y2;
2576     pt[2].X = x3;
2577     pt[2].Y = y3;
2578     pt[3].X = x4;
2579     pt[3].Y = y4;
2580
2581     save_state = prepare_dc(graphics, pen);
2582
2583     retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
2584
2585     restore_dc(graphics, save_state);
2586
2587     return retval;
2588 }
2589
2590 GpStatus WINGDIPAPI GdipDrawBeziers(GpGraphics *graphics, GpPen *pen,
2591     GDIPCONST GpPointF *points, INT count)
2592 {
2593     INT i;
2594     GpStatus ret;
2595
2596     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2597
2598     if(!graphics || !pen || !points || (count <= 0))
2599         return InvalidParameter;
2600
2601     if(graphics->busy)
2602         return ObjectBusy;
2603
2604     for(i = 0; i < floor(count / 4); i++){
2605         ret = GdipDrawBezier(graphics, pen,
2606                              points[4*i].X, points[4*i].Y,
2607                              points[4*i + 1].X, points[4*i + 1].Y,
2608                              points[4*i + 2].X, points[4*i + 2].Y,
2609                              points[4*i + 3].X, points[4*i + 3].Y);
2610         if(ret != Ok)
2611             return ret;
2612     }
2613
2614     return Ok;
2615 }
2616
2617 GpStatus WINGDIPAPI GdipDrawBeziersI(GpGraphics *graphics, GpPen *pen,
2618     GDIPCONST GpPoint *points, INT count)
2619 {
2620     GpPointF *pts;
2621     GpStatus ret;
2622     INT i;
2623
2624     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2625
2626     if(!graphics || !pen || !points || (count <= 0))
2627         return InvalidParameter;
2628
2629     if(graphics->busy)
2630         return ObjectBusy;
2631
2632     pts = GdipAlloc(sizeof(GpPointF) * count);
2633     if(!pts)
2634         return OutOfMemory;
2635
2636     for(i = 0; i < count; i++){
2637         pts[i].X = (REAL)points[i].X;
2638         pts[i].Y = (REAL)points[i].Y;
2639     }
2640
2641     ret = GdipDrawBeziers(graphics,pen,pts,count);
2642
2643     GdipFree(pts);
2644
2645     return ret;
2646 }
2647
2648 GpStatus WINGDIPAPI GdipDrawClosedCurve(GpGraphics *graphics, GpPen *pen,
2649     GDIPCONST GpPointF *points, INT count)
2650 {
2651     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2652
2653     return GdipDrawClosedCurve2(graphics, pen, points, count, 1.0);
2654 }
2655
2656 GpStatus WINGDIPAPI GdipDrawClosedCurveI(GpGraphics *graphics, GpPen *pen,
2657     GDIPCONST GpPoint *points, INT count)
2658 {
2659     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2660
2661     return GdipDrawClosedCurve2I(graphics, pen, points, count, 1.0);
2662 }
2663
2664 GpStatus WINGDIPAPI GdipDrawClosedCurve2(GpGraphics *graphics, GpPen *pen,
2665     GDIPCONST GpPointF *points, INT count, REAL tension)
2666 {
2667     GpPath *path;
2668     GpStatus stat;
2669
2670     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
2671
2672     if(!graphics || !pen || !points || count <= 0)
2673         return InvalidParameter;
2674
2675     if(graphics->busy)
2676         return ObjectBusy;
2677
2678     if((stat = GdipCreatePath(FillModeAlternate, &path)) != Ok)
2679         return stat;
2680
2681     stat = GdipAddPathClosedCurve2(path, points, count, tension);
2682     if(stat != Ok){
2683         GdipDeletePath(path);
2684         return stat;
2685     }
2686
2687     stat = GdipDrawPath(graphics, pen, path);
2688
2689     GdipDeletePath(path);
2690
2691     return stat;
2692 }
2693
2694 GpStatus WINGDIPAPI GdipDrawClosedCurve2I(GpGraphics *graphics, GpPen *pen,
2695     GDIPCONST GpPoint *points, INT count, REAL tension)
2696 {
2697     GpPointF *ptf;
2698     GpStatus stat;
2699     INT i;
2700
2701     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
2702
2703     if(!points || count <= 0)
2704         return InvalidParameter;
2705
2706     ptf = GdipAlloc(sizeof(GpPointF)*count);
2707     if(!ptf)
2708         return OutOfMemory;
2709
2710     for(i = 0; i < count; i++){
2711         ptf[i].X = (REAL)points[i].X;
2712         ptf[i].Y = (REAL)points[i].Y;
2713     }
2714
2715     stat = GdipDrawClosedCurve2(graphics, pen, ptf, count, tension);
2716
2717     GdipFree(ptf);
2718
2719     return stat;
2720 }
2721
2722 GpStatus WINGDIPAPI GdipDrawCurve(GpGraphics *graphics, GpPen *pen,
2723     GDIPCONST GpPointF *points, INT count)
2724 {
2725     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2726
2727     return GdipDrawCurve2(graphics,pen,points,count,1.0);
2728 }
2729
2730 GpStatus WINGDIPAPI GdipDrawCurveI(GpGraphics *graphics, GpPen *pen,
2731     GDIPCONST GpPoint *points, INT count)
2732 {
2733     GpPointF *pointsF;
2734     GpStatus ret;
2735     INT i;
2736
2737     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2738
2739     if(!points)
2740         return InvalidParameter;
2741
2742     pointsF = GdipAlloc(sizeof(GpPointF)*count);
2743     if(!pointsF)
2744         return OutOfMemory;
2745
2746     for(i = 0; i < count; i++){
2747         pointsF[i].X = (REAL)points[i].X;
2748         pointsF[i].Y = (REAL)points[i].Y;
2749     }
2750
2751     ret = GdipDrawCurve(graphics,pen,pointsF,count);
2752     GdipFree(pointsF);
2753
2754     return ret;
2755 }
2756
2757 /* Approximates cardinal spline with Bezier curves. */
2758 GpStatus WINGDIPAPI GdipDrawCurve2(GpGraphics *graphics, GpPen *pen,
2759     GDIPCONST GpPointF *points, INT count, REAL tension)
2760 {
2761     /* PolyBezier expects count*3-2 points. */
2762     INT i, len_pt = count*3-2, save_state;
2763     GpPointF *pt;
2764     REAL x1, x2, y1, y2;
2765     GpStatus retval;
2766
2767     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
2768
2769     if(!graphics || !pen)
2770         return InvalidParameter;
2771
2772     if(graphics->busy)
2773         return ObjectBusy;
2774
2775     if(count < 2)
2776         return InvalidParameter;
2777
2778     if (!graphics->hdc)
2779     {
2780         FIXME("graphics object has no HDC\n");
2781         return Ok;
2782     }
2783
2784     pt = GdipAlloc(len_pt * sizeof(GpPointF));
2785     if(!pt)
2786         return OutOfMemory;
2787
2788     tension = tension * TENSION_CONST;
2789
2790     calc_curve_bezier_endp(points[0].X, points[0].Y, points[1].X, points[1].Y,
2791         tension, &x1, &y1);
2792
2793     pt[0].X = points[0].X;
2794     pt[0].Y = points[0].Y;
2795     pt[1].X = x1;
2796     pt[1].Y = y1;
2797
2798     for(i = 0; i < count-2; i++){
2799         calc_curve_bezier(&(points[i]), tension, &x1, &y1, &x2, &y2);
2800
2801         pt[3*i+2].X = x1;
2802         pt[3*i+2].Y = y1;
2803         pt[3*i+3].X = points[i+1].X;
2804         pt[3*i+3].Y = points[i+1].Y;
2805         pt[3*i+4].X = x2;
2806         pt[3*i+4].Y = y2;
2807     }
2808
2809     calc_curve_bezier_endp(points[count-1].X, points[count-1].Y,
2810         points[count-2].X, points[count-2].Y, tension, &x1, &y1);
2811
2812     pt[len_pt-2].X = x1;
2813     pt[len_pt-2].Y = y1;
2814     pt[len_pt-1].X = points[count-1].X;
2815     pt[len_pt-1].Y = points[count-1].Y;
2816
2817     save_state = prepare_dc(graphics, pen);
2818
2819     retval = draw_polybezier(graphics, pen, pt, len_pt, TRUE);
2820
2821     GdipFree(pt);
2822     restore_dc(graphics, save_state);
2823
2824     return retval;
2825 }
2826
2827 GpStatus WINGDIPAPI GdipDrawCurve2I(GpGraphics *graphics, GpPen *pen,
2828     GDIPCONST GpPoint *points, INT count, REAL tension)
2829 {
2830     GpPointF *pointsF;
2831     GpStatus ret;
2832     INT i;
2833
2834     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
2835
2836     if(!points)
2837         return InvalidParameter;
2838
2839     pointsF = GdipAlloc(sizeof(GpPointF)*count);
2840     if(!pointsF)
2841         return OutOfMemory;
2842
2843     for(i = 0; i < count; i++){
2844         pointsF[i].X = (REAL)points[i].X;
2845         pointsF[i].Y = (REAL)points[i].Y;
2846     }
2847
2848     ret = GdipDrawCurve2(graphics,pen,pointsF,count,tension);
2849     GdipFree(pointsF);
2850
2851     return ret;
2852 }
2853
2854 GpStatus WINGDIPAPI GdipDrawCurve3(GpGraphics *graphics, GpPen *pen,
2855     GDIPCONST GpPointF *points, INT count, INT offset, INT numberOfSegments,
2856     REAL tension)
2857 {
2858     TRACE("(%p, %p, %p, %d, %d, %d, %.2f)\n", graphics, pen, points, count, offset, numberOfSegments, tension);
2859
2860     if(offset >= count || numberOfSegments > count - offset - 1 || numberOfSegments <= 0){
2861         return InvalidParameter;
2862     }
2863
2864     return GdipDrawCurve2(graphics, pen, points + offset, numberOfSegments + 1, tension);
2865 }
2866
2867 GpStatus WINGDIPAPI GdipDrawCurve3I(GpGraphics *graphics, GpPen *pen,
2868     GDIPCONST GpPoint *points, INT count, INT offset, INT numberOfSegments,
2869     REAL tension)
2870 {
2871     TRACE("(%p, %p, %p, %d, %d, %d, %.2f)\n", graphics, pen, points, count, offset, numberOfSegments, tension);
2872
2873     if(count < 0){
2874         return OutOfMemory;
2875     }
2876
2877     if(offset >= count || numberOfSegments > count - offset - 1 || numberOfSegments <= 0){
2878         return InvalidParameter;
2879     }
2880
2881     return GdipDrawCurve2I(graphics, pen, points + offset, numberOfSegments + 1, tension);
2882 }
2883
2884 GpStatus WINGDIPAPI GdipDrawEllipse(GpGraphics *graphics, GpPen *pen, REAL x,
2885     REAL y, REAL width, REAL height)
2886 {
2887     INT save_state;
2888     GpPointF ptf[2];
2889     POINT pti[2];
2890
2891     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y, width, height);
2892
2893     if(!graphics || !pen)
2894         return InvalidParameter;
2895
2896     if(graphics->busy)
2897         return ObjectBusy;
2898
2899     if (!graphics->hdc)
2900     {
2901         FIXME("graphics object has no HDC\n");
2902         return Ok;
2903     }
2904
2905     ptf[0].X = x;
2906     ptf[0].Y = y;
2907     ptf[1].X = x + width;
2908     ptf[1].Y = y + height;
2909
2910     save_state = prepare_dc(graphics, pen);
2911     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
2912
2913     transform_and_round_points(graphics, pti, ptf, 2);
2914
2915     Ellipse(graphics->hdc, pti[0].x, pti[0].y, pti[1].x, pti[1].y);
2916
2917     restore_dc(graphics, save_state);
2918
2919     return Ok;
2920 }
2921
2922 GpStatus WINGDIPAPI GdipDrawEllipseI(GpGraphics *graphics, GpPen *pen, INT x,
2923     INT y, INT width, INT height)
2924 {
2925     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, pen, x, y, width, height);
2926
2927     return GdipDrawEllipse(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
2928 }
2929
2930
2931 GpStatus WINGDIPAPI GdipDrawImage(GpGraphics *graphics, GpImage *image, REAL x, REAL y)
2932 {
2933     UINT width, height;
2934     GpPointF points[3];
2935
2936     TRACE("(%p, %p, %.2f, %.2f)\n", graphics, image, x, y);
2937
2938     if(!graphics || !image)
2939         return InvalidParameter;
2940
2941     GdipGetImageWidth(image, &width);
2942     GdipGetImageHeight(image, &height);
2943
2944     /* FIXME: we should use the graphics and image dpi, somehow */
2945
2946     points[0].X = points[2].X = x;
2947     points[0].Y = points[1].Y = y;
2948     points[1].X = x + width;
2949     points[2].Y = y + height;
2950
2951     return GdipDrawImagePointsRect(graphics, image, points, 3, 0, 0, width, height,
2952         UnitPixel, NULL, NULL, NULL);
2953 }
2954
2955 GpStatus WINGDIPAPI GdipDrawImageI(GpGraphics *graphics, GpImage *image, INT x,
2956     INT y)
2957 {
2958     TRACE("(%p, %p, %d, %d)\n", graphics, image, x, y);
2959
2960     return GdipDrawImage(graphics, image, (REAL)x, (REAL)y);
2961 }
2962
2963 GpStatus WINGDIPAPI GdipDrawImagePointRect(GpGraphics *graphics, GpImage *image,
2964     REAL x, REAL y, REAL srcx, REAL srcy, REAL srcwidth, REAL srcheight,
2965     GpUnit srcUnit)
2966 {
2967     GpPointF points[3];
2968     TRACE("(%p, %p, %f, %f, %f, %f, %f, %f, %d)\n", graphics, image, x, y, srcx, srcy, srcwidth, srcheight, srcUnit);
2969
2970     points[0].X = points[2].X = x;
2971     points[0].Y = points[1].Y = y;
2972
2973     /* FIXME: convert image coordinates to Graphics coordinates? */
2974     points[1].X = x + srcwidth;
2975     points[2].Y = y + srcheight;
2976
2977     return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
2978         srcwidth, srcheight, srcUnit, NULL, NULL, NULL);
2979 }
2980
2981 GpStatus WINGDIPAPI GdipDrawImagePointRectI(GpGraphics *graphics, GpImage *image,
2982     INT x, INT y, INT srcx, INT srcy, INT srcwidth, INT srcheight,
2983     GpUnit srcUnit)
2984 {
2985     return GdipDrawImagePointRect(graphics, image, x, y, srcx, srcy, srcwidth, srcheight, srcUnit);
2986 }
2987
2988 GpStatus WINGDIPAPI GdipDrawImagePoints(GpGraphics *graphics, GpImage *image,
2989     GDIPCONST GpPointF *dstpoints, INT count)
2990 {
2991     UINT width, height;
2992
2993     TRACE("(%p, %p, %p, %d)\n", graphics, image, dstpoints, count);
2994
2995     if(!image)
2996         return InvalidParameter;
2997
2998     GdipGetImageWidth(image, &width);
2999     GdipGetImageHeight(image, &height);
3000
3001     return GdipDrawImagePointsRect(graphics, image, dstpoints, count, 0, 0,
3002         width, height, UnitPixel, NULL, NULL, NULL);
3003 }
3004
3005 GpStatus WINGDIPAPI GdipDrawImagePointsI(GpGraphics *graphics, GpImage *image,
3006     GDIPCONST GpPoint *dstpoints, INT count)
3007 {
3008     GpPointF ptf[3];
3009
3010     TRACE("(%p, %p, %p, %d)\n", graphics, image, dstpoints, count);
3011
3012     if (count != 3 || !dstpoints)
3013         return InvalidParameter;
3014
3015     ptf[0].X = (REAL)dstpoints[0].X;
3016     ptf[0].Y = (REAL)dstpoints[0].Y;
3017     ptf[1].X = (REAL)dstpoints[1].X;
3018     ptf[1].Y = (REAL)dstpoints[1].Y;
3019     ptf[2].X = (REAL)dstpoints[2].X;
3020     ptf[2].Y = (REAL)dstpoints[2].Y;
3021
3022     return GdipDrawImagePoints(graphics, image, ptf, count);
3023 }
3024
3025 GpStatus WINGDIPAPI GdipDrawImagePointsRect(GpGraphics *graphics, GpImage *image,
3026      GDIPCONST GpPointF *points, INT count, REAL srcx, REAL srcy, REAL srcwidth,
3027      REAL srcheight, GpUnit srcUnit, GDIPCONST GpImageAttributes* imageAttributes,
3028      DrawImageAbort callback, VOID * callbackData)
3029 {
3030     GpPointF ptf[4];
3031     POINT pti[4];
3032     REAL dx, dy;
3033     GpStatus stat;
3034
3035     TRACE("(%p, %p, %p, %d, %f, %f, %f, %f, %d, %p, %p, %p)\n", graphics, image, points,
3036           count, srcx, srcy, srcwidth, srcheight, srcUnit, imageAttributes, callback,
3037           callbackData);
3038
3039     if (count > 3)
3040         return NotImplemented;
3041
3042     if(!graphics || !image || !points || count != 3)
3043          return InvalidParameter;
3044
3045     TRACE("%s %s %s\n", debugstr_pointf(&points[0]), debugstr_pointf(&points[1]),
3046         debugstr_pointf(&points[2]));
3047
3048     memcpy(ptf, points, 3 * sizeof(GpPointF));
3049     ptf[3].X = ptf[2].X + ptf[1].X - ptf[0].X;
3050     ptf[3].Y = ptf[2].Y + ptf[1].Y - ptf[0].Y;
3051     if (!srcwidth || !srcheight || ptf[3].X == ptf[0].X || ptf[3].Y == ptf[0].Y)
3052         return Ok;
3053     transform_and_round_points(graphics, pti, ptf, 4);
3054
3055     if (image->picture)
3056     {
3057         if (!graphics->hdc)
3058         {
3059             FIXME("graphics object has no HDC\n");
3060         }
3061
3062         /* FIXME: partially implemented (only works for rectangular parallelograms) */
3063         if(srcUnit == UnitInch)
3064             dx = dy = (REAL) INCH_HIMETRIC;
3065         else if(srcUnit == UnitPixel){
3066             dx = ((REAL) INCH_HIMETRIC) /
3067                  ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSX));
3068             dy = ((REAL) INCH_HIMETRIC) /
3069                  ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSY));
3070         }
3071         else
3072             return NotImplemented;
3073
3074         if(IPicture_Render(image->picture, graphics->hdc,
3075             pti[0].x, pti[0].y, pti[1].x - pti[0].x, pti[2].y - pti[0].y,
3076             srcx * dx, srcy * dy,
3077             srcwidth * dx, srcheight * dy,
3078             NULL) != S_OK){
3079             if(callback)
3080                 callback(callbackData);
3081             return GenericError;
3082         }
3083     }
3084     else if (image->type == ImageTypeBitmap)
3085     {
3086         GpBitmap* bitmap = (GpBitmap*)image;
3087         int use_software=0;
3088
3089         if (srcUnit == UnitInch)
3090             dx = dy = 96.0; /* FIXME: use the image resolution */
3091         else if (srcUnit == UnitPixel)
3092             dx = dy = 1.0;
3093         else
3094             return NotImplemented;
3095
3096         srcx = srcx * dx;
3097         srcy = srcy * dy;
3098         srcwidth = srcwidth * dx;
3099         srcheight = srcheight * dy;
3100
3101         if (imageAttributes ||
3102             (graphics->image && graphics->image->type == ImageTypeBitmap) ||
3103             !((GpBitmap*)image)->hbitmap ||
3104             ptf[1].Y != ptf[0].Y || ptf[2].X != ptf[0].X ||
3105             ptf[1].X - ptf[0].X != srcwidth || ptf[2].Y - ptf[0].Y != srcheight ||
3106             srcx < 0 || srcy < 0 ||
3107             srcx + srcwidth > bitmap->width || srcy + srcheight > bitmap->height)
3108             use_software = 1;
3109
3110         if (use_software)
3111         {
3112             RECT dst_area;
3113             GpRect src_area;
3114             int i, x, y, src_stride, dst_stride;
3115             GpMatrix *dst_to_src;
3116             REAL m11, m12, m21, m22, mdx, mdy;
3117             LPBYTE src_data, dst_data;
3118             BitmapData lockeddata;
3119             InterpolationMode interpolation = graphics->interpolation;
3120             GpPointF dst_to_src_points[3] = {{0.0, 0.0}, {1.0, 0.0}, {0.0, 1.0}};
3121             REAL x_dx, x_dy, y_dx, y_dy;
3122             static const GpImageAttributes defaultImageAttributes = {WrapModeClamp, 0, FALSE};
3123
3124             if (!imageAttributes)
3125                 imageAttributes = &defaultImageAttributes;
3126
3127             dst_area.left = dst_area.right = pti[0].x;
3128             dst_area.top = dst_area.bottom = pti[0].y;
3129             for (i=1; i<4; i++)
3130             {
3131                 if (dst_area.left > pti[i].x) dst_area.left = pti[i].x;
3132                 if (dst_area.right < pti[i].x) dst_area.right = pti[i].x;
3133                 if (dst_area.top > pti[i].y) dst_area.top = pti[i].y;
3134                 if (dst_area.bottom < pti[i].y) dst_area.bottom = pti[i].y;
3135             }
3136
3137             m11 = (ptf[1].X - ptf[0].X) / srcwidth;
3138             m21 = (ptf[2].X - ptf[0].X) / srcheight;
3139             mdx = ptf[0].X - m11 * srcx - m21 * srcy;
3140             m12 = (ptf[1].Y - ptf[0].Y) / srcwidth;
3141             m22 = (ptf[2].Y - ptf[0].Y) / srcheight;
3142             mdy = ptf[0].Y - m12 * srcx - m22 * srcy;
3143
3144             stat = GdipCreateMatrix2(m11, m12, m21, m22, mdx, mdy, &dst_to_src);
3145             if (stat != Ok) return stat;
3146
3147             stat = GdipInvertMatrix(dst_to_src);
3148             if (stat != Ok)
3149             {
3150                 GdipDeleteMatrix(dst_to_src);
3151                 return stat;
3152             }
3153
3154             dst_data = GdipAlloc(sizeof(ARGB) * (dst_area.right - dst_area.left) * (dst_area.bottom - dst_area.top));
3155             if (!dst_data)
3156             {
3157                 GdipDeleteMatrix(dst_to_src);
3158                 return OutOfMemory;
3159             }
3160
3161             dst_stride = sizeof(ARGB) * (dst_area.right - dst_area.left);
3162
3163             get_bitmap_sample_size(interpolation, imageAttributes->wrap,
3164                 bitmap, srcx, srcy, srcwidth, srcheight, &src_area);
3165
3166             src_data = GdipAlloc(sizeof(ARGB) * src_area.Width * src_area.Height);
3167             if (!src_data)
3168             {
3169                 GdipFree(dst_data);
3170                 GdipDeleteMatrix(dst_to_src);
3171                 return OutOfMemory;
3172             }
3173             src_stride = sizeof(ARGB) * src_area.Width;
3174
3175             /* Read the bits we need from the source bitmap into an ARGB buffer. */
3176             lockeddata.Width = src_area.Width;
3177             lockeddata.Height = src_area.Height;
3178             lockeddata.Stride = src_stride;
3179             lockeddata.PixelFormat = PixelFormat32bppARGB;
3180             lockeddata.Scan0 = src_data;
3181
3182             stat = GdipBitmapLockBits(bitmap, &src_area, ImageLockModeRead|ImageLockModeUserInputBuf,
3183                 PixelFormat32bppARGB, &lockeddata);
3184
3185             if (stat == Ok)
3186                 stat = GdipBitmapUnlockBits(bitmap, &lockeddata);
3187
3188             if (stat != Ok)
3189             {
3190                 if (src_data != dst_data)
3191                     GdipFree(src_data);
3192                 GdipFree(dst_data);
3193                 GdipDeleteMatrix(dst_to_src);
3194                 return OutOfMemory;
3195             }
3196
3197             apply_image_attributes(imageAttributes, src_data,
3198                 src_area.Width, src_area.Height,
3199                 src_stride, ColorAdjustTypeBitmap);
3200
3201             /* Transform the bits as needed to the destination. */
3202             GdipTransformMatrixPoints(dst_to_src, dst_to_src_points, 3);
3203
3204             x_dx = dst_to_src_points[1].X - dst_to_src_points[0].X;
3205             x_dy = dst_to_src_points[1].Y - dst_to_src_points[0].Y;
3206             y_dx = dst_to_src_points[2].X - dst_to_src_points[0].X;
3207             y_dy = dst_to_src_points[2].Y - dst_to_src_points[0].Y;
3208
3209             for (x=dst_area.left; x<dst_area.right; x++)
3210             {
3211                 for (y=dst_area.top; y<dst_area.bottom; y++)
3212                 {
3213                     GpPointF src_pointf;
3214                     ARGB *dst_color;
3215
3216                     src_pointf.X = dst_to_src_points[0].X + x * x_dx + y * y_dx;
3217                     src_pointf.Y = dst_to_src_points[0].Y + x * x_dy + y * y_dy;
3218
3219                     dst_color = (ARGB*)(dst_data + dst_stride * (y - dst_area.top) + sizeof(ARGB) * (x - dst_area.left));
3220
3221                     if (src_pointf.X >= srcx && src_pointf.X < srcx + srcwidth && src_pointf.Y >= srcy && src_pointf.Y < srcy+srcheight)
3222                         *dst_color = resample_bitmap_pixel(&src_area, src_data, bitmap->width, bitmap->height, &src_pointf, imageAttributes, interpolation);
3223                     else
3224                         *dst_color = 0;
3225                 }
3226             }
3227
3228             GdipDeleteMatrix(dst_to_src);
3229
3230             GdipFree(src_data);
3231
3232             stat = alpha_blend_pixels(graphics, dst_area.left, dst_area.top,
3233                 dst_data, dst_area.right - dst_area.left, dst_area.bottom - dst_area.top, dst_stride);
3234
3235             GdipFree(dst_data);
3236
3237             return stat;
3238         }
3239         else
3240         {
3241             HDC hdc;
3242             int temp_hdc=0, temp_bitmap=0;
3243             HBITMAP hbitmap, old_hbm=NULL;
3244
3245             if (!(bitmap->format == PixelFormat16bppRGB555 ||
3246                   bitmap->format == PixelFormat24bppRGB ||
3247                   bitmap->format == PixelFormat32bppRGB ||
3248                   bitmap->format == PixelFormat32bppPARGB))
3249             {
3250                 BITMAPINFOHEADER bih;
3251                 BYTE *temp_bits;
3252                 PixelFormat dst_format;
3253
3254                 /* we can't draw a bitmap of this format directly */
3255                 hdc = CreateCompatibleDC(0);
3256                 temp_hdc = 1;
3257                 temp_bitmap = 1;
3258
3259                 bih.biSize = sizeof(BITMAPINFOHEADER);
3260                 bih.biWidth = bitmap->width;
3261                 bih.biHeight = -bitmap->height;
3262                 bih.biPlanes = 1;
3263                 bih.biBitCount = 32;
3264                 bih.biCompression = BI_RGB;
3265                 bih.biSizeImage = 0;
3266                 bih.biXPelsPerMeter = 0;
3267                 bih.biYPelsPerMeter = 0;
3268                 bih.biClrUsed = 0;
3269                 bih.biClrImportant = 0;
3270
3271                 hbitmap = CreateDIBSection(hdc, (BITMAPINFO*)&bih, DIB_RGB_COLORS,
3272                     (void**)&temp_bits, NULL, 0);
3273
3274                 if (bitmap->format & (PixelFormatAlpha|PixelFormatPAlpha))
3275                     dst_format = PixelFormat32bppPARGB;
3276                 else
3277                     dst_format = PixelFormat32bppRGB;
3278
3279                 convert_pixels(bitmap->width, bitmap->height,
3280                     bitmap->width*4, temp_bits, dst_format,
3281                     bitmap->stride, bitmap->bits, bitmap->format, bitmap->image.palette_entries);
3282             }
3283             else
3284             {
3285                 hbitmap = bitmap->hbitmap;
3286                 hdc = bitmap->hdc;
3287                 temp_hdc = (hdc == 0);
3288             }
3289
3290             if (temp_hdc)
3291             {
3292                 if (!hdc) hdc = CreateCompatibleDC(0);
3293                 old_hbm = SelectObject(hdc, hbitmap);
3294             }
3295
3296             if (bitmap->format & (PixelFormatAlpha|PixelFormatPAlpha))
3297             {
3298                 gdi_alpha_blend(graphics, pti[0].x, pti[0].y, pti[1].x - pti[0].x, pti[2].y - pti[0].y,
3299                                 hdc, srcx, srcy, srcwidth, srcheight);
3300             }
3301             else
3302             {
3303                 StretchBlt(graphics->hdc, pti[0].x, pti[0].y, pti[1].x-pti[0].x, pti[2].y-pti[0].y,
3304                     hdc, srcx, srcy, srcwidth, srcheight, SRCCOPY);
3305             }
3306
3307             if (temp_hdc)
3308             {
3309                 SelectObject(hdc, old_hbm);
3310                 DeleteDC(hdc);
3311             }
3312
3313             if (temp_bitmap)
3314                 DeleteObject(hbitmap);
3315         }
3316     }
3317     else
3318     {
3319         ERR("GpImage with no IPicture or HBITMAP?!\n");
3320         return NotImplemented;
3321     }
3322
3323     return Ok;
3324 }
3325
3326 GpStatus WINGDIPAPI GdipDrawImagePointsRectI(GpGraphics *graphics, GpImage *image,
3327      GDIPCONST GpPoint *points, INT count, INT srcx, INT srcy, INT srcwidth,
3328      INT srcheight, GpUnit srcUnit, GDIPCONST GpImageAttributes* imageAttributes,
3329      DrawImageAbort callback, VOID * callbackData)
3330 {
3331     GpPointF pointsF[3];
3332     INT i;
3333
3334     TRACE("(%p, %p, %p, %d, %d, %d, %d, %d, %d, %p, %p, %p)\n", graphics, image, points, count,
3335           srcx, srcy, srcwidth, srcheight, srcUnit, imageAttributes, callback,
3336           callbackData);
3337
3338     if(!points || count!=3)
3339         return InvalidParameter;
3340
3341     for(i = 0; i < count; i++){
3342         pointsF[i].X = (REAL)points[i].X;
3343         pointsF[i].Y = (REAL)points[i].Y;
3344     }
3345
3346     return GdipDrawImagePointsRect(graphics, image, pointsF, count, (REAL)srcx, (REAL)srcy,
3347                                    (REAL)srcwidth, (REAL)srcheight, srcUnit, imageAttributes,
3348                                    callback, callbackData);
3349 }
3350
3351 GpStatus WINGDIPAPI GdipDrawImageRectRect(GpGraphics *graphics, GpImage *image,
3352     REAL dstx, REAL dsty, REAL dstwidth, REAL dstheight, REAL srcx, REAL srcy,
3353     REAL srcwidth, REAL srcheight, GpUnit srcUnit,
3354     GDIPCONST GpImageAttributes* imageattr, DrawImageAbort callback,
3355     VOID * callbackData)
3356 {
3357     GpPointF points[3];
3358
3359     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %d, %p, %p, %p)\n",
3360           graphics, image, dstx, dsty, dstwidth, dstheight, srcx, srcy,
3361           srcwidth, srcheight, srcUnit, imageattr, callback, callbackData);
3362
3363     points[0].X = dstx;
3364     points[0].Y = dsty;
3365     points[1].X = dstx + dstwidth;
3366     points[1].Y = dsty;
3367     points[2].X = dstx;
3368     points[2].Y = dsty + dstheight;
3369
3370     return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
3371                srcwidth, srcheight, srcUnit, imageattr, callback, callbackData);
3372 }
3373
3374 GpStatus WINGDIPAPI GdipDrawImageRectRectI(GpGraphics *graphics, GpImage *image,
3375         INT dstx, INT dsty, INT dstwidth, INT dstheight, INT srcx, INT srcy,
3376         INT srcwidth, INT srcheight, GpUnit srcUnit,
3377         GDIPCONST GpImageAttributes* imageAttributes, DrawImageAbort callback,
3378         VOID * callbackData)
3379 {
3380     GpPointF points[3];
3381
3382     TRACE("(%p, %p, %d, %d, %d, %d, %d, %d, %d, %d, %d, %p, %p, %p)\n",
3383           graphics, image, dstx, dsty, dstwidth, dstheight, srcx, srcy,
3384           srcwidth, srcheight, srcUnit, imageAttributes, callback, callbackData);
3385
3386     points[0].X = dstx;
3387     points[0].Y = dsty;
3388     points[1].X = dstx + dstwidth;
3389     points[1].Y = dsty;
3390     points[2].X = dstx;
3391     points[2].Y = dsty + dstheight;
3392
3393     return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
3394                srcwidth, srcheight, srcUnit, imageAttributes, callback, callbackData);
3395 }
3396
3397 GpStatus WINGDIPAPI GdipDrawImageRect(GpGraphics *graphics, GpImage *image,
3398     REAL x, REAL y, REAL width, REAL height)
3399 {
3400     RectF bounds;
3401     GpUnit unit;
3402     GpStatus ret;
3403
3404     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, image, x, y, width, height);
3405
3406     if(!graphics || !image)
3407         return InvalidParameter;
3408
3409     ret = GdipGetImageBounds(image, &bounds, &unit);
3410     if(ret != Ok)
3411         return ret;
3412
3413     return GdipDrawImageRectRect(graphics, image, x, y, width, height,
3414                                  bounds.X, bounds.Y, bounds.Width, bounds.Height,
3415                                  unit, NULL, NULL, NULL);
3416 }
3417
3418 GpStatus WINGDIPAPI GdipDrawImageRectI(GpGraphics *graphics, GpImage *image,
3419     INT x, INT y, INT width, INT height)
3420 {
3421     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, image, x, y, width, height);
3422
3423     return GdipDrawImageRect(graphics, image, (REAL)x, (REAL)y, (REAL)width, (REAL)height);
3424 }
3425
3426 GpStatus WINGDIPAPI GdipDrawLine(GpGraphics *graphics, GpPen *pen, REAL x1,
3427     REAL y1, REAL x2, REAL y2)
3428 {
3429     INT save_state;
3430     GpPointF pt[2];
3431     GpStatus retval;
3432
3433     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x1, y1, x2, y2);
3434
3435     if(!pen || !graphics)
3436         return InvalidParameter;
3437
3438     if(graphics->busy)
3439         return ObjectBusy;
3440
3441     if (!graphics->hdc)
3442     {
3443         FIXME("graphics object has no HDC\n");
3444         return Ok;
3445     }
3446
3447     pt[0].X = x1;
3448     pt[0].Y = y1;
3449     pt[1].X = x2;
3450     pt[1].Y = y2;
3451
3452     save_state = prepare_dc(graphics, pen);
3453
3454     retval = draw_polyline(graphics, pen, pt, 2, TRUE);
3455
3456     restore_dc(graphics, save_state);
3457
3458     return retval;
3459 }
3460
3461 GpStatus WINGDIPAPI GdipDrawLineI(GpGraphics *graphics, GpPen *pen, INT x1,
3462     INT y1, INT x2, INT y2)
3463 {
3464     INT save_state;
3465     GpPointF pt[2];
3466     GpStatus retval;
3467
3468     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, pen, x1, y1, x2, y2);
3469
3470     if(!pen || !graphics)
3471         return InvalidParameter;
3472
3473     if(graphics->busy)
3474         return ObjectBusy;
3475
3476     if (!graphics->hdc)
3477     {
3478         FIXME("graphics object has no HDC\n");
3479         return Ok;
3480     }
3481
3482     pt[0].X = (REAL)x1;
3483     pt[0].Y = (REAL)y1;
3484     pt[1].X = (REAL)x2;
3485     pt[1].Y = (REAL)y2;
3486
3487     save_state = prepare_dc(graphics, pen);
3488
3489     retval = draw_polyline(graphics, pen, pt, 2, TRUE);
3490
3491     restore_dc(graphics, save_state);
3492
3493     return retval;
3494 }
3495
3496 GpStatus WINGDIPAPI GdipDrawLines(GpGraphics *graphics, GpPen *pen, GDIPCONST
3497     GpPointF *points, INT count)
3498 {
3499     INT save_state;
3500     GpStatus retval;
3501
3502     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
3503
3504     if(!pen || !graphics || (count < 2))
3505         return InvalidParameter;
3506
3507     if(graphics->busy)
3508         return ObjectBusy;
3509
3510     if (!graphics->hdc)
3511     {
3512         FIXME("graphics object has no HDC\n");
3513         return Ok;
3514     }
3515
3516     save_state = prepare_dc(graphics, pen);
3517
3518     retval = draw_polyline(graphics, pen, points, count, TRUE);
3519
3520     restore_dc(graphics, save_state);
3521
3522     return retval;
3523 }
3524
3525 GpStatus WINGDIPAPI GdipDrawLinesI(GpGraphics *graphics, GpPen *pen, GDIPCONST
3526     GpPoint *points, INT count)
3527 {
3528     INT save_state;
3529     GpStatus retval;
3530     GpPointF *ptf = NULL;
3531     int i;
3532
3533     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
3534
3535     if(!pen || !graphics || (count < 2))
3536         return InvalidParameter;
3537
3538     if(graphics->busy)
3539         return ObjectBusy;
3540
3541     if (!graphics->hdc)
3542     {
3543         FIXME("graphics object has no HDC\n");
3544         return Ok;
3545     }
3546
3547     ptf = GdipAlloc(count * sizeof(GpPointF));
3548     if(!ptf) return OutOfMemory;
3549
3550     for(i = 0; i < count; i ++){
3551         ptf[i].X = (REAL) points[i].X;
3552         ptf[i].Y = (REAL) points[i].Y;
3553     }
3554
3555     save_state = prepare_dc(graphics, pen);
3556
3557     retval = draw_polyline(graphics, pen, ptf, count, TRUE);
3558
3559     restore_dc(graphics, save_state);
3560
3561     GdipFree(ptf);
3562     return retval;
3563 }
3564
3565 GpStatus WINGDIPAPI GdipDrawPath(GpGraphics *graphics, GpPen *pen, GpPath *path)
3566 {
3567     INT save_state;
3568     GpStatus retval;
3569
3570     TRACE("(%p, %p, %p)\n", graphics, pen, path);
3571
3572     if(!pen || !graphics)
3573         return InvalidParameter;
3574
3575     if(graphics->busy)
3576         return ObjectBusy;
3577
3578     if (!graphics->hdc)
3579     {
3580         FIXME("graphics object has no HDC\n");
3581         return Ok;
3582     }
3583
3584     save_state = prepare_dc(graphics, pen);
3585
3586     retval = draw_poly(graphics, pen, path->pathdata.Points,
3587                        path->pathdata.Types, path->pathdata.Count, TRUE);
3588
3589     restore_dc(graphics, save_state);
3590
3591     return retval;
3592 }
3593
3594 GpStatus WINGDIPAPI GdipDrawPie(GpGraphics *graphics, GpPen *pen, REAL x,
3595     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
3596 {
3597     INT save_state;
3598
3599     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y,
3600             width, height, startAngle, sweepAngle);
3601
3602     if(!graphics || !pen)
3603         return InvalidParameter;
3604
3605     if(graphics->busy)
3606         return ObjectBusy;
3607
3608     if (!graphics->hdc)
3609     {
3610         FIXME("graphics object has no HDC\n");
3611         return Ok;
3612     }
3613
3614     save_state = prepare_dc(graphics, pen);
3615     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
3616
3617     draw_pie(graphics, x, y, width, height, startAngle, sweepAngle);
3618
3619     restore_dc(graphics, save_state);
3620
3621     return Ok;
3622 }
3623
3624 GpStatus WINGDIPAPI GdipDrawPieI(GpGraphics *graphics, GpPen *pen, INT x,
3625     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
3626 {
3627     TRACE("(%p, %p, %d, %d, %d, %d, %.2f, %.2f)\n", graphics, pen, x, y,
3628             width, height, startAngle, sweepAngle);
3629
3630     return GdipDrawPie(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
3631 }
3632
3633 GpStatus WINGDIPAPI GdipDrawRectangle(GpGraphics *graphics, GpPen *pen, REAL x,
3634     REAL y, REAL width, REAL height)
3635 {
3636     INT save_state;
3637     GpPointF ptf[4];
3638     POINT pti[4];
3639
3640     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y, width, height);
3641
3642     if(!pen || !graphics)
3643         return InvalidParameter;
3644
3645     if(graphics->busy)
3646         return ObjectBusy;
3647
3648     if (!graphics->hdc)
3649     {
3650         FIXME("graphics object has no HDC\n");
3651         return Ok;
3652     }
3653
3654     ptf[0].X = x;
3655     ptf[0].Y = y;
3656     ptf[1].X = x + width;
3657     ptf[1].Y = y;
3658     ptf[2].X = x + width;
3659     ptf[2].Y = y + height;
3660     ptf[3].X = x;
3661     ptf[3].Y = y + height;
3662
3663     save_state = prepare_dc(graphics, pen);
3664     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
3665
3666     transform_and_round_points(graphics, pti, ptf, 4);
3667     Polygon(graphics->hdc, pti, 4);
3668
3669     restore_dc(graphics, save_state);
3670
3671     return Ok;
3672 }
3673
3674 GpStatus WINGDIPAPI GdipDrawRectangleI(GpGraphics *graphics, GpPen *pen, INT x,
3675     INT y, INT width, INT height)
3676 {
3677     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, pen, x, y, width, height);
3678
3679     return GdipDrawRectangle(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
3680 }
3681
3682 GpStatus WINGDIPAPI GdipDrawRectangles(GpGraphics *graphics, GpPen *pen,
3683     GDIPCONST GpRectF* rects, INT count)
3684 {
3685     GpPointF *ptf;
3686     POINT *pti;
3687     INT save_state, i;
3688
3689     TRACE("(%p, %p, %p, %d)\n", graphics, pen, rects, count);
3690
3691     if(!graphics || !pen || !rects || count < 1)
3692         return InvalidParameter;
3693
3694     if(graphics->busy)
3695         return ObjectBusy;
3696
3697     if (!graphics->hdc)
3698     {
3699         FIXME("graphics object has no HDC\n");
3700         return Ok;
3701     }
3702
3703     ptf = GdipAlloc(4 * count * sizeof(GpPointF));
3704     pti = GdipAlloc(4 * count * sizeof(POINT));
3705
3706     if(!ptf || !pti){
3707         GdipFree(ptf);
3708         GdipFree(pti);
3709         return OutOfMemory;
3710     }
3711
3712     for(i = 0; i < count; i++){
3713         ptf[4 * i + 3].X = ptf[4 * i].X = rects[i].X;
3714         ptf[4 * i + 1].Y = ptf[4 * i].Y = rects[i].Y;
3715         ptf[4 * i + 2].X = ptf[4 * i + 1].X = rects[i].X + rects[i].Width;
3716         ptf[4 * i + 3].Y = ptf[4 * i + 2].Y = rects[i].Y + rects[i].Height;
3717     }
3718
3719     save_state = prepare_dc(graphics, pen);
3720     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
3721
3722     transform_and_round_points(graphics, pti, ptf, 4 * count);
3723
3724     for(i = 0; i < count; i++)
3725         Polygon(graphics->hdc, &pti[4 * i], 4);
3726
3727     restore_dc(graphics, save_state);
3728
3729     GdipFree(ptf);
3730     GdipFree(pti);
3731
3732     return Ok;
3733 }
3734
3735 GpStatus WINGDIPAPI GdipDrawRectanglesI(GpGraphics *graphics, GpPen *pen,
3736     GDIPCONST GpRect* rects, INT count)
3737 {
3738     GpRectF *rectsF;
3739     GpStatus ret;
3740     INT i;
3741
3742     TRACE("(%p, %p, %p, %d)\n", graphics, pen, rects, count);
3743
3744     if(!rects || count<=0)
3745         return InvalidParameter;
3746
3747     rectsF = GdipAlloc(sizeof(GpRectF) * count);
3748     if(!rectsF)
3749         return OutOfMemory;
3750
3751     for(i = 0;i < count;i++){
3752         rectsF[i].X      = (REAL)rects[i].X;
3753         rectsF[i].Y      = (REAL)rects[i].Y;
3754         rectsF[i].Width  = (REAL)rects[i].Width;
3755         rectsF[i].Height = (REAL)rects[i].Height;
3756     }
3757
3758     ret = GdipDrawRectangles(graphics, pen, rectsF, count);
3759     GdipFree(rectsF);
3760
3761     return ret;
3762 }
3763
3764 GpStatus WINGDIPAPI GdipFillClosedCurve2(GpGraphics *graphics, GpBrush *brush,
3765     GDIPCONST GpPointF *points, INT count, REAL tension, GpFillMode fill)
3766 {
3767     GpPath *path;
3768     GpStatus stat;
3769
3770     TRACE("(%p, %p, %p, %d, %.2f, %d)\n", graphics, brush, points,
3771             count, tension, fill);
3772
3773     if(!graphics || !brush || !points)
3774         return InvalidParameter;
3775
3776     if(graphics->busy)
3777         return ObjectBusy;
3778
3779     if(count == 1)    /* Do nothing */
3780         return Ok;
3781
3782     stat = GdipCreatePath(fill, &path);
3783     if(stat != Ok)
3784         return stat;
3785
3786     stat = GdipAddPathClosedCurve2(path, points, count, tension);
3787     if(stat != Ok){
3788         GdipDeletePath(path);
3789         return stat;
3790     }
3791
3792     stat = GdipFillPath(graphics, brush, path);
3793     if(stat != Ok){
3794         GdipDeletePath(path);
3795         return stat;
3796     }
3797
3798     GdipDeletePath(path);
3799
3800     return Ok;
3801 }
3802
3803 GpStatus WINGDIPAPI GdipFillClosedCurve2I(GpGraphics *graphics, GpBrush *brush,
3804     GDIPCONST GpPoint *points, INT count, REAL tension, GpFillMode fill)
3805 {
3806     GpPointF *ptf;
3807     GpStatus stat;
3808     INT i;
3809
3810     TRACE("(%p, %p, %p, %d, %.2f, %d)\n", graphics, brush, points,
3811             count, tension, fill);
3812
3813     if(!points || count == 0)
3814         return InvalidParameter;
3815
3816     if(count == 1)    /* Do nothing */
3817         return Ok;
3818
3819     ptf = GdipAlloc(sizeof(GpPointF)*count);
3820     if(!ptf)
3821         return OutOfMemory;
3822
3823     for(i = 0;i < count;i++){
3824         ptf[i].X = (REAL)points[i].X;
3825         ptf[i].Y = (REAL)points[i].Y;
3826     }
3827
3828     stat = GdipFillClosedCurve2(graphics, brush, ptf, count, tension, fill);
3829
3830     GdipFree(ptf);
3831
3832     return stat;
3833 }
3834
3835 GpStatus WINGDIPAPI GdipFillClosedCurve(GpGraphics *graphics, GpBrush *brush,
3836     GDIPCONST GpPointF *points, INT count)
3837 {
3838     TRACE("(%p, %p, %p, %d)\n", graphics, brush, points, count);
3839     return GdipFillClosedCurve2(graphics, brush, points, count,
3840                0.5f, FillModeAlternate);
3841 }
3842
3843 GpStatus WINGDIPAPI GdipFillClosedCurveI(GpGraphics *graphics, GpBrush *brush,
3844     GDIPCONST GpPoint *points, INT count)
3845 {
3846     TRACE("(%p, %p, %p, %d)\n", graphics, brush, points, count);
3847     return GdipFillClosedCurve2I(graphics, brush, points, count,
3848                0.5f, FillModeAlternate);
3849 }
3850
3851 GpStatus WINGDIPAPI GdipFillEllipse(GpGraphics *graphics, GpBrush *brush, REAL x,
3852     REAL y, REAL width, REAL height)
3853 {
3854     GpStatus stat;
3855     GpPath *path;
3856
3857     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, brush, x, y, width, height);
3858
3859     if(!graphics || !brush)
3860         return InvalidParameter;
3861
3862     if(graphics->busy)
3863         return ObjectBusy;
3864
3865     stat = GdipCreatePath(FillModeAlternate, &path);
3866
3867     if (stat == Ok)
3868     {
3869         stat = GdipAddPathEllipse(path, x, y, width, height);
3870
3871         if (stat == Ok)
3872             stat = GdipFillPath(graphics, brush, path);
3873
3874         GdipDeletePath(path);
3875     }
3876
3877     return stat;
3878 }
3879
3880 GpStatus WINGDIPAPI GdipFillEllipseI(GpGraphics *graphics, GpBrush *brush, INT x,
3881     INT y, INT width, INT height)
3882 {
3883     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, brush, x, y, width, height);
3884
3885     return GdipFillEllipse(graphics,brush,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
3886 }
3887
3888 static GpStatus GDI32_GdipFillPath(GpGraphics *graphics, GpBrush *brush, GpPath *path)
3889 {
3890     INT save_state;
3891     GpStatus retval;
3892
3893     if(!graphics->hdc || !brush_can_fill_path(brush))
3894         return NotImplemented;
3895
3896     save_state = SaveDC(graphics->hdc);
3897     EndPath(graphics->hdc);
3898     SetPolyFillMode(graphics->hdc, (path->fill == FillModeAlternate ? ALTERNATE
3899                                                                     : WINDING));
3900
3901     BeginPath(graphics->hdc);
3902     retval = draw_poly(graphics, NULL, path->pathdata.Points,
3903                        path->pathdata.Types, path->pathdata.Count, FALSE);
3904
3905     if(retval != Ok)
3906         goto end;
3907
3908     EndPath(graphics->hdc);
3909     brush_fill_path(graphics, brush);
3910
3911     retval = Ok;
3912
3913 end:
3914     RestoreDC(graphics->hdc, save_state);
3915
3916     return retval;
3917 }
3918
3919 static GpStatus SOFTWARE_GdipFillPath(GpGraphics *graphics, GpBrush *brush, GpPath *path)
3920 {
3921     GpStatus stat;
3922     GpRegion *rgn;
3923
3924     if (!brush_can_fill_pixels(brush))
3925         return NotImplemented;
3926
3927     /* FIXME: This could probably be done more efficiently without regions. */
3928
3929     stat = GdipCreateRegionPath(path, &rgn);
3930
3931     if (stat == Ok)
3932     {
3933         stat = GdipFillRegion(graphics, brush, rgn);
3934
3935         GdipDeleteRegion(rgn);
3936     }
3937
3938     return stat;
3939 }
3940
3941 GpStatus WINGDIPAPI GdipFillPath(GpGraphics *graphics, GpBrush *brush, GpPath *path)
3942 {
3943     GpStatus stat = NotImplemented;
3944
3945     TRACE("(%p, %p, %p)\n", graphics, brush, path);
3946
3947     if(!brush || !graphics || !path)
3948         return InvalidParameter;
3949
3950     if(graphics->busy)
3951         return ObjectBusy;
3952
3953     if (!graphics->image)
3954         stat = GDI32_GdipFillPath(graphics, brush, path);
3955
3956     if (stat == NotImplemented)
3957         stat = SOFTWARE_GdipFillPath(graphics, brush, path);
3958
3959     if (stat == NotImplemented)
3960     {
3961         FIXME("Not implemented for brushtype %i\n", brush->bt);
3962         stat = Ok;
3963     }
3964
3965     return stat;
3966 }
3967
3968 GpStatus WINGDIPAPI GdipFillPie(GpGraphics *graphics, GpBrush *brush, REAL x,
3969     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
3970 {
3971     GpStatus stat;
3972     GpPath *path;
3973
3974     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n",
3975             graphics, brush, x, y, width, height, startAngle, sweepAngle);
3976
3977     if(!graphics || !brush)
3978         return InvalidParameter;
3979
3980     if(graphics->busy)
3981         return ObjectBusy;
3982
3983     stat = GdipCreatePath(FillModeAlternate, &path);
3984
3985     if (stat == Ok)
3986     {
3987         stat = GdipAddPathPie(path, x, y, width, height, startAngle, sweepAngle);
3988
3989         if (stat == Ok)
3990             stat = GdipFillPath(graphics, brush, path);
3991
3992         GdipDeletePath(path);
3993     }
3994
3995     return stat;
3996 }
3997
3998 GpStatus WINGDIPAPI GdipFillPieI(GpGraphics *graphics, GpBrush *brush, INT x,
3999     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
4000 {
4001     TRACE("(%p, %p, %d, %d, %d, %d, %.2f, %.2f)\n",
4002             graphics, brush, x, y, width, height, startAngle, sweepAngle);
4003
4004     return GdipFillPie(graphics,brush,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
4005 }
4006
4007 GpStatus WINGDIPAPI GdipFillPolygon(GpGraphics *graphics, GpBrush *brush,
4008     GDIPCONST GpPointF *points, INT count, GpFillMode fillMode)
4009 {
4010     GpStatus stat;
4011     GpPath *path;
4012
4013     TRACE("(%p, %p, %p, %d, %d)\n", graphics, brush, points, count, fillMode);
4014
4015     if(!graphics || !brush || !points || !count)
4016         return InvalidParameter;
4017
4018     if(graphics->busy)
4019         return ObjectBusy;
4020
4021     stat = GdipCreatePath(fillMode, &path);
4022
4023     if (stat == Ok)
4024     {
4025         stat = GdipAddPathPolygon(path, points, count);
4026
4027         if (stat == Ok)
4028             stat = GdipFillPath(graphics, brush, path);
4029
4030         GdipDeletePath(path);
4031     }
4032
4033     return stat;
4034 }
4035
4036 GpStatus WINGDIPAPI GdipFillPolygonI(GpGraphics *graphics, GpBrush *brush,
4037     GDIPCONST GpPoint *points, INT count, GpFillMode fillMode)
4038 {
4039     GpStatus stat;
4040     GpPath *path;
4041
4042     TRACE("(%p, %p, %p, %d, %d)\n", graphics, brush, points, count, fillMode);
4043
4044     if(!graphics || !brush || !points || !count)
4045         return InvalidParameter;
4046
4047     if(graphics->busy)
4048         return ObjectBusy;
4049
4050     stat = GdipCreatePath(fillMode, &path);
4051
4052     if (stat == Ok)
4053     {
4054         stat = GdipAddPathPolygonI(path, points, count);
4055
4056         if (stat == Ok)
4057             stat = GdipFillPath(graphics, brush, path);
4058
4059         GdipDeletePath(path);
4060     }
4061
4062     return stat;
4063 }
4064
4065 GpStatus WINGDIPAPI GdipFillPolygon2(GpGraphics *graphics, GpBrush *brush,
4066     GDIPCONST GpPointF *points, INT count)
4067 {
4068     TRACE("(%p, %p, %p, %d)\n", graphics, brush, points, count);
4069
4070     return GdipFillPolygon(graphics, brush, points, count, FillModeAlternate);
4071 }
4072
4073 GpStatus WINGDIPAPI GdipFillPolygon2I(GpGraphics *graphics, GpBrush *brush,
4074     GDIPCONST GpPoint *points, INT count)
4075 {
4076     TRACE("(%p, %p, %p, %d)\n", graphics, brush, points, count);
4077
4078     return GdipFillPolygonI(graphics, brush, points, count, FillModeAlternate);
4079 }
4080
4081 GpStatus WINGDIPAPI GdipFillRectangle(GpGraphics *graphics, GpBrush *brush,
4082     REAL x, REAL y, REAL width, REAL height)
4083 {
4084     GpStatus stat;
4085     GpPath *path;
4086
4087     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, brush, x, y, width, height);
4088
4089     if(!graphics || !brush)
4090         return InvalidParameter;
4091
4092     if(graphics->busy)
4093         return ObjectBusy;
4094
4095     stat = GdipCreatePath(FillModeAlternate, &path);
4096
4097     if (stat == Ok)
4098     {
4099         stat = GdipAddPathRectangle(path, x, y, width, height);
4100
4101         if (stat == Ok)
4102             stat = GdipFillPath(graphics, brush, path);
4103
4104         GdipDeletePath(path);
4105     }
4106
4107     return stat;
4108 }
4109
4110 GpStatus WINGDIPAPI GdipFillRectangleI(GpGraphics *graphics, GpBrush *brush,
4111     INT x, INT y, INT width, INT height)
4112 {
4113     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, brush, x, y, width, height);
4114
4115     return GdipFillRectangle(graphics, brush, x, y, width, height);
4116 }
4117
4118 GpStatus WINGDIPAPI GdipFillRectangles(GpGraphics *graphics, GpBrush *brush, GDIPCONST GpRectF *rects,
4119     INT count)
4120 {
4121     GpStatus ret;
4122     INT i;
4123
4124     TRACE("(%p, %p, %p, %d)\n", graphics, brush, rects, count);
4125
4126     if(!rects)
4127         return InvalidParameter;
4128
4129     for(i = 0; i < count; i++){
4130         ret = GdipFillRectangle(graphics, brush, rects[i].X, rects[i].Y, rects[i].Width, rects[i].Height);
4131         if(ret != Ok)   return ret;
4132     }
4133
4134     return Ok;
4135 }
4136
4137 GpStatus WINGDIPAPI GdipFillRectanglesI(GpGraphics *graphics, GpBrush *brush, GDIPCONST GpRect *rects,
4138     INT count)
4139 {
4140     GpRectF *rectsF;
4141     GpStatus ret;
4142     INT i;
4143
4144     TRACE("(%p, %p, %p, %d)\n", graphics, brush, rects, count);
4145
4146     if(!rects || count <= 0)
4147         return InvalidParameter;
4148
4149     rectsF = GdipAlloc(sizeof(GpRectF)*count);
4150     if(!rectsF)
4151         return OutOfMemory;
4152
4153     for(i = 0; i < count; i++){
4154         rectsF[i].X      = (REAL)rects[i].X;
4155         rectsF[i].Y      = (REAL)rects[i].Y;
4156         rectsF[i].X      = (REAL)rects[i].Width;
4157         rectsF[i].Height = (REAL)rects[i].Height;
4158     }
4159
4160     ret = GdipFillRectangles(graphics,brush,rectsF,count);
4161     GdipFree(rectsF);
4162
4163     return ret;
4164 }
4165
4166 static GpStatus GDI32_GdipFillRegion(GpGraphics* graphics, GpBrush* brush,
4167     GpRegion* region)
4168 {
4169     INT save_state;
4170     GpStatus status;
4171     HRGN hrgn;
4172     RECT rc;
4173
4174     if(!graphics->hdc || !brush_can_fill_path(brush))
4175         return NotImplemented;
4176
4177     status = GdipGetRegionHRgn(region, graphics, &hrgn);
4178     if(status != Ok)
4179         return status;
4180
4181     save_state = SaveDC(graphics->hdc);
4182     EndPath(graphics->hdc);
4183
4184     ExtSelectClipRgn(graphics->hdc, hrgn, RGN_AND);
4185
4186     if (GetClipBox(graphics->hdc, &rc) != NULLREGION)
4187     {
4188         BeginPath(graphics->hdc);
4189         Rectangle(graphics->hdc, rc.left, rc.top, rc.right, rc.bottom);
4190         EndPath(graphics->hdc);
4191
4192         brush_fill_path(graphics, brush);
4193     }
4194
4195     RestoreDC(graphics->hdc, save_state);
4196
4197     DeleteObject(hrgn);
4198
4199     return Ok;
4200 }
4201
4202 static GpStatus SOFTWARE_GdipFillRegion(GpGraphics *graphics, GpBrush *brush,
4203     GpRegion* region)
4204 {
4205     GpStatus stat;
4206     GpRegion *temp_region;
4207     GpMatrix *world_to_device;
4208     GpRectF graphics_bounds;
4209     DWORD *pixel_data;
4210     HRGN hregion;
4211     RECT bound_rect;
4212     GpRect gp_bound_rect;
4213
4214     if (!brush_can_fill_pixels(brush))
4215         return NotImplemented;
4216
4217     stat = get_graphics_bounds(graphics, &graphics_bounds);
4218
4219     if (stat == Ok)
4220         stat = GdipCloneRegion(region, &temp_region);
4221
4222     if (stat == Ok)
4223     {
4224         stat = get_graphics_transform(graphics, CoordinateSpaceDevice,
4225             CoordinateSpaceWorld, &world_to_device);
4226
4227         if (stat == Ok)
4228         {
4229             stat = GdipTransformRegion(temp_region, world_to_device);
4230
4231             GdipDeleteMatrix(world_to_device);
4232         }
4233
4234         if (stat == Ok)
4235             stat = GdipCombineRegionRect(temp_region, &graphics_bounds, CombineModeIntersect);
4236
4237         if (stat == Ok)
4238             stat = GdipGetRegionHRgn(temp_region, NULL, &hregion);
4239
4240         GdipDeleteRegion(temp_region);
4241     }
4242
4243     if (stat == Ok && GetRgnBox(hregion, &bound_rect) == NULLREGION)
4244     {
4245         DeleteObject(hregion);
4246         return Ok;
4247     }
4248
4249     if (stat == Ok)
4250     {
4251         gp_bound_rect.X = bound_rect.left;
4252         gp_bound_rect.Y = bound_rect.top;
4253         gp_bound_rect.Width = bound_rect.right - bound_rect.left;
4254         gp_bound_rect.Height = bound_rect.bottom - bound_rect.top;
4255
4256         pixel_data = GdipAlloc(sizeof(*pixel_data) * gp_bound_rect.Width * gp_bound_rect.Height);
4257         if (!pixel_data)
4258             stat = OutOfMemory;
4259
4260         if (stat == Ok)
4261         {
4262             stat = brush_fill_pixels(graphics, brush, pixel_data,
4263                 &gp_bound_rect, gp_bound_rect.Width);
4264
4265             if (stat == Ok)
4266                 stat = alpha_blend_pixels_hrgn(graphics, gp_bound_rect.X,
4267                     gp_bound_rect.Y, (BYTE*)pixel_data, gp_bound_rect.Width,
4268                     gp_bound_rect.Height, gp_bound_rect.Width * 4, hregion);
4269
4270             GdipFree(pixel_data);
4271         }
4272
4273         DeleteObject(hregion);
4274     }
4275
4276     return stat;
4277 }
4278
4279 /*****************************************************************************
4280  * GdipFillRegion [GDIPLUS.@]
4281  */
4282 GpStatus WINGDIPAPI GdipFillRegion(GpGraphics* graphics, GpBrush* brush,
4283         GpRegion* region)
4284 {
4285     GpStatus stat = NotImplemented;
4286
4287     TRACE("(%p, %p, %p)\n", graphics, brush, region);
4288
4289     if (!(graphics && brush && region))
4290         return InvalidParameter;
4291
4292     if(graphics->busy)
4293         return ObjectBusy;
4294
4295     if (!graphics->image)
4296         stat = GDI32_GdipFillRegion(graphics, brush, region);
4297
4298     if (stat == NotImplemented)
4299         stat = SOFTWARE_GdipFillRegion(graphics, brush, region);
4300
4301     if (stat == NotImplemented)
4302     {
4303         FIXME("not implemented for brushtype %i\n", brush->bt);
4304         stat = Ok;
4305     }
4306
4307     return stat;
4308 }
4309
4310 GpStatus WINGDIPAPI GdipFlush(GpGraphics *graphics, GpFlushIntention intention)
4311 {
4312     TRACE("(%p,%u)\n", graphics, intention);
4313
4314     if(!graphics)
4315         return InvalidParameter;
4316
4317     if(graphics->busy)
4318         return ObjectBusy;
4319
4320     /* We have no internal operation queue, so there's no need to clear it. */
4321
4322     if (graphics->hdc)
4323         GdiFlush();
4324
4325     return Ok;
4326 }
4327
4328 /*****************************************************************************
4329  * GdipGetClipBounds [GDIPLUS.@]
4330  */
4331 GpStatus WINGDIPAPI GdipGetClipBounds(GpGraphics *graphics, GpRectF *rect)
4332 {
4333     TRACE("(%p, %p)\n", graphics, rect);
4334
4335     if(!graphics)
4336         return InvalidParameter;
4337
4338     if(graphics->busy)
4339         return ObjectBusy;
4340
4341     return GdipGetRegionBounds(graphics->clip, graphics, rect);
4342 }
4343
4344 /*****************************************************************************
4345  * GdipGetClipBoundsI [GDIPLUS.@]
4346  */
4347 GpStatus WINGDIPAPI GdipGetClipBoundsI(GpGraphics *graphics, GpRect *rect)
4348 {
4349     TRACE("(%p, %p)\n", graphics, rect);
4350
4351     if(!graphics)
4352         return InvalidParameter;
4353
4354     if(graphics->busy)
4355         return ObjectBusy;
4356
4357     return GdipGetRegionBoundsI(graphics->clip, graphics, rect);
4358 }
4359
4360 /* FIXME: Compositing mode is not used anywhere except the getter/setter. */
4361 GpStatus WINGDIPAPI GdipGetCompositingMode(GpGraphics *graphics,
4362     CompositingMode *mode)
4363 {
4364     TRACE("(%p, %p)\n", graphics, mode);
4365
4366     if(!graphics || !mode)
4367         return InvalidParameter;
4368
4369     if(graphics->busy)
4370         return ObjectBusy;
4371
4372     *mode = graphics->compmode;
4373
4374     return Ok;
4375 }
4376
4377 /* FIXME: Compositing quality is not used anywhere except the getter/setter. */
4378 GpStatus WINGDIPAPI GdipGetCompositingQuality(GpGraphics *graphics,
4379     CompositingQuality *quality)
4380 {
4381     TRACE("(%p, %p)\n", graphics, quality);
4382
4383     if(!graphics || !quality)
4384         return InvalidParameter;
4385
4386     if(graphics->busy)
4387         return ObjectBusy;
4388
4389     *quality = graphics->compqual;
4390
4391     return Ok;
4392 }
4393
4394 /* FIXME: Interpolation mode is not used anywhere except the getter/setter. */
4395 GpStatus WINGDIPAPI GdipGetInterpolationMode(GpGraphics *graphics,
4396     InterpolationMode *mode)
4397 {
4398     TRACE("(%p, %p)\n", graphics, mode);
4399
4400     if(!graphics || !mode)
4401         return InvalidParameter;
4402
4403     if(graphics->busy)
4404         return ObjectBusy;
4405
4406     *mode = graphics->interpolation;
4407
4408     return Ok;
4409 }
4410
4411 /* FIXME: Need to handle color depths less than 24bpp */
4412 GpStatus WINGDIPAPI GdipGetNearestColor(GpGraphics *graphics, ARGB* argb)
4413 {
4414     FIXME("(%p, %p): Passing color unmodified\n", graphics, argb);
4415
4416     if(!graphics || !argb)
4417         return InvalidParameter;
4418
4419     if(graphics->busy)
4420         return ObjectBusy;
4421
4422     return Ok;
4423 }
4424
4425 GpStatus WINGDIPAPI GdipGetPageScale(GpGraphics *graphics, REAL *scale)
4426 {
4427     TRACE("(%p, %p)\n", graphics, scale);
4428
4429     if(!graphics || !scale)
4430         return InvalidParameter;
4431
4432     if(graphics->busy)
4433         return ObjectBusy;
4434
4435     *scale = graphics->scale;
4436
4437     return Ok;
4438 }
4439
4440 GpStatus WINGDIPAPI GdipGetPageUnit(GpGraphics *graphics, GpUnit *unit)
4441 {
4442     TRACE("(%p, %p)\n", graphics, unit);
4443
4444     if(!graphics || !unit)
4445         return InvalidParameter;
4446
4447     if(graphics->busy)
4448         return ObjectBusy;
4449
4450     *unit = graphics->unit;
4451
4452     return Ok;
4453 }
4454
4455 /* FIXME: Pixel offset mode is not used anywhere except the getter/setter. */
4456 GpStatus WINGDIPAPI GdipGetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
4457     *mode)
4458 {
4459     TRACE("(%p, %p)\n", graphics, mode);
4460
4461     if(!graphics || !mode)
4462         return InvalidParameter;
4463
4464     if(graphics->busy)
4465         return ObjectBusy;
4466
4467     *mode = graphics->pixeloffset;
4468
4469     return Ok;
4470 }
4471
4472 /* FIXME: Smoothing mode is not used anywhere except the getter/setter. */
4473 GpStatus WINGDIPAPI GdipGetSmoothingMode(GpGraphics *graphics, SmoothingMode *mode)
4474 {
4475     TRACE("(%p, %p)\n", graphics, mode);
4476
4477     if(!graphics || !mode)
4478         return InvalidParameter;
4479
4480     if(graphics->busy)
4481         return ObjectBusy;
4482
4483     *mode = graphics->smoothing;
4484
4485     return Ok;
4486 }
4487
4488 GpStatus WINGDIPAPI GdipGetTextContrast(GpGraphics *graphics, UINT *contrast)
4489 {
4490     TRACE("(%p, %p)\n", graphics, contrast);
4491
4492     if(!graphics || !contrast)
4493         return InvalidParameter;
4494
4495     *contrast = graphics->textcontrast;
4496
4497     return Ok;
4498 }
4499
4500 /* FIXME: Text rendering hint is not used anywhere except the getter/setter. */
4501 GpStatus WINGDIPAPI GdipGetTextRenderingHint(GpGraphics *graphics,
4502     TextRenderingHint *hint)
4503 {
4504     TRACE("(%p, %p)\n", graphics, hint);
4505
4506     if(!graphics || !hint)
4507         return InvalidParameter;
4508
4509     if(graphics->busy)
4510         return ObjectBusy;
4511
4512     *hint = graphics->texthint;
4513
4514     return Ok;
4515 }
4516
4517 GpStatus WINGDIPAPI GdipGetVisibleClipBounds(GpGraphics *graphics, GpRectF *rect)
4518 {
4519     GpRegion *clip_rgn;
4520     GpStatus stat;
4521
4522     TRACE("(%p, %p)\n", graphics, rect);
4523
4524     if(!graphics || !rect)
4525         return InvalidParameter;
4526
4527     if(graphics->busy)
4528         return ObjectBusy;
4529
4530     /* intersect window and graphics clipping regions */
4531     if((stat = GdipCreateRegion(&clip_rgn)) != Ok)
4532         return stat;
4533
4534     if((stat = get_visible_clip_region(graphics, clip_rgn)) != Ok)
4535         goto cleanup;
4536
4537     /* get bounds of the region */
4538     stat = GdipGetRegionBounds(clip_rgn, graphics, rect);
4539
4540 cleanup:
4541     GdipDeleteRegion(clip_rgn);
4542
4543     return stat;
4544 }
4545
4546 GpStatus WINGDIPAPI GdipGetVisibleClipBoundsI(GpGraphics *graphics, GpRect *rect)
4547 {
4548     GpRectF rectf;
4549     GpStatus stat;
4550
4551     TRACE("(%p, %p)\n", graphics, rect);
4552
4553     if(!graphics || !rect)
4554         return InvalidParameter;
4555
4556     if((stat = GdipGetVisibleClipBounds(graphics, &rectf)) == Ok)
4557     {
4558         rect->X = roundr(rectf.X);
4559         rect->Y = roundr(rectf.Y);
4560         rect->Width  = roundr(rectf.Width);
4561         rect->Height = roundr(rectf.Height);
4562     }
4563
4564     return stat;
4565 }
4566
4567 GpStatus WINGDIPAPI GdipGetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
4568 {
4569     TRACE("(%p, %p)\n", graphics, matrix);
4570
4571     if(!graphics || !matrix)
4572         return InvalidParameter;
4573
4574     if(graphics->busy)
4575         return ObjectBusy;
4576
4577     *matrix = *graphics->worldtrans;
4578     return Ok;
4579 }
4580
4581 GpStatus WINGDIPAPI GdipGraphicsClear(GpGraphics *graphics, ARGB color)
4582 {
4583     GpSolidFill *brush;
4584     GpStatus stat;
4585     GpRectF wnd_rect;
4586
4587     TRACE("(%p, %x)\n", graphics, color);
4588
4589     if(!graphics)
4590         return InvalidParameter;
4591
4592     if(graphics->busy)
4593         return ObjectBusy;
4594
4595     if((stat = GdipCreateSolidFill(color, &brush)) != Ok)
4596         return stat;
4597
4598     if((stat = get_graphics_bounds(graphics, &wnd_rect)) != Ok){
4599         GdipDeleteBrush((GpBrush*)brush);
4600         return stat;
4601     }
4602
4603     GdipFillRectangle(graphics, (GpBrush*)brush, wnd_rect.X, wnd_rect.Y,
4604                                                  wnd_rect.Width, wnd_rect.Height);
4605
4606     GdipDeleteBrush((GpBrush*)brush);
4607
4608     return Ok;
4609 }
4610
4611 GpStatus WINGDIPAPI GdipIsClipEmpty(GpGraphics *graphics, BOOL *res)
4612 {
4613     TRACE("(%p, %p)\n", graphics, res);
4614
4615     if(!graphics || !res)
4616         return InvalidParameter;
4617
4618     return GdipIsEmptyRegion(graphics->clip, graphics, res);
4619 }
4620
4621 GpStatus WINGDIPAPI GdipIsVisiblePoint(GpGraphics *graphics, REAL x, REAL y, BOOL *result)
4622 {
4623     GpStatus stat;
4624     GpRegion* rgn;
4625     GpPointF pt;
4626
4627     TRACE("(%p, %.2f, %.2f, %p)\n", graphics, x, y, result);
4628
4629     if(!graphics || !result)
4630         return InvalidParameter;
4631
4632     if(graphics->busy)
4633         return ObjectBusy;
4634
4635     pt.X = x;
4636     pt.Y = y;
4637     if((stat = GdipTransformPoints(graphics, CoordinateSpaceDevice,
4638                    CoordinateSpaceWorld, &pt, 1)) != Ok)
4639         return stat;
4640
4641     if((stat = GdipCreateRegion(&rgn)) != Ok)
4642         return stat;
4643
4644     if((stat = get_visible_clip_region(graphics, rgn)) != Ok)
4645         goto cleanup;
4646
4647     stat = GdipIsVisibleRegionPoint(rgn, pt.X, pt.Y, graphics, result);
4648
4649 cleanup:
4650     GdipDeleteRegion(rgn);
4651     return stat;
4652 }
4653
4654 GpStatus WINGDIPAPI GdipIsVisiblePointI(GpGraphics *graphics, INT x, INT y, BOOL *result)
4655 {
4656     return GdipIsVisiblePoint(graphics, (REAL)x, (REAL)y, result);
4657 }
4658
4659 GpStatus WINGDIPAPI GdipIsVisibleRect(GpGraphics *graphics, REAL x, REAL y, REAL width, REAL height, BOOL *result)
4660 {
4661     GpStatus stat;
4662     GpRegion* rgn;
4663     GpPointF pts[2];
4664
4665     TRACE("(%p %.2f %.2f %.2f %.2f %p)\n", graphics, x, y, width, height, result);
4666
4667     if(!graphics || !result)
4668         return InvalidParameter;
4669
4670     if(graphics->busy)
4671         return ObjectBusy;
4672
4673     pts[0].X = x;
4674     pts[0].Y = y;
4675     pts[1].X = x + width;
4676     pts[1].Y = y + height;
4677
4678     if((stat = GdipTransformPoints(graphics, CoordinateSpaceDevice,
4679                     CoordinateSpaceWorld, pts, 2)) != Ok)
4680         return stat;
4681
4682     pts[1].X -= pts[0].X;
4683     pts[1].Y -= pts[0].Y;
4684
4685     if((stat = GdipCreateRegion(&rgn)) != Ok)
4686         return stat;
4687
4688     if((stat = get_visible_clip_region(graphics, rgn)) != Ok)
4689         goto cleanup;
4690
4691     stat = GdipIsVisibleRegionRect(rgn, pts[0].X, pts[0].Y, pts[1].X, pts[1].Y, graphics, result);
4692
4693 cleanup:
4694     GdipDeleteRegion(rgn);
4695     return stat;
4696 }
4697
4698 GpStatus WINGDIPAPI GdipIsVisibleRectI(GpGraphics *graphics, INT x, INT y, INT width, INT height, BOOL *result)
4699 {
4700     return GdipIsVisibleRect(graphics, (REAL)x, (REAL)y, (REAL)width, (REAL)height, result);
4701 }
4702
4703 GpStatus gdip_format_string(HDC hdc,
4704     GDIPCONST WCHAR *string, INT length, GDIPCONST GpFont *font,
4705     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format,
4706     gdip_format_string_callback callback, void *user_data)
4707 {
4708     WCHAR* stringdup;
4709     int sum = 0, height = 0, fit, fitcpy, i, j, lret, nwidth,
4710         nheight, lineend, lineno = 0;
4711     RectF bounds;
4712     StringAlignment halign;
4713     GpStatus stat = Ok;
4714     SIZE size;
4715     HotkeyPrefix hkprefix;
4716     INT *hotkeyprefix_offsets=NULL;
4717     INT hotkeyprefix_count=0;
4718     INT hotkeyprefix_pos=0, hotkeyprefix_end_pos=0;
4719     int seen_prefix=0;
4720
4721     if(length == -1) length = lstrlenW(string);
4722
4723     stringdup = GdipAlloc((length + 1) * sizeof(WCHAR));
4724     if(!stringdup) return OutOfMemory;
4725
4726     nwidth = roundr(rect->Width);
4727     nheight = roundr(rect->Height);
4728
4729     if (rect->Width >= INT_MAX || rect->Width < 0.5) nwidth = INT_MAX;
4730     if (rect->Height >= INT_MAX || rect->Height < 0.5) nheight = INT_MAX;
4731
4732     if (format)
4733         hkprefix = format->hkprefix;
4734     else
4735         hkprefix = HotkeyPrefixNone;
4736
4737     if (hkprefix == HotkeyPrefixShow)
4738     {
4739         for (i=0; i<length; i++)
4740         {
4741             if (string[i] == '&')
4742                 hotkeyprefix_count++;
4743         }
4744     }
4745
4746     if (hotkeyprefix_count)
4747         hotkeyprefix_offsets = GdipAlloc(sizeof(INT) * hotkeyprefix_count);
4748
4749     hotkeyprefix_count = 0;
4750
4751     for(i = 0, j = 0; i < length; i++){
4752         /* FIXME: This makes the indexes passed to callback inaccurate. */
4753         if(!isprintW(string[i]) && (string[i] != '\n'))
4754             continue;
4755
4756         if (seen_prefix && hkprefix == HotkeyPrefixShow && string[i] != '&')
4757             hotkeyprefix_offsets[hotkeyprefix_count++] = j;
4758         else if (!seen_prefix && hkprefix != HotkeyPrefixNone && string[i] == '&')
4759         {
4760             seen_prefix = 1;
4761             continue;
4762         }
4763
4764         seen_prefix = 0;
4765
4766         stringdup[j] = string[i];
4767         j++;
4768     }
4769
4770     length = j;
4771
4772     if (format) halign = format->align;
4773     else halign = StringAlignmentNear;
4774
4775     while(sum < length){
4776         GetTextExtentExPointW(hdc, stringdup + sum, length - sum,
4777                               nwidth, &fit, NULL, &size);
4778         fitcpy = fit;
4779
4780         if(fit == 0)
4781             break;
4782
4783         for(lret = 0; lret < fit; lret++)
4784             if(*(stringdup + sum + lret) == '\n')
4785                 break;
4786
4787         /* Line break code (may look strange, but it imitates windows). */
4788         if(lret < fit)
4789             lineend = fit = lret;    /* this is not an off-by-one error */
4790         else if(fit < (length - sum)){
4791             if(*(stringdup + sum + fit) == ' ')
4792                 while(*(stringdup + sum + fit) == ' ')
4793                     fit++;
4794             else
4795                 while(*(stringdup + sum + fit - 1) != ' '){
4796                     fit--;
4797
4798                     if(*(stringdup + sum + fit) == '\t')
4799                         break;
4800
4801                     if(fit == 0){
4802                         fit = fitcpy;
4803                         break;
4804                     }
4805                 }
4806             lineend = fit;
4807             while(*(stringdup + sum + lineend - 1) == ' ' ||
4808                   *(stringdup + sum + lineend - 1) == '\t')
4809                 lineend--;
4810         }
4811         else
4812             lineend = fit;
4813
4814         GetTextExtentExPointW(hdc, stringdup + sum, lineend,
4815                               nwidth, &j, NULL, &size);
4816
4817         bounds.Width = size.cx;
4818
4819         if(height + size.cy > nheight)
4820             bounds.Height = nheight - (height + size.cy);
4821         else
4822             bounds.Height = size.cy;
4823
4824         bounds.Y = rect->Y + height;
4825
4826         switch (halign)
4827         {
4828         case StringAlignmentNear:
4829         default:
4830             bounds.X = rect->X;
4831             break;
4832         case StringAlignmentCenter:
4833             bounds.X = rect->X + (rect->Width/2) - (bounds.Width/2);
4834             break;
4835         case StringAlignmentFar:
4836             bounds.X = rect->X + rect->Width - bounds.Width;
4837             break;
4838         }
4839
4840         for (hotkeyprefix_end_pos=hotkeyprefix_pos; hotkeyprefix_end_pos<hotkeyprefix_count; hotkeyprefix_end_pos++)
4841             if (hotkeyprefix_offsets[hotkeyprefix_end_pos] >= sum + lineend)
4842                 break;
4843
4844         stat = callback(hdc, stringdup, sum, lineend,
4845             font, rect, format, lineno, &bounds,
4846             &hotkeyprefix_offsets[hotkeyprefix_pos],
4847             hotkeyprefix_end_pos-hotkeyprefix_pos, user_data);
4848
4849         if (stat != Ok)
4850             break;
4851
4852         sum += fit + (lret < fitcpy ? 1 : 0);
4853         height += size.cy;
4854         lineno++;
4855
4856         hotkeyprefix_pos = hotkeyprefix_end_pos;
4857
4858         if(height > nheight)
4859             break;
4860
4861         /* Stop if this was a linewrap (but not if it was a linebreak). */
4862         if((lret == fitcpy) && format && (format->attr & StringFormatFlagsNoWrap))
4863             break;
4864     }
4865
4866     GdipFree(stringdup);
4867     GdipFree(hotkeyprefix_offsets);
4868
4869     return stat;
4870 }
4871
4872 struct measure_ranges_args {
4873     GpRegion **regions;
4874 };
4875
4876 static GpStatus measure_ranges_callback(HDC hdc,
4877     GDIPCONST WCHAR *string, INT index, INT length, GDIPCONST GpFont *font,
4878     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format,
4879     INT lineno, const RectF *bounds, INT *underlined_indexes,
4880     INT underlined_index_count, void *user_data)
4881 {
4882     int i;
4883     GpStatus stat = Ok;
4884     struct measure_ranges_args *args = user_data;
4885
4886     for (i=0; i<format->range_count; i++)
4887     {
4888         INT range_start = max(index, format->character_ranges[i].First);
4889         INT range_end = min(index+length, format->character_ranges[i].First+format->character_ranges[i].Length);
4890         if (range_start < range_end)
4891         {
4892             GpRectF range_rect;
4893             SIZE range_size;
4894
4895             range_rect.Y = bounds->Y;
4896             range_rect.Height = bounds->Height;
4897
4898             GetTextExtentExPointW(hdc, string + index, range_start - index,
4899                                   INT_MAX, NULL, NULL, &range_size);
4900             range_rect.X = bounds->X + range_size.cx;
4901
4902             GetTextExtentExPointW(hdc, string + index, range_end - index,
4903                                   INT_MAX, NULL, NULL, &range_size);
4904             range_rect.Width = (bounds->X + range_size.cx) - range_rect.X;
4905
4906             stat = GdipCombineRegionRect(args->regions[i], &range_rect, CombineModeUnion);
4907             if (stat != Ok)
4908                 break;
4909         }
4910     }
4911
4912     return stat;
4913 }
4914
4915 GpStatus WINGDIPAPI GdipMeasureCharacterRanges(GpGraphics* graphics,
4916         GDIPCONST WCHAR* string, INT length, GDIPCONST GpFont* font,
4917         GDIPCONST RectF* layoutRect, GDIPCONST GpStringFormat *stringFormat,
4918         INT regionCount, GpRegion** regions)
4919 {
4920     GpStatus stat;
4921     int i;
4922     HFONT oldfont;
4923     struct measure_ranges_args args;
4924     HDC hdc, temp_hdc=NULL;
4925
4926     TRACE("(%p %s %d %p %s %p %d %p)\n", graphics, debugstr_w(string),
4927             length, font, debugstr_rectf(layoutRect), stringFormat, regionCount, regions);
4928
4929     if (!(graphics && string && font && layoutRect && stringFormat && regions))
4930         return InvalidParameter;
4931
4932     if (regionCount < stringFormat->range_count)
4933         return InvalidParameter;
4934
4935     if(!graphics->hdc)
4936     {
4937         hdc = temp_hdc = CreateCompatibleDC(0);
4938         if (!temp_hdc) return OutOfMemory;
4939     }
4940     else
4941         hdc = graphics->hdc;
4942
4943     if (stringFormat->attr)
4944         TRACE("may be ignoring some format flags: attr %x\n", stringFormat->attr);
4945
4946     oldfont = SelectObject(hdc, CreateFontIndirectW(&font->lfw));
4947
4948     for (i=0; i<stringFormat->range_count; i++)
4949     {
4950         stat = GdipSetEmpty(regions[i]);
4951         if (stat != Ok)
4952             return stat;
4953     }
4954
4955     args.regions = regions;
4956
4957     stat = gdip_format_string(hdc, string, length, font, layoutRect, stringFormat,
4958         measure_ranges_callback, &args);
4959
4960     DeleteObject(SelectObject(hdc, oldfont));
4961
4962     if (temp_hdc)
4963         DeleteDC(temp_hdc);
4964
4965     return stat;
4966 }
4967
4968 struct measure_string_args {
4969     RectF *bounds;
4970     INT *codepointsfitted;
4971     INT *linesfilled;
4972     REAL rel_width, rel_height;
4973 };
4974
4975 static GpStatus measure_string_callback(HDC hdc,
4976     GDIPCONST WCHAR *string, INT index, INT length, GDIPCONST GpFont *font,
4977     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format,
4978     INT lineno, const RectF *bounds, INT *underlined_indexes,
4979     INT underlined_index_count, void *user_data)
4980 {
4981     struct measure_string_args *args = user_data;
4982     REAL new_width, new_height;
4983
4984     new_width = bounds->Width / args->rel_width;
4985     new_height = (bounds->Height + bounds->Y - args->bounds->Y) / args->rel_height;
4986
4987     if (new_width > args->bounds->Width)
4988         args->bounds->Width = new_width;
4989
4990     if (new_height > args->bounds->Height)
4991         args->bounds->Height = new_height;
4992
4993     if (args->codepointsfitted)
4994         *args->codepointsfitted = index + length;
4995
4996     if (args->linesfilled)
4997         (*args->linesfilled)++;
4998
4999     return Ok;
5000 }
5001
5002 /* Find the smallest rectangle that bounds the text when it is printed in rect
5003  * according to the format options listed in format. If rect has 0 width and
5004  * height, then just find the smallest rectangle that bounds the text when it's
5005  * printed at location (rect->X, rect-Y). */
5006 GpStatus WINGDIPAPI GdipMeasureString(GpGraphics *graphics,
5007     GDIPCONST WCHAR *string, INT length, GDIPCONST GpFont *font,
5008     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format, RectF *bounds,
5009     INT *codepointsfitted, INT *linesfilled)
5010 {
5011     HFONT oldfont, gdifont;
5012     struct measure_string_args args;
5013     HDC temp_hdc=NULL, hdc;
5014     GpPointF pt[3];
5015
5016     TRACE("(%p, %s, %i, %p, %s, %p, %p, %p, %p)\n", graphics,
5017         debugstr_wn(string, length), length, font, debugstr_rectf(rect), format,
5018         bounds, codepointsfitted, linesfilled);
5019
5020     if(!graphics || !string || !font || !rect || !bounds)
5021         return InvalidParameter;
5022
5023     if(!graphics->hdc)
5024     {
5025         hdc = temp_hdc = CreateCompatibleDC(0);
5026         if (!temp_hdc) return OutOfMemory;
5027     }
5028     else
5029         hdc = graphics->hdc;
5030
5031     if(linesfilled) *linesfilled = 0;
5032     if(codepointsfitted) *codepointsfitted = 0;
5033
5034     if(format)
5035         TRACE("may be ignoring some format flags: attr %x\n", format->attr);
5036
5037     pt[0].X = 0.0;
5038     pt[0].Y = 0.0;
5039     pt[1].X = 1.0;
5040     pt[1].Y = 0.0;
5041     pt[2].X = 0.0;
5042     pt[2].Y = 1.0;
5043     GdipTransformPoints(graphics, CoordinateSpaceDevice, CoordinateSpaceWorld, pt, 3);
5044     args.rel_width = sqrt((pt[1].Y-pt[0].Y)*(pt[1].Y-pt[0].Y)+
5045                      (pt[1].X-pt[0].X)*(pt[1].X-pt[0].X));
5046     args.rel_height = sqrt((pt[2].Y-pt[0].Y)*(pt[2].Y-pt[0].Y)+
5047                       (pt[2].X-pt[0].X)*(pt[2].X-pt[0].X));
5048
5049     get_font_hfont(graphics, font, &gdifont);
5050     oldfont = SelectObject(hdc, gdifont);
5051
5052     bounds->X = rect->X;
5053     bounds->Y = rect->Y;
5054     bounds->Width = 0.0;
5055     bounds->Height = 0.0;
5056
5057     args.bounds = bounds;
5058     args.codepointsfitted = codepointsfitted;
5059     args.linesfilled = linesfilled;
5060
5061     gdip_format_string(hdc, string, length, font, rect, format,
5062         measure_string_callback, &args);
5063
5064     SelectObject(hdc, oldfont);
5065     DeleteObject(gdifont);
5066
5067     if (temp_hdc)
5068         DeleteDC(temp_hdc);
5069
5070     return Ok;
5071 }
5072
5073 struct draw_string_args {
5074     GpGraphics *graphics;
5075     GDIPCONST GpBrush *brush;
5076     REAL x, y, rel_width, rel_height, ascent;
5077 };
5078
5079 static GpStatus draw_string_callback(HDC hdc,
5080     GDIPCONST WCHAR *string, INT index, INT length, GDIPCONST GpFont *font,
5081     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format,
5082     INT lineno, const RectF *bounds, INT *underlined_indexes,
5083     INT underlined_index_count, void *user_data)
5084 {
5085     struct draw_string_args *args = user_data;
5086     PointF position;
5087     GpStatus stat;
5088
5089     position.X = args->x + bounds->X / args->rel_width;
5090     position.Y = args->y + bounds->Y / args->rel_height + args->ascent;
5091
5092     stat = GdipDrawDriverString(args->graphics, &string[index], length, font,
5093         args->brush, &position,
5094         DriverStringOptionsCmapLookup|DriverStringOptionsRealizedAdvance, NULL);
5095
5096     if (stat == Ok && underlined_index_count)
5097     {
5098         OUTLINETEXTMETRICW otm;
5099         REAL underline_y, underline_height;
5100         int i;
5101
5102         GetOutlineTextMetricsW(hdc, sizeof(otm), &otm);
5103
5104         underline_height = otm.otmsUnderscoreSize / args->rel_height;
5105         underline_y = position.Y - otm.otmsUnderscorePosition / args->rel_height - underline_height / 2;
5106
5107         for (i=0; i<underlined_index_count; i++)
5108         {
5109             REAL start_x, end_x;
5110             SIZE text_size;
5111             INT ofs = underlined_indexes[i] - index;
5112
5113             GetTextExtentExPointW(hdc, string + index, ofs, INT_MAX, NULL, NULL, &text_size);
5114             start_x = text_size.cx / args->rel_width;
5115
5116             GetTextExtentExPointW(hdc, string + index, ofs+1, INT_MAX, NULL, NULL, &text_size);
5117             end_x = text_size.cx / args->rel_width;
5118
5119             GdipFillRectangle(args->graphics, (GpBrush*)args->brush, position.X+start_x, underline_y, end_x-start_x, underline_height);
5120         }
5121     }
5122
5123     return stat;
5124 }
5125
5126 GpStatus WINGDIPAPI GdipDrawString(GpGraphics *graphics, GDIPCONST WCHAR *string,
5127     INT length, GDIPCONST GpFont *font, GDIPCONST RectF *rect,
5128     GDIPCONST GpStringFormat *format, GDIPCONST GpBrush *brush)
5129 {
5130     HRGN rgn = NULL;
5131     HFONT gdifont;
5132     GpPointF pt[3], rectcpy[4];
5133     POINT corners[4];
5134     REAL rel_width, rel_height;
5135     INT save_state;
5136     REAL offsety = 0.0;
5137     struct draw_string_args args;
5138     RectF scaled_rect;
5139     HDC hdc, temp_hdc=NULL;
5140     TEXTMETRICW textmetric;
5141
5142     TRACE("(%p, %s, %i, %p, %s, %p, %p)\n", graphics, debugstr_wn(string, length),
5143         length, font, debugstr_rectf(rect), format, brush);
5144
5145     if(!graphics || !string || !font || !brush || !rect)
5146         return InvalidParameter;
5147
5148     if(graphics->hdc)
5149     {
5150         hdc = graphics->hdc;
5151     }
5152     else
5153     {
5154         hdc = temp_hdc = CreateCompatibleDC(0);
5155     }
5156
5157     if(format){
5158         TRACE("may be ignoring some format flags: attr %x\n", format->attr);
5159
5160         /* Should be no need to explicitly test for StringAlignmentNear as
5161          * that is default behavior if no alignment is passed. */
5162         if(format->vertalign != StringAlignmentNear){
5163             RectF bounds;
5164             GdipMeasureString(graphics, string, length, font, rect, format, &bounds, 0, 0);
5165
5166             if(format->vertalign == StringAlignmentCenter)
5167                 offsety = (rect->Height - bounds.Height) / 2;
5168             else if(format->vertalign == StringAlignmentFar)
5169                 offsety = (rect->Height - bounds.Height);
5170         }
5171     }
5172
5173     save_state = SaveDC(hdc);
5174
5175     pt[0].X = 0.0;
5176     pt[0].Y = 0.0;
5177     pt[1].X = 1.0;
5178     pt[1].Y = 0.0;
5179     pt[2].X = 0.0;
5180     pt[2].Y = 1.0;
5181     GdipTransformPoints(graphics, CoordinateSpaceDevice, CoordinateSpaceWorld, pt, 3);
5182     rel_width = sqrt((pt[1].Y-pt[0].Y)*(pt[1].Y-pt[0].Y)+
5183                      (pt[1].X-pt[0].X)*(pt[1].X-pt[0].X));
5184     rel_height = sqrt((pt[2].Y-pt[0].Y)*(pt[2].Y-pt[0].Y)+
5185                       (pt[2].X-pt[0].X)*(pt[2].X-pt[0].X));
5186
5187     rectcpy[3].X = rectcpy[0].X = rect->X;
5188     rectcpy[1].Y = rectcpy[0].Y = rect->Y + offsety;
5189     rectcpy[2].X = rectcpy[1].X = rect->X + rect->Width;
5190     rectcpy[3].Y = rectcpy[2].Y = rect->Y + offsety + rect->Height;
5191     transform_and_round_points(graphics, corners, rectcpy, 4);
5192
5193     scaled_rect.X = 0.0;
5194     scaled_rect.Y = 0.0;
5195     scaled_rect.Width = rel_width * rect->Width;
5196     scaled_rect.Height = rel_height * rect->Height;
5197
5198     if (roundr(scaled_rect.Width) != 0 && roundr(scaled_rect.Height) != 0)
5199     {
5200         /* FIXME: If only the width or only the height is 0, we should probably still clip */
5201         rgn = CreatePolygonRgn(corners, 4, ALTERNATE);
5202         SelectClipRgn(hdc, rgn);
5203     }
5204
5205     get_font_hfont(graphics, font, &gdifont);
5206     SelectObject(hdc, gdifont);
5207
5208     args.graphics = graphics;
5209     args.brush = brush;
5210
5211     args.x = rect->X;
5212     args.y = rect->Y + offsety;
5213
5214     args.rel_width = rel_width;
5215     args.rel_height = rel_height;
5216
5217     GetTextMetricsW(hdc, &textmetric);
5218     args.ascent = textmetric.tmAscent / rel_height;
5219
5220     gdip_format_string(hdc, string, length, font, &scaled_rect, format,
5221         draw_string_callback, &args);
5222
5223     DeleteObject(rgn);
5224     DeleteObject(gdifont);
5225
5226     RestoreDC(hdc, save_state);
5227
5228     DeleteDC(temp_hdc);
5229
5230     return Ok;
5231 }
5232
5233 GpStatus WINGDIPAPI GdipResetClip(GpGraphics *graphics)
5234 {
5235     TRACE("(%p)\n", graphics);
5236
5237     if(!graphics)
5238         return InvalidParameter;
5239
5240     if(graphics->busy)
5241         return ObjectBusy;
5242
5243     return GdipSetInfinite(graphics->clip);
5244 }
5245
5246 GpStatus WINGDIPAPI GdipResetWorldTransform(GpGraphics *graphics)
5247 {
5248     TRACE("(%p)\n", graphics);
5249
5250     if(!graphics)
5251         return InvalidParameter;
5252
5253     if(graphics->busy)
5254         return ObjectBusy;
5255
5256     graphics->worldtrans->matrix[0] = 1.0;
5257     graphics->worldtrans->matrix[1] = 0.0;
5258     graphics->worldtrans->matrix[2] = 0.0;
5259     graphics->worldtrans->matrix[3] = 1.0;
5260     graphics->worldtrans->matrix[4] = 0.0;
5261     graphics->worldtrans->matrix[5] = 0.0;
5262
5263     return Ok;
5264 }
5265
5266 GpStatus WINGDIPAPI GdipRestoreGraphics(GpGraphics *graphics, GraphicsState state)
5267 {
5268     return GdipEndContainer(graphics, state);
5269 }
5270
5271 GpStatus WINGDIPAPI GdipRotateWorldTransform(GpGraphics *graphics, REAL angle,
5272     GpMatrixOrder order)
5273 {
5274     TRACE("(%p, %.2f, %d)\n", graphics, angle, order);
5275
5276     if(!graphics)
5277         return InvalidParameter;
5278
5279     if(graphics->busy)
5280         return ObjectBusy;
5281
5282     return GdipRotateMatrix(graphics->worldtrans, angle, order);
5283 }
5284
5285 GpStatus WINGDIPAPI GdipSaveGraphics(GpGraphics *graphics, GraphicsState *state)
5286 {
5287     return GdipBeginContainer2(graphics, state);
5288 }
5289
5290 GpStatus WINGDIPAPI GdipBeginContainer2(GpGraphics *graphics,
5291         GraphicsContainer *state)
5292 {
5293     GraphicsContainerItem *container;
5294     GpStatus sts;
5295
5296     TRACE("(%p, %p)\n", graphics, state);
5297
5298     if(!graphics || !state)
5299         return InvalidParameter;
5300
5301     sts = init_container(&container, graphics);
5302     if(sts != Ok)
5303         return sts;
5304
5305     list_add_head(&graphics->containers, &container->entry);
5306     *state = graphics->contid = container->contid;
5307
5308     return Ok;
5309 }
5310
5311 GpStatus WINGDIPAPI GdipBeginContainer(GpGraphics *graphics, GDIPCONST GpRectF *dstrect, GDIPCONST GpRectF *srcrect, GpUnit unit, GraphicsContainer *state)
5312 {
5313     FIXME("(%p, %p, %p, %d, %p): stub\n", graphics, dstrect, srcrect, unit, state);
5314     return NotImplemented;
5315 }
5316
5317 GpStatus WINGDIPAPI GdipBeginContainerI(GpGraphics *graphics, GDIPCONST GpRect *dstrect, GDIPCONST GpRect *srcrect, GpUnit unit, GraphicsContainer *state)
5318 {
5319     FIXME("(%p, %p, %p, %d, %p): stub\n", graphics, dstrect, srcrect, unit, state);
5320     return NotImplemented;
5321 }
5322
5323 GpStatus WINGDIPAPI GdipComment(GpGraphics *graphics, UINT sizeData, GDIPCONST BYTE *data)
5324 {
5325     FIXME("(%p, %d, %p): stub\n", graphics, sizeData, data);
5326     return NotImplemented;
5327 }
5328
5329 GpStatus WINGDIPAPI GdipEndContainer(GpGraphics *graphics, GraphicsContainer state)
5330 {
5331     GpStatus sts;
5332     GraphicsContainerItem *container, *container2;
5333
5334     TRACE("(%p, %x)\n", graphics, state);
5335
5336     if(!graphics)
5337         return InvalidParameter;
5338
5339     LIST_FOR_EACH_ENTRY(container, &graphics->containers, GraphicsContainerItem, entry){
5340         if(container->contid == state)
5341             break;
5342     }
5343
5344     /* did not find a matching container */
5345     if(&container->entry == &graphics->containers)
5346         return Ok;
5347
5348     sts = restore_container(graphics, container);
5349     if(sts != Ok)
5350         return sts;
5351
5352     /* remove all of the containers on top of the found container */
5353     LIST_FOR_EACH_ENTRY_SAFE(container, container2, &graphics->containers, GraphicsContainerItem, entry){
5354         if(container->contid == state)
5355             break;
5356         list_remove(&container->entry);
5357         delete_container(container);
5358     }
5359
5360     list_remove(&container->entry);
5361     delete_container(container);
5362
5363     return Ok;
5364 }
5365
5366 GpStatus WINGDIPAPI GdipScaleWorldTransform(GpGraphics *graphics, REAL sx,
5367     REAL sy, GpMatrixOrder order)
5368 {
5369     TRACE("(%p, %.2f, %.2f, %d)\n", graphics, sx, sy, order);
5370
5371     if(!graphics)
5372         return InvalidParameter;
5373
5374     if(graphics->busy)
5375         return ObjectBusy;
5376
5377     return GdipScaleMatrix(graphics->worldtrans, sx, sy, order);
5378 }
5379
5380 GpStatus WINGDIPAPI GdipSetClipGraphics(GpGraphics *graphics, GpGraphics *srcgraphics,
5381     CombineMode mode)
5382 {
5383     TRACE("(%p, %p, %d)\n", graphics, srcgraphics, mode);
5384
5385     if(!graphics || !srcgraphics)
5386         return InvalidParameter;
5387
5388     return GdipCombineRegionRegion(graphics->clip, srcgraphics->clip, mode);
5389 }
5390
5391 GpStatus WINGDIPAPI GdipSetCompositingMode(GpGraphics *graphics,
5392     CompositingMode mode)
5393 {
5394     TRACE("(%p, %d)\n", graphics, mode);
5395
5396     if(!graphics)
5397         return InvalidParameter;
5398
5399     if(graphics->busy)
5400         return ObjectBusy;
5401
5402     graphics->compmode = mode;
5403
5404     return Ok;
5405 }
5406
5407 GpStatus WINGDIPAPI GdipSetCompositingQuality(GpGraphics *graphics,
5408     CompositingQuality quality)
5409 {
5410     TRACE("(%p, %d)\n", graphics, quality);
5411
5412     if(!graphics)
5413         return InvalidParameter;
5414
5415     if(graphics->busy)
5416         return ObjectBusy;
5417
5418     graphics->compqual = quality;
5419
5420     return Ok;
5421 }
5422
5423 GpStatus WINGDIPAPI GdipSetInterpolationMode(GpGraphics *graphics,
5424     InterpolationMode mode)
5425 {
5426     TRACE("(%p, %d)\n", graphics, mode);
5427
5428     if(!graphics || mode == InterpolationModeInvalid || mode > InterpolationModeHighQualityBicubic)
5429         return InvalidParameter;
5430
5431     if(graphics->busy)
5432         return ObjectBusy;
5433
5434     if (mode == InterpolationModeDefault || mode == InterpolationModeLowQuality)
5435         mode = InterpolationModeBilinear;
5436
5437     if (mode == InterpolationModeHighQuality)
5438         mode = InterpolationModeHighQualityBicubic;
5439
5440     graphics->interpolation = mode;
5441
5442     return Ok;
5443 }
5444
5445 GpStatus WINGDIPAPI GdipSetPageScale(GpGraphics *graphics, REAL scale)
5446 {
5447     TRACE("(%p, %.2f)\n", graphics, scale);
5448
5449     if(!graphics || (scale <= 0.0))
5450         return InvalidParameter;
5451
5452     if(graphics->busy)
5453         return ObjectBusy;
5454
5455     graphics->scale = scale;
5456
5457     return Ok;
5458 }
5459
5460 GpStatus WINGDIPAPI GdipSetPageUnit(GpGraphics *graphics, GpUnit unit)
5461 {
5462     TRACE("(%p, %d)\n", graphics, unit);
5463
5464     if(!graphics)
5465         return InvalidParameter;
5466
5467     if(graphics->busy)
5468         return ObjectBusy;
5469
5470     if(unit == UnitWorld)
5471         return InvalidParameter;
5472
5473     graphics->unit = unit;
5474
5475     return Ok;
5476 }
5477
5478 GpStatus WINGDIPAPI GdipSetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
5479     mode)
5480 {
5481     TRACE("(%p, %d)\n", graphics, mode);
5482
5483     if(!graphics)
5484         return InvalidParameter;
5485
5486     if(graphics->busy)
5487         return ObjectBusy;
5488
5489     graphics->pixeloffset = mode;
5490
5491     return Ok;
5492 }
5493
5494 GpStatus WINGDIPAPI GdipSetRenderingOrigin(GpGraphics *graphics, INT x, INT y)
5495 {
5496     static int calls;
5497
5498     TRACE("(%p,%i,%i)\n", graphics, x, y);
5499
5500     if (!(calls++))
5501         FIXME("value is unused in rendering\n");
5502
5503     if (!graphics)
5504         return InvalidParameter;
5505
5506     graphics->origin_x = x;
5507     graphics->origin_y = y;
5508
5509     return Ok;
5510 }
5511
5512 GpStatus WINGDIPAPI GdipGetRenderingOrigin(GpGraphics *graphics, INT *x, INT *y)
5513 {
5514     TRACE("(%p,%p,%p)\n", graphics, x, y);
5515
5516     if (!graphics || !x || !y)
5517         return InvalidParameter;
5518
5519     *x = graphics->origin_x;
5520     *y = graphics->origin_y;
5521
5522     return Ok;
5523 }
5524
5525 GpStatus WINGDIPAPI GdipSetSmoothingMode(GpGraphics *graphics, SmoothingMode mode)
5526 {
5527     TRACE("(%p, %d)\n", graphics, mode);
5528
5529     if(!graphics)
5530         return InvalidParameter;
5531
5532     if(graphics->busy)
5533         return ObjectBusy;
5534
5535     graphics->smoothing = mode;
5536
5537     return Ok;
5538 }
5539
5540 GpStatus WINGDIPAPI GdipSetTextContrast(GpGraphics *graphics, UINT contrast)
5541 {
5542     TRACE("(%p, %d)\n", graphics, contrast);
5543
5544     if(!graphics)
5545         return InvalidParameter;
5546
5547     graphics->textcontrast = contrast;
5548
5549     return Ok;
5550 }
5551
5552 GpStatus WINGDIPAPI GdipSetTextRenderingHint(GpGraphics *graphics,
5553     TextRenderingHint hint)
5554 {
5555     TRACE("(%p, %d)\n", graphics, hint);
5556
5557     if(!graphics || hint > TextRenderingHintClearTypeGridFit)
5558         return InvalidParameter;
5559
5560     if(graphics->busy)
5561         return ObjectBusy;
5562
5563     graphics->texthint = hint;
5564
5565     return Ok;
5566 }
5567
5568 GpStatus WINGDIPAPI GdipSetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
5569 {
5570     TRACE("(%p, %p)\n", graphics, matrix);
5571
5572     if(!graphics || !matrix)
5573         return InvalidParameter;
5574
5575     if(graphics->busy)
5576         return ObjectBusy;
5577
5578     GdipDeleteMatrix(graphics->worldtrans);
5579     return GdipCloneMatrix(matrix, &graphics->worldtrans);
5580 }
5581
5582 GpStatus WINGDIPAPI GdipTranslateWorldTransform(GpGraphics *graphics, REAL dx,
5583     REAL dy, GpMatrixOrder order)
5584 {
5585     TRACE("(%p, %.2f, %.2f, %d)\n", graphics, dx, dy, order);
5586
5587     if(!graphics)
5588         return InvalidParameter;
5589
5590     if(graphics->busy)
5591         return ObjectBusy;
5592
5593     return GdipTranslateMatrix(graphics->worldtrans, dx, dy, order);
5594 }
5595
5596 /*****************************************************************************
5597  * GdipSetClipHrgn [GDIPLUS.@]
5598  */
5599 GpStatus WINGDIPAPI GdipSetClipHrgn(GpGraphics *graphics, HRGN hrgn, CombineMode mode)
5600 {
5601     GpRegion *region;
5602     GpStatus status;
5603
5604     TRACE("(%p, %p, %d)\n", graphics, hrgn, mode);
5605
5606     if(!graphics)
5607         return InvalidParameter;
5608
5609     status = GdipCreateRegionHrgn(hrgn, &region);
5610     if(status != Ok)
5611         return status;
5612
5613     status = GdipSetClipRegion(graphics, region, mode);
5614
5615     GdipDeleteRegion(region);
5616     return status;
5617 }
5618
5619 GpStatus WINGDIPAPI GdipSetClipPath(GpGraphics *graphics, GpPath *path, CombineMode mode)
5620 {
5621     TRACE("(%p, %p, %d)\n", graphics, path, mode);
5622
5623     if(!graphics)
5624         return InvalidParameter;
5625
5626     if(graphics->busy)
5627         return ObjectBusy;
5628
5629     return GdipCombineRegionPath(graphics->clip, path, mode);
5630 }
5631
5632 GpStatus WINGDIPAPI GdipSetClipRect(GpGraphics *graphics, REAL x, REAL y,
5633                                     REAL width, REAL height,
5634                                     CombineMode mode)
5635 {
5636     GpRectF rect;
5637
5638     TRACE("(%p, %.2f, %.2f, %.2f, %.2f, %d)\n", graphics, x, y, width, height, mode);
5639
5640     if(!graphics)
5641         return InvalidParameter;
5642
5643     if(graphics->busy)
5644         return ObjectBusy;
5645
5646     rect.X = x;
5647     rect.Y = y;
5648     rect.Width  = width;
5649     rect.Height = height;
5650
5651     return GdipCombineRegionRect(graphics->clip, &rect, mode);
5652 }
5653
5654 GpStatus WINGDIPAPI GdipSetClipRectI(GpGraphics *graphics, INT x, INT y,
5655                                      INT width, INT height,
5656                                      CombineMode mode)
5657 {
5658     TRACE("(%p, %d, %d, %d, %d, %d)\n", graphics, x, y, width, height, mode);
5659
5660     if(!graphics)
5661         return InvalidParameter;
5662
5663     if(graphics->busy)
5664         return ObjectBusy;
5665
5666     return GdipSetClipRect(graphics, (REAL)x, (REAL)y, (REAL)width, (REAL)height, mode);
5667 }
5668
5669 GpStatus WINGDIPAPI GdipSetClipRegion(GpGraphics *graphics, GpRegion *region,
5670                                       CombineMode mode)
5671 {
5672     TRACE("(%p, %p, %d)\n", graphics, region, mode);
5673
5674     if(!graphics || !region)
5675         return InvalidParameter;
5676
5677     if(graphics->busy)
5678         return ObjectBusy;
5679
5680     return GdipCombineRegionRegion(graphics->clip, region, mode);
5681 }
5682
5683 GpStatus WINGDIPAPI GdipSetMetafileDownLevelRasterizationLimit(GpMetafile *metafile,
5684     UINT limitDpi)
5685 {
5686     static int calls;
5687
5688     TRACE("(%p,%u)\n", metafile, limitDpi);
5689
5690     if(!(calls++))
5691         FIXME("not implemented\n");
5692
5693     return NotImplemented;
5694 }
5695
5696 GpStatus WINGDIPAPI GdipDrawPolygon(GpGraphics *graphics,GpPen *pen,GDIPCONST GpPointF *points,
5697     INT count)
5698 {
5699     INT save_state;
5700     POINT *pti;
5701
5702     TRACE("(%p, %p, %d)\n", graphics, points, count);
5703
5704     if(!graphics || !pen || count<=0)
5705         return InvalidParameter;
5706
5707     if(graphics->busy)
5708         return ObjectBusy;
5709
5710     if (!graphics->hdc)
5711     {
5712         FIXME("graphics object has no HDC\n");
5713         return Ok;
5714     }
5715
5716     pti = GdipAlloc(sizeof(POINT) * count);
5717
5718     save_state = prepare_dc(graphics, pen);
5719     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
5720
5721     transform_and_round_points(graphics, pti, (GpPointF*)points, count);
5722     Polygon(graphics->hdc, pti, count);
5723
5724     restore_dc(graphics, save_state);
5725     GdipFree(pti);
5726
5727     return Ok;
5728 }
5729
5730 GpStatus WINGDIPAPI GdipDrawPolygonI(GpGraphics *graphics,GpPen *pen,GDIPCONST GpPoint *points,
5731     INT count)
5732 {
5733     GpStatus ret;
5734     GpPointF *ptf;
5735     INT i;
5736
5737     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
5738
5739     if(count<=0)    return InvalidParameter;
5740     ptf = GdipAlloc(sizeof(GpPointF) * count);
5741
5742     for(i = 0;i < count; i++){
5743         ptf[i].X = (REAL)points[i].X;
5744         ptf[i].Y = (REAL)points[i].Y;
5745     }
5746
5747     ret = GdipDrawPolygon(graphics,pen,ptf,count);
5748     GdipFree(ptf);
5749
5750     return ret;
5751 }
5752
5753 GpStatus WINGDIPAPI GdipGetDpiX(GpGraphics *graphics, REAL* dpi)
5754 {
5755     TRACE("(%p, %p)\n", graphics, dpi);
5756
5757     if(!graphics || !dpi)
5758         return InvalidParameter;
5759
5760     if(graphics->busy)
5761         return ObjectBusy;
5762
5763     if (graphics->image)
5764         *dpi = graphics->image->xres;
5765     else
5766         *dpi = (REAL)GetDeviceCaps(graphics->hdc, LOGPIXELSX);
5767
5768     return Ok;
5769 }
5770
5771 GpStatus WINGDIPAPI GdipGetDpiY(GpGraphics *graphics, REAL* dpi)
5772 {
5773     TRACE("(%p, %p)\n", graphics, dpi);
5774
5775     if(!graphics || !dpi)
5776         return InvalidParameter;
5777
5778     if(graphics->busy)
5779         return ObjectBusy;
5780
5781     if (graphics->image)
5782         *dpi = graphics->image->yres;
5783     else
5784         *dpi = (REAL)GetDeviceCaps(graphics->hdc, LOGPIXELSY);
5785
5786     return Ok;
5787 }
5788
5789 GpStatus WINGDIPAPI GdipMultiplyWorldTransform(GpGraphics *graphics, GDIPCONST GpMatrix *matrix,
5790     GpMatrixOrder order)
5791 {
5792     GpMatrix m;
5793     GpStatus ret;
5794
5795     TRACE("(%p, %p, %d)\n", graphics, matrix, order);
5796
5797     if(!graphics || !matrix)
5798         return InvalidParameter;
5799
5800     if(graphics->busy)
5801         return ObjectBusy;
5802
5803     m = *(graphics->worldtrans);
5804
5805     ret = GdipMultiplyMatrix(&m, matrix, order);
5806     if(ret == Ok)
5807         *(graphics->worldtrans) = m;
5808
5809     return ret;
5810 }
5811
5812 /* Color used to fill bitmaps so we can tell which parts have been drawn over by gdi32. */
5813 static const COLORREF DC_BACKGROUND_KEY = 0x0c0b0d;
5814
5815 GpStatus WINGDIPAPI GdipGetDC(GpGraphics *graphics, HDC *hdc)
5816 {
5817     GpStatus stat=Ok;
5818
5819     TRACE("(%p, %p)\n", graphics, hdc);
5820
5821     if(!graphics || !hdc)
5822         return InvalidParameter;
5823
5824     if(graphics->busy)
5825         return ObjectBusy;
5826
5827     if (graphics->image && graphics->image->type == ImageTypeMetafile)
5828     {
5829         stat = METAFILE_GetDC((GpMetafile*)graphics->image, hdc);
5830     }
5831     else if (!graphics->hdc ||
5832         (graphics->image && graphics->image->type == ImageTypeBitmap && ((GpBitmap*)graphics->image)->format & PixelFormatAlpha))
5833     {
5834         /* Create a fake HDC and fill it with a constant color. */
5835         HDC temp_hdc;
5836         HBITMAP hbitmap;
5837         GpRectF bounds;
5838         BITMAPINFOHEADER bmih;
5839         int i;
5840
5841         stat = get_graphics_bounds(graphics, &bounds);
5842         if (stat != Ok)
5843             return stat;
5844
5845         graphics->temp_hbitmap_width = bounds.Width;
5846         graphics->temp_hbitmap_height = bounds.Height;
5847
5848         bmih.biSize = sizeof(bmih);
5849         bmih.biWidth = graphics->temp_hbitmap_width;
5850         bmih.biHeight = -graphics->temp_hbitmap_height;
5851         bmih.biPlanes = 1;
5852         bmih.biBitCount = 32;
5853         bmih.biCompression = BI_RGB;
5854         bmih.biSizeImage = 0;
5855         bmih.biXPelsPerMeter = 0;
5856         bmih.biYPelsPerMeter = 0;
5857         bmih.biClrUsed = 0;
5858         bmih.biClrImportant = 0;
5859
5860         hbitmap = CreateDIBSection(NULL, (BITMAPINFO*)&bmih, DIB_RGB_COLORS,
5861             (void**)&graphics->temp_bits, NULL, 0);
5862         if (!hbitmap)
5863             return GenericError;
5864
5865         temp_hdc = CreateCompatibleDC(0);
5866         if (!temp_hdc)
5867         {
5868             DeleteObject(hbitmap);
5869             return GenericError;
5870         }
5871
5872         for (i=0; i<(graphics->temp_hbitmap_width * graphics->temp_hbitmap_height); i++)
5873             ((DWORD*)graphics->temp_bits)[i] = DC_BACKGROUND_KEY;
5874
5875         SelectObject(temp_hdc, hbitmap);
5876
5877         graphics->temp_hbitmap = hbitmap;
5878         *hdc = graphics->temp_hdc = temp_hdc;
5879     }
5880     else
5881     {
5882         *hdc = graphics->hdc;
5883     }
5884
5885     if (stat == Ok)
5886         graphics->busy = TRUE;
5887
5888     return stat;
5889 }
5890
5891 GpStatus WINGDIPAPI GdipReleaseDC(GpGraphics *graphics, HDC hdc)
5892 {
5893     GpStatus stat=Ok;
5894
5895     TRACE("(%p, %p)\n", graphics, hdc);
5896
5897     if(!graphics || !hdc || !graphics->busy)
5898         return InvalidParameter;
5899
5900     if (graphics->image && graphics->image->type == ImageTypeMetafile)
5901     {
5902         stat = METAFILE_ReleaseDC((GpMetafile*)graphics->image, hdc);
5903     }
5904     else if (graphics->temp_hdc == hdc)
5905     {
5906         DWORD* pos;
5907         int i;
5908
5909         /* Find the pixels that have changed, and mark them as opaque. */
5910         pos = (DWORD*)graphics->temp_bits;
5911         for (i=0; i<(graphics->temp_hbitmap_width * graphics->temp_hbitmap_height); i++)
5912         {
5913             if (*pos != DC_BACKGROUND_KEY)
5914             {
5915                 *pos |= 0xff000000;
5916             }
5917             pos++;
5918         }
5919
5920         /* Write the changed pixels to the real target. */
5921         alpha_blend_pixels(graphics, 0, 0, graphics->temp_bits,
5922             graphics->temp_hbitmap_width, graphics->temp_hbitmap_height,
5923             graphics->temp_hbitmap_width * 4);
5924
5925         /* Clean up. */
5926         DeleteDC(graphics->temp_hdc);
5927         DeleteObject(graphics->temp_hbitmap);
5928         graphics->temp_hdc = NULL;
5929         graphics->temp_hbitmap = NULL;
5930     }
5931     else if (hdc != graphics->hdc)
5932     {
5933         stat = InvalidParameter;
5934     }
5935
5936     if (stat == Ok)
5937         graphics->busy = FALSE;
5938
5939     return stat;
5940 }
5941
5942 GpStatus WINGDIPAPI GdipGetClip(GpGraphics *graphics, GpRegion *region)
5943 {
5944     GpRegion *clip;
5945     GpStatus status;
5946
5947     TRACE("(%p, %p)\n", graphics, region);
5948
5949     if(!graphics || !region)
5950         return InvalidParameter;
5951
5952     if(graphics->busy)
5953         return ObjectBusy;
5954
5955     if((status = GdipCloneRegion(graphics->clip, &clip)) != Ok)
5956         return status;
5957
5958     /* free everything except root node and header */
5959     delete_element(&region->node);
5960     memcpy(region, clip, sizeof(GpRegion));
5961     GdipFree(clip);
5962
5963     return Ok;
5964 }
5965
5966 static GpStatus get_graphics_transform(GpGraphics *graphics, GpCoordinateSpace dst_space,
5967         GpCoordinateSpace src_space, GpMatrix **matrix)
5968 {
5969     GpStatus stat = GdipCreateMatrix(matrix);
5970     REAL unitscale;
5971
5972     if (dst_space != src_space && stat == Ok)
5973     {
5974         unitscale = convert_unit(graphics_res(graphics), graphics->unit);
5975
5976         if(graphics->unit != UnitDisplay)
5977             unitscale *= graphics->scale;
5978
5979         /* transform from src_space to CoordinateSpacePage */
5980         switch (src_space)
5981         {
5982         case CoordinateSpaceWorld:
5983             GdipMultiplyMatrix(*matrix, graphics->worldtrans, MatrixOrderAppend);
5984             break;
5985         case CoordinateSpacePage:
5986             break;
5987         case CoordinateSpaceDevice:
5988             GdipScaleMatrix(*matrix, 1.0/unitscale, 1.0/unitscale, MatrixOrderAppend);
5989             break;
5990         }
5991
5992         /* transform from CoordinateSpacePage to dst_space */
5993         switch (dst_space)
5994         {
5995         case CoordinateSpaceWorld:
5996             {
5997                 GpMatrix *inverted_transform;
5998                 stat = GdipCloneMatrix(graphics->worldtrans, &inverted_transform);
5999                 if (stat == Ok)
6000                 {
6001                     stat = GdipInvertMatrix(inverted_transform);
6002                     if (stat == Ok)
6003                         GdipMultiplyMatrix(*matrix, inverted_transform, MatrixOrderAppend);
6004                     GdipDeleteMatrix(inverted_transform);
6005                 }
6006                 break;
6007             }
6008         case CoordinateSpacePage:
6009             break;
6010         case CoordinateSpaceDevice:
6011             GdipScaleMatrix(*matrix, unitscale, unitscale, MatrixOrderAppend);
6012             break;
6013         }
6014     }
6015     return stat;
6016 }
6017
6018 GpStatus WINGDIPAPI GdipTransformPoints(GpGraphics *graphics, GpCoordinateSpace dst_space,
6019                                         GpCoordinateSpace src_space, GpPointF *points, INT count)
6020 {
6021     GpMatrix *matrix;
6022     GpStatus stat;
6023
6024     if(!graphics || !points || count <= 0)
6025         return InvalidParameter;
6026
6027     if(graphics->busy)
6028         return ObjectBusy;
6029
6030     TRACE("(%p, %d, %d, %p, %d)\n", graphics, dst_space, src_space, points, count);
6031
6032     if (src_space == dst_space) return Ok;
6033
6034     stat = get_graphics_transform(graphics, dst_space, src_space, &matrix);
6035
6036     if (stat == Ok)
6037     {
6038         stat = GdipTransformMatrixPoints(matrix, points, count);
6039
6040         GdipDeleteMatrix(matrix);
6041     }
6042
6043     return stat;
6044 }
6045
6046 GpStatus WINGDIPAPI GdipTransformPointsI(GpGraphics *graphics, GpCoordinateSpace dst_space,
6047                                          GpCoordinateSpace src_space, GpPoint *points, INT count)
6048 {
6049     GpPointF *pointsF;
6050     GpStatus ret;
6051     INT i;
6052
6053     TRACE("(%p, %d, %d, %p, %d)\n", graphics, dst_space, src_space, points, count);
6054
6055     if(count <= 0)
6056         return InvalidParameter;
6057
6058     pointsF = GdipAlloc(sizeof(GpPointF) * count);
6059     if(!pointsF)
6060         return OutOfMemory;
6061
6062     for(i = 0; i < count; i++){
6063         pointsF[i].X = (REAL)points[i].X;
6064         pointsF[i].Y = (REAL)points[i].Y;
6065     }
6066
6067     ret = GdipTransformPoints(graphics, dst_space, src_space, pointsF, count);
6068
6069     if(ret == Ok)
6070         for(i = 0; i < count; i++){
6071             points[i].X = roundr(pointsF[i].X);
6072             points[i].Y = roundr(pointsF[i].Y);
6073         }
6074     GdipFree(pointsF);
6075
6076     return ret;
6077 }
6078
6079 HPALETTE WINGDIPAPI GdipCreateHalftonePalette(void)
6080 {
6081     static int calls;
6082
6083     TRACE("\n");
6084
6085     if (!calls++)
6086       FIXME("stub\n");
6087
6088     return NULL;
6089 }
6090
6091 /*****************************************************************************
6092  * GdipTranslateClip [GDIPLUS.@]
6093  */
6094 GpStatus WINGDIPAPI GdipTranslateClip(GpGraphics *graphics, REAL dx, REAL dy)
6095 {
6096     TRACE("(%p, %.2f, %.2f)\n", graphics, dx, dy);
6097
6098     if(!graphics)
6099         return InvalidParameter;
6100
6101     if(graphics->busy)
6102         return ObjectBusy;
6103
6104     return GdipTranslateRegion(graphics->clip, dx, dy);
6105 }
6106
6107 /*****************************************************************************
6108  * GdipTranslateClipI [GDIPLUS.@]
6109  */
6110 GpStatus WINGDIPAPI GdipTranslateClipI(GpGraphics *graphics, INT dx, INT dy)
6111 {
6112     TRACE("(%p, %d, %d)\n", graphics, dx, dy);
6113
6114     if(!graphics)
6115         return InvalidParameter;
6116
6117     if(graphics->busy)
6118         return ObjectBusy;
6119
6120     return GdipTranslateRegion(graphics->clip, (REAL)dx, (REAL)dy);
6121 }
6122
6123
6124 /*****************************************************************************
6125  * GdipMeasureDriverString [GDIPLUS.@]
6126  */
6127 GpStatus WINGDIPAPI GdipMeasureDriverString(GpGraphics *graphics, GDIPCONST UINT16 *text, INT length,
6128                                             GDIPCONST GpFont *font, GDIPCONST PointF *positions,
6129                                             INT flags, GDIPCONST GpMatrix *matrix, RectF *boundingBox)
6130 {
6131     static const INT unsupported_flags = ~(DriverStringOptionsCmapLookup|DriverStringOptionsRealizedAdvance);
6132     HFONT hfont;
6133     HDC hdc;
6134     REAL min_x, min_y, max_x, max_y, x, y;
6135     int i;
6136     TEXTMETRICW textmetric;
6137     const WORD *glyph_indices;
6138     WORD *dynamic_glyph_indices=NULL;
6139     REAL rel_width, rel_height, ascent, descent;
6140     GpPointF pt[3];
6141
6142     TRACE("(%p %p %d %p %p %d %p %p)\n", graphics, text, length, font, positions, flags, matrix, boundingBox);
6143
6144     if (!graphics || !text || !font || !positions || !boundingBox)
6145         return InvalidParameter;
6146
6147     if (length == -1)
6148         length = strlenW(text);
6149
6150     if (length == 0)
6151     {
6152         boundingBox->X = 0.0;
6153         boundingBox->Y = 0.0;
6154         boundingBox->Width = 0.0;
6155         boundingBox->Height = 0.0;
6156     }
6157
6158     if (flags & unsupported_flags)
6159         FIXME("Ignoring flags %x\n", flags & unsupported_flags);
6160
6161     if (matrix)
6162         FIXME("Ignoring matrix\n");
6163
6164     get_font_hfont(graphics, font, &hfont);
6165
6166     hdc = CreateCompatibleDC(0);
6167     SelectObject(hdc, hfont);
6168
6169     GetTextMetricsW(hdc, &textmetric);
6170
6171     pt[0].X = 0.0;
6172     pt[0].Y = 0.0;
6173     pt[1].X = 1.0;
6174     pt[1].Y = 0.0;
6175     pt[2].X = 0.0;
6176     pt[2].Y = 1.0;
6177     GdipTransformPoints(graphics, CoordinateSpaceDevice, CoordinateSpaceWorld, pt, 3);
6178     rel_width = sqrt((pt[1].Y-pt[0].Y)*(pt[1].Y-pt[0].Y)+
6179                      (pt[1].X-pt[0].X)*(pt[1].X-pt[0].X));
6180     rel_height = sqrt((pt[2].Y-pt[0].Y)*(pt[2].Y-pt[0].Y)+
6181                       (pt[2].X-pt[0].X)*(pt[2].X-pt[0].X));
6182
6183     if (flags & DriverStringOptionsCmapLookup)
6184     {
6185         glyph_indices = dynamic_glyph_indices = GdipAlloc(sizeof(WORD) * length);
6186         if (!glyph_indices)
6187         {
6188             DeleteDC(hdc);
6189             DeleteObject(hfont);
6190             return OutOfMemory;
6191         }
6192
6193         GetGlyphIndicesW(hdc, text, length, dynamic_glyph_indices, 0);
6194     }
6195     else
6196         glyph_indices = text;
6197
6198     min_x = max_x = x = positions[0].X;
6199     min_y = max_y = y = positions[0].Y;
6200
6201     ascent = textmetric.tmAscent / rel_height;
6202     descent = textmetric.tmDescent / rel_height;
6203
6204     for (i=0; i<length; i++)
6205     {
6206         int char_width;
6207         ABC abc;
6208
6209         if (!(flags & DriverStringOptionsRealizedAdvance))
6210         {
6211             x = positions[i].X;
6212             y = positions[i].Y;
6213         }
6214
6215         GetCharABCWidthsW(hdc, glyph_indices[i], glyph_indices[i], &abc);
6216         char_width = abc.abcA + abc.abcB + abc.abcB;
6217
6218         if (min_y > y - ascent) min_y = y - ascent;
6219         if (max_y < y + descent) max_y = y + descent;
6220         if (min_x > x) min_x = x;
6221
6222         x += char_width / rel_width;
6223
6224         if (max_x < x) max_x = x;
6225     }
6226
6227     GdipFree(dynamic_glyph_indices);
6228     DeleteDC(hdc);
6229     DeleteObject(hfont);
6230
6231     boundingBox->X = min_x;
6232     boundingBox->Y = min_y;
6233     boundingBox->Width = max_x - min_x;
6234     boundingBox->Height = max_y - min_y;
6235
6236     return Ok;
6237 }
6238
6239 static GpStatus GDI32_GdipDrawDriverString(GpGraphics *graphics, GDIPCONST UINT16 *text, INT length,
6240                                      GDIPCONST GpFont *font, GDIPCONST GpBrush *brush,
6241                                      GDIPCONST PointF *positions, INT flags,
6242                                      GDIPCONST GpMatrix *matrix )
6243 {
6244     static const INT unsupported_flags = ~(DriverStringOptionsRealizedAdvance|DriverStringOptionsCmapLookup);
6245     INT save_state;
6246     GpPointF pt;
6247     HFONT hfont;
6248     UINT eto_flags=0;
6249
6250     if (flags & unsupported_flags)
6251         FIXME("Ignoring flags %x\n", flags & unsupported_flags);
6252
6253     if (matrix)
6254         FIXME("Ignoring matrix\n");
6255
6256     if (!(flags & DriverStringOptionsCmapLookup))
6257         eto_flags |= ETO_GLYPH_INDEX;
6258
6259     save_state = SaveDC(graphics->hdc);
6260     SetBkMode(graphics->hdc, TRANSPARENT);
6261     SetTextColor(graphics->hdc, get_gdi_brush_color(brush));
6262
6263     pt = positions[0];
6264     GdipTransformPoints(graphics, CoordinateSpaceDevice, CoordinateSpaceWorld, &pt, 1);
6265
6266     get_font_hfont(graphics, font, &hfont);
6267     SelectObject(graphics->hdc, hfont);
6268
6269     SetTextAlign(graphics->hdc, TA_BASELINE|TA_LEFT);
6270
6271     ExtTextOutW(graphics->hdc, roundr(pt.X), roundr(pt.Y), eto_flags, NULL, text, length, NULL);
6272
6273     RestoreDC(graphics->hdc, save_state);
6274
6275     DeleteObject(hfont);
6276
6277     return Ok;
6278 }
6279
6280 static GpStatus SOFTWARE_GdipDrawDriverString(GpGraphics *graphics, GDIPCONST UINT16 *text, INT length,
6281                                          GDIPCONST GpFont *font, GDIPCONST GpBrush *brush,
6282                                          GDIPCONST PointF *positions, INT flags,
6283                                          GDIPCONST GpMatrix *matrix )
6284 {
6285     static const INT unsupported_flags = ~(DriverStringOptionsCmapLookup|DriverStringOptionsRealizedAdvance);
6286     GpStatus stat;
6287     PointF *real_positions, real_position;
6288     POINT *pti;
6289     HFONT hfont;
6290     HDC hdc;
6291     int min_x=INT_MAX, min_y=INT_MAX, max_x=INT_MIN, max_y=INT_MIN, i, x, y;
6292     DWORD max_glyphsize=0;
6293     GLYPHMETRICS glyphmetrics;
6294     static const MAT2 identity = {{0,1}, {0,0}, {0,0}, {0,1}};
6295     BYTE *glyph_mask;
6296     BYTE *text_mask;
6297     int text_mask_stride;
6298     BYTE *pixel_data;
6299     int pixel_data_stride;
6300     GpRect pixel_area;
6301     UINT ggo_flags = GGO_GRAY8_BITMAP;
6302
6303     if (length <= 0)
6304         return Ok;
6305
6306     if (!(flags & DriverStringOptionsCmapLookup))
6307         ggo_flags |= GGO_GLYPH_INDEX;
6308
6309     if (flags & unsupported_flags)
6310         FIXME("Ignoring flags %x\n", flags & unsupported_flags);
6311
6312     if (matrix)
6313         FIXME("Ignoring matrix\n");
6314
6315     pti = GdipAlloc(sizeof(POINT) * length);
6316     if (!pti)
6317         return OutOfMemory;
6318
6319     if (flags & DriverStringOptionsRealizedAdvance)
6320     {
6321         real_position = positions[0];
6322
6323         transform_and_round_points(graphics, pti, &real_position, 1);
6324     }
6325     else
6326     {
6327         real_positions = GdipAlloc(sizeof(PointF) * length);
6328         if (!real_positions)
6329         {
6330             GdipFree(pti);
6331             return OutOfMemory;
6332         }
6333
6334         memcpy(real_positions, positions, sizeof(PointF) * length);
6335
6336         transform_and_round_points(graphics, pti, real_positions, length);
6337
6338         GdipFree(real_positions);
6339     }
6340
6341     get_font_hfont(graphics, font, &hfont);
6342
6343     hdc = CreateCompatibleDC(0);
6344     SelectObject(hdc, hfont);
6345
6346     /* Get the boundaries of the text to be drawn */
6347     for (i=0; i<length; i++)
6348     {
6349         DWORD glyphsize;
6350         int left, top, right, bottom;
6351
6352         glyphsize = GetGlyphOutlineW(hdc, text[i], ggo_flags,
6353             &glyphmetrics, 0, NULL, &identity);
6354
6355         if (glyphsize == GDI_ERROR)
6356         {
6357             ERR("GetGlyphOutlineW failed\n");
6358             GdipFree(pti);
6359             DeleteDC(hdc);
6360             DeleteObject(hfont);
6361             return GenericError;
6362         }
6363
6364         if (glyphsize > max_glyphsize)
6365             max_glyphsize = glyphsize;
6366
6367         left = pti[i].x + glyphmetrics.gmptGlyphOrigin.x;
6368         top = pti[i].y - glyphmetrics.gmptGlyphOrigin.y;
6369         right = pti[i].x + glyphmetrics.gmptGlyphOrigin.x + glyphmetrics.gmBlackBoxX;
6370         bottom = pti[i].y - glyphmetrics.gmptGlyphOrigin.y + glyphmetrics.gmBlackBoxY;
6371
6372         if (left < min_x) min_x = left;
6373         if (top < min_y) min_y = top;
6374         if (right > max_x) max_x = right;
6375         if (bottom > max_y) max_y = bottom;
6376
6377         if (i+1 < length && (flags & DriverStringOptionsRealizedAdvance) == DriverStringOptionsRealizedAdvance)
6378         {
6379             pti[i+1].x = pti[i].x + glyphmetrics.gmCellIncX;
6380             pti[i+1].y = pti[i].y + glyphmetrics.gmCellIncY;
6381         }
6382     }
6383
6384     glyph_mask = GdipAlloc(max_glyphsize);
6385     text_mask = GdipAlloc((max_x - min_x) * (max_y - min_y));
6386     text_mask_stride = max_x - min_x;
6387
6388     if (!(glyph_mask && text_mask))
6389     {
6390         GdipFree(glyph_mask);
6391         GdipFree(text_mask);
6392         GdipFree(pti);
6393         DeleteDC(hdc);
6394         DeleteObject(hfont);
6395         return OutOfMemory;
6396     }
6397
6398     /* Generate a mask for the text */
6399     for (i=0; i<length; i++)
6400     {
6401         int left, top, stride;
6402
6403         GetGlyphOutlineW(hdc, text[i], ggo_flags,
6404             &glyphmetrics, max_glyphsize, glyph_mask, &identity);
6405
6406         left = pti[i].x + glyphmetrics.gmptGlyphOrigin.x;
6407         top = pti[i].y - glyphmetrics.gmptGlyphOrigin.y;
6408         stride = (glyphmetrics.gmBlackBoxX + 3) & (~3);
6409
6410         for (y=0; y<glyphmetrics.gmBlackBoxY; y++)
6411         {
6412             BYTE *glyph_val = glyph_mask + y * stride;
6413             BYTE *text_val = text_mask + (left - min_x) + (top - min_y + y) * text_mask_stride;
6414             for (x=0; x<glyphmetrics.gmBlackBoxX; x++)
6415             {
6416                 *text_val = min(64, *text_val + *glyph_val);
6417                 glyph_val++;
6418                 text_val++;
6419             }
6420         }
6421     }
6422
6423     GdipFree(pti);
6424     DeleteDC(hdc);
6425     DeleteObject(hfont);
6426     GdipFree(glyph_mask);
6427
6428     /* get the brush data */
6429     pixel_data = GdipAlloc(4 * (max_x - min_x) * (max_y - min_y));
6430     if (!pixel_data)
6431     {
6432         GdipFree(text_mask);
6433         return OutOfMemory;
6434     }
6435
6436     pixel_area.X = min_x;
6437     pixel_area.Y = min_y;
6438     pixel_area.Width = max_x - min_x;
6439     pixel_area.Height = max_y - min_y;
6440     pixel_data_stride = pixel_area.Width * 4;
6441
6442     stat = brush_fill_pixels(graphics, (GpBrush*)brush, (DWORD*)pixel_data, &pixel_area, pixel_area.Width);
6443     if (stat != Ok)
6444     {
6445         GdipFree(text_mask);
6446         GdipFree(pixel_data);
6447         return stat;
6448     }
6449
6450     /* multiply the brush data by the mask */
6451     for (y=0; y<pixel_area.Height; y++)
6452     {
6453         BYTE *text_val = text_mask + text_mask_stride * y;
6454         BYTE *pixel_val = pixel_data + pixel_data_stride * y + 3;
6455         for (x=0; x<pixel_area.Width; x++)
6456         {
6457             *pixel_val = (*pixel_val) * (*text_val) / 64;
6458             text_val++;
6459             pixel_val+=4;
6460         }
6461     }
6462
6463     GdipFree(text_mask);
6464
6465     /* draw the result */
6466     stat = alpha_blend_pixels(graphics, min_x, min_y, pixel_data, pixel_area.Width,
6467         pixel_area.Height, pixel_data_stride);
6468
6469     GdipFree(pixel_data);
6470
6471     return stat;
6472 }
6473
6474 /*****************************************************************************
6475  * GdipDrawDriverString [GDIPLUS.@]
6476  */
6477 GpStatus WINGDIPAPI GdipDrawDriverString(GpGraphics *graphics, GDIPCONST UINT16 *text, INT length,
6478                                          GDIPCONST GpFont *font, GDIPCONST GpBrush *brush,
6479                                          GDIPCONST PointF *positions, INT flags,
6480                                          GDIPCONST GpMatrix *matrix )
6481 {
6482     GpStatus stat=NotImplemented;
6483
6484     TRACE("(%p %s %p %p %p %d %p)\n", graphics, debugstr_wn(text, length), font, brush, positions, flags, matrix);
6485
6486     if (!graphics || !text || !font || !brush || !positions)
6487         return InvalidParameter;
6488
6489     if (length == -1)
6490         length = strlenW(text);
6491
6492     if (graphics->hdc &&
6493         ((flags & DriverStringOptionsRealizedAdvance) || length <= 1) &&
6494         brush->bt == BrushTypeSolidColor &&
6495         (((GpSolidFill*)brush)->color & 0xff000000) == 0xff000000)
6496         stat = GDI32_GdipDrawDriverString(graphics, text, length, font, brush,
6497             positions, flags, matrix);
6498
6499     if (stat == NotImplemented)
6500         stat = SOFTWARE_GdipDrawDriverString(graphics, text, length, font, brush,
6501             positions, flags, matrix);
6502
6503     return stat;
6504 }
6505
6506 GpStatus WINGDIPAPI GdipRecordMetafileStream(IStream *stream, HDC hdc, EmfType type, GDIPCONST GpRect *frameRect,
6507                                         MetafileFrameUnit frameUnit, GDIPCONST WCHAR *desc, GpMetafile **metafile)
6508 {
6509     FIXME("(%p %p %d %p %d %p %p): stub\n", stream, hdc, type, frameRect, frameUnit, desc, metafile);
6510     return NotImplemented;
6511 }
6512
6513 /*****************************************************************************
6514  * GdipIsVisibleClipEmpty [GDIPLUS.@]
6515  */
6516 GpStatus WINGDIPAPI GdipIsVisibleClipEmpty(GpGraphics *graphics, BOOL *res)
6517 {
6518     GpStatus stat;
6519     GpRegion* rgn;
6520
6521     TRACE("(%p, %p)\n", graphics, res);
6522
6523     if((stat = GdipCreateRegion(&rgn)) != Ok)
6524         return stat;
6525
6526     if((stat = get_visible_clip_region(graphics, rgn)) != Ok)
6527         goto cleanup;
6528
6529     stat = GdipIsEmptyRegion(rgn, graphics, res);
6530
6531 cleanup:
6532     GdipDeleteRegion(rgn);
6533     return stat;
6534 }
6535
6536 GpStatus WINGDIPAPI GdipResetPageTransform(GpGraphics *graphics)
6537 {
6538     static int calls;
6539
6540     TRACE("(%p) stub\n", graphics);
6541
6542     if(!(calls++))
6543         FIXME("not implemented\n");
6544
6545     return NotImplemented;
6546 }