wined3d: Don't use device palettes in read_from_framebuffer.
[wine.git] / dlls / gdiplus / graphics.c
blob74c755bf93b12745b00fdf887ad8f7f4c6a07b26
1 /*
2 * Copyright (C) 2007 Google (Evan Stade)
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.
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.
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
19 #include <stdarg.h>
20 #include <math.h>
21 #include <limits.h>
23 #include "windef.h"
24 #include "winbase.h"
25 #include "winuser.h"
26 #include "wingdi.h"
27 #include "wine/unicode.h"
29 #define COBJMACROS
30 #include "objbase.h"
31 #include "ocidl.h"
32 #include "olectl.h"
33 #include "ole2.h"
35 #include "winreg.h"
36 #include "shlwapi.h"
38 #include "gdiplus.h"
39 #include "gdiplus_private.h"
40 #include "wine/debug.h"
42 WINE_DEFAULT_DEBUG_CHANNEL(gdiplus);
44 /* looks-right constants */
45 #define TENSION_CONST (0.3)
46 #define ANCHOR_WIDTH (2.0)
47 #define MAX_ITERS (50)
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)
52 REAL radAngle, hypotenuse;
54 radAngle = deg2rad(angle);
55 hypotenuse = 50.0; /* arbitrary */
57 *x = x_0 + cos(radAngle) * hypotenuse;
58 *y = y_0 + sin(radAngle) * hypotenuse;
61 /* Converts from gdiplus path point type to gdi path point type. */
62 static BYTE convert_path_point_type(BYTE type)
64 BYTE ret;
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;
81 if(type & PathPointTypeCloseSubpath)
82 ret |= PT_CLOSEFIGURE;
84 return ret;
87 static INT prepare_dc(GpGraphics *graphics, GpPen *pen)
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];
95 EndPath(graphics->hdc);
97 if(pen->unit == UnitPixel){
98 width = pen->width;
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);
111 width *= pen->width * convert_unit(graphics->hdc,
112 pen->unit == UnitWorld ? graphics->unit : pen->unit);
115 if(pen->dash == DashStyleCustom){
116 numdashes = min(pen->numdashes, MAX_DASHLEN);
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]);
123 TRACE("\n and the pen style is %x\n", pen->style);
125 gdipen = ExtCreatePen(pen->style, roundr(width), &pen->brush->lb,
126 numdashes, dash_array);
128 else
129 gdipen = ExtCreatePen(pen->style, roundr(width), &pen->brush->lb, 0, NULL);
131 SelectObject(graphics->hdc, gdipen);
133 return save_state;
136 static void restore_dc(GpGraphics *graphics, INT state)
138 DeleteObject(SelectObject(graphics->hdc, GetStockObject(NULL_PEN)));
139 RestoreDC(graphics->hdc, state);
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.
152 static void transform_and_round_points(GpGraphics *graphics, POINT *pti,
153 GpPointF *ptf, INT count)
155 REAL unitscale;
156 GpMatrix *matrix;
157 int i;
159 unitscale = convert_unit(graphics->hdc, graphics->unit);
161 /* apply page scale */
162 if(graphics->unit != UnitDisplay)
163 unitscale *= graphics->scale;
165 GdipCloneMatrix(graphics->worldtrans, &matrix);
166 GdipScaleMatrix(matrix, unitscale, unitscale, MatrixOrderAppend);
167 GdipTransformMatrixPoints(matrix, ptf, count);
168 GdipDeleteMatrix(matrix);
170 for(i = 0; i < count; i++){
171 pti[i].x = roundr(ptf[i].X);
172 pti[i].y = roundr(ptf[i].Y);
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)
180 GpPointF ptf[4];
181 POINT pti[4];
183 ptf[0].X = x;
184 ptf[0].Y = y;
185 ptf[1].X = x + width;
186 ptf[1].Y = y + height;
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);
191 transform_and_round_points(graphics, pti, ptf, 4);
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);
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)
202 REAL xdiff, ydiff;
204 /* calculate tangent */
205 xdiff = pts[2].X - pts[0].X;
206 ydiff = pts[2].Y - pts[0].Y;
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;
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)
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);
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)
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;
243 if((x1 == x2) && (y1 == y2))
244 return;
246 theta = gdiplus_atan2(y2 - y1, x2 - x1);
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);
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;
272 else{
273 dsmall = cos(theta + M_PI_4) * size;
274 dbig = sin(theta + M_PI_4) * size;
277 ptf[0].X = x2 - dsmall;
278 ptf[1].X = x2 + dbig;
280 ptf[0].Y = y2 - dbig;
281 ptf[3].Y = y2 + dsmall;
283 ptf[1].Y = y2 - dsmall;
284 ptf[2].Y = y2 + dbig;
286 ptf[3].X = x2 - dbig;
287 ptf[2].X = x2 + dsmall;
289 transform_and_round_points(graphics, pt, ptf, 4);
290 Polygon(graphics->hdc, pt, 4);
292 break;
293 case LineCapArrowAnchor:
294 size = size * 4.0 / sqrt(3.0);
296 dx = cos(M_PI / 6.0 + theta) * size;
297 dy = sin(M_PI / 6.0 + theta) * size;
299 ptf[0].X = x2 - dx;
300 ptf[0].Y = y2 - dy;
302 dx = cos(- M_PI / 6.0 + theta) * size;
303 dy = sin(- M_PI / 6.0 + theta) * size;
305 ptf[1].X = x2 - dx;
306 ptf[1].Y = y2 - dy;
308 ptf[2].X = x2;
309 ptf[2].Y = y2;
311 transform_and_round_points(graphics, pt, ptf, 3);
312 Polygon(graphics->hdc, pt, 3);
314 break;
315 case LineCapRoundAnchor:
316 dx = dy = ANCHOR_WIDTH * size / 2.0;
318 ptf[0].X = x2 - dx;
319 ptf[0].Y = y2 - dy;
320 ptf[1].X = x2 + dx;
321 ptf[1].Y = y2 + dy;
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);
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;
332 ptf[0].X = x2 - dx;
333 ptf[0].Y = y2 - dy;
334 ptf[1].X = x2 + dx;
335 ptf[1].Y = y2 + dy;
337 dx = cos(theta) * size;
338 dy = sin(theta) * size;
340 ptf[2].X = x2 + dx;
341 ptf[2].Y = y2 + dy;
343 transform_and_round_points(graphics, pt, ptf, 3);
344 Polygon(graphics->hdc, pt, 3);
346 break;
347 case LineCapRound:
348 dx = dy = size / 2.0;
350 ptf[0].X = x2 - dx;
351 ptf[0].Y = y2 - dy;
352 ptf[1].X = x2 + dx;
353 ptf[1].Y = y2 + dy;
355 dx = -cos(M_PI_2 + theta) * size;
356 dy = -sin(M_PI_2 + theta) * size;
358 ptf[2].X = x2 - dx;
359 ptf[2].Y = y2 - dy;
360 ptf[3].X = x2 + dx;
361 ptf[3].Y = y2 + dy;
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);
367 break;
368 case LineCapCustom:
369 if(!custom)
370 break;
372 count = custom->pathdata.Count;
373 custptf = GdipAlloc(count * sizeof(PointF));
374 custpt = GdipAlloc(count * sizeof(POINT));
375 tp = GdipAlloc(count);
377 if(!custptf || !custpt || !tp || (GdipCreateMatrix(&matrix) != Ok))
378 goto custend;
380 memcpy(custptf, custom->pathdata.Points, count * sizeof(PointF));
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);
388 transform_and_round_points(graphics, custpt, custptf, count);
390 for(i = 0; i < count; i++)
391 tp[i] = convert_path_point_type(custom->pathdata.Types[i]);
393 if(custom->fill){
394 BeginPath(graphics->hdc);
395 PolyDraw(graphics->hdc, custpt, tp, count);
396 EndPath(graphics->hdc);
397 StrokeAndFillPath(graphics->hdc);
399 else
400 PolyDraw(graphics->hdc, custpt, tp, count);
402 custend:
403 GdipFree(custptf);
404 GdipFree(custpt);
405 GdipFree(tp);
406 GdipDeleteMatrix(matrix);
407 break;
408 default:
409 break;
412 if(!customstroke){
413 SelectObject(graphics->hdc, oldbrush);
414 SelectObject(graphics->hdc, oldpen);
415 DeleteObject(brush);
416 DeleteObject(pen);
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)
425 REAL dist, theta, dx, dy;
427 if((y1 == *y2) && (x1 == *x2))
428 return;
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;
435 *x2 = *x2 + dx;
436 *y2 = *y2 + dy;
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)
444 REAL dx, dy, percent;
446 dx = *x2 - x1;
447 dy = *y2 - y1;
448 if(dx == 0 && dy == 0)
449 return;
451 percent = amt / sqrt(dx * dx + dy * dy);
452 if(percent >= 1.0){
453 *x2 = x1;
454 *y2 = y1;
455 return;
458 shorten_line_percent(x1, y1, x2, y2, percent);
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)
466 POINT *pti = NULL;
467 GpPointF *ptcopy = NULL;
468 GpStatus status = GenericError;
470 if(!count)
471 return Ok;
473 pti = GdipAlloc(count * sizeof(POINT));
474 ptcopy = GdipAlloc(count * sizeof(GpPointF));
476 if(!pti || !ptcopy){
477 status = OutOfMemory;
478 goto end;
481 memcpy(ptcopy, pt, count * sizeof(GpPointF));
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);
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);
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);
506 transform_and_round_points(graphics, pti, ptcopy, count);
508 if(Polyline(graphics->hdc, pti, count))
509 status = Ok;
511 end:
512 GdipFree(pti);
513 GdipFree(ptcopy);
515 return status;
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)
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;
531 if(rev){
532 first = 3;
533 second = 2;
534 third = 1;
535 fourth = 0;
538 origx = pt[fourth].X;
539 origy = pt[fourth].Y;
540 memcpy(origpt, pt, sizeof(GpPointF) * 4);
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);
553 dx = pt[fourth].X - origx;
554 dy = pt[fourth].Y - origy;
556 diff = sqrt(dx * dx + dy * dy);
557 percent += 0.0005 * amt;
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)
566 POINT *pti;
567 GpPointF *ptcopy;
568 GpStatus status = GenericError;
570 if(!count)
571 return Ok;
573 pti = GdipAlloc(count * sizeof(POINT));
574 ptcopy = GdipAlloc(count * sizeof(GpPointF));
576 if(!pti || !ptcopy){
577 status = OutOfMemory;
578 goto end;
581 memcpy(ptcopy, pt, count * sizeof(GpPointF));
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);
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);
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);
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);
608 transform_and_round_points(graphics, pti, ptcopy, count);
610 PolyBezier(graphics->hdc, pti, count);
612 status = Ok;
614 end:
615 GdipFree(pti);
616 GdipFree(ptcopy);
618 return status;
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)
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;
631 if(!count){
632 status = Ok;
633 goto end;
635 if(!pti || !tp || !ptcopy){
636 status = OutOfMemory;
637 goto end;
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;
647 i += 2;
651 memcpy(ptcopy, pt, count * sizeof(GpPointF));
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);
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);
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);
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);
684 break;
685 default:
686 ERR("Bad path last point\n");
687 goto end;
690 /* Find start of points */
691 for(j = 1; j < count && ((types[j] & PathPointTypePathTypeMask)
692 == PathPointTypeStart); j++);
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);
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);
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);
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);
722 break;
723 default:
724 ERR("Bad path points\n");
725 goto end;
729 transform_and_round_points(graphics, pti, ptcopy, count);
731 for(i = 0; i < count; i++){
732 tp[i] = convert_path_point_type(types[i]);
735 PolyDraw(graphics->hdc, pti, tp, count);
737 status = Ok;
739 end:
740 GdipFree(pti);
741 GdipFree(ptcopy);
742 GdipFree(tp);
744 return status;
747 GpStatus WINGDIPAPI GdipCreateFromHDC(HDC hdc, GpGraphics **graphics)
749 return GdipCreateFromHDC2(hdc, NULL, graphics);
752 GpStatus WINGDIPAPI GdipCreateFromHDC2(HDC hdc, HANDLE hDevice, GpGraphics **graphics)
754 GpStatus retval;
756 if(hDevice != NULL) {
757 FIXME("Don't know how to hadle parameter hDevice\n");
758 return NotImplemented;
761 if(hdc == NULL)
762 return OutOfMemory;
764 if(graphics == NULL)
765 return InvalidParameter;
767 *graphics = GdipAlloc(sizeof(GpGraphics));
768 if(!*graphics) return OutOfMemory;
770 if((retval = GdipCreateMatrix(&(*graphics)->worldtrans)) != Ok){
771 GdipFree(*graphics);
772 return retval;
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;
785 return Ok;
788 GpStatus WINGDIPAPI GdipCreateFromHWND(HWND hwnd, GpGraphics **graphics)
790 GpStatus ret;
792 if((ret = GdipCreateFromHDC(GetDC(hwnd), graphics)) != Ok)
793 return ret;
795 (*graphics)->hwnd = hwnd;
797 return Ok;
800 GpStatus WINGDIPAPI GdipCreateMetafileFromEmf(HENHMETAFILE hemf, BOOL delete,
801 GpMetafile **metafile)
803 static int calls;
805 if(!hemf || !metafile)
806 return InvalidParameter;
808 if(!(calls++))
809 FIXME("not implemented\n");
811 return NotImplemented;
814 GpStatus WINGDIPAPI GdipCreateMetafileFromWmf(HMETAFILE hwmf, BOOL delete,
815 GDIPCONST WmfPlaceableFileHeader * placeable, GpMetafile **metafile)
817 IStream *stream = NULL;
818 UINT read;
819 BYTE* copy;
820 HENHMETAFILE hemf;
821 GpStatus retval = GenericError;
823 if(!hwmf || !metafile || !placeable)
824 return InvalidParameter;
826 *metafile = NULL;
827 read = GetMetaFileBitsEx(hwmf, 0, NULL);
828 if(!read)
829 return GenericError;
830 copy = GdipAlloc(read);
831 GetMetaFileBitsEx(hwmf, read, copy);
833 hemf = SetWinMetaFileBits(read, copy, NULL, NULL);
834 GdipFree(copy);
836 read = GetEnhMetaFileBits(hemf, 0, NULL);
837 copy = GdipAlloc(read);
838 GetEnhMetaFileBits(hemf, read, copy);
839 DeleteEnhMetaFile(hemf);
841 if(CreateStreamOnHGlobal(copy, TRUE, &stream) != S_OK){
842 ERR("could not make stream\n");
843 GdipFree(copy);
844 goto err;
847 *metafile = GdipAlloc(sizeof(GpMetafile));
848 if(!*metafile){
849 retval = OutOfMemory;
850 goto err;
853 if(OleLoadPicture(stream, 0, FALSE, &IID_IPicture,
854 (LPVOID*) &((*metafile)->image.picture)) != S_OK)
855 goto err;
858 (*metafile)->image.type = ImageTypeMetafile;
859 (*metafile)->bounds.X = ((REAL) placeable->BoundingBox.Left) / ((REAL) placeable->Inch);
860 (*metafile)->bounds.Y = ((REAL) placeable->BoundingBox.Right) / ((REAL) placeable->Inch);
861 (*metafile)->bounds.Width = ((REAL) (placeable->BoundingBox.Right
862 - placeable->BoundingBox.Left)) / ((REAL) placeable->Inch);
863 (*metafile)->bounds.Height = ((REAL) (placeable->BoundingBox.Bottom
864 - placeable->BoundingBox.Top)) / ((REAL) placeable->Inch);
865 (*metafile)->unit = UnitInch;
867 if(delete)
868 DeleteMetaFile(hwmf);
870 return Ok;
872 err:
873 GdipFree(*metafile);
874 IStream_Release(stream);
875 return retval;
878 GpStatus WINGDIPAPI GdipCreateStreamOnFile(GDIPCONST WCHAR * filename,
879 UINT access, IStream **stream)
881 DWORD dwMode;
882 HRESULT ret;
884 if(!stream || !filename)
885 return InvalidParameter;
887 if(access & GENERIC_WRITE)
888 dwMode = STGM_SHARE_DENY_WRITE | STGM_WRITE | STGM_CREATE;
889 else if(access & GENERIC_READ)
890 dwMode = STGM_SHARE_DENY_WRITE | STGM_READ | STGM_FAILIFTHERE;
891 else
892 return InvalidParameter;
894 ret = SHCreateStreamOnFileW(filename, dwMode, stream);
896 return hresult_to_status(ret);
899 GpStatus WINGDIPAPI GdipDeleteGraphics(GpGraphics *graphics)
901 if(!graphics) return InvalidParameter;
902 if(graphics->hwnd)
903 ReleaseDC(graphics->hwnd, graphics->hdc);
905 GdipDeleteMatrix(graphics->worldtrans);
906 HeapFree(GetProcessHeap(), 0, graphics);
908 return Ok;
911 GpStatus WINGDIPAPI GdipDrawArc(GpGraphics *graphics, GpPen *pen, REAL x,
912 REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
914 INT save_state, num_pts;
915 GpPointF points[MAX_ARC_PTS];
916 GpStatus retval;
918 if(!graphics || !pen || width <= 0 || height <= 0)
919 return InvalidParameter;
921 num_pts = arc2polybezier(points, x, y, width, height, startAngle, sweepAngle);
923 save_state = prepare_dc(graphics, pen);
925 retval = draw_polybezier(graphics, pen, points, num_pts, TRUE);
927 restore_dc(graphics, save_state);
929 return retval;
932 GpStatus WINGDIPAPI GdipDrawArcI(GpGraphics *graphics, GpPen *pen, INT x,
933 INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
935 INT save_state, num_pts;
936 GpPointF points[MAX_ARC_PTS];
937 GpStatus retval;
939 if(!graphics || !pen || width <= 0 || height <= 0)
940 return InvalidParameter;
942 num_pts = arc2polybezier(points, x, y, width, height, startAngle, sweepAngle);
944 save_state = prepare_dc(graphics, pen);
946 retval = draw_polybezier(graphics, pen, points, num_pts, TRUE);
948 restore_dc(graphics, save_state);
950 return retval;
953 GpStatus WINGDIPAPI GdipDrawBezier(GpGraphics *graphics, GpPen *pen, REAL x1,
954 REAL y1, REAL x2, REAL y2, REAL x3, REAL y3, REAL x4, REAL y4)
956 INT save_state;
957 GpPointF pt[4];
958 GpStatus retval;
960 if(!graphics || !pen)
961 return InvalidParameter;
963 pt[0].X = x1;
964 pt[0].Y = y1;
965 pt[1].X = x2;
966 pt[1].Y = y2;
967 pt[2].X = x3;
968 pt[2].Y = y3;
969 pt[3].X = x4;
970 pt[3].Y = y4;
972 save_state = prepare_dc(graphics, pen);
974 retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
976 restore_dc(graphics, save_state);
978 return retval;
981 GpStatus WINGDIPAPI GdipDrawBezierI(GpGraphics *graphics, GpPen *pen, INT x1,
982 INT y1, INT x2, INT y2, INT x3, INT y3, INT x4, INT y4)
984 INT save_state;
985 GpPointF pt[4];
986 GpStatus retval;
988 if(!graphics || !pen)
989 return InvalidParameter;
991 pt[0].X = x1;
992 pt[0].Y = y1;
993 pt[1].X = x2;
994 pt[1].Y = y2;
995 pt[2].X = x3;
996 pt[2].Y = y3;
997 pt[3].X = x4;
998 pt[3].Y = y4;
1000 save_state = prepare_dc(graphics, pen);
1002 retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
1004 restore_dc(graphics, save_state);
1006 return retval;
1009 /* Approximates cardinal spline with Bezier curves. */
1010 GpStatus WINGDIPAPI GdipDrawCurve2(GpGraphics *graphics, GpPen *pen,
1011 GDIPCONST GpPointF *points, INT count, REAL tension)
1013 /* PolyBezier expects count*3-2 points. */
1014 INT i, len_pt = count*3-2, save_state;
1015 GpPointF *pt;
1016 REAL x1, x2, y1, y2;
1017 GpStatus retval;
1019 if(!graphics || !pen)
1020 return InvalidParameter;
1022 pt = GdipAlloc(len_pt * sizeof(GpPointF));
1023 tension = tension * TENSION_CONST;
1025 calc_curve_bezier_endp(points[0].X, points[0].Y, points[1].X, points[1].Y,
1026 tension, &x1, &y1);
1028 pt[0].X = points[0].X;
1029 pt[0].Y = points[0].Y;
1030 pt[1].X = x1;
1031 pt[1].Y = y1;
1033 for(i = 0; i < count-2; i++){
1034 calc_curve_bezier(&(points[i]), tension, &x1, &y1, &x2, &y2);
1036 pt[3*i+2].X = x1;
1037 pt[3*i+2].Y = y1;
1038 pt[3*i+3].X = points[i+1].X;
1039 pt[3*i+3].Y = points[i+1].Y;
1040 pt[3*i+4].X = x2;
1041 pt[3*i+4].Y = y2;
1044 calc_curve_bezier_endp(points[count-1].X, points[count-1].Y,
1045 points[count-2].X, points[count-2].Y, tension, &x1, &y1);
1047 pt[len_pt-2].X = x1;
1048 pt[len_pt-2].Y = y1;
1049 pt[len_pt-1].X = points[count-1].X;
1050 pt[len_pt-1].Y = points[count-1].Y;
1052 save_state = prepare_dc(graphics, pen);
1054 retval = draw_polybezier(graphics, pen, pt, len_pt, TRUE);
1056 GdipFree(pt);
1057 restore_dc(graphics, save_state);
1059 return retval;
1062 GpStatus WINGDIPAPI GdipDrawImageI(GpGraphics *graphics, GpImage *image, INT x,
1063 INT y)
1065 UINT width, height, srcw, srch;
1067 if(!graphics || !image)
1068 return InvalidParameter;
1070 GdipGetImageWidth(image, &width);
1071 GdipGetImageHeight(image, &height);
1073 srcw = width * (((REAL) INCH_HIMETRIC) /
1074 ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSX)));
1075 srch = height * (((REAL) INCH_HIMETRIC) /
1076 ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSY)));
1078 if(image->type != ImageTypeMetafile){
1079 y += height;
1080 height *= -1;
1083 IPicture_Render(image->picture, graphics->hdc, x, y, width, height,
1084 0, 0, srcw, srch, NULL);
1086 return Ok;
1089 /* FIXME: partially implemented (only works for rectangular parallelograms) */
1090 GpStatus WINGDIPAPI GdipDrawImagePointsRect(GpGraphics *graphics, GpImage *image,
1091 GDIPCONST GpPointF *points, INT count, REAL srcx, REAL srcy, REAL srcwidth,
1092 REAL srcheight, GpUnit srcUnit, GDIPCONST GpImageAttributes* imageAttributes,
1093 DrawImageAbort callback, VOID * callbackData)
1095 GpPointF ptf[3];
1096 POINT pti[3];
1097 REAL dx, dy;
1099 TRACE("%p %p %p %d %f %f %f %f %d %p %p %p\n", graphics, image, points, count,
1100 srcx, srcy, srcwidth, srcheight, srcUnit, imageAttributes, callback,
1101 callbackData);
1103 if(!graphics || !image || !points || !imageAttributes || count != 3)
1104 return InvalidParameter;
1106 if(srcUnit == UnitInch)
1107 dx = dy = (REAL) INCH_HIMETRIC;
1108 else if(srcUnit == UnitPixel){
1109 dx = ((REAL) INCH_HIMETRIC) /
1110 ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSX));
1111 dy = ((REAL) INCH_HIMETRIC) /
1112 ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSY));
1114 else
1115 return NotImplemented;
1117 memcpy(ptf, points, 3 * sizeof(GpPointF));
1118 transform_and_round_points(graphics, pti, ptf, 3);
1120 /* IPicture renders bitmaps with the y-axis reversed
1121 * FIXME: flipping for unknown image type might not be correct. */
1122 if(image->type != ImageTypeMetafile){
1123 INT temp;
1124 temp = pti[0].y;
1125 pti[0].y = pti[2].y;
1126 pti[2].y = temp;
1129 if(IPicture_Render(image->picture, graphics->hdc,
1130 pti[0].x, pti[0].y, pti[1].x - pti[0].x, pti[2].y - pti[0].y,
1131 srcx * dx, srcy * dy,
1132 srcwidth * dx, srcheight * dy,
1133 NULL) != S_OK){
1134 if(callback)
1135 callback(callbackData);
1136 return GenericError;
1139 return Ok;
1142 GpStatus WINGDIPAPI GdipDrawImageRectRect(GpGraphics *graphics, GpImage *image,
1143 REAL dstx, REAL dsty, REAL dstwidth, REAL dstheight, REAL srcx, REAL srcy,
1144 REAL srcwidth, REAL srcheight, GpUnit srcUnit,
1145 GDIPCONST GpImageAttributes* imageattr, DrawImageAbort callback,
1146 VOID * callbackData)
1148 GpPointF points[3];
1150 points[0].X = dstx;
1151 points[0].Y = dsty;
1152 points[1].X = dstx + dstwidth;
1153 points[1].Y = dsty;
1154 points[2].X = dstx;
1155 points[2].Y = dsty + dstheight;
1157 return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
1158 srcwidth, srcheight, srcUnit, imageattr, callback, callbackData);
1161 GpStatus WINGDIPAPI GdipDrawImageRectRectI(GpGraphics *graphics, GpImage *image,
1162 INT dstx, INT dsty, INT dstwidth, INT dstheight, INT srcx, INT srcy,
1163 INT srcwidth, INT srcheight, GpUnit srcUnit,
1164 GDIPCONST GpImageAttributes* imageAttributes, DrawImageAbort callback,
1165 VOID * callbackData)
1167 GpPointF points[3];
1169 points[0].X = dstx;
1170 points[0].Y = dsty;
1171 points[1].X = dstx + dstwidth;
1172 points[1].Y = dsty;
1173 points[2].X = dstx;
1174 points[2].Y = dsty + dstheight;
1176 return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
1177 srcwidth, srcheight, srcUnit, imageAttributes, callback, callbackData);
1180 GpStatus WINGDIPAPI GdipDrawLine(GpGraphics *graphics, GpPen *pen, REAL x1,
1181 REAL y1, REAL x2, REAL y2)
1183 INT save_state;
1184 GpPointF pt[2];
1185 GpStatus retval;
1187 if(!pen || !graphics)
1188 return InvalidParameter;
1190 pt[0].X = x1;
1191 pt[0].Y = y1;
1192 pt[1].X = x2;
1193 pt[1].Y = y2;
1195 save_state = prepare_dc(graphics, pen);
1197 retval = draw_polyline(graphics, pen, pt, 2, TRUE);
1199 restore_dc(graphics, save_state);
1201 return retval;
1204 GpStatus WINGDIPAPI GdipDrawLineI(GpGraphics *graphics, GpPen *pen, INT x1,
1205 INT y1, INT x2, INT y2)
1207 INT save_state;
1208 GpPointF pt[2];
1209 GpStatus retval;
1211 if(!pen || !graphics)
1212 return InvalidParameter;
1214 pt[0].X = (REAL)x1;
1215 pt[0].Y = (REAL)y1;
1216 pt[1].X = (REAL)x2;
1217 pt[1].Y = (REAL)y2;
1219 save_state = prepare_dc(graphics, pen);
1221 retval = draw_polyline(graphics, pen, pt, 2, TRUE);
1223 restore_dc(graphics, save_state);
1225 return retval;
1228 GpStatus WINGDIPAPI GdipDrawLines(GpGraphics *graphics, GpPen *pen, GDIPCONST
1229 GpPointF *points, INT count)
1231 INT save_state;
1232 GpStatus retval;
1234 if(!pen || !graphics || (count < 2))
1235 return InvalidParameter;
1237 save_state = prepare_dc(graphics, pen);
1239 retval = draw_polyline(graphics, pen, points, count, TRUE);
1241 restore_dc(graphics, save_state);
1243 return retval;
1246 GpStatus WINGDIPAPI GdipDrawLinesI(GpGraphics *graphics, GpPen *pen, GDIPCONST
1247 GpPoint *points, INT count)
1249 INT save_state;
1250 GpStatus retval;
1251 GpPointF *ptf = NULL;
1252 int i;
1254 if(!pen || !graphics || (count < 2))
1255 return InvalidParameter;
1257 ptf = GdipAlloc(count * sizeof(GpPointF));
1258 if(!ptf) return OutOfMemory;
1260 for(i = 0; i < count; i ++){
1261 ptf[i].X = (REAL) points[i].X;
1262 ptf[i].Y = (REAL) points[i].Y;
1265 save_state = prepare_dc(graphics, pen);
1267 retval = draw_polyline(graphics, pen, ptf, count, TRUE);
1269 restore_dc(graphics, save_state);
1271 GdipFree(ptf);
1272 return retval;
1275 GpStatus WINGDIPAPI GdipDrawPath(GpGraphics *graphics, GpPen *pen, GpPath *path)
1277 INT save_state;
1278 GpStatus retval;
1280 if(!pen || !graphics)
1281 return InvalidParameter;
1283 save_state = prepare_dc(graphics, pen);
1285 retval = draw_poly(graphics, pen, path->pathdata.Points,
1286 path->pathdata.Types, path->pathdata.Count, TRUE);
1288 restore_dc(graphics, save_state);
1290 return retval;
1293 GpStatus WINGDIPAPI GdipDrawPie(GpGraphics *graphics, GpPen *pen, REAL x,
1294 REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
1296 INT save_state;
1298 if(!graphics || !pen)
1299 return InvalidParameter;
1301 save_state = prepare_dc(graphics, pen);
1302 SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
1304 draw_pie(graphics, x, y, width, height, startAngle, sweepAngle);
1306 restore_dc(graphics, save_state);
1308 return Ok;
1311 GpStatus WINGDIPAPI GdipDrawRectangleI(GpGraphics *graphics, GpPen *pen, INT x,
1312 INT y, INT width, INT height)
1314 INT save_state;
1315 GpPointF ptf[4];
1316 POINT pti[4];
1318 if(!pen || !graphics)
1319 return InvalidParameter;
1321 ptf[0].X = x;
1322 ptf[0].Y = y;
1323 ptf[1].X = x + width;
1324 ptf[1].Y = y;
1325 ptf[2].X = x + width;
1326 ptf[2].Y = y + height;
1327 ptf[3].X = x;
1328 ptf[3].Y = y + height;
1330 save_state = prepare_dc(graphics, pen);
1331 SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
1333 transform_and_round_points(graphics, pti, ptf, 4);
1334 Polygon(graphics->hdc, pti, 4);
1336 restore_dc(graphics, save_state);
1338 return Ok;
1341 GpStatus WINGDIPAPI GdipDrawRectangles(GpGraphics *graphics, GpPen *pen,
1342 GDIPCONST GpRectF* rects, INT count)
1344 GpPointF *ptf;
1345 POINT *pti;
1346 INT save_state, i;
1348 if(!graphics || !pen || !rects || count < 1)
1349 return InvalidParameter;
1351 ptf = GdipAlloc(4 * count * sizeof(GpPointF));
1352 pti = GdipAlloc(4 * count * sizeof(POINT));
1354 if(!ptf || !pti){
1355 GdipFree(ptf);
1356 GdipFree(pti);
1357 return OutOfMemory;
1360 for(i = 0; i < count; i++){
1361 ptf[4 * i + 3].X = ptf[4 * i].X = rects[i].X;
1362 ptf[4 * i + 1].Y = ptf[4 * i].Y = rects[i].Y;
1363 ptf[4 * i + 2].X = ptf[4 * i + 1].X = rects[i].X + rects[i].Width;
1364 ptf[4 * i + 3].Y = ptf[4 * i + 2].Y = rects[i].Y + rects[i].Height;
1367 save_state = prepare_dc(graphics, pen);
1368 SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
1370 transform_and_round_points(graphics, pti, ptf, 4 * count);
1372 for(i = 0; i < count; i++)
1373 Polygon(graphics->hdc, &pti[4 * i], 4);
1375 restore_dc(graphics, save_state);
1377 GdipFree(ptf);
1378 GdipFree(pti);
1380 return Ok;
1383 GpStatus WINGDIPAPI GdipDrawString(GpGraphics *graphics, GDIPCONST WCHAR *string,
1384 INT length, GDIPCONST GpFont *font, GDIPCONST RectF *rect,
1385 GDIPCONST GpStringFormat *format, GDIPCONST GpBrush *brush)
1387 HRGN rgn = NULL;
1388 HFONT gdifont;
1389 LOGFONTW lfw;
1390 TEXTMETRICW textmet;
1391 GpPointF pt[2], rectcpy[4];
1392 POINT corners[4];
1393 WCHAR* stringdup;
1394 REAL angle, ang_cos, ang_sin, rel_width, rel_height;
1395 INT sum = 0, height = 0, fit, fitcpy, save_state, i, j, lret, nwidth,
1396 nheight;
1397 SIZE size;
1398 RECT drawcoord;
1400 if(!graphics || !string || !font || !brush || !rect)
1401 return InvalidParameter;
1403 if((brush->bt != BrushTypeSolidColor)){
1404 FIXME("not implemented for given parameters\n");
1405 return NotImplemented;
1408 if(format)
1409 TRACE("may be ignoring some format flags: attr %x\n", format->attr);
1411 if(length == -1) length = lstrlenW(string);
1413 stringdup = GdipAlloc(length * sizeof(WCHAR));
1414 if(!stringdup) return OutOfMemory;
1416 save_state = SaveDC(graphics->hdc);
1417 SetBkMode(graphics->hdc, TRANSPARENT);
1418 SetTextColor(graphics->hdc, brush->lb.lbColor);
1420 rectcpy[3].X = rectcpy[0].X = rect->X;
1421 rectcpy[1].Y = rectcpy[0].Y = rect->Y;
1422 rectcpy[2].X = rectcpy[1].X = rect->X + rect->Width;
1423 rectcpy[3].Y = rectcpy[2].Y = rect->Y + rect->Height;
1424 transform_and_round_points(graphics, corners, rectcpy, 4);
1426 if(roundr(rect->Width) == 0 && roundr(rect->Height) == 0){
1427 rel_width = rel_height = 1.0;
1428 nwidth = nheight = INT_MAX;
1430 else{
1431 rel_width = sqrt((corners[1].x - corners[0].x) * (corners[1].x - corners[0].x) +
1432 (corners[1].y - corners[0].y) * (corners[1].y - corners[0].y))
1433 / rect->Width;
1434 rel_height = sqrt((corners[2].x - corners[1].x) * (corners[2].x - corners[1].x) +
1435 (corners[2].y - corners[1].y) * (corners[2].y - corners[1].y))
1436 / rect->Height;
1438 nwidth = roundr(rel_width * rect->Width);
1439 nheight = roundr(rel_height * rect->Height);
1440 rgn = CreatePolygonRgn(corners, 4, ALTERNATE);
1441 SelectClipRgn(graphics->hdc, rgn);
1444 /* Use gdi to find the font, then perform transformations on it (height,
1445 * width, angle). */
1446 SelectObject(graphics->hdc, CreateFontIndirectW(&font->lfw));
1447 GetTextMetricsW(graphics->hdc, &textmet);
1448 lfw = font->lfw;
1450 lfw.lfHeight = roundr(((REAL)lfw.lfHeight) * rel_height);
1451 lfw.lfWidth = roundr(textmet.tmAveCharWidth * rel_width);
1453 pt[0].X = 0.0;
1454 pt[0].Y = 0.0;
1455 pt[1].X = 1.0;
1456 pt[1].Y = 0.0;
1457 GdipTransformMatrixPoints(graphics->worldtrans, pt, 2);
1458 angle = gdiplus_atan2((pt[1].Y - pt[0].Y), (pt[1].X - pt[0].X));
1459 ang_cos = cos(angle);
1460 ang_sin = sin(angle);
1461 lfw.lfEscapement = lfw.lfOrientation = -roundr((angle / M_PI) * 1800.0);
1463 gdifont = CreateFontIndirectW(&lfw);
1464 DeleteObject(SelectObject(graphics->hdc, CreateFontIndirectW(&lfw)));
1466 for(i = 0, j = 0; i < length; i++){
1467 if(!isprintW(string[i]) && (string[i] != '\n'))
1468 continue;
1470 stringdup[j] = string[i];
1471 j++;
1474 stringdup[j] = 0;
1475 length = j;
1477 while(sum < length){
1478 drawcoord.left = corners[0].x + roundr(ang_sin * (REAL) height);
1479 drawcoord.top = corners[0].y + roundr(ang_cos * (REAL) height);
1481 GetTextExtentExPointW(graphics->hdc, stringdup + sum, length - sum,
1482 nwidth, &fit, NULL, &size);
1483 fitcpy = fit;
1485 if(fit == 0){
1486 DrawTextW(graphics->hdc, stringdup + sum, 1, &drawcoord, DT_NOCLIP |
1487 DT_EXPANDTABS);
1488 break;
1491 for(lret = 0; lret < fit; lret++)
1492 if(*(stringdup + sum + lret) == '\n')
1493 break;
1495 /* Line break code (may look strange, but it imitates windows). */
1496 if(lret < fit)
1497 fit = lret; /* this is not an off-by-one error */
1498 else if(fit < (length - sum)){
1499 if(*(stringdup + sum + fit) == ' ')
1500 while(*(stringdup + sum + fit) == ' ')
1501 fit++;
1502 else
1503 while(*(stringdup + sum + fit - 1) != ' '){
1504 fit--;
1506 if(*(stringdup + sum + fit) == '\t')
1507 break;
1509 if(fit == 0){
1510 fit = fitcpy;
1511 break;
1515 DrawTextW(graphics->hdc, stringdup + sum, min(length - sum, fit),
1516 &drawcoord, DT_NOCLIP | DT_EXPANDTABS);
1518 sum += fit + (lret < fitcpy ? 1 : 0);
1519 height += size.cy;
1521 if(height > nheight)
1522 break;
1524 /* Stop if this was a linewrap (but not if it was a linebreak). */
1525 if((lret == fitcpy) && format && (format->attr & StringFormatFlagsNoWrap))
1526 break;
1529 GdipFree(stringdup);
1530 DeleteObject(rgn);
1531 DeleteObject(gdifont);
1533 RestoreDC(graphics->hdc, save_state);
1535 return Ok;
1538 GpStatus WINGDIPAPI GdipFillPath(GpGraphics *graphics, GpBrush *brush, GpPath *path)
1540 INT save_state;
1541 GpStatus retval;
1543 if(!brush || !graphics || !path)
1544 return InvalidParameter;
1546 save_state = SaveDC(graphics->hdc);
1547 EndPath(graphics->hdc);
1548 SelectObject(graphics->hdc, brush->gdibrush);
1549 SetPolyFillMode(graphics->hdc, (path->fill == FillModeAlternate ? ALTERNATE
1550 : WINDING));
1552 BeginPath(graphics->hdc);
1553 retval = draw_poly(graphics, NULL, path->pathdata.Points,
1554 path->pathdata.Types, path->pathdata.Count, FALSE);
1556 if(retval != Ok)
1557 goto end;
1559 EndPath(graphics->hdc);
1560 FillPath(graphics->hdc);
1562 retval = Ok;
1564 end:
1565 RestoreDC(graphics->hdc, save_state);
1567 return retval;
1570 GpStatus WINGDIPAPI GdipFillPie(GpGraphics *graphics, GpBrush *brush, REAL x,
1571 REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
1573 INT save_state;
1575 if(!graphics || !brush)
1576 return InvalidParameter;
1578 save_state = SaveDC(graphics->hdc);
1579 EndPath(graphics->hdc);
1580 SelectObject(graphics->hdc, brush->gdibrush);
1581 SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1583 draw_pie(graphics, x, y, width, height, startAngle, sweepAngle);
1585 RestoreDC(graphics->hdc, save_state);
1587 return Ok;
1590 GpStatus WINGDIPAPI GdipFillPolygon(GpGraphics *graphics, GpBrush *brush,
1591 GDIPCONST GpPointF *points, INT count, GpFillMode fillMode)
1593 INT save_state;
1594 GpPointF *ptf = NULL;
1595 POINT *pti = NULL;
1596 GpStatus retval = Ok;
1598 if(!graphics || !brush || !points || !count)
1599 return InvalidParameter;
1601 ptf = GdipAlloc(count * sizeof(GpPointF));
1602 pti = GdipAlloc(count * sizeof(POINT));
1603 if(!ptf || !pti){
1604 retval = OutOfMemory;
1605 goto end;
1608 memcpy(ptf, points, count * sizeof(GpPointF));
1610 save_state = SaveDC(graphics->hdc);
1611 EndPath(graphics->hdc);
1612 SelectObject(graphics->hdc, brush->gdibrush);
1613 SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1614 SetPolyFillMode(graphics->hdc, (fillMode == FillModeAlternate ? ALTERNATE
1615 : WINDING));
1617 transform_and_round_points(graphics, pti, ptf, count);
1618 Polygon(graphics->hdc, pti, count);
1620 RestoreDC(graphics->hdc, save_state);
1622 end:
1623 GdipFree(ptf);
1624 GdipFree(pti);
1626 return retval;
1629 GpStatus WINGDIPAPI GdipFillPolygonI(GpGraphics *graphics, GpBrush *brush,
1630 GDIPCONST GpPoint *points, INT count, GpFillMode fillMode)
1632 INT save_state, i;
1633 GpPointF *ptf = NULL;
1634 POINT *pti = NULL;
1635 GpStatus retval = Ok;
1637 if(!graphics || !brush || !points || !count)
1638 return InvalidParameter;
1640 ptf = GdipAlloc(count * sizeof(GpPointF));
1641 pti = GdipAlloc(count * sizeof(POINT));
1642 if(!ptf || !pti){
1643 retval = OutOfMemory;
1644 goto end;
1647 for(i = 0; i < count; i ++){
1648 ptf[i].X = (REAL) points[i].X;
1649 ptf[i].Y = (REAL) points[i].Y;
1652 save_state = SaveDC(graphics->hdc);
1653 EndPath(graphics->hdc);
1654 SelectObject(graphics->hdc, brush->gdibrush);
1655 SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1656 SetPolyFillMode(graphics->hdc, (fillMode == FillModeAlternate ? ALTERNATE
1657 : WINDING));
1659 transform_and_round_points(graphics, pti, ptf, count);
1660 Polygon(graphics->hdc, pti, count);
1662 RestoreDC(graphics->hdc, save_state);
1664 end:
1665 GdipFree(ptf);
1666 GdipFree(pti);
1668 return retval;
1671 GpStatus WINGDIPAPI GdipFillRectangle(GpGraphics *graphics, GpBrush *brush,
1672 REAL x, REAL y, REAL width, REAL height)
1674 INT save_state;
1675 GpPointF ptf[4];
1676 POINT pti[4];
1678 if(!graphics || !brush)
1679 return InvalidParameter;
1681 ptf[0].X = x;
1682 ptf[0].Y = y;
1683 ptf[1].X = x + width;
1684 ptf[1].Y = y;
1685 ptf[2].X = x + width;
1686 ptf[2].Y = y + height;
1687 ptf[3].X = x;
1688 ptf[3].Y = y + height;
1690 save_state = SaveDC(graphics->hdc);
1691 EndPath(graphics->hdc);
1692 SelectObject(graphics->hdc, brush->gdibrush);
1693 SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1695 transform_and_round_points(graphics, pti, ptf, 4);
1697 Polygon(graphics->hdc, pti, 4);
1699 RestoreDC(graphics->hdc, save_state);
1701 return Ok;
1704 GpStatus WINGDIPAPI GdipFillRectangleI(GpGraphics *graphics, GpBrush *brush,
1705 INT x, INT y, INT width, INT height)
1707 INT save_state;
1708 GpPointF ptf[4];
1709 POINT pti[4];
1711 if(!graphics || !brush)
1712 return InvalidParameter;
1714 ptf[0].X = x;
1715 ptf[0].Y = y;
1716 ptf[1].X = x + width;
1717 ptf[1].Y = y;
1718 ptf[2].X = x + width;
1719 ptf[2].Y = y + height;
1720 ptf[3].X = x;
1721 ptf[3].Y = y + height;
1723 save_state = SaveDC(graphics->hdc);
1724 EndPath(graphics->hdc);
1725 SelectObject(graphics->hdc, brush->gdibrush);
1726 SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1728 transform_and_round_points(graphics, pti, ptf, 4);
1730 Polygon(graphics->hdc, pti, 4);
1732 RestoreDC(graphics->hdc, save_state);
1734 return Ok;
1737 /* FIXME: Compositing mode is not used anywhere except the getter/setter. */
1738 GpStatus WINGDIPAPI GdipGetCompositingMode(GpGraphics *graphics,
1739 CompositingMode *mode)
1741 if(!graphics || !mode)
1742 return InvalidParameter;
1744 *mode = graphics->compmode;
1746 return Ok;
1749 /* FIXME: Compositing quality is not used anywhere except the getter/setter. */
1750 GpStatus WINGDIPAPI GdipGetCompositingQuality(GpGraphics *graphics,
1751 CompositingQuality *quality)
1753 if(!graphics || !quality)
1754 return InvalidParameter;
1756 *quality = graphics->compqual;
1758 return Ok;
1761 /* FIXME: Interpolation mode is not used anywhere except the getter/setter. */
1762 GpStatus WINGDIPAPI GdipGetInterpolationMode(GpGraphics *graphics,
1763 InterpolationMode *mode)
1765 if(!graphics || !mode)
1766 return InvalidParameter;
1768 *mode = graphics->interpolation;
1770 return Ok;
1773 GpStatus WINGDIPAPI GdipGetPageScale(GpGraphics *graphics, REAL *scale)
1775 if(!graphics || !scale)
1776 return InvalidParameter;
1778 *scale = graphics->scale;
1780 return Ok;
1783 GpStatus WINGDIPAPI GdipGetPageUnit(GpGraphics *graphics, GpUnit *unit)
1785 if(!graphics || !unit)
1786 return InvalidParameter;
1788 *unit = graphics->unit;
1790 return Ok;
1793 /* FIXME: Pixel offset mode is not used anywhere except the getter/setter. */
1794 GpStatus WINGDIPAPI GdipGetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
1795 *mode)
1797 if(!graphics || !mode)
1798 return InvalidParameter;
1800 *mode = graphics->pixeloffset;
1802 return Ok;
1805 /* FIXME: Smoothing mode is not used anywhere except the getter/setter. */
1806 GpStatus WINGDIPAPI GdipGetSmoothingMode(GpGraphics *graphics, SmoothingMode *mode)
1808 if(!graphics || !mode)
1809 return InvalidParameter;
1811 *mode = graphics->smoothing;
1813 return Ok;
1816 /* FIXME: Text rendering hint is not used anywhere except the getter/setter. */
1817 GpStatus WINGDIPAPI GdipGetTextRenderingHint(GpGraphics *graphics,
1818 TextRenderingHint *hint)
1820 if(!graphics || !hint)
1821 return InvalidParameter;
1823 *hint = graphics->texthint;
1825 return Ok;
1828 GpStatus WINGDIPAPI GdipGetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
1830 if(!graphics || !matrix)
1831 return InvalidParameter;
1833 *matrix = *graphics->worldtrans;
1834 return Ok;
1837 /* Find the smallest rectangle that bounds the text when it is printed in rect
1838 * according to the format options listed in format. If rect has 0 width and
1839 * height, then just find the smallest rectangle that bounds the text when it's
1840 * printed at location (rect->X, rect-Y). */
1841 GpStatus WINGDIPAPI GdipMeasureString(GpGraphics *graphics,
1842 GDIPCONST WCHAR *string, INT length, GDIPCONST GpFont *font,
1843 GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format, RectF *bounds,
1844 INT *codepointsfitted, INT *linesfilled)
1846 HFONT oldfont;
1847 WCHAR* stringdup;
1848 INT sum = 0, height = 0, fit, fitcpy, max_width = 0, i, j, lret, nwidth,
1849 nheight;
1850 SIZE size;
1852 if(!graphics || !string || !font || !rect)
1853 return InvalidParameter;
1855 if(codepointsfitted || linesfilled){
1856 FIXME("not implemented for given parameters\n");
1857 return NotImplemented;
1860 if(format)
1861 TRACE("may be ignoring some format flags: attr %x\n", format->attr);
1863 if(length == -1) length = lstrlenW(string);
1865 stringdup = GdipAlloc(length * sizeof(WCHAR));
1866 if(!stringdup) return OutOfMemory;
1868 oldfont = SelectObject(graphics->hdc, CreateFontIndirectW(&font->lfw));
1869 nwidth = roundr(rect->Width);
1870 nheight = roundr(rect->Height);
1872 if((nwidth == 0) && (nheight == 0))
1873 nwidth = nheight = INT_MAX;
1875 for(i = 0, j = 0; i < length; i++){
1876 if(!isprintW(string[i]) && (string[i] != '\n'))
1877 continue;
1879 stringdup[j] = string[i];
1880 j++;
1883 stringdup[j] = 0;
1884 length = j;
1886 while(sum < length){
1887 GetTextExtentExPointW(graphics->hdc, stringdup + sum, length - sum,
1888 nwidth, &fit, NULL, &size);
1889 fitcpy = fit;
1891 if(fit == 0)
1892 break;
1894 for(lret = 0; lret < fit; lret++)
1895 if(*(stringdup + sum + lret) == '\n')
1896 break;
1898 /* Line break code (may look strange, but it imitates windows). */
1899 if(lret < fit)
1900 fit = lret; /* this is not an off-by-one error */
1901 else if(fit < (length - sum)){
1902 if(*(stringdup + sum + fit) == ' ')
1903 while(*(stringdup + sum + fit) == ' ')
1904 fit++;
1905 else
1906 while(*(stringdup + sum + fit - 1) != ' '){
1907 fit--;
1909 if(*(stringdup + sum + fit) == '\t')
1910 break;
1912 if(fit == 0){
1913 fit = fitcpy;
1914 break;
1919 GetTextExtentExPointW(graphics->hdc, stringdup + sum, fit,
1920 nwidth, &j, NULL, &size);
1922 sum += fit + (lret < fitcpy ? 1 : 0);
1923 height += size.cy;
1924 max_width = max(max_width, size.cx);
1926 if(height > nheight)
1927 break;
1929 /* Stop if this was a linewrap (but not if it was a linebreak). */
1930 if((lret == fitcpy) && format && (format->attr & StringFormatFlagsNoWrap))
1931 break;
1934 bounds->X = rect->X;
1935 bounds->Y = rect->Y;
1936 bounds->Width = (REAL)max_width;
1937 bounds->Height = (REAL) min(height, nheight);
1939 GdipFree(stringdup);
1940 DeleteObject(SelectObject(graphics->hdc, oldfont));
1942 return Ok;
1945 GpStatus WINGDIPAPI GdipRestoreGraphics(GpGraphics *graphics, GraphicsState state)
1947 static int calls;
1949 if(!graphics)
1950 return InvalidParameter;
1952 if(!(calls++))
1953 FIXME("graphics state not implemented\n");
1955 return NotImplemented;
1958 GpStatus WINGDIPAPI GdipRotateWorldTransform(GpGraphics *graphics, REAL angle,
1959 GpMatrixOrder order)
1961 if(!graphics)
1962 return InvalidParameter;
1964 return GdipRotateMatrix(graphics->worldtrans, angle, order);
1967 GpStatus WINGDIPAPI GdipSaveGraphics(GpGraphics *graphics, GraphicsState *state)
1969 static int calls;
1971 if(!graphics || !state)
1972 return InvalidParameter;
1974 if(!(calls++))
1975 FIXME("graphics state not implemented\n");
1977 return NotImplemented;
1980 GpStatus WINGDIPAPI GdipScaleWorldTransform(GpGraphics *graphics, REAL sx,
1981 REAL sy, GpMatrixOrder order)
1983 if(!graphics)
1984 return InvalidParameter;
1986 return GdipScaleMatrix(graphics->worldtrans, sx, sy, order);
1989 GpStatus WINGDIPAPI GdipSetCompositingMode(GpGraphics *graphics,
1990 CompositingMode mode)
1992 if(!graphics)
1993 return InvalidParameter;
1995 graphics->compmode = mode;
1997 return Ok;
2000 GpStatus WINGDIPAPI GdipSetCompositingQuality(GpGraphics *graphics,
2001 CompositingQuality quality)
2003 if(!graphics)
2004 return InvalidParameter;
2006 graphics->compqual = quality;
2008 return Ok;
2011 GpStatus WINGDIPAPI GdipSetInterpolationMode(GpGraphics *graphics,
2012 InterpolationMode mode)
2014 if(!graphics)
2015 return InvalidParameter;
2017 graphics->interpolation = mode;
2019 return Ok;
2022 GpStatus WINGDIPAPI GdipSetPageScale(GpGraphics *graphics, REAL scale)
2024 if(!graphics || (scale <= 0.0))
2025 return InvalidParameter;
2027 graphics->scale = scale;
2029 return Ok;
2032 GpStatus WINGDIPAPI GdipSetPageUnit(GpGraphics *graphics, GpUnit unit)
2034 if(!graphics || (unit == UnitWorld))
2035 return InvalidParameter;
2037 graphics->unit = unit;
2039 return Ok;
2042 GpStatus WINGDIPAPI GdipSetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
2043 mode)
2045 if(!graphics)
2046 return InvalidParameter;
2048 graphics->pixeloffset = mode;
2050 return Ok;
2053 GpStatus WINGDIPAPI GdipSetSmoothingMode(GpGraphics *graphics, SmoothingMode mode)
2055 if(!graphics)
2056 return InvalidParameter;
2058 graphics->smoothing = mode;
2060 return Ok;
2063 GpStatus WINGDIPAPI GdipSetTextRenderingHint(GpGraphics *graphics,
2064 TextRenderingHint hint)
2066 if(!graphics)
2067 return InvalidParameter;
2069 graphics->texthint = hint;
2071 return Ok;
2074 GpStatus WINGDIPAPI GdipSetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
2076 if(!graphics || !matrix)
2077 return InvalidParameter;
2079 GdipDeleteMatrix(graphics->worldtrans);
2080 return GdipCloneMatrix(matrix, &graphics->worldtrans);
2083 GpStatus WINGDIPAPI GdipTranslateWorldTransform(GpGraphics *graphics, REAL dx,
2084 REAL dy, GpMatrixOrder order)
2086 if(!graphics)
2087 return InvalidParameter;
2089 return GdipTranslateMatrix(graphics->worldtrans, dx, dy, order);