git.oblomov.eu Git - wine/blob - 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 static 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     get_log_fontW(font, graphics, &lfw);
2140     lfw.lfHeight = roundr(lfw.lfHeight * rel_height);
2141     unscaled_font = CreateFontIndirectW(&lfw);
2142
2143     SelectObject(hdc, unscaled_font);
2144     GetTextMetricsW(hdc, &textmet);
2145
2146     lfw.lfWidth = roundr(textmet.tmAveCharWidth * rel_width / rel_height);
2147     lfw.lfEscapement = lfw.lfOrientation = roundr((angle / M_PI) * 1800.0);
2148
2149     *hfont = CreateFontIndirectW(&lfw);
2150
2151     DeleteDC(hdc);
2152     DeleteObject(unscaled_font);
2153 }
2154
2155 GpStatus WINGDIPAPI GdipCreateFromHDC(HDC hdc, GpGraphics **graphics)
2156 {
2157     TRACE("(%p, %p)\n", hdc, graphics);
2158
2159     return GdipCreateFromHDC2(hdc, NULL, graphics);
2160 }
2161
2162 GpStatus WINGDIPAPI GdipCreateFromHDC2(HDC hdc, HANDLE hDevice, GpGraphics **graphics)
2163 {
2164     GpStatus retval;
2165
2166     TRACE("(%p, %p, %p)\n", hdc, hDevice, graphics);
2167
2168     if(hDevice != NULL) {
2169         FIXME("Don't know how to handle parameter hDevice\n");
2170         return NotImplemented;
2171     }
2172
2173     if(hdc == NULL)
2174         return OutOfMemory;
2175
2176     if(graphics == NULL)
2177         return InvalidParameter;
2178
2179     *graphics = GdipAlloc(sizeof(GpGraphics));
2180     if(!*graphics)  return OutOfMemory;
2181
2182     if((retval = GdipCreateMatrix(&(*graphics)->worldtrans)) != Ok){
2183         GdipFree(*graphics);
2184         return retval;
2185     }
2186
2187     if((retval = GdipCreateRegion(&(*graphics)->clip)) != Ok){
2188         GdipFree((*graphics)->worldtrans);
2189         GdipFree(*graphics);
2190         return retval;
2191     }
2192
2193     (*graphics)->hdc = hdc;
2194     (*graphics)->hwnd = WindowFromDC(hdc);
2195     (*graphics)->owndc = FALSE;
2196     (*graphics)->smoothing = SmoothingModeDefault;
2197     (*graphics)->compqual = CompositingQualityDefault;
2198     (*graphics)->interpolation = InterpolationModeBilinear;
2199     (*graphics)->pixeloffset = PixelOffsetModeDefault;
2200     (*graphics)->compmode = CompositingModeSourceOver;
2201     (*graphics)->unit = UnitDisplay;
2202     (*graphics)->scale = 1.0;
2203     (*graphics)->busy = FALSE;
2204     (*graphics)->textcontrast = 4;
2205     list_init(&(*graphics)->containers);
2206     (*graphics)->contid = 0;
2207
2208     TRACE("<-- %p\n", *graphics);
2209
2210     return Ok;
2211 }
2212
2213 GpStatus graphics_from_image(GpImage *image, GpGraphics **graphics)
2214 {
2215     GpStatus retval;
2216
2217     *graphics = GdipAlloc(sizeof(GpGraphics));
2218     if(!*graphics)  return OutOfMemory;
2219
2220     if((retval = GdipCreateMatrix(&(*graphics)->worldtrans)) != Ok){
2221         GdipFree(*graphics);
2222         return retval;
2223     }
2224
2225     if((retval = GdipCreateRegion(&(*graphics)->clip)) != Ok){
2226         GdipFree((*graphics)->worldtrans);
2227         GdipFree(*graphics);
2228         return retval;
2229     }
2230
2231     (*graphics)->hdc = NULL;
2232     (*graphics)->hwnd = NULL;
2233     (*graphics)->owndc = FALSE;
2234     (*graphics)->image = image;
2235     (*graphics)->smoothing = SmoothingModeDefault;
2236     (*graphics)->compqual = CompositingQualityDefault;
2237     (*graphics)->interpolation = InterpolationModeBilinear;
2238     (*graphics)->pixeloffset = PixelOffsetModeDefault;
2239     (*graphics)->compmode = CompositingModeSourceOver;
2240     (*graphics)->unit = UnitDisplay;
2241     (*graphics)->scale = 1.0;
2242     (*graphics)->busy = FALSE;
2243     (*graphics)->textcontrast = 4;
2244     list_init(&(*graphics)->containers);
2245     (*graphics)->contid = 0;
2246
2247     TRACE("<-- %p\n", *graphics);
2248
2249     return Ok;
2250 }
2251
2252 GpStatus WINGDIPAPI GdipCreateFromHWND(HWND hwnd, GpGraphics **graphics)
2253 {
2254     GpStatus ret;
2255     HDC hdc;
2256
2257     TRACE("(%p, %p)\n", hwnd, graphics);
2258
2259     hdc = GetDC(hwnd);
2260
2261     if((ret = GdipCreateFromHDC(hdc, graphics)) != Ok)
2262     {
2263         ReleaseDC(hwnd, hdc);
2264         return ret;
2265     }
2266
2267     (*graphics)->hwnd = hwnd;
2268     (*graphics)->owndc = TRUE;
2269
2270     return Ok;
2271 }
2272
2273 /* FIXME: no icm handling */
2274 GpStatus WINGDIPAPI GdipCreateFromHWNDICM(HWND hwnd, GpGraphics **graphics)
2275 {
2276     TRACE("(%p, %p)\n", hwnd, graphics);
2277
2278     return GdipCreateFromHWND(hwnd, graphics);
2279 }
2280
2281 GpStatus WINGDIPAPI GdipCreateMetafileFromEmf(HENHMETAFILE hemf, BOOL delete,
2282     GpMetafile **metafile)
2283 {
2284     IStream *stream = NULL;
2285     UINT read;
2286     ENHMETAHEADER *copy;
2287     GpStatus retval = Ok;
2288
2289     TRACE("(%p,%i,%p)\n", hemf, delete, metafile);
2290
2291     if(!hemf || !metafile)
2292         return InvalidParameter;
2293
2294     read = GetEnhMetaFileBits(hemf, 0, NULL);
2295     copy = GdipAlloc(read);
2296     GetEnhMetaFileBits(hemf, read, (BYTE *)copy);
2297
2298     if(CreateStreamOnHGlobal(copy, TRUE, &stream) != S_OK){
2299         ERR("could not make stream\n");
2300         GdipFree(copy);
2301         retval = GenericError;
2302         goto err;
2303     }
2304
2305     *metafile = GdipAlloc(sizeof(GpMetafile));
2306     if(!*metafile){
2307         retval = OutOfMemory;
2308         goto err;
2309     }
2310
2311     if(OleLoadPicture(stream, 0, FALSE, &IID_IPicture,
2312         (LPVOID*) &((*metafile)->image.picture)) != S_OK)
2313     {
2314         retval = GenericError;
2315         goto err;
2316     }
2317
2318
2319     (*metafile)->image.type = ImageTypeMetafile;
2320     memcpy(&(*metafile)->image.format, &ImageFormatWMF, sizeof(GUID));
2321     (*metafile)->image.palette = NULL;
2322     (*metafile)->image.xres = (REAL)copy->szlDevice.cx;
2323     (*metafile)->image.yres = (REAL)copy->szlDevice.cy;
2324     (*metafile)->bounds.X = (REAL)copy->rclBounds.left;
2325     (*metafile)->bounds.Y = (REAL)copy->rclBounds.top;
2326     (*metafile)->bounds.Width = (REAL)(copy->rclBounds.right - copy->rclBounds.left);
2327     (*metafile)->bounds.Height = (REAL)(copy->rclBounds.bottom - copy->rclBounds.top);
2328     (*metafile)->unit = UnitPixel;
2329
2330     if(delete)
2331         DeleteEnhMetaFile(hemf);
2332
2333     TRACE("<-- %p\n", *metafile);
2334
2335 err:
2336     if (retval != Ok)
2337         GdipFree(*metafile);
2338     IStream_Release(stream);
2339     return retval;
2340 }
2341
2342 GpStatus WINGDIPAPI GdipCreateMetafileFromWmf(HMETAFILE hwmf, BOOL delete,
2343     GDIPCONST WmfPlaceableFileHeader * placeable, GpMetafile **metafile)
2344 {
2345     UINT read;
2346     BYTE *copy;
2347     HENHMETAFILE hemf;
2348     GpStatus retval = Ok;
2349
2350     TRACE("(%p, %d, %p, %p)\n", hwmf, delete, placeable, metafile);
2351
2352     if(!hwmf || !metafile || !placeable)
2353         return InvalidParameter;
2354
2355     *metafile = NULL;
2356     read = GetMetaFileBitsEx(hwmf, 0, NULL);
2357     if(!read)
2358         return GenericError;
2359     copy = GdipAlloc(read);
2360     GetMetaFileBitsEx(hwmf, read, copy);
2361
2362     hemf = SetWinMetaFileBits(read, copy, NULL, NULL);
2363     GdipFree(copy);
2364
2365     retval = GdipCreateMetafileFromEmf(hemf, FALSE, metafile);
2366
2367     if (retval == Ok)
2368     {
2369         (*metafile)->image.xres = (REAL)placeable->Inch;
2370         (*metafile)->image.yres = (REAL)placeable->Inch;
2371         (*metafile)->bounds.X = ((REAL)placeable->BoundingBox.Left) / ((REAL)placeable->Inch);
2372         (*metafile)->bounds.Y = ((REAL)placeable->BoundingBox.Top) / ((REAL)placeable->Inch);
2373         (*metafile)->bounds.Width = (REAL)(placeable->BoundingBox.Right -
2374                                            placeable->BoundingBox.Left);
2375         (*metafile)->bounds.Height = (REAL)(placeable->BoundingBox.Bottom -
2376                                             placeable->BoundingBox.Top);
2377
2378         if (delete) DeleteMetaFile(hwmf);
2379     }
2380     return retval;
2381 }
2382
2383 GpStatus WINGDIPAPI GdipCreateMetafileFromWmfFile(GDIPCONST WCHAR *file,
2384     GDIPCONST WmfPlaceableFileHeader * placeable, GpMetafile **metafile)
2385 {
2386     HMETAFILE hmf = GetMetaFileW(file);
2387
2388     TRACE("(%s, %p, %p)\n", debugstr_w(file), placeable, metafile);
2389
2390     if(!hmf) return InvalidParameter;
2391
2392     return GdipCreateMetafileFromWmf(hmf, TRUE, placeable, metafile);
2393 }
2394
2395 GpStatus WINGDIPAPI GdipCreateMetafileFromFile(GDIPCONST WCHAR *file,
2396     GpMetafile **metafile)
2397 {
2398     FIXME("(%p, %p): stub\n", file, metafile);
2399     return NotImplemented;
2400 }
2401
2402 GpStatus WINGDIPAPI GdipCreateMetafileFromStream(IStream *stream,
2403     GpMetafile **metafile)
2404 {
2405     FIXME("(%p, %p): stub\n", stream, metafile);
2406     return NotImplemented;
2407 }
2408
2409 GpStatus WINGDIPAPI GdipCreateStreamOnFile(GDIPCONST WCHAR * filename,
2410     UINT access, IStream **stream)
2411 {
2412     DWORD dwMode;
2413     HRESULT ret;
2414
2415     TRACE("(%s, %u, %p)\n", debugstr_w(filename), access, stream);
2416
2417     if(!stream || !filename)
2418         return InvalidParameter;
2419
2420     if(access & GENERIC_WRITE)
2421         dwMode = STGM_SHARE_DENY_WRITE | STGM_WRITE | STGM_CREATE;
2422     else if(access & GENERIC_READ)
2423         dwMode = STGM_SHARE_DENY_WRITE | STGM_READ | STGM_FAILIFTHERE;
2424     else
2425         return InvalidParameter;
2426
2427     ret = SHCreateStreamOnFileW(filename, dwMode, stream);
2428
2429     return hresult_to_status(ret);
2430 }
2431
2432 GpStatus WINGDIPAPI GdipDeleteGraphics(GpGraphics *graphics)
2433 {
2434     GraphicsContainerItem *cont, *next;
2435     GpStatus stat;
2436     TRACE("(%p)\n", graphics);
2437
2438     if(!graphics) return InvalidParameter;
2439     if(graphics->busy) return ObjectBusy;
2440
2441     if (graphics->image && graphics->image->type == ImageTypeMetafile)
2442     {
2443         stat = METAFILE_GraphicsDeleted((GpMetafile*)graphics->image);
2444         if (stat != Ok)
2445             return stat;
2446     }
2447
2448     if(graphics->owndc)
2449         ReleaseDC(graphics->hwnd, graphics->hdc);
2450
2451     LIST_FOR_EACH_ENTRY_SAFE(cont, next, &graphics->containers, GraphicsContainerItem, entry){
2452         list_remove(&cont->entry);
2453         delete_container(cont);
2454     }
2455
2456     GdipDeleteRegion(graphics->clip);
2457     GdipDeleteMatrix(graphics->worldtrans);
2458     GdipFree(graphics);
2459
2460     return Ok;
2461 }
2462
2463 GpStatus WINGDIPAPI GdipDrawArc(GpGraphics *graphics, GpPen *pen, REAL x,
2464     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
2465 {
2466     INT save_state, num_pts;
2467     GpPointF points[MAX_ARC_PTS];
2468     GpStatus retval;
2469
2470     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y,
2471           width, height, startAngle, sweepAngle);
2472
2473     if(!graphics || !pen || width <= 0 || height <= 0)
2474         return InvalidParameter;
2475
2476     if(graphics->busy)
2477         return ObjectBusy;
2478
2479     if (!graphics->hdc)
2480     {
2481         FIXME("graphics object has no HDC\n");
2482         return Ok;
2483     }
2484
2485     num_pts = arc2polybezier(points, x, y, width, height, startAngle, sweepAngle);
2486
2487     save_state = prepare_dc(graphics, pen);
2488
2489     retval = draw_polybezier(graphics, pen, points, num_pts, TRUE);
2490
2491     restore_dc(graphics, save_state);
2492
2493     return retval;
2494 }
2495
2496 GpStatus WINGDIPAPI GdipDrawArcI(GpGraphics *graphics, GpPen *pen, INT x,
2497     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
2498 {
2499     TRACE("(%p, %p, %d, %d, %d, %d, %.2f, %.2f)\n", graphics, pen, x, y,
2500           width, height, startAngle, sweepAngle);
2501
2502     return GdipDrawArc(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
2503 }
2504
2505 GpStatus WINGDIPAPI GdipDrawBezier(GpGraphics *graphics, GpPen *pen, REAL x1,
2506     REAL y1, REAL x2, REAL y2, REAL x3, REAL y3, REAL x4, REAL y4)
2507 {
2508     INT save_state;
2509     GpPointF pt[4];
2510     GpStatus retval;
2511
2512     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x1, y1,
2513           x2, y2, x3, y3, x4, y4);
2514
2515     if(!graphics || !pen)
2516         return InvalidParameter;
2517
2518     if(graphics->busy)
2519         return ObjectBusy;
2520
2521     if (!graphics->hdc)
2522     {
2523         FIXME("graphics object has no HDC\n");
2524         return Ok;
2525     }
2526
2527     pt[0].X = x1;
2528     pt[0].Y = y1;
2529     pt[1].X = x2;
2530     pt[1].Y = y2;
2531     pt[2].X = x3;
2532     pt[2].Y = y3;
2533     pt[3].X = x4;
2534     pt[3].Y = y4;
2535
2536     save_state = prepare_dc(graphics, pen);
2537
2538     retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
2539
2540     restore_dc(graphics, save_state);
2541
2542     return retval;
2543 }
2544
2545 GpStatus WINGDIPAPI GdipDrawBezierI(GpGraphics *graphics, GpPen *pen, INT x1,
2546     INT y1, INT x2, INT y2, INT x3, INT y3, INT x4, INT y4)
2547 {
2548     INT save_state;
2549     GpPointF pt[4];
2550     GpStatus retval;
2551
2552     TRACE("(%p, %p, %d, %d, %d, %d, %d, %d, %d, %d)\n", graphics, pen, x1, y1,
2553           x2, y2, x3, y3, x4, y4);
2554
2555     if(!graphics || !pen)
2556         return InvalidParameter;
2557
2558     if(graphics->busy)
2559         return ObjectBusy;
2560
2561     if (!graphics->hdc)
2562     {
2563         FIXME("graphics object has no HDC\n");
2564         return Ok;
2565     }
2566
2567     pt[0].X = x1;
2568     pt[0].Y = y1;
2569     pt[1].X = x2;
2570     pt[1].Y = y2;
2571     pt[2].X = x3;
2572     pt[2].Y = y3;
2573     pt[3].X = x4;
2574     pt[3].Y = y4;
2575
2576     save_state = prepare_dc(graphics, pen);
2577
2578     retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
2579
2580     restore_dc(graphics, save_state);
2581
2582     return retval;
2583 }
2584
2585 GpStatus WINGDIPAPI GdipDrawBeziers(GpGraphics *graphics, GpPen *pen,
2586     GDIPCONST GpPointF *points, INT count)
2587 {
2588     INT i;
2589     GpStatus ret;
2590
2591     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2592
2593     if(!graphics || !pen || !points || (count <= 0))
2594         return InvalidParameter;
2595
2596     if(graphics->busy)
2597         return ObjectBusy;
2598
2599     for(i = 0; i < floor(count / 4); i++){
2600         ret = GdipDrawBezier(graphics, pen,
2601                              points[4*i].X, points[4*i].Y,
2602                              points[4*i + 1].X, points[4*i + 1].Y,
2603                              points[4*i + 2].X, points[4*i + 2].Y,
2604                              points[4*i + 3].X, points[4*i + 3].Y);
2605         if(ret != Ok)
2606             return ret;
2607     }
2608
2609     return Ok;
2610 }
2611
2612 GpStatus WINGDIPAPI GdipDrawBeziersI(GpGraphics *graphics, GpPen *pen,
2613     GDIPCONST GpPoint *points, INT count)
2614 {
2615     GpPointF *pts;
2616     GpStatus ret;
2617     INT i;
2618
2619     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2620
2621     if(!graphics || !pen || !points || (count <= 0))
2622         return InvalidParameter;
2623
2624     if(graphics->busy)
2625         return ObjectBusy;
2626
2627     pts = GdipAlloc(sizeof(GpPointF) * count);
2628     if(!pts)
2629         return OutOfMemory;
2630
2631     for(i = 0; i < count; i++){
2632         pts[i].X = (REAL)points[i].X;
2633         pts[i].Y = (REAL)points[i].Y;
2634     }
2635
2636     ret = GdipDrawBeziers(graphics,pen,pts,count);
2637
2638     GdipFree(pts);
2639
2640     return ret;
2641 }
2642
2643 GpStatus WINGDIPAPI GdipDrawClosedCurve(GpGraphics *graphics, GpPen *pen,
2644     GDIPCONST GpPointF *points, INT count)
2645 {
2646     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2647
2648     return GdipDrawClosedCurve2(graphics, pen, points, count, 1.0);
2649 }
2650
2651 GpStatus WINGDIPAPI GdipDrawClosedCurveI(GpGraphics *graphics, GpPen *pen,
2652     GDIPCONST GpPoint *points, INT count)
2653 {
2654     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2655
2656     return GdipDrawClosedCurve2I(graphics, pen, points, count, 1.0);
2657 }
2658
2659 GpStatus WINGDIPAPI GdipDrawClosedCurve2(GpGraphics *graphics, GpPen *pen,
2660     GDIPCONST GpPointF *points, INT count, REAL tension)
2661 {
2662     GpPath *path;
2663     GpStatus stat;
2664
2665     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
2666
2667     if(!graphics || !pen || !points || count <= 0)
2668         return InvalidParameter;
2669
2670     if(graphics->busy)
2671         return ObjectBusy;
2672
2673     if((stat = GdipCreatePath(FillModeAlternate, &path)) != Ok)
2674         return stat;
2675
2676     stat = GdipAddPathClosedCurve2(path, points, count, tension);
2677     if(stat != Ok){
2678         GdipDeletePath(path);
2679         return stat;
2680     }
2681
2682     stat = GdipDrawPath(graphics, pen, path);
2683
2684     GdipDeletePath(path);
2685
2686     return stat;
2687 }
2688
2689 GpStatus WINGDIPAPI GdipDrawClosedCurve2I(GpGraphics *graphics, GpPen *pen,
2690     GDIPCONST GpPoint *points, INT count, REAL tension)
2691 {
2692     GpPointF *ptf;
2693     GpStatus stat;
2694     INT i;
2695
2696     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
2697
2698     if(!points || count <= 0)
2699         return InvalidParameter;
2700
2701     ptf = GdipAlloc(sizeof(GpPointF)*count);
2702     if(!ptf)
2703         return OutOfMemory;
2704
2705     for(i = 0; i < count; i++){
2706         ptf[i].X = (REAL)points[i].X;
2707         ptf[i].Y = (REAL)points[i].Y;
2708     }
2709
2710     stat = GdipDrawClosedCurve2(graphics, pen, ptf, count, tension);
2711
2712     GdipFree(ptf);
2713
2714     return stat;
2715 }
2716
2717 GpStatus WINGDIPAPI GdipDrawCurve(GpGraphics *graphics, GpPen *pen,
2718     GDIPCONST GpPointF *points, INT count)
2719 {
2720     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2721
2722     return GdipDrawCurve2(graphics,pen,points,count,1.0);
2723 }
2724
2725 GpStatus WINGDIPAPI GdipDrawCurveI(GpGraphics *graphics, GpPen *pen,
2726     GDIPCONST GpPoint *points, INT count)
2727 {
2728     GpPointF *pointsF;
2729     GpStatus ret;
2730     INT i;
2731
2732     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2733
2734     if(!points)
2735         return InvalidParameter;
2736
2737     pointsF = GdipAlloc(sizeof(GpPointF)*count);
2738     if(!pointsF)
2739         return OutOfMemory;
2740
2741     for(i = 0; i < count; i++){
2742         pointsF[i].X = (REAL)points[i].X;
2743         pointsF[i].Y = (REAL)points[i].Y;
2744     }
2745
2746     ret = GdipDrawCurve(graphics,pen,pointsF,count);
2747     GdipFree(pointsF);
2748
2749     return ret;
2750 }
2751
2752 /* Approximates cardinal spline with Bezier curves. */
2753 GpStatus WINGDIPAPI GdipDrawCurve2(GpGraphics *graphics, GpPen *pen,
2754     GDIPCONST GpPointF *points, INT count, REAL tension)
2755 {
2756     /* PolyBezier expects count*3-2 points. */
2757     INT i, len_pt = count*3-2, save_state;
2758     GpPointF *pt;
2759     REAL x1, x2, y1, y2;
2760     GpStatus retval;
2761
2762     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
2763
2764     if(!graphics || !pen)
2765         return InvalidParameter;
2766
2767     if(graphics->busy)
2768         return ObjectBusy;
2769
2770     if(count < 2)
2771         return InvalidParameter;
2772
2773     if (!graphics->hdc)
2774     {
2775         FIXME("graphics object has no HDC\n");
2776         return Ok;
2777     }
2778
2779     pt = GdipAlloc(len_pt * sizeof(GpPointF));
2780     if(!pt)
2781         return OutOfMemory;
2782
2783     tension = tension * TENSION_CONST;
2784
2785     calc_curve_bezier_endp(points[0].X, points[0].Y, points[1].X, points[1].Y,
2786         tension, &x1, &y1);
2787
2788     pt[0].X = points[0].X;
2789     pt[0].Y = points[0].Y;
2790     pt[1].X = x1;
2791     pt[1].Y = y1;
2792
2793     for(i = 0; i < count-2; i++){
2794         calc_curve_bezier(&(points[i]), tension, &x1, &y1, &x2, &y2);
2795
2796         pt[3*i+2].X = x1;
2797         pt[3*i+2].Y = y1;
2798         pt[3*i+3].X = points[i+1].X;
2799         pt[3*i+3].Y = points[i+1].Y;
2800         pt[3*i+4].X = x2;
2801         pt[3*i+4].Y = y2;
2802     }
2803
2804     calc_curve_bezier_endp(points[count-1].X, points[count-1].Y,
2805         points[count-2].X, points[count-2].Y, tension, &x1, &y1);
2806
2807     pt[len_pt-2].X = x1;
2808     pt[len_pt-2].Y = y1;
2809     pt[len_pt-1].X = points[count-1].X;
2810     pt[len_pt-1].Y = points[count-1].Y;
2811
2812     save_state = prepare_dc(graphics, pen);
2813
2814     retval = draw_polybezier(graphics, pen, pt, len_pt, TRUE);
2815
2816     GdipFree(pt);
2817     restore_dc(graphics, save_state);
2818
2819     return retval;
2820 }
2821
2822 GpStatus WINGDIPAPI GdipDrawCurve2I(GpGraphics *graphics, GpPen *pen,
2823     GDIPCONST GpPoint *points, INT count, REAL tension)
2824 {
2825     GpPointF *pointsF;
2826     GpStatus ret;
2827     INT i;
2828
2829     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
2830
2831     if(!points)
2832         return InvalidParameter;
2833
2834     pointsF = GdipAlloc(sizeof(GpPointF)*count);
2835     if(!pointsF)
2836         return OutOfMemory;
2837
2838     for(i = 0; i < count; i++){
2839         pointsF[i].X = (REAL)points[i].X;
2840         pointsF[i].Y = (REAL)points[i].Y;
2841     }
2842
2843     ret = GdipDrawCurve2(graphics,pen,pointsF,count,tension);
2844     GdipFree(pointsF);
2845
2846     return ret;
2847 }
2848
2849 GpStatus WINGDIPAPI GdipDrawCurve3(GpGraphics *graphics, GpPen *pen,
2850     GDIPCONST GpPointF *points, INT count, INT offset, INT numberOfSegments,
2851     REAL tension)
2852 {
2853     TRACE("(%p, %p, %p, %d, %d, %d, %.2f)\n", graphics, pen, points, count, offset, numberOfSegments, tension);
2854
2855     if(offset >= count || numberOfSegments > count - offset - 1 || numberOfSegments <= 0){
2856         return InvalidParameter;
2857     }
2858
2859     return GdipDrawCurve2(graphics, pen, points + offset, numberOfSegments + 1, tension);
2860 }
2861
2862 GpStatus WINGDIPAPI GdipDrawCurve3I(GpGraphics *graphics, GpPen *pen,
2863     GDIPCONST GpPoint *points, INT count, INT offset, INT numberOfSegments,
2864     REAL tension)
2865 {
2866     TRACE("(%p, %p, %p, %d, %d, %d, %.2f)\n", graphics, pen, points, count, offset, numberOfSegments, tension);
2867
2868     if(count < 0){
2869         return OutOfMemory;
2870     }
2871
2872     if(offset >= count || numberOfSegments > count - offset - 1 || numberOfSegments <= 0){
2873         return InvalidParameter;
2874     }
2875
2876     return GdipDrawCurve2I(graphics, pen, points + offset, numberOfSegments + 1, tension);
2877 }
2878
2879 GpStatus WINGDIPAPI GdipDrawEllipse(GpGraphics *graphics, GpPen *pen, REAL x,
2880     REAL y, REAL width, REAL height)
2881 {
2882     INT save_state;
2883     GpPointF ptf[2];
2884     POINT pti[2];
2885
2886     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y, width, height);
2887
2888     if(!graphics || !pen)
2889         return InvalidParameter;
2890
2891     if(graphics->busy)
2892         return ObjectBusy;
2893
2894     if (!graphics->hdc)
2895     {
2896         FIXME("graphics object has no HDC\n");
2897         return Ok;
2898     }
2899
2900     ptf[0].X = x;
2901     ptf[0].Y = y;
2902     ptf[1].X = x + width;
2903     ptf[1].Y = y + height;
2904
2905     save_state = prepare_dc(graphics, pen);
2906     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
2907
2908     transform_and_round_points(graphics, pti, ptf, 2);
2909
2910     Ellipse(graphics->hdc, pti[0].x, pti[0].y, pti[1].x, pti[1].y);
2911
2912     restore_dc(graphics, save_state);
2913
2914     return Ok;
2915 }
2916
2917 GpStatus WINGDIPAPI GdipDrawEllipseI(GpGraphics *graphics, GpPen *pen, INT x,
2918     INT y, INT width, INT height)
2919 {
2920     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, pen, x, y, width, height);
2921
2922     return GdipDrawEllipse(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
2923 }
2924
2925
2926 GpStatus WINGDIPAPI GdipDrawImage(GpGraphics *graphics, GpImage *image, REAL x, REAL y)
2927 {
2928     UINT width, height;
2929     GpPointF points[3];
2930
2931     TRACE("(%p, %p, %.2f, %.2f)\n", graphics, image, x, y);
2932
2933     if(!graphics || !image)
2934         return InvalidParameter;
2935
2936     GdipGetImageWidth(image, &width);
2937     GdipGetImageHeight(image, &height);
2938
2939     /* FIXME: we should use the graphics and image dpi, somehow */
2940
2941     points[0].X = points[2].X = x;
2942     points[0].Y = points[1].Y = y;
2943     points[1].X = x + width;
2944     points[2].Y = y + height;
2945
2946     return GdipDrawImagePointsRect(graphics, image, points, 3, 0, 0, width, height,
2947         UnitPixel, NULL, NULL, NULL);
2948 }
2949
2950 GpStatus WINGDIPAPI GdipDrawImageI(GpGraphics *graphics, GpImage *image, INT x,
2951     INT y)
2952 {
2953     TRACE("(%p, %p, %d, %d)\n", graphics, image, x, y);
2954
2955     return GdipDrawImage(graphics, image, (REAL)x, (REAL)y);
2956 }
2957
2958 GpStatus WINGDIPAPI GdipDrawImagePointRect(GpGraphics *graphics, GpImage *image,
2959     REAL x, REAL y, REAL srcx, REAL srcy, REAL srcwidth, REAL srcheight,
2960     GpUnit srcUnit)
2961 {
2962     GpPointF points[3];
2963     TRACE("(%p, %p, %f, %f, %f, %f, %f, %f, %d)\n", graphics, image, x, y, srcx, srcy, srcwidth, srcheight, srcUnit);
2964
2965     points[0].X = points[2].X = x;
2966     points[0].Y = points[1].Y = y;
2967
2968     /* FIXME: convert image coordinates to Graphics coordinates? */
2969     points[1].X = x + srcwidth;
2970     points[2].Y = y + srcheight;
2971
2972     return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
2973         srcwidth, srcheight, srcUnit, NULL, NULL, NULL);
2974 }
2975
2976 GpStatus WINGDIPAPI GdipDrawImagePointRectI(GpGraphics *graphics, GpImage *image,
2977     INT x, INT y, INT srcx, INT srcy, INT srcwidth, INT srcheight,
2978     GpUnit srcUnit)
2979 {
2980     return GdipDrawImagePointRect(graphics, image, x, y, srcx, srcy, srcwidth, srcheight, srcUnit);
2981 }
2982
2983 GpStatus WINGDIPAPI GdipDrawImagePoints(GpGraphics *graphics, GpImage *image,
2984     GDIPCONST GpPointF *dstpoints, INT count)
2985 {
2986     UINT width, height;
2987
2988     TRACE("(%p, %p, %p, %d)\n", graphics, image, dstpoints, count);
2989
2990     if(!image)
2991         return InvalidParameter;
2992
2993     GdipGetImageWidth(image, &width);
2994     GdipGetImageHeight(image, &height);
2995
2996     return GdipDrawImagePointsRect(graphics, image, dstpoints, count, 0, 0,
2997         width, height, UnitPixel, NULL, NULL, NULL);
2998 }
2999
3000 GpStatus WINGDIPAPI GdipDrawImagePointsI(GpGraphics *graphics, GpImage *image,
3001     GDIPCONST GpPoint *dstpoints, INT count)
3002 {
3003     GpPointF ptf[3];
3004
3005     TRACE("(%p, %p, %p, %d)\n", graphics, image, dstpoints, count);
3006
3007     if (count != 3 || !dstpoints)
3008         return InvalidParameter;
3009
3010     ptf[0].X = (REAL)dstpoints[0].X;
3011     ptf[0].Y = (REAL)dstpoints[0].Y;
3012     ptf[1].X = (REAL)dstpoints[1].X;
3013     ptf[1].Y = (REAL)dstpoints[1].Y;
3014     ptf[2].X = (REAL)dstpoints[2].X;
3015     ptf[2].Y = (REAL)dstpoints[2].Y;
3016
3017     return GdipDrawImagePoints(graphics, image, ptf, count);
3018 }
3019
3020 GpStatus WINGDIPAPI GdipDrawImagePointsRect(GpGraphics *graphics, GpImage *image,
3021      GDIPCONST GpPointF *points, INT count, REAL srcx, REAL srcy, REAL srcwidth,
3022      REAL srcheight, GpUnit srcUnit, GDIPCONST GpImageAttributes* imageAttributes,
3023      DrawImageAbort callback, VOID * callbackData)
3024 {
3025     GpPointF ptf[4];
3026     POINT pti[4];
3027     REAL dx, dy;
3028     GpStatus stat;
3029
3030     TRACE("(%p, %p, %p, %d, %f, %f, %f, %f, %d, %p, %p, %p)\n", graphics, image, points,
3031           count, srcx, srcy, srcwidth, srcheight, srcUnit, imageAttributes, callback,
3032           callbackData);
3033
3034     if (count > 3)
3035         return NotImplemented;
3036
3037     if(!graphics || !image || !points || count != 3)
3038          return InvalidParameter;
3039
3040     TRACE("%s %s %s\n", debugstr_pointf(&points[0]), debugstr_pointf(&points[1]),
3041         debugstr_pointf(&points[2]));
3042
3043     memcpy(ptf, points, 3 * sizeof(GpPointF));
3044     ptf[3].X = ptf[2].X + ptf[1].X - ptf[0].X;
3045     ptf[3].Y = ptf[2].Y + ptf[1].Y - ptf[0].Y;
3046     if (!srcwidth || !srcheight || ptf[3].X == ptf[0].X || ptf[3].Y == ptf[0].Y)
3047         return Ok;
3048     transform_and_round_points(graphics, pti, ptf, 4);
3049
3050     if (image->picture)
3051     {
3052         if (!graphics->hdc)
3053         {
3054             FIXME("graphics object has no HDC\n");
3055         }
3056
3057         /* FIXME: partially implemented (only works for rectangular parallelograms) */
3058         if(srcUnit == UnitInch)
3059             dx = dy = (REAL) INCH_HIMETRIC;
3060         else if(srcUnit == UnitPixel){
3061             dx = ((REAL) INCH_HIMETRIC) /
3062                  ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSX));
3063             dy = ((REAL) INCH_HIMETRIC) /
3064                  ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSY));
3065         }
3066         else
3067             return NotImplemented;
3068
3069         if(IPicture_Render(image->picture, graphics->hdc,
3070             pti[0].x, pti[0].y, pti[1].x - pti[0].x, pti[2].y - pti[0].y,
3071             srcx * dx, srcy * dy,
3072             srcwidth * dx, srcheight * dy,
3073             NULL) != S_OK){
3074             if(callback)
3075                 callback(callbackData);
3076             return GenericError;
3077         }
3078     }
3079     else if (image->type == ImageTypeBitmap)
3080     {
3081         GpBitmap* bitmap = (GpBitmap*)image;
3082         int use_software=0;
3083
3084         if (srcUnit == UnitInch)
3085             dx = dy = 96.0; /* FIXME: use the image resolution */
3086         else if (srcUnit == UnitPixel)
3087             dx = dy = 1.0;
3088         else
3089             return NotImplemented;
3090
3091         srcx = srcx * dx;
3092         srcy = srcy * dy;
3093         srcwidth = srcwidth * dx;
3094         srcheight = srcheight * dy;
3095
3096         if (imageAttributes ||
3097             (graphics->image && graphics->image->type == ImageTypeBitmap) ||
3098             !((GpBitmap*)image)->hbitmap ||
3099             ptf[1].Y != ptf[0].Y || ptf[2].X != ptf[0].X ||
3100             ptf[1].X - ptf[0].X != srcwidth || ptf[2].Y - ptf[0].Y != srcheight ||
3101             srcx < 0 || srcy < 0 ||
3102             srcx + srcwidth > bitmap->width || srcy + srcheight > bitmap->height)
3103             use_software = 1;
3104
3105         if (use_software)
3106         {
3107             RECT dst_area;
3108             GpRect src_area;
3109             int i, x, y, src_stride, dst_stride;
3110             GpMatrix *dst_to_src;
3111             REAL m11, m12, m21, m22, mdx, mdy;
3112             LPBYTE src_data, dst_data;
3113             BitmapData lockeddata;
3114             InterpolationMode interpolation = graphics->interpolation;
3115             GpPointF dst_to_src_points[3] = {{0.0, 0.0}, {1.0, 0.0}, {0.0, 1.0}};
3116             REAL x_dx, x_dy, y_dx, y_dy;
3117             static const GpImageAttributes defaultImageAttributes = {WrapModeClamp, 0, FALSE};
3118
3119             if (!imageAttributes)
3120                 imageAttributes = &defaultImageAttributes;
3121
3122             dst_area.left = dst_area.right = pti[0].x;
3123             dst_area.top = dst_area.bottom = pti[0].y;
3124             for (i=1; i<4; i++)
3125             {
3126                 if (dst_area.left > pti[i].x) dst_area.left = pti[i].x;
3127                 if (dst_area.right < pti[i].x) dst_area.right = pti[i].x;
3128                 if (dst_area.top > pti[i].y) dst_area.top = pti[i].y;
3129                 if (dst_area.bottom < pti[i].y) dst_area.bottom = pti[i].y;
3130             }
3131
3132             m11 = (ptf[1].X - ptf[0].X) / srcwidth;
3133             m21 = (ptf[2].X - ptf[0].X) / srcheight;
3134             mdx = ptf[0].X - m11 * srcx - m21 * srcy;
3135             m12 = (ptf[1].Y - ptf[0].Y) / srcwidth;
3136             m22 = (ptf[2].Y - ptf[0].Y) / srcheight;
3137             mdy = ptf[0].Y - m12 * srcx - m22 * srcy;
3138
3139             stat = GdipCreateMatrix2(m11, m12, m21, m22, mdx, mdy, &dst_to_src);
3140             if (stat != Ok) return stat;
3141
3142             stat = GdipInvertMatrix(dst_to_src);
3143             if (stat != Ok)
3144             {
3145                 GdipDeleteMatrix(dst_to_src);
3146                 return stat;
3147             }
3148
3149             dst_data = GdipAlloc(sizeof(ARGB) * (dst_area.right - dst_area.left) * (dst_area.bottom - dst_area.top));
3150             if (!dst_data)
3151             {
3152                 GdipDeleteMatrix(dst_to_src);
3153                 return OutOfMemory;
3154             }
3155
3156             dst_stride = sizeof(ARGB) * (dst_area.right - dst_area.left);
3157
3158             get_bitmap_sample_size(interpolation, imageAttributes->wrap,
3159                 bitmap, srcx, srcy, srcwidth, srcheight, &src_area);
3160
3161             src_data = GdipAlloc(sizeof(ARGB) * src_area.Width * src_area.Height);
3162             if (!src_data)
3163             {
3164                 GdipFree(dst_data);
3165                 GdipDeleteMatrix(dst_to_src);
3166                 return OutOfMemory;
3167             }
3168             src_stride = sizeof(ARGB) * src_area.Width;
3169
3170             /* Read the bits we need from the source bitmap into an ARGB buffer. */
3171             lockeddata.Width = src_area.Width;
3172             lockeddata.Height = src_area.Height;
3173             lockeddata.Stride = src_stride;
3174             lockeddata.PixelFormat = PixelFormat32bppARGB;
3175             lockeddata.Scan0 = src_data;
3176
3177             stat = GdipBitmapLockBits(bitmap, &src_area, ImageLockModeRead|ImageLockModeUserInputBuf,
3178                 PixelFormat32bppARGB, &lockeddata);
3179
3180             if (stat == Ok)
3181                 stat = GdipBitmapUnlockBits(bitmap, &lockeddata);
3182
3183             if (stat != Ok)
3184             {
3185                 if (src_data != dst_data)
3186                     GdipFree(src_data);
3187                 GdipFree(dst_data);
3188                 GdipDeleteMatrix(dst_to_src);
3189                 return OutOfMemory;
3190             }
3191
3192             apply_image_attributes(imageAttributes, src_data,
3193                 src_area.Width, src_area.Height,
3194                 src_stride, ColorAdjustTypeBitmap);
3195
3196             /* Transform the bits as needed to the destination. */
3197             GdipTransformMatrixPoints(dst_to_src, dst_to_src_points, 3);
3198
3199             x_dx = dst_to_src_points[1].X - dst_to_src_points[0].X;
3200             x_dy = dst_to_src_points[1].Y - dst_to_src_points[0].Y;
3201             y_dx = dst_to_src_points[2].X - dst_to_src_points[0].X;
3202             y_dy = dst_to_src_points[2].Y - dst_to_src_points[0].Y;
3203
3204             for (x=dst_area.left; x<dst_area.right; x++)
3205             {
3206                 for (y=dst_area.top; y<dst_area.bottom; y++)
3207                 {
3208                     GpPointF src_pointf;
3209                     ARGB *dst_color;
3210
3211                     src_pointf.X = dst_to_src_points[0].X + x * x_dx + y * y_dx;
3212                     src_pointf.Y = dst_to_src_points[0].Y + x * x_dy + y * y_dy;
3213
3214                     dst_color = (ARGB*)(dst_data + dst_stride * (y - dst_area.top) + sizeof(ARGB) * (x - dst_area.left));
3215
3216                     if (src_pointf.X >= srcx && src_pointf.X < srcx + srcwidth && src_pointf.Y >= srcy && src_pointf.Y < srcy+srcheight)
3217                         *dst_color = resample_bitmap_pixel(&src_area, src_data, bitmap->width, bitmap->height, &src_pointf, imageAttributes, interpolation);
3218                     else
3219                         *dst_color = 0;
3220                 }
3221             }
3222
3223             GdipDeleteMatrix(dst_to_src);
3224
3225             GdipFree(src_data);
3226
3227             stat = alpha_blend_pixels(graphics, dst_area.left, dst_area.top,
3228                 dst_data, dst_area.right - dst_area.left, dst_area.bottom - dst_area.top, dst_stride);
3229
3230             GdipFree(dst_data);
3231
3232             return stat;
3233         }
3234         else
3235         {
3236             HDC hdc;
3237             int temp_hdc=0, temp_bitmap=0;
3238             HBITMAP hbitmap, old_hbm=NULL;
3239
3240             if (!(bitmap->format == PixelFormat16bppRGB555 ||
3241                   bitmap->format == PixelFormat24bppRGB ||
3242                   bitmap->format == PixelFormat32bppRGB ||
3243                   bitmap->format == PixelFormat32bppPARGB))
3244             {
3245                 BITMAPINFOHEADER bih;
3246                 BYTE *temp_bits;
3247                 PixelFormat dst_format;
3248
3249                 /* we can't draw a bitmap of this format directly */
3250                 hdc = CreateCompatibleDC(0);
3251                 temp_hdc = 1;
3252                 temp_bitmap = 1;
3253
3254                 bih.biSize = sizeof(BITMAPINFOHEADER);
3255                 bih.biWidth = bitmap->width;
3256                 bih.biHeight = -bitmap->height;
3257                 bih.biPlanes = 1;
3258                 bih.biBitCount = 32;
3259                 bih.biCompression = BI_RGB;
3260                 bih.biSizeImage = 0;
3261                 bih.biXPelsPerMeter = 0;
3262                 bih.biYPelsPerMeter = 0;
3263                 bih.biClrUsed = 0;
3264                 bih.biClrImportant = 0;
3265
3266                 hbitmap = CreateDIBSection(hdc, (BITMAPINFO*)&bih, DIB_RGB_COLORS,
3267                     (void**)&temp_bits, NULL, 0);
3268
3269                 if (bitmap->format & (PixelFormatAlpha|PixelFormatPAlpha))
3270                     dst_format = PixelFormat32bppPARGB;
3271                 else
3272                     dst_format = PixelFormat32bppRGB;
3273
3274                 convert_pixels(bitmap->width, bitmap->height,
3275                     bitmap->width*4, temp_bits, dst_format,
3276                     bitmap->stride, bitmap->bits, bitmap->format,
3277                     bitmap->image.palette);
3278             }
3279             else
3280             {
3281                 hbitmap = bitmap->hbitmap;
3282                 hdc = bitmap->hdc;
3283                 temp_hdc = (hdc == 0);
3284             }
3285
3286             if (temp_hdc)
3287             {
3288                 if (!hdc) hdc = CreateCompatibleDC(0);
3289                 old_hbm = SelectObject(hdc, hbitmap);
3290             }
3291
3292             if (bitmap->format & (PixelFormatAlpha|PixelFormatPAlpha))
3293             {
3294                 gdi_alpha_blend(graphics, pti[0].x, pti[0].y, pti[1].x - pti[0].x, pti[2].y - pti[0].y,
3295                                 hdc, srcx, srcy, srcwidth, srcheight);
3296             }
3297             else
3298             {
3299                 StretchBlt(graphics->hdc, pti[0].x, pti[0].y, pti[1].x-pti[0].x, pti[2].y-pti[0].y,
3300                     hdc, srcx, srcy, srcwidth, srcheight, SRCCOPY);
3301             }
3302
3303             if (temp_hdc)
3304             {
3305                 SelectObject(hdc, old_hbm);
3306                 DeleteDC(hdc);
3307             }
3308
3309             if (temp_bitmap)
3310                 DeleteObject(hbitmap);
3311         }
3312     }
3313     else
3314     {
3315         ERR("GpImage with no IPicture or HBITMAP?!\n");
3316         return NotImplemented;
3317     }
3318
3319     return Ok;
3320 }
3321
3322 GpStatus WINGDIPAPI GdipDrawImagePointsRectI(GpGraphics *graphics, GpImage *image,
3323      GDIPCONST GpPoint *points, INT count, INT srcx, INT srcy, INT srcwidth,
3324      INT srcheight, GpUnit srcUnit, GDIPCONST GpImageAttributes* imageAttributes,
3325      DrawImageAbort callback, VOID * callbackData)
3326 {
3327     GpPointF pointsF[3];
3328     INT i;
3329
3330     TRACE("(%p, %p, %p, %d, %d, %d, %d, %d, %d, %p, %p, %p)\n", graphics, image, points, count,
3331           srcx, srcy, srcwidth, srcheight, srcUnit, imageAttributes, callback,
3332           callbackData);
3333
3334     if(!points || count!=3)
3335         return InvalidParameter;
3336
3337     for(i = 0; i < count; i++){
3338         pointsF[i].X = (REAL)points[i].X;
3339         pointsF[i].Y = (REAL)points[i].Y;
3340     }
3341
3342     return GdipDrawImagePointsRect(graphics, image, pointsF, count, (REAL)srcx, (REAL)srcy,
3343                                    (REAL)srcwidth, (REAL)srcheight, srcUnit, imageAttributes,
3344                                    callback, callbackData);
3345 }
3346
3347 GpStatus WINGDIPAPI GdipDrawImageRectRect(GpGraphics *graphics, GpImage *image,
3348     REAL dstx, REAL dsty, REAL dstwidth, REAL dstheight, REAL srcx, REAL srcy,
3349     REAL srcwidth, REAL srcheight, GpUnit srcUnit,
3350     GDIPCONST GpImageAttributes* imageattr, DrawImageAbort callback,
3351     VOID * callbackData)
3352 {
3353     GpPointF points[3];
3354
3355     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %d, %p, %p, %p)\n",
3356           graphics, image, dstx, dsty, dstwidth, dstheight, srcx, srcy,
3357           srcwidth, srcheight, srcUnit, imageattr, callback, callbackData);
3358
3359     points[0].X = dstx;
3360     points[0].Y = dsty;
3361     points[1].X = dstx + dstwidth;
3362     points[1].Y = dsty;
3363     points[2].X = dstx;
3364     points[2].Y = dsty + dstheight;
3365
3366     return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
3367                srcwidth, srcheight, srcUnit, imageattr, callback, callbackData);
3368 }
3369
3370 GpStatus WINGDIPAPI GdipDrawImageRectRectI(GpGraphics *graphics, GpImage *image,
3371         INT dstx, INT dsty, INT dstwidth, INT dstheight, INT srcx, INT srcy,
3372         INT srcwidth, INT srcheight, GpUnit srcUnit,
3373         GDIPCONST GpImageAttributes* imageAttributes, DrawImageAbort callback,
3374         VOID * callbackData)
3375 {
3376     GpPointF points[3];
3377
3378     TRACE("(%p, %p, %d, %d, %d, %d, %d, %d, %d, %d, %d, %p, %p, %p)\n",
3379           graphics, image, dstx, dsty, dstwidth, dstheight, srcx, srcy,
3380           srcwidth, srcheight, srcUnit, imageAttributes, callback, callbackData);
3381
3382     points[0].X = dstx;
3383     points[0].Y = dsty;
3384     points[1].X = dstx + dstwidth;
3385     points[1].Y = dsty;
3386     points[2].X = dstx;
3387     points[2].Y = dsty + dstheight;
3388
3389     return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
3390                srcwidth, srcheight, srcUnit, imageAttributes, callback, callbackData);
3391 }
3392
3393 GpStatus WINGDIPAPI GdipDrawImageRect(GpGraphics *graphics, GpImage *image,
3394     REAL x, REAL y, REAL width, REAL height)
3395 {
3396     RectF bounds;
3397     GpUnit unit;
3398     GpStatus ret;
3399
3400     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, image, x, y, width, height);
3401
3402     if(!graphics || !image)
3403         return InvalidParameter;
3404
3405     ret = GdipGetImageBounds(image, &bounds, &unit);
3406     if(ret != Ok)
3407         return ret;
3408
3409     return GdipDrawImageRectRect(graphics, image, x, y, width, height,
3410                                  bounds.X, bounds.Y, bounds.Width, bounds.Height,
3411                                  unit, NULL, NULL, NULL);
3412 }
3413
3414 GpStatus WINGDIPAPI GdipDrawImageRectI(GpGraphics *graphics, GpImage *image,
3415     INT x, INT y, INT width, INT height)
3416 {
3417     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, image, x, y, width, height);
3418
3419     return GdipDrawImageRect(graphics, image, (REAL)x, (REAL)y, (REAL)width, (REAL)height);
3420 }
3421
3422 GpStatus WINGDIPAPI GdipDrawLine(GpGraphics *graphics, GpPen *pen, REAL x1,
3423     REAL y1, REAL x2, REAL y2)
3424 {
3425     INT save_state;
3426     GpPointF pt[2];
3427     GpStatus retval;
3428
3429     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x1, y1, x2, y2);
3430
3431     if(!pen || !graphics)
3432         return InvalidParameter;
3433
3434     if(graphics->busy)
3435         return ObjectBusy;
3436
3437     if (!graphics->hdc)
3438     {
3439         FIXME("graphics object has no HDC\n");
3440         return Ok;
3441     }
3442
3443     pt[0].X = x1;
3444     pt[0].Y = y1;
3445     pt[1].X = x2;
3446     pt[1].Y = y2;
3447
3448     save_state = prepare_dc(graphics, pen);
3449
3450     retval = draw_polyline(graphics, pen, pt, 2, TRUE);
3451
3452     restore_dc(graphics, save_state);
3453
3454     return retval;
3455 }
3456
3457 GpStatus WINGDIPAPI GdipDrawLineI(GpGraphics *graphics, GpPen *pen, INT x1,
3458     INT y1, INT x2, INT y2)
3459 {
3460     INT save_state;
3461     GpPointF pt[2];
3462     GpStatus retval;
3463
3464     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, pen, x1, y1, x2, y2);
3465
3466     if(!pen || !graphics)
3467         return InvalidParameter;
3468
3469     if(graphics->busy)
3470         return ObjectBusy;
3471
3472     if (!graphics->hdc)
3473     {
3474         FIXME("graphics object has no HDC\n");
3475         return Ok;
3476     }
3477
3478     pt[0].X = (REAL)x1;
3479     pt[0].Y = (REAL)y1;
3480     pt[1].X = (REAL)x2;
3481     pt[1].Y = (REAL)y2;
3482
3483     save_state = prepare_dc(graphics, pen);
3484
3485     retval = draw_polyline(graphics, pen, pt, 2, TRUE);
3486
3487     restore_dc(graphics, save_state);
3488
3489     return retval;
3490 }
3491
3492 GpStatus WINGDIPAPI GdipDrawLines(GpGraphics *graphics, GpPen *pen, GDIPCONST
3493     GpPointF *points, INT count)
3494 {
3495     INT save_state;
3496     GpStatus retval;
3497
3498     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
3499
3500     if(!pen || !graphics || (count < 2))
3501         return InvalidParameter;
3502
3503     if(graphics->busy)
3504         return ObjectBusy;
3505
3506     if (!graphics->hdc)
3507     {
3508         FIXME("graphics object has no HDC\n");
3509         return Ok;
3510     }
3511
3512     save_state = prepare_dc(graphics, pen);
3513
3514     retval = draw_polyline(graphics, pen, points, count, TRUE);
3515
3516     restore_dc(graphics, save_state);
3517
3518     return retval;
3519 }
3520
3521 GpStatus WINGDIPAPI GdipDrawLinesI(GpGraphics *graphics, GpPen *pen, GDIPCONST
3522     GpPoint *points, INT count)
3523 {
3524     INT save_state;
3525     GpStatus retval;
3526     GpPointF *ptf = NULL;
3527     int i;
3528
3529     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
3530
3531     if(!pen || !graphics || (count < 2))
3532         return InvalidParameter;
3533
3534     if(graphics->busy)
3535         return ObjectBusy;
3536
3537     if (!graphics->hdc)
3538     {
3539         FIXME("graphics object has no HDC\n");
3540         return Ok;
3541     }
3542
3543     ptf = GdipAlloc(count * sizeof(GpPointF));
3544     if(!ptf) return OutOfMemory;
3545
3546     for(i = 0; i < count; i ++){
3547         ptf[i].X = (REAL) points[i].X;
3548         ptf[i].Y = (REAL) points[i].Y;
3549     }
3550
3551     save_state = prepare_dc(graphics, pen);
3552
3553     retval = draw_polyline(graphics, pen, ptf, count, TRUE);
3554
3555     restore_dc(graphics, save_state);
3556
3557     GdipFree(ptf);
3558     return retval;
3559 }
3560
3561 GpStatus WINGDIPAPI GdipDrawPath(GpGraphics *graphics, GpPen *pen, GpPath *path)
3562 {
3563     INT save_state;
3564     GpStatus retval;
3565
3566     TRACE("(%p, %p, %p)\n", graphics, pen, path);
3567
3568     if(!pen || !graphics)
3569         return InvalidParameter;
3570
3571     if(graphics->busy)
3572         return ObjectBusy;
3573
3574     if (!graphics->hdc)
3575     {
3576         FIXME("graphics object has no HDC\n");
3577         return Ok;
3578     }
3579
3580     save_state = prepare_dc(graphics, pen);
3581
3582     retval = draw_poly(graphics, pen, path->pathdata.Points,
3583                        path->pathdata.Types, path->pathdata.Count, TRUE);
3584
3585     restore_dc(graphics, save_state);
3586
3587     return retval;
3588 }
3589
3590 GpStatus WINGDIPAPI GdipDrawPie(GpGraphics *graphics, GpPen *pen, REAL x,
3591     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
3592 {
3593     INT save_state;
3594
3595     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y,
3596             width, height, startAngle, sweepAngle);
3597
3598     if(!graphics || !pen)
3599         return InvalidParameter;
3600
3601     if(graphics->busy)
3602         return ObjectBusy;
3603
3604     if (!graphics->hdc)
3605     {
3606         FIXME("graphics object has no HDC\n");
3607         return Ok;
3608     }
3609
3610     save_state = prepare_dc(graphics, pen);
3611     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
3612
3613     draw_pie(graphics, x, y, width, height, startAngle, sweepAngle);
3614
3615     restore_dc(graphics, save_state);
3616
3617     return Ok;
3618 }
3619
3620 GpStatus WINGDIPAPI GdipDrawPieI(GpGraphics *graphics, GpPen *pen, INT x,
3621     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
3622 {
3623     TRACE("(%p, %p, %d, %d, %d, %d, %.2f, %.2f)\n", graphics, pen, x, y,
3624             width, height, startAngle, sweepAngle);
3625
3626     return GdipDrawPie(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
3627 }
3628
3629 GpStatus WINGDIPAPI GdipDrawRectangle(GpGraphics *graphics, GpPen *pen, REAL x,
3630     REAL y, REAL width, REAL height)
3631 {
3632     INT save_state;
3633     GpPointF ptf[4];
3634     POINT pti[4];
3635
3636     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y, width, height);
3637
3638     if(!pen || !graphics)
3639         return InvalidParameter;
3640
3641     if(graphics->busy)
3642         return ObjectBusy;
3643
3644     if (!graphics->hdc)
3645     {
3646         FIXME("graphics object has no HDC\n");
3647         return Ok;
3648     }
3649
3650     ptf[0].X = x;
3651     ptf[0].Y = y;
3652     ptf[1].X = x + width;
3653     ptf[1].Y = y;
3654     ptf[2].X = x + width;
3655     ptf[2].Y = y + height;
3656     ptf[3].X = x;
3657     ptf[3].Y = y + height;
3658
3659     save_state = prepare_dc(graphics, pen);
3660     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
3661
3662     transform_and_round_points(graphics, pti, ptf, 4);
3663     Polygon(graphics->hdc, pti, 4);
3664
3665     restore_dc(graphics, save_state);
3666
3667     return Ok;
3668 }
3669
3670 GpStatus WINGDIPAPI GdipDrawRectangleI(GpGraphics *graphics, GpPen *pen, INT x,
3671     INT y, INT width, INT height)
3672 {
3673     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, pen, x, y, width, height);
3674
3675     return GdipDrawRectangle(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
3676 }
3677
3678 GpStatus WINGDIPAPI GdipDrawRectangles(GpGraphics *graphics, GpPen *pen,
3679     GDIPCONST GpRectF* rects, INT count)
3680 {
3681     GpPointF *ptf;
3682     POINT *pti;
3683     INT save_state, i;
3684
3685     TRACE("(%p, %p, %p, %d)\n", graphics, pen, rects, count);
3686
3687     if(!graphics || !pen || !rects || count < 1)
3688         return InvalidParameter;
3689
3690     if(graphics->busy)
3691         return ObjectBusy;
3692
3693     if (!graphics->hdc)
3694     {
3695         FIXME("graphics object has no HDC\n");
3696         return Ok;
3697     }
3698
3699     ptf = GdipAlloc(4 * count * sizeof(GpPointF));
3700     pti = GdipAlloc(4 * count * sizeof(POINT));
3701
3702     if(!ptf || !pti){
3703         GdipFree(ptf);
3704         GdipFree(pti);
3705         return OutOfMemory;
3706     }
3707
3708     for(i = 0; i < count; i++){
3709         ptf[4 * i + 3].X = ptf[4 * i].X = rects[i].X;
3710         ptf[4 * i + 1].Y = ptf[4 * i].Y = rects[i].Y;
3711         ptf[4 * i + 2].X = ptf[4 * i + 1].X = rects[i].X + rects[i].Width;
3712         ptf[4 * i + 3].Y = ptf[4 * i + 2].Y = rects[i].Y + rects[i].Height;
3713     }
3714
3715     save_state = prepare_dc(graphics, pen);
3716     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
3717
3718     transform_and_round_points(graphics, pti, ptf, 4 * count);
3719
3720     for(i = 0; i < count; i++)
3721         Polygon(graphics->hdc, &pti[4 * i], 4);
3722
3723     restore_dc(graphics, save_state);
3724
3725     GdipFree(ptf);
3726     GdipFree(pti);
3727
3728     return Ok;
3729 }
3730
3731 GpStatus WINGDIPAPI GdipDrawRectanglesI(GpGraphics *graphics, GpPen *pen,
3732     GDIPCONST GpRect* rects, INT count)
3733 {
3734     GpRectF *rectsF;
3735     GpStatus ret;
3736     INT i;
3737
3738     TRACE("(%p, %p, %p, %d)\n", graphics, pen, rects, count);
3739
3740     if(!rects || count<=0)
3741         return InvalidParameter;
3742
3743     rectsF = GdipAlloc(sizeof(GpRectF) * count);
3744     if(!rectsF)
3745         return OutOfMemory;
3746
3747     for(i = 0;i < count;i++){
3748         rectsF[i].X      = (REAL)rects[i].X;
3749         rectsF[i].Y      = (REAL)rects[i].Y;
3750         rectsF[i].Width  = (REAL)rects[i].Width;
3751         rectsF[i].Height = (REAL)rects[i].Height;
3752     }
3753
3754     ret = GdipDrawRectangles(graphics, pen, rectsF, count);
3755     GdipFree(rectsF);
3756
3757     return ret;
3758 }
3759
3760 GpStatus WINGDIPAPI GdipFillClosedCurve2(GpGraphics *graphics, GpBrush *brush,
3761     GDIPCONST GpPointF *points, INT count, REAL tension, GpFillMode fill)
3762 {
3763     GpPath *path;
3764     GpStatus stat;
3765
3766     TRACE("(%p, %p, %p, %d, %.2f, %d)\n", graphics, brush, points,
3767             count, tension, fill);
3768
3769     if(!graphics || !brush || !points)
3770         return InvalidParameter;
3771
3772     if(graphics->busy)
3773         return ObjectBusy;
3774
3775     if(count == 1)    /* Do nothing */
3776         return Ok;
3777
3778     stat = GdipCreatePath(fill, &path);
3779     if(stat != Ok)
3780         return stat;
3781
3782     stat = GdipAddPathClosedCurve2(path, points, count, tension);
3783     if(stat != Ok){
3784         GdipDeletePath(path);
3785         return stat;
3786     }
3787
3788     stat = GdipFillPath(graphics, brush, path);
3789     if(stat != Ok){
3790         GdipDeletePath(path);
3791         return stat;
3792     }
3793
3794     GdipDeletePath(path);
3795
3796     return Ok;
3797 }
3798
3799 GpStatus WINGDIPAPI GdipFillClosedCurve2I(GpGraphics *graphics, GpBrush *brush,
3800     GDIPCONST GpPoint *points, INT count, REAL tension, GpFillMode fill)
3801 {
3802     GpPointF *ptf;
3803     GpStatus stat;
3804     INT i;
3805
3806     TRACE("(%p, %p, %p, %d, %.2f, %d)\n", graphics, brush, points,
3807             count, tension, fill);
3808
3809     if(!points || count == 0)
3810         return InvalidParameter;
3811
3812     if(count == 1)    /* Do nothing */
3813         return Ok;
3814
3815     ptf = GdipAlloc(sizeof(GpPointF)*count);
3816     if(!ptf)
3817         return OutOfMemory;
3818
3819     for(i = 0;i < count;i++){
3820         ptf[i].X = (REAL)points[i].X;
3821         ptf[i].Y = (REAL)points[i].Y;
3822     }
3823
3824     stat = GdipFillClosedCurve2(graphics, brush, ptf, count, tension, fill);
3825
3826     GdipFree(ptf);
3827
3828     return stat;
3829 }
3830
3831 GpStatus WINGDIPAPI GdipFillClosedCurve(GpGraphics *graphics, GpBrush *brush,
3832     GDIPCONST GpPointF *points, INT count)
3833 {
3834     TRACE("(%p, %p, %p, %d)\n", graphics, brush, points, count);
3835     return GdipFillClosedCurve2(graphics, brush, points, count,
3836                0.5f, FillModeAlternate);
3837 }
3838
3839 GpStatus WINGDIPAPI GdipFillClosedCurveI(GpGraphics *graphics, GpBrush *brush,
3840     GDIPCONST GpPoint *points, INT count)
3841 {
3842     TRACE("(%p, %p, %p, %d)\n", graphics, brush, points, count);
3843     return GdipFillClosedCurve2I(graphics, brush, points, count,
3844                0.5f, FillModeAlternate);
3845 }
3846
3847 GpStatus WINGDIPAPI GdipFillEllipse(GpGraphics *graphics, GpBrush *brush, REAL x,
3848     REAL y, REAL width, REAL height)
3849 {
3850     GpStatus stat;
3851     GpPath *path;
3852
3853     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, brush, x, y, width, height);
3854
3855     if(!graphics || !brush)
3856         return InvalidParameter;
3857
3858     if(graphics->busy)
3859         return ObjectBusy;
3860
3861     stat = GdipCreatePath(FillModeAlternate, &path);
3862
3863     if (stat == Ok)
3864     {
3865         stat = GdipAddPathEllipse(path, x, y, width, height);
3866
3867         if (stat == Ok)
3868             stat = GdipFillPath(graphics, brush, path);
3869
3870         GdipDeletePath(path);
3871     }
3872
3873     return stat;
3874 }
3875
3876 GpStatus WINGDIPAPI GdipFillEllipseI(GpGraphics *graphics, GpBrush *brush, INT x,
3877     INT y, INT width, INT height)
3878 {
3879     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, brush, x, y, width, height);
3880
3881     return GdipFillEllipse(graphics,brush,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
3882 }
3883
3884 static GpStatus GDI32_GdipFillPath(GpGraphics *graphics, GpBrush *brush, GpPath *path)
3885 {
3886     INT save_state;
3887     GpStatus retval;
3888
3889     if(!graphics->hdc || !brush_can_fill_path(brush))
3890         return NotImplemented;
3891
3892     save_state = SaveDC(graphics->hdc);
3893     EndPath(graphics->hdc);
3894     SetPolyFillMode(graphics->hdc, (path->fill == FillModeAlternate ? ALTERNATE
3895                                                                     : WINDING));
3896
3897     BeginPath(graphics->hdc);
3898     retval = draw_poly(graphics, NULL, path->pathdata.Points,
3899                        path->pathdata.Types, path->pathdata.Count, FALSE);
3900
3901     if(retval != Ok)
3902         goto end;
3903
3904     EndPath(graphics->hdc);
3905     brush_fill_path(graphics, brush);
3906
3907     retval = Ok;
3908
3909 end:
3910     RestoreDC(graphics->hdc, save_state);
3911
3912     return retval;
3913 }
3914
3915 static GpStatus SOFTWARE_GdipFillPath(GpGraphics *graphics, GpBrush *brush, GpPath *path)
3916 {
3917     GpStatus stat;
3918     GpRegion *rgn;
3919
3920     if (!brush_can_fill_pixels(brush))
3921         return NotImplemented;
3922
3923     /* FIXME: This could probably be done more efficiently without regions. */
3924
3925     stat = GdipCreateRegionPath(path, &rgn);
3926
3927     if (stat == Ok)
3928     {
3929         stat = GdipFillRegion(graphics, brush, rgn);
3930
3931         GdipDeleteRegion(rgn);
3932     }
3933
3934     return stat;
3935 }
3936
3937 GpStatus WINGDIPAPI GdipFillPath(GpGraphics *graphics, GpBrush *brush, GpPath *path)
3938 {
3939     GpStatus stat = NotImplemented;
3940
3941     TRACE("(%p, %p, %p)\n", graphics, brush, path);
3942
3943     if(!brush || !graphics || !path)
3944         return InvalidParameter;
3945
3946     if(graphics->busy)
3947         return ObjectBusy;
3948
3949     if (!graphics->image)
3950         stat = GDI32_GdipFillPath(graphics, brush, path);
3951
3952     if (stat == NotImplemented)
3953         stat = SOFTWARE_GdipFillPath(graphics, brush, path);
3954
3955     if (stat == NotImplemented)
3956     {
3957         FIXME("Not implemented for brushtype %i\n", brush->bt);
3958         stat = Ok;
3959     }
3960
3961     return stat;
3962 }
3963
3964 GpStatus WINGDIPAPI GdipFillPie(GpGraphics *graphics, GpBrush *brush, REAL x,
3965     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
3966 {
3967     GpStatus stat;
3968     GpPath *path;
3969
3970     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n",
3971             graphics, brush, x, y, width, height, startAngle, sweepAngle);
3972
3973     if(!graphics || !brush)
3974         return InvalidParameter;
3975
3976     if(graphics->busy)
3977         return ObjectBusy;
3978
3979     stat = GdipCreatePath(FillModeAlternate, &path);
3980
3981     if (stat == Ok)
3982     {
3983         stat = GdipAddPathPie(path, x, y, width, height, startAngle, sweepAngle);
3984
3985         if (stat == Ok)
3986             stat = GdipFillPath(graphics, brush, path);
3987
3988         GdipDeletePath(path);
3989     }
3990
3991     return stat;
3992 }
3993
3994 GpStatus WINGDIPAPI GdipFillPieI(GpGraphics *graphics, GpBrush *brush, INT x,
3995     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
3996 {
3997     TRACE("(%p, %p, %d, %d, %d, %d, %.2f, %.2f)\n",
3998             graphics, brush, x, y, width, height, startAngle, sweepAngle);
3999
4000     return GdipFillPie(graphics,brush,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
4001 }
4002
4003 GpStatus WINGDIPAPI GdipFillPolygon(GpGraphics *graphics, GpBrush *brush,
4004     GDIPCONST GpPointF *points, INT count, GpFillMode fillMode)
4005 {
4006     GpStatus stat;
4007     GpPath *path;
4008
4009     TRACE("(%p, %p, %p, %d, %d)\n", graphics, brush, points, count, fillMode);
4010
4011     if(!graphics || !brush || !points || !count)
4012         return InvalidParameter;
4013
4014     if(graphics->busy)
4015         return ObjectBusy;
4016
4017     stat = GdipCreatePath(fillMode, &path);
4018
4019     if (stat == Ok)
4020     {
4021         stat = GdipAddPathPolygon(path, points, count);
4022
4023         if (stat == Ok)
4024             stat = GdipFillPath(graphics, brush, path);
4025
4026         GdipDeletePath(path);
4027     }
4028
4029     return stat;
4030 }
4031
4032 GpStatus WINGDIPAPI GdipFillPolygonI(GpGraphics *graphics, GpBrush *brush,
4033     GDIPCONST GpPoint *points, INT count, GpFillMode fillMode)
4034 {
4035     GpStatus stat;
4036     GpPath *path;
4037
4038     TRACE("(%p, %p, %p, %d, %d)\n", graphics, brush, points, count, fillMode);
4039
4040     if(!graphics || !brush || !points || !count)
4041         return InvalidParameter;
4042
4043     if(graphics->busy)
4044         return ObjectBusy;
4045
4046     stat = GdipCreatePath(fillMode, &path);
4047
4048     if (stat == Ok)
4049     {
4050         stat = GdipAddPathPolygonI(path, points, count);
4051
4052         if (stat == Ok)
4053             stat = GdipFillPath(graphics, brush, path);
4054
4055         GdipDeletePath(path);
4056     }
4057
4058     return stat;
4059 }
4060
4061 GpStatus WINGDIPAPI GdipFillPolygon2(GpGraphics *graphics, GpBrush *brush,
4062     GDIPCONST GpPointF *points, INT count)
4063 {
4064     TRACE("(%p, %p, %p, %d)\n", graphics, brush, points, count);
4065
4066     return GdipFillPolygon(graphics, brush, points, count, FillModeAlternate);
4067 }
4068
4069 GpStatus WINGDIPAPI GdipFillPolygon2I(GpGraphics *graphics, GpBrush *brush,
4070     GDIPCONST GpPoint *points, INT count)
4071 {
4072     TRACE("(%p, %p, %p, %d)\n", graphics, brush, points, count);
4073
4074     return GdipFillPolygonI(graphics, brush, points, count, FillModeAlternate);
4075 }
4076
4077 GpStatus WINGDIPAPI GdipFillRectangle(GpGraphics *graphics, GpBrush *brush,
4078     REAL x, REAL y, REAL width, REAL height)
4079 {
4080     GpStatus stat;
4081     GpPath *path;
4082
4083     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, brush, x, y, width, height);
4084
4085     if(!graphics || !brush)
4086         return InvalidParameter;
4087
4088     if(graphics->busy)
4089         return ObjectBusy;
4090
4091     stat = GdipCreatePath(FillModeAlternate, &path);
4092
4093     if (stat == Ok)
4094     {
4095         stat = GdipAddPathRectangle(path, x, y, width, height);
4096
4097         if (stat == Ok)
4098             stat = GdipFillPath(graphics, brush, path);
4099
4100         GdipDeletePath(path);
4101     }
4102
4103     return stat;
4104 }
4105
4106 GpStatus WINGDIPAPI GdipFillRectangleI(GpGraphics *graphics, GpBrush *brush,
4107     INT x, INT y, INT width, INT height)
4108 {
4109     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, brush, x, y, width, height);
4110
4111     return GdipFillRectangle(graphics, brush, x, y, width, height);
4112 }
4113
4114 GpStatus WINGDIPAPI GdipFillRectangles(GpGraphics *graphics, GpBrush *brush, GDIPCONST GpRectF *rects,
4115     INT count)
4116 {
4117     GpStatus ret;
4118     INT i;
4119
4120     TRACE("(%p, %p, %p, %d)\n", graphics, brush, rects, count);
4121
4122     if(!rects)
4123         return InvalidParameter;
4124
4125     for(i = 0; i < count; i++){
4126         ret = GdipFillRectangle(graphics, brush, rects[i].X, rects[i].Y, rects[i].Width, rects[i].Height);
4127         if(ret != Ok)   return ret;
4128     }
4129
4130     return Ok;
4131 }
4132
4133 GpStatus WINGDIPAPI GdipFillRectanglesI(GpGraphics *graphics, GpBrush *brush, GDIPCONST GpRect *rects,
4134     INT count)
4135 {
4136     GpRectF *rectsF;
4137     GpStatus ret;
4138     INT i;
4139
4140     TRACE("(%p, %p, %p, %d)\n", graphics, brush, rects, count);
4141
4142     if(!rects || count <= 0)
4143         return InvalidParameter;
4144
4145     rectsF = GdipAlloc(sizeof(GpRectF)*count);
4146     if(!rectsF)
4147         return OutOfMemory;
4148
4149     for(i = 0; i < count; i++){
4150         rectsF[i].X      = (REAL)rects[i].X;
4151         rectsF[i].Y      = (REAL)rects[i].Y;
4152         rectsF[i].X      = (REAL)rects[i].Width;
4153         rectsF[i].Height = (REAL)rects[i].Height;
4154     }
4155
4156     ret = GdipFillRectangles(graphics,brush,rectsF,count);
4157     GdipFree(rectsF);
4158
4159     return ret;
4160 }
4161
4162 static GpStatus GDI32_GdipFillRegion(GpGraphics* graphics, GpBrush* brush,
4163     GpRegion* region)
4164 {
4165     INT save_state;
4166     GpStatus status;
4167     HRGN hrgn;
4168     RECT rc;
4169
4170     if(!graphics->hdc || !brush_can_fill_path(brush))
4171         return NotImplemented;
4172
4173     status = GdipGetRegionHRgn(region, graphics, &hrgn);
4174     if(status != Ok)
4175         return status;
4176
4177     save_state = SaveDC(graphics->hdc);
4178     EndPath(graphics->hdc);
4179
4180     ExtSelectClipRgn(graphics->hdc, hrgn, RGN_AND);
4181
4182     if (GetClipBox(graphics->hdc, &rc) != NULLREGION)
4183     {
4184         BeginPath(graphics->hdc);
4185         Rectangle(graphics->hdc, rc.left, rc.top, rc.right, rc.bottom);
4186         EndPath(graphics->hdc);
4187
4188         brush_fill_path(graphics, brush);
4189     }
4190
4191     RestoreDC(graphics->hdc, save_state);
4192
4193     DeleteObject(hrgn);
4194
4195     return Ok;
4196 }
4197
4198 static GpStatus SOFTWARE_GdipFillRegion(GpGraphics *graphics, GpBrush *brush,
4199     GpRegion* region)
4200 {
4201     GpStatus stat;
4202     GpRegion *temp_region;
4203     GpMatrix *world_to_device;
4204     GpRectF graphics_bounds;
4205     DWORD *pixel_data;
4206     HRGN hregion;
4207     RECT bound_rect;
4208     GpRect gp_bound_rect;
4209
4210     if (!brush_can_fill_pixels(brush))
4211         return NotImplemented;
4212
4213     stat = get_graphics_bounds(graphics, &graphics_bounds);
4214
4215     if (stat == Ok)
4216         stat = GdipCloneRegion(region, &temp_region);
4217
4218     if (stat == Ok)
4219     {
4220         stat = get_graphics_transform(graphics, CoordinateSpaceDevice,
4221             CoordinateSpaceWorld, &world_to_device);
4222
4223         if (stat == Ok)
4224         {
4225             stat = GdipTransformRegion(temp_region, world_to_device);
4226
4227             GdipDeleteMatrix(world_to_device);
4228         }
4229
4230         if (stat == Ok)
4231             stat = GdipCombineRegionRect(temp_region, &graphics_bounds, CombineModeIntersect);
4232
4233         if (stat == Ok)
4234             stat = GdipGetRegionHRgn(temp_region, NULL, &hregion);
4235
4236         GdipDeleteRegion(temp_region);
4237     }
4238
4239     if (stat == Ok && GetRgnBox(hregion, &bound_rect) == NULLREGION)
4240     {
4241         DeleteObject(hregion);
4242         return Ok;
4243     }
4244
4245     if (stat == Ok)
4246     {
4247         gp_bound_rect.X = bound_rect.left;
4248         gp_bound_rect.Y = bound_rect.top;
4249         gp_bound_rect.Width = bound_rect.right - bound_rect.left;
4250         gp_bound_rect.Height = bound_rect.bottom - bound_rect.top;
4251
4252         pixel_data = GdipAlloc(sizeof(*pixel_data) * gp_bound_rect.Width * gp_bound_rect.Height);
4253         if (!pixel_data)
4254             stat = OutOfMemory;
4255
4256         if (stat == Ok)
4257         {
4258             stat = brush_fill_pixels(graphics, brush, pixel_data,
4259                 &gp_bound_rect, gp_bound_rect.Width);
4260
4261             if (stat == Ok)
4262                 stat = alpha_blend_pixels_hrgn(graphics, gp_bound_rect.X,
4263                     gp_bound_rect.Y, (BYTE*)pixel_data, gp_bound_rect.Width,
4264                     gp_bound_rect.Height, gp_bound_rect.Width * 4, hregion);
4265
4266             GdipFree(pixel_data);
4267         }
4268
4269         DeleteObject(hregion);
4270     }
4271
4272     return stat;
4273 }
4274
4275 /*****************************************************************************
4276  * GdipFillRegion [GDIPLUS.@]
4277  */
4278 GpStatus WINGDIPAPI GdipFillRegion(GpGraphics* graphics, GpBrush* brush,
4279         GpRegion* region)
4280 {
4281     GpStatus stat = NotImplemented;
4282
4283     TRACE("(%p, %p, %p)\n", graphics, brush, region);
4284
4285     if (!(graphics && brush && region))
4286         return InvalidParameter;
4287
4288     if(graphics->busy)
4289         return ObjectBusy;
4290
4291     if (!graphics->image)
4292         stat = GDI32_GdipFillRegion(graphics, brush, region);
4293
4294     if (stat == NotImplemented)
4295         stat = SOFTWARE_GdipFillRegion(graphics, brush, region);
4296
4297     if (stat == NotImplemented)
4298     {
4299         FIXME("not implemented for brushtype %i\n", brush->bt);
4300         stat = Ok;
4301     }
4302
4303     return stat;
4304 }
4305
4306 GpStatus WINGDIPAPI GdipFlush(GpGraphics *graphics, GpFlushIntention intention)
4307 {
4308     TRACE("(%p,%u)\n", graphics, intention);
4309
4310     if(!graphics)
4311         return InvalidParameter;
4312
4313     if(graphics->busy)
4314         return ObjectBusy;
4315
4316     /* We have no internal operation queue, so there's no need to clear it. */
4317
4318     if (graphics->hdc)
4319         GdiFlush();
4320
4321     return Ok;
4322 }
4323
4324 /*****************************************************************************
4325  * GdipGetClipBounds [GDIPLUS.@]
4326  */
4327 GpStatus WINGDIPAPI GdipGetClipBounds(GpGraphics *graphics, GpRectF *rect)
4328 {
4329     TRACE("(%p, %p)\n", graphics, rect);
4330
4331     if(!graphics)
4332         return InvalidParameter;
4333
4334     if(graphics->busy)
4335         return ObjectBusy;
4336
4337     return GdipGetRegionBounds(graphics->clip, graphics, rect);
4338 }
4339
4340 /*****************************************************************************
4341  * GdipGetClipBoundsI [GDIPLUS.@]
4342  */
4343 GpStatus WINGDIPAPI GdipGetClipBoundsI(GpGraphics *graphics, GpRect *rect)
4344 {
4345     TRACE("(%p, %p)\n", graphics, rect);
4346
4347     if(!graphics)
4348         return InvalidParameter;
4349
4350     if(graphics->busy)
4351         return ObjectBusy;
4352
4353     return GdipGetRegionBoundsI(graphics->clip, graphics, rect);
4354 }
4355
4356 /* FIXME: Compositing mode is not used anywhere except the getter/setter. */
4357 GpStatus WINGDIPAPI GdipGetCompositingMode(GpGraphics *graphics,
4358     CompositingMode *mode)
4359 {
4360     TRACE("(%p, %p)\n", graphics, mode);
4361
4362     if(!graphics || !mode)
4363         return InvalidParameter;
4364
4365     if(graphics->busy)
4366         return ObjectBusy;
4367
4368     *mode = graphics->compmode;
4369
4370     return Ok;
4371 }
4372
4373 /* FIXME: Compositing quality is not used anywhere except the getter/setter. */
4374 GpStatus WINGDIPAPI GdipGetCompositingQuality(GpGraphics *graphics,
4375     CompositingQuality *quality)
4376 {
4377     TRACE("(%p, %p)\n", graphics, quality);
4378
4379     if(!graphics || !quality)
4380         return InvalidParameter;
4381
4382     if(graphics->busy)
4383         return ObjectBusy;
4384
4385     *quality = graphics->compqual;
4386
4387     return Ok;
4388 }
4389
4390 /* FIXME: Interpolation mode is not used anywhere except the getter/setter. */
4391 GpStatus WINGDIPAPI GdipGetInterpolationMode(GpGraphics *graphics,
4392     InterpolationMode *mode)
4393 {
4394     TRACE("(%p, %p)\n", graphics, mode);
4395
4396     if(!graphics || !mode)
4397         return InvalidParameter;
4398
4399     if(graphics->busy)
4400         return ObjectBusy;
4401
4402     *mode = graphics->interpolation;
4403
4404     return Ok;
4405 }
4406
4407 /* FIXME: Need to handle color depths less than 24bpp */
4408 GpStatus WINGDIPAPI GdipGetNearestColor(GpGraphics *graphics, ARGB* argb)
4409 {
4410     FIXME("(%p, %p): Passing color unmodified\n", graphics, argb);
4411
4412     if(!graphics || !argb)
4413         return InvalidParameter;
4414
4415     if(graphics->busy)
4416         return ObjectBusy;
4417
4418     return Ok;
4419 }
4420
4421 GpStatus WINGDIPAPI GdipGetPageScale(GpGraphics *graphics, REAL *scale)
4422 {
4423     TRACE("(%p, %p)\n", graphics, scale);
4424
4425     if(!graphics || !scale)
4426         return InvalidParameter;
4427
4428     if(graphics->busy)
4429         return ObjectBusy;
4430
4431     *scale = graphics->scale;
4432
4433     return Ok;
4434 }
4435
4436 GpStatus WINGDIPAPI GdipGetPageUnit(GpGraphics *graphics, GpUnit *unit)
4437 {
4438     TRACE("(%p, %p)\n", graphics, unit);
4439
4440     if(!graphics || !unit)
4441         return InvalidParameter;
4442
4443     if(graphics->busy)
4444         return ObjectBusy;
4445
4446     *unit = graphics->unit;
4447
4448     return Ok;
4449 }
4450
4451 /* FIXME: Pixel offset mode is not used anywhere except the getter/setter. */
4452 GpStatus WINGDIPAPI GdipGetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
4453     *mode)
4454 {
4455     TRACE("(%p, %p)\n", graphics, mode);
4456
4457     if(!graphics || !mode)
4458         return InvalidParameter;
4459
4460     if(graphics->busy)
4461         return ObjectBusy;
4462
4463     *mode = graphics->pixeloffset;
4464
4465     return Ok;
4466 }
4467
4468 /* FIXME: Smoothing mode is not used anywhere except the getter/setter. */
4469 GpStatus WINGDIPAPI GdipGetSmoothingMode(GpGraphics *graphics, SmoothingMode *mode)
4470 {
4471     TRACE("(%p, %p)\n", graphics, mode);
4472
4473     if(!graphics || !mode)
4474         return InvalidParameter;
4475
4476     if(graphics->busy)
4477         return ObjectBusy;
4478
4479     *mode = graphics->smoothing;
4480
4481     return Ok;
4482 }
4483
4484 GpStatus WINGDIPAPI GdipGetTextContrast(GpGraphics *graphics, UINT *contrast)
4485 {
4486     TRACE("(%p, %p)\n", graphics, contrast);
4487
4488     if(!graphics || !contrast)
4489         return InvalidParameter;
4490
4491     *contrast = graphics->textcontrast;
4492
4493     return Ok;
4494 }
4495
4496 /* FIXME: Text rendering hint is not used anywhere except the getter/setter. */
4497 GpStatus WINGDIPAPI GdipGetTextRenderingHint(GpGraphics *graphics,
4498     TextRenderingHint *hint)
4499 {
4500     TRACE("(%p, %p)\n", graphics, hint);
4501
4502     if(!graphics || !hint)
4503         return InvalidParameter;
4504
4505     if(graphics->busy)
4506         return ObjectBusy;
4507
4508     *hint = graphics->texthint;
4509
4510     return Ok;
4511 }
4512
4513 GpStatus WINGDIPAPI GdipGetVisibleClipBounds(GpGraphics *graphics, GpRectF *rect)
4514 {
4515     GpRegion *clip_rgn;
4516     GpStatus stat;
4517
4518     TRACE("(%p, %p)\n", graphics, rect);
4519
4520     if(!graphics || !rect)
4521         return InvalidParameter;
4522
4523     if(graphics->busy)
4524         return ObjectBusy;
4525
4526     /* intersect window and graphics clipping regions */
4527     if((stat = GdipCreateRegion(&clip_rgn)) != Ok)
4528         return stat;
4529
4530     if((stat = get_visible_clip_region(graphics, clip_rgn)) != Ok)
4531         goto cleanup;
4532
4533     /* get bounds of the region */
4534     stat = GdipGetRegionBounds(clip_rgn, graphics, rect);
4535
4536 cleanup:
4537     GdipDeleteRegion(clip_rgn);
4538
4539     return stat;
4540 }
4541
4542 GpStatus WINGDIPAPI GdipGetVisibleClipBoundsI(GpGraphics *graphics, GpRect *rect)
4543 {
4544     GpRectF rectf;
4545     GpStatus stat;
4546
4547     TRACE("(%p, %p)\n", graphics, rect);
4548
4549     if(!graphics || !rect)
4550         return InvalidParameter;
4551
4552     if((stat = GdipGetVisibleClipBounds(graphics, &rectf)) == Ok)
4553     {
4554         rect->X = roundr(rectf.X);
4555         rect->Y = roundr(rectf.Y);
4556         rect->Width  = roundr(rectf.Width);
4557         rect->Height = roundr(rectf.Height);
4558     }
4559
4560     return stat;
4561 }
4562
4563 GpStatus WINGDIPAPI GdipGetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
4564 {
4565     TRACE("(%p, %p)\n", graphics, matrix);
4566
4567     if(!graphics || !matrix)
4568         return InvalidParameter;
4569
4570     if(graphics->busy)
4571         return ObjectBusy;
4572
4573     *matrix = *graphics->worldtrans;
4574     return Ok;
4575 }
4576
4577 GpStatus WINGDIPAPI GdipGraphicsClear(GpGraphics *graphics, ARGB color)
4578 {
4579     GpSolidFill *brush;
4580     GpStatus stat;
4581     GpRectF wnd_rect;
4582
4583     TRACE("(%p, %x)\n", graphics, color);
4584
4585     if(!graphics)
4586         return InvalidParameter;
4587
4588     if(graphics->busy)
4589         return ObjectBusy;
4590
4591     if((stat = GdipCreateSolidFill(color, &brush)) != Ok)
4592         return stat;
4593
4594     if((stat = get_graphics_bounds(graphics, &wnd_rect)) != Ok){
4595         GdipDeleteBrush((GpBrush*)brush);
4596         return stat;
4597     }
4598
4599     GdipFillRectangle(graphics, (GpBrush*)brush, wnd_rect.X, wnd_rect.Y,
4600                                                  wnd_rect.Width, wnd_rect.Height);
4601
4602     GdipDeleteBrush((GpBrush*)brush);
4603
4604     return Ok;
4605 }
4606
4607 GpStatus WINGDIPAPI GdipIsClipEmpty(GpGraphics *graphics, BOOL *res)
4608 {
4609     TRACE("(%p, %p)\n", graphics, res);
4610
4611     if(!graphics || !res)
4612         return InvalidParameter;
4613
4614     return GdipIsEmptyRegion(graphics->clip, graphics, res);
4615 }
4616
4617 GpStatus WINGDIPAPI GdipIsVisiblePoint(GpGraphics *graphics, REAL x, REAL y, BOOL *result)
4618 {
4619     GpStatus stat;
4620     GpRegion* rgn;
4621     GpPointF pt;
4622
4623     TRACE("(%p, %.2f, %.2f, %p)\n", graphics, x, y, result);
4624
4625     if(!graphics || !result)
4626         return InvalidParameter;
4627
4628     if(graphics->busy)
4629         return ObjectBusy;
4630
4631     pt.X = x;
4632     pt.Y = y;
4633     if((stat = GdipTransformPoints(graphics, CoordinateSpaceDevice,
4634                    CoordinateSpaceWorld, &pt, 1)) != Ok)
4635         return stat;
4636
4637     if((stat = GdipCreateRegion(&rgn)) != Ok)
4638         return stat;
4639
4640     if((stat = get_visible_clip_region(graphics, rgn)) != Ok)
4641         goto cleanup;
4642
4643     stat = GdipIsVisibleRegionPoint(rgn, pt.X, pt.Y, graphics, result);
4644
4645 cleanup:
4646     GdipDeleteRegion(rgn);
4647     return stat;
4648 }
4649
4650 GpStatus WINGDIPAPI GdipIsVisiblePointI(GpGraphics *graphics, INT x, INT y, BOOL *result)
4651 {
4652     return GdipIsVisiblePoint(graphics, (REAL)x, (REAL)y, result);
4653 }
4654
4655 GpStatus WINGDIPAPI GdipIsVisibleRect(GpGraphics *graphics, REAL x, REAL y, REAL width, REAL height, BOOL *result)
4656 {
4657     GpStatus stat;
4658     GpRegion* rgn;
4659     GpPointF pts[2];
4660
4661     TRACE("(%p %.2f %.2f %.2f %.2f %p)\n", graphics, x, y, width, height, result);
4662
4663     if(!graphics || !result)
4664         return InvalidParameter;
4665
4666     if(graphics->busy)
4667         return ObjectBusy;
4668
4669     pts[0].X = x;
4670     pts[0].Y = y;
4671     pts[1].X = x + width;
4672     pts[1].Y = y + height;
4673
4674     if((stat = GdipTransformPoints(graphics, CoordinateSpaceDevice,
4675                     CoordinateSpaceWorld, pts, 2)) != Ok)
4676         return stat;
4677
4678     pts[1].X -= pts[0].X;
4679     pts[1].Y -= pts[0].Y;
4680
4681     if((stat = GdipCreateRegion(&rgn)) != Ok)
4682         return stat;
4683
4684     if((stat = get_visible_clip_region(graphics, rgn)) != Ok)
4685         goto cleanup;
4686
4687     stat = GdipIsVisibleRegionRect(rgn, pts[0].X, pts[0].Y, pts[1].X, pts[1].Y, graphics, result);
4688
4689 cleanup:
4690     GdipDeleteRegion(rgn);
4691     return stat;
4692 }
4693
4694 GpStatus WINGDIPAPI GdipIsVisibleRectI(GpGraphics *graphics, INT x, INT y, INT width, INT height, BOOL *result)
4695 {
4696     return GdipIsVisibleRect(graphics, (REAL)x, (REAL)y, (REAL)width, (REAL)height, result);
4697 }
4698
4699 GpStatus gdip_format_string(HDC hdc,
4700     GDIPCONST WCHAR *string, INT length, GDIPCONST GpFont *font,
4701     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format,
4702     gdip_format_string_callback callback, void *user_data)
4703 {
4704     WCHAR* stringdup;
4705     int sum = 0, height = 0, fit, fitcpy, i, j, lret, nwidth,
4706         nheight, lineend, lineno = 0;
4707     RectF bounds;
4708     StringAlignment halign;
4709     GpStatus stat = Ok;
4710     SIZE size;
4711     HotkeyPrefix hkprefix;
4712     INT *hotkeyprefix_offsets=NULL;
4713     INT hotkeyprefix_count=0;
4714     INT hotkeyprefix_pos=0, hotkeyprefix_end_pos=0;
4715     int seen_prefix=0;
4716
4717     if(length == -1) length = lstrlenW(string);
4718
4719     stringdup = GdipAlloc((length + 1) * sizeof(WCHAR));
4720     if(!stringdup) return OutOfMemory;
4721
4722     nwidth = roundr(rect->Width);
4723     nheight = roundr(rect->Height);
4724
4725     if (rect->Width >= INT_MAX || rect->Width < 0.5) nwidth = INT_MAX;
4726     if (rect->Height >= INT_MAX || rect->Height < 0.5) nheight = INT_MAX;
4727
4728     if (format)
4729         hkprefix = format->hkprefix;
4730     else
4731         hkprefix = HotkeyPrefixNone;
4732
4733     if (hkprefix == HotkeyPrefixShow)
4734     {
4735         for (i=0; i<length; i++)
4736         {
4737             if (string[i] == '&')
4738                 hotkeyprefix_count++;
4739         }
4740     }
4741
4742     if (hotkeyprefix_count)
4743         hotkeyprefix_offsets = GdipAlloc(sizeof(INT) * hotkeyprefix_count);
4744
4745     hotkeyprefix_count = 0;
4746
4747     for(i = 0, j = 0; i < length; i++){
4748         /* FIXME: This makes the indexes passed to callback inaccurate. */
4749         if(!isprintW(string[i]) && (string[i] != '\n'))
4750             continue;
4751
4752         if (seen_prefix && hkprefix == HotkeyPrefixShow && string[i] != '&')
4753             hotkeyprefix_offsets[hotkeyprefix_count++] = j;
4754         else if (!seen_prefix && hkprefix != HotkeyPrefixNone && string[i] == '&')
4755         {
4756             seen_prefix = 1;
4757             continue;
4758         }
4759
4760         seen_prefix = 0;
4761
4762         stringdup[j] = string[i];
4763         j++;
4764     }
4765
4766     length = j;
4767
4768     if (format) halign = format->align;
4769     else halign = StringAlignmentNear;
4770
4771     while(sum < length){
4772         GetTextExtentExPointW(hdc, stringdup + sum, length - sum,
4773                               nwidth, &fit, NULL, &size);
4774         fitcpy = fit;
4775
4776         if(fit == 0)
4777             break;
4778
4779         for(lret = 0; lret < fit; lret++)
4780             if(*(stringdup + sum + lret) == '\n')
4781                 break;
4782
4783         /* Line break code (may look strange, but it imitates windows). */
4784         if(lret < fit)
4785             lineend = fit = lret;    /* this is not an off-by-one error */
4786         else if(fit < (length - sum)){
4787             if(*(stringdup + sum + fit) == ' ')
4788                 while(*(stringdup + sum + fit) == ' ')
4789                     fit++;
4790             else
4791                 while(*(stringdup + sum + fit - 1) != ' '){
4792                     fit--;
4793
4794                     if(*(stringdup + sum + fit) == '\t')
4795                         break;
4796
4797                     if(fit == 0){
4798                         fit = fitcpy;
4799                         break;
4800                     }
4801                 }
4802             lineend = fit;
4803             while(*(stringdup + sum + lineend - 1) == ' ' ||
4804                   *(stringdup + sum + lineend - 1) == '\t')
4805                 lineend--;
4806         }
4807         else
4808             lineend = fit;
4809
4810         GetTextExtentExPointW(hdc, stringdup + sum, lineend,
4811                               nwidth, &j, NULL, &size);
4812
4813         bounds.Width = size.cx;
4814
4815         if(height + size.cy > nheight)
4816             bounds.Height = nheight - (height + size.cy);
4817         else
4818             bounds.Height = size.cy;
4819
4820         bounds.Y = rect->Y + height;
4821
4822         switch (halign)
4823         {
4824         case StringAlignmentNear:
4825         default:
4826             bounds.X = rect->X;
4827             break;
4828         case StringAlignmentCenter:
4829             bounds.X = rect->X + (rect->Width/2) - (bounds.Width/2);
4830             break;
4831         case StringAlignmentFar:
4832             bounds.X = rect->X + rect->Width - bounds.Width;
4833             break;
4834         }
4835
4836         for (hotkeyprefix_end_pos=hotkeyprefix_pos; hotkeyprefix_end_pos<hotkeyprefix_count; hotkeyprefix_end_pos++)
4837             if (hotkeyprefix_offsets[hotkeyprefix_end_pos] >= sum + lineend)
4838                 break;
4839
4840         stat = callback(hdc, stringdup, sum, lineend,
4841             font, rect, format, lineno, &bounds,
4842             &hotkeyprefix_offsets[hotkeyprefix_pos],
4843             hotkeyprefix_end_pos-hotkeyprefix_pos, user_data);
4844
4845         if (stat != Ok)
4846             break;
4847
4848         sum += fit + (lret < fitcpy ? 1 : 0);
4849         height += size.cy;
4850         lineno++;
4851
4852         hotkeyprefix_pos = hotkeyprefix_end_pos;
4853
4854         if(height > nheight)
4855             break;
4856
4857         /* Stop if this was a linewrap (but not if it was a linebreak). */
4858         if((lret == fitcpy) && format && (format->attr & StringFormatFlagsNoWrap))
4859             break;
4860     }
4861
4862     GdipFree(stringdup);
4863     GdipFree(hotkeyprefix_offsets);
4864
4865     return stat;
4866 }
4867
4868 struct measure_ranges_args {
4869     GpRegion **regions;
4870 };
4871
4872 static GpStatus measure_ranges_callback(HDC hdc,
4873     GDIPCONST WCHAR *string, INT index, INT length, GDIPCONST GpFont *font,
4874     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format,
4875     INT lineno, const RectF *bounds, INT *underlined_indexes,
4876     INT underlined_index_count, void *user_data)
4877 {
4878     int i;
4879     GpStatus stat = Ok;
4880     struct measure_ranges_args *args = user_data;
4881
4882     for (i=0; i<format->range_count; i++)
4883     {
4884         INT range_start = max(index, format->character_ranges[i].First);
4885         INT range_end = min(index+length, format->character_ranges[i].First+format->character_ranges[i].Length);
4886         if (range_start < range_end)
4887         {
4888             GpRectF range_rect;
4889             SIZE range_size;
4890
4891             range_rect.Y = bounds->Y;
4892             range_rect.Height = bounds->Height;
4893
4894             GetTextExtentExPointW(hdc, string + index, range_start - index,
4895                                   INT_MAX, NULL, NULL, &range_size);
4896             range_rect.X = bounds->X + range_size.cx;
4897
4898             GetTextExtentExPointW(hdc, string + index, range_end - index,
4899                                   INT_MAX, NULL, NULL, &range_size);
4900             range_rect.Width = (bounds->X + range_size.cx) - range_rect.X;
4901
4902             stat = GdipCombineRegionRect(args->regions[i], &range_rect, CombineModeUnion);
4903             if (stat != Ok)
4904                 break;
4905         }
4906     }
4907
4908     return stat;
4909 }
4910
4911 static void rect_to_pixels(const RectF *in, const GpGraphics *graphics, RectF *out)
4912 {
4913     REAL dpi;
4914
4915     GdipGetDpiX((GpGraphics *)graphics, &dpi);
4916     out->X = units_to_pixels(in->X, graphics->unit, dpi);
4917     out->Width = units_to_pixels(in->Width, graphics->unit, dpi);
4918     GdipGetDpiY((GpGraphics *)graphics, &dpi);
4919     out->Y = units_to_pixels(in->Y, graphics->unit, dpi);
4920     out->Height = units_to_pixels(in->Height, graphics->unit, dpi);
4921 }
4922
4923 static void rect_to_units(const RectF *in, const GpGraphics *graphics, RectF *out)
4924 {
4925     REAL dpi;
4926
4927     GdipGetDpiX((GpGraphics *)graphics, &dpi);
4928     out->X = pixels_to_units(in->X, graphics->unit, dpi);
4929     out->Width = pixels_to_units(in->Width, graphics->unit, dpi);
4930     GdipGetDpiY((GpGraphics *)graphics, &dpi);
4931     out->Y = pixels_to_units(in->Y, graphics->unit, dpi);
4932     out->Height = pixels_to_units(in->Height, graphics->unit, dpi);
4933 }
4934
4935 GpStatus WINGDIPAPI GdipMeasureCharacterRanges(GpGraphics* graphics,
4936         GDIPCONST WCHAR* string, INT length, GDIPCONST GpFont* font,
4937         GDIPCONST RectF* layoutRect, GDIPCONST GpStringFormat *stringFormat,
4938         INT regionCount, GpRegion** regions)
4939 {
4940     GpStatus stat;
4941     int i;
4942     LOGFONTW lfw;
4943     HFONT oldfont;
4944     struct measure_ranges_args args;
4945     HDC hdc, temp_hdc=NULL;
4946
4947     TRACE("(%p %s %d %p %s %p %d %p)\n", graphics, debugstr_w(string),
4948             length, font, debugstr_rectf(layoutRect), stringFormat, regionCount, regions);
4949
4950     if (!(graphics && string && font && layoutRect && stringFormat && regions))
4951         return InvalidParameter;
4952
4953     if (regionCount < stringFormat->range_count)
4954         return InvalidParameter;
4955
4956     get_log_fontW(font, graphics, &lfw);
4957
4958     if(!graphics->hdc)
4959     {
4960         hdc = temp_hdc = CreateCompatibleDC(0);
4961         if (!temp_hdc) return OutOfMemory;
4962     }
4963     else
4964         hdc = graphics->hdc;
4965
4966     if (stringFormat->attr)
4967         TRACE("may be ignoring some format flags: attr %x\n", stringFormat->attr);
4968
4969     oldfont = SelectObject(hdc, CreateFontIndirectW(&lfw));
4970
4971     for (i=0; i<stringFormat->range_count; i++)
4972     {
4973         stat = GdipSetEmpty(regions[i]);
4974         if (stat != Ok)
4975             return stat;
4976     }
4977
4978     args.regions = regions;
4979
4980     stat = gdip_format_string(hdc, string, length, font, layoutRect, stringFormat,
4981         measure_ranges_callback, &args);
4982
4983     DeleteObject(SelectObject(hdc, oldfont));
4984
4985     if (temp_hdc)
4986         DeleteDC(temp_hdc);
4987
4988     return stat;
4989 }
4990
4991 struct measure_string_args {
4992     RectF *bounds;
4993     INT *codepointsfitted;
4994     INT *linesfilled;
4995     REAL rel_width, rel_height;
4996 };
4997
4998 static GpStatus measure_string_callback(HDC hdc,
4999     GDIPCONST WCHAR *string, INT index, INT length, GDIPCONST GpFont *font,
5000     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format,
5001     INT lineno, const RectF *bounds, INT *underlined_indexes,
5002     INT underlined_index_count, void *user_data)
5003 {
5004     struct measure_string_args *args = user_data;
5005     REAL new_width, new_height;
5006
5007     new_width = bounds->Width / args->rel_width;
5008     new_height = (bounds->Height + bounds->Y - args->bounds->Y) / args->rel_height;
5009
5010     if (new_width > args->bounds->Width)
5011         args->bounds->Width = new_width;
5012
5013     if (new_height > args->bounds->Height)
5014         args->bounds->Height = new_height;
5015
5016     if (args->codepointsfitted)
5017         *args->codepointsfitted = index + length;
5018
5019     if (args->linesfilled)
5020         (*args->linesfilled)++;
5021
5022     return Ok;
5023 }
5024
5025 /* Find the smallest rectangle that bounds the text when it is printed in rect
5026  * according to the format options listed in format. If rect has 0 width and
5027  * height, then just find the smallest rectangle that bounds the text when it's
5028  * printed at location (rect->X, rect-Y). */
5029 GpStatus WINGDIPAPI GdipMeasureString(GpGraphics *graphics,
5030     GDIPCONST WCHAR *string, INT length, GDIPCONST GpFont *font,
5031     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format, RectF *bounds,
5032     INT *codepointsfitted, INT *linesfilled)
5033 {
5034     HFONT oldfont, gdifont;
5035     struct measure_string_args args;
5036     HDC temp_hdc=NULL, hdc;
5037     GpPointF pt[3];
5038     RectF rect_pixels;
5039
5040     TRACE("(%p, %s, %i, %p, %s, %p, %p, %p, %p)\n", graphics,
5041         debugstr_wn(string, length), length, font, debugstr_rectf(rect), format,
5042         bounds, codepointsfitted, linesfilled);
5043
5044     if(!graphics || !string || !font || !rect || !bounds)
5045         return InvalidParameter;
5046
5047     if(!graphics->hdc)
5048     {
5049         hdc = temp_hdc = CreateCompatibleDC(0);
5050         if (!temp_hdc) return OutOfMemory;
5051     }
5052     else
5053         hdc = graphics->hdc;
5054
5055     if(linesfilled) *linesfilled = 0;
5056     if(codepointsfitted) *codepointsfitted = 0;
5057
5058     if(format)
5059         TRACE("may be ignoring some format flags: attr %x\n", format->attr);
5060
5061     pt[0].X = 0.0;
5062     pt[0].Y = 0.0;
5063     pt[1].X = 1.0;
5064     pt[1].Y = 0.0;
5065     pt[2].X = 0.0;
5066     pt[2].Y = 1.0;
5067     GdipTransformPoints(graphics, CoordinateSpaceDevice, CoordinateSpaceWorld, pt, 3);
5068     args.rel_width = sqrt((pt[1].Y-pt[0].Y)*(pt[1].Y-pt[0].Y)+
5069                      (pt[1].X-pt[0].X)*(pt[1].X-pt[0].X));
5070     args.rel_height = sqrt((pt[2].Y-pt[0].Y)*(pt[2].Y-pt[0].Y)+
5071                       (pt[2].X-pt[0].X)*(pt[2].X-pt[0].X));
5072
5073     get_font_hfont(graphics, font, &gdifont);
5074     oldfont = SelectObject(hdc, gdifont);
5075
5076     rect_to_pixels(rect, graphics, &rect_pixels);
5077
5078     bounds->X = rect_pixels.X;
5079     bounds->Y = rect_pixels.Y;
5080     bounds->Width = 0.0;
5081     bounds->Height = 0.0;
5082
5083     args.bounds = bounds;
5084     args.codepointsfitted = codepointsfitted;
5085     args.linesfilled = linesfilled;
5086
5087     gdip_format_string(hdc, string, length, font, &rect_pixels, format,
5088         measure_string_callback, &args);
5089
5090     rect_to_units(bounds, graphics, bounds);
5091
5092     SelectObject(hdc, oldfont);
5093     DeleteObject(gdifont);
5094
5095     if (temp_hdc)
5096         DeleteDC(temp_hdc);
5097
5098     return Ok;
5099 }
5100
5101 struct draw_string_args {
5102     GpGraphics *graphics;
5103     GDIPCONST GpBrush *brush;
5104     REAL x, y, rel_width, rel_height, ascent;
5105 };
5106
5107 static GpStatus draw_string_callback(HDC hdc,
5108     GDIPCONST WCHAR *string, INT index, INT length, GDIPCONST GpFont *font,
5109     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format,
5110     INT lineno, const RectF *bounds, INT *underlined_indexes,
5111     INT underlined_index_count, void *user_data)
5112 {
5113     struct draw_string_args *args = user_data;
5114     PointF position;
5115     GpStatus stat;
5116
5117     position.X = args->x + bounds->X / args->rel_width;
5118     position.Y = args->y + bounds->Y / args->rel_height + args->ascent;
5119
5120     stat = GdipDrawDriverString(args->graphics, &string[index], length, font,
5121         args->brush, &position,
5122         DriverStringOptionsCmapLookup|DriverStringOptionsRealizedAdvance, NULL);
5123
5124     if (stat == Ok && underlined_index_count)
5125     {
5126         OUTLINETEXTMETRICW otm;
5127         REAL underline_y, underline_height;
5128         int i;
5129
5130         GetOutlineTextMetricsW(hdc, sizeof(otm), &otm);
5131
5132         underline_height = otm.otmsUnderscoreSize / args->rel_height;
5133         underline_y = position.Y - otm.otmsUnderscorePosition / args->rel_height - underline_height / 2;
5134
5135         for (i=0; i<underlined_index_count; i++)
5136         {
5137             REAL start_x, end_x;
5138             SIZE text_size;
5139             INT ofs = underlined_indexes[i] - index;
5140
5141             GetTextExtentExPointW(hdc, string + index, ofs, INT_MAX, NULL, NULL, &text_size);
5142             start_x = text_size.cx / args->rel_width;
5143
5144             GetTextExtentExPointW(hdc, string + index, ofs+1, INT_MAX, NULL, NULL, &text_size);
5145             end_x = text_size.cx / args->rel_width;
5146
5147             GdipFillRectangle(args->graphics, (GpBrush*)args->brush, position.X+start_x, underline_y, end_x-start_x, underline_height);
5148         }
5149     }
5150
5151     return stat;
5152 }
5153
5154 GpStatus WINGDIPAPI GdipDrawString(GpGraphics *graphics, GDIPCONST WCHAR *string,
5155     INT length, GDIPCONST GpFont *font, GDIPCONST RectF *rect,
5156     GDIPCONST GpStringFormat *format, GDIPCONST GpBrush *brush)
5157 {
5158     HRGN rgn = NULL;
5159     HFONT gdifont;
5160     GpPointF pt[3], rectcpy[4];
5161     POINT corners[4];
5162     REAL rel_width, rel_height;
5163     INT save_state;
5164     REAL offsety = 0.0;
5165     struct draw_string_args args;
5166     RectF scaled_rect;
5167     HDC hdc, temp_hdc=NULL;
5168     TEXTMETRICW textmetric;
5169
5170     TRACE("(%p, %s, %i, %p, %s, %p, %p)\n", graphics, debugstr_wn(string, length),
5171         length, font, debugstr_rectf(rect), format, brush);
5172
5173     if(!graphics || !string || !font || !brush || !rect)
5174         return InvalidParameter;
5175
5176     if(graphics->hdc)
5177     {
5178         hdc = graphics->hdc;
5179     }
5180     else
5181     {
5182         hdc = temp_hdc = CreateCompatibleDC(0);
5183     }
5184
5185     if(format){
5186         TRACE("may be ignoring some format flags: attr %x\n", format->attr);
5187
5188         /* Should be no need to explicitly test for StringAlignmentNear as
5189          * that is default behavior if no alignment is passed. */
5190         if(format->vertalign != StringAlignmentNear){
5191             RectF bounds, in_rect = *rect;
5192             in_rect.Height = 0.0; /* avoid height clipping */
5193             GdipMeasureString(graphics, string, length, font, &in_rect, format, &bounds, 0, 0);
5194
5195             TRACE("bounds %s\n", debugstr_rectf(&bounds));
5196
5197             if(format->vertalign == StringAlignmentCenter)
5198                 offsety = (rect->Height - bounds.Height) / 2;
5199             else if(format->vertalign == StringAlignmentFar)
5200                 offsety = (rect->Height - bounds.Height);
5201         }
5202         TRACE("vertical align %d, offsety %f\n", format->vertalign, offsety);
5203     }
5204
5205     save_state = SaveDC(hdc);
5206
5207     pt[0].X = 0.0;
5208     pt[0].Y = 0.0;
5209     pt[1].X = 1.0;
5210     pt[1].Y = 0.0;
5211     pt[2].X = 0.0;
5212     pt[2].Y = 1.0;
5213     GdipTransformPoints(graphics, CoordinateSpaceDevice, CoordinateSpaceWorld, pt, 3);
5214     rel_width = sqrt((pt[1].Y-pt[0].Y)*(pt[1].Y-pt[0].Y)+
5215                      (pt[1].X-pt[0].X)*(pt[1].X-pt[0].X));
5216     rel_height = sqrt((pt[2].Y-pt[0].Y)*(pt[2].Y-pt[0].Y)+
5217                       (pt[2].X-pt[0].X)*(pt[2].X-pt[0].X));
5218
5219     rectcpy[3].X = rectcpy[0].X = rect->X;
5220     rectcpy[1].Y = rectcpy[0].Y = rect->Y;
5221     rectcpy[2].X = rectcpy[1].X = rect->X + rect->Width;
5222     rectcpy[3].Y = rectcpy[2].Y = rect->Y + rect->Height;
5223     transform_and_round_points(graphics, corners, rectcpy, 4);
5224
5225     scaled_rect.X = 0.0;
5226     scaled_rect.Y = 0.0;
5227     scaled_rect.Width = rel_width * rect->Width;
5228     scaled_rect.Height = rel_height * rect->Height;
5229
5230     if (roundr(scaled_rect.Width) != 0 && roundr(scaled_rect.Height) != 0)
5231     {
5232         /* FIXME: If only the width or only the height is 0, we should probably still clip */
5233         rgn = CreatePolygonRgn(corners, 4, ALTERNATE);
5234         SelectClipRgn(hdc, rgn);
5235     }
5236
5237     get_font_hfont(graphics, font, &gdifont);
5238     SelectObject(hdc, gdifont);
5239
5240     args.graphics = graphics;
5241     args.brush = brush;
5242
5243     args.x = rect->X;
5244     args.y = rect->Y + offsety;
5245
5246     args.rel_width = rel_width;
5247     args.rel_height = rel_height;
5248
5249     GetTextMetricsW(hdc, &textmetric);
5250     args.ascent = textmetric.tmAscent / rel_height;
5251
5252     gdip_format_string(hdc, string, length, font, &scaled_rect, format,
5253         draw_string_callback, &args);
5254
5255     DeleteObject(rgn);
5256     DeleteObject(gdifont);
5257
5258     RestoreDC(hdc, save_state);
5259
5260     DeleteDC(temp_hdc);
5261
5262     return Ok;
5263 }
5264
5265 GpStatus WINGDIPAPI GdipResetClip(GpGraphics *graphics)
5266 {
5267     TRACE("(%p)\n", graphics);
5268
5269     if(!graphics)
5270         return InvalidParameter;
5271
5272     if(graphics->busy)
5273         return ObjectBusy;
5274
5275     return GdipSetInfinite(graphics->clip);
5276 }
5277
5278 GpStatus WINGDIPAPI GdipResetWorldTransform(GpGraphics *graphics)
5279 {
5280     TRACE("(%p)\n", graphics);
5281
5282     if(!graphics)
5283         return InvalidParameter;
5284
5285     if(graphics->busy)
5286         return ObjectBusy;
5287
5288     graphics->worldtrans->matrix[0] = 1.0;
5289     graphics->worldtrans->matrix[1] = 0.0;
5290     graphics->worldtrans->matrix[2] = 0.0;
5291     graphics->worldtrans->matrix[3] = 1.0;
5292     graphics->worldtrans->matrix[4] = 0.0;
5293     graphics->worldtrans->matrix[5] = 0.0;
5294
5295     return Ok;
5296 }
5297
5298 GpStatus WINGDIPAPI GdipRestoreGraphics(GpGraphics *graphics, GraphicsState state)
5299 {
5300     return GdipEndContainer(graphics, state);
5301 }
5302
5303 GpStatus WINGDIPAPI GdipRotateWorldTransform(GpGraphics *graphics, REAL angle,
5304     GpMatrixOrder order)
5305 {
5306     TRACE("(%p, %.2f, %d)\n", graphics, angle, order);
5307
5308     if(!graphics)
5309         return InvalidParameter;
5310
5311     if(graphics->busy)
5312         return ObjectBusy;
5313
5314     return GdipRotateMatrix(graphics->worldtrans, angle, order);
5315 }
5316
5317 GpStatus WINGDIPAPI GdipSaveGraphics(GpGraphics *graphics, GraphicsState *state)
5318 {
5319     return GdipBeginContainer2(graphics, state);
5320 }
5321
5322 GpStatus WINGDIPAPI GdipBeginContainer2(GpGraphics *graphics,
5323         GraphicsContainer *state)
5324 {
5325     GraphicsContainerItem *container;
5326     GpStatus sts;
5327
5328     TRACE("(%p, %p)\n", graphics, state);
5329
5330     if(!graphics || !state)
5331         return InvalidParameter;
5332
5333     sts = init_container(&container, graphics);
5334     if(sts != Ok)
5335         return sts;
5336
5337     list_add_head(&graphics->containers, &container->entry);
5338     *state = graphics->contid = container->contid;
5339
5340     return Ok;
5341 }
5342
5343 GpStatus WINGDIPAPI GdipBeginContainer(GpGraphics *graphics, GDIPCONST GpRectF *dstrect, GDIPCONST GpRectF *srcrect, GpUnit unit, GraphicsContainer *state)
5344 {
5345     FIXME("(%p, %p, %p, %d, %p): stub\n", graphics, dstrect, srcrect, unit, state);
5346     return NotImplemented;
5347 }
5348
5349 GpStatus WINGDIPAPI GdipBeginContainerI(GpGraphics *graphics, GDIPCONST GpRect *dstrect, GDIPCONST GpRect *srcrect, GpUnit unit, GraphicsContainer *state)
5350 {
5351     FIXME("(%p, %p, %p, %d, %p): stub\n", graphics, dstrect, srcrect, unit, state);
5352     return NotImplemented;
5353 }
5354
5355 GpStatus WINGDIPAPI GdipComment(GpGraphics *graphics, UINT sizeData, GDIPCONST BYTE *data)
5356 {
5357     FIXME("(%p, %d, %p): stub\n", graphics, sizeData, data);
5358     return NotImplemented;
5359 }
5360
5361 GpStatus WINGDIPAPI GdipEndContainer(GpGraphics *graphics, GraphicsContainer state)
5362 {
5363     GpStatus sts;
5364     GraphicsContainerItem *container, *container2;
5365
5366     TRACE("(%p, %x)\n", graphics, state);
5367
5368     if(!graphics)
5369         return InvalidParameter;
5370
5371     LIST_FOR_EACH_ENTRY(container, &graphics->containers, GraphicsContainerItem, entry){
5372         if(container->contid == state)
5373             break;
5374     }
5375
5376     /* did not find a matching container */
5377     if(&container->entry == &graphics->containers)
5378         return Ok;
5379
5380     sts = restore_container(graphics, container);
5381     if(sts != Ok)
5382         return sts;
5383
5384     /* remove all of the containers on top of the found container */
5385     LIST_FOR_EACH_ENTRY_SAFE(container, container2, &graphics->containers, GraphicsContainerItem, entry){
5386         if(container->contid == state)
5387             break;
5388         list_remove(&container->entry);
5389         delete_container(container);
5390     }
5391
5392     list_remove(&container->entry);
5393     delete_container(container);
5394
5395     return Ok;
5396 }
5397
5398 GpStatus WINGDIPAPI GdipScaleWorldTransform(GpGraphics *graphics, REAL sx,
5399     REAL sy, GpMatrixOrder order)
5400 {
5401     TRACE("(%p, %.2f, %.2f, %d)\n", graphics, sx, sy, order);
5402
5403     if(!graphics)
5404         return InvalidParameter;
5405
5406     if(graphics->busy)
5407         return ObjectBusy;
5408
5409     return GdipScaleMatrix(graphics->worldtrans, sx, sy, order);
5410 }
5411
5412 GpStatus WINGDIPAPI GdipSetClipGraphics(GpGraphics *graphics, GpGraphics *srcgraphics,
5413     CombineMode mode)
5414 {
5415     TRACE("(%p, %p, %d)\n", graphics, srcgraphics, mode);
5416
5417     if(!graphics || !srcgraphics)
5418         return InvalidParameter;
5419
5420     return GdipCombineRegionRegion(graphics->clip, srcgraphics->clip, mode);
5421 }
5422
5423 GpStatus WINGDIPAPI GdipSetCompositingMode(GpGraphics *graphics,
5424     CompositingMode mode)
5425 {
5426     TRACE("(%p, %d)\n", graphics, mode);
5427
5428     if(!graphics)
5429         return InvalidParameter;
5430
5431     if(graphics->busy)
5432         return ObjectBusy;
5433
5434     graphics->compmode = mode;
5435
5436     return Ok;
5437 }
5438
5439 GpStatus WINGDIPAPI GdipSetCompositingQuality(GpGraphics *graphics,
5440     CompositingQuality quality)
5441 {
5442     TRACE("(%p, %d)\n", graphics, quality);
5443
5444     if(!graphics)
5445         return InvalidParameter;
5446
5447     if(graphics->busy)
5448         return ObjectBusy;
5449
5450     graphics->compqual = quality;
5451
5452     return Ok;
5453 }
5454
5455 GpStatus WINGDIPAPI GdipSetInterpolationMode(GpGraphics *graphics,
5456     InterpolationMode mode)
5457 {
5458     TRACE("(%p, %d)\n", graphics, mode);
5459
5460     if(!graphics || mode == InterpolationModeInvalid || mode > InterpolationModeHighQualityBicubic)
5461         return InvalidParameter;
5462
5463     if(graphics->busy)
5464         return ObjectBusy;
5465
5466     if (mode == InterpolationModeDefault || mode == InterpolationModeLowQuality)
5467         mode = InterpolationModeBilinear;
5468
5469     if (mode == InterpolationModeHighQuality)
5470         mode = InterpolationModeHighQualityBicubic;
5471
5472     graphics->interpolation = mode;
5473
5474     return Ok;
5475 }
5476
5477 GpStatus WINGDIPAPI GdipSetPageScale(GpGraphics *graphics, REAL scale)
5478 {
5479     TRACE("(%p, %.2f)\n", graphics, scale);
5480
5481     if(!graphics || (scale <= 0.0))
5482         return InvalidParameter;
5483
5484     if(graphics->busy)
5485         return ObjectBusy;
5486
5487     graphics->scale = scale;
5488
5489     return Ok;
5490 }
5491
5492 GpStatus WINGDIPAPI GdipSetPageUnit(GpGraphics *graphics, GpUnit unit)
5493 {
5494     TRACE("(%p, %d)\n", graphics, unit);
5495
5496     if(!graphics)
5497         return InvalidParameter;
5498
5499     if(graphics->busy)
5500         return ObjectBusy;
5501
5502     if(unit == UnitWorld)
5503         return InvalidParameter;
5504
5505     graphics->unit = unit;
5506
5507     return Ok;
5508 }
5509
5510 GpStatus WINGDIPAPI GdipSetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
5511     mode)
5512 {
5513     TRACE("(%p, %d)\n", graphics, mode);
5514
5515     if(!graphics)
5516         return InvalidParameter;
5517
5518     if(graphics->busy)
5519         return ObjectBusy;
5520
5521     graphics->pixeloffset = mode;
5522
5523     return Ok;
5524 }
5525
5526 GpStatus WINGDIPAPI GdipSetRenderingOrigin(GpGraphics *graphics, INT x, INT y)
5527 {
5528     static int calls;
5529
5530     TRACE("(%p,%i,%i)\n", graphics, x, y);
5531
5532     if (!(calls++))
5533         FIXME("value is unused in rendering\n");
5534
5535     if (!graphics)
5536         return InvalidParameter;
5537
5538     graphics->origin_x = x;
5539     graphics->origin_y = y;
5540
5541     return Ok;
5542 }
5543
5544 GpStatus WINGDIPAPI GdipGetRenderingOrigin(GpGraphics *graphics, INT *x, INT *y)
5545 {
5546     TRACE("(%p,%p,%p)\n", graphics, x, y);
5547
5548     if (!graphics || !x || !y)
5549         return InvalidParameter;
5550
5551     *x = graphics->origin_x;
5552     *y = graphics->origin_y;
5553
5554     return Ok;
5555 }
5556
5557 GpStatus WINGDIPAPI GdipSetSmoothingMode(GpGraphics *graphics, SmoothingMode mode)
5558 {
5559     TRACE("(%p, %d)\n", graphics, mode);
5560
5561     if(!graphics)
5562         return InvalidParameter;
5563
5564     if(graphics->busy)
5565         return ObjectBusy;
5566
5567     graphics->smoothing = mode;
5568
5569     return Ok;
5570 }
5571
5572 GpStatus WINGDIPAPI GdipSetTextContrast(GpGraphics *graphics, UINT contrast)
5573 {
5574     TRACE("(%p, %d)\n", graphics, contrast);
5575
5576     if(!graphics)
5577         return InvalidParameter;
5578
5579     graphics->textcontrast = contrast;
5580
5581     return Ok;
5582 }
5583
5584 GpStatus WINGDIPAPI GdipSetTextRenderingHint(GpGraphics *graphics,
5585     TextRenderingHint hint)
5586 {
5587     TRACE("(%p, %d)\n", graphics, hint);
5588
5589     if(!graphics || hint > TextRenderingHintClearTypeGridFit)
5590         return InvalidParameter;
5591
5592     if(graphics->busy)
5593         return ObjectBusy;
5594
5595     graphics->texthint = hint;
5596
5597     return Ok;
5598 }
5599
5600 GpStatus WINGDIPAPI GdipSetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
5601 {
5602     TRACE("(%p, %p)\n", graphics, matrix);
5603
5604     if(!graphics || !matrix)
5605         return InvalidParameter;
5606
5607     if(graphics->busy)
5608         return ObjectBusy;
5609
5610     GdipDeleteMatrix(graphics->worldtrans);
5611     return GdipCloneMatrix(matrix, &graphics->worldtrans);
5612 }
5613
5614 GpStatus WINGDIPAPI GdipTranslateWorldTransform(GpGraphics *graphics, REAL dx,
5615     REAL dy, GpMatrixOrder order)
5616 {
5617     TRACE("(%p, %.2f, %.2f, %d)\n", graphics, dx, dy, order);
5618
5619     if(!graphics)
5620         return InvalidParameter;
5621
5622     if(graphics->busy)
5623         return ObjectBusy;
5624
5625     return GdipTranslateMatrix(graphics->worldtrans, dx, dy, order);
5626 }
5627
5628 /*****************************************************************************
5629  * GdipSetClipHrgn [GDIPLUS.@]
5630  */
5631 GpStatus WINGDIPAPI GdipSetClipHrgn(GpGraphics *graphics, HRGN hrgn, CombineMode mode)
5632 {
5633     GpRegion *region;
5634     GpStatus status;
5635
5636     TRACE("(%p, %p, %d)\n", graphics, hrgn, mode);
5637
5638     if(!graphics)
5639         return InvalidParameter;
5640
5641     status = GdipCreateRegionHrgn(hrgn, &region);
5642     if(status != Ok)
5643         return status;
5644
5645     status = GdipSetClipRegion(graphics, region, mode);
5646
5647     GdipDeleteRegion(region);
5648     return status;
5649 }
5650
5651 GpStatus WINGDIPAPI GdipSetClipPath(GpGraphics *graphics, GpPath *path, CombineMode mode)
5652 {
5653     TRACE("(%p, %p, %d)\n", graphics, path, mode);
5654
5655     if(!graphics)
5656         return InvalidParameter;
5657
5658     if(graphics->busy)
5659         return ObjectBusy;
5660
5661     return GdipCombineRegionPath(graphics->clip, path, mode);
5662 }
5663
5664 GpStatus WINGDIPAPI GdipSetClipRect(GpGraphics *graphics, REAL x, REAL y,
5665                                     REAL width, REAL height,
5666                                     CombineMode mode)
5667 {
5668     GpRectF rect;
5669
5670     TRACE("(%p, %.2f, %.2f, %.2f, %.2f, %d)\n", graphics, x, y, width, height, mode);
5671
5672     if(!graphics)
5673         return InvalidParameter;
5674
5675     if(graphics->busy)
5676         return ObjectBusy;
5677
5678     rect.X = x;
5679     rect.Y = y;
5680     rect.Width  = width;
5681     rect.Height = height;
5682
5683     return GdipCombineRegionRect(graphics->clip, &rect, mode);
5684 }
5685
5686 GpStatus WINGDIPAPI GdipSetClipRectI(GpGraphics *graphics, INT x, INT y,
5687                                      INT width, INT height,
5688                                      CombineMode mode)
5689 {
5690     TRACE("(%p, %d, %d, %d, %d, %d)\n", graphics, x, y, width, height, mode);
5691
5692     if(!graphics)
5693         return InvalidParameter;
5694
5695     if(graphics->busy)
5696         return ObjectBusy;
5697
5698     return GdipSetClipRect(graphics, (REAL)x, (REAL)y, (REAL)width, (REAL)height, mode);
5699 }
5700
5701 GpStatus WINGDIPAPI GdipSetClipRegion(GpGraphics *graphics, GpRegion *region,
5702                                       CombineMode mode)
5703 {
5704     TRACE("(%p, %p, %d)\n", graphics, region, mode);
5705
5706     if(!graphics || !region)
5707         return InvalidParameter;
5708
5709     if(graphics->busy)
5710         return ObjectBusy;
5711
5712     return GdipCombineRegionRegion(graphics->clip, region, mode);
5713 }
5714
5715 GpStatus WINGDIPAPI GdipSetMetafileDownLevelRasterizationLimit(GpMetafile *metafile,
5716     UINT limitDpi)
5717 {
5718     static int calls;
5719
5720     TRACE("(%p,%u)\n", metafile, limitDpi);
5721
5722     if(!(calls++))
5723         FIXME("not implemented\n");
5724
5725     return NotImplemented;
5726 }
5727
5728 GpStatus WINGDIPAPI GdipDrawPolygon(GpGraphics *graphics,GpPen *pen,GDIPCONST GpPointF *points,
5729     INT count)
5730 {
5731     INT save_state;
5732     POINT *pti;
5733
5734     TRACE("(%p, %p, %d)\n", graphics, points, count);
5735
5736     if(!graphics || !pen || count<=0)
5737         return InvalidParameter;
5738
5739     if(graphics->busy)
5740         return ObjectBusy;
5741
5742     if (!graphics->hdc)
5743     {
5744         FIXME("graphics object has no HDC\n");
5745         return Ok;
5746     }
5747
5748     pti = GdipAlloc(sizeof(POINT) * count);
5749
5750     save_state = prepare_dc(graphics, pen);
5751     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
5752
5753     transform_and_round_points(graphics, pti, (GpPointF*)points, count);
5754     Polygon(graphics->hdc, pti, count);
5755
5756     restore_dc(graphics, save_state);
5757     GdipFree(pti);
5758
5759     return Ok;
5760 }
5761
5762 GpStatus WINGDIPAPI GdipDrawPolygonI(GpGraphics *graphics,GpPen *pen,GDIPCONST GpPoint *points,
5763     INT count)
5764 {
5765     GpStatus ret;
5766     GpPointF *ptf;
5767     INT i;
5768
5769     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
5770
5771     if(count<=0)    return InvalidParameter;
5772     ptf = GdipAlloc(sizeof(GpPointF) * count);
5773
5774     for(i = 0;i < count; i++){
5775         ptf[i].X = (REAL)points[i].X;
5776         ptf[i].Y = (REAL)points[i].Y;
5777     }
5778
5779     ret = GdipDrawPolygon(graphics,pen,ptf,count);
5780     GdipFree(ptf);
5781
5782     return ret;
5783 }
5784
5785 GpStatus WINGDIPAPI GdipGetDpiX(GpGraphics *graphics, REAL* dpi)
5786 {
5787     TRACE("(%p, %p)\n", graphics, dpi);
5788
5789     if(!graphics || !dpi)
5790         return InvalidParameter;
5791
5792     if(graphics->busy)
5793         return ObjectBusy;
5794
5795     if (graphics->image)
5796         *dpi = graphics->image->xres;
5797     else
5798         *dpi = (REAL)GetDeviceCaps(graphics->hdc, LOGPIXELSX);
5799
5800     return Ok;
5801 }
5802
5803 GpStatus WINGDIPAPI GdipGetDpiY(GpGraphics *graphics, REAL* dpi)
5804 {
5805     TRACE("(%p, %p)\n", graphics, dpi);
5806
5807     if(!graphics || !dpi)
5808         return InvalidParameter;
5809
5810     if(graphics->busy)
5811         return ObjectBusy;
5812
5813     if (graphics->image)
5814         *dpi = graphics->image->yres;
5815     else
5816         *dpi = (REAL)GetDeviceCaps(graphics->hdc, LOGPIXELSY);
5817
5818     return Ok;
5819 }
5820
5821 GpStatus WINGDIPAPI GdipMultiplyWorldTransform(GpGraphics *graphics, GDIPCONST GpMatrix *matrix,
5822     GpMatrixOrder order)
5823 {
5824     GpMatrix m;
5825     GpStatus ret;
5826
5827     TRACE("(%p, %p, %d)\n", graphics, matrix, order);
5828
5829     if(!graphics || !matrix)
5830         return InvalidParameter;
5831
5832     if(graphics->busy)
5833         return ObjectBusy;
5834
5835     m = *(graphics->worldtrans);
5836
5837     ret = GdipMultiplyMatrix(&m, matrix, order);
5838     if(ret == Ok)
5839         *(graphics->worldtrans) = m;
5840
5841     return ret;
5842 }
5843
5844 /* Color used to fill bitmaps so we can tell which parts have been drawn over by gdi32. */
5845 static const COLORREF DC_BACKGROUND_KEY = 0x0c0b0d;
5846
5847 GpStatus WINGDIPAPI GdipGetDC(GpGraphics *graphics, HDC *hdc)
5848 {
5849     GpStatus stat=Ok;
5850
5851     TRACE("(%p, %p)\n", graphics, hdc);
5852
5853     if(!graphics || !hdc)
5854         return InvalidParameter;
5855
5856     if(graphics->busy)
5857         return ObjectBusy;
5858
5859     if (graphics->image && graphics->image->type == ImageTypeMetafile)
5860     {
5861         stat = METAFILE_GetDC((GpMetafile*)graphics->image, hdc);
5862     }
5863     else if (!graphics->hdc ||
5864         (graphics->image && graphics->image->type == ImageTypeBitmap && ((GpBitmap*)graphics->image)->format & PixelFormatAlpha))
5865     {
5866         /* Create a fake HDC and fill it with a constant color. */
5867         HDC temp_hdc;
5868         HBITMAP hbitmap;
5869         GpRectF bounds;
5870         BITMAPINFOHEADER bmih;
5871         int i;
5872
5873         stat = get_graphics_bounds(graphics, &bounds);
5874         if (stat != Ok)
5875             return stat;
5876
5877         graphics->temp_hbitmap_width = bounds.Width;
5878         graphics->temp_hbitmap_height = bounds.Height;
5879
5880         bmih.biSize = sizeof(bmih);
5881         bmih.biWidth = graphics->temp_hbitmap_width;
5882         bmih.biHeight = -graphics->temp_hbitmap_height;
5883         bmih.biPlanes = 1;
5884         bmih.biBitCount = 32;
5885         bmih.biCompression = BI_RGB;
5886         bmih.biSizeImage = 0;
5887         bmih.biXPelsPerMeter = 0;
5888         bmih.biYPelsPerMeter = 0;
5889         bmih.biClrUsed = 0;
5890         bmih.biClrImportant = 0;
5891
5892         hbitmap = CreateDIBSection(NULL, (BITMAPINFO*)&bmih, DIB_RGB_COLORS,
5893             (void**)&graphics->temp_bits, NULL, 0);
5894         if (!hbitmap)
5895             return GenericError;
5896
5897         temp_hdc = CreateCompatibleDC(0);
5898         if (!temp_hdc)
5899         {
5900             DeleteObject(hbitmap);
5901             return GenericError;
5902         }
5903
5904         for (i=0; i<(graphics->temp_hbitmap_width * graphics->temp_hbitmap_height); i++)
5905             ((DWORD*)graphics->temp_bits)[i] = DC_BACKGROUND_KEY;
5906
5907         SelectObject(temp_hdc, hbitmap);
5908
5909         graphics->temp_hbitmap = hbitmap;
5910         *hdc = graphics->temp_hdc = temp_hdc;
5911     }
5912     else
5913     {
5914         *hdc = graphics->hdc;
5915     }
5916
5917     if (stat == Ok)
5918         graphics->busy = TRUE;
5919
5920     return stat;
5921 }
5922
5923 GpStatus WINGDIPAPI GdipReleaseDC(GpGraphics *graphics, HDC hdc)
5924 {
5925     GpStatus stat=Ok;
5926
5927     TRACE("(%p, %p)\n", graphics, hdc);
5928
5929     if(!graphics || !hdc || !graphics->busy)
5930         return InvalidParameter;
5931
5932     if (graphics->image && graphics->image->type == ImageTypeMetafile)
5933     {
5934         stat = METAFILE_ReleaseDC((GpMetafile*)graphics->image, hdc);
5935     }
5936     else if (graphics->temp_hdc == hdc)
5937     {
5938         DWORD* pos;
5939         int i;
5940
5941         /* Find the pixels that have changed, and mark them as opaque. */
5942         pos = (DWORD*)graphics->temp_bits;
5943         for (i=0; i<(graphics->temp_hbitmap_width * graphics->temp_hbitmap_height); i++)
5944         {
5945             if (*pos != DC_BACKGROUND_KEY)
5946             {
5947                 *pos |= 0xff000000;
5948             }
5949             pos++;
5950         }
5951
5952         /* Write the changed pixels to the real target. */
5953         alpha_blend_pixels(graphics, 0, 0, graphics->temp_bits,
5954             graphics->temp_hbitmap_width, graphics->temp_hbitmap_height,
5955             graphics->temp_hbitmap_width * 4);
5956
5957         /* Clean up. */
5958         DeleteDC(graphics->temp_hdc);
5959         DeleteObject(graphics->temp_hbitmap);
5960         graphics->temp_hdc = NULL;
5961         graphics->temp_hbitmap = NULL;
5962     }
5963     else if (hdc != graphics->hdc)
5964     {
5965         stat = InvalidParameter;
5966     }
5967
5968     if (stat == Ok)
5969         graphics->busy = FALSE;
5970
5971     return stat;
5972 }
5973
5974 GpStatus WINGDIPAPI GdipGetClip(GpGraphics *graphics, GpRegion *region)
5975 {
5976     GpRegion *clip;
5977     GpStatus status;
5978
5979     TRACE("(%p, %p)\n", graphics, region);
5980
5981     if(!graphics || !region)
5982         return InvalidParameter;
5983
5984     if(graphics->busy)
5985         return ObjectBusy;
5986
5987     if((status = GdipCloneRegion(graphics->clip, &clip)) != Ok)
5988         return status;
5989
5990     /* free everything except root node and header */
5991     delete_element(&region->node);
5992     memcpy(region, clip, sizeof(GpRegion));
5993     GdipFree(clip);
5994
5995     return Ok;
5996 }
5997
5998 static GpStatus get_graphics_transform(GpGraphics *graphics, GpCoordinateSpace dst_space,
5999         GpCoordinateSpace src_space, GpMatrix **matrix)
6000 {
6001     GpStatus stat = GdipCreateMatrix(matrix);
6002     REAL unitscale;
6003
6004     if (dst_space != src_space && stat == Ok)
6005     {
6006         unitscale = convert_unit(graphics_res(graphics), graphics->unit);
6007
6008         if(graphics->unit != UnitDisplay)
6009             unitscale *= graphics->scale;
6010
6011         /* transform from src_space to CoordinateSpacePage */
6012         switch (src_space)
6013         {
6014         case CoordinateSpaceWorld:
6015             GdipMultiplyMatrix(*matrix, graphics->worldtrans, MatrixOrderAppend);
6016             break;
6017         case CoordinateSpacePage:
6018             break;
6019         case CoordinateSpaceDevice:
6020             GdipScaleMatrix(*matrix, 1.0/unitscale, 1.0/unitscale, MatrixOrderAppend);
6021             break;
6022         }
6023
6024         /* transform from CoordinateSpacePage to dst_space */
6025         switch (dst_space)
6026         {
6027         case CoordinateSpaceWorld:
6028             {
6029                 GpMatrix *inverted_transform;
6030                 stat = GdipCloneMatrix(graphics->worldtrans, &inverted_transform);
6031                 if (stat == Ok)
6032                 {
6033                     stat = GdipInvertMatrix(inverted_transform);
6034                     if (stat == Ok)
6035                         GdipMultiplyMatrix(*matrix, inverted_transform, MatrixOrderAppend);
6036                     GdipDeleteMatrix(inverted_transform);
6037                 }
6038                 break;
6039             }
6040         case CoordinateSpacePage:
6041             break;
6042         case CoordinateSpaceDevice:
6043             GdipScaleMatrix(*matrix, unitscale, unitscale, MatrixOrderAppend);
6044             break;
6045         }
6046     }
6047     return stat;
6048 }
6049
6050 GpStatus WINGDIPAPI GdipTransformPoints(GpGraphics *graphics, GpCoordinateSpace dst_space,
6051                                         GpCoordinateSpace src_space, GpPointF *points, INT count)
6052 {
6053     GpMatrix *matrix;
6054     GpStatus stat;
6055
6056     if(!graphics || !points || count <= 0)
6057         return InvalidParameter;
6058
6059     if(graphics->busy)
6060         return ObjectBusy;
6061
6062     TRACE("(%p, %d, %d, %p, %d)\n", graphics, dst_space, src_space, points, count);
6063
6064     if (src_space == dst_space) return Ok;
6065
6066     stat = get_graphics_transform(graphics, dst_space, src_space, &matrix);
6067
6068     if (stat == Ok)
6069     {
6070         stat = GdipTransformMatrixPoints(matrix, points, count);
6071
6072         GdipDeleteMatrix(matrix);
6073     }
6074
6075     return stat;
6076 }
6077
6078 GpStatus WINGDIPAPI GdipTransformPointsI(GpGraphics *graphics, GpCoordinateSpace dst_space,
6079                                          GpCoordinateSpace src_space, GpPoint *points, INT count)
6080 {
6081     GpPointF *pointsF;
6082     GpStatus ret;
6083     INT i;
6084
6085     TRACE("(%p, %d, %d, %p, %d)\n", graphics, dst_space, src_space, points, count);
6086
6087     if(count <= 0)
6088         return InvalidParameter;
6089
6090     pointsF = GdipAlloc(sizeof(GpPointF) * count);
6091     if(!pointsF)
6092         return OutOfMemory;
6093
6094     for(i = 0; i < count; i++){
6095         pointsF[i].X = (REAL)points[i].X;
6096         pointsF[i].Y = (REAL)points[i].Y;
6097     }
6098
6099     ret = GdipTransformPoints(graphics, dst_space, src_space, pointsF, count);
6100
6101     if(ret == Ok)
6102         for(i = 0; i < count; i++){
6103             points[i].X = roundr(pointsF[i].X);
6104             points[i].Y = roundr(pointsF[i].Y);
6105         }
6106     GdipFree(pointsF);
6107
6108     return ret;
6109 }
6110
6111 HPALETTE WINGDIPAPI GdipCreateHalftonePalette(void)
6112 {
6113     static int calls;
6114
6115     TRACE("\n");
6116
6117     if (!calls++)
6118       FIXME("stub\n");
6119
6120     return NULL;
6121 }
6122
6123 /*****************************************************************************
6124  * GdipTranslateClip [GDIPLUS.@]
6125  */
6126 GpStatus WINGDIPAPI GdipTranslateClip(GpGraphics *graphics, REAL dx, REAL dy)
6127 {
6128     TRACE("(%p, %.2f, %.2f)\n", graphics, dx, dy);
6129
6130     if(!graphics)
6131         return InvalidParameter;
6132
6133     if(graphics->busy)
6134         return ObjectBusy;
6135
6136     return GdipTranslateRegion(graphics->clip, dx, dy);
6137 }
6138
6139 /*****************************************************************************
6140  * GdipTranslateClipI [GDIPLUS.@]
6141  */
6142 GpStatus WINGDIPAPI GdipTranslateClipI(GpGraphics *graphics, INT dx, INT dy)
6143 {
6144     TRACE("(%p, %d, %d)\n", graphics, dx, dy);
6145
6146     if(!graphics)
6147         return InvalidParameter;
6148
6149     if(graphics->busy)
6150         return ObjectBusy;
6151
6152     return GdipTranslateRegion(graphics->clip, (REAL)dx, (REAL)dy);
6153 }
6154
6155
6156 /*****************************************************************************
6157  * GdipMeasureDriverString [GDIPLUS.@]
6158  */
6159 GpStatus WINGDIPAPI GdipMeasureDriverString(GpGraphics *graphics, GDIPCONST UINT16 *text, INT length,
6160                                             GDIPCONST GpFont *font, GDIPCONST PointF *positions,
6161                                             INT flags, GDIPCONST GpMatrix *matrix, RectF *boundingBox)
6162 {
6163     static const INT unsupported_flags = ~(DriverStringOptionsCmapLookup|DriverStringOptionsRealizedAdvance);
6164     HFONT hfont;
6165     HDC hdc;
6166     REAL min_x, min_y, max_x, max_y, x, y;
6167     int i;
6168     TEXTMETRICW textmetric;
6169     const WORD *glyph_indices;
6170     WORD *dynamic_glyph_indices=NULL;
6171     REAL rel_width, rel_height, ascent, descent;
6172     GpPointF pt[3];
6173
6174     TRACE("(%p %p %d %p %p %d %p %p)\n", graphics, text, length, font, positions, flags, matrix, boundingBox);
6175
6176     if (!graphics || !text || !font || !positions || !boundingBox)
6177         return InvalidParameter;
6178
6179     if (length == -1)
6180         length = strlenW(text);
6181
6182     if (length == 0)
6183     {
6184         boundingBox->X = 0.0;
6185         boundingBox->Y = 0.0;
6186         boundingBox->Width = 0.0;
6187         boundingBox->Height = 0.0;
6188     }
6189
6190     if (flags & unsupported_flags)
6191         FIXME("Ignoring flags %x\n", flags & unsupported_flags);
6192
6193     if (matrix)
6194         FIXME("Ignoring matrix\n");
6195
6196     get_font_hfont(graphics, font, &hfont);
6197
6198     hdc = CreateCompatibleDC(0);
6199     SelectObject(hdc, hfont);
6200
6201     GetTextMetricsW(hdc, &textmetric);
6202
6203     pt[0].X = 0.0;
6204     pt[0].Y = 0.0;
6205     pt[1].X = 1.0;
6206     pt[1].Y = 0.0;
6207     pt[2].X = 0.0;
6208     pt[2].Y = 1.0;
6209     GdipTransformPoints(graphics, CoordinateSpaceDevice, CoordinateSpaceWorld, pt, 3);
6210     rel_width = sqrt((pt[1].Y-pt[0].Y)*(pt[1].Y-pt[0].Y)+
6211                      (pt[1].X-pt[0].X)*(pt[1].X-pt[0].X));
6212     rel_height = sqrt((pt[2].Y-pt[0].Y)*(pt[2].Y-pt[0].Y)+
6213                       (pt[2].X-pt[0].X)*(pt[2].X-pt[0].X));
6214
6215     if (flags & DriverStringOptionsCmapLookup)
6216     {
6217         glyph_indices = dynamic_glyph_indices = GdipAlloc(sizeof(WORD) * length);
6218         if (!glyph_indices)
6219         {
6220             DeleteDC(hdc);
6221             DeleteObject(hfont);
6222             return OutOfMemory;
6223         }
6224
6225         GetGlyphIndicesW(hdc, text, length, dynamic_glyph_indices, 0);
6226     }
6227     else
6228         glyph_indices = text;
6229
6230     min_x = max_x = x = positions[0].X;
6231     min_y = max_y = y = positions[0].Y;
6232
6233     ascent = textmetric.tmAscent / rel_height;
6234     descent = textmetric.tmDescent / rel_height;
6235
6236     for (i=0; i<length; i++)
6237     {
6238         int char_width;
6239         ABC abc;
6240
6241         if (!(flags & DriverStringOptionsRealizedAdvance))
6242         {
6243             x = positions[i].X;
6244             y = positions[i].Y;
6245         }
6246
6247         GetCharABCWidthsW(hdc, glyph_indices[i], glyph_indices[i], &abc);
6248         char_width = abc.abcA + abc.abcB + abc.abcB;
6249
6250         if (min_y > y - ascent) min_y = y - ascent;
6251         if (max_y < y + descent) max_y = y + descent;
6252         if (min_x > x) min_x = x;
6253
6254         x += char_width / rel_width;
6255
6256         if (max_x < x) max_x = x;
6257     }
6258
6259     GdipFree(dynamic_glyph_indices);
6260     DeleteDC(hdc);
6261     DeleteObject(hfont);
6262
6263     boundingBox->X = min_x;
6264     boundingBox->Y = min_y;
6265     boundingBox->Width = max_x - min_x;
6266     boundingBox->Height = max_y - min_y;
6267
6268     return Ok;
6269 }
6270
6271 static GpStatus GDI32_GdipDrawDriverString(GpGraphics *graphics, GDIPCONST UINT16 *text, INT length,
6272                                      GDIPCONST GpFont *font, GDIPCONST GpBrush *brush,
6273                                      GDIPCONST PointF *positions, INT flags,
6274                                      GDIPCONST GpMatrix *matrix )
6275 {
6276     static const INT unsupported_flags = ~(DriverStringOptionsRealizedAdvance|DriverStringOptionsCmapLookup);
6277     INT save_state;
6278     GpPointF pt;
6279     HFONT hfont;
6280     UINT eto_flags=0;
6281
6282     if (flags & unsupported_flags)
6283         FIXME("Ignoring flags %x\n", flags & unsupported_flags);
6284
6285     if (matrix)
6286         FIXME("Ignoring matrix\n");
6287
6288     if (!(flags & DriverStringOptionsCmapLookup))
6289         eto_flags |= ETO_GLYPH_INDEX;
6290
6291     save_state = SaveDC(graphics->hdc);
6292     SetBkMode(graphics->hdc, TRANSPARENT);
6293     SetTextColor(graphics->hdc, get_gdi_brush_color(brush));
6294
6295     pt = positions[0];
6296     GdipTransformPoints(graphics, CoordinateSpaceDevice, CoordinateSpaceWorld, &pt, 1);
6297
6298     get_font_hfont(graphics, font, &hfont);
6299     SelectObject(graphics->hdc, hfont);
6300
6301     SetTextAlign(graphics->hdc, TA_BASELINE|TA_LEFT);
6302
6303     ExtTextOutW(graphics->hdc, roundr(pt.X), roundr(pt.Y), eto_flags, NULL, text, length, NULL);
6304
6305     RestoreDC(graphics->hdc, save_state);
6306
6307     DeleteObject(hfont);
6308
6309     return Ok;
6310 }
6311
6312 static GpStatus SOFTWARE_GdipDrawDriverString(GpGraphics *graphics, GDIPCONST UINT16 *text, INT length,
6313                                          GDIPCONST GpFont *font, GDIPCONST GpBrush *brush,
6314                                          GDIPCONST PointF *positions, INT flags,
6315                                          GDIPCONST GpMatrix *matrix )
6316 {
6317     static const INT unsupported_flags = ~(DriverStringOptionsCmapLookup|DriverStringOptionsRealizedAdvance);
6318     GpStatus stat;
6319     PointF *real_positions, real_position;
6320     POINT *pti;
6321     HFONT hfont;
6322     HDC hdc;
6323     int min_x=INT_MAX, min_y=INT_MAX, max_x=INT_MIN, max_y=INT_MIN, i, x, y;
6324     DWORD max_glyphsize=0;
6325     GLYPHMETRICS glyphmetrics;
6326     static const MAT2 identity = {{0,1}, {0,0}, {0,0}, {0,1}};
6327     BYTE *glyph_mask;
6328     BYTE *text_mask;
6329     int text_mask_stride;
6330     BYTE *pixel_data;
6331     int pixel_data_stride;
6332     GpRect pixel_area;
6333     UINT ggo_flags = GGO_GRAY8_BITMAP;
6334
6335     if (length <= 0)
6336         return Ok;
6337
6338     if (!(flags & DriverStringOptionsCmapLookup))
6339         ggo_flags |= GGO_GLYPH_INDEX;
6340
6341     if (flags & unsupported_flags)
6342         FIXME("Ignoring flags %x\n", flags & unsupported_flags);
6343
6344     if (matrix)
6345         FIXME("Ignoring matrix\n");
6346
6347     pti = GdipAlloc(sizeof(POINT) * length);
6348     if (!pti)
6349         return OutOfMemory;
6350
6351     if (flags & DriverStringOptionsRealizedAdvance)
6352     {
6353         real_position = positions[0];
6354
6355         transform_and_round_points(graphics, pti, &real_position, 1);
6356     }
6357     else
6358     {
6359         real_positions = GdipAlloc(sizeof(PointF) * length);
6360         if (!real_positions)
6361         {
6362             GdipFree(pti);
6363             return OutOfMemory;
6364         }
6365
6366         memcpy(real_positions, positions, sizeof(PointF) * length);
6367
6368         transform_and_round_points(graphics, pti, real_positions, length);
6369
6370         GdipFree(real_positions);
6371     }
6372
6373     get_font_hfont(graphics, font, &hfont);
6374
6375     hdc = CreateCompatibleDC(0);
6376     SelectObject(hdc, hfont);
6377
6378     /* Get the boundaries of the text to be drawn */
6379     for (i=0; i<length; i++)
6380     {
6381         DWORD glyphsize;
6382         int left, top, right, bottom;
6383
6384         glyphsize = GetGlyphOutlineW(hdc, text[i], ggo_flags,
6385             &glyphmetrics, 0, NULL, &identity);
6386
6387         if (glyphsize == GDI_ERROR)
6388         {
6389             ERR("GetGlyphOutlineW failed\n");
6390             GdipFree(pti);
6391             DeleteDC(hdc);
6392             DeleteObject(hfont);
6393             return GenericError;
6394         }
6395
6396         if (glyphsize > max_glyphsize)
6397             max_glyphsize = glyphsize;
6398
6399         left = pti[i].x + glyphmetrics.gmptGlyphOrigin.x;
6400         top = pti[i].y - glyphmetrics.gmptGlyphOrigin.y;
6401         right = pti[i].x + glyphmetrics.gmptGlyphOrigin.x + glyphmetrics.gmBlackBoxX;
6402         bottom = pti[i].y - glyphmetrics.gmptGlyphOrigin.y + glyphmetrics.gmBlackBoxY;
6403
6404         if (left < min_x) min_x = left;
6405         if (top < min_y) min_y = top;
6406         if (right > max_x) max_x = right;
6407         if (bottom > max_y) max_y = bottom;
6408
6409         if (i+1 < length && (flags & DriverStringOptionsRealizedAdvance) == DriverStringOptionsRealizedAdvance)
6410         {
6411             pti[i+1].x = pti[i].x + glyphmetrics.gmCellIncX;
6412             pti[i+1].y = pti[i].y + glyphmetrics.gmCellIncY;
6413         }
6414     }
6415
6416     glyph_mask = GdipAlloc(max_glyphsize);
6417     text_mask = GdipAlloc((max_x - min_x) * (max_y - min_y));
6418     text_mask_stride = max_x - min_x;
6419
6420     if (!(glyph_mask && text_mask))
6421     {
6422         GdipFree(glyph_mask);
6423         GdipFree(text_mask);
6424         GdipFree(pti);
6425         DeleteDC(hdc);
6426         DeleteObject(hfont);
6427         return OutOfMemory;
6428     }
6429
6430     /* Generate a mask for the text */
6431     for (i=0; i<length; i++)
6432     {
6433         int left, top, stride;
6434
6435         GetGlyphOutlineW(hdc, text[i], ggo_flags,
6436             &glyphmetrics, max_glyphsize, glyph_mask, &identity);
6437
6438         left = pti[i].x + glyphmetrics.gmptGlyphOrigin.x;
6439         top = pti[i].y - glyphmetrics.gmptGlyphOrigin.y;
6440         stride = (glyphmetrics.gmBlackBoxX + 3) & (~3);
6441
6442         for (y=0; y<glyphmetrics.gmBlackBoxY; y++)
6443         {
6444             BYTE *glyph_val = glyph_mask + y * stride;
6445             BYTE *text_val = text_mask + (left - min_x) + (top - min_y + y) * text_mask_stride;
6446             for (x=0; x<glyphmetrics.gmBlackBoxX; x++)
6447             {
6448                 *text_val = min(64, *text_val + *glyph_val);
6449                 glyph_val++;
6450                 text_val++;
6451             }
6452         }
6453     }
6454
6455     GdipFree(pti);
6456     DeleteDC(hdc);
6457     DeleteObject(hfont);
6458     GdipFree(glyph_mask);
6459
6460     /* get the brush data */
6461     pixel_data = GdipAlloc(4 * (max_x - min_x) * (max_y - min_y));
6462     if (!pixel_data)
6463     {
6464         GdipFree(text_mask);
6465         return OutOfMemory;
6466     }
6467
6468     pixel_area.X = min_x;
6469     pixel_area.Y = min_y;
6470     pixel_area.Width = max_x - min_x;
6471     pixel_area.Height = max_y - min_y;
6472     pixel_data_stride = pixel_area.Width * 4;
6473
6474     stat = brush_fill_pixels(graphics, (GpBrush*)brush, (DWORD*)pixel_data, &pixel_area, pixel_area.Width);
6475     if (stat != Ok)
6476     {
6477         GdipFree(text_mask);
6478         GdipFree(pixel_data);
6479         return stat;
6480     }
6481
6482     /* multiply the brush data by the mask */
6483     for (y=0; y<pixel_area.Height; y++)
6484     {
6485         BYTE *text_val = text_mask + text_mask_stride * y;
6486         BYTE *pixel_val = pixel_data + pixel_data_stride * y + 3;
6487         for (x=0; x<pixel_area.Width; x++)
6488         {
6489             *pixel_val = (*pixel_val) * (*text_val) / 64;
6490             text_val++;
6491             pixel_val+=4;
6492         }
6493     }
6494
6495     GdipFree(text_mask);
6496
6497     /* draw the result */
6498     stat = alpha_blend_pixels(graphics, min_x, min_y, pixel_data, pixel_area.Width,
6499         pixel_area.Height, pixel_data_stride);
6500
6501     GdipFree(pixel_data);
6502
6503     return stat;
6504 }
6505
6506 /*****************************************************************************
6507  * GdipDrawDriverString [GDIPLUS.@]
6508  */
6509 GpStatus WINGDIPAPI GdipDrawDriverString(GpGraphics *graphics, GDIPCONST UINT16 *text, INT length,
6510                                          GDIPCONST GpFont *font, GDIPCONST GpBrush *brush,
6511                                          GDIPCONST PointF *positions, INT flags,
6512                                          GDIPCONST GpMatrix *matrix )
6513 {
6514     GpStatus stat=NotImplemented;
6515
6516     TRACE("(%p %s %p %p %p %d %p)\n", graphics, debugstr_wn(text, length), font, brush, positions, flags, matrix);
6517
6518     if (!graphics || !text || !font || !brush || !positions)
6519         return InvalidParameter;
6520
6521     if (length == -1)
6522         length = strlenW(text);
6523
6524     if (graphics->hdc &&
6525         ((flags & DriverStringOptionsRealizedAdvance) || length <= 1) &&
6526         brush->bt == BrushTypeSolidColor &&
6527         (((GpSolidFill*)brush)->color & 0xff000000) == 0xff000000)
6528         stat = GDI32_GdipDrawDriverString(graphics, text, length, font, brush,
6529             positions, flags, matrix);
6530
6531     if (stat == NotImplemented)
6532         stat = SOFTWARE_GdipDrawDriverString(graphics, text, length, font, brush,
6533             positions, flags, matrix);
6534
6535     return stat;
6536 }
6537
6538 GpStatus WINGDIPAPI GdipRecordMetafileStream(IStream *stream, HDC hdc, EmfType type, GDIPCONST GpRect *frameRect,
6539                                         MetafileFrameUnit frameUnit, GDIPCONST WCHAR *desc, GpMetafile **metafile)
6540 {
6541     FIXME("(%p %p %d %p %d %p %p): stub\n", stream, hdc, type, frameRect, frameUnit, desc, metafile);
6542     return NotImplemented;
6543 }
6544
6545 /*****************************************************************************
6546  * GdipIsVisibleClipEmpty [GDIPLUS.@]
6547  */
6548 GpStatus WINGDIPAPI GdipIsVisibleClipEmpty(GpGraphics *graphics, BOOL *res)
6549 {
6550     GpStatus stat;
6551     GpRegion* rgn;
6552
6553     TRACE("(%p, %p)\n", graphics, res);
6554
6555     if((stat = GdipCreateRegion(&rgn)) != Ok)
6556         return stat;
6557
6558     if((stat = get_visible_clip_region(graphics, rgn)) != Ok)
6559         goto cleanup;
6560
6561     stat = GdipIsEmptyRegion(rgn, graphics, res);
6562
6563 cleanup:
6564     GdipDeleteRegion(rgn);
6565     return stat;
6566 }
6567
6568 GpStatus WINGDIPAPI GdipResetPageTransform(GpGraphics *graphics)
6569 {
6570     static int calls;
6571
6572     TRACE("(%p) stub\n", graphics);
6573
6574     if(!(calls++))
6575         FIXME("not implemented\n");
6576
6577     return NotImplemented;
6578 }