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
  42 WINE_DEFAULT_DEBUG_CHANNEL(gdiplus);
  43
  44 /* looks-right constants */
  45 #define TENSION_CONST (0.3)
  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 /* GdipDrawPie/GdipFillPie helper function */
 177 static void draw_pie(GpGraphics *graphics, REAL x, REAL y, REAL width,
 178     REAL height, REAL startAngle, REAL sweepAngle)
 179 {
 180     GpPointF ptf[4];
 181     POINT pti[4];
 182
 183     ptf[0].X = x;
 184     ptf[0].Y = y;
 185     ptf[1].X = x + width;
 186     ptf[1].Y = y + height;
 187
 188     deg2xy(startAngle+sweepAngle, x + width / 2.0, y + width / 2.0, &ptf[2].X, &ptf[2].Y);
 189     deg2xy(startAngle, x + width / 2.0, y + width / 2.0, &ptf[3].X, &ptf[3].Y);
 190
 191     transform_and_round_points(graphics, pti, ptf, 4);
 192
 193     Pie(graphics->hdc, pti[0].x, pti[0].y, pti[1].x, pti[1].y, pti[2].x,
 194         pti[2].y, pti[3].x, pti[3].y);
 195 }
 196
 197 /* GdipDrawCurve helper function.
 198  * Calculates Bezier points from cardinal spline points. */
 199 static void calc_curve_bezier(CONST GpPointF *pts, REAL tension, REAL *x1,
 200     REAL *y1, REAL *x2, REAL *y2)
 201 {
 202     REAL xdiff, ydiff;
 203
 204     /* calculate tangent */
 205     xdiff = pts[2].X - pts[0].X;
 206     ydiff = pts[2].Y - pts[0].Y;
 207
 208     /* apply tangent to get control points */
 209     *x1 = pts[1].X - tension * xdiff;
 210     *y1 = pts[1].Y - tension * ydiff;
 211     *x2 = pts[1].X + tension * xdiff;
 212     *y2 = pts[1].Y + tension * ydiff;
 213 }
 214
 215 /* GdipDrawCurve helper function.
 216  * Calculates Bezier points from cardinal spline endpoints. */
 217 static void calc_curve_bezier_endp(REAL xend, REAL yend, REAL xadj, REAL yadj,
 218     REAL tension, REAL *x, REAL *y)
 219 {
 220     /* tangent at endpoints is the line from the endpoint to the adjacent point */
 221     *x = roundr(tension * (xadj - xend) + xend);
 222     *y = roundr(tension * (yadj - yend) + yend);
 223 }
 224
 225 /* Draws the linecap the specified color and size on the hdc.  The linecap is in
 226  * direction of the line from x1, y1 to x2, y2 and is anchored on x2, y2. Probably
 227  * should not be called on an hdc that has a path you care about. */
 228 static void draw_cap(GpGraphics *graphics, COLORREF color, GpLineCap cap, REAL size,
 229     const GpCustomLineCap *custom, REAL x1, REAL y1, REAL x2, REAL y2)
 230 {
 231     HGDIOBJ oldbrush = NULL, oldpen = NULL;
 232     GpMatrix *matrix = NULL;
 233     HBRUSH brush = NULL;
 234     HPEN pen = NULL;
 235     PointF ptf[4], *custptf = NULL;
 236     POINT pt[4], *custpt = NULL;
 237     BYTE *tp = NULL;
 238     REAL theta, dsmall, dbig, dx, dy = 0.0;
 239     INT i, count;
 240     LOGBRUSH lb;
 241     BOOL customstroke;
 242
 243     if((x1 == x2) && (y1 == y2))
 244         return;
 245
 246     theta = gdiplus_atan2(y2 - y1, x2 - x1);
 247
 248     customstroke = (cap == LineCapCustom) && custom && (!custom->fill);
 249     if(!customstroke){
 250         brush = CreateSolidBrush(color);
 251         lb.lbStyle = BS_SOLID;
 252         lb.lbColor = color;
 253         lb.lbHatch = 0;
 254         pen = ExtCreatePen(PS_GEOMETRIC | PS_SOLID | PS_ENDCAP_FLAT |
 255                            PS_JOIN_MITER, 1, &lb, 0,
 256                            NULL);
 257         oldbrush = SelectObject(graphics->hdc, brush);
 258         oldpen = SelectObject(graphics->hdc, pen);
 259     }
 260
 261     switch(cap){
 262         case LineCapFlat:
 263             break;
 264         case LineCapSquare:
 265         case LineCapSquareAnchor:
 266         case LineCapDiamondAnchor:
 267             size = size * (cap & LineCapNoAnchor ? ANCHOR_WIDTH : 1.0) / 2.0;
 268             if(cap == LineCapDiamondAnchor){
 269                 dsmall = cos(theta + M_PI_2) * size;
 270                 dbig = sin(theta + M_PI_2) * size;
 271             }
 272             else{
 273                 dsmall = cos(theta + M_PI_4) * size;
 274                 dbig = sin(theta + M_PI_4) * size;
 275             }
 276
 277             ptf[0].X = x2 - dsmall;
 278             ptf[1].X = x2 + dbig;
 279
 280             ptf[0].Y = y2 - dbig;
 281             ptf[3].Y = y2 + dsmall;
 282
 283             ptf[1].Y = y2 - dsmall;
 284             ptf[2].Y = y2 + dbig;
 285
 286             ptf[3].X = x2 - dbig;
 287             ptf[2].X = x2 + dsmall;
 288
 289             transform_and_round_points(graphics, pt, ptf, 4);
 290             Polygon(graphics->hdc, pt, 4);
 291
 292             break;
 293         case LineCapArrowAnchor:
 294             size = size * 4.0 / sqrt(3.0);
 295
 296             dx = cos(M_PI / 6.0 + theta) * size;
 297             dy = sin(M_PI / 6.0 + theta) * size;
 298
 299             ptf[0].X = x2 - dx;
 300             ptf[0].Y = y2 - dy;
 301
 302             dx = cos(- M_PI / 6.0 + theta) * size;
 303             dy = sin(- M_PI / 6.0 + theta) * size;
 304
 305             ptf[1].X = x2 - dx;
 306             ptf[1].Y = y2 - dy;
 307
 308             ptf[2].X = x2;
 309             ptf[2].Y = y2;
 310
 311             transform_and_round_points(graphics, pt, ptf, 3);
 312             Polygon(graphics->hdc, pt, 3);
 313
 314             break;
 315         case LineCapRoundAnchor:
 316             dx = dy = ANCHOR_WIDTH * size / 2.0;
 317
 318             ptf[0].X = x2 - dx;
 319             ptf[0].Y = y2 - dy;
 320             ptf[1].X = x2 + dx;
 321             ptf[1].Y = y2 + dy;
 322
 323             transform_and_round_points(graphics, pt, ptf, 2);
 324             Ellipse(graphics->hdc, pt[0].x, pt[0].y, pt[1].x, pt[1].y);
 325
 326             break;
 327         case LineCapTriangle:
 328             size = size / 2.0;
 329             dx = cos(M_PI_2 + theta) * size;
 330             dy = sin(M_PI_2 + theta) * size;
 331
 332             ptf[0].X = x2 - dx;
 333             ptf[0].Y = y2 - dy;
 334             ptf[1].X = x2 + dx;
 335             ptf[1].Y = y2 + dy;
 336
 337             dx = cos(theta) * size;
 338             dy = sin(theta) * size;
 339
 340             ptf[2].X = x2 + dx;
 341             ptf[2].Y = y2 + dy;
 342
 343             transform_and_round_points(graphics, pt, ptf, 3);
 344             Polygon(graphics->hdc, pt, 3);
 345
 346             break;
 347         case LineCapRound:
 348             dx = dy = size / 2.0;
 349
 350             ptf[0].X = x2 - dx;
 351             ptf[0].Y = y2 - dy;
 352             ptf[1].X = x2 + dx;
 353             ptf[1].Y = y2 + dy;
 354
 355             dx = -cos(M_PI_2 + theta) * size;
 356             dy = -sin(M_PI_2 + theta) * size;
 357
 358             ptf[2].X = x2 - dx;
 359             ptf[2].Y = y2 - dy;
 360             ptf[3].X = x2 + dx;
 361             ptf[3].Y = y2 + dy;
 362
 363             transform_and_round_points(graphics, pt, ptf, 4);
 364             Pie(graphics->hdc, pt[0].x, pt[0].y, pt[1].x, pt[1].y, pt[2].x,
 365                 pt[2].y, pt[3].x, pt[3].y);
 366
 367             break;
 368         case LineCapCustom:
 369             if(!custom)
 370                 break;
 371
 372             count = custom->pathdata.Count;
 373             custptf = GdipAlloc(count * sizeof(PointF));
 374             custpt = GdipAlloc(count * sizeof(POINT));
 375             tp = GdipAlloc(count);
 376
 377             if(!custptf || !custpt || !tp || (GdipCreateMatrix(&matrix) != Ok))
 378                 goto custend;
 379
 380             memcpy(custptf, custom->pathdata.Points, count * sizeof(PointF));
 381
 382             GdipScaleMatrix(matrix, size, size, MatrixOrderAppend);
 383             GdipRotateMatrix(matrix, (180.0 / M_PI) * (theta - M_PI_2),
 384                              MatrixOrderAppend);
 385             GdipTranslateMatrix(matrix, x2, y2, MatrixOrderAppend);
 386             GdipTransformMatrixPoints(matrix, custptf, count);
 387
 388             transform_and_round_points(graphics, custpt, custptf, count);
 389
 390             for(i = 0; i < count; i++)
 391                 tp[i] = convert_path_point_type(custom->pathdata.Types[i]);
 392
 393             if(custom->fill){
 394                 BeginPath(graphics->hdc);
 395                 PolyDraw(graphics->hdc, custpt, tp, count);
 396                 EndPath(graphics->hdc);
 397                 StrokeAndFillPath(graphics->hdc);
 398             }
 399             else
 400                 PolyDraw(graphics->hdc, custpt, tp, count);
 401
 402 custend:
 403             GdipFree(custptf);
 404             GdipFree(custpt);
 405             GdipFree(tp);
 406             GdipDeleteMatrix(matrix);
 407             break;
 408         default:
 409             break;
 410     }
 411
 412     if(!customstroke){
 413         SelectObject(graphics->hdc, oldbrush);
 414         SelectObject(graphics->hdc, oldpen);
 415         DeleteObject(brush);
 416         DeleteObject(pen);
 417     }
 418 }
 419
 420 /* Shortens the line by the given percent by changing x2, y2.
 421  * If percent is > 1.0 then the line will change direction.
 422  * If percent is negative it can lengthen the line. */
 423 static void shorten_line_percent(REAL x1, REAL  y1, REAL *x2, REAL *y2, REAL percent)
 424 {
 425     REAL dist, theta, dx, dy;
 426
 427     if((y1 == *y2) && (x1 == *x2))
 428         return;
 429
 430     dist = sqrt((*x2 - x1) * (*x2 - x1) + (*y2 - y1) * (*y2 - y1)) * -percent;
 431     theta = gdiplus_atan2((*y2 - y1), (*x2 - x1));
 432     dx = cos(theta) * dist;
 433     dy = sin(theta) * dist;
 434
 435     *x2 = *x2 + dx;
 436     *y2 = *y2 + dy;
 437 }
 438
 439 /* Shortens the line by the given amount by changing x2, y2.
 440  * If the amount is greater than the distance, the line will become length 0.
 441  * If the amount is negative, it can lengthen the line. */
 442 static void shorten_line_amt(REAL x1, REAL y1, REAL *x2, REAL *y2, REAL amt)
 443 {
 444     REAL dx, dy, percent;
 445
 446     dx = *x2 - x1;
 447     dy = *y2 - y1;
 448     if(dx == 0 && dy == 0)
 449         return;
 450
 451     percent = amt / sqrt(dx * dx + dy * dy);
 452     if(percent >= 1.0){
 453         *x2 = x1;
 454         *y2 = y1;
 455         return;
 456     }
 457
 458     shorten_line_percent(x1, y1, x2, y2, percent);
 459 }
 460
 461 /* Draws lines between the given points, and if caps is true then draws an endcap
 462  * at the end of the last line. */
 463 static GpStatus draw_polyline(GpGraphics *graphics, GpPen *pen,
 464     GDIPCONST GpPointF * pt, INT count, BOOL caps)
 465 {
 466     POINT *pti = NULL;
 467     GpPointF *ptcopy = NULL;
 468     GpStatus status = GenericError;
 469
 470     if(!count)
 471         return Ok;
 472
 473     pti = GdipAlloc(count * sizeof(POINT));
 474     ptcopy = GdipAlloc(count * sizeof(GpPointF));
 475
 476     if(!pti || !ptcopy){
 477         status = OutOfMemory;
 478         goto end;
 479     }
 480
 481     memcpy(ptcopy, pt, count * sizeof(GpPointF));
 482
 483     if(caps){
 484         if(pen->endcap == LineCapArrowAnchor)
 485             shorten_line_amt(ptcopy[count-2].X, ptcopy[count-2].Y,
 486                              &ptcopy[count-1].X, &ptcopy[count-1].Y, pen->width);
 487         else if((pen->endcap == LineCapCustom) && pen->customend)
 488             shorten_line_amt(ptcopy[count-2].X, ptcopy[count-2].Y,
 489                              &ptcopy[count-1].X, &ptcopy[count-1].Y,
 490                              pen->customend->inset * pen->width);
 491
 492         if(pen->startcap == LineCapArrowAnchor)
 493             shorten_line_amt(ptcopy[1].X, ptcopy[1].Y,
 494                              &ptcopy[0].X, &ptcopy[0].Y, pen->width);
 495         else if((pen->startcap == LineCapCustom) && pen->customstart)
 496             shorten_line_amt(ptcopy[1].X, ptcopy[1].Y,
 497                              &ptcopy[0].X, &ptcopy[0].Y,
 498                              pen->customstart->inset * pen->width);
 499
 500         draw_cap(graphics, pen->brush->lb.lbColor, pen->endcap, pen->width, pen->customend,
 501                  pt[count - 2].X, pt[count - 2].Y, pt[count - 1].X, pt[count - 1].Y);
 502         draw_cap(graphics, pen->brush->lb.lbColor, pen->startcap, pen->width, pen->customstart,
 503                          pt[1].X, pt[1].Y, pt[0].X, pt[0].Y);
 504     }
 505
 506     transform_and_round_points(graphics, pti, ptcopy, count);
 507
 508     if(Polyline(graphics->hdc, pti, count))
 509         status = Ok;
 510
 511 end:
 512     GdipFree(pti);
 513     GdipFree(ptcopy);
 514
 515     return status;
 516 }
 517
 518 /* Conducts a linear search to find the bezier points that will back off
 519  * the endpoint of the curve by a distance of amt. Linear search works
 520  * better than binary in this case because there are multiple solutions,
 521  * and binary searches often find a bad one. I don't think this is what
 522  * Windows does but short of rendering the bezier without GDI's help it's
 523  * the best we can do. If rev then work from the start of the passed points
 524  * instead of the end. */
 525 static void shorten_bezier_amt(GpPointF * pt, REAL amt, BOOL rev)
 526 {
 527     GpPointF origpt[4];
 528     REAL percent = 0.00, dx, dy, origx, origy, diff = -1.0;
 529     INT i, first = 0, second = 1, third = 2, fourth = 3;
 530
 531     if(rev){
 532         first = 3;
 533         second = 2;
 534         third = 1;
 535         fourth = 0;
 536     }
 537
 538     origx = pt[fourth].X;
 539     origy = pt[fourth].Y;
 540     memcpy(origpt, pt, sizeof(GpPointF) * 4);
 541
 542     for(i = 0; (i < MAX_ITERS) && (diff < amt); i++){
 543         /* reset bezier points to original values */
 544         memcpy(pt, origpt, sizeof(GpPointF) * 4);
 545         /* Perform magic on bezier points. Order is important here.*/
 546         shorten_line_percent(pt[third].X, pt[third].Y, &pt[fourth].X, &pt[fourth].Y, percent);
 547         shorten_line_percent(pt[second].X, pt[second].Y, &pt[third].X, &pt[third].Y, percent);
 548         shorten_line_percent(pt[third].X, pt[third].Y, &pt[fourth].X, &pt[fourth].Y, percent);
 549         shorten_line_percent(pt[first].X, pt[first].Y, &pt[second].X, &pt[second].Y, percent);
 550         shorten_line_percent(pt[second].X, pt[second].Y, &pt[third].X, &pt[third].Y, percent);
 551         shorten_line_percent(pt[third].X, pt[third].Y, &pt[fourth].X, &pt[fourth].Y, percent);
 552
 553         dx = pt[fourth].X - origx;
 554         dy = pt[fourth].Y - origy;
 555
 556         diff = sqrt(dx * dx + dy * dy);
 557         percent += 0.0005 * amt;
 558     }
 559 }
 560
 561 /* Draws bezier curves between given points, and if caps is true then draws an
 562  * endcap at the end of the last line. */
 563 static GpStatus draw_polybezier(GpGraphics *graphics, GpPen *pen,
 564     GDIPCONST GpPointF * pt, INT count, BOOL caps)
 565 {
 566     POINT *pti;
 567     GpPointF *ptcopy;
 568     GpStatus status = GenericError;
 569
 570     if(!count)
 571         return Ok;
 572
 573     pti = GdipAlloc(count * sizeof(POINT));
 574     ptcopy = GdipAlloc(count * sizeof(GpPointF));
 575
 576     if(!pti || !ptcopy){
 577         status = OutOfMemory;
 578         goto end;
 579     }
 580
 581     memcpy(ptcopy, pt, count * sizeof(GpPointF));
 582
 583     if(caps){
 584         if(pen->endcap == LineCapArrowAnchor)
 585             shorten_bezier_amt(&ptcopy[count-4], pen->width, FALSE);
 586         else if((pen->endcap == LineCapCustom) && pen->customend)
 587             shorten_bezier_amt(&ptcopy[count-4], pen->width * pen->customend->inset,
 588                                FALSE);
 589
 590         if(pen->startcap == LineCapArrowAnchor)
 591             shorten_bezier_amt(ptcopy, pen->width, TRUE);
 592         else if((pen->startcap == LineCapCustom) && pen->customstart)
 593             shorten_bezier_amt(ptcopy, pen->width * pen->customstart->inset, TRUE);
 594
 595         /* the direction of the line cap is parallel to the direction at the
 596          * end of the bezier (which, if it has been shortened, is not the same
 597          * as the direction from pt[count-2] to pt[count-1]) */
 598         draw_cap(graphics, pen->brush->lb.lbColor, pen->endcap, pen->width, pen->customend,
 599             pt[count - 1].X - (ptcopy[count - 1].X - ptcopy[count - 2].X),
 600             pt[count - 1].Y - (ptcopy[count - 1].Y - ptcopy[count - 2].Y),
 601             pt[count - 1].X, pt[count - 1].Y);
 602
 603         draw_cap(graphics, pen->brush->lb.lbColor, pen->startcap, pen->width, pen->customstart,
 604             pt[0].X - (ptcopy[0].X - ptcopy[1].X),
 605             pt[0].Y - (ptcopy[0].Y - ptcopy[1].Y), pt[0].X, pt[0].Y);
 606     }
 607
 608     transform_and_round_points(graphics, pti, ptcopy, count);
 609
 610     PolyBezier(graphics->hdc, pti, count);
 611
 612     status = Ok;
 613
 614 end:
 615     GdipFree(pti);
 616     GdipFree(ptcopy);
 617
 618     return status;
 619 }
 620
 621 /* Draws a combination of bezier curves and lines between points. */
 622 static GpStatus draw_poly(GpGraphics *graphics, GpPen *pen, GDIPCONST GpPointF * pt,
 623     GDIPCONST BYTE * types, INT count, BOOL caps)
 624 {
 625     POINT *pti = GdipAlloc(count * sizeof(POINT));
 626     BYTE *tp = GdipAlloc(count);
 627     GpPointF *ptcopy = GdipAlloc(count * sizeof(GpPointF));
 628     INT i, j;
 629     GpStatus status = GenericError;
 630
 631     if(!count){
 632         status = Ok;
 633         goto end;
 634     }
 635     if(!pti || !tp || !ptcopy){
 636         status = OutOfMemory;
 637         goto end;
 638     }
 639
 640     for(i = 1; i < count; i++){
 641         if((types[i] & PathPointTypePathTypeMask) == PathPointTypeBezier){
 642             if((i + 2 >= count) || !(types[i + 1] & PathPointTypeBezier)
 643                 || !(types[i + 1] & PathPointTypeBezier)){
 644                 ERR("Bad bezier points\n");
 645                 goto end;
 646             }
 647             i += 2;
 648         }
 649     }
 650
 651     memcpy(ptcopy, pt, count * sizeof(GpPointF));
 652
 653     /* If we are drawing caps, go through the points and adjust them accordingly,
 654      * and draw the caps. */
 655     if(caps){
 656         switch(types[count - 1] & PathPointTypePathTypeMask){
 657             case PathPointTypeBezier:
 658                 if(pen->endcap == LineCapArrowAnchor)
 659                     shorten_bezier_amt(&ptcopy[count - 4], pen->width, FALSE);
 660                 else if((pen->endcap == LineCapCustom) && pen->customend)
 661                     shorten_bezier_amt(&ptcopy[count - 4],
 662                                        pen->width * pen->customend->inset, FALSE);
 663
 664                 draw_cap(graphics, pen->brush->lb.lbColor, pen->endcap, pen->width, pen->customend,
 665                     pt[count - 1].X - (ptcopy[count - 1].X - ptcopy[count - 2].X),
 666                     pt[count - 1].Y - (ptcopy[count - 1].Y - ptcopy[count - 2].Y),
 667                     pt[count - 1].X, pt[count - 1].Y);
 668
 669                 break;
 670             case PathPointTypeLine:
 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,
 674                                      pen->width);
 675                 else if((pen->endcap == LineCapCustom) && pen->customend)
 676                     shorten_line_amt(ptcopy[count - 2].X, ptcopy[count - 2].Y,
 677                                      &ptcopy[count - 1].X, &ptcopy[count - 1].Y,
 678                                      pen->customend->inset * pen->width);
 679
 680                 draw_cap(graphics, pen->brush->lb.lbColor, pen->endcap, pen->width, pen->customend,
 681                          pt[count - 2].X, pt[count - 2].Y, pt[count - 1].X,
 682                          pt[count - 1].Y);
 683
 684                 break;
 685             default:
 686                 ERR("Bad path last point\n");
 687                 goto end;
 688         }
 689
 690         /* Find start of points */
 691         for(j = 1; j < count && ((types[j] & PathPointTypePathTypeMask)
 692             == PathPointTypeStart); j++);
 693
 694         switch(types[j] & PathPointTypePathTypeMask){
 695             case PathPointTypeBezier:
 696                 if(pen->startcap == LineCapArrowAnchor)
 697                     shorten_bezier_amt(&ptcopy[j - 1], pen->width, TRUE);
 698                 else if((pen->startcap == LineCapCustom) && pen->customstart)
 699                     shorten_bezier_amt(&ptcopy[j - 1],
 700                                        pen->width * pen->customstart->inset, TRUE);
 701
 702                 draw_cap(graphics, pen->brush->lb.lbColor, pen->startcap, pen->width, pen->customstart,
 703                     pt[j - 1].X - (ptcopy[j - 1].X - ptcopy[j].X),
 704                     pt[j - 1].Y - (ptcopy[j - 1].Y - ptcopy[j].Y),
 705                     pt[j - 1].X, pt[j - 1].Y);
 706
 707                 break;
 708             case PathPointTypeLine:
 709                 if(pen->startcap == LineCapArrowAnchor)
 710                     shorten_line_amt(ptcopy[j].X, ptcopy[j].Y,
 711                                      &ptcopy[j - 1].X, &ptcopy[j - 1].Y,
 712                                      pen->width);
 713                 else if((pen->startcap == LineCapCustom) && pen->customstart)
 714                     shorten_line_amt(ptcopy[j].X, ptcopy[j].Y,
 715                                      &ptcopy[j - 1].X, &ptcopy[j - 1].Y,
 716                                      pen->customstart->inset * pen->width);
 717
 718                 draw_cap(graphics, pen->brush->lb.lbColor, pen->startcap, pen->width, pen->customstart,
 719                          pt[j].X, pt[j].Y, pt[j - 1].X,
 720                          pt[j - 1].Y);
 721
 722                 break;
 723             default:
 724                 ERR("Bad path points\n");
 725                 goto end;
 726         }
 727     }
 728
 729     transform_and_round_points(graphics, pti, ptcopy, count);
 730
 731     for(i = 0; i < count; i++){
 732         tp[i] = convert_path_point_type(types[i]);
 733     }
 734
 735     PolyDraw(graphics->hdc, pti, tp, count);
 736
 737     status = Ok;
 738
 739 end:
 740     GdipFree(pti);
 741     GdipFree(ptcopy);
 742     GdipFree(tp);
 743
 744     return status;
 745 }
 746
 747 GpStatus WINGDIPAPI GdipCreateFromHDC(HDC hdc, GpGraphics **graphics)
 748 {
 749     return GdipCreateFromHDC2(hdc, NULL, graphics);
 750 }
 751
 752 GpStatus WINGDIPAPI GdipCreateFromHDC2(HDC hdc, HANDLE hDevice, GpGraphics **graphics)
 753 {
 754     GpStatus retval;
 755
 756     if(hDevice != NULL) {
 757         FIXME("Don't know how to hadle parameter hDevice\n");
 758         return NotImplemented;
 759     }
 760
 761     if(hdc == NULL)
 762         return OutOfMemory;
 763
 764     if(graphics == NULL)
 765         return InvalidParameter;
 766
 767     *graphics = GdipAlloc(sizeof(GpGraphics));
 768     if(!*graphics)  return OutOfMemory;
 769
 770     if((retval = GdipCreateMatrix(&(*graphics)->worldtrans)) != Ok){
 771         GdipFree(*graphics);
 772         return retval;
 773     }
 774
 775     (*graphics)->hdc = hdc;
 776     (*graphics)->hwnd = NULL;
 777     (*graphics)->smoothing = SmoothingModeDefault;
 778     (*graphics)->compqual = CompositingQualityDefault;
 779     (*graphics)->interpolation = InterpolationModeDefault;
 780     (*graphics)->pixeloffset = PixelOffsetModeDefault;
 781     (*graphics)->compmode = CompositingModeSourceOver;
 782     (*graphics)->unit = UnitDisplay;
 783     (*graphics)->scale = 1.0;
 784
 785     return Ok;
 786 }
 787
 788 GpStatus WINGDIPAPI GdipCreateFromHWND(HWND hwnd, GpGraphics **graphics)
 789 {
 790     GpStatus ret;
 791
 792     if((ret = GdipCreateFromHDC(GetDC(hwnd), graphics)) != Ok)
 793         return ret;
 794
 795     (*graphics)->hwnd = hwnd;
 796
 797     return Ok;
 798 }
 799
 800 /* FIXME: no icm handling */
 801 GpStatus WINGDIPAPI GdipCreateFromHWNDICM(HWND hwnd, GpGraphics **graphics)
 802 {
 803     return GdipCreateFromHWND(hwnd, graphics);
 804 }
 805
 806 GpStatus WINGDIPAPI GdipCreateMetafileFromEmf(HENHMETAFILE hemf, BOOL delete,
 807     GpMetafile **metafile)
 808 {
 809     static int calls;
 810
 811     if(!hemf || !metafile)
 812         return InvalidParameter;
 813
 814     if(!(calls++))
 815         FIXME("not implemented\n");
 816
 817     return NotImplemented;
 818 }
 819
 820 GpStatus WINGDIPAPI GdipCreateMetafileFromWmf(HMETAFILE hwmf, BOOL delete,
 821     GDIPCONST WmfPlaceableFileHeader * placeable, GpMetafile **metafile)
 822 {
 823     IStream *stream = NULL;
 824     UINT read;
 825     BYTE* copy;
 826     HENHMETAFILE hemf;
 827     GpStatus retval = GenericError;
 828
 829     if(!hwmf || !metafile || !placeable)
 830         return InvalidParameter;
 831
 832     *metafile = NULL;
 833     read = GetMetaFileBitsEx(hwmf, 0, NULL);
 834     if(!read)
 835         return GenericError;
 836     copy = GdipAlloc(read);
 837     GetMetaFileBitsEx(hwmf, read, copy);
 838
 839     hemf = SetWinMetaFileBits(read, copy, NULL, NULL);
 840     GdipFree(copy);
 841
 842     read = GetEnhMetaFileBits(hemf, 0, NULL);
 843     copy = GdipAlloc(read);
 844     GetEnhMetaFileBits(hemf, read, copy);
 845     DeleteEnhMetaFile(hemf);
 846
 847     if(CreateStreamOnHGlobal(copy, TRUE, &stream) != S_OK){
 848         ERR("could not make stream\n");
 849         GdipFree(copy);
 850         goto err;
 851     }
 852
 853     *metafile = GdipAlloc(sizeof(GpMetafile));
 854     if(!*metafile){
 855         retval = OutOfMemory;
 856         goto err;
 857     }
 858
 859     if(OleLoadPicture(stream, 0, FALSE, &IID_IPicture,
 860         (LPVOID*) &((*metafile)->image.picture)) != S_OK)
 861         goto err;
 862
 863
 864     (*metafile)->image.type = ImageTypeMetafile;
 865     (*metafile)->bounds.X = ((REAL) placeable->BoundingBox.Left) / ((REAL) placeable->Inch);
 866     (*metafile)->bounds.Y = ((REAL) placeable->BoundingBox.Right) / ((REAL) placeable->Inch);
 867     (*metafile)->bounds.Width = ((REAL) (placeable->BoundingBox.Right
 868                     - placeable->BoundingBox.Left)) / ((REAL) placeable->Inch);
 869     (*metafile)->bounds.Height = ((REAL) (placeable->BoundingBox.Bottom
 870                    - placeable->BoundingBox.Top)) / ((REAL) placeable->Inch);
 871     (*metafile)->unit = UnitInch;
 872
 873     if(delete)
 874         DeleteMetaFile(hwmf);
 875
 876     return Ok;
 877
 878 err:
 879     GdipFree(*metafile);
 880     IStream_Release(stream);
 881     return retval;
 882 }
 883
 884 GpStatus WINGDIPAPI GdipCreateStreamOnFile(GDIPCONST WCHAR * filename,
 885     UINT access, IStream **stream)
 886 {
 887     DWORD dwMode;
 888     HRESULT ret;
 889
 890     if(!stream || !filename)
 891         return InvalidParameter;
 892
 893     if(access & GENERIC_WRITE)
 894         dwMode = STGM_SHARE_DENY_WRITE | STGM_WRITE | STGM_CREATE;
 895     else if(access & GENERIC_READ)
 896         dwMode = STGM_SHARE_DENY_WRITE | STGM_READ | STGM_FAILIFTHERE;
 897     else
 898         return InvalidParameter;
 899
 900     ret = SHCreateStreamOnFileW(filename, dwMode, stream);
 901
 902     return hresult_to_status(ret);
 903 }
 904
 905 GpStatus WINGDIPAPI GdipDeleteGraphics(GpGraphics *graphics)
 906 {
 907     if(!graphics) return InvalidParameter;
 908     if(graphics->hwnd)
 909         ReleaseDC(graphics->hwnd, graphics->hdc);
 910
 911     GdipDeleteMatrix(graphics->worldtrans);
 912     HeapFree(GetProcessHeap(), 0, graphics);
 913
 914     return Ok;
 915 }
 916
 917 GpStatus WINGDIPAPI GdipDrawArc(GpGraphics *graphics, GpPen *pen, REAL x,
 918     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
 919 {
 920     INT save_state, num_pts;
 921     GpPointF points[MAX_ARC_PTS];
 922     GpStatus retval;
 923
 924     if(!graphics || !pen || width <= 0 || height <= 0)
 925         return InvalidParameter;
 926
 927     num_pts = arc2polybezier(points, x, y, width, height, startAngle, sweepAngle);
 928
 929     save_state = prepare_dc(graphics, pen);
 930
 931     retval = draw_polybezier(graphics, pen, points, num_pts, TRUE);
 932
 933     restore_dc(graphics, save_state);
 934
 935     return retval;
 936 }
 937
 938 GpStatus WINGDIPAPI GdipDrawArcI(GpGraphics *graphics, GpPen *pen, INT x,
 939     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
 940 {
 941     return GdipDrawArc(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
 942 }
 943
 944 GpStatus WINGDIPAPI GdipDrawBezier(GpGraphics *graphics, GpPen *pen, REAL x1,
 945     REAL y1, REAL x2, REAL y2, REAL x3, REAL y3, REAL x4, REAL y4)
 946 {
 947     INT save_state;
 948     GpPointF pt[4];
 949     GpStatus retval;
 950
 951     if(!graphics || !pen)
 952         return InvalidParameter;
 953
 954     pt[0].X = x1;
 955     pt[0].Y = y1;
 956     pt[1].X = x2;
 957     pt[1].Y = y2;
 958     pt[2].X = x3;
 959     pt[2].Y = y3;
 960     pt[3].X = x4;
 961     pt[3].Y = y4;
 962
 963     save_state = prepare_dc(graphics, pen);
 964
 965     retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
 966
 967     restore_dc(graphics, save_state);
 968
 969     return retval;
 970 }
 971
 972 GpStatus WINGDIPAPI GdipDrawBezierI(GpGraphics *graphics, GpPen *pen, INT x1,
 973     INT y1, INT x2, INT y2, INT x3, INT y3, INT x4, INT y4)
 974 {
 975     INT save_state;
 976     GpPointF pt[4];
 977     GpStatus retval;
 978
 979     if(!graphics || !pen)
 980         return InvalidParameter;
 981
 982     pt[0].X = x1;
 983     pt[0].Y = y1;
 984     pt[1].X = x2;
 985     pt[1].Y = y2;
 986     pt[2].X = x3;
 987     pt[2].Y = y3;
 988     pt[3].X = x4;
 989     pt[3].Y = y4;
 990
 991     save_state = prepare_dc(graphics, pen);
 992
 993     retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
 994
 995     restore_dc(graphics, save_state);
 996
 997     return retval;
 998 }
 999
1000 GpStatus WINGDIPAPI GdipDrawBeziers(GpGraphics *graphics, GpPen *pen,
1001     GDIPCONST GpPointF *points, INT count)
1002 {
1003     INT i;
1004     GpStatus ret;
1005
1006     if(!graphics || !pen || !points || (count <= 0))
1007         return InvalidParameter;
1008
1009     for(i = 0; i < floor(count / 4); i++){
1010         ret = GdipDrawBezier(graphics, pen,
1011                              points[4*i].X, points[4*i].Y,
1012                              points[4*i + 1].X, points[4*i + 1].Y,
1013                              points[4*i + 2].X, points[4*i + 2].Y,
1014                              points[4*i + 3].X, points[4*i + 3].Y);
1015         if(ret != Ok)
1016             return ret;
1017     }
1018
1019     return Ok;
1020 }
1021
1022 GpStatus WINGDIPAPI GdipDrawBeziersI(GpGraphics *graphics, GpPen *pen,
1023     GDIPCONST GpPoint *points, INT count)
1024 {
1025     GpPointF *pts;
1026     GpStatus ret;
1027     INT i;
1028
1029     if(!graphics || !pen || !points || (count <= 0))
1030         return InvalidParameter;
1031
1032     pts = GdipAlloc(sizeof(GpPointF) * count);
1033     if(!pts)
1034         return OutOfMemory;
1035
1036     for(i = 0; i < count; i++){
1037         pts[i].X = (REAL)points[i].X;
1038         pts[i].Y = (REAL)points[i].Y;
1039     }
1040
1041     ret = GdipDrawBeziers(graphics,pen,pts,count);
1042
1043     GdipFree(pts);
1044
1045     return ret;
1046 }
1047
1048 GpStatus WINGDIPAPI GdipDrawCurve(GpGraphics *graphics, GpPen *pen,
1049     GDIPCONST GpPointF *points, INT count)
1050 {
1051     return GdipDrawCurve2(graphics,pen,points,count,1.0);
1052 }
1053
1054 GpStatus WINGDIPAPI GdipDrawCurveI(GpGraphics *graphics, GpPen *pen,
1055     GDIPCONST GpPoint *points, INT count)
1056 {
1057     GpPointF *pointsF;
1058     GpStatus ret;
1059     INT i;
1060
1061     if(!points || count <= 0)
1062         return InvalidParameter;
1063
1064     pointsF = GdipAlloc(sizeof(GpPointF)*count);
1065     if(!pointsF)
1066         return OutOfMemory;
1067
1068     for(i = 0; i < count; i++){
1069         pointsF[i].X = (REAL)points[i].X;
1070         pointsF[i].Y = (REAL)points[i].Y;
1071     }
1072
1073     ret = GdipDrawCurve(graphics,pen,pointsF,count);
1074     GdipFree(pointsF);
1075
1076     return ret;
1077 }
1078
1079 /* Approximates cardinal spline with Bezier curves. */
1080 GpStatus WINGDIPAPI GdipDrawCurve2(GpGraphics *graphics, GpPen *pen,
1081     GDIPCONST GpPointF *points, INT count, REAL tension)
1082 {
1083     /* PolyBezier expects count*3-2 points. */
1084     INT i, len_pt = count*3-2, save_state;
1085     GpPointF *pt;
1086     REAL x1, x2, y1, y2;
1087     GpStatus retval;
1088
1089     if(!graphics || !pen)
1090         return InvalidParameter;
1091
1092     pt = GdipAlloc(len_pt * sizeof(GpPointF));
1093     tension = tension * TENSION_CONST;
1094
1095     calc_curve_bezier_endp(points[0].X, points[0].Y, points[1].X, points[1].Y,
1096         tension, &x1, &y1);
1097
1098     pt[0].X = points[0].X;
1099     pt[0].Y = points[0].Y;
1100     pt[1].X = x1;
1101     pt[1].Y = y1;
1102
1103     for(i = 0; i < count-2; i++){
1104         calc_curve_bezier(&(points[i]), tension, &x1, &y1, &x2, &y2);
1105
1106         pt[3*i+2].X = x1;
1107         pt[3*i+2].Y = y1;
1108         pt[3*i+3].X = points[i+1].X;
1109         pt[3*i+3].Y = points[i+1].Y;
1110         pt[3*i+4].X = x2;
1111         pt[3*i+4].Y = y2;
1112     }
1113
1114     calc_curve_bezier_endp(points[count-1].X, points[count-1].Y,
1115         points[count-2].X, points[count-2].Y, tension, &x1, &y1);
1116
1117     pt[len_pt-2].X = x1;
1118     pt[len_pt-2].Y = y1;
1119     pt[len_pt-1].X = points[count-1].X;
1120     pt[len_pt-1].Y = points[count-1].Y;
1121
1122     save_state = prepare_dc(graphics, pen);
1123
1124     retval = draw_polybezier(graphics, pen, pt, len_pt, TRUE);
1125
1126     GdipFree(pt);
1127     restore_dc(graphics, save_state);
1128
1129     return retval;
1130 }
1131
1132 GpStatus WINGDIPAPI GdipDrawCurve2I(GpGraphics *graphics, GpPen *pen,
1133     GDIPCONST GpPoint *points, INT count, REAL tension)
1134 {
1135     GpPointF *pointsF;
1136     GpStatus ret;
1137     INT i;
1138
1139     if(!points || count <= 0)
1140         return InvalidParameter;
1141
1142     pointsF = GdipAlloc(sizeof(GpPointF)*count);
1143     if(!pointsF)
1144         return OutOfMemory;
1145
1146     for(i = 0; i < count; i++){
1147         pointsF[i].X = (REAL)points[i].X;
1148         pointsF[i].Y = (REAL)points[i].Y;
1149     }
1150
1151     ret = GdipDrawCurve2(graphics,pen,pointsF,count,tension);
1152     GdipFree(pointsF);
1153
1154     return ret;
1155 }
1156
1157 GpStatus WINGDIPAPI GdipDrawEllipse(GpGraphics *graphics, GpPen *pen, REAL x,
1158     REAL y, REAL width, REAL height)
1159 {
1160     INT save_state;
1161     GpPointF ptf[2];
1162     POINT pti[2];
1163
1164     if(!graphics || !pen)
1165         return InvalidParameter;
1166
1167     ptf[0].X = x;
1168     ptf[0].Y = y;
1169     ptf[1].X = x + width;
1170     ptf[1].Y = y + height;
1171
1172     save_state = prepare_dc(graphics, pen);
1173     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
1174
1175     transform_and_round_points(graphics, pti, ptf, 2);
1176
1177     Ellipse(graphics->hdc, pti[0].x, pti[0].y, pti[1].x, pti[1].y);
1178
1179     restore_dc(graphics, save_state);
1180
1181     return Ok;
1182 }
1183
1184 GpStatus WINGDIPAPI GdipDrawEllipseI(GpGraphics *graphics, GpPen *pen, INT x,
1185     INT y, INT width, INT height)
1186 {
1187     return GdipDrawEllipse(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
1188 }
1189
1190
1191 GpStatus WINGDIPAPI GdipDrawImage(GpGraphics *graphics, GpImage *image, REAL x, REAL y)
1192 {
1193     /* IPicture::Render uses LONG coords */
1194     return GdipDrawImageI(graphics,image,roundr(x),roundr(y));
1195 }
1196
1197 GpStatus WINGDIPAPI GdipDrawImageI(GpGraphics *graphics, GpImage *image, INT x,
1198     INT y)
1199 {
1200     UINT width, height, srcw, srch;
1201
1202     if(!graphics || !image)
1203         return InvalidParameter;
1204
1205     GdipGetImageWidth(image, &width);
1206     GdipGetImageHeight(image, &height);
1207
1208     srcw = width * (((REAL) INCH_HIMETRIC) /
1209             ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSX)));
1210     srch = height * (((REAL) INCH_HIMETRIC) /
1211             ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSY)));
1212
1213     if(image->type != ImageTypeMetafile){
1214         y += height;
1215         height *= -1;
1216     }
1217
1218     IPicture_Render(image->picture, graphics->hdc, x, y, width, height,
1219                     0, 0, srcw, srch, NULL);
1220
1221     return Ok;
1222 }
1223
1224 /* FIXME: partially implemented (only works for rectangular parallelograms) */
1225 GpStatus WINGDIPAPI GdipDrawImagePointsRect(GpGraphics *graphics, GpImage *image,
1226      GDIPCONST GpPointF *points, INT count, REAL srcx, REAL srcy, REAL srcwidth,
1227      REAL srcheight, GpUnit srcUnit, GDIPCONST GpImageAttributes* imageAttributes,
1228      DrawImageAbort callback, VOID * callbackData)
1229 {
1230     GpPointF ptf[3];
1231     POINT pti[3];
1232     REAL dx, dy;
1233
1234     TRACE("%p %p %p %d %f %f %f %f %d %p %p %p\n", graphics, image, points, count,
1235           srcx, srcy, srcwidth, srcheight, srcUnit, imageAttributes, callback,
1236           callbackData);
1237
1238     if(!graphics || !image || !points || count != 3)
1239          return InvalidParameter;
1240
1241     if(srcUnit == UnitInch)
1242         dx = dy = (REAL) INCH_HIMETRIC;
1243     else if(srcUnit == UnitPixel){
1244         dx = ((REAL) INCH_HIMETRIC) /
1245              ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSX));
1246         dy = ((REAL) INCH_HIMETRIC) /
1247              ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSY));
1248     }
1249     else
1250         return NotImplemented;
1251
1252     memcpy(ptf, points, 3 * sizeof(GpPointF));
1253     transform_and_round_points(graphics, pti, ptf, 3);
1254
1255     /* IPicture renders bitmaps with the y-axis reversed
1256      * FIXME: flipping for unknown image type might not be correct. */
1257     if(image->type != ImageTypeMetafile){
1258         INT temp;
1259         temp = pti[0].y;
1260         pti[0].y = pti[2].y;
1261         pti[2].y = temp;
1262     }
1263
1264     if(IPicture_Render(image->picture, graphics->hdc,
1265         pti[0].x, pti[0].y, pti[1].x - pti[0].x, pti[2].y - pti[0].y,
1266         srcx * dx, srcy * dy,
1267         srcwidth * dx, srcheight * dy,
1268         NULL) != S_OK){
1269         if(callback)
1270             callback(callbackData);
1271         return GenericError;
1272     }
1273
1274     return Ok;
1275 }
1276
1277 GpStatus WINGDIPAPI GdipDrawImagePointsRectI(GpGraphics *graphics, GpImage *image,
1278      GDIPCONST GpPoint *points, INT count, INT srcx, INT srcy, INT srcwidth,
1279      INT srcheight, GpUnit srcUnit, GDIPCONST GpImageAttributes* imageAttributes,
1280      DrawImageAbort callback, VOID * callbackData)
1281 {
1282     GpPointF pointsF[3];
1283     INT i;
1284
1285     if(!points || count!=3)
1286         return InvalidParameter;
1287
1288     for(i = 0; i < count; i++){
1289         pointsF[i].X = (REAL)points[i].X;
1290         pointsF[i].Y = (REAL)points[i].Y;
1291     }
1292
1293     return GdipDrawImagePointsRect(graphics, image, pointsF, count, (REAL)srcx, (REAL)srcy,
1294                                    (REAL)srcwidth, (REAL)srcheight, srcUnit, imageAttributes,
1295                                    callback, callbackData);
1296 }
1297
1298 GpStatus WINGDIPAPI GdipDrawImageRectRect(GpGraphics *graphics, GpImage *image,
1299     REAL dstx, REAL dsty, REAL dstwidth, REAL dstheight, REAL srcx, REAL srcy,
1300     REAL srcwidth, REAL srcheight, GpUnit srcUnit,
1301     GDIPCONST GpImageAttributes* imageattr, DrawImageAbort callback,
1302     VOID * callbackData)
1303 {
1304     GpPointF points[3];
1305
1306     points[0].X = dstx;
1307     points[0].Y = dsty;
1308     points[1].X = dstx + dstwidth;
1309     points[1].Y = dsty;
1310     points[2].X = dstx;
1311     points[2].Y = dsty + dstheight;
1312
1313     return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
1314                srcwidth, srcheight, srcUnit, imageattr, callback, callbackData);
1315 }
1316
1317 GpStatus WINGDIPAPI GdipDrawImageRectRectI(GpGraphics *graphics, GpImage *image,
1318         INT dstx, INT dsty, INT dstwidth, INT dstheight, INT srcx, INT srcy,
1319         INT srcwidth, INT srcheight, GpUnit srcUnit,
1320         GDIPCONST GpImageAttributes* imageAttributes, DrawImageAbort callback,
1321         VOID * callbackData)
1322 {
1323    GpPointF points[3];
1324
1325     points[0].X = dstx;
1326     points[0].Y = dsty;
1327     points[1].X = dstx + dstwidth;
1328     points[1].Y = dsty;
1329     points[2].X = dstx;
1330     points[2].Y = dsty + dstheight;
1331
1332     return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
1333                srcwidth, srcheight, srcUnit, imageAttributes, callback, callbackData);
1334 }
1335
1336 GpStatus WINGDIPAPI GdipDrawImageRect(GpGraphics *graphics, GpImage *image,
1337     REAL x, REAL y, REAL width, REAL height)
1338 {
1339     RectF bounds;
1340     GpUnit unit;
1341     GpStatus ret;
1342
1343     if(!graphics || !image)
1344         return InvalidParameter;
1345
1346     ret = GdipGetImageBounds(image, &bounds, &unit);
1347     if(ret != Ok)
1348         return ret;
1349
1350     return GdipDrawImageRectRect(graphics, image, x, y, width, height,
1351                                  bounds.X, bounds.Y, bounds.Width, bounds.Height,
1352                                  unit, NULL, NULL, NULL);
1353 }
1354
1355 GpStatus WINGDIPAPI GdipDrawImageRectI(GpGraphics *graphics, GpImage *image,
1356     INT x, INT y, INT width, INT height)
1357 {
1358     return GdipDrawImageRect(graphics, image, (REAL)x, (REAL)y, (REAL)width, (REAL)height);
1359 }
1360
1361 GpStatus WINGDIPAPI GdipDrawLine(GpGraphics *graphics, GpPen *pen, REAL x1,
1362     REAL y1, REAL x2, REAL y2)
1363 {
1364     INT save_state;
1365     GpPointF pt[2];
1366     GpStatus retval;
1367
1368     if(!pen || !graphics)
1369         return InvalidParameter;
1370
1371     pt[0].X = x1;
1372     pt[0].Y = y1;
1373     pt[1].X = x2;
1374     pt[1].Y = y2;
1375
1376     save_state = prepare_dc(graphics, pen);
1377
1378     retval = draw_polyline(graphics, pen, pt, 2, TRUE);
1379
1380     restore_dc(graphics, save_state);
1381
1382     return retval;
1383 }
1384
1385 GpStatus WINGDIPAPI GdipDrawLineI(GpGraphics *graphics, GpPen *pen, INT x1,
1386     INT y1, INT x2, INT y2)
1387 {
1388     INT save_state;
1389     GpPointF pt[2];
1390     GpStatus retval;
1391
1392     if(!pen || !graphics)
1393         return InvalidParameter;
1394
1395     pt[0].X = (REAL)x1;
1396     pt[0].Y = (REAL)y1;
1397     pt[1].X = (REAL)x2;
1398     pt[1].Y = (REAL)y2;
1399
1400     save_state = prepare_dc(graphics, pen);
1401
1402     retval = draw_polyline(graphics, pen, pt, 2, TRUE);
1403
1404     restore_dc(graphics, save_state);
1405
1406     return retval;
1407 }
1408
1409 GpStatus WINGDIPAPI GdipDrawLines(GpGraphics *graphics, GpPen *pen, GDIPCONST
1410     GpPointF *points, INT count)
1411 {
1412     INT save_state;
1413     GpStatus retval;
1414
1415     if(!pen || !graphics || (count < 2))
1416         return InvalidParameter;
1417
1418     save_state = prepare_dc(graphics, pen);
1419
1420     retval = draw_polyline(graphics, pen, points, count, TRUE);
1421
1422     restore_dc(graphics, save_state);
1423
1424     return retval;
1425 }
1426
1427 GpStatus WINGDIPAPI GdipDrawLinesI(GpGraphics *graphics, GpPen *pen, GDIPCONST
1428     GpPoint *points, INT count)
1429 {
1430     INT save_state;
1431     GpStatus retval;
1432     GpPointF *ptf = NULL;
1433     int i;
1434
1435     if(!pen || !graphics || (count < 2))
1436         return InvalidParameter;
1437
1438     ptf = GdipAlloc(count * sizeof(GpPointF));
1439     if(!ptf) return OutOfMemory;
1440
1441     for(i = 0; i < count; i ++){
1442         ptf[i].X = (REAL) points[i].X;
1443         ptf[i].Y = (REAL) points[i].Y;
1444     }
1445
1446     save_state = prepare_dc(graphics, pen);
1447
1448     retval = draw_polyline(graphics, pen, ptf, count, TRUE);
1449
1450     restore_dc(graphics, save_state);
1451
1452     GdipFree(ptf);
1453     return retval;
1454 }
1455
1456 GpStatus WINGDIPAPI GdipDrawPath(GpGraphics *graphics, GpPen *pen, GpPath *path)
1457 {
1458     INT save_state;
1459     GpStatus retval;
1460
1461     if(!pen || !graphics)
1462         return InvalidParameter;
1463
1464     save_state = prepare_dc(graphics, pen);
1465
1466     retval = draw_poly(graphics, pen, path->pathdata.Points,
1467                        path->pathdata.Types, path->pathdata.Count, TRUE);
1468
1469     restore_dc(graphics, save_state);
1470
1471     return retval;
1472 }
1473
1474 GpStatus WINGDIPAPI GdipDrawPie(GpGraphics *graphics, GpPen *pen, REAL x,
1475     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
1476 {
1477     INT save_state;
1478
1479     if(!graphics || !pen)
1480         return InvalidParameter;
1481
1482     save_state = prepare_dc(graphics, pen);
1483     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
1484
1485     draw_pie(graphics, x, y, width, height, startAngle, sweepAngle);
1486
1487     restore_dc(graphics, save_state);
1488
1489     return Ok;
1490 }
1491
1492 GpStatus WINGDIPAPI GdipDrawPieI(GpGraphics *graphics, GpPen *pen, INT x,
1493     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
1494 {
1495     return GdipDrawPie(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
1496 }
1497
1498 GpStatus WINGDIPAPI GdipDrawRectangle(GpGraphics *graphics, GpPen *pen, REAL x,
1499     REAL y, REAL width, REAL height)
1500 {
1501     INT save_state;
1502     GpPointF ptf[4];
1503     POINT pti[4];
1504
1505     if(!pen || !graphics)
1506         return InvalidParameter;
1507
1508     ptf[0].X = x;
1509     ptf[0].Y = y;
1510     ptf[1].X = x + width;
1511     ptf[1].Y = y;
1512     ptf[2].X = x + width;
1513     ptf[2].Y = y + height;
1514     ptf[3].X = x;
1515     ptf[3].Y = y + height;
1516
1517     save_state = prepare_dc(graphics, pen);
1518     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
1519
1520     transform_and_round_points(graphics, pti, ptf, 4);
1521     Polygon(graphics->hdc, pti, 4);
1522
1523     restore_dc(graphics, save_state);
1524
1525     return Ok;
1526 }
1527
1528 GpStatus WINGDIPAPI GdipDrawRectangleI(GpGraphics *graphics, GpPen *pen, INT x,
1529     INT y, INT width, INT height)
1530 {
1531     return GdipDrawRectangle(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
1532 }
1533
1534 GpStatus WINGDIPAPI GdipDrawRectangles(GpGraphics *graphics, GpPen *pen,
1535     GDIPCONST GpRectF* rects, INT count)
1536 {
1537     GpPointF *ptf;
1538     POINT *pti;
1539     INT save_state, i;
1540
1541     if(!graphics || !pen || !rects || count < 1)
1542         return InvalidParameter;
1543
1544     ptf = GdipAlloc(4 * count * sizeof(GpPointF));
1545     pti = GdipAlloc(4 * count * sizeof(POINT));
1546
1547     if(!ptf || !pti){
1548         GdipFree(ptf);
1549         GdipFree(pti);
1550         return OutOfMemory;
1551     }
1552
1553     for(i = 0; i < count; i++){
1554         ptf[4 * i + 3].X = ptf[4 * i].X = rects[i].X;
1555         ptf[4 * i + 1].Y = ptf[4 * i].Y = rects[i].Y;
1556         ptf[4 * i + 2].X = ptf[4 * i + 1].X = rects[i].X + rects[i].Width;
1557         ptf[4 * i + 3].Y = ptf[4 * i + 2].Y = rects[i].Y + rects[i].Height;
1558     }
1559
1560     save_state = prepare_dc(graphics, pen);
1561     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
1562
1563     transform_and_round_points(graphics, pti, ptf, 4 * count);
1564
1565     for(i = 0; i < count; i++)
1566         Polygon(graphics->hdc, &pti[4 * i], 4);
1567
1568     restore_dc(graphics, save_state);
1569
1570     GdipFree(ptf);
1571     GdipFree(pti);
1572
1573     return Ok;
1574 }
1575
1576 GpStatus WINGDIPAPI GdipDrawRectanglesI(GpGraphics *graphics, GpPen *pen,
1577     GDIPCONST GpRect* rects, INT count)
1578 {
1579     GpRectF *rectsF;
1580     GpStatus ret;
1581     INT i;
1582
1583     if(!rects || count<=0)
1584         return InvalidParameter;
1585
1586     rectsF = GdipAlloc(sizeof(GpRectF) * count);
1587     if(!rectsF)
1588         return OutOfMemory;
1589
1590     for(i = 0;i < count;i++){
1591         rectsF[i].X      = (REAL)rects[i].X;
1592         rectsF[i].Y      = (REAL)rects[i].Y;
1593         rectsF[i].Width  = (REAL)rects[i].Width;
1594         rectsF[i].Height = (REAL)rects[i].Height;
1595     }
1596
1597     ret = GdipDrawRectangles(graphics, pen, rectsF, count);
1598     GdipFree(rectsF);
1599
1600     return ret;
1601 }
1602
1603 GpStatus WINGDIPAPI GdipDrawString(GpGraphics *graphics, GDIPCONST WCHAR *string,
1604     INT length, GDIPCONST GpFont *font, GDIPCONST RectF *rect,
1605     GDIPCONST GpStringFormat *format, GDIPCONST GpBrush *brush)
1606 {
1607     HRGN rgn = NULL;
1608     HFONT gdifont;
1609     LOGFONTW lfw;
1610     TEXTMETRICW textmet;
1611     GpPointF pt[2], rectcpy[4];
1612     POINT corners[4];
1613     WCHAR* stringdup;
1614     REAL angle, ang_cos, ang_sin, rel_width, rel_height;
1615     INT sum = 0, height = 0, fit, fitcpy, save_state, i, j, lret, nwidth,
1616         nheight;
1617     SIZE size;
1618     RECT drawcoord;
1619
1620     if(!graphics || !string || !font || !brush || !rect)
1621         return InvalidParameter;
1622
1623     if((brush->bt != BrushTypeSolidColor)){
1624         FIXME("not implemented for given parameters\n");
1625         return NotImplemented;
1626     }
1627
1628     if(format)
1629         TRACE("may be ignoring some format flags: attr %x\n", format->attr);
1630
1631     if(length == -1) length = lstrlenW(string);
1632
1633     stringdup = GdipAlloc(length * sizeof(WCHAR));
1634     if(!stringdup) return OutOfMemory;
1635
1636     save_state = SaveDC(graphics->hdc);
1637     SetBkMode(graphics->hdc, TRANSPARENT);
1638     SetTextColor(graphics->hdc, brush->lb.lbColor);
1639
1640     rectcpy[3].X = rectcpy[0].X = rect->X;
1641     rectcpy[1].Y = rectcpy[0].Y = rect->Y;
1642     rectcpy[2].X = rectcpy[1].X = rect->X + rect->Width;
1643     rectcpy[3].Y = rectcpy[2].Y = rect->Y + rect->Height;
1644     transform_and_round_points(graphics, corners, rectcpy, 4);
1645
1646     if(roundr(rect->Width) == 0 && roundr(rect->Height) == 0){
1647         rel_width = rel_height = 1.0;
1648         nwidth = nheight = INT_MAX;
1649     }
1650     else{
1651         rel_width = sqrt((corners[1].x - corners[0].x) * (corners[1].x - corners[0].x) +
1652                          (corners[1].y - corners[0].y) * (corners[1].y - corners[0].y))
1653                          / rect->Width;
1654         rel_height = sqrt((corners[2].x - corners[1].x) * (corners[2].x - corners[1].x) +
1655                           (corners[2].y - corners[1].y) * (corners[2].y - corners[1].y))
1656                           / rect->Height;
1657
1658         nwidth = roundr(rel_width * rect->Width);
1659         nheight = roundr(rel_height * rect->Height);
1660         rgn = CreatePolygonRgn(corners, 4, ALTERNATE);
1661         SelectClipRgn(graphics->hdc, rgn);
1662     }
1663
1664     /* Use gdi to find the font, then perform transformations on it (height,
1665      * width, angle). */
1666     SelectObject(graphics->hdc, CreateFontIndirectW(&font->lfw));
1667     GetTextMetricsW(graphics->hdc, &textmet);
1668     lfw = font->lfw;
1669
1670     lfw.lfHeight = roundr(((REAL)lfw.lfHeight) * rel_height);
1671     lfw.lfWidth = roundr(textmet.tmAveCharWidth * rel_width);
1672
1673     pt[0].X = 0.0;
1674     pt[0].Y = 0.0;
1675     pt[1].X = 1.0;
1676     pt[1].Y = 0.0;
1677     GdipTransformMatrixPoints(graphics->worldtrans, pt, 2);
1678     angle = gdiplus_atan2((pt[1].Y - pt[0].Y), (pt[1].X - pt[0].X));
1679     ang_cos = cos(angle);
1680     ang_sin = sin(angle);
1681     lfw.lfEscapement = lfw.lfOrientation = -roundr((angle / M_PI) * 1800.0);
1682
1683     gdifont = CreateFontIndirectW(&lfw);
1684     DeleteObject(SelectObject(graphics->hdc, CreateFontIndirectW(&lfw)));
1685
1686     for(i = 0, j = 0; i < length; i++){
1687         if(!isprintW(string[i]) && (string[i] != '\n'))
1688             continue;
1689
1690         stringdup[j] = string[i];
1691         j++;
1692     }
1693
1694     stringdup[j] = 0;
1695     length = j;
1696
1697     while(sum < length){
1698         drawcoord.left = corners[0].x + roundr(ang_sin * (REAL) height);
1699         drawcoord.top = corners[0].y + roundr(ang_cos * (REAL) height);
1700
1701         GetTextExtentExPointW(graphics->hdc, stringdup + sum, length - sum,
1702                               nwidth, &fit, NULL, &size);
1703         fitcpy = fit;
1704
1705         if(fit == 0){
1706             DrawTextW(graphics->hdc, stringdup + sum, 1, &drawcoord, DT_NOCLIP |
1707                       DT_EXPANDTABS);
1708             break;
1709         }
1710
1711         for(lret = 0; lret < fit; lret++)
1712             if(*(stringdup + sum + lret) == '\n')
1713                 break;
1714
1715         /* Line break code (may look strange, but it imitates windows). */
1716         if(lret < fit)
1717             fit = lret;    /* this is not an off-by-one error */
1718         else if(fit < (length - sum)){
1719             if(*(stringdup + sum + fit) == ' ')
1720                 while(*(stringdup + sum + fit) == ' ')
1721                     fit++;
1722             else
1723                 while(*(stringdup + sum + fit - 1) != ' '){
1724                     fit--;
1725
1726                     if(*(stringdup + sum + fit) == '\t')
1727                         break;
1728
1729                     if(fit == 0){
1730                         fit = fitcpy;
1731                         break;
1732                     }
1733                 }
1734         }
1735         DrawTextW(graphics->hdc, stringdup + sum, min(length - sum, fit),
1736                   &drawcoord, DT_NOCLIP | DT_EXPANDTABS);
1737
1738         sum += fit + (lret < fitcpy ? 1 : 0);
1739         height += size.cy;
1740
1741         if(height > nheight)
1742             break;
1743
1744         /* Stop if this was a linewrap (but not if it was a linebreak). */
1745         if((lret == fitcpy) && format && (format->attr & StringFormatFlagsNoWrap))
1746             break;
1747     }
1748
1749     GdipFree(stringdup);
1750     DeleteObject(rgn);
1751     DeleteObject(gdifont);
1752
1753     RestoreDC(graphics->hdc, save_state);
1754
1755     return Ok;
1756 }
1757
1758 GpStatus WINGDIPAPI GdipFillEllipse(GpGraphics *graphics, GpBrush *brush, REAL x,
1759     REAL y, REAL width, REAL height)
1760 {
1761     INT save_state;
1762     GpPointF ptf[2];
1763     POINT pti[2];
1764
1765     if(!graphics || !brush)
1766         return InvalidParameter;
1767
1768     ptf[0].X = x;
1769     ptf[0].Y = y;
1770     ptf[1].X = x + width;
1771     ptf[1].Y = y + height;
1772
1773     save_state = SaveDC(graphics->hdc);
1774     EndPath(graphics->hdc);
1775     SelectObject(graphics->hdc, brush->gdibrush);
1776     SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1777
1778     transform_and_round_points(graphics, pti, ptf, 2);
1779
1780     Ellipse(graphics->hdc, pti[0].x, pti[0].y, pti[1].x, pti[1].y);
1781
1782     RestoreDC(graphics->hdc, save_state);
1783
1784     return Ok;
1785 }
1786
1787 GpStatus WINGDIPAPI GdipFillEllipseI(GpGraphics *graphics, GpBrush *brush, INT x,
1788     INT y, INT width, INT height)
1789 {
1790     return GdipFillEllipse(graphics,brush,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
1791 }
1792
1793 GpStatus WINGDIPAPI GdipFillPath(GpGraphics *graphics, GpBrush *brush, GpPath *path)
1794 {
1795     INT save_state;
1796     GpStatus retval;
1797
1798     if(!brush || !graphics || !path)
1799         return InvalidParameter;
1800
1801     save_state = SaveDC(graphics->hdc);
1802     EndPath(graphics->hdc);
1803     SelectObject(graphics->hdc, brush->gdibrush);
1804     SetPolyFillMode(graphics->hdc, (path->fill == FillModeAlternate ? ALTERNATE
1805                                                                     : WINDING));
1806
1807     BeginPath(graphics->hdc);
1808     retval = draw_poly(graphics, NULL, path->pathdata.Points,
1809                        path->pathdata.Types, path->pathdata.Count, FALSE);
1810
1811     if(retval != Ok)
1812         goto end;
1813
1814     EndPath(graphics->hdc);
1815     FillPath(graphics->hdc);
1816
1817     retval = Ok;
1818
1819 end:
1820     RestoreDC(graphics->hdc, save_state);
1821
1822     return retval;
1823 }
1824
1825 GpStatus WINGDIPAPI GdipFillPie(GpGraphics *graphics, GpBrush *brush, REAL x,
1826     REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
1827 {
1828     INT save_state;
1829
1830     if(!graphics || !brush)
1831         return InvalidParameter;
1832
1833     save_state = SaveDC(graphics->hdc);
1834     EndPath(graphics->hdc);
1835     SelectObject(graphics->hdc, brush->gdibrush);
1836     SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1837
1838     draw_pie(graphics, x, y, width, height, startAngle, sweepAngle);
1839
1840     RestoreDC(graphics->hdc, save_state);
1841
1842     return Ok;
1843 }
1844
1845 GpStatus WINGDIPAPI GdipFillPieI(GpGraphics *graphics, GpBrush *brush, INT x,
1846     INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
1847 {
1848     return GdipFillPie(graphics,brush,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
1849 }
1850
1851 GpStatus WINGDIPAPI GdipFillPolygon(GpGraphics *graphics, GpBrush *brush,
1852     GDIPCONST GpPointF *points, INT count, GpFillMode fillMode)
1853 {
1854     INT save_state;
1855     GpPointF *ptf = NULL;
1856     POINT *pti = NULL;
1857     GpStatus retval = Ok;
1858
1859     if(!graphics || !brush || !points || !count)
1860         return InvalidParameter;
1861
1862     ptf = GdipAlloc(count * sizeof(GpPointF));
1863     pti = GdipAlloc(count * sizeof(POINT));
1864     if(!ptf || !pti){
1865         retval = OutOfMemory;
1866         goto end;
1867     }
1868
1869     memcpy(ptf, points, count * sizeof(GpPointF));
1870
1871     save_state = SaveDC(graphics->hdc);
1872     EndPath(graphics->hdc);
1873     SelectObject(graphics->hdc, brush->gdibrush);
1874     SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1875     SetPolyFillMode(graphics->hdc, (fillMode == FillModeAlternate ? ALTERNATE
1876                                                                   : WINDING));
1877
1878     transform_and_round_points(graphics, pti, ptf, count);
1879     Polygon(graphics->hdc, pti, count);
1880
1881     RestoreDC(graphics->hdc, save_state);
1882
1883 end:
1884     GdipFree(ptf);
1885     GdipFree(pti);
1886
1887     return retval;
1888 }
1889
1890 GpStatus WINGDIPAPI GdipFillPolygonI(GpGraphics *graphics, GpBrush *brush,
1891     GDIPCONST GpPoint *points, INT count, GpFillMode fillMode)
1892 {
1893     INT save_state, i;
1894     GpPointF *ptf = NULL;
1895     POINT *pti = NULL;
1896     GpStatus retval = Ok;
1897
1898     if(!graphics || !brush || !points || !count)
1899         return InvalidParameter;
1900
1901     ptf = GdipAlloc(count * sizeof(GpPointF));
1902     pti = GdipAlloc(count * sizeof(POINT));
1903     if(!ptf || !pti){
1904         retval = OutOfMemory;
1905         goto end;
1906     }
1907
1908     for(i = 0; i < count; i ++){
1909         ptf[i].X = (REAL) points[i].X;
1910         ptf[i].Y = (REAL) points[i].Y;
1911     }
1912
1913     save_state = SaveDC(graphics->hdc);
1914     EndPath(graphics->hdc);
1915     SelectObject(graphics->hdc, brush->gdibrush);
1916     SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1917     SetPolyFillMode(graphics->hdc, (fillMode == FillModeAlternate ? ALTERNATE
1918                                                                   : WINDING));
1919
1920     transform_and_round_points(graphics, pti, ptf, count);
1921     Polygon(graphics->hdc, pti, count);
1922
1923     RestoreDC(graphics->hdc, save_state);
1924
1925 end:
1926     GdipFree(ptf);
1927     GdipFree(pti);
1928
1929     return retval;
1930 }
1931
1932 GpStatus WINGDIPAPI GdipFillRectangle(GpGraphics *graphics, GpBrush *brush,
1933     REAL x, REAL y, REAL width, REAL height)
1934 {
1935     INT save_state;
1936     GpPointF ptf[4];
1937     POINT pti[4];
1938
1939     if(!graphics || !brush)
1940         return InvalidParameter;
1941
1942     ptf[0].X = x;
1943     ptf[0].Y = y;
1944     ptf[1].X = x + width;
1945     ptf[1].Y = y;
1946     ptf[2].X = x + width;
1947     ptf[2].Y = y + height;
1948     ptf[3].X = x;
1949     ptf[3].Y = y + height;
1950
1951     save_state = SaveDC(graphics->hdc);
1952     EndPath(graphics->hdc);
1953     SelectObject(graphics->hdc, brush->gdibrush);
1954     SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1955
1956     transform_and_round_points(graphics, pti, ptf, 4);
1957
1958     Polygon(graphics->hdc, pti, 4);
1959
1960     RestoreDC(graphics->hdc, save_state);
1961
1962     return Ok;
1963 }
1964
1965 GpStatus WINGDIPAPI GdipFillRectangleI(GpGraphics *graphics, GpBrush *brush,
1966     INT x, INT y, INT width, INT height)
1967 {
1968     INT save_state;
1969     GpPointF ptf[4];
1970     POINT pti[4];
1971
1972     if(!graphics || !brush)
1973         return InvalidParameter;
1974
1975     ptf[0].X = x;
1976     ptf[0].Y = y;
1977     ptf[1].X = x + width;
1978     ptf[1].Y = y;
1979     ptf[2].X = x + width;
1980     ptf[2].Y = y + height;
1981     ptf[3].X = x;
1982     ptf[3].Y = y + height;
1983
1984     save_state = SaveDC(graphics->hdc);
1985     EndPath(graphics->hdc);
1986     SelectObject(graphics->hdc, brush->gdibrush);
1987     SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1988
1989     transform_and_round_points(graphics, pti, ptf, 4);
1990
1991     Polygon(graphics->hdc, pti, 4);
1992
1993     RestoreDC(graphics->hdc, save_state);
1994
1995     return Ok;
1996 }
1997
1998 GpStatus WINGDIPAPI GdipFillRectangles(GpGraphics *graphics, GpBrush *brush, GDIPCONST GpRectF *rects,
1999     INT count)
2000 {
2001     GpStatus ret;
2002     INT i;
2003
2004     if(!rects)
2005         return InvalidParameter;
2006
2007     for(i = 0; i < count; i++){
2008         ret = GdipFillRectangle(graphics, brush, rects[i].X, rects[i].Y, rects[i].Width, rects[i].Height);
2009         if(ret != Ok)   return ret;
2010     }
2011
2012     return Ok;
2013 }
2014
2015 GpStatus WINGDIPAPI GdipFillRectanglesI(GpGraphics *graphics, GpBrush *brush, GDIPCONST GpRect *rects,
2016     INT count)
2017 {
2018     GpRectF *rectsF;
2019     GpStatus ret;
2020     INT i;
2021
2022     if(!rects || count <= 0)
2023         return InvalidParameter;
2024
2025     rectsF = GdipAlloc(sizeof(GpRectF)*count);
2026     if(!rectsF)
2027         return OutOfMemory;
2028
2029     for(i = 0; i < count; i++){
2030         rectsF[i].X      = (REAL)rects[i].X;
2031         rectsF[i].Y      = (REAL)rects[i].Y;
2032         rectsF[i].X      = (REAL)rects[i].Width;
2033         rectsF[i].Height = (REAL)rects[i].Height;
2034     }
2035
2036     ret = GdipFillRectangles(graphics,brush,rectsF,count);
2037     GdipFree(rectsF);
2038
2039     return ret;
2040 }
2041
2042 GpStatus WINGDIPAPI GdipFlush(GpGraphics *graphics, GpFlushIntention intention)
2043 {
2044     static int calls;
2045
2046     if(!graphics)
2047         return InvalidParameter;
2048
2049     if(!(calls++))
2050         FIXME("not implemented\n");
2051
2052     return NotImplemented;
2053 }
2054
2055 /* FIXME: Compositing mode is not used anywhere except the getter/setter. */
2056 GpStatus WINGDIPAPI GdipGetCompositingMode(GpGraphics *graphics,
2057     CompositingMode *mode)
2058 {
2059     if(!graphics || !mode)
2060         return InvalidParameter;
2061
2062     *mode = graphics->compmode;
2063
2064     return Ok;
2065 }
2066
2067 /* FIXME: Compositing quality is not used anywhere except the getter/setter. */
2068 GpStatus WINGDIPAPI GdipGetCompositingQuality(GpGraphics *graphics,
2069     CompositingQuality *quality)
2070 {
2071     if(!graphics || !quality)
2072         return InvalidParameter;
2073
2074     *quality = graphics->compqual;
2075
2076     return Ok;
2077 }
2078
2079 /* FIXME: Interpolation mode is not used anywhere except the getter/setter. */
2080 GpStatus WINGDIPAPI GdipGetInterpolationMode(GpGraphics *graphics,
2081     InterpolationMode *mode)
2082 {
2083     if(!graphics || !mode)
2084         return InvalidParameter;
2085
2086     *mode = graphics->interpolation;
2087
2088     return Ok;
2089 }
2090
2091 GpStatus WINGDIPAPI GdipGetPageScale(GpGraphics *graphics, REAL *scale)
2092 {
2093     if(!graphics || !scale)
2094         return InvalidParameter;
2095
2096     *scale = graphics->scale;
2097
2098     return Ok;
2099 }
2100
2101 GpStatus WINGDIPAPI GdipGetPageUnit(GpGraphics *graphics, GpUnit *unit)
2102 {
2103     if(!graphics || !unit)
2104         return InvalidParameter;
2105
2106     *unit = graphics->unit;
2107
2108     return Ok;
2109 }
2110
2111 /* FIXME: Pixel offset mode is not used anywhere except the getter/setter. */
2112 GpStatus WINGDIPAPI GdipGetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
2113     *mode)
2114 {
2115     if(!graphics || !mode)
2116         return InvalidParameter;
2117
2118     *mode = graphics->pixeloffset;
2119
2120     return Ok;
2121 }
2122
2123 /* FIXME: Smoothing mode is not used anywhere except the getter/setter. */
2124 GpStatus WINGDIPAPI GdipGetSmoothingMode(GpGraphics *graphics, SmoothingMode *mode)
2125 {
2126     if(!graphics || !mode)
2127         return InvalidParameter;
2128
2129     *mode = graphics->smoothing;
2130
2131     return Ok;
2132 }
2133
2134 /* FIXME: Text rendering hint is not used anywhere except the getter/setter. */
2135 GpStatus WINGDIPAPI GdipGetTextRenderingHint(GpGraphics *graphics,
2136     TextRenderingHint *hint)
2137 {
2138     if(!graphics || !hint)
2139         return InvalidParameter;
2140
2141     *hint = graphics->texthint;
2142
2143     return Ok;
2144 }
2145
2146 GpStatus WINGDIPAPI GdipGetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
2147 {
2148     if(!graphics || !matrix)
2149         return InvalidParameter;
2150
2151     *matrix = *graphics->worldtrans;
2152     return Ok;
2153 }
2154
2155 /* Find the smallest rectangle that bounds the text when it is printed in rect
2156  * according to the format options listed in format. If rect has 0 width and
2157  * height, then just find the smallest rectangle that bounds the text when it's
2158  * printed at location (rect->X, rect-Y). */
2159 GpStatus WINGDIPAPI GdipMeasureString(GpGraphics *graphics,
2160     GDIPCONST WCHAR *string, INT length, GDIPCONST GpFont *font,
2161     GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format, RectF *bounds,
2162     INT *codepointsfitted, INT *linesfilled)
2163 {
2164     HFONT oldfont;
2165     WCHAR* stringdup;
2166     INT sum = 0, height = 0, fit, fitcpy, max_width = 0, i, j, lret, nwidth,
2167         nheight;
2168     SIZE size;
2169
2170     if(!graphics || !string || !font || !rect)
2171         return InvalidParameter;
2172
2173     if(codepointsfitted || linesfilled){
2174         FIXME("not implemented for given parameters\n");
2175         return NotImplemented;
2176     }
2177
2178     if(format)
2179         TRACE("may be ignoring some format flags: attr %x\n", format->attr);
2180
2181     if(length == -1) length = lstrlenW(string);
2182
2183     stringdup = GdipAlloc(length * sizeof(WCHAR));
2184     if(!stringdup) return OutOfMemory;
2185
2186     oldfont = SelectObject(graphics->hdc, CreateFontIndirectW(&font->lfw));
2187     nwidth = roundr(rect->Width);
2188     nheight = roundr(rect->Height);
2189
2190     if((nwidth == 0) && (nheight == 0))
2191         nwidth = nheight = INT_MAX;
2192
2193     for(i = 0, j = 0; i < length; i++){
2194         if(!isprintW(string[i]) && (string[i] != '\n'))
2195             continue;
2196
2197         stringdup[j] = string[i];
2198         j++;
2199     }
2200
2201     stringdup[j] = 0;
2202     length = j;
2203
2204     while(sum < length){
2205         GetTextExtentExPointW(graphics->hdc, stringdup + sum, length - sum,
2206                               nwidth, &fit, NULL, &size);
2207         fitcpy = fit;
2208
2209         if(fit == 0)
2210             break;
2211
2212         for(lret = 0; lret < fit; lret++)
2213             if(*(stringdup + sum + lret) == '\n')
2214                 break;
2215
2216         /* Line break code (may look strange, but it imitates windows). */
2217         if(lret < fit)
2218             fit = lret;    /* this is not an off-by-one error */
2219         else if(fit < (length - sum)){
2220             if(*(stringdup + sum + fit) == ' ')
2221                 while(*(stringdup + sum + fit) == ' ')
2222                     fit++;
2223             else
2224                 while(*(stringdup + sum + fit - 1) != ' '){
2225                     fit--;
2226
2227                     if(*(stringdup + sum + fit) == '\t')
2228                         break;
2229
2230                     if(fit == 0){
2231                         fit = fitcpy;
2232                         break;
2233                     }
2234                 }
2235         }
2236
2237         GetTextExtentExPointW(graphics->hdc, stringdup + sum, fit,
2238                               nwidth, &j, NULL, &size);
2239
2240         sum += fit + (lret < fitcpy ? 1 : 0);
2241         height += size.cy;
2242         max_width = max(max_width, size.cx);
2243
2244         if(height > nheight)
2245             break;
2246
2247         /* Stop if this was a linewrap (but not if it was a linebreak). */
2248         if((lret == fitcpy) && format && (format->attr & StringFormatFlagsNoWrap))
2249             break;
2250     }
2251
2252     bounds->X = rect->X;
2253     bounds->Y = rect->Y;
2254     bounds->Width = (REAL)max_width;
2255     bounds->Height = (REAL) min(height, nheight);
2256
2257     GdipFree(stringdup);
2258     DeleteObject(SelectObject(graphics->hdc, oldfont));
2259
2260     return Ok;
2261 }
2262
2263 GpStatus WINGDIPAPI GdipRestoreGraphics(GpGraphics *graphics, GraphicsState state)
2264 {
2265     static int calls;
2266
2267     if(!graphics)
2268         return InvalidParameter;
2269
2270     if(!(calls++))
2271         FIXME("graphics state not implemented\n");
2272
2273     return NotImplemented;
2274 }
2275
2276 GpStatus WINGDIPAPI GdipRotateWorldTransform(GpGraphics *graphics, REAL angle,
2277     GpMatrixOrder order)
2278 {
2279     if(!graphics)
2280         return InvalidParameter;
2281
2282     return GdipRotateMatrix(graphics->worldtrans, angle, order);
2283 }
2284
2285 GpStatus WINGDIPAPI GdipSaveGraphics(GpGraphics *graphics, GraphicsState *state)
2286 {
2287     static int calls;
2288
2289     if(!graphics || !state)
2290         return InvalidParameter;
2291
2292     if(!(calls++))
2293         FIXME("graphics state not implemented\n");
2294
2295     return NotImplemented;
2296 }
2297
2298 GpStatus WINGDIPAPI GdipScaleWorldTransform(GpGraphics *graphics, REAL sx,
2299     REAL sy, GpMatrixOrder order)
2300 {
2301     if(!graphics)
2302         return InvalidParameter;
2303
2304     return GdipScaleMatrix(graphics->worldtrans, sx, sy, order);
2305 }
2306
2307 GpStatus WINGDIPAPI GdipSetCompositingMode(GpGraphics *graphics,
2308     CompositingMode mode)
2309 {
2310     if(!graphics)
2311         return InvalidParameter;
2312
2313     graphics->compmode = mode;
2314
2315     return Ok;
2316 }
2317
2318 GpStatus WINGDIPAPI GdipSetCompositingQuality(GpGraphics *graphics,
2319     CompositingQuality quality)
2320 {
2321     if(!graphics)
2322         return InvalidParameter;
2323
2324     graphics->compqual = quality;
2325
2326     return Ok;
2327 }
2328
2329 GpStatus WINGDIPAPI GdipSetInterpolationMode(GpGraphics *graphics,
2330     InterpolationMode mode)
2331 {
2332     if(!graphics)
2333         return InvalidParameter;
2334
2335     graphics->interpolation = mode;
2336
2337     return Ok;
2338 }
2339
2340 GpStatus WINGDIPAPI GdipSetPageScale(GpGraphics *graphics, REAL scale)
2341 {
2342     if(!graphics || (scale <= 0.0))
2343         return InvalidParameter;
2344
2345     graphics->scale = scale;
2346
2347     return Ok;
2348 }
2349
2350 GpStatus WINGDIPAPI GdipSetPageUnit(GpGraphics *graphics, GpUnit unit)
2351 {
2352     if(!graphics || (unit == UnitWorld))
2353         return InvalidParameter;
2354
2355     graphics->unit = unit;
2356
2357     return Ok;
2358 }
2359
2360 GpStatus WINGDIPAPI GdipSetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
2361     mode)
2362 {
2363     if(!graphics)
2364         return InvalidParameter;
2365
2366     graphics->pixeloffset = mode;
2367
2368     return Ok;
2369 }
2370
2371 GpStatus WINGDIPAPI GdipSetSmoothingMode(GpGraphics *graphics, SmoothingMode mode)
2372 {
2373     if(!graphics)
2374         return InvalidParameter;
2375
2376     graphics->smoothing = mode;
2377
2378     return Ok;
2379 }
2380
2381 GpStatus WINGDIPAPI GdipSetTextRenderingHint(GpGraphics *graphics,
2382     TextRenderingHint hint)
2383 {
2384     if(!graphics)
2385         return InvalidParameter;
2386
2387     graphics->texthint = hint;
2388
2389     return Ok;
2390 }
2391
2392 GpStatus WINGDIPAPI GdipSetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
2393 {
2394     if(!graphics || !matrix)
2395         return InvalidParameter;
2396
2397     GdipDeleteMatrix(graphics->worldtrans);
2398     return GdipCloneMatrix(matrix, &graphics->worldtrans);
2399 }
2400
2401 GpStatus WINGDIPAPI GdipTranslateWorldTransform(GpGraphics *graphics, REAL dx,
2402     REAL dy, GpMatrixOrder order)
2403 {
2404     if(!graphics)
2405         return InvalidParameter;
2406
2407     return GdipTranslateMatrix(graphics->worldtrans, dx, dy, order);
2408 }
2409
2410 GpStatus WINGDIPAPI GdipSetClipRectI(GpGraphics *graphics, INT x, INT y,
2411                                      INT width, INT height,
2412                                      CombineMode combineMode)
2413 {
2414     static int calls;
2415
2416     if(!(calls++))
2417         FIXME("not implemented\n");
2418
2419     return NotImplemented;
2420 }
2421
2422 GpStatus WINGDIPAPI GdipSetClipRegion(GpGraphics *graphics, GpRegion *region,
2423                                      CombineMode combineMode)
2424 {
2425     static int calls;
2426
2427     if(!(calls++))
2428         FIXME("not implemented\n");
2429
2430     return NotImplemented;
2431 }
2432
2433 GpStatus WINGDIPAPI GdipSetMetafileDownLevelRasterizationLimit(GpGraphics *graphics,
2434     UINT limitDpi)
2435 {
2436     static int calls;
2437
2438     if(!(calls++))
2439         FIXME("not implemented\n");
2440
2441     return NotImplemented;
2442 }
2443
2444 GpStatus WINGDIPAPI GdipDrawPolygon(GpGraphics *graphics,GpPen *pen,GDIPCONST GpPointF *points,
2445     INT count)
2446 {
2447     INT save_state;
2448     POINT *pti;
2449
2450     if(!graphics || !pen || count<=0)
2451         return InvalidParameter;
2452
2453     pti = GdipAlloc(sizeof(POINT) * count);
2454
2455     save_state = prepare_dc(graphics, pen);
2456     SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
2457
2458     transform_and_round_points(graphics, pti, (GpPointF*)points, count);
2459     Polygon(graphics->hdc, pti, count);
2460
2461     restore_dc(graphics, save_state);
2462     GdipFree(pti);
2463
2464     return Ok;
2465 }
2466
2467 GpStatus WINGDIPAPI GdipDrawPolygonI(GpGraphics *graphics,GpPen *pen,GDIPCONST GpPoint *points,
2468     INT count)
2469 {
2470     GpStatus ret;
2471     GpPointF *ptf;
2472     INT i;
2473
2474     if(count<=0)    return InvalidParameter;
2475     ptf = GdipAlloc(sizeof(GpPointF) * count);
2476
2477     for(i = 0;i < count; i++){
2478         ptf[i].X = (REAL)points[i].X;
2479         ptf[i].Y = (REAL)points[i].Y;
2480     }
2481
2482     ret = GdipDrawPolygon(graphics,pen,ptf,count);
2483     GdipFree(ptf);
2484
2485     return ret;
2486 }
2487
2488 GpStatus WINGDIPAPI GdipGetDpiX(GpGraphics *graphics, REAL* dpi)
2489 {
2490     if(!graphics || !dpi)
2491         return InvalidParameter;
2492
2493     *dpi = (REAL)GetDeviceCaps(graphics->hdc, LOGPIXELSX);
2494
2495     return Ok;
2496 }
2497
2498 GpStatus WINGDIPAPI GdipGetDpiY(GpGraphics *graphics, REAL* dpi)
2499 {
2500     if(!graphics || !dpi)
2501         return InvalidParameter;
2502
2503     *dpi = (REAL)GetDeviceCaps(graphics->hdc, LOGPIXELSY);
2504
2505     return Ok;
2506 }
2507
2508 GpStatus WINGDIPAPI GdipMultiplyWorldTransform(GpGraphics *graphics, GDIPCONST GpMatrix *matrix,
2509     GpMatrixOrder order)
2510 {
2511     GpMatrix m;
2512     GpStatus ret;
2513
2514     if(!graphics || !matrix)
2515         return InvalidParameter;
2516
2517     m = *(graphics->worldtrans);
2518
2519     ret = GdipMultiplyMatrix(&m, (GpMatrix*)matrix, order);
2520     if(ret == Ok)
2521         *(graphics->worldtrans) = m;
2522
2523     return ret;
2524 }
2525
2526 GpStatus WINGDIPAPI GdipGetDC(GpGraphics *graphics, HDC *hdc)
2527 {
2528     FIXME("(%p, %p): stub\n", graphics, hdc);
2529
2530     *hdc = NULL;
2531     return NotImplemented;
2532 }
2533
2534 GpStatus WINGDIPAPI GdipReleaseDC(GpGraphics *graphics, HDC hdc)
2535 {
2536     FIXME("(%p, %p): stub\n", graphics, hdc);
2537
2538     return NotImplemented;
2539 }
2540
2541 GpStatus WINGDIPAPI GdipGetClip(GpGraphics *graphics, GpRegion *region)
2542 {
2543    FIXME("(%p, %p): stub\n", graphics, region);
2544
2545    return NotImplemented;
2546 }