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 INT prepare_dc(GpGraphics *graphics, GpPen *pen)
  88 {
  89     HPEN gdipen;
  90     REAL width;
  91     INT save_state = SaveDC(graphics->hdc), i, numdashes;
  92     GpPointF pt[2];
  93     DWORD dash_array[MAX_DASHLEN];
  94
  95     EndPath(graphics->hdc);
  96
  97     if(pen->unit == UnitPixel){
  98         width = pen->width;
  99     }
 100     else{
 101         /* Get an estimate for the amount the pen width is affected by the world
 102          * transform. (This is similar to what some of the wine drivers do.) */
 103         pt[0].X = 0.0;
 104         pt[0].Y = 0.0;
 105         pt[1].X = 1.0;
 106         pt[1].Y = 1.0;
 107         GdipTransformMatrixPoints(graphics->worldtrans, pt, 2);
 108         width = sqrt((pt[1].X - pt[0].X) * (pt[1].X - pt[0].X) +
 109                      (pt[1].Y - pt[0].Y) * (pt[1].Y - pt[0].Y)) / sqrt(2.0);
 110
 111         width *= pen->width * convert_unit(graphics->hdc,
 112                               pen->unit == UnitWorld ? graphics->unit : pen->unit);
 113     }
 114
 115     if(pen->dash == DashStyleCustom){
 116         numdashes = min(pen->numdashes, MAX_DASHLEN);
 117
 118         TRACE("dashes are: ");
 119         for(i = 0; i < numdashes; i++){
 120             dash_array[i] = roundr(width * pen->dashes[i]);
 121             TRACE("%d, ", dash_array[i]);
 122         }
 123         TRACE("\n and the pen style is %x\n", pen->style);
 124
 125         gdipen = ExtCreatePen(pen->style, roundr(width), &pen->brush->lb,
 126                               numdashes, dash_array);
 127     }
 128     else
 129         gdipen = ExtCreatePen(pen->style, roundr(width), &pen->brush->lb, 0, NULL);
 130
 131     SelectObject(graphics->hdc, gdipen);
 132
 133     return save_state;
 134 }
 135
 136 static void restore_dc(GpGraphics *graphics, INT state)
 137 {
 138     DeleteObject(SelectObject(graphics->hdc, GetStockObject(NULL_PEN)));
 139     RestoreDC(graphics->hdc, state);
 140 }
 141
 142 /* This helper applies all the changes that the points listed in ptf need in
 143  * order to be drawn on the device context.  In the end, this should include at
 144  * least:
 145  *  -scaling by page unit
 146  *  -applying world transformation
 147  *  -converting from float to int
 148  * Native gdiplus uses gdi32 to do all this (via SetMapMode, SetViewportExtEx,
 149  * SetWindowExtEx, SetWorldTransform, etc.) but we cannot because we are using
 150  * gdi to draw, and these functions would irreparably mess with line widths.
 151  */
 152 static void transform_and_round_points(GpGraphics *graphics, POINT *pti,
 153     GpPointF *ptf, INT count)
 154 {
 155     REAL unitscale;
 156     GpMatrix *matrix;
 157     int i;
 158
 159     unitscale = convert_unit(graphics->hdc, graphics->unit);
 160
 161     /* apply page scale */
 162     if(graphics->unit != UnitDisplay)
 163         unitscale *= graphics->scale;
 164
 165     GdipCloneMatrix(graphics->worldtrans, &matrix);
 166     GdipScaleMatrix(matrix, unitscale, unitscale, MatrixOrderAppend);
 167     GdipTransformMatrixPoints(matrix, ptf, count);
 168     GdipDeleteMatrix(matrix);
 169
 170     for(i = 0; i < count; i++){
 171         pti[i].x = roundr(ptf[i].X);
 172         pti[i].y = roundr(ptf[i].Y);
 173     }
 174 }
 175
 176 static ARGB blend_colors(ARGB start, ARGB end, REAL position)
 177 {
 178     ARGB result=0;
 179     ARGB i;
 180     for (i=0xff; i<=0xff0000; i = i << 8)
 181         result |= (int)((start&i)*(1.0f - position)+(end&i)*(position))&i;
 182     return result;
 183 }
 184
 185 static ARGB blend_line_gradient(GpLineGradient* brush, REAL position)
 186 {
 187     REAL blendfac;
 188
 189     /* clamp to between 0.0 and 1.0, using the wrap mode */
 190     if (brush->wrap == WrapModeTile)
 191     {
 192         position = fmodf(position, 1.0f);
 193         if (position < 0.0f) position += 1.0f;
 194     }
 195     else /* WrapModeFlip* */
 196     {
 197         position = fmodf(position, 2.0f);
 198         if (position < 0.0f) position += 2.0f;
 199         if (position > 1.0f) position = 2.0f - position;
 200     }
 201
 202     if (brush->blendcount == 1)
 203         blendfac = position;
 204     else
 205     {
 206         int i=1;
 207         REAL left_blendpos, left_blendfac, right_blendpos, right_blendfac;
 208         REAL range;
 209
 210         /* locate the blend positions surrounding this position */
 211         while (position > brush->blendpos[i])
 212             i++;
 213
 214         /* interpolate between the blend positions */
 215         left_blendpos = brush->blendpos[i-1];
 216         left_blendfac = brush->blendfac[i-1];
 217         right_blendpos = brush->blendpos[i];
 218         right_blendfac = brush->blendfac[i];
 219         range = right_blendpos - left_blendpos;
 220         blendfac = (left_blendfac * (right_blendpos - position) +
 221                     right_blendfac * (position - left_blendpos)) / range;
 222     }
 223     return blend_colors(brush->startcolor, brush->endcolor, blendfac);
 224 }
 225
 226 static void brush_fill_path(GpGraphics *graphics, GpBrush* brush)
 227 {
 228     switch (brush->bt)
 229     {
 230     case BrushTypeLinearGradient:
 231     {
 232         GpLineGradient *line = (GpLineGradient*)brush;
 233         RECT rc;
 234
 235         SelectClipPath(graphics->hdc, RGN_AND);
 236         if (GetClipBox(graphics->hdc, &rc) != NULLREGION)
 237         {
 238             GpPointF endpointsf[2];
 239             POINT endpointsi[2];
 240             POINT poly[4];
 241
 242             SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
 243
 244             endpointsf[0] = line->startpoint;
 245             endpointsf[1] = line->endpoint;
 246             transform_and_round_points(graphics, endpointsi, endpointsf, 2);
 247
 248             if (abs(endpointsi[0].x-endpointsi[1].x) > abs(endpointsi[0].y-endpointsi[1].y))
 249             {
 250                 /* vertical-ish gradient */
 251                 int startx, endx; /* x co-ordinates of endpoints shifted to intersect the top of the visible rectangle */
 252                 int startbottomx; /* x co-ordinate of start point shifted to intersect the bottom of the visible rectangle */
 253                 int width;
 254                 COLORREF col;
 255                 HBRUSH hbrush, hprevbrush;
 256                 int leftx, rightx; /* x co-ordinates where the leftmost and rightmost gradient lines hit the top of the visible rectangle */
 257                 int x;
 258                 int tilt; /* horizontal distance covered by a gradient line */
 259
 260                 startx = roundr((rc.top - endpointsf[0].Y) * (endpointsf[1].Y - endpointsf[0].Y) / (endpointsf[0].X - endpointsf[1].X) + endpointsf[0].X);
 261                 endx = roundr((rc.top - endpointsf[1].Y) * (endpointsf[1].Y - endpointsf[0].Y) / (endpointsf[0].X - endpointsf[1].X) + endpointsf[1].X);
 262                 width = endx - startx;
 263                 startbottomx = roundr((rc.bottom - endpointsf[0].Y) * (endpointsf[1].Y - endpointsf[0].Y) / (endpointsf[0].X - endpointsf[1].X) + endpointsf[0].X);
 264                 tilt = startx - startbottomx;
 265
 266                 if (startx >= startbottomx)
 267                 {
 268                     leftx = rc.left;
 269                     rightx = rc.right + tilt;
 270                 }
 271                 else
 272                 {
 273                     leftx = rc.left + tilt;
 274                     rightx = rc.right;
 275                 }
 276
 277                 poly[0].y = rc.bottom;
 278                 poly[1].y = rc.top;
 279                 poly[2].y = rc.top;
 280                 poly[3].y = rc.bottom;
 281
 282                 for (x=leftx; x<=rightx; x++)
 283                 {
 284                     ARGB argb = blend_line_gradient(line, (x-startx)/(REAL)width);
 285                     col = ARGB2COLORREF(argb);
 286                     hbrush = CreateSolidBrush(col);
 287                     hprevbrush = SelectObject(graphics->hdc, hbrush);
 288                     poly[0].x = x - tilt - 1;
 289                     poly[1].x = x - 1;
 290                     poly[2].x = x;
 291                     poly[3].x = x - tilt;
 292                     Polygon(graphics->hdc, poly, 4);
 293                     SelectObject(graphics->hdc, hprevbrush);
 294                     DeleteObject(hbrush);
 295                 }
 296             }
 297             else if (endpointsi[0].y != endpointsi[1].y)
 298             {
 299                 /* horizontal-ish gradient */
 300                 int starty, endy; /* y co-ordinates of endpoints shifted to intersect the left of the visible rectangle */
 301                 int startrighty; /* y co-ordinate of start point shifted to intersect the right of the visible rectangle */
 302                 int height;
 303                 COLORREF col;
 304                 HBRUSH hbrush, hprevbrush;
 305                 int topy, bottomy; /* y co-ordinates where the topmost and bottommost gradient lines hit the left of the visible rectangle */
 306                 int y;
 307                 int tilt; /* vertical distance covered by a gradient line */
 308
 309                 starty = roundr((rc.left - endpointsf[0].X) * (endpointsf[0].X - endpointsf[1].X) / (endpointsf[1].Y - endpointsf[0].Y) + endpointsf[0].Y);
 310                 endy = roundr((rc.left - endpointsf[1].X) * (endpointsf[0].X - endpointsf[1].X) / (endpointsf[1].Y - endpointsf[0].Y) + endpointsf[1].Y);
 311                 height = endy - starty;
 312                 startrighty = roundr((rc.right - endpointsf[0].X) * (endpointsf[0].X - endpointsf[1].X) / (endpointsf[1].Y - endpointsf[0].Y) + endpointsf[0].Y);
 313                 tilt = starty - startrighty;
 314
 315                 if (starty >= startrighty)
 316                 {
 317                     topy = rc.top;
 318                     bottomy = rc.bottom + tilt;
 319                 }
 320                 else
 321                 {
 322                     topy = rc.top + tilt;
 323                     bottomy = rc.bottom;
 324                 }
 325
 326                 poly[0].x = rc.right;
 327                 poly[1].x = rc.left;
 328                 poly[2].x = rc.left;
 329                 poly[3].x = rc.right;
 330
 331                 for (y=topy; y<=bottomy; y++)
 332                 {
 333                     ARGB argb = blend_line_gradient(line, (y-starty)/(REAL)height);
 334                     col = ARGB2COLORREF(argb);
 335                     hbrush = CreateSolidBrush(col);
 336                     hprevbrush = SelectObject(graphics->hdc, hbrush);
 337                     poly[0].y = y - tilt - 1;
 338                     poly[1].y = y - 1;
 339                     poly[2].y = y;
 340                     poly[3].y = y - tilt;
 341                     Polygon(graphics->hdc, poly, 4);
 342                     SelectObject(graphics->hdc, hprevbrush);
 343                     DeleteObject(hbrush);
 344                 }
 345             }
 346             /* else startpoint == endpoint */
 347         }
 348         break;
 349     }
 350     case BrushTypeSolidColor:
 351     {
 352         GpSolidFill *fill = (GpSolidFill*)brush;
 353         if (fill->bmp)
 354         {
 355             RECT rc;
 356             /* partially transparent fill */
 357
 358             SelectClipPath(graphics->hdc, RGN_AND);
 359             if (GetClipBox(graphics->hdc, &rc) != NULLREGION)
 360             {
 361                 HDC hdc = CreateCompatibleDC(NULL);
 362                 HBITMAP oldbmp;
 363                 BLENDFUNCTION bf;
 364
 365                 if (!hdc) break;
 366
 367                 oldbmp = SelectObject(hdc, fill->bmp);
 368
 369                 bf.BlendOp = AC_SRC_OVER;
 370                 bf.BlendFlags = 0;
 371                 bf.SourceConstantAlpha = 255;
 372                 bf.AlphaFormat = AC_SRC_ALPHA;
 373
 374                 GdiAlphaBlend(graphics->hdc, rc.left, rc.top, rc.right-rc.left, rc.bottom-rc.top, hdc, 0, 0, 1, 1, bf);
 375
 376                 SelectObject(hdc, oldbmp);
 377                 DeleteDC(hdc);
 378             }
 379
 380             break;
 381         }
 382         /* else fall through */
 383     }
 384     default:
 385         SelectObject(graphics->hdc, brush->gdibrush);
 386         FillPath(graphics->hdc);
 387         break;
 388     }
 389 }
 390
 391 /* GdipDrawPie/GdipFillPie helper function */
 392 static void draw_pie(GpGraphics *graphics, REAL x, REAL y, REAL width,
 393     REAL height, REAL startAngle, REAL sweepAngle)
 394 {
 395     GpPointF ptf[4];
 396     POINT pti[4];
 397
 398     ptf[0].X = x;
 399     ptf[0].Y = y;
 400     ptf[1].X = x + width;
 401     ptf[1].Y = y + height;
 402
 403     deg2xy(startAngle+sweepAngle, x + width / 2.0, y + width / 2.0, &ptf[2].X, &ptf[2].Y);
 404     deg2xy(startAngle, x + width / 2.0, y + width / 2.0, &ptf[3].X, &ptf[3].Y);
 405
 406     transform_and_round_points(graphics, pti, ptf, 4);
 407
 408     Pie(graphics->hdc, pti[0].x, pti[0].y, pti[1].x, pti[1].y, pti[2].x,
 409         pti[2].y, pti[3].x, pti[3].y);
 410 }
 411
 412 /* Draws the linecap the specified color and size on the hdc.  The linecap is in
 413  * direction of the line from x1, y1 to x2, y2 and is anchored on x2, y2. Probably
 414  * should not be called on an hdc that has a path you care about. */
 415 static void draw_cap(GpGraphics *graphics, COLORREF color, GpLineCap cap, REAL size,
 416     const GpCustomLineCap *custom, REAL x1, REAL y1, REAL x2, REAL y2)
 417 {
 418     HGDIOBJ oldbrush = NULL, oldpen = NULL;
 419     GpMatrix *matrix = NULL;
 420     HBRUSH brush = NULL;
 421     HPEN pen = NULL;
 422     PointF ptf[4], *custptf = NULL;
 423     POINT pt[4], *custpt = NULL;
 424     BYTE *tp = NULL;
 425     REAL theta, dsmall, dbig, dx, dy = 0.0;
 426     INT i, count;
 427     LOGBRUSH lb;
 428     BOOL customstroke;
 429
 430     if((x1 == x2) && (y1 == y2))
 431         return;
 432
 433     theta = gdiplus_atan2(y2 - y1, x2 - x1);
 434
 435     customstroke = (cap == LineCapCustom) && custom && (!custom->fill);
 436     if(!customstroke){
 437         brush = CreateSolidBrush(color);
 438         lb.lbStyle = BS_SOLID;
 439         lb.lbColor = color;
 440         lb.lbHatch = 0;
 441         pen = ExtCreatePen(PS_GEOMETRIC | PS_SOLID | PS_ENDCAP_FLAT |
 442                            PS_JOIN_MITER, 1, &lb, 0,
 443                            NULL);
 444         oldbrush = SelectObject(graphics->hdc, brush);
 445         oldpen = SelectObject(graphics->hdc, pen);
 446     }
 447
 448     switch(cap){
 449         case LineCapFlat:
 450             break;
 451         case LineCapSquare:
 452         case LineCapSquareAnchor:
 453         case LineCapDiamondAnchor:
 454             size = size * (cap & LineCapNoAnchor ? ANCHOR_WIDTH : 1.0) / 2.0;
 455             if(cap == LineCapDiamondAnchor){
 456                 dsmall = cos(theta + M_PI_2) * size;
 457                 dbig = sin(theta + M_PI_2) * size;
 458             }
 459             else{
 460                 dsmall = cos(theta + M_PI_4) * size;
 461                 dbig = sin(theta + M_PI_4) * size;
 462             }
 463
 464             ptf[0].X = x2 - dsmall;
 465             ptf[1].X = x2 + dbig;
 466
 467             ptf[0].Y = y2 - dbig;
 468             ptf[3].Y = y2 + dsmall;
 469
 470             ptf[1].Y = y2 - dsmall;
 471             ptf[2].Y = y2 + dbig;
 472
 473             ptf[3].X = x2 - dbig;
 474             ptf[2].X = x2 + dsmall;
 475
 476             transform_and_round_points(graphics, pt, ptf, 4);
 477             Polygon(graphics->hdc, pt, 4);
 478
 479             break;
 480         case LineCapArrowAnchor:
 481             size = size * 4.0 / sqrt(3.0);
 482
 483             dx = cos(M_PI / 6.0 + theta) * size;
 484             dy = sin(M_PI / 6.0 + theta) * size;
 485
 486             ptf[0].X = x2 - dx;
 487             ptf[0].Y = y2 - dy;
 488
 489             dx = cos(- M_PI / 6.0 + theta) * size;
 490             dy = sin(- M_PI / 6.0 + theta) * size;
 491
 492             ptf[1].X = x2 - dx;
 493             ptf[1].Y = y2 - dy;
 494
 495             ptf[2].X = x2;
 496             ptf[2].Y = y2;
 497
 498             transform_and_round_points(graphics, pt, ptf, 3);
 499             Polygon(graphics->hdc, pt, 3);
 500
 501             break;
 502         case LineCapRoundAnchor:
 503             dx = dy = ANCHOR_WIDTH * size / 2.0;
 504
 505             ptf[0].X = x2 - dx;
 506             ptf[0].Y = y2 - dy;
 507             ptf[1].X = x2 + dx;
 508             ptf[1].Y = y2 + dy;
 509
 510             transform_and_round_points(graphics, pt, ptf, 2);
 511             Ellipse(graphics->hdc, pt[0].x, pt[0].y, pt[1].x, pt[1].y);
 512
 513             break;
 514         case LineCapTriangle:
 515             size = size / 2.0;
 516             dx = cos(M_PI_2 + theta) * size;
 517             dy = sin(M_PI_2 + theta) * size;
 518
 519             ptf[0].X = x2 - dx;
 520             ptf[0].Y = y2 - dy;
 521             ptf[1].X = x2 + dx;
 522             ptf[1].Y = y2 + dy;
 523
 524             dx = cos(theta) * size;
 525             dy = sin(theta) * size;
 526
 527             ptf[2].X = x2 + dx;
 528             ptf[2].Y = y2 + dy;
 529
 530             transform_and_round_points(graphics, pt, ptf, 3);
 531             Polygon(graphics->hdc, pt, 3);
 532
 533             break;
 534         case LineCapRound:
 535             dx = dy = size / 2.0;
 536
 537             ptf[0].X = x2 - dx;
 538             ptf[0].Y = y2 - dy;
 539             ptf[1].X = x2 + dx;
 540             ptf[1].Y = y2 + dy;
 541
 542             dx = -cos(M_PI_2 + theta) * size;
 543             dy = -sin(M_PI_2 + theta) * size;
 544
 545             ptf[2].X = x2 - dx;
 546             ptf[2].Y = y2 - dy;
 547             ptf[3].X = x2 + dx;
 548             ptf[3].Y = y2 + dy;
 549
 550             transform_and_round_points(graphics, pt, ptf, 4);
 551             Pie(graphics->hdc, pt[0].x, pt[0].y, pt[1].x, pt[1].y, pt[2].x,
 552                 pt[2].y, pt[3].x, pt[3].y);
 553
 554             break;
 555         case LineCapCustom:
 556             if(!custom)
 557                 break;
 558
 559             count = custom->pathdata.Count;
 560             custptf = GdipAlloc(count * sizeof(PointF));
 561             custpt = GdipAlloc(count * sizeof(POINT));
 562             tp = GdipAlloc(count);
 563
 564             if(!custptf || !custpt || !tp || (GdipCreateMatrix(&matrix) != Ok))
 565                 goto custend;
 566
 567             memcpy(custptf, custom->pathdata.Points, count * sizeof(PointF));
 568
 569             GdipScaleMatrix(matrix, size, size, MatrixOrderAppend);
 570             GdipRotateMatrix(matrix, (180.0 / M_PI) * (theta - M_PI_2),
 571                              MatrixOrderAppend);
 572             GdipTranslateMatrix(matrix, x2, y2, MatrixOrderAppend);
 573             GdipTransformMatrixPoints(matrix, custptf, count);
 574
 575             transform_and_round_points(graphics, custpt, custptf, count);
 576
 577             for(i = 0; i < count; i++)
 578                 tp[i] = convert_path_point_type(custom->pathdata.Types[i]);
 579
 580             if(custom->fill){
 581                 BeginPath(graphics->hdc);
 582                 PolyDraw(graphics->hdc, custpt, tp, count);
 583                 EndPath(graphics->hdc);
 584                 StrokeAndFillPath(graphics->hdc);
 585             }
 586             else
 587                 PolyDraw(graphics->hdc, custpt, tp, count);
 588
 589 custend:
 590             GdipFree(custptf);
 591             GdipFree(custpt);
 592             GdipFree(tp);
 593             GdipDeleteMatrix(matrix);
 594             break;
 595         default:
 596             break;
 597     }
 598
 599     if(!customstroke){
 600         SelectObject(graphics->hdc, oldbrush);
 601         SelectObject(graphics->hdc, oldpen);
 602         DeleteObject(brush);
 603         DeleteObject(pen);
 604     }
 605 }
 606
 607 /* Shortens the line by the given percent by changing x2, y2.
 608  * If percent is > 1.0 then the line will change direction.
 609  * If percent is negative it can lengthen the line. */
 610 static void shorten_line_percent(REAL x1, REAL  y1, REAL *x2, REAL *y2, REAL percent)
 611 {
 612     REAL dist, theta, dx, dy;
 613
 614     if((y1 == *y2) && (x1 == *x2))
 615         return;
 616
 617     dist = sqrt((*x2 - x1) * (*x2 - x1) + (*y2 - y1) * (*y2 - y1)) * -percent;
 618     theta = gdiplus_atan2((*y2 - y1), (*x2 - x1));
 619     dx = cos(theta) * dist;
 620     dy = sin(theta) * dist;
 621
 622     *x2 = *x2 + dx;
 623     *y2 = *y2 + dy;
 624 }
 625
 626 /* Shortens the line by the given amount by changing x2, y2.
 627  * If the amount is greater than the distance, the line will become length 0.
 628  * If the amount is negative, it can lengthen the line. */
 629 static void shorten_line_amt(REAL x1, REAL y1, REAL *x2, REAL *y2, REAL amt)
 630 {
 631     REAL dx, dy, percent;
 632
 633     dx = *x2 - x1;
 634     dy = *y2 - y1;
 635     if(dx == 0 && dy == 0)
 636         return;
 637
 638     percent = amt / sqrt(dx * dx + dy * dy);
 639     if(percent >= 1.0){
 640         *x2 = x1;
 641         *y2 = y1;
 642         return;
 643     }
 644
 645     shorten_line_percent(x1, y1, x2, y2, percent);
 646 }
 647
 648 /* Draws lines between the given points, and if caps is true then draws an endcap
 649  * at the end of the last line. */
 650 static GpStatus draw_polyline(GpGraphics *graphics, GpPen *pen,
 651     GDIPCONST GpPointF * pt, INT count, BOOL caps)
 652 {
 653     POINT *pti = NULL;
 654     GpPointF *ptcopy = NULL;
 655     GpStatus status = GenericError;
 656
 657     if(!count)
 658         return Ok;
 659
 660     pti = GdipAlloc(count * sizeof(POINT));
 661     ptcopy = GdipAlloc(count * sizeof(GpPointF));
 662
 663     if(!pti || !ptcopy){
 664         status = OutOfMemory;
 665         goto end;
 666     }
 667
 668     memcpy(ptcopy, pt, count * sizeof(GpPointF));
 669
 670     if(caps){
 671         if(pen->endcap == LineCapArrowAnchor)
 672             shorten_line_amt(ptcopy[count-2].X, ptcopy[count-2].Y,
 673                              &ptcopy[count-1].X, &ptcopy[count-1].Y, pen->width);
 674         else if((pen->endcap == LineCapCustom) && pen->customend)
 675             shorten_line_amt(ptcopy[count-2].X, ptcopy[count-2].Y,
 676                              &ptcopy[count-1].X, &ptcopy[count-1].Y,
 677                              pen->customend->inset * pen->width);
 678
 679         if(pen->startcap == LineCapArrowAnchor)
 680             shorten_line_amt(ptcopy[1].X, ptcopy[1].Y,
 681                              &ptcopy[0].X, &ptcopy[0].Y, pen->width);
 682         else if((pen->startcap == LineCapCustom) && pen->customstart)
 683             shorten_line_amt(ptcopy[1].X, ptcopy[1].Y,
 684                              &ptcopy[0].X, &ptcopy[0].Y,
 685                              pen->customstart->inset * pen->width);
 686
 687         draw_cap(graphics, pen->brush->lb.lbColor, pen->endcap, pen->width, pen->customend,
 688                  pt[count - 2].X, pt[count - 2].Y, pt[count - 1].X, pt[count - 1].Y);
 689         draw_cap(graphics, pen->brush->lb.lbColor, pen->startcap, pen->width, pen->customstart,
 690                          pt[1].X, pt[1].Y, pt[0].X, pt[0].Y);
 691     }
 692
 693     transform_and_round_points(graphics, pti, ptcopy, count);
 694
 695     if(Polyline(graphics->hdc, pti, count))
 696         status = Ok;
 697
 698 end:
 699     GdipFree(pti);
 700     GdipFree(ptcopy);
 701
 702     return status;
 703 }
 704
 705 /* Conducts a linear search to find the bezier points that will back off
 706  * the endpoint of the curve by a distance of amt. Linear search works
 707  * better than binary in this case because there are multiple solutions,
 708  * and binary searches often find a bad one. I don't think this is what
 709  * Windows does but short of rendering the bezier without GDI's help it's
 710  * the best we can do. If rev then work from the start of the passed points
 711  * instead of the end. */
 712 static void shorten_bezier_amt(GpPointF * pt, REAL amt, BOOL rev)
 713 {
 714     GpPointF origpt[4];
 715     REAL percent = 0.00, dx, dy, origx, origy, diff = -1.0;
 716     INT i, first = 0, second = 1, third = 2, fourth = 3;
 717
 718     if(rev){
 719         first = 3;
 720         second = 2;
 721         third = 1;
 722         fourth = 0;
 723     }
 724
 725     origx = pt[fourth].X;
 726     origy = pt[fourth].Y;
 727     memcpy(origpt, pt, sizeof(GpPointF) * 4);
 728
 729     for(i = 0; (i < MAX_ITERS) && (diff < amt); i++){
 730         /* reset bezier points to original values */
 731         memcpy(pt, origpt, sizeof(GpPointF) * 4);
 732         /* Perform magic on bezier points. Order is important here.*/
 733         shorten_line_percent(pt[third].X, pt[third].Y, &pt[fourth].X, &pt[fourth].Y, percent);
 734         shorten_line_percent(pt[second].X, pt[second].Y, &pt[third].X, &pt[third].Y, percent);
 735         shorten_line_percent(pt[third].X, pt[third].Y, &pt[fourth].X, &pt[fourth].Y, percent);
 736         shorten_line_percent(pt[first].X, pt[first].Y, &pt[second].X, &pt[second].Y, percent);
 737         shorten_line_percent(pt[second].X, pt[second].Y, &pt[third].X, &pt[third].Y, percent);
 738         shorten_line_percent(pt[third].X, pt[third].Y, &pt[fourth].X, &pt[fourth].Y, percent);
 739
 740         dx = pt[fourth].X - origx;
 741         dy = pt[fourth].Y - origy;
 742
 743         diff = sqrt(dx * dx + dy * dy);
 744         percent += 0.0005 * amt;
 745     }
 746 }
 747
 748 /* Draws bezier curves between given points, and if caps is true then draws an
 749  * endcap at the end of the last line. */
 750 static GpStatus draw_polybezier(GpGraphics *graphics, GpPen *pen,
 751     GDIPCONST GpPointF * pt, INT count, BOOL caps)
 752 {
 753     POINT *pti;
 754     GpPointF *ptcopy;
 755     GpStatus status = GenericError;
 756
 757     if(!count)
 758         return Ok;
 759
 760     pti = GdipAlloc(count * sizeof(POINT));
 761     ptcopy = GdipAlloc(count * sizeof(GpPointF));
 762
 763     if(!pti || !ptcopy){
 764         status = OutOfMemory;
 765         goto end;
 766     }
 767
 768     memcpy(ptcopy, pt, count * sizeof(GpPointF));
 769
 770     if(caps){
 771         if(pen->endcap == LineCapArrowAnchor)
 772             shorten_bezier_amt(&ptcopy[count-4], pen->width, FALSE);
 773         else if((pen->endcap == LineCapCustom) && pen->customend)
 774             shorten_bezier_amt(&ptcopy[count-4], pen->width * pen->customend->inset,
 775                                FALSE);
 776
 777         if(pen->startcap == LineCapArrowAnchor)
 778             shorten_bezier_amt(ptcopy, pen->width, TRUE);
 779         else if((pen->startcap == LineCapCustom) && pen->customstart)
 780             shorten_bezier_amt(ptcopy, pen->width * pen->customstart->inset, TRUE);
 781
 782         /* the direction of the line cap is parallel to the direction at the
 783          * end of the bezier (which, if it has been shortened, is not the same
 784          * as the direction from pt[count-2] to pt[count-1]) */
 785         draw_cap(graphics, pen->brush->lb.lbColor, pen->endcap, pen->width, pen->customend,
 786             pt[count - 1].X - (ptcopy[count - 1].X - ptcopy[count - 2].X),
 787             pt[count - 1].Y - (ptcopy[count - 1].Y - ptcopy[count - 2].Y),
 788             pt[count - 1].X, pt[count - 1].Y);
 789
 790         draw_cap(graphics, pen->brush->lb.lbColor, pen->startcap, pen->width, pen->customstart,
 791             pt[0].X - (ptcopy[0].X - ptcopy[1].X),
 792             pt[0].Y - (ptcopy[0].Y - ptcopy[1].Y), pt[0].X, pt[0].Y);
 793     }
 794
 795     transform_and_round_points(graphics, pti, ptcopy, count);
 796
 797     PolyBezier(graphics->hdc, pti, count);
 798
 799     status = Ok;
 800
 801 end:
 802     GdipFree(pti);
 803     GdipFree(ptcopy);
 804
 805     return status;
 806 }
 807
 808 /* Draws a combination of bezier curves and lines between points. */
 809 static GpStatus draw_poly(GpGraphics *graphics, GpPen *pen, GDIPCONST GpPointF * pt,
 810     GDIPCONST BYTE * types, INT count, BOOL caps)
 811 {
 812     POINT *pti = GdipAlloc(count * sizeof(POINT));
 813     BYTE *tp = GdipAlloc(count);
 814     GpPointF *ptcopy = GdipAlloc(count * sizeof(GpPointF));
 815     INT i, j;
 816     GpStatus status = GenericError;
 817
 818     if(!count){
 819         status = Ok;
 820         goto end;
 821     }
 822     if(!pti || !tp || !ptcopy){
 823         status = OutOfMemory;
 824         goto end;
 825     }
 826
 827     for(i = 1; i < count; i++){
 828         if((types[i] & PathPointTypePathTypeMask) == PathPointTypeBezier){
 829             if((i + 2 >= count) || !(types[i + 1] & PathPointTypeBezier)
 830                 || !(types[i + 1] & PathPointTypeBezier)){
 831                 ERR("Bad bezier points\n");
 832                 goto end;
 833             }
 834             i += 2;
 835         }
 836     }
 837
 838     memcpy(ptcopy, pt, count * sizeof(GpPointF));
 839
 840     /* If we are drawing caps, go through the points and adjust them accordingly,
 841      * and draw the caps. */
 842     if(caps){
 843         switch(types[count - 1] & PathPointTypePathTypeMask){
 844             case PathPointTypeBezier:
 845                 if(pen->endcap == LineCapArrowAnchor)
 846                     shorten_bezier_amt(&ptcopy[count - 4], pen->width, FALSE);
 847                 else if((pen->endcap == LineCapCustom) && pen->customend)
 848                     shorten_bezier_amt(&ptcopy[count - 4],
 849                                        pen->width * pen->customend->inset, FALSE);
 850
 851                 draw_cap(graphics, pen->brush->lb.lbColor, pen->endcap, pen->width, pen->customend,
 852                     pt[count - 1].X - (ptcopy[count - 1].X - ptcopy[count - 2].X),
 853                     pt[count - 1].Y - (ptcopy[count - 1].Y - ptcopy[count - 2].Y),
 854                     pt[count - 1].X, pt[count - 1].Y);
 855
 856                 break;
 857             case PathPointTypeLine:
 858                 if(pen->endcap == LineCapArrowAnchor)
 859                     shorten_line_amt(ptcopy[count - 2].X, ptcopy[count - 2].Y,
 860                                      &ptcopy[count - 1].X, &ptcopy[count - 1].Y,
 861                                      pen->width);
 862                 else if((pen->endcap == LineCapCustom) && pen->customend)
 863                     shorten_line_amt(ptcopy[count - 2].X, ptcopy[count - 2].Y,
 864                                      &ptcopy[count - 1].X, &ptcopy[count - 1].Y,
 865                                      pen->customend->inset * pen->width);
 866
 867                 draw_cap(graphics, pen->brush->lb.lbColor, pen->endcap, pen->width, pen->customend,
 868                          pt[count - 2].X, pt[count - 2].Y, pt[count - 1].X,
 869                          pt[count - 1].Y);
 870
 871                 break;
 872             default:
 873                 ERR("Bad path last point\n");
 874                 goto end;
 875         }
 876
 877         /* Find start of points */
 878         for(j = 1; j < count && ((types[j] & PathPointTypePathTypeMask)
 879             == PathPointTypeStart); j++);
 880
 881         switch(types[j] & PathPointTypePathTypeMask){
 882             case PathPointTypeBezier:
 883                 if(pen->startcap == LineCapArrowAnchor)
 884                     shorten_bezier_amt(&ptcopy[j - 1], pen->width, TRUE);
 885                 else if((pen->startcap == LineCapCustom) && pen->customstart)
 886                     shorten_bezier_amt(&ptcopy[j - 1],
 887                                        pen->width * pen->customstart->inset, TRUE);
 888
 889                 draw_cap(graphics, pen->brush->lb.lbColor, pen->startcap, pen->width, pen->customstart,
 890                     pt[j - 1].X - (ptcopy[j - 1].X - ptcopy[j].X),
 891                     pt[j - 1].Y - (ptcopy[j - 1].Y - ptcopy[j].Y),
 892                     pt[j - 1].X, pt[j - 1].Y);
 893
 894                 break;
 895             case PathPointTypeLine:
 896                 if(pen->startcap == LineCapArrowAnchor)
 897                     shorten_line_amt(ptcopy[j].X, ptcopy[j].Y,
 898                                      &ptcopy[j - 1].X, &ptcopy[j - 1].Y,
 899                                      pen->width);
 900                 else if((pen->startcap == LineCapCustom) && pen->customstart)
 901                     shorten_line_amt(ptcopy[j].X, ptcopy[j].Y,
 902                                      &ptcopy[j - 1].X, &ptcopy[j - 1].Y,
 903                                      pen->customstart->inset * pen->width);
 904
 905                 draw_cap(graphics, pen->brush->lb.lbColor, pen->startcap, pen->width, pen->customstart,
 906                          pt[j].X, pt[j].Y, pt[j - 1].X,
 907                          pt[j - 1].Y);
 908
 909                 break;
 910             default:
 911                 ERR("Bad path points\n");
 912                 goto end;
 913         }
 914     }
 915
 916     transform_and_round_points(graphics, pti, ptcopy, count);
 917
 918     for(i = 0; i < count; i++){
 919         tp[i] = convert_path_point_type(types[i]);
 920     }
 921
 922     PolyDraw(graphics->hdc, pti, tp, count);
 923
 924     status = Ok;
 925
 926 end:
 927     GdipFree(pti);
 928     GdipFree(ptcopy);
 929     GdipFree(tp);
 930
 931     return status;
 932 }
 933
 934 GpStatus trace_path(GpGraphics *graphics, GpPath *path)
 935 {
 936     GpStatus result;
 937
 938     BeginPath(graphics->hdc);
 939     result = draw_poly(graphics, NULL, path->pathdata.Points,
 940                        path->pathdata.Types, path->pathdata.Count, FALSE);
 941     EndPath(graphics->hdc);
 942     return result;
 943 }
 944
 945 typedef struct _GraphicsContainerItem {
 946     struct list entry;
 947     GraphicsContainer contid;
 948
 949     SmoothingMode smoothing;
 950     CompositingQuality compqual;
 951     InterpolationMode interpolation;
 952     CompositingMode compmode;
 953     TextRenderingHint texthint;
 954     REAL scale;
 955     GpUnit unit;
 956     PixelOffsetMode pixeloffset;
 957     UINT textcontrast;
 958     GpMatrix* worldtrans;
 959     GpRegion* clip;
 960 } GraphicsContainerItem;
 961
 962 static GpStatus init_container(GraphicsContainerItem** container,
 963         GDIPCONST GpGraphics* graphics){
 964     GpStatus sts;
 965
 966     *container = GdipAlloc(sizeof(GraphicsContainerItem));
 967     if(!(*container))
 968         return OutOfMemory;
 969
 970     (*container)->contid = graphics->contid + 1;
 971
 972     (*container)->smoothing = graphics->smoothing;
 973     (*container)->compqual = graphics->compqual;
 974     (*container)->interpolation = graphics->interpolation;
 975     (*container)->compmode = graphics->compmode;
 976     (*container)->texthint = graphics->texthint;
 977     (*container)->scale = graphics->scale;
 978     (*container)->unit = graphics->unit;
 979     (*container)->textcontrast = graphics->textcontrast;
 980     (*container)->pixeloffset = graphics->pixeloffset;
 981
 982     sts = GdipCloneMatrix(graphics->worldtrans, &(*container)->worldtrans);
 983     if(sts != Ok){
 984         GdipFree(*container);
 985         *container = NULL;
 986         return sts;
 987     }
 988
 989     sts = GdipCloneRegion(graphics->clip, &(*container)->clip);
 990     if(sts != Ok){
 991         GdipDeleteMatrix((*container)->worldtrans);
 992         GdipFree(*container);
 993         *container = NULL;
 994         return sts;
 995     }
 996
 997     return Ok;
 998 }
 999
1000 static void delete_container(GraphicsContainerItem* container){
1001     GdipDeleteMatrix(container->worldtrans);
1002     GdipDeleteRegion(container->clip);
1003     GdipFree(container);
1004 }
1005
1006 static GpStatus restore_container(GpGraphics* graphics,
1007         GDIPCONST GraphicsContainerItem* container){
1008     GpStatus sts;
1009     GpMatrix *newTrans;
1010     GpRegion *newClip;
1011
1012     sts = GdipCloneMatrix(container->worldtrans, &newTrans);
1013     if(sts != Ok)
1014         return sts;
1015
1016     sts = GdipCloneRegion(container->clip, &newClip);
1017     if(sts != Ok){
1018         GdipDeleteMatrix(newTrans);
1019         return sts;
1020     }
1021
1022     GdipDeleteMatrix(graphics->worldtrans);
1023     graphics->worldtrans = newTrans;
1024
1025     GdipDeleteRegion(graphics->clip);
1026     graphics->clip = newClip;
1027
1028     graphics->contid = container->contid - 1;
1029
1030     graphics->smoothing = container->smoothing;
1031     graphics->compqual = container->compqual;
1032     graphics->interpolation = container->interpolation;
1033     graphics->compmode = container->compmode;
1034     graphics->texthint = container->texthint;
1035     graphics->scale = container->scale;
1036     graphics->unit = container->unit;
1037     graphics->textcontrast = container->textcontrast;
1038     graphics->pixeloffset = container->pixeloffset;
1039
1040     return Ok;
1041 }
1042
1043 static GpStatus get_graphics_bounds(GpGraphics* graphics, GpRectF* rect)
1044 {
1045     RECT wnd_rect;
1046
1047     if(graphics->hwnd) {
1048         if(!GetClientRect(graphics->hwnd, &wnd_rect))
1049             return GenericError;
1050
1051         rect->X = wnd_rect.left;
1052         rect->Y = wnd_rect.top;
1053         rect->Width = wnd_rect.right - wnd_rect.left;
1054         rect->Height = wnd_rect.bottom - wnd_rect.top;
1055     }else{
1056         rect->X = 0;
1057         rect->Y = 0;
1058         rect->Width = GetDeviceCaps(graphics->hdc, HORZRES);
1059         rect->Height = GetDeviceCaps(graphics->hdc, VERTRES);
1060     }
1061
1062     return Ok;
1063 }
1064
1065 GpStatus WINGDIPAPI GdipCreateFromHDC(HDC hdc, GpGraphics **graphics)
1066 {
1067     TRACE("(%p, %p)\n", hdc, graphics);
1068
1069     return GdipCreateFromHDC2(hdc, NULL, graphics);
1070 }
1071
1072 GpStatus WINGDIPAPI GdipCreateFromHDC2(HDC hdc, HANDLE hDevice, GpGraphics **graphics)
1073 {
1074     GpStatus retval;
1075
1076     TRACE("(%p, %p, %p)\n", hdc, hDevice, graphics);
1077
1078     if(hDevice != NULL) {
1079         FIXME("Don't know how to handle parameter hDevice\n");
1080         return NotImplemented;
1081     }
1082
1083     if(hdc == NULL)
1084         return OutOfMemory;
1085
1086     if(graphics == NULL)
1087         return InvalidParameter;
1088
1089     *graphics = GdipAlloc(sizeof(GpGraphics));
1090     if(!*graphics)  return OutOfMemory;
1091
1092     if((retval = GdipCreateMatrix(&(*graphics)->worldtrans)) != Ok){
1093         GdipFree(*graphics);
1094         return retval;
1095     }
1096
1097     if((retval = GdipCreateRegion(&(*graphics)->clip)) != Ok){
1098         GdipFree((*graphics)->worldtrans);
1099         GdipFree(*graphics);
1100         return retval;
1101     }
1102
1103     (*graphics)->hdc = hdc;
1104     (*graphics)->hwnd = WindowFromDC(hdc);
1105     (*graphics)->owndc = FALSE;
1106     (*graphics)->smoothing = SmoothingModeDefault;
1107     (*graphics)->compqual = CompositingQualityDefault;
1108     (*graphics)->interpolation = InterpolationModeDefault;
1109     (*graphics)->pixeloffset = PixelOffsetModeDefault;
1110     (*graphics)->compmode = CompositingModeSourceOver;
1111     (*graphics)->unit = UnitDisplay;
1112     (*graphics)->scale = 1.0;
1113     (*graphics)->busy = FALSE;
1114     (*graphics)->textcontrast = 4;
1115     list_init(&(*graphics)->containers);
1116     (*graphics)->contid = 0;
1117
1118     return Ok;
1119 }
1120
1121 GpStatus WINGDIPAPI GdipCreateFromHWND(HWND hwnd, GpGraphics **graphics)
1122 {
1123     GpStatus ret;
1124     HDC hdc;
1125
1126     TRACE("(%p, %p)\n", hwnd, graphics);
1127
1128     hdc = GetDC(hwnd);
1129
1130     if((ret = GdipCreateFromHDC(hdc, graphics)) != Ok)
1131     {
1132         ReleaseDC(hwnd, hdc);
1133         return ret;
1134     }
1135
1136     (*graphics)->hwnd = hwnd;
1137     (*graphics)->owndc = TRUE;
1138
1139     return Ok;
1140 }
1141
1142 /* FIXME: no icm handling */
1143 GpStatus WINGDIPAPI GdipCreateFromHWNDICM(HWND hwnd, GpGraphics **graphics)
1144 {
1145     TRACE("(%p, %p)\n", hwnd, graphics);
1146
1147     return GdipCreateFromHWND(hwnd, graphics);
1148 }
1149
1150 GpStatus WINGDIPAPI GdipCreateMetafileFromEmf(HENHMETAFILE hemf, BOOL delete,
1151     GpMetafile **metafile)
1152 {
1153     static int calls;
1154
1155     if(!hemf || !metafile)
1156         return InvalidParameter;
1157
1158     if(!(calls++))
1159         FIXME("not implemented\n");
1160
1161     return NotImplemented;
1162 }
1163
1164 GpStatus WINGDIPAPI GdipCreateMetafileFromWmf(HMETAFILE hwmf, BOOL delete,
1165     GDIPCONST WmfPlaceableFileHeader * placeable, GpMetafile **metafile)
1166 {
1167     IStream *stream = NULL;
1168     UINT read;
1169     BYTE* copy;
1170     HENHMETAFILE hemf;
1171     GpStatus retval = GenericError;
1172
1173     TRACE("(%p, %d, %p, %p)\n", hwmf, delete, placeable, metafile);
1174
1175     if(!hwmf || !metafile || !placeable)
1176         return InvalidParameter;
1177
1178     *metafile = NULL;
1179     read = GetMetaFileBitsEx(hwmf, 0, NULL);
1180     if(!read)
1181         return GenericError;
1182     copy = GdipAlloc(read);
1183     GetMetaFileBitsEx(hwmf, read, copy);
1184
1185     hemf = SetWinMetaFileBits(read, copy, NULL, NULL);
1186     GdipFree(copy);
1187
1188     read = GetEnhMetaFileBits(hemf, 0, NULL);
1189     copy = GdipAlloc(read);
1190     GetEnhMetaFileBits(hemf, read, copy);
1191     DeleteEnhMetaFile(hemf);
1192
1193     if(CreateStreamOnHGlobal(copy, TRUE, &stream) != S_OK){
1194         ERR("could not make stream\n");
1195         GdipFree(copy);
1196         goto err;
1197     }
1198
1199     *metafile = GdipAlloc(sizeof(GpMetafile));
1200     if(!*metafile){
1201         retval = OutOfMemory;
1202         goto err;
1203     }
1204
1205     if(OleLoadPicture(stream, 0, FALSE, &IID_IPicture,
1206         (LPVOID*) &((*metafile)->image.picture)) != S_OK)
1207         goto err;
1208
1209
1210     (*metafile)->image.type = ImageTypeMetafile;
1211     (*metafile)->bounds.X = ((REAL) placeable->BoundingBox.Left) / ((REAL) placeable->Inch);
1212     (*metafile)->bounds.Y = ((REAL) placeable->BoundingBox.Right) / ((REAL) placeable->Inch);
1213     (*metafile)->bounds.Width = ((REAL) (placeable->BoundingBox.Right
1214                     - placeable->BoundingBox.Left)) / ((REAL) placeable->Inch);
1215     (*metafile)->bounds.Height = ((REAL) (placeable->BoundingBox.Bottom
1216                    - placeable->BoundingBox.Top)) / ((REAL) placeable->Inch);
1217     (*metafile)->unit = UnitInch;
1218
1219     if(delete)
1220         DeleteMetaFile(hwmf);
1221
1222     return Ok;
1223
1224 err:
1225     GdipFree(*metafile);
1226     IStream_Release(stream);
1227     return retval;
1228 }
1229
1230 GpStatus WINGDIPAPI GdipCreateMetafileFromWmfFile(GDIPCONST WCHAR *file,
1231     GDIPCONST WmfPlaceableFileHeader * placeable, GpMetafile **metafile)
1232 {
1233     HMETAFILE hmf = GetMetaFileW(file);
1234
1235     TRACE("(%s, %p, %p)\n", debugstr_w(file), placeable, metafile);
1236
1237     if(!hmf) return InvalidParameter;
1238
1239     return GdipCreateMetafileFromWmf(hmf, TRUE, placeable, metafile);
1240 }
1241
1242 GpStatus WINGDIPAPI GdipCreateMetafileFromFile(GDIPCONST WCHAR *file,
1243     GpMetafile **metafile)
1244 {
1245     FIXME("(%p, %p): stub\n", file, metafile);
1246     return NotImplemented;
1247 }
1248
1249 GpStatus WINGDIPAPI GdipCreateMetafileFromStream(IStream *stream,
1250     GpMetafile **metafile)
1251 {
1252     FIXME("(%p, %p): stub\n", stream, metafile);
1253     return NotImplemented;
1254 }
1255
1256 GpStatus WINGDIPAPI GdipCreateStreamOnFile(GDIPCONST WCHAR * filename,
1257     UINT access, IStream **stream)
1258 {
1259     DWORD dwMode;
1260     HRESULT ret;
1261
1262     TRACE("(%s, %u, %p)\n", debugstr_w(filename), access, stream);
1263
1264     if(!stream || !filename)
1265         return InvalidParameter;
1266
1267     if(access & GENERIC_WRITE)
1268         dwMode = STGM_SHARE_DENY_WRITE | STGM_WRITE | STGM_CREATE;
1269     else if(access & GENERIC_READ)
1270         dwMode = STGM_SHARE_DENY_WRITE | STGM_READ | STGM_FAILIFTHERE;
1271     else
1272         return InvalidParameter;
1273
1274     ret = SHCreateStreamOnFileW(filename, dwMode, stream);
1275
1276     return hresult_to_status(ret);
1277 }
1278
1279 GpStatus WINGDIPAPI GdipDeleteGraphics(GpGraphics *graphics)
1280 {
1281     GraphicsContainerItem *cont, *next;
1282     TRACE("(%p)\n", graphics);
1283
1284     if(!graphics) return InvalidParameter;
1285     if(graphics->busy) return ObjectBusy;
1286
1287     if(graphics->owndc)
1288         ReleaseDC(graphics->hwnd, graphics->hdc);
1289
1290     LIST_FOR_EACH_ENTRY_SAFE(cont, next, &graphics->containers, GraphicsContainerItem, entry){
1291         list_remove(&cont->entry);
1292         delete_container(cont);
1293     }
1294
1295     GdipDeleteRegion(graphics->clip);
1296     GdipDeleteMatrix(graphics->worldtrans);
1297     GdipFree(graphics);
1298
1299     return Ok;
1300 }
1301
1302 GpStatus WINGDIPAPI GdipDrawArc(GpGraphics *graphics, GpPen *pen, REAL x,
1303     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
1304 {
1305     INT save_state, num_pts;
1306     GpPointF points[MAX_ARC_PTS];
1307     GpStatus retval;
1308
1309     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y,
1310           width, height, startAngle, sweepAngle);
1311
1312     if(!graphics || !pen || width <= 0 || height <= 0)
1313         return InvalidParameter;
1314
1315     if(graphics->busy)
1316         return ObjectBusy;
1317
1318     num_pts = arc2polybezier(points, x, y, width, height, startAngle, sweepAngle);
1319
1320     save_state = prepare_dc(graphics, pen);
1321
1322     retval = draw_polybezier(graphics, pen, points, num_pts, TRUE);
1323
1324     restore_dc(graphics, save_state);
1325
1326     return retval;
1327 }
1328
1329 GpStatus WINGDIPAPI GdipDrawArcI(GpGraphics *graphics, GpPen *pen, INT x,
1330     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
1331 {
1332     TRACE("(%p, %p, %d, %d, %d, %d, %.2f, %.2f)\n", graphics, pen, x, y,
1333           width, height, startAngle, sweepAngle);
1334
1335     return GdipDrawArc(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
1336 }
1337
1338 GpStatus WINGDIPAPI GdipDrawBezier(GpGraphics *graphics, GpPen *pen, REAL x1,
1339     REAL y1, REAL x2, REAL y2, REAL x3, REAL y3, REAL x4, REAL y4)
1340 {
1341     INT save_state;
1342     GpPointF pt[4];
1343     GpStatus retval;
1344
1345     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x1, y1,
1346           x2, y2, x3, y3, x4, y4);
1347
1348     if(!graphics || !pen)
1349         return InvalidParameter;
1350
1351     if(graphics->busy)
1352         return ObjectBusy;
1353
1354     pt[0].X = x1;
1355     pt[0].Y = y1;
1356     pt[1].X = x2;
1357     pt[1].Y = y2;
1358     pt[2].X = x3;
1359     pt[2].Y = y3;
1360     pt[3].X = x4;
1361     pt[3].Y = y4;
1362
1363     save_state = prepare_dc(graphics, pen);
1364
1365     retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
1366
1367     restore_dc(graphics, save_state);
1368
1369     return retval;
1370 }
1371
1372 GpStatus WINGDIPAPI GdipDrawBezierI(GpGraphics *graphics, GpPen *pen, INT x1,
1373     INT y1, INT x2, INT y2, INT x3, INT y3, INT x4, INT y4)
1374 {
1375     INT save_state;
1376     GpPointF pt[4];
1377     GpStatus retval;
1378
1379     TRACE("(%p, %p, %d, %d, %d, %d, %d, %d, %d, %d)\n", graphics, pen, x1, y1,
1380           x2, y2, x3, y3, x4, y4);
1381
1382     if(!graphics || !pen)
1383         return InvalidParameter;
1384
1385     if(graphics->busy)
1386         return ObjectBusy;
1387
1388     pt[0].X = x1;
1389     pt[0].Y = y1;
1390     pt[1].X = x2;
1391     pt[1].Y = y2;
1392     pt[2].X = x3;
1393     pt[2].Y = y3;
1394     pt[3].X = x4;
1395     pt[3].Y = y4;
1396
1397     save_state = prepare_dc(graphics, pen);
1398
1399     retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
1400
1401     restore_dc(graphics, save_state);
1402
1403     return retval;
1404 }
1405
1406 GpStatus WINGDIPAPI GdipDrawBeziers(GpGraphics *graphics, GpPen *pen,
1407     GDIPCONST GpPointF *points, INT count)
1408 {
1409     INT i;
1410     GpStatus ret;
1411
1412     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
1413
1414     if(!graphics || !pen || !points || (count <= 0))
1415         return InvalidParameter;
1416
1417     if(graphics->busy)
1418         return ObjectBusy;
1419
1420     for(i = 0; i < floor(count / 4); i++){
1421         ret = GdipDrawBezier(graphics, pen,
1422                              points[4*i].X, points[4*i].Y,
1423                              points[4*i + 1].X, points[4*i + 1].Y,
1424                              points[4*i + 2].X, points[4*i + 2].Y,
1425                              points[4*i + 3].X, points[4*i + 3].Y);
1426         if(ret != Ok)
1427             return ret;
1428     }
1429
1430     return Ok;
1431 }
1432
1433 GpStatus WINGDIPAPI GdipDrawBeziersI(GpGraphics *graphics, GpPen *pen,
1434     GDIPCONST GpPoint *points, INT count)
1435 {
1436     GpPointF *pts;
1437     GpStatus ret;
1438     INT i;
1439
1440     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
1441
1442     if(!graphics || !pen || !points || (count <= 0))
1443         return InvalidParameter;
1444
1445     if(graphics->busy)
1446         return ObjectBusy;
1447
1448     pts = GdipAlloc(sizeof(GpPointF) * count);
1449     if(!pts)
1450         return OutOfMemory;
1451
1452     for(i = 0; i < count; i++){
1453         pts[i].X = (REAL)points[i].X;
1454         pts[i].Y = (REAL)points[i].Y;
1455     }
1456
1457     ret = GdipDrawBeziers(graphics,pen,pts,count);
1458
1459     GdipFree(pts);
1460
1461     return ret;
1462 }
1463
1464 GpStatus WINGDIPAPI GdipDrawClosedCurve(GpGraphics *graphics, GpPen *pen,
1465     GDIPCONST GpPointF *points, INT count)
1466 {
1467     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
1468
1469     return GdipDrawClosedCurve2(graphics, pen, points, count, 1.0);
1470 }
1471
1472 GpStatus WINGDIPAPI GdipDrawClosedCurveI(GpGraphics *graphics, GpPen *pen,
1473     GDIPCONST GpPoint *points, INT count)
1474 {
1475     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
1476
1477     return GdipDrawClosedCurve2I(graphics, pen, points, count, 1.0);
1478 }
1479
1480 GpStatus WINGDIPAPI GdipDrawClosedCurve2(GpGraphics *graphics, GpPen *pen,
1481     GDIPCONST GpPointF *points, INT count, REAL tension)
1482 {
1483     GpPath *path;
1484     GpStatus stat;
1485
1486     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
1487
1488     if(!graphics || !pen || !points || count <= 0)
1489         return InvalidParameter;
1490
1491     if(graphics->busy)
1492         return ObjectBusy;
1493
1494     if((stat = GdipCreatePath(FillModeAlternate, &path)) != Ok)
1495         return stat;
1496
1497     stat = GdipAddPathClosedCurve2(path, points, count, tension);
1498     if(stat != Ok){
1499         GdipDeletePath(path);
1500         return stat;
1501     }
1502
1503     stat = GdipDrawPath(graphics, pen, path);
1504
1505     GdipDeletePath(path);
1506
1507     return stat;
1508 }
1509
1510 GpStatus WINGDIPAPI GdipDrawClosedCurve2I(GpGraphics *graphics, GpPen *pen,
1511     GDIPCONST GpPoint *points, INT count, REAL tension)
1512 {
1513     GpPointF *ptf;
1514     GpStatus stat;
1515     INT i;
1516
1517     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
1518
1519     if(!points || count <= 0)
1520         return InvalidParameter;
1521
1522     ptf = GdipAlloc(sizeof(GpPointF)*count);
1523     if(!ptf)
1524         return OutOfMemory;
1525
1526     for(i = 0; i < count; i++){
1527         ptf[i].X = (REAL)points[i].X;
1528         ptf[i].Y = (REAL)points[i].Y;
1529     }
1530
1531     stat = GdipDrawClosedCurve2(graphics, pen, ptf, count, tension);
1532
1533     GdipFree(ptf);
1534
1535     return stat;
1536 }
1537
1538 GpStatus WINGDIPAPI GdipDrawCurve(GpGraphics *graphics, GpPen *pen,
1539     GDIPCONST GpPointF *points, INT count)
1540 {
1541     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
1542
1543     return GdipDrawCurve2(graphics,pen,points,count,1.0);
1544 }
1545
1546 GpStatus WINGDIPAPI GdipDrawCurveI(GpGraphics *graphics, GpPen *pen,
1547     GDIPCONST GpPoint *points, INT count)
1548 {
1549     GpPointF *pointsF;
1550     GpStatus ret;
1551     INT i;
1552
1553     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
1554
1555     if(!points)
1556         return InvalidParameter;
1557
1558     pointsF = GdipAlloc(sizeof(GpPointF)*count);
1559     if(!pointsF)
1560         return OutOfMemory;
1561
1562     for(i = 0; i < count; i++){
1563         pointsF[i].X = (REAL)points[i].X;
1564         pointsF[i].Y = (REAL)points[i].Y;
1565     }
1566
1567     ret = GdipDrawCurve(graphics,pen,pointsF,count);
1568     GdipFree(pointsF);
1569
1570     return ret;
1571 }
1572
1573 /* Approximates cardinal spline with Bezier curves. */
1574 GpStatus WINGDIPAPI GdipDrawCurve2(GpGraphics *graphics, GpPen *pen,
1575     GDIPCONST GpPointF *points, INT count, REAL tension)
1576 {
1577     /* PolyBezier expects count*3-2 points. */
1578     INT i, len_pt = count*3-2, save_state;
1579     GpPointF *pt;
1580     REAL x1, x2, y1, y2;
1581     GpStatus retval;
1582
1583     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
1584
1585     if(!graphics || !pen)
1586         return InvalidParameter;
1587
1588     if(graphics->busy)
1589         return ObjectBusy;
1590
1591     if(count < 2)
1592         return InvalidParameter;
1593
1594     pt = GdipAlloc(len_pt * sizeof(GpPointF));
1595     if(!pt)
1596         return OutOfMemory;
1597
1598     tension = tension * TENSION_CONST;
1599
1600     calc_curve_bezier_endp(points[0].X, points[0].Y, points[1].X, points[1].Y,
1601         tension, &x1, &y1);
1602
1603     pt[0].X = points[0].X;
1604     pt[0].Y = points[0].Y;
1605     pt[1].X = x1;
1606     pt[1].Y = y1;
1607
1608     for(i = 0; i < count-2; i++){
1609         calc_curve_bezier(&(points[i]), tension, &x1, &y1, &x2, &y2);
1610
1611         pt[3*i+2].X = x1;
1612         pt[3*i+2].Y = y1;
1613         pt[3*i+3].X = points[i+1].X;
1614         pt[3*i+3].Y = points[i+1].Y;
1615         pt[3*i+4].X = x2;
1616         pt[3*i+4].Y = y2;
1617     }
1618
1619     calc_curve_bezier_endp(points[count-1].X, points[count-1].Y,
1620         points[count-2].X, points[count-2].Y, tension, &x1, &y1);
1621
1622     pt[len_pt-2].X = x1;
1623     pt[len_pt-2].Y = y1;
1624     pt[len_pt-1].X = points[count-1].X;
1625     pt[len_pt-1].Y = points[count-1].Y;
1626
1627     save_state = prepare_dc(graphics, pen);
1628
1629     retval = draw_polybezier(graphics, pen, pt, len_pt, TRUE);
1630
1631     GdipFree(pt);
1632     restore_dc(graphics, save_state);
1633
1634     return retval;
1635 }
1636
1637 GpStatus WINGDIPAPI GdipDrawCurve2I(GpGraphics *graphics, GpPen *pen,
1638     GDIPCONST GpPoint *points, INT count, REAL tension)
1639 {
1640     GpPointF *pointsF;
1641     GpStatus ret;
1642     INT i;
1643
1644     TRACE("(%p, %p, %p, %d, %.2f)\n", graphics, pen, points, count, tension);
1645
1646     if(!points)
1647         return InvalidParameter;
1648
1649     pointsF = GdipAlloc(sizeof(GpPointF)*count);
1650     if(!pointsF)
1651         return OutOfMemory;
1652
1653     for(i = 0; i < count; i++){
1654         pointsF[i].X = (REAL)points[i].X;
1655         pointsF[i].Y = (REAL)points[i].Y;
1656     }
1657
1658     ret = GdipDrawCurve2(graphics,pen,pointsF,count,tension);
1659     GdipFree(pointsF);
1660
1661     return ret;
1662 }
1663
1664 GpStatus WINGDIPAPI GdipDrawCurve3(GpGraphics *graphics, GpPen *pen,
1665     GDIPCONST GpPointF *points, INT count, INT offset, INT numberOfSegments,
1666     REAL tension)
1667 {
1668     TRACE("(%p, %p, %p, %d, %d, %d, %.2f)\n", graphics, pen, points, count, offset, numberOfSegments, tension);
1669
1670     if(offset >= count || numberOfSegments > count - offset - 1 || numberOfSegments <= 0){
1671         return InvalidParameter;
1672     }
1673
1674     return GdipDrawCurve2(graphics, pen, points + offset, numberOfSegments + 1, tension);
1675 }
1676
1677 GpStatus WINGDIPAPI GdipDrawCurve3I(GpGraphics *graphics, GpPen *pen,
1678     GDIPCONST GpPoint *points, INT count, INT offset, INT numberOfSegments,
1679     REAL tension)
1680 {
1681     TRACE("(%p, %p, %p, %d, %d, %d, %.2f)\n", graphics, pen, points, count, offset, numberOfSegments, tension);
1682
1683     if(count < 0){
1684         return OutOfMemory;
1685     }
1686
1687     if(offset >= count || numberOfSegments > count - offset - 1 || numberOfSegments <= 0){
1688         return InvalidParameter;
1689     }
1690
1691     return GdipDrawCurve2I(graphics, pen, points + offset, numberOfSegments + 1, tension);
1692 }
1693
1694 GpStatus WINGDIPAPI GdipDrawEllipse(GpGraphics *graphics, GpPen *pen, REAL x,
1695     REAL y, REAL width, REAL height)
1696 {
1697     INT save_state;
1698     GpPointF ptf[2];
1699     POINT pti[2];
1700
1701     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y, width, height);
1702
1703     if(!graphics || !pen)
1704         return InvalidParameter;
1705
1706     if(graphics->busy)
1707         return ObjectBusy;
1708
1709     ptf[0].X = x;
1710     ptf[0].Y = y;
1711     ptf[1].X = x + width;
1712     ptf[1].Y = y + height;
1713
1714     save_state = prepare_dc(graphics, pen);
1715     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
1716
1717     transform_and_round_points(graphics, pti, ptf, 2);
1718
1719     Ellipse(graphics->hdc, pti[0].x, pti[0].y, pti[1].x, pti[1].y);
1720
1721     restore_dc(graphics, save_state);
1722
1723     return Ok;
1724 }
1725
1726 GpStatus WINGDIPAPI GdipDrawEllipseI(GpGraphics *graphics, GpPen *pen, INT x,
1727     INT y, INT width, INT height)
1728 {
1729     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, pen, x, y, width, height);
1730
1731     return GdipDrawEllipse(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
1732 }
1733
1734
1735 GpStatus WINGDIPAPI GdipDrawImage(GpGraphics *graphics, GpImage *image, REAL x, REAL y)
1736 {
1737     UINT width, height;
1738     GpPointF points[3];
1739
1740     TRACE("(%p, %p, %.2f, %.2f)\n", graphics, image, x, y);
1741
1742     if(!graphics || !image)
1743         return InvalidParameter;
1744
1745     GdipGetImageWidth(image, &width);
1746     GdipGetImageHeight(image, &height);
1747
1748     /* FIXME: we should use the graphics and image dpi, somehow */
1749
1750     points[0].X = points[2].X = x;
1751     points[0].Y = points[1].Y = y;
1752     points[1].X = x + width;
1753     points[2].Y = y + height;
1754
1755     return GdipDrawImagePointsRect(graphics, image, points, 3, 0, 0, width, height,
1756         UnitPixel, NULL, NULL, NULL);
1757 }
1758
1759 GpStatus WINGDIPAPI GdipDrawImageI(GpGraphics *graphics, GpImage *image, INT x,
1760     INT y)
1761 {
1762     TRACE("(%p, %p, %d, %d)\n", graphics, image, x, y);
1763
1764     return GdipDrawImage(graphics, image, (REAL)x, (REAL)y);
1765 }
1766
1767 GpStatus WINGDIPAPI GdipDrawImagePointRect(GpGraphics *graphics, GpImage *image,
1768     REAL x, REAL y, REAL srcx, REAL srcy, REAL srcwidth, REAL srcheight,
1769     GpUnit srcUnit)
1770 {
1771     FIXME("(%p, %p, %f, %f, %f, %f, %f, %f, %d): stub\n", graphics, image, x, y, srcx, srcy, srcwidth, srcheight, srcUnit);
1772     return NotImplemented;
1773 }
1774
1775 GpStatus WINGDIPAPI GdipDrawImagePointRectI(GpGraphics *graphics, GpImage *image,
1776     INT x, INT y, INT srcx, INT srcy, INT srcwidth, INT srcheight,
1777     GpUnit srcUnit)
1778 {
1779     FIXME("(%p, %p, %d, %d, %d, %d, %d, %d, %d): stub\n", graphics, image, x, y, srcx, srcy, srcwidth, srcheight, srcUnit);
1780     return NotImplemented;
1781 }
1782
1783 GpStatus WINGDIPAPI GdipDrawImagePoints(GpGraphics *graphics, GpImage *image,
1784     GDIPCONST GpPointF *dstpoints, INT count)
1785 {
1786     FIXME("(%p, %p, %p, %d): stub\n", graphics, image, dstpoints, count);
1787     return NotImplemented;
1788 }
1789
1790 GpStatus WINGDIPAPI GdipDrawImagePointsI(GpGraphics *graphics, GpImage *image,
1791     GDIPCONST GpPoint *dstpoints, INT count)
1792 {
1793     FIXME("(%p, %p, %p, %d): stub\n", graphics, image, dstpoints, count);
1794     return NotImplemented;
1795 }
1796
1797 /* FIXME: partially implemented (only works for rectangular parallelograms) */
1798 GpStatus WINGDIPAPI GdipDrawImagePointsRect(GpGraphics *graphics, GpImage *image,
1799      GDIPCONST GpPointF *points, INT count, REAL srcx, REAL srcy, REAL srcwidth,
1800      REAL srcheight, GpUnit srcUnit, GDIPCONST GpImageAttributes* imageAttributes,
1801      DrawImageAbort callback, VOID * callbackData)
1802 {
1803     GpPointF ptf[3];
1804     POINT pti[3];
1805     REAL dx, dy;
1806
1807     TRACE("(%p, %p, %p, %d, %f, %f, %f, %f, %d, %p, %p, %p)\n", graphics, image, points,
1808           count, srcx, srcy, srcwidth, srcheight, srcUnit, imageAttributes, callback,
1809           callbackData);
1810
1811     if(!graphics || !image || !points || count != 3)
1812          return InvalidParameter;
1813
1814     if(srcUnit == UnitInch)
1815         dx = dy = (REAL) INCH_HIMETRIC;
1816     else if(srcUnit == UnitPixel){
1817         dx = ((REAL) INCH_HIMETRIC) /
1818              ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSX));
1819         dy = ((REAL) INCH_HIMETRIC) /
1820              ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSY));
1821     }
1822     else
1823         return NotImplemented;
1824
1825     memcpy(ptf, points, 3 * sizeof(GpPointF));
1826     transform_and_round_points(graphics, pti, ptf, 3);
1827
1828     /* IPicture renders bitmaps with the y-axis reversed
1829      * FIXME: flipping for unknown image type might not be correct. */
1830     if(image->type != ImageTypeMetafile){
1831         INT temp;
1832         temp = pti[0].y;
1833         pti[0].y = pti[2].y;
1834         pti[2].y = temp;
1835     }
1836
1837     if(IPicture_Render(image->picture, graphics->hdc,
1838         pti[0].x, pti[0].y, pti[1].x - pti[0].x, pti[2].y - pti[0].y,
1839         srcx * dx, srcy * dy,
1840         srcwidth * dx, srcheight * dy,
1841         NULL) != S_OK){
1842         if(callback)
1843             callback(callbackData);
1844         return GenericError;
1845     }
1846
1847     return Ok;
1848 }
1849
1850 GpStatus WINGDIPAPI GdipDrawImagePointsRectI(GpGraphics *graphics, GpImage *image,
1851      GDIPCONST GpPoint *points, INT count, INT srcx, INT srcy, INT srcwidth,
1852      INT srcheight, GpUnit srcUnit, GDIPCONST GpImageAttributes* imageAttributes,
1853      DrawImageAbort callback, VOID * callbackData)
1854 {
1855     GpPointF pointsF[3];
1856     INT i;
1857
1858     TRACE("(%p, %p, %p, %d, %d, %d, %d, %d, %d, %p, %p, %p)\n", graphics, image, points, count,
1859           srcx, srcy, srcwidth, srcheight, srcUnit, imageAttributes, callback,
1860           callbackData);
1861
1862     if(!points || count!=3)
1863         return InvalidParameter;
1864
1865     for(i = 0; i < count; i++){
1866         pointsF[i].X = (REAL)points[i].X;
1867         pointsF[i].Y = (REAL)points[i].Y;
1868     }
1869
1870     return GdipDrawImagePointsRect(graphics, image, pointsF, count, (REAL)srcx, (REAL)srcy,
1871                                    (REAL)srcwidth, (REAL)srcheight, srcUnit, imageAttributes,
1872                                    callback, callbackData);
1873 }
1874
1875 GpStatus WINGDIPAPI GdipDrawImageRectRect(GpGraphics *graphics, GpImage *image,
1876     REAL dstx, REAL dsty, REAL dstwidth, REAL dstheight, REAL srcx, REAL srcy,
1877     REAL srcwidth, REAL srcheight, GpUnit srcUnit,
1878     GDIPCONST GpImageAttributes* imageattr, DrawImageAbort callback,
1879     VOID * callbackData)
1880 {
1881     GpPointF points[3];
1882
1883     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f, %d, %p, %p, %p)\n",
1884           graphics, image, dstx, dsty, dstwidth, dstheight, srcx, srcy,
1885           srcwidth, srcheight, srcUnit, imageattr, callback, callbackData);
1886
1887     points[0].X = dstx;
1888     points[0].Y = dsty;
1889     points[1].X = dstx + dstwidth;
1890     points[1].Y = dsty;
1891     points[2].X = dstx;
1892     points[2].Y = dsty + dstheight;
1893
1894     return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
1895                srcwidth, srcheight, srcUnit, imageattr, callback, callbackData);
1896 }
1897
1898 GpStatus WINGDIPAPI GdipDrawImageRectRectI(GpGraphics *graphics, GpImage *image,
1899         INT dstx, INT dsty, INT dstwidth, INT dstheight, INT srcx, INT srcy,
1900         INT srcwidth, INT srcheight, GpUnit srcUnit,
1901         GDIPCONST GpImageAttributes* imageAttributes, DrawImageAbort callback,
1902         VOID * callbackData)
1903 {
1904     GpPointF points[3];
1905
1906     TRACE("(%p, %p, %d, %d, %d, %d, %d, %d, %d, %d, %d, %p, %p, %p)\n",
1907           graphics, image, dstx, dsty, dstwidth, dstheight, srcx, srcy,
1908           srcwidth, srcheight, srcUnit, imageAttributes, callback, callbackData);
1909
1910     points[0].X = dstx;
1911     points[0].Y = dsty;
1912     points[1].X = dstx + dstwidth;
1913     points[1].Y = dsty;
1914     points[2].X = dstx;
1915     points[2].Y = dsty + dstheight;
1916
1917     return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
1918                srcwidth, srcheight, srcUnit, imageAttributes, callback, callbackData);
1919 }
1920
1921 GpStatus WINGDIPAPI GdipDrawImageRect(GpGraphics *graphics, GpImage *image,
1922     REAL x, REAL y, REAL width, REAL height)
1923 {
1924     RectF bounds;
1925     GpUnit unit;
1926     GpStatus ret;
1927
1928     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, image, x, y, width, height);
1929
1930     if(!graphics || !image)
1931         return InvalidParameter;
1932
1933     ret = GdipGetImageBounds(image, &bounds, &unit);
1934     if(ret != Ok)
1935         return ret;
1936
1937     return GdipDrawImageRectRect(graphics, image, x, y, width, height,
1938                                  bounds.X, bounds.Y, bounds.Width, bounds.Height,
1939                                  unit, NULL, NULL, NULL);
1940 }
1941
1942 GpStatus WINGDIPAPI GdipDrawImageRectI(GpGraphics *graphics, GpImage *image,
1943     INT x, INT y, INT width, INT height)
1944 {
1945     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, image, x, y, width, height);
1946
1947     return GdipDrawImageRect(graphics, image, (REAL)x, (REAL)y, (REAL)width, (REAL)height);
1948 }
1949
1950 GpStatus WINGDIPAPI GdipDrawLine(GpGraphics *graphics, GpPen *pen, REAL x1,
1951     REAL y1, REAL x2, REAL y2)
1952 {
1953     INT save_state;
1954     GpPointF pt[2];
1955     GpStatus retval;
1956
1957     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x1, y1, x2, y2);
1958
1959     if(!pen || !graphics)
1960         return InvalidParameter;
1961
1962     if(graphics->busy)
1963         return ObjectBusy;
1964
1965     pt[0].X = x1;
1966     pt[0].Y = y1;
1967     pt[1].X = x2;
1968     pt[1].Y = y2;
1969
1970     save_state = prepare_dc(graphics, pen);
1971
1972     retval = draw_polyline(graphics, pen, pt, 2, TRUE);
1973
1974     restore_dc(graphics, save_state);
1975
1976     return retval;
1977 }
1978
1979 GpStatus WINGDIPAPI GdipDrawLineI(GpGraphics *graphics, GpPen *pen, INT x1,
1980     INT y1, INT x2, INT y2)
1981 {
1982     INT save_state;
1983     GpPointF pt[2];
1984     GpStatus retval;
1985
1986     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, pen, x1, y1, x2, y2);
1987
1988     if(!pen || !graphics)
1989         return InvalidParameter;
1990
1991     if(graphics->busy)
1992         return ObjectBusy;
1993
1994     pt[0].X = (REAL)x1;
1995     pt[0].Y = (REAL)y1;
1996     pt[1].X = (REAL)x2;
1997     pt[1].Y = (REAL)y2;
1998
1999     save_state = prepare_dc(graphics, pen);
2000
2001     retval = draw_polyline(graphics, pen, pt, 2, TRUE);
2002
2003     restore_dc(graphics, save_state);
2004
2005     return retval;
2006 }
2007
2008 GpStatus WINGDIPAPI GdipDrawLines(GpGraphics *graphics, GpPen *pen, GDIPCONST
2009     GpPointF *points, INT count)
2010 {
2011     INT save_state;
2012     GpStatus retval;
2013
2014     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2015
2016     if(!pen || !graphics || (count < 2))
2017         return InvalidParameter;
2018
2019     if(graphics->busy)
2020         return ObjectBusy;
2021
2022     save_state = prepare_dc(graphics, pen);
2023
2024     retval = draw_polyline(graphics, pen, points, count, TRUE);
2025
2026     restore_dc(graphics, save_state);
2027
2028     return retval;
2029 }
2030
2031 GpStatus WINGDIPAPI GdipDrawLinesI(GpGraphics *graphics, GpPen *pen, GDIPCONST
2032     GpPoint *points, INT count)
2033 {
2034     INT save_state;
2035     GpStatus retval;
2036     GpPointF *ptf = NULL;
2037     int i;
2038
2039     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
2040
2041     if(!pen || !graphics || (count < 2))
2042         return InvalidParameter;
2043
2044     if(graphics->busy)
2045         return ObjectBusy;
2046
2047     ptf = GdipAlloc(count * sizeof(GpPointF));
2048     if(!ptf) return OutOfMemory;
2049
2050     for(i = 0; i < count; i ++){
2051         ptf[i].X = (REAL) points[i].X;
2052         ptf[i].Y = (REAL) points[i].Y;
2053     }
2054
2055     save_state = prepare_dc(graphics, pen);
2056
2057     retval = draw_polyline(graphics, pen, ptf, count, TRUE);
2058
2059     restore_dc(graphics, save_state);
2060
2061     GdipFree(ptf);
2062     return retval;
2063 }
2064
2065 GpStatus WINGDIPAPI GdipDrawPath(GpGraphics *graphics, GpPen *pen, GpPath *path)
2066 {
2067     INT save_state;
2068     GpStatus retval;
2069
2070     TRACE("(%p, %p, %p)\n", graphics, pen, path);
2071
2072     if(!pen || !graphics)
2073         return InvalidParameter;
2074
2075     if(graphics->busy)
2076         return ObjectBusy;
2077
2078     save_state = prepare_dc(graphics, pen);
2079
2080     retval = draw_poly(graphics, pen, path->pathdata.Points,
2081                        path->pathdata.Types, path->pathdata.Count, TRUE);
2082
2083     restore_dc(graphics, save_state);
2084
2085     return retval;
2086 }
2087
2088 GpStatus WINGDIPAPI GdipDrawPie(GpGraphics *graphics, GpPen *pen, REAL x,
2089     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
2090 {
2091     INT save_state;
2092
2093     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y,
2094             width, height, startAngle, sweepAngle);
2095
2096     if(!graphics || !pen)
2097         return InvalidParameter;
2098
2099     if(graphics->busy)
2100         return ObjectBusy;
2101
2102     save_state = prepare_dc(graphics, pen);
2103     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
2104
2105     draw_pie(graphics, x, y, width, height, startAngle, sweepAngle);
2106
2107     restore_dc(graphics, save_state);
2108
2109     return Ok;
2110 }
2111
2112 GpStatus WINGDIPAPI GdipDrawPieI(GpGraphics *graphics, GpPen *pen, INT x,
2113     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
2114 {
2115     TRACE("(%p, %p, %d, %d, %d, %d, %.2f, %.2f)\n", graphics, pen, x, y,
2116             width, height, startAngle, sweepAngle);
2117
2118     return GdipDrawPie(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
2119 }
2120
2121 GpStatus WINGDIPAPI GdipDrawRectangle(GpGraphics *graphics, GpPen *pen, REAL x,
2122     REAL y, REAL width, REAL height)
2123 {
2124     INT save_state;
2125     GpPointF ptf[4];
2126     POINT pti[4];
2127
2128     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, pen, x, y, width, height);
2129
2130     if(!pen || !graphics)
2131         return InvalidParameter;
2132
2133     if(graphics->busy)
2134         return ObjectBusy;
2135
2136     ptf[0].X = x;
2137     ptf[0].Y = y;
2138     ptf[1].X = x + width;
2139     ptf[1].Y = y;
2140     ptf[2].X = x + width;
2141     ptf[2].Y = y + height;
2142     ptf[3].X = x;
2143     ptf[3].Y = y + height;
2144
2145     save_state = prepare_dc(graphics, pen);
2146     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
2147
2148     transform_and_round_points(graphics, pti, ptf, 4);
2149     Polygon(graphics->hdc, pti, 4);
2150
2151     restore_dc(graphics, save_state);
2152
2153     return Ok;
2154 }
2155
2156 GpStatus WINGDIPAPI GdipDrawRectangleI(GpGraphics *graphics, GpPen *pen, INT x,
2157     INT y, INT width, INT height)
2158 {
2159     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, pen, x, y, width, height);
2160
2161     return GdipDrawRectangle(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
2162 }
2163
2164 GpStatus WINGDIPAPI GdipDrawRectangles(GpGraphics *graphics, GpPen *pen,
2165     GDIPCONST GpRectF* rects, INT count)
2166 {
2167     GpPointF *ptf;
2168     POINT *pti;
2169     INT save_state, i;
2170
2171     TRACE("(%p, %p, %p, %d)\n", graphics, pen, rects, count);
2172
2173     if(!graphics || !pen || !rects || count < 1)
2174         return InvalidParameter;
2175
2176     if(graphics->busy)
2177         return ObjectBusy;
2178
2179     ptf = GdipAlloc(4 * count * sizeof(GpPointF));
2180     pti = GdipAlloc(4 * count * sizeof(POINT));
2181
2182     if(!ptf || !pti){
2183         GdipFree(ptf);
2184         GdipFree(pti);
2185         return OutOfMemory;
2186     }
2187
2188     for(i = 0; i < count; i++){
2189         ptf[4 * i + 3].X = ptf[4 * i].X = rects[i].X;
2190         ptf[4 * i + 1].Y = ptf[4 * i].Y = rects[i].Y;
2191         ptf[4 * i + 2].X = ptf[4 * i + 1].X = rects[i].X + rects[i].Width;
2192         ptf[4 * i + 3].Y = ptf[4 * i + 2].Y = rects[i].Y + rects[i].Height;
2193     }
2194
2195     save_state = prepare_dc(graphics, pen);
2196     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
2197
2198     transform_and_round_points(graphics, pti, ptf, 4 * count);
2199
2200     for(i = 0; i < count; i++)
2201         Polygon(graphics->hdc, &pti[4 * i], 4);
2202
2203     restore_dc(graphics, save_state);
2204
2205     GdipFree(ptf);
2206     GdipFree(pti);
2207
2208     return Ok;
2209 }
2210
2211 GpStatus WINGDIPAPI GdipDrawRectanglesI(GpGraphics *graphics, GpPen *pen,
2212     GDIPCONST GpRect* rects, INT count)
2213 {
2214     GpRectF *rectsF;
2215     GpStatus ret;
2216     INT i;
2217
2218     TRACE("(%p, %p, %p, %d)\n", graphics, pen, rects, count);
2219
2220     if(!rects || count<=0)
2221         return InvalidParameter;
2222
2223     rectsF = GdipAlloc(sizeof(GpRectF) * count);
2224     if(!rectsF)
2225         return OutOfMemory;
2226
2227     for(i = 0;i < count;i++){
2228         rectsF[i].X      = (REAL)rects[i].X;
2229         rectsF[i].Y      = (REAL)rects[i].Y;
2230         rectsF[i].Width  = (REAL)rects[i].Width;
2231         rectsF[i].Height = (REAL)rects[i].Height;
2232     }
2233
2234     ret = GdipDrawRectangles(graphics, pen, rectsF, count);
2235     GdipFree(rectsF);
2236
2237     return ret;
2238 }
2239
2240 GpStatus WINGDIPAPI GdipDrawString(GpGraphics *graphics, GDIPCONST WCHAR *string,
2241     INT length, GDIPCONST GpFont *font, GDIPCONST RectF *rect,
2242     GDIPCONST GpStringFormat *format, GDIPCONST GpBrush *brush)
2243 {
2244     HRGN rgn = NULL;
2245     HFONT gdifont;
2246     LOGFONTW lfw;
2247     TEXTMETRICW textmet;
2248     GpPointF pt[2], rectcpy[4];
2249     POINT corners[4];
2250     WCHAR* stringdup;
2251     REAL angle, ang_cos, ang_sin, rel_width, rel_height;
2252     INT sum = 0, height = 0, offsety = 0, fit, fitcpy, save_state, i, j, lret, nwidth,
2253         nheight, lineend;
2254     SIZE size;
2255     POINT drawbase;
2256     UINT drawflags;
2257     RECT drawcoord;
2258
2259     TRACE("(%p, %s, %i, %p, %s, %p, %p)\n", graphics, debugstr_wn(string, length),
2260         length, font, debugstr_rectf(rect), format, brush);
2261
2262     if(!graphics || !string || !font || !brush || !rect)
2263         return InvalidParameter;
2264
2265     if((brush->bt != BrushTypeSolidColor)){
2266         FIXME("not implemented for given parameters\n");
2267         return NotImplemented;
2268     }
2269
2270     if(format){
2271         TRACE("may be ignoring some format flags: attr %x\n", format->attr);
2272
2273         /* Should be no need to explicitly test for StringAlignmentNear as
2274          * that is default behavior if no alignment is passed. */
2275         if(format->vertalign != StringAlignmentNear){
2276             RectF bounds;
2277             GdipMeasureString(graphics, string, length, font, rect, format, &bounds, 0, 0);
2278
2279             if(format->vertalign == StringAlignmentCenter)
2280                 offsety = (rect->Height - bounds.Height) / 2;
2281             else if(format->vertalign == StringAlignmentFar)
2282                 offsety = (rect->Height - bounds.Height);
2283         }
2284     }
2285
2286     if(length == -1) length = lstrlenW(string);
2287
2288     stringdup = GdipAlloc(length * sizeof(WCHAR));
2289     if(!stringdup) return OutOfMemory;
2290
2291     save_state = SaveDC(graphics->hdc);
2292     SetBkMode(graphics->hdc, TRANSPARENT);
2293     SetTextColor(graphics->hdc, brush->lb.lbColor);
2294
2295     rectcpy[3].X = rectcpy[0].X = rect->X;
2296     rectcpy[1].Y = rectcpy[0].Y = rect->Y + offsety;
2297     rectcpy[2].X = rectcpy[1].X = rect->X + rect->Width;
2298     rectcpy[3].Y = rectcpy[2].Y = rect->Y + offsety + rect->Height;
2299     transform_and_round_points(graphics, corners, rectcpy, 4);
2300
2301     if (roundr(rect->Width) == 0)
2302     {
2303         rel_width = 1.0;
2304         nwidth = INT_MAX;
2305     }
2306     else
2307     {
2308         rel_width = sqrt((corners[1].x - corners[0].x) * (corners[1].x - corners[0].x) +
2309                          (corners[1].y - corners[0].y) * (corners[1].y - corners[0].y))
2310                          / rect->Width;
2311         nwidth = roundr(rel_width * rect->Width);
2312     }
2313
2314     if (roundr(rect->Height) == 0)
2315     {
2316         rel_height = 1.0;
2317         nheight = INT_MAX;
2318     }
2319     else
2320     {
2321         rel_height = sqrt((corners[2].x - corners[1].x) * (corners[2].x - corners[1].x) +
2322                           (corners[2].y - corners[1].y) * (corners[2].y - corners[1].y))
2323                           / rect->Height;
2324         nheight = roundr(rel_height * rect->Height);
2325     }
2326
2327     if (roundr(rect->Width) != 0 && roundr(rect->Height) != 0)
2328     {
2329         /* FIXME: If only the width or only the height is 0, we should probably still clip */
2330         rgn = CreatePolygonRgn(corners, 4, ALTERNATE);
2331         SelectClipRgn(graphics->hdc, rgn);
2332     }
2333
2334     /* Use gdi to find the font, then perform transformations on it (height,
2335      * width, angle). */
2336     SelectObject(graphics->hdc, CreateFontIndirectW(&font->lfw));
2337     GetTextMetricsW(graphics->hdc, &textmet);
2338     lfw = font->lfw;
2339
2340     lfw.lfHeight = roundr(((REAL)lfw.lfHeight) * rel_height);
2341     lfw.lfWidth = roundr(textmet.tmAveCharWidth * rel_width);
2342
2343     pt[0].X = 0.0;
2344     pt[0].Y = 0.0;
2345     pt[1].X = 1.0;
2346     pt[1].Y = 0.0;
2347     GdipTransformMatrixPoints(graphics->worldtrans, pt, 2);
2348     angle = -gdiplus_atan2((pt[1].Y - pt[0].Y), (pt[1].X - pt[0].X));
2349     ang_cos = cos(angle);
2350     ang_sin = sin(angle);
2351     lfw.lfEscapement = lfw.lfOrientation = roundr((angle / M_PI) * 1800.0);
2352
2353     gdifont = CreateFontIndirectW(&lfw);
2354     DeleteObject(SelectObject(graphics->hdc, CreateFontIndirectW(&lfw)));
2355
2356     for(i = 0, j = 0; i < length; i++){
2357         if(!isprintW(string[i]) && (string[i] != '\n'))
2358             continue;
2359
2360         stringdup[j] = string[i];
2361         j++;
2362     }
2363
2364     length = j;
2365
2366     if (!format || format->align == StringAlignmentNear)
2367     {
2368         drawbase.x = corners[0].x;
2369         drawbase.y = corners[0].y;
2370         drawflags = DT_NOCLIP | DT_EXPANDTABS;
2371     }
2372     else if (format->align == StringAlignmentCenter)
2373     {
2374         drawbase.x = (corners[0].x + corners[1].x)/2;
2375         drawbase.y = (corners[0].y + corners[1].y)/2;
2376         drawflags = DT_NOCLIP | DT_EXPANDTABS | DT_CENTER;
2377     }
2378     else /* (format->align == StringAlignmentFar) */
2379     {
2380         drawbase.x = corners[1].x;
2381         drawbase.y = corners[1].y;
2382         drawflags = DT_NOCLIP | DT_EXPANDTABS | DT_RIGHT;
2383     }
2384
2385     while(sum < length){
2386         drawcoord.left = drawcoord.right = drawbase.x + roundr(ang_sin * (REAL) height);
2387         drawcoord.top = drawcoord.bottom = drawbase.y + roundr(ang_cos * (REAL) height);
2388
2389         GetTextExtentExPointW(graphics->hdc, stringdup + sum, length - sum,
2390                               nwidth, &fit, NULL, &size);
2391         fitcpy = fit;
2392
2393         if(fit == 0){
2394             DrawTextW(graphics->hdc, stringdup + sum, 1, &drawcoord, drawflags);
2395             break;
2396         }
2397
2398         for(lret = 0; lret < fit; lret++)
2399             if(*(stringdup + sum + lret) == '\n')
2400                 break;
2401
2402         /* Line break code (may look strange, but it imitates windows). */
2403         if(lret < fit)
2404             lineend = fit = lret;    /* this is not an off-by-one error */
2405         else if(fit < (length - sum)){
2406             if(*(stringdup + sum + fit) == ' ')
2407                 while(*(stringdup + sum + fit) == ' ')
2408                     fit++;
2409             else
2410                 while(*(stringdup + sum + fit - 1) != ' '){
2411                     fit--;
2412
2413                     if(*(stringdup + sum + fit) == '\t')
2414                         break;
2415
2416                     if(fit == 0){
2417                         fit = fitcpy;
2418                         break;
2419                     }
2420                 }
2421             lineend = fit;
2422             while(*(stringdup + sum + lineend - 1) == ' ' ||
2423                   *(stringdup + sum + lineend - 1) == '\t')
2424                 lineend--;
2425         }
2426         else
2427             lineend = fit;
2428         DrawTextW(graphics->hdc, stringdup + sum, min(length - sum, lineend),
2429                   &drawcoord, drawflags);
2430
2431         sum += fit + (lret < fitcpy ? 1 : 0);
2432         height += size.cy;
2433
2434         if(height > nheight)
2435             break;
2436
2437         /* Stop if this was a linewrap (but not if it was a linebreak). */
2438         if((lret == fitcpy) && format && (format->attr & StringFormatFlagsNoWrap))
2439             break;
2440     }
2441
2442     GdipFree(stringdup);
2443     DeleteObject(rgn);
2444     DeleteObject(gdifont);
2445
2446     RestoreDC(graphics->hdc, save_state);
2447
2448     return Ok;
2449 }
2450
2451 GpStatus WINGDIPAPI GdipFillClosedCurve2(GpGraphics *graphics, GpBrush *brush,
2452     GDIPCONST GpPointF *points, INT count, REAL tension, GpFillMode fill)
2453 {
2454     GpPath *path;
2455     GpStatus stat;
2456
2457     TRACE("(%p, %p, %p, %d, %.2f, %d)\n", graphics, brush, points,
2458             count, tension, fill);
2459
2460     if(!graphics || !brush || !points)
2461         return InvalidParameter;
2462
2463     if(graphics->busy)
2464         return ObjectBusy;
2465
2466     stat = GdipCreatePath(fill, &path);
2467     if(stat != Ok)
2468         return stat;
2469
2470     stat = GdipAddPathClosedCurve2(path, points, count, tension);
2471     if(stat != Ok){
2472         GdipDeletePath(path);
2473         return stat;
2474     }
2475
2476     stat = GdipFillPath(graphics, brush, path);
2477     if(stat != Ok){
2478         GdipDeletePath(path);
2479         return stat;
2480     }
2481
2482     GdipDeletePath(path);
2483
2484     return Ok;
2485 }
2486
2487 GpStatus WINGDIPAPI GdipFillClosedCurve2I(GpGraphics *graphics, GpBrush *brush,
2488     GDIPCONST GpPoint *points, INT count, REAL tension, GpFillMode fill)
2489 {
2490     GpPointF *ptf;
2491     GpStatus stat;
2492     INT i;
2493
2494     TRACE("(%p, %p, %p, %d, %.2f, %d)\n", graphics, brush, points,
2495             count, tension, fill);
2496
2497     if(!points || count <= 0)
2498         return InvalidParameter;
2499
2500     ptf = GdipAlloc(sizeof(GpPointF)*count);
2501     if(!ptf)
2502         return OutOfMemory;
2503
2504     for(i = 0;i < count;i++){
2505         ptf[i].X = (REAL)points[i].X;
2506         ptf[i].Y = (REAL)points[i].Y;
2507     }
2508
2509     stat = GdipFillClosedCurve2(graphics, brush, ptf, count, tension, fill);
2510
2511     GdipFree(ptf);
2512
2513     return stat;
2514 }
2515
2516 GpStatus WINGDIPAPI GdipFillEllipse(GpGraphics *graphics, GpBrush *brush, REAL x,
2517     REAL y, REAL width, REAL height)
2518 {
2519     INT save_state;
2520     GpPointF ptf[2];
2521     POINT pti[2];
2522
2523     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, brush, x, y, width, height);
2524
2525     if(!graphics || !brush)
2526         return InvalidParameter;
2527
2528     if(graphics->busy)
2529         return ObjectBusy;
2530
2531     ptf[0].X = x;
2532     ptf[0].Y = y;
2533     ptf[1].X = x + width;
2534     ptf[1].Y = y + height;
2535
2536     save_state = SaveDC(graphics->hdc);
2537     EndPath(graphics->hdc);
2538
2539     transform_and_round_points(graphics, pti, ptf, 2);
2540
2541     BeginPath(graphics->hdc);
2542     Ellipse(graphics->hdc, pti[0].x, pti[0].y, pti[1].x, pti[1].y);
2543     EndPath(graphics->hdc);
2544
2545     brush_fill_path(graphics, brush);
2546
2547     RestoreDC(graphics->hdc, save_state);
2548
2549     return Ok;
2550 }
2551
2552 GpStatus WINGDIPAPI GdipFillEllipseI(GpGraphics *graphics, GpBrush *brush, INT x,
2553     INT y, INT width, INT height)
2554 {
2555     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, brush, x, y, width, height);
2556
2557     return GdipFillEllipse(graphics,brush,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
2558 }
2559
2560 GpStatus WINGDIPAPI GdipFillPath(GpGraphics *graphics, GpBrush *brush, GpPath *path)
2561 {
2562     INT save_state;
2563     GpStatus retval;
2564
2565     TRACE("(%p, %p, %p)\n", graphics, brush, path);
2566
2567     if(!brush || !graphics || !path)
2568         return InvalidParameter;
2569
2570     if(graphics->busy)
2571         return ObjectBusy;
2572
2573     save_state = SaveDC(graphics->hdc);
2574     EndPath(graphics->hdc);
2575     SetPolyFillMode(graphics->hdc, (path->fill == FillModeAlternate ? ALTERNATE
2576                                                                     : WINDING));
2577
2578     BeginPath(graphics->hdc);
2579     retval = draw_poly(graphics, NULL, path->pathdata.Points,
2580                        path->pathdata.Types, path->pathdata.Count, FALSE);
2581
2582     if(retval != Ok)
2583         goto end;
2584
2585     EndPath(graphics->hdc);
2586     brush_fill_path(graphics, brush);
2587
2588     retval = Ok;
2589
2590 end:
2591     RestoreDC(graphics->hdc, save_state);
2592
2593     return retval;
2594 }
2595
2596 GpStatus WINGDIPAPI GdipFillPie(GpGraphics *graphics, GpBrush *brush, REAL x,
2597     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
2598 {
2599     INT save_state;
2600
2601     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f, %.2f, %.2f)\n",
2602             graphics, brush, x, y, width, height, startAngle, sweepAngle);
2603
2604     if(!graphics || !brush)
2605         return InvalidParameter;
2606
2607     if(graphics->busy)
2608         return ObjectBusy;
2609
2610     save_state = SaveDC(graphics->hdc);
2611     EndPath(graphics->hdc);
2612
2613     BeginPath(graphics->hdc);
2614     draw_pie(graphics, x, y, width, height, startAngle, sweepAngle);
2615     EndPath(graphics->hdc);
2616
2617     brush_fill_path(graphics, brush);
2618
2619     RestoreDC(graphics->hdc, save_state);
2620
2621     return Ok;
2622 }
2623
2624 GpStatus WINGDIPAPI GdipFillPieI(GpGraphics *graphics, GpBrush *brush, INT x,
2625     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
2626 {
2627     TRACE("(%p, %p, %d, %d, %d, %d, %.2f, %.2f)\n",
2628             graphics, brush, x, y, width, height, startAngle, sweepAngle);
2629
2630     return GdipFillPie(graphics,brush,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
2631 }
2632
2633 GpStatus WINGDIPAPI GdipFillPolygon(GpGraphics *graphics, GpBrush *brush,
2634     GDIPCONST GpPointF *points, INT count, GpFillMode fillMode)
2635 {
2636     INT save_state;
2637     GpPointF *ptf = NULL;
2638     POINT *pti = NULL;
2639     GpStatus retval = Ok;
2640
2641     TRACE("(%p, %p, %p, %d, %d)\n", graphics, brush, points, count, fillMode);
2642
2643     if(!graphics || !brush || !points || !count)
2644         return InvalidParameter;
2645
2646     if(graphics->busy)
2647         return ObjectBusy;
2648
2649     ptf = GdipAlloc(count * sizeof(GpPointF));
2650     pti = GdipAlloc(count * sizeof(POINT));
2651     if(!ptf || !pti){
2652         retval = OutOfMemory;
2653         goto end;
2654     }
2655
2656     memcpy(ptf, points, count * sizeof(GpPointF));
2657
2658     save_state = SaveDC(graphics->hdc);
2659     EndPath(graphics->hdc);
2660     SetPolyFillMode(graphics->hdc, (fillMode == FillModeAlternate ? ALTERNATE
2661                                                                   : WINDING));
2662
2663     transform_and_round_points(graphics, pti, ptf, count);
2664
2665     BeginPath(graphics->hdc);
2666     Polygon(graphics->hdc, pti, count);
2667     EndPath(graphics->hdc);
2668
2669     brush_fill_path(graphics, brush);
2670
2671     RestoreDC(graphics->hdc, save_state);
2672
2673 end:
2674     GdipFree(ptf);
2675     GdipFree(pti);
2676
2677     return retval;
2678 }
2679
2680 GpStatus WINGDIPAPI GdipFillPolygonI(GpGraphics *graphics, GpBrush *brush,
2681     GDIPCONST GpPoint *points, INT count, GpFillMode fillMode)
2682 {
2683     INT save_state, i;
2684     GpPointF *ptf = NULL;
2685     POINT *pti = NULL;
2686     GpStatus retval = Ok;
2687
2688     TRACE("(%p, %p, %p, %d, %d)\n", graphics, brush, points, count, fillMode);
2689
2690     if(!graphics || !brush || !points || !count)
2691         return InvalidParameter;
2692
2693     if(graphics->busy)
2694         return ObjectBusy;
2695
2696     ptf = GdipAlloc(count * sizeof(GpPointF));
2697     pti = GdipAlloc(count * sizeof(POINT));
2698     if(!ptf || !pti){
2699         retval = OutOfMemory;
2700         goto end;
2701     }
2702
2703     for(i = 0; i < count; i ++){
2704         ptf[i].X = (REAL) points[i].X;
2705         ptf[i].Y = (REAL) points[i].Y;
2706     }
2707
2708     save_state = SaveDC(graphics->hdc);
2709     EndPath(graphics->hdc);
2710     SetPolyFillMode(graphics->hdc, (fillMode == FillModeAlternate ? ALTERNATE
2711                                                                   : WINDING));
2712
2713     transform_and_round_points(graphics, pti, ptf, count);
2714
2715     BeginPath(graphics->hdc);
2716     Polygon(graphics->hdc, pti, count);
2717     EndPath(graphics->hdc);
2718
2719     brush_fill_path(graphics, brush);
2720
2721     RestoreDC(graphics->hdc, save_state);
2722
2723 end:
2724     GdipFree(ptf);
2725     GdipFree(pti);
2726
2727     return retval;
2728 }
2729
2730 GpStatus WINGDIPAPI GdipFillPolygon2(GpGraphics *graphics, GpBrush *brush,
2731     GDIPCONST GpPointF *points, INT count)
2732 {
2733     TRACE("(%p, %p, %p, %d)\n", graphics, brush, points, count);
2734
2735     return GdipFillPolygon(graphics, brush, points, count, FillModeAlternate);
2736 }
2737
2738 GpStatus WINGDIPAPI GdipFillPolygon2I(GpGraphics *graphics, GpBrush *brush,
2739     GDIPCONST GpPoint *points, INT count)
2740 {
2741     TRACE("(%p, %p, %p, %d)\n", graphics, brush, points, count);
2742
2743     return GdipFillPolygonI(graphics, brush, points, count, FillModeAlternate);
2744 }
2745
2746 GpStatus WINGDIPAPI GdipFillRectangle(GpGraphics *graphics, GpBrush *brush,
2747     REAL x, REAL y, REAL width, REAL height)
2748 {
2749     INT save_state;
2750     GpPointF ptf[4];
2751     POINT pti[4];
2752
2753     TRACE("(%p, %p, %.2f, %.2f, %.2f, %.2f)\n", graphics, brush, x, y, width, height);
2754
2755     if(!graphics || !brush)
2756         return InvalidParameter;
2757
2758     if(graphics->busy)
2759         return ObjectBusy;
2760
2761     ptf[0].X = x;
2762     ptf[0].Y = y;
2763     ptf[1].X = x + width;
2764     ptf[1].Y = y;
2765     ptf[2].X = x + width;
2766     ptf[2].Y = y + height;
2767     ptf[3].X = x;
2768     ptf[3].Y = y + height;
2769
2770     save_state = SaveDC(graphics->hdc);
2771     EndPath(graphics->hdc);
2772
2773     transform_and_round_points(graphics, pti, ptf, 4);
2774
2775     BeginPath(graphics->hdc);
2776     Polygon(graphics->hdc, pti, 4);
2777     EndPath(graphics->hdc);
2778
2779     brush_fill_path(graphics, brush);
2780
2781     RestoreDC(graphics->hdc, save_state);
2782
2783     return Ok;
2784 }
2785
2786 GpStatus WINGDIPAPI GdipFillRectangleI(GpGraphics *graphics, GpBrush *brush,
2787     INT x, INT y, INT width, INT height)
2788 {
2789     INT save_state;
2790     GpPointF ptf[4];
2791     POINT pti[4];
2792
2793     TRACE("(%p, %p, %d, %d, %d, %d)\n", graphics, brush, x, y, width, height);
2794
2795     if(!graphics || !brush)
2796         return InvalidParameter;
2797
2798     if(graphics->busy)
2799         return ObjectBusy;
2800
2801     ptf[0].X = x;
2802     ptf[0].Y = y;
2803     ptf[1].X = x + width;
2804     ptf[1].Y = y;
2805     ptf[2].X = x + width;
2806     ptf[2].Y = y + height;
2807     ptf[3].X = x;
2808     ptf[3].Y = y + height;
2809
2810     save_state = SaveDC(graphics->hdc);
2811     EndPath(graphics->hdc);
2812
2813     transform_and_round_points(graphics, pti, ptf, 4);
2814
2815     BeginPath(graphics->hdc);
2816     Polygon(graphics->hdc, pti, 4);
2817     EndPath(graphics->hdc);
2818
2819     brush_fill_path(graphics, brush);
2820
2821     RestoreDC(graphics->hdc, save_state);
2822
2823     return Ok;
2824 }
2825
2826 GpStatus WINGDIPAPI GdipFillRectangles(GpGraphics *graphics, GpBrush *brush, GDIPCONST GpRectF *rects,
2827     INT count)
2828 {
2829     GpStatus ret;
2830     INT i;
2831
2832     TRACE("(%p, %p, %p, %d)\n", graphics, brush, rects, count);
2833
2834     if(!rects)
2835         return InvalidParameter;
2836
2837     for(i = 0; i < count; i++){
2838         ret = GdipFillRectangle(graphics, brush, rects[i].X, rects[i].Y, rects[i].Width, rects[i].Height);
2839         if(ret != Ok)   return ret;
2840     }
2841
2842     return Ok;
2843 }
2844
2845 GpStatus WINGDIPAPI GdipFillRectanglesI(GpGraphics *graphics, GpBrush *brush, GDIPCONST GpRect *rects,
2846     INT count)
2847 {
2848     GpRectF *rectsF;
2849     GpStatus ret;
2850     INT i;
2851
2852     TRACE("(%p, %p, %p, %d)\n", graphics, brush, rects, count);
2853
2854     if(!rects || count <= 0)
2855         return InvalidParameter;
2856
2857     rectsF = GdipAlloc(sizeof(GpRectF)*count);
2858     if(!rectsF)
2859         return OutOfMemory;
2860
2861     for(i = 0; i < count; i++){
2862         rectsF[i].X      = (REAL)rects[i].X;
2863         rectsF[i].Y      = (REAL)rects[i].Y;
2864         rectsF[i].X      = (REAL)rects[i].Width;
2865         rectsF[i].Height = (REAL)rects[i].Height;
2866     }
2867
2868     ret = GdipFillRectangles(graphics,brush,rectsF,count);
2869     GdipFree(rectsF);
2870
2871     return ret;
2872 }
2873
2874 /*****************************************************************************
2875  * GdipFillRegion [GDIPLUS.@]
2876  */
2877 GpStatus WINGDIPAPI GdipFillRegion(GpGraphics* graphics, GpBrush* brush,
2878         GpRegion* region)
2879 {
2880     INT save_state;
2881     GpStatus status;
2882     HRGN hrgn;
2883     RECT rc;
2884
2885     TRACE("(%p, %p, %p)\n", graphics, brush, region);
2886
2887     if (!(graphics && brush && region))
2888         return InvalidParameter;
2889
2890     if(graphics->busy)
2891         return ObjectBusy;
2892
2893     status = GdipGetRegionHRgn(region, graphics, &hrgn);
2894     if(status != Ok)
2895         return status;
2896
2897     save_state = SaveDC(graphics->hdc);
2898     EndPath(graphics->hdc);
2899
2900     ExtSelectClipRgn(graphics->hdc, hrgn, RGN_AND);
2901
2902     if (GetClipBox(graphics->hdc, &rc) != NULLREGION)
2903     {
2904         BeginPath(graphics->hdc);
2905         Rectangle(graphics->hdc, rc.left, rc.top, rc.right, rc.bottom);
2906         EndPath(graphics->hdc);
2907
2908         brush_fill_path(graphics, brush);
2909     }
2910
2911     RestoreDC(graphics->hdc, save_state);
2912
2913     DeleteObject(hrgn);
2914
2915     return Ok;
2916 }
2917
2918 GpStatus WINGDIPAPI GdipFlush(GpGraphics *graphics, GpFlushIntention intention)
2919 {
2920     static int calls;
2921
2922     if(!graphics)
2923         return InvalidParameter;
2924
2925     if(graphics->busy)
2926         return ObjectBusy;
2927
2928     if(!(calls++))
2929         FIXME("not implemented\n");
2930
2931     return NotImplemented;
2932 }
2933
2934 /*****************************************************************************
2935  * GdipGetClipBounds [GDIPLUS.@]
2936  */
2937 GpStatus WINGDIPAPI GdipGetClipBounds(GpGraphics *graphics, GpRectF *rect)
2938 {
2939     TRACE("(%p, %p)\n", graphics, rect);
2940
2941     if(!graphics)
2942         return InvalidParameter;
2943
2944     if(graphics->busy)
2945         return ObjectBusy;
2946
2947     return GdipGetRegionBounds(graphics->clip, graphics, rect);
2948 }
2949
2950 /*****************************************************************************
2951  * GdipGetClipBoundsI [GDIPLUS.@]
2952  */
2953 GpStatus WINGDIPAPI GdipGetClipBoundsI(GpGraphics *graphics, GpRect *rect)
2954 {
2955     TRACE("(%p, %p)\n", graphics, rect);
2956
2957     if(!graphics)
2958         return InvalidParameter;
2959
2960     if(graphics->busy)
2961         return ObjectBusy;
2962
2963     return GdipGetRegionBoundsI(graphics->clip, graphics, rect);
2964 }
2965
2966 /* FIXME: Compositing mode is not used anywhere except the getter/setter. */
2967 GpStatus WINGDIPAPI GdipGetCompositingMode(GpGraphics *graphics,
2968     CompositingMode *mode)
2969 {
2970     TRACE("(%p, %p)\n", graphics, mode);
2971
2972     if(!graphics || !mode)
2973         return InvalidParameter;
2974
2975     if(graphics->busy)
2976         return ObjectBusy;
2977
2978     *mode = graphics->compmode;
2979
2980     return Ok;
2981 }
2982
2983 /* FIXME: Compositing quality is not used anywhere except the getter/setter. */
2984 GpStatus WINGDIPAPI GdipGetCompositingQuality(GpGraphics *graphics,
2985     CompositingQuality *quality)
2986 {
2987     TRACE("(%p, %p)\n", graphics, quality);
2988
2989     if(!graphics || !quality)
2990         return InvalidParameter;
2991
2992     if(graphics->busy)
2993         return ObjectBusy;
2994
2995     *quality = graphics->compqual;
2996
2997     return Ok;
2998 }
2999
3000 /* FIXME: Interpolation mode is not used anywhere except the getter/setter. */
3001 GpStatus WINGDIPAPI GdipGetInterpolationMode(GpGraphics *graphics,
3002     InterpolationMode *mode)
3003 {
3004     TRACE("(%p, %p)\n", graphics, mode);
3005
3006     if(!graphics || !mode)
3007         return InvalidParameter;
3008
3009     if(graphics->busy)
3010         return ObjectBusy;
3011
3012     *mode = graphics->interpolation;
3013
3014     return Ok;
3015 }
3016
3017 GpStatus WINGDIPAPI GdipGetNearestColor(GpGraphics *graphics, ARGB* argb)
3018 {
3019     if(!graphics || !argb)
3020         return InvalidParameter;
3021
3022     if(graphics->busy)
3023         return ObjectBusy;
3024
3025     FIXME("(%p, %p): stub\n", graphics, argb);
3026
3027     return NotImplemented;
3028 }
3029
3030 GpStatus WINGDIPAPI GdipGetPageScale(GpGraphics *graphics, REAL *scale)
3031 {
3032     TRACE("(%p, %p)\n", graphics, scale);
3033
3034     if(!graphics || !scale)
3035         return InvalidParameter;
3036
3037     if(graphics->busy)
3038         return ObjectBusy;
3039
3040     *scale = graphics->scale;
3041
3042     return Ok;
3043 }
3044
3045 GpStatus WINGDIPAPI GdipGetPageUnit(GpGraphics *graphics, GpUnit *unit)
3046 {
3047     TRACE("(%p, %p)\n", graphics, unit);
3048
3049     if(!graphics || !unit)
3050         return InvalidParameter;
3051
3052     if(graphics->busy)
3053         return ObjectBusy;
3054
3055     *unit = graphics->unit;
3056
3057     return Ok;
3058 }
3059
3060 /* FIXME: Pixel offset mode is not used anywhere except the getter/setter. */
3061 GpStatus WINGDIPAPI GdipGetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
3062     *mode)
3063 {
3064     TRACE("(%p, %p)\n", graphics, mode);
3065
3066     if(!graphics || !mode)
3067         return InvalidParameter;
3068
3069     if(graphics->busy)
3070         return ObjectBusy;
3071
3072     *mode = graphics->pixeloffset;
3073
3074     return Ok;
3075 }
3076
3077 /* FIXME: Smoothing mode is not used anywhere except the getter/setter. */
3078 GpStatus WINGDIPAPI GdipGetSmoothingMode(GpGraphics *graphics, SmoothingMode *mode)
3079 {
3080     TRACE("(%p, %p)\n", graphics, mode);
3081
3082     if(!graphics || !mode)
3083         return InvalidParameter;
3084
3085     if(graphics->busy)
3086         return ObjectBusy;
3087
3088     *mode = graphics->smoothing;
3089
3090     return Ok;
3091 }
3092
3093 GpStatus WINGDIPAPI GdipGetTextContrast(GpGraphics *graphics, UINT *contrast)
3094 {
3095     TRACE("(%p, %p)\n", graphics, contrast);
3096
3097     if(!graphics || !contrast)
3098         return InvalidParameter;
3099
3100     *contrast = graphics->textcontrast;
3101
3102     return Ok;
3103 }
3104
3105 /* FIXME: Text rendering hint is not used anywhere except the getter/setter. */
3106 GpStatus WINGDIPAPI GdipGetTextRenderingHint(GpGraphics *graphics,
3107     TextRenderingHint *hint)
3108 {
3109     TRACE("(%p, %p)\n", graphics, hint);
3110
3111     if(!graphics || !hint)
3112         return InvalidParameter;
3113
3114     if(graphics->busy)
3115         return ObjectBusy;
3116
3117     *hint = graphics->texthint;
3118
3119     return Ok;
3120 }
3121
3122 GpStatus WINGDIPAPI GdipGetVisibleClipBounds(GpGraphics *graphics, GpRectF *rect)
3123 {
3124     GpRegion *clip_rgn;
3125     GpStatus stat;
3126     GpRectF wnd_rect;
3127
3128     TRACE("(%p, %p)\n", graphics, rect);
3129
3130     if(!graphics || !rect)
3131         return InvalidParameter;
3132
3133     if(graphics->busy)
3134         return ObjectBusy;
3135
3136     /* get window bounds */
3137     if((stat = get_graphics_bounds(graphics, &wnd_rect)) != Ok)
3138         return stat;
3139
3140     /* intersect window and graphics clipping regions */
3141     if((stat = GdipCreateRegion(&clip_rgn)) != Ok)
3142         return stat;
3143
3144     if((stat = GdipCombineRegionRect(clip_rgn, &wnd_rect, CombineModeIntersect)) != Ok)
3145         goto cleanup;
3146
3147     if((stat = GdipCombineRegionRegion(clip_rgn, graphics->clip, CombineModeIntersect)) != Ok)
3148         goto cleanup;
3149
3150     /* get bounds of the region */
3151     stat = GdipGetRegionBounds(clip_rgn, graphics, rect);
3152
3153 cleanup:
3154     GdipDeleteRegion(clip_rgn);
3155
3156     return stat;
3157 }
3158
3159 GpStatus WINGDIPAPI GdipGetVisibleClipBoundsI(GpGraphics *graphics, GpRect *rect)
3160 {
3161     GpRectF rectf;
3162     GpStatus stat;
3163
3164     TRACE("(%p, %p)\n", graphics, rect);
3165
3166     if(!graphics || !rect)
3167         return InvalidParameter;
3168
3169     if((stat = GdipGetVisibleClipBounds(graphics, &rectf)) == Ok)
3170     {
3171         rect->X = roundr(rectf.X);
3172         rect->Y = roundr(rectf.Y);
3173         rect->Width  = roundr(rectf.Width);
3174         rect->Height = roundr(rectf.Height);
3175     }
3176
3177     return stat;
3178 }
3179
3180 GpStatus WINGDIPAPI GdipGetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
3181 {
3182     TRACE("(%p, %p)\n", graphics, matrix);
3183
3184     if(!graphics || !matrix)
3185         return InvalidParameter;
3186
3187     if(graphics->busy)
3188         return ObjectBusy;
3189
3190     *matrix = *graphics->worldtrans;
3191     return Ok;
3192 }
3193
3194 GpStatus WINGDIPAPI GdipGraphicsClear(GpGraphics *graphics, ARGB color)
3195 {
3196     GpSolidFill *brush;
3197     GpStatus stat;
3198     GpRectF wnd_rect;
3199
3200     TRACE("(%p, %x)\n", graphics, color);
3201
3202     if(!graphics)
3203         return InvalidParameter;
3204
3205     if(graphics->busy)
3206         return ObjectBusy;
3207
3208     if((stat = GdipCreateSolidFill(color, &brush)) != Ok)
3209         return stat;
3210
3211     if((stat = get_graphics_bounds(graphics, &wnd_rect)) != Ok){
3212         GdipDeleteBrush((GpBrush*)brush);
3213         return stat;
3214     }
3215
3216     GdipFillRectangle(graphics, (GpBrush*)brush, wnd_rect.X, wnd_rect.Y,
3217                                                  wnd_rect.Width, wnd_rect.Height);
3218
3219     GdipDeleteBrush((GpBrush*)brush);
3220
3221     return Ok;
3222 }
3223
3224 GpStatus WINGDIPAPI GdipIsClipEmpty(GpGraphics *graphics, BOOL *res)
3225 {
3226     TRACE("(%p, %p)\n", graphics, res);
3227
3228     if(!graphics || !res)
3229         return InvalidParameter;
3230
3231     return GdipIsEmptyRegion(graphics->clip, graphics, res);
3232 }
3233
3234 GpStatus WINGDIPAPI GdipIsVisiblePoint(GpGraphics *graphics, REAL x, REAL y, BOOL *result)
3235 {
3236     FIXME("(%p, %.2f, %.2f, %p) stub\n", graphics, x, y, result);
3237
3238     if(!graphics || !result)
3239         return InvalidParameter;
3240
3241     if(graphics->busy)
3242         return ObjectBusy;
3243
3244     return NotImplemented;
3245 }
3246
3247 GpStatus WINGDIPAPI GdipIsVisiblePointI(GpGraphics *graphics, INT x, INT y, BOOL *result)
3248 {
3249     FIXME("(%p, %d, %d, %p) stub\n", graphics, x, y, result);
3250
3251     if(!graphics || !result)
3252         return InvalidParameter;
3253
3254     if(graphics->busy)
3255         return ObjectBusy;
3256
3257     return NotImplemented;
3258 }
3259
3260 GpStatus WINGDIPAPI GdipMeasureCharacterRanges(GpGraphics* graphics,
3261         GDIPCONST WCHAR* string, INT length, GDIPCONST GpFont* font,
3262         GDIPCONST RectF* layoutRect, GDIPCONST GpStringFormat *stringFormat,
3263         INT regionCount, GpRegion** regions)
3264 {
3265     if (!(graphics && string && font && layoutRect && stringFormat && regions))
3266         return InvalidParameter;
3267
3268     FIXME("stub: %p %s %d %p %p %p %d %p\n", graphics, debugstr_w(string),
3269             length, font, layoutRect, stringFormat, regionCount, regions);
3270
3271     return NotImplemented;
3272 }
3273
3274 /* Find the smallest rectangle that bounds the text when it is printed in rect
3275  * according to the format options listed in format. If rect has 0 width and
3276  * height, then just find the smallest rectangle that bounds the text when it's
3277  * printed at location (rect->X, rect-Y). */
3278 GpStatus WINGDIPAPI GdipMeasureString(GpGraphics *graphics,
3279     GDIPCONST WCHAR *string, INT length, GDIPCONST GpFont *font,
3280     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format, RectF *bounds,
3281     INT *codepointsfitted, INT *linesfilled)
3282 {
3283     HFONT oldfont;
3284     WCHAR* stringdup;
3285     INT sum = 0, height = 0, fit, fitcpy, max_width = 0, i, j, lret, nwidth,
3286         nheight, lineend;
3287     SIZE size;
3288
3289     TRACE("(%p, %s, %i, %p, %s, %p, %p, %p, %p)\n", graphics,
3290         debugstr_wn(string, length), length, font, debugstr_rectf(rect), format,
3291         bounds, codepointsfitted, linesfilled);
3292
3293     if(!graphics || !string || !font || !rect)
3294         return InvalidParameter;
3295
3296     if(linesfilled) *linesfilled = 0;
3297     if(codepointsfitted) *codepointsfitted = 0;
3298
3299     if(format)
3300         TRACE("may be ignoring some format flags: attr %x\n", format->attr);
3301
3302     if(length == -1) length = lstrlenW(string);
3303
3304     stringdup = GdipAlloc((length + 1) * sizeof(WCHAR));
3305     if(!stringdup) return OutOfMemory;
3306
3307     oldfont = SelectObject(graphics->hdc, CreateFontIndirectW(&font->lfw));
3308     nwidth = roundr(rect->Width);
3309     nheight = roundr(rect->Height);
3310
3311     if((nwidth == 0) && (nheight == 0))
3312         nwidth = nheight = INT_MAX;
3313
3314     for(i = 0, j = 0; i < length; i++){
3315         if(!isprintW(string[i]) && (string[i] != '\n'))
3316             continue;
3317
3318         stringdup[j] = string[i];
3319         j++;
3320     }
3321
3322     stringdup[j] = 0;
3323     length = j;
3324
3325     while(sum < length){
3326         GetTextExtentExPointW(graphics->hdc, stringdup + sum, length - sum,
3327                               nwidth, &fit, NULL, &size);
3328         fitcpy = fit;
3329
3330         if(fit == 0)
3331             break;
3332
3333         for(lret = 0; lret < fit; lret++)
3334             if(*(stringdup + sum + lret) == '\n')
3335                 break;
3336
3337         /* Line break code (may look strange, but it imitates windows). */
3338         if(lret < fit)
3339             lineend = fit = lret;    /* this is not an off-by-one error */
3340         else if(fit < (length - sum)){
3341             if(*(stringdup + sum + fit) == ' ')
3342                 while(*(stringdup + sum + fit) == ' ')
3343                     fit++;
3344             else
3345                 while(*(stringdup + sum + fit - 1) != ' '){
3346                     fit--;
3347
3348                     if(*(stringdup + sum + fit) == '\t')
3349                         break;
3350
3351                     if(fit == 0){
3352                         fit = fitcpy;
3353                         break;
3354                     }
3355                 }
3356             lineend = fit;
3357             while(*(stringdup + sum + lineend - 1) == ' ' ||
3358                   *(stringdup + sum + lineend - 1) == '\t')
3359                 lineend--;
3360         }
3361         else
3362             lineend = fit;
3363
3364         GetTextExtentExPointW(graphics->hdc, stringdup + sum, lineend,
3365                               nwidth, &j, NULL, &size);
3366
3367         sum += fit + (lret < fitcpy ? 1 : 0);
3368         if(codepointsfitted) *codepointsfitted = sum;
3369
3370         height += size.cy;
3371         if(linesfilled) *linesfilled += size.cy;
3372         max_width = max(max_width, size.cx);
3373
3374         if(height > nheight)
3375             break;
3376
3377         /* Stop if this was a linewrap (but not if it was a linebreak). */
3378         if((lret == fitcpy) && format && (format->attr & StringFormatFlagsNoWrap))
3379             break;
3380     }
3381
3382     bounds->X = rect->X;
3383     bounds->Y = rect->Y;
3384     bounds->Width = (REAL)max_width;
3385     bounds->Height = (REAL) min(height, nheight);
3386
3387     GdipFree(stringdup);
3388     DeleteObject(SelectObject(graphics->hdc, oldfont));
3389
3390     return Ok;
3391 }
3392
3393 GpStatus WINGDIPAPI GdipResetClip(GpGraphics *graphics)
3394 {
3395     TRACE("(%p)\n", graphics);
3396
3397     if(!graphics)
3398         return InvalidParameter;
3399
3400     if(graphics->busy)
3401         return ObjectBusy;
3402
3403     return GdipSetInfinite(graphics->clip);
3404 }
3405
3406 GpStatus WINGDIPAPI GdipResetWorldTransform(GpGraphics *graphics)
3407 {
3408     TRACE("(%p)\n", graphics);
3409
3410     if(!graphics)
3411         return InvalidParameter;
3412
3413     if(graphics->busy)
3414         return ObjectBusy;
3415
3416     graphics->worldtrans->matrix[0] = 1.0;
3417     graphics->worldtrans->matrix[1] = 0.0;
3418     graphics->worldtrans->matrix[2] = 0.0;
3419     graphics->worldtrans->matrix[3] = 1.0;
3420     graphics->worldtrans->matrix[4] = 0.0;
3421     graphics->worldtrans->matrix[5] = 0.0;
3422
3423     return Ok;
3424 }
3425
3426 GpStatus WINGDIPAPI GdipRestoreGraphics(GpGraphics *graphics, GraphicsState state)
3427 {
3428     return GdipEndContainer(graphics, state);
3429 }
3430
3431 GpStatus WINGDIPAPI GdipRotateWorldTransform(GpGraphics *graphics, REAL angle,
3432     GpMatrixOrder order)
3433 {
3434     TRACE("(%p, %.2f, %d)\n", graphics, angle, order);
3435
3436     if(!graphics)
3437         return InvalidParameter;
3438
3439     if(graphics->busy)
3440         return ObjectBusy;
3441
3442     return GdipRotateMatrix(graphics->worldtrans, angle, order);
3443 }
3444
3445 GpStatus WINGDIPAPI GdipSaveGraphics(GpGraphics *graphics, GraphicsState *state)
3446 {
3447     return GdipBeginContainer2(graphics, state);
3448 }
3449
3450 GpStatus WINGDIPAPI GdipBeginContainer2(GpGraphics *graphics,
3451         GraphicsContainer *state)
3452 {
3453     GraphicsContainerItem *container;
3454     GpStatus sts;
3455
3456     TRACE("(%p, %p)\n", graphics, state);
3457
3458     if(!graphics || !state)
3459         return InvalidParameter;
3460
3461     sts = init_container(&container, graphics);
3462     if(sts != Ok)
3463         return sts;
3464
3465     list_add_head(&graphics->containers, &container->entry);
3466     *state = graphics->contid = container->contid;
3467
3468     return Ok;
3469 }
3470
3471 GpStatus WINGDIPAPI GdipBeginContainer(GpGraphics *graphics, GDIPCONST GpRectF *dstrect, GDIPCONST GpRectF *srcrect, GpUnit unit, GraphicsContainer *state)
3472 {
3473     FIXME("(%p, %p, %p, %d, %p): stub\n", graphics, dstrect, srcrect, unit, state);
3474     return NotImplemented;
3475 }
3476
3477 GpStatus WINGDIPAPI GdipBeginContainerI(GpGraphics *graphics, GDIPCONST GpRect *dstrect, GDIPCONST GpRect *srcrect, GpUnit unit, GraphicsContainer *state)
3478 {
3479     FIXME("(%p, %p, %p, %d, %p): stub\n", graphics, dstrect, srcrect, unit, state);
3480     return NotImplemented;
3481 }
3482
3483 GpStatus WINGDIPAPI GdipComment(GpGraphics *graphics, UINT sizeData, GDIPCONST BYTE *data)
3484 {
3485     FIXME("(%p, %d, %p): stub\n", graphics, sizeData, data);
3486     return NotImplemented;
3487 }
3488
3489 GpStatus WINGDIPAPI GdipEndContainer(GpGraphics *graphics, GraphicsContainer state)
3490 {
3491     GpStatus sts;
3492     GraphicsContainerItem *container, *container2;
3493
3494     TRACE("(%p, %x)\n", graphics, state);
3495
3496     if(!graphics)
3497         return InvalidParameter;
3498
3499     LIST_FOR_EACH_ENTRY(container, &graphics->containers, GraphicsContainerItem, entry){
3500         if(container->contid == state)
3501             break;
3502     }
3503
3504     /* did not find a matching container */
3505     if(&container->entry == &graphics->containers)
3506         return Ok;
3507
3508     sts = restore_container(graphics, container);
3509     if(sts != Ok)
3510         return sts;
3511
3512     /* remove all of the containers on top of the found container */
3513     LIST_FOR_EACH_ENTRY_SAFE(container, container2, &graphics->containers, GraphicsContainerItem, entry){
3514         if(container->contid == state)
3515             break;
3516         list_remove(&container->entry);
3517         delete_container(container);
3518     }
3519
3520     list_remove(&container->entry);
3521     delete_container(container);
3522
3523     return Ok;
3524 }
3525
3526 GpStatus WINGDIPAPI GdipScaleWorldTransform(GpGraphics *graphics, REAL sx,
3527     REAL sy, GpMatrixOrder order)
3528 {
3529     TRACE("(%p, %.2f, %.2f, %d)\n", graphics, sx, sy, order);
3530
3531     if(!graphics)
3532         return InvalidParameter;
3533
3534     if(graphics->busy)
3535         return ObjectBusy;
3536
3537     return GdipScaleMatrix(graphics->worldtrans, sx, sy, order);
3538 }
3539
3540 GpStatus WINGDIPAPI GdipSetClipGraphics(GpGraphics *graphics, GpGraphics *srcgraphics,
3541     CombineMode mode)
3542 {
3543     TRACE("(%p, %p, %d)\n", graphics, srcgraphics, mode);
3544
3545     if(!graphics || !srcgraphics)
3546         return InvalidParameter;
3547
3548     return GdipCombineRegionRegion(graphics->clip, srcgraphics->clip, mode);
3549 }
3550
3551 GpStatus WINGDIPAPI GdipSetCompositingMode(GpGraphics *graphics,
3552     CompositingMode mode)
3553 {
3554     TRACE("(%p, %d)\n", graphics, mode);
3555
3556     if(!graphics)
3557         return InvalidParameter;
3558
3559     if(graphics->busy)
3560         return ObjectBusy;
3561
3562     graphics->compmode = mode;
3563
3564     return Ok;
3565 }
3566
3567 GpStatus WINGDIPAPI GdipSetCompositingQuality(GpGraphics *graphics,
3568     CompositingQuality quality)
3569 {
3570     TRACE("(%p, %d)\n", graphics, quality);
3571
3572     if(!graphics)
3573         return InvalidParameter;
3574
3575     if(graphics->busy)
3576         return ObjectBusy;
3577
3578     graphics->compqual = quality;
3579
3580     return Ok;
3581 }
3582
3583 GpStatus WINGDIPAPI GdipSetInterpolationMode(GpGraphics *graphics,
3584     InterpolationMode mode)
3585 {
3586     TRACE("(%p, %d)\n", graphics, mode);
3587
3588     if(!graphics)
3589         return InvalidParameter;
3590
3591     if(graphics->busy)
3592         return ObjectBusy;
3593
3594     graphics->interpolation = mode;
3595
3596     return Ok;
3597 }
3598
3599 GpStatus WINGDIPAPI GdipSetPageScale(GpGraphics *graphics, REAL scale)
3600 {
3601     TRACE("(%p, %.2f)\n", graphics, scale);
3602
3603     if(!graphics || (scale <= 0.0))
3604         return InvalidParameter;
3605
3606     if(graphics->busy)
3607         return ObjectBusy;
3608
3609     graphics->scale = scale;
3610
3611     return Ok;
3612 }
3613
3614 GpStatus WINGDIPAPI GdipSetPageUnit(GpGraphics *graphics, GpUnit unit)
3615 {
3616     TRACE("(%p, %d)\n", graphics, unit);
3617
3618     if(!graphics)
3619         return InvalidParameter;
3620
3621     if(graphics->busy)
3622         return ObjectBusy;
3623
3624     if(unit == UnitWorld)
3625         return InvalidParameter;
3626
3627     graphics->unit = unit;
3628
3629     return Ok;
3630 }
3631
3632 GpStatus WINGDIPAPI GdipSetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
3633     mode)
3634 {
3635     TRACE("(%p, %d)\n", graphics, mode);
3636
3637     if(!graphics)
3638         return InvalidParameter;
3639
3640     if(graphics->busy)
3641         return ObjectBusy;
3642
3643     graphics->pixeloffset = mode;
3644
3645     return Ok;
3646 }
3647
3648 GpStatus WINGDIPAPI GdipSetRenderingOrigin(GpGraphics *graphics, INT x, INT y)
3649 {
3650     static int calls;
3651
3652     TRACE("(%p,%i,%i)\n", graphics, x, y);
3653
3654     if (!(calls++))
3655         FIXME("not implemented\n");
3656
3657     return NotImplemented;
3658 }
3659
3660 GpStatus WINGDIPAPI GdipSetSmoothingMode(GpGraphics *graphics, SmoothingMode mode)
3661 {
3662     TRACE("(%p, %d)\n", graphics, mode);
3663
3664     if(!graphics)
3665         return InvalidParameter;
3666
3667     if(graphics->busy)
3668         return ObjectBusy;
3669
3670     graphics->smoothing = mode;
3671
3672     return Ok;
3673 }
3674
3675 GpStatus WINGDIPAPI GdipSetTextContrast(GpGraphics *graphics, UINT contrast)
3676 {
3677     TRACE("(%p, %d)\n", graphics, contrast);
3678
3679     if(!graphics)
3680         return InvalidParameter;
3681
3682     graphics->textcontrast = contrast;
3683
3684     return Ok;
3685 }
3686
3687 GpStatus WINGDIPAPI GdipSetTextRenderingHint(GpGraphics *graphics,
3688     TextRenderingHint hint)
3689 {
3690     TRACE("(%p, %d)\n", graphics, hint);
3691
3692     if(!graphics)
3693         return InvalidParameter;
3694
3695     if(graphics->busy)
3696         return ObjectBusy;
3697
3698     graphics->texthint = hint;
3699
3700     return Ok;
3701 }
3702
3703 GpStatus WINGDIPAPI GdipSetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
3704 {
3705     TRACE("(%p, %p)\n", graphics, matrix);
3706
3707     if(!graphics || !matrix)
3708         return InvalidParameter;
3709
3710     if(graphics->busy)
3711         return ObjectBusy;
3712
3713     GdipDeleteMatrix(graphics->worldtrans);
3714     return GdipCloneMatrix(matrix, &graphics->worldtrans);
3715 }
3716
3717 GpStatus WINGDIPAPI GdipTranslateWorldTransform(GpGraphics *graphics, REAL dx,
3718     REAL dy, GpMatrixOrder order)
3719 {
3720     TRACE("(%p, %.2f, %.2f, %d)\n", graphics, dx, dy, order);
3721
3722     if(!graphics)
3723         return InvalidParameter;
3724
3725     if(graphics->busy)
3726         return ObjectBusy;
3727
3728     return GdipTranslateMatrix(graphics->worldtrans, dx, dy, order);
3729 }
3730
3731 /*****************************************************************************
3732  * GdipSetClipHrgn [GDIPLUS.@]
3733  */
3734 GpStatus WINGDIPAPI GdipSetClipHrgn(GpGraphics *graphics, HRGN hrgn, CombineMode mode)
3735 {
3736     GpRegion *region;
3737     GpStatus status;
3738
3739     TRACE("(%p, %p, %d)\n", graphics, hrgn, mode);
3740
3741     if(!graphics)
3742         return InvalidParameter;
3743
3744     status = GdipCreateRegionHrgn(hrgn, &region);
3745     if(status != Ok)
3746         return status;
3747
3748     status = GdipSetClipRegion(graphics, region, mode);
3749
3750     GdipDeleteRegion(region);
3751     return status;
3752 }
3753
3754 GpStatus WINGDIPAPI GdipSetClipPath(GpGraphics *graphics, GpPath *path, CombineMode mode)
3755 {
3756     TRACE("(%p, %p, %d)\n", graphics, path, mode);
3757
3758     if(!graphics)
3759         return InvalidParameter;
3760
3761     if(graphics->busy)
3762         return ObjectBusy;
3763
3764     return GdipCombineRegionPath(graphics->clip, path, mode);
3765 }
3766
3767 GpStatus WINGDIPAPI GdipSetClipRect(GpGraphics *graphics, REAL x, REAL y,
3768                                     REAL width, REAL height,
3769                                     CombineMode mode)
3770 {
3771     GpRectF rect;
3772
3773     TRACE("(%p, %.2f, %.2f, %.2f, %.2f, %d)\n", graphics, x, y, width, height, mode);
3774
3775     if(!graphics)
3776         return InvalidParameter;
3777
3778     if(graphics->busy)
3779         return ObjectBusy;
3780
3781     rect.X = x;
3782     rect.Y = y;
3783     rect.Width  = width;
3784     rect.Height = height;
3785
3786     return GdipCombineRegionRect(graphics->clip, &rect, mode);
3787 }
3788
3789 GpStatus WINGDIPAPI GdipSetClipRectI(GpGraphics *graphics, INT x, INT y,
3790                                      INT width, INT height,
3791                                      CombineMode mode)
3792 {
3793     TRACE("(%p, %d, %d, %d, %d, %d)\n", graphics, x, y, width, height, mode);
3794
3795     if(!graphics)
3796         return InvalidParameter;
3797
3798     if(graphics->busy)
3799         return ObjectBusy;
3800
3801     return GdipSetClipRect(graphics, (REAL)x, (REAL)y, (REAL)width, (REAL)height, mode);
3802 }
3803
3804 GpStatus WINGDIPAPI GdipSetClipRegion(GpGraphics *graphics, GpRegion *region,
3805                                       CombineMode mode)
3806 {
3807     TRACE("(%p, %p, %d)\n", graphics, region, mode);
3808
3809     if(!graphics || !region)
3810         return InvalidParameter;
3811
3812     if(graphics->busy)
3813         return ObjectBusy;
3814
3815     return GdipCombineRegionRegion(graphics->clip, region, mode);
3816 }
3817
3818 GpStatus WINGDIPAPI GdipSetMetafileDownLevelRasterizationLimit(GpMetafile *metafile,
3819     UINT limitDpi)
3820 {
3821     static int calls;
3822
3823     if(!(calls++))
3824         FIXME("not implemented\n");
3825
3826     return NotImplemented;
3827 }
3828
3829 GpStatus WINGDIPAPI GdipDrawPolygon(GpGraphics *graphics,GpPen *pen,GDIPCONST GpPointF *points,
3830     INT count)
3831 {
3832     INT save_state;
3833     POINT *pti;
3834
3835     TRACE("(%p, %p, %d)\n", graphics, points, count);
3836
3837     if(!graphics || !pen || count<=0)
3838         return InvalidParameter;
3839
3840     if(graphics->busy)
3841         return ObjectBusy;
3842
3843     pti = GdipAlloc(sizeof(POINT) * count);
3844
3845     save_state = prepare_dc(graphics, pen);
3846     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
3847
3848     transform_and_round_points(graphics, pti, (GpPointF*)points, count);
3849     Polygon(graphics->hdc, pti, count);
3850
3851     restore_dc(graphics, save_state);
3852     GdipFree(pti);
3853
3854     return Ok;
3855 }
3856
3857 GpStatus WINGDIPAPI GdipDrawPolygonI(GpGraphics *graphics,GpPen *pen,GDIPCONST GpPoint *points,
3858     INT count)
3859 {
3860     GpStatus ret;
3861     GpPointF *ptf;
3862     INT i;
3863
3864     TRACE("(%p, %p, %p, %d)\n", graphics, pen, points, count);
3865
3866     if(count<=0)    return InvalidParameter;
3867     ptf = GdipAlloc(sizeof(GpPointF) * count);
3868
3869     for(i = 0;i < count; i++){
3870         ptf[i].X = (REAL)points[i].X;
3871         ptf[i].Y = (REAL)points[i].Y;
3872     }
3873
3874     ret = GdipDrawPolygon(graphics,pen,ptf,count);
3875     GdipFree(ptf);
3876
3877     return ret;
3878 }
3879
3880 GpStatus WINGDIPAPI GdipGetDpiX(GpGraphics *graphics, REAL* dpi)
3881 {
3882     TRACE("(%p, %p)\n", graphics, dpi);
3883
3884     if(!graphics || !dpi)
3885         return InvalidParameter;
3886
3887     if(graphics->busy)
3888         return ObjectBusy;
3889
3890     *dpi = (REAL)GetDeviceCaps(graphics->hdc, LOGPIXELSX);
3891
3892     return Ok;
3893 }
3894
3895 GpStatus WINGDIPAPI GdipGetDpiY(GpGraphics *graphics, REAL* dpi)
3896 {
3897     TRACE("(%p, %p)\n", graphics, dpi);
3898
3899     if(!graphics || !dpi)
3900         return InvalidParameter;
3901
3902     if(graphics->busy)
3903         return ObjectBusy;
3904
3905     *dpi = (REAL)GetDeviceCaps(graphics->hdc, LOGPIXELSY);
3906
3907     return Ok;
3908 }
3909
3910 GpStatus WINGDIPAPI GdipMultiplyWorldTransform(GpGraphics *graphics, GDIPCONST GpMatrix *matrix,
3911     GpMatrixOrder order)
3912 {
3913     GpMatrix m;
3914     GpStatus ret;
3915
3916     TRACE("(%p, %p, %d)\n", graphics, matrix, order);
3917
3918     if(!graphics || !matrix)
3919         return InvalidParameter;
3920
3921     if(graphics->busy)
3922         return ObjectBusy;
3923
3924     m = *(graphics->worldtrans);
3925
3926     ret = GdipMultiplyMatrix(&m, matrix, order);
3927     if(ret == Ok)
3928         *(graphics->worldtrans) = m;
3929
3930     return ret;
3931 }
3932
3933 GpStatus WINGDIPAPI GdipGetDC(GpGraphics *graphics, HDC *hdc)
3934 {
3935     TRACE("(%p, %p)\n", graphics, hdc);
3936
3937     if(!graphics || !hdc)
3938         return InvalidParameter;
3939
3940     if(graphics->busy)
3941         return ObjectBusy;
3942
3943     *hdc = graphics->hdc;
3944     graphics->busy = TRUE;
3945
3946     return Ok;
3947 }
3948
3949 GpStatus WINGDIPAPI GdipReleaseDC(GpGraphics *graphics, HDC hdc)
3950 {
3951     TRACE("(%p, %p)\n", graphics, hdc);
3952
3953     if(!graphics)
3954         return InvalidParameter;
3955
3956     if(graphics->hdc != hdc || !(graphics->busy))
3957         return InvalidParameter;
3958
3959     graphics->busy = FALSE;
3960
3961     return Ok;
3962 }
3963
3964 GpStatus WINGDIPAPI GdipGetClip(GpGraphics *graphics, GpRegion *region)
3965 {
3966     GpRegion *clip;
3967     GpStatus status;
3968
3969     TRACE("(%p, %p)\n", graphics, region);
3970
3971     if(!graphics || !region)
3972         return InvalidParameter;
3973
3974     if(graphics->busy)
3975         return ObjectBusy;
3976
3977     if((status = GdipCloneRegion(graphics->clip, &clip)) != Ok)
3978         return status;
3979
3980     /* free everything except root node and header */
3981     delete_element(&region->node);
3982     memcpy(region, clip, sizeof(GpRegion));
3983
3984     return Ok;
3985 }
3986
3987 GpStatus WINGDIPAPI GdipTransformPoints(GpGraphics *graphics, GpCoordinateSpace dst_space,
3988                                         GpCoordinateSpace src_space, GpPointF *points, INT count)
3989 {
3990     GpMatrix *matrix;
3991     GpStatus stat;
3992     REAL unitscale;
3993
3994     if(!graphics || !points || count <= 0)
3995         return InvalidParameter;
3996
3997     if(graphics->busy)
3998         return ObjectBusy;
3999
4000     TRACE("(%p, %d, %d, %p, %d)\n", graphics, dst_space, src_space, points, count);
4001
4002     if (src_space == dst_space) return Ok;
4003
4004     stat = GdipCreateMatrix(&matrix);
4005     if (stat == Ok)
4006     {
4007         unitscale = convert_unit(graphics->hdc, graphics->unit);
4008
4009         if(graphics->unit != UnitDisplay)
4010             unitscale *= graphics->scale;
4011
4012         /* transform from src_space to CoordinateSpacePage */
4013         switch (src_space)
4014         {
4015         case CoordinateSpaceWorld:
4016             GdipMultiplyMatrix(matrix, graphics->worldtrans, MatrixOrderAppend);
4017             break;
4018         case CoordinateSpacePage:
4019             break;
4020         case CoordinateSpaceDevice:
4021             GdipScaleMatrix(matrix, 1.0/unitscale, 1.0/unitscale, MatrixOrderAppend);
4022             break;
4023         }
4024
4025         /* transform from CoordinateSpacePage to dst_space */
4026         switch (dst_space)
4027         {
4028         case CoordinateSpaceWorld:
4029             {
4030                 GpMatrix *inverted_transform;
4031                 stat = GdipCloneMatrix(graphics->worldtrans, &inverted_transform);
4032                 if (stat == Ok)
4033                 {
4034                     stat = GdipInvertMatrix(inverted_transform);
4035                     if (stat == Ok)
4036                         GdipMultiplyMatrix(matrix, inverted_transform, MatrixOrderAppend);
4037                     GdipDeleteMatrix(inverted_transform);
4038                 }
4039                 break;
4040             }
4041         case CoordinateSpacePage:
4042             break;
4043         case CoordinateSpaceDevice:
4044             GdipScaleMatrix(matrix, unitscale, unitscale, MatrixOrderAppend);
4045             break;
4046         }
4047
4048         if (stat == Ok)
4049             stat = GdipTransformMatrixPoints(matrix, points, count);
4050
4051         GdipDeleteMatrix(matrix);
4052     }
4053
4054     return stat;
4055 }
4056
4057 GpStatus WINGDIPAPI GdipTransformPointsI(GpGraphics *graphics, GpCoordinateSpace dst_space,
4058                                          GpCoordinateSpace src_space, GpPoint *points, INT count)
4059 {
4060     GpPointF *pointsF;
4061     GpStatus ret;
4062     INT i;
4063
4064     TRACE("(%p, %d, %d, %p, %d)\n", graphics, dst_space, src_space, points, count);
4065
4066     if(count <= 0)
4067         return InvalidParameter;
4068
4069     pointsF = GdipAlloc(sizeof(GpPointF) * count);
4070     if(!pointsF)
4071         return OutOfMemory;
4072
4073     for(i = 0; i < count; i++){
4074         pointsF[i].X = (REAL)points[i].X;
4075         pointsF[i].Y = (REAL)points[i].Y;
4076     }
4077
4078     ret = GdipTransformPoints(graphics, dst_space, src_space, pointsF, count);
4079
4080     if(ret == Ok)
4081         for(i = 0; i < count; i++){
4082             points[i].X = roundr(pointsF[i].X);
4083             points[i].Y = roundr(pointsF[i].Y);
4084         }
4085     GdipFree(pointsF);
4086
4087     return ret;
4088 }
4089
4090 HPALETTE WINGDIPAPI GdipCreateHalftonePalette(void)
4091 {
4092     FIXME("\n");
4093
4094     return NULL;
4095 }
4096
4097 /*****************************************************************************
4098  * GdipTranslateClip [GDIPLUS.@]
4099  */
4100 GpStatus WINGDIPAPI GdipTranslateClip(GpGraphics *graphics, REAL dx, REAL dy)
4101 {
4102     TRACE("(%p, %.2f, %.2f)\n", graphics, dx, dy);
4103
4104     if(!graphics)
4105         return InvalidParameter;
4106
4107     if(graphics->busy)
4108         return ObjectBusy;
4109
4110     return GdipTranslateRegion(graphics->clip, dx, dy);
4111 }
4112
4113 /*****************************************************************************
4114  * GdipTranslateClipI [GDIPLUS.@]
4115  */
4116 GpStatus WINGDIPAPI GdipTranslateClipI(GpGraphics *graphics, INT dx, INT dy)
4117 {
4118     TRACE("(%p, %d, %d)\n", graphics, dx, dy);
4119
4120     if(!graphics)
4121         return InvalidParameter;
4122
4123     if(graphics->busy)
4124         return ObjectBusy;
4125
4126     return GdipTranslateRegion(graphics->clip, (REAL)dx, (REAL)dy);
4127 }
4128
4129
4130 /*****************************************************************************
4131  * GdipMeasureDriverString [GDIPLUS.@]
4132  */
4133 GpStatus WINGDIPAPI GdipMeasureDriverString(GpGraphics *graphics, GDIPCONST UINT16 *text, INT length,
4134                                             GDIPCONST GpFont *font, GDIPCONST PointF *positions,
4135                                             INT flags, GDIPCONST GpMatrix *matrix, RectF *boundingBox)
4136 {
4137     FIXME("(%p %p %d %p %p %d %p %p): stub\n", graphics, text, length, font, positions, flags, matrix, boundingBox);
4138     return NotImplemented;
4139 }
4140
4141 /*****************************************************************************
4142  * GdipDrawDriverString [GDIPLUS.@]
4143  */
4144 GpStatus WINGDIPAPI GdipDrawDriverString(GpGraphics *graphics, GDIPCONST UINT16 *text, INT length,
4145                                          GDIPCONST GpFont *font, GDIPCONST GpBrush *brush,
4146                                          GDIPCONST PointF *positions, INT flags,
4147                                          GDIPCONST GpMatrix *matrix )
4148 {
4149     FIXME("(%p %p %d %p %p %p %d %p): stub\n", graphics, text, length, font, brush, positions, flags, matrix);
4150     return NotImplemented;
4151 }
4152
4153 /*****************************************************************************
4154  * GdipRecordMetafileI [GDIPLUS.@]
4155  */
4156 GpStatus WINGDIPAPI GdipRecordMetafileI(HDC hdc, EmfType type, GDIPCONST GpRect *frameRect,
4157                                         MetafileFrameUnit frameUnit, GDIPCONST WCHAR *desc, GpMetafile **metafile)
4158 {
4159     FIXME("(%p %d %p %d %p %p): stub\n", hdc, type, frameRect, frameUnit, desc, metafile);
4160     return NotImplemented;
4161 }
4162
4163 /*****************************************************************************
4164  * GdipIsVisibleRectI [GDIPLUS.@]
4165  */
4166 GpStatus WINGDIPAPI GdipIsVisibleRectI(GpGraphics *graphics, INT x, INT y, INT width, INT height, BOOL *result)
4167 {
4168     FIXME("(%p %d %d %d %d %p): stub\n", graphics, x, y, width, height, result);
4169     return NotImplemented;
4170 }