- Synchronize with wine head
[reactos.git] / reactos / dll / win32 / 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 GpStatus WINGDIPAPI GdipCreateMetafileFromEmf(HENHMETAFILE hemf, BOOL delete,
801 GpMetafile **metafile)
802 {
803 static int calls;
804
805 if(!hemf || !metafile)
806 return InvalidParameter;
807
808 if(!(calls++))
809 FIXME("not implemented\n");
810
811 return NotImplemented;
812 }
813
814 GpStatus WINGDIPAPI GdipCreateMetafileFromWmf(HMETAFILE hwmf, BOOL delete,
815 GDIPCONST WmfPlaceableFileHeader * placeable, GpMetafile **metafile)
816 {
817 IStream *stream = NULL;
818 UINT read;
819 BYTE* copy;
820 HENHMETAFILE hemf;
821 GpStatus retval = GenericError;
822
823 if(!hwmf || !metafile || !placeable)
824 return InvalidParameter;
825
826 *metafile = NULL;
827 read = GetMetaFileBitsEx(hwmf, 0, NULL);
828 if(!read)
829 return GenericError;
830 copy = GdipAlloc(read);
831 GetMetaFileBitsEx(hwmf, read, copy);
832
833 hemf = SetWinMetaFileBits(read, copy, NULL, NULL);
834 GdipFree(copy);
835
836 read = GetEnhMetaFileBits(hemf, 0, NULL);
837 copy = GdipAlloc(read);
838 GetEnhMetaFileBits(hemf, read, copy);
839 DeleteEnhMetaFile(hemf);
840
841 if(CreateStreamOnHGlobal(copy, TRUE, &stream) != S_OK){
842 ERR("could not make stream\n");
843 GdipFree(copy);
844 goto err;
845 }
846
847 *metafile = GdipAlloc(sizeof(GpMetafile));
848 if(!*metafile){
849 retval = OutOfMemory;
850 goto err;
851 }
852
853 if(OleLoadPicture(stream, 0, FALSE, &IID_IPicture,
854 (LPVOID*) &((*metafile)->image.picture)) != S_OK)
855 goto err;
856
857
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;
866
867 if(delete)
868 DeleteMetaFile(hwmf);
869
870 return Ok;
871
872 err:
873 GdipFree(*metafile);
874 IStream_Release(stream);
875 return retval;
876 }
877
878 GpStatus WINGDIPAPI GdipCreateStreamOnFile(GDIPCONST WCHAR * filename,
879 UINT access, IStream **stream)
880 {
881 DWORD dwMode;
882 HRESULT ret;
883
884 if(!stream || !filename)
885 return InvalidParameter;
886
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;
893
894 ret = SHCreateStreamOnFileW(filename, dwMode, stream);
895
896 return hresult_to_status(ret);
897 }
898
899 GpStatus WINGDIPAPI GdipDeleteGraphics(GpGraphics *graphics)
900 {
901 if(!graphics) return InvalidParameter;
902 if(graphics->hwnd)
903 ReleaseDC(graphics->hwnd, graphics->hdc);
904
905 GdipDeleteMatrix(graphics->worldtrans);
906 HeapFree(GetProcessHeap(), 0, graphics);
907
908 return Ok;
909 }
910
911 GpStatus WINGDIPAPI GdipDrawArc(GpGraphics *graphics, GpPen *pen, REAL x,
912 REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
913 {
914 INT save_state, num_pts;
915 GpPointF points[MAX_ARC_PTS];
916 GpStatus retval;
917
918 if(!graphics || !pen || width <= 0 || height <= 0)
919 return InvalidParameter;
920
921 num_pts = arc2polybezier(points, x, y, width, height, startAngle, sweepAngle);
922
923 save_state = prepare_dc(graphics, pen);
924
925 retval = draw_polybezier(graphics, pen, points, num_pts, TRUE);
926
927 restore_dc(graphics, save_state);
928
929 return retval;
930 }
931
932 GpStatus WINGDIPAPI GdipDrawArcI(GpGraphics *graphics, GpPen *pen, INT x,
933 INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
934 {
935 INT save_state, num_pts;
936 GpPointF points[MAX_ARC_PTS];
937 GpStatus retval;
938
939 if(!graphics || !pen || width <= 0 || height <= 0)
940 return InvalidParameter;
941
942 num_pts = arc2polybezier(points, x, y, width, height, startAngle, sweepAngle);
943
944 save_state = prepare_dc(graphics, pen);
945
946 retval = draw_polybezier(graphics, pen, points, num_pts, TRUE);
947
948 restore_dc(graphics, save_state);
949
950 return retval;
951 }
952
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)
955 {
956 INT save_state;
957 GpPointF pt[4];
958 GpStatus retval;
959
960 if(!graphics || !pen)
961 return InvalidParameter;
962
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;
971
972 save_state = prepare_dc(graphics, pen);
973
974 retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
975
976 restore_dc(graphics, save_state);
977
978 return retval;
979 }
980
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)
983 {
984 INT save_state;
985 GpPointF pt[4];
986 GpStatus retval;
987
988 if(!graphics || !pen)
989 return InvalidParameter;
990
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;
999
1000 save_state = prepare_dc(graphics, pen);
1001
1002 retval = draw_polybezier(graphics, pen, pt, 4, TRUE);
1003
1004 restore_dc(graphics, save_state);
1005
1006 return retval;
1007 }
1008
1009 GpStatus WINGDIPAPI GdipDrawCurve(GpGraphics *graphics, GpPen *pen,
1010 GDIPCONST GpPointF *points, INT count)
1011 {
1012 return GdipDrawCurve2(graphics,pen,points,count,1.0);
1013 }
1014
1015 GpStatus WINGDIPAPI GdipDrawCurveI(GpGraphics *graphics, GpPen *pen,
1016 GDIPCONST GpPoint *points, INT count)
1017 {
1018 GpPointF *pointsF;
1019 GpStatus ret;
1020 INT i;
1021
1022 if(!points || count <= 0)
1023 return InvalidParameter;
1024
1025 pointsF = GdipAlloc(sizeof(GpPointF)*count);
1026 if(!pointsF)
1027 return OutOfMemory;
1028
1029 for(i = 0; i < count; i++){
1030 pointsF[i].X = (REAL)points[i].X;
1031 pointsF[i].Y = (REAL)points[i].Y;
1032 }
1033
1034 ret = GdipDrawCurve(graphics,pen,pointsF,count);
1035 GdipFree(pointsF);
1036
1037 return ret;
1038 }
1039
1040 /* Approximates cardinal spline with Bezier curves. */
1041 GpStatus WINGDIPAPI GdipDrawCurve2(GpGraphics *graphics, GpPen *pen,
1042 GDIPCONST GpPointF *points, INT count, REAL tension)
1043 {
1044 /* PolyBezier expects count*3-2 points. */
1045 INT i, len_pt = count*3-2, save_state;
1046 GpPointF *pt;
1047 REAL x1, x2, y1, y2;
1048 GpStatus retval;
1049
1050 if(!graphics || !pen)
1051 return InvalidParameter;
1052
1053 pt = GdipAlloc(len_pt * sizeof(GpPointF));
1054 tension = tension * TENSION_CONST;
1055
1056 calc_curve_bezier_endp(points[0].X, points[0].Y, points[1].X, points[1].Y,
1057 tension, &x1, &y1);
1058
1059 pt[0].X = points[0].X;
1060 pt[0].Y = points[0].Y;
1061 pt[1].X = x1;
1062 pt[1].Y = y1;
1063
1064 for(i = 0; i < count-2; i++){
1065 calc_curve_bezier(&(points[i]), tension, &x1, &y1, &x2, &y2);
1066
1067 pt[3*i+2].X = x1;
1068 pt[3*i+2].Y = y1;
1069 pt[3*i+3].X = points[i+1].X;
1070 pt[3*i+3].Y = points[i+1].Y;
1071 pt[3*i+4].X = x2;
1072 pt[3*i+4].Y = y2;
1073 }
1074
1075 calc_curve_bezier_endp(points[count-1].X, points[count-1].Y,
1076 points[count-2].X, points[count-2].Y, tension, &x1, &y1);
1077
1078 pt[len_pt-2].X = x1;
1079 pt[len_pt-2].Y = y1;
1080 pt[len_pt-1].X = points[count-1].X;
1081 pt[len_pt-1].Y = points[count-1].Y;
1082
1083 save_state = prepare_dc(graphics, pen);
1084
1085 retval = draw_polybezier(graphics, pen, pt, len_pt, TRUE);
1086
1087 GdipFree(pt);
1088 restore_dc(graphics, save_state);
1089
1090 return retval;
1091 }
1092
1093 GpStatus WINGDIPAPI GdipDrawCurve2I(GpGraphics *graphics, GpPen *pen,
1094 GDIPCONST GpPoint *points, INT count, REAL tension)
1095 {
1096 GpPointF *pointsF;
1097 GpStatus ret;
1098 INT i;
1099
1100 if(!points || count <= 0)
1101 return InvalidParameter;
1102
1103 pointsF = GdipAlloc(sizeof(GpPointF)*count);
1104 if(!pointsF)
1105 return OutOfMemory;
1106
1107 for(i = 0; i < count; i++){
1108 pointsF[i].X = (REAL)points[i].X;
1109 pointsF[i].Y = (REAL)points[i].Y;
1110 }
1111
1112 ret = GdipDrawCurve2(graphics,pen,pointsF,count,tension);
1113 GdipFree(pointsF);
1114
1115 return ret;
1116 }
1117
1118 GpStatus WINGDIPAPI GdipDrawImage(GpGraphics *graphics, GpImage *image, REAL x, REAL y)
1119 {
1120 /* IPicture::Render uses LONG coords */
1121 return GdipDrawImageI(graphics,image,roundr(x),roundr(y));
1122 }
1123
1124 GpStatus WINGDIPAPI GdipDrawImageI(GpGraphics *graphics, GpImage *image, INT x,
1125 INT y)
1126 {
1127 UINT width, height, srcw, srch;
1128
1129 if(!graphics || !image)
1130 return InvalidParameter;
1131
1132 GdipGetImageWidth(image, &width);
1133 GdipGetImageHeight(image, &height);
1134
1135 srcw = width * (((REAL) INCH_HIMETRIC) /
1136 ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSX)));
1137 srch = height * (((REAL) INCH_HIMETRIC) /
1138 ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSY)));
1139
1140 if(image->type != ImageTypeMetafile){
1141 y += height;
1142 height *= -1;
1143 }
1144
1145 IPicture_Render(image->picture, graphics->hdc, x, y, width, height,
1146 0, 0, srcw, srch, NULL);
1147
1148 return Ok;
1149 }
1150
1151 /* FIXME: partially implemented (only works for rectangular parallelograms) */
1152 GpStatus WINGDIPAPI GdipDrawImagePointsRect(GpGraphics *graphics, GpImage *image,
1153 GDIPCONST GpPointF *points, INT count, REAL srcx, REAL srcy, REAL srcwidth,
1154 REAL srcheight, GpUnit srcUnit, GDIPCONST GpImageAttributes* imageAttributes,
1155 DrawImageAbort callback, VOID * callbackData)
1156 {
1157 GpPointF ptf[3];
1158 POINT pti[3];
1159 REAL dx, dy;
1160
1161 TRACE("%p %p %p %d %f %f %f %f %d %p %p %p\n", graphics, image, points, count,
1162 srcx, srcy, srcwidth, srcheight, srcUnit, imageAttributes, callback,
1163 callbackData);
1164
1165 if(!graphics || !image || !points || count != 3)
1166 return InvalidParameter;
1167
1168 if(srcUnit == UnitInch)
1169 dx = dy = (REAL) INCH_HIMETRIC;
1170 else if(srcUnit == UnitPixel){
1171 dx = ((REAL) INCH_HIMETRIC) /
1172 ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSX));
1173 dy = ((REAL) INCH_HIMETRIC) /
1174 ((REAL) GetDeviceCaps(graphics->hdc, LOGPIXELSY));
1175 }
1176 else
1177 return NotImplemented;
1178
1179 memcpy(ptf, points, 3 * sizeof(GpPointF));
1180 transform_and_round_points(graphics, pti, ptf, 3);
1181
1182 /* IPicture renders bitmaps with the y-axis reversed
1183 * FIXME: flipping for unknown image type might not be correct. */
1184 if(image->type != ImageTypeMetafile){
1185 INT temp;
1186 temp = pti[0].y;
1187 pti[0].y = pti[2].y;
1188 pti[2].y = temp;
1189 }
1190
1191 if(IPicture_Render(image->picture, graphics->hdc,
1192 pti[0].x, pti[0].y, pti[1].x - pti[0].x, pti[2].y - pti[0].y,
1193 srcx * dx, srcy * dy,
1194 srcwidth * dx, srcheight * dy,
1195 NULL) != S_OK){
1196 if(callback)
1197 callback(callbackData);
1198 return GenericError;
1199 }
1200
1201 return Ok;
1202 }
1203
1204 GpStatus WINGDIPAPI GdipDrawImagePointsRectI(GpGraphics *graphics, GpImage *image,
1205 GDIPCONST GpPoint *points, INT count, INT srcx, INT srcy, INT srcwidth,
1206 INT srcheight, GpUnit srcUnit, GDIPCONST GpImageAttributes* imageAttributes,
1207 DrawImageAbort callback, VOID * callbackData)
1208 {
1209 GpPointF pointsF[3];
1210 INT i;
1211
1212 if(!points || count!=3)
1213 return InvalidParameter;
1214
1215 for(i = 0; i < count; i++){
1216 pointsF[i].X = (REAL)points[i].X;
1217 pointsF[i].Y = (REAL)points[i].Y;
1218 }
1219
1220 return GdipDrawImagePointsRect(graphics, image, pointsF, count, (REAL)srcx, (REAL)srcy,
1221 (REAL)srcwidth, (REAL)srcheight, srcUnit, imageAttributes,
1222 callback, callbackData);
1223 }
1224
1225 GpStatus WINGDIPAPI GdipDrawImageRectRect(GpGraphics *graphics, GpImage *image,
1226 REAL dstx, REAL dsty, REAL dstwidth, REAL dstheight, REAL srcx, REAL srcy,
1227 REAL srcwidth, REAL srcheight, GpUnit srcUnit,
1228 GDIPCONST GpImageAttributes* imageattr, DrawImageAbort callback,
1229 VOID * callbackData)
1230 {
1231 GpPointF points[3];
1232
1233 points[0].X = dstx;
1234 points[0].Y = dsty;
1235 points[1].X = dstx + dstwidth;
1236 points[1].Y = dsty;
1237 points[2].X = dstx;
1238 points[2].Y = dsty + dstheight;
1239
1240 return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
1241 srcwidth, srcheight, srcUnit, imageattr, callback, callbackData);
1242 }
1243
1244 GpStatus WINGDIPAPI GdipDrawImageRectRectI(GpGraphics *graphics, GpImage *image,
1245 INT dstx, INT dsty, INT dstwidth, INT dstheight, INT srcx, INT srcy,
1246 INT srcwidth, INT srcheight, GpUnit srcUnit,
1247 GDIPCONST GpImageAttributes* imageAttributes, DrawImageAbort callback,
1248 VOID * callbackData)
1249 {
1250 GpPointF points[3];
1251
1252 points[0].X = dstx;
1253 points[0].Y = dsty;
1254 points[1].X = dstx + dstwidth;
1255 points[1].Y = dsty;
1256 points[2].X = dstx;
1257 points[2].Y = dsty + dstheight;
1258
1259 return GdipDrawImagePointsRect(graphics, image, points, 3, srcx, srcy,
1260 srcwidth, srcheight, srcUnit, imageAttributes, callback, callbackData);
1261 }
1262
1263 GpStatus WINGDIPAPI GdipDrawImageRect(GpGraphics *graphics, GpImage *image,
1264 REAL x, REAL y, REAL width, REAL height)
1265 {
1266 RectF bounds;
1267 GpUnit unit;
1268 GpStatus ret;
1269
1270 if(!graphics || !image)
1271 return InvalidParameter;
1272
1273 ret = GdipGetImageBounds(image, &bounds, &unit);
1274 if(ret != Ok)
1275 return ret;
1276
1277 return GdipDrawImageRectRect(graphics, image, x, y, width, height,
1278 bounds.X, bounds.Y, bounds.Width, bounds.Height,
1279 unit, NULL, NULL, NULL);
1280 }
1281
1282 GpStatus WINGDIPAPI GdipDrawImageRectI(GpGraphics *graphics, GpImage *image,
1283 INT x, INT y, INT width, INT height)
1284 {
1285 return GdipDrawImageRect(graphics, image, (REAL)x, (REAL)y, (REAL)width, (REAL)height);
1286 }
1287
1288 GpStatus WINGDIPAPI GdipDrawLine(GpGraphics *graphics, GpPen *pen, REAL x1,
1289 REAL y1, REAL x2, REAL y2)
1290 {
1291 INT save_state;
1292 GpPointF pt[2];
1293 GpStatus retval;
1294
1295 if(!pen || !graphics)
1296 return InvalidParameter;
1297
1298 pt[0].X = x1;
1299 pt[0].Y = y1;
1300 pt[1].X = x2;
1301 pt[1].Y = y2;
1302
1303 save_state = prepare_dc(graphics, pen);
1304
1305 retval = draw_polyline(graphics, pen, pt, 2, TRUE);
1306
1307 restore_dc(graphics, save_state);
1308
1309 return retval;
1310 }
1311
1312 GpStatus WINGDIPAPI GdipDrawLineI(GpGraphics *graphics, GpPen *pen, INT x1,
1313 INT y1, INT x2, INT y2)
1314 {
1315 INT save_state;
1316 GpPointF pt[2];
1317 GpStatus retval;
1318
1319 if(!pen || !graphics)
1320 return InvalidParameter;
1321
1322 pt[0].X = (REAL)x1;
1323 pt[0].Y = (REAL)y1;
1324 pt[1].X = (REAL)x2;
1325 pt[1].Y = (REAL)y2;
1326
1327 save_state = prepare_dc(graphics, pen);
1328
1329 retval = draw_polyline(graphics, pen, pt, 2, TRUE);
1330
1331 restore_dc(graphics, save_state);
1332
1333 return retval;
1334 }
1335
1336 GpStatus WINGDIPAPI GdipDrawLines(GpGraphics *graphics, GpPen *pen, GDIPCONST
1337 GpPointF *points, INT count)
1338 {
1339 INT save_state;
1340 GpStatus retval;
1341
1342 if(!pen || !graphics || (count < 2))
1343 return InvalidParameter;
1344
1345 save_state = prepare_dc(graphics, pen);
1346
1347 retval = draw_polyline(graphics, pen, points, count, TRUE);
1348
1349 restore_dc(graphics, save_state);
1350
1351 return retval;
1352 }
1353
1354 GpStatus WINGDIPAPI GdipDrawLinesI(GpGraphics *graphics, GpPen *pen, GDIPCONST
1355 GpPoint *points, INT count)
1356 {
1357 INT save_state;
1358 GpStatus retval;
1359 GpPointF *ptf = NULL;
1360 int i;
1361
1362 if(!pen || !graphics || (count < 2))
1363 return InvalidParameter;
1364
1365 ptf = GdipAlloc(count * sizeof(GpPointF));
1366 if(!ptf) return OutOfMemory;
1367
1368 for(i = 0; i < count; i ++){
1369 ptf[i].X = (REAL) points[i].X;
1370 ptf[i].Y = (REAL) points[i].Y;
1371 }
1372
1373 save_state = prepare_dc(graphics, pen);
1374
1375 retval = draw_polyline(graphics, pen, ptf, count, TRUE);
1376
1377 restore_dc(graphics, save_state);
1378
1379 GdipFree(ptf);
1380 return retval;
1381 }
1382
1383 GpStatus WINGDIPAPI GdipDrawPath(GpGraphics *graphics, GpPen *pen, GpPath *path)
1384 {
1385 INT save_state;
1386 GpStatus retval;
1387
1388 if(!pen || !graphics)
1389 return InvalidParameter;
1390
1391 save_state = prepare_dc(graphics, pen);
1392
1393 retval = draw_poly(graphics, pen, path->pathdata.Points,
1394 path->pathdata.Types, path->pathdata.Count, TRUE);
1395
1396 restore_dc(graphics, save_state);
1397
1398 return retval;
1399 }
1400
1401 GpStatus WINGDIPAPI GdipDrawPie(GpGraphics *graphics, GpPen *pen, REAL x,
1402 REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
1403 {
1404 INT save_state;
1405
1406 if(!graphics || !pen)
1407 return InvalidParameter;
1408
1409 save_state = prepare_dc(graphics, pen);
1410 SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
1411
1412 draw_pie(graphics, x, y, width, height, startAngle, sweepAngle);
1413
1414 restore_dc(graphics, save_state);
1415
1416 return Ok;
1417 }
1418
1419 GpStatus WINGDIPAPI GdipDrawPieI(GpGraphics *graphics, GpPen *pen, INT x,
1420 INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
1421 {
1422 return GdipDrawPie(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
1423 }
1424
1425 GpStatus WINGDIPAPI GdipDrawRectangle(GpGraphics *graphics, GpPen *pen, REAL x,
1426 REAL y, REAL width, REAL height)
1427 {
1428 INT save_state;
1429 GpPointF ptf[4];
1430 POINT pti[4];
1431
1432 if(!pen || !graphics)
1433 return InvalidParameter;
1434
1435 ptf[0].X = x;
1436 ptf[0].Y = y;
1437 ptf[1].X = x + width;
1438 ptf[1].Y = y;
1439 ptf[2].X = x + width;
1440 ptf[2].Y = y + height;
1441 ptf[3].X = x;
1442 ptf[3].Y = y + height;
1443
1444 save_state = prepare_dc(graphics, pen);
1445 SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
1446
1447 transform_and_round_points(graphics, pti, ptf, 4);
1448 Polygon(graphics->hdc, pti, 4);
1449
1450 restore_dc(graphics, save_state);
1451
1452 return Ok;
1453 }
1454
1455 GpStatus WINGDIPAPI GdipDrawRectangleI(GpGraphics *graphics, GpPen *pen, INT x,
1456 INT y, INT width, INT height)
1457 {
1458 return GdipDrawRectangle(graphics,pen,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
1459 }
1460
1461 GpStatus WINGDIPAPI GdipDrawRectangles(GpGraphics *graphics, GpPen *pen,
1462 GDIPCONST GpRectF* rects, INT count)
1463 {
1464 GpPointF *ptf;
1465 POINT *pti;
1466 INT save_state, i;
1467
1468 if(!graphics || !pen || !rects || count < 1)
1469 return InvalidParameter;
1470
1471 ptf = GdipAlloc(4 * count * sizeof(GpPointF));
1472 pti = GdipAlloc(4 * count * sizeof(POINT));
1473
1474 if(!ptf || !pti){
1475 GdipFree(ptf);
1476 GdipFree(pti);
1477 return OutOfMemory;
1478 }
1479
1480 for(i = 0; i < count; i++){
1481 ptf[4 * i + 3].X = ptf[4 * i].X = rects[i].X;
1482 ptf[4 * i + 1].Y = ptf[4 * i].Y = rects[i].Y;
1483 ptf[4 * i + 2].X = ptf[4 * i + 1].X = rects[i].X + rects[i].Width;
1484 ptf[4 * i + 3].Y = ptf[4 * i + 2].Y = rects[i].Y + rects[i].Height;
1485 }
1486
1487 save_state = prepare_dc(graphics, pen);
1488 SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
1489
1490 transform_and_round_points(graphics, pti, ptf, 4 * count);
1491
1492 for(i = 0; i < count; i++)
1493 Polygon(graphics->hdc, &pti[4 * i], 4);
1494
1495 restore_dc(graphics, save_state);
1496
1497 GdipFree(ptf);
1498 GdipFree(pti);
1499
1500 return Ok;
1501 }
1502
1503 GpStatus WINGDIPAPI GdipDrawRectanglesI(GpGraphics *graphics, GpPen *pen,
1504 GDIPCONST GpRect* rects, INT count)
1505 {
1506 GpRectF *rectsF;
1507 GpStatus ret;
1508 INT i;
1509
1510 if(!rects || count<=0)
1511 return InvalidParameter;
1512
1513 rectsF = GdipAlloc(sizeof(GpRectF) * count);
1514 if(!rectsF)
1515 return OutOfMemory;
1516
1517 for(i = 0;i < count;i++){
1518 rectsF[i].X = (REAL)rects[i].X;
1519 rectsF[i].Y = (REAL)rects[i].Y;
1520 rectsF[i].Width = (REAL)rects[i].Width;
1521 rectsF[i].Height = (REAL)rects[i].Height;
1522 }
1523
1524 ret = GdipDrawRectangles(graphics, pen, rectsF, count);
1525 GdipFree(rectsF);
1526
1527 return ret;
1528 }
1529
1530 GpStatus WINGDIPAPI GdipDrawString(GpGraphics *graphics, GDIPCONST WCHAR *string,
1531 INT length, GDIPCONST GpFont *font, GDIPCONST RectF *rect,
1532 GDIPCONST GpStringFormat *format, GDIPCONST GpBrush *brush)
1533 {
1534 HRGN rgn = NULL;
1535 HFONT gdifont;
1536 LOGFONTW lfw;
1537 TEXTMETRICW textmet;
1538 GpPointF pt[2], rectcpy[4];
1539 POINT corners[4];
1540 WCHAR* stringdup;
1541 REAL angle, ang_cos, ang_sin, rel_width, rel_height;
1542 INT sum = 0, height = 0, fit, fitcpy, save_state, i, j, lret, nwidth,
1543 nheight;
1544 SIZE size;
1545 RECT drawcoord;
1546
1547 if(!graphics || !string || !font || !brush || !rect)
1548 return InvalidParameter;
1549
1550 if((brush->bt != BrushTypeSolidColor)){
1551 FIXME("not implemented for given parameters\n");
1552 return NotImplemented;
1553 }
1554
1555 if(format)
1556 TRACE("may be ignoring some format flags: attr %x\n", format->attr);
1557
1558 if(length == -1) length = lstrlenW(string);
1559
1560 stringdup = GdipAlloc(length * sizeof(WCHAR));
1561 if(!stringdup) return OutOfMemory;
1562
1563 save_state = SaveDC(graphics->hdc);
1564 SetBkMode(graphics->hdc, TRANSPARENT);
1565 SetTextColor(graphics->hdc, brush->lb.lbColor);
1566
1567 rectcpy[3].X = rectcpy[0].X = rect->X;
1568 rectcpy[1].Y = rectcpy[0].Y = rect->Y;
1569 rectcpy[2].X = rectcpy[1].X = rect->X + rect->Width;
1570 rectcpy[3].Y = rectcpy[2].Y = rect->Y + rect->Height;
1571 transform_and_round_points(graphics, corners, rectcpy, 4);
1572
1573 if(roundr(rect->Width) == 0 && roundr(rect->Height) == 0){
1574 rel_width = rel_height = 1.0;
1575 nwidth = nheight = INT_MAX;
1576 }
1577 else{
1578 rel_width = sqrt((corners[1].x - corners[0].x) * (corners[1].x - corners[0].x) +
1579 (corners[1].y - corners[0].y) * (corners[1].y - corners[0].y))
1580 / rect->Width;
1581 rel_height = sqrt((corners[2].x - corners[1].x) * (corners[2].x - corners[1].x) +
1582 (corners[2].y - corners[1].y) * (corners[2].y - corners[1].y))
1583 / rect->Height;
1584
1585 nwidth = roundr(rel_width * rect->Width);
1586 nheight = roundr(rel_height * rect->Height);
1587 rgn = CreatePolygonRgn(corners, 4, ALTERNATE);
1588 SelectClipRgn(graphics->hdc, rgn);
1589 }
1590
1591 /* Use gdi to find the font, then perform transformations on it (height,
1592 * width, angle). */
1593 SelectObject(graphics->hdc, CreateFontIndirectW(&font->lfw));
1594 GetTextMetricsW(graphics->hdc, &textmet);
1595 lfw = font->lfw;
1596
1597 lfw.lfHeight = roundr(((REAL)lfw.lfHeight) * rel_height);
1598 lfw.lfWidth = roundr(textmet.tmAveCharWidth * rel_width);
1599
1600 pt[0].X = 0.0;
1601 pt[0].Y = 0.0;
1602 pt[1].X = 1.0;
1603 pt[1].Y = 0.0;
1604 GdipTransformMatrixPoints(graphics->worldtrans, pt, 2);
1605 angle = gdiplus_atan2((pt[1].Y - pt[0].Y), (pt[1].X - pt[0].X));
1606 ang_cos = cos(angle);
1607 ang_sin = sin(angle);
1608 lfw.lfEscapement = lfw.lfOrientation = -roundr((angle / M_PI) * 1800.0);
1609
1610 gdifont = CreateFontIndirectW(&lfw);
1611 DeleteObject(SelectObject(graphics->hdc, CreateFontIndirectW(&lfw)));
1612
1613 for(i = 0, j = 0; i < length; i++){
1614 if(!isprint(string[i]) && (string[i] != '\n'))
1615 continue;
1616
1617 stringdup[j] = string[i];
1618 j++;
1619 }
1620
1621 stringdup[j] = 0;
1622 length = j;
1623
1624 while(sum < length){
1625 drawcoord.left = corners[0].x + roundr(ang_sin * (REAL) height);
1626 drawcoord.top = corners[0].y + roundr(ang_cos * (REAL) height);
1627
1628 GetTextExtentExPointW(graphics->hdc, stringdup + sum, length - sum,
1629 nwidth, &fit, NULL, &size);
1630 fitcpy = fit;
1631
1632 if(fit == 0){
1633 DrawTextW(graphics->hdc, stringdup + sum, 1, &drawcoord, DT_NOCLIP |
1634 DT_EXPANDTABS);
1635 break;
1636 }
1637
1638 for(lret = 0; lret < fit; lret++)
1639 if(*(stringdup + sum + lret) == '\n')
1640 break;
1641
1642 /* Line break code (may look strange, but it imitates windows). */
1643 if(lret < fit)
1644 fit = lret; /* this is not an off-by-one error */
1645 else if(fit < (length - sum)){
1646 if(*(stringdup + sum + fit) == ' ')
1647 while(*(stringdup + sum + fit) == ' ')
1648 fit++;
1649 else
1650 while(*(stringdup + sum + fit - 1) != ' '){
1651 fit--;
1652
1653 if(*(stringdup + sum + fit) == '\t')
1654 break;
1655
1656 if(fit == 0){
1657 fit = fitcpy;
1658 break;
1659 }
1660 }
1661 }
1662 DrawTextW(graphics->hdc, stringdup + sum, min(length - sum, fit),
1663 &drawcoord, DT_NOCLIP | DT_EXPANDTABS);
1664
1665 sum += fit + (lret < fitcpy ? 1 : 0);
1666 height += size.cy;
1667
1668 if(height > nheight)
1669 break;
1670
1671 /* Stop if this was a linewrap (but not if it was a linebreak). */
1672 if((lret == fitcpy) && format && (format->attr & StringFormatFlagsNoWrap))
1673 break;
1674 }
1675
1676 GdipFree(stringdup);
1677 DeleteObject(rgn);
1678 DeleteObject(gdifont);
1679
1680 RestoreDC(graphics->hdc, save_state);
1681
1682 return Ok;
1683 }
1684
1685 GpStatus WINGDIPAPI GdipFillEllipse(GpGraphics *graphics, GpBrush *brush, REAL x,
1686 REAL y, REAL width, REAL height)
1687 {
1688 INT save_state;
1689 GpPointF ptf[2];
1690 POINT pti[2];
1691
1692 if(!graphics || !brush)
1693 return InvalidParameter;
1694
1695 ptf[0].X = x;
1696 ptf[0].Y = y;
1697 ptf[1].X = x + width;
1698 ptf[1].Y = y + height;
1699
1700 save_state = SaveDC(graphics->hdc);
1701 EndPath(graphics->hdc);
1702 SelectObject(graphics->hdc, brush->gdibrush);
1703 SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1704
1705 transform_and_round_points(graphics, pti, ptf, 2);
1706
1707 Ellipse(graphics->hdc, pti[0].x, pti[0].y, pti[1].x, pti[1].y);
1708
1709 RestoreDC(graphics->hdc, save_state);
1710
1711 return Ok;
1712 }
1713
1714 GpStatus WINGDIPAPI GdipFillEllipseI(GpGraphics *graphics, GpBrush *brush, INT x,
1715 INT y, INT width, INT height)
1716 {
1717 return GdipFillEllipse(graphics,brush,(REAL)x,(REAL)y,(REAL)width,(REAL)height);
1718 }
1719
1720 GpStatus WINGDIPAPI GdipFillPath(GpGraphics *graphics, GpBrush *brush, GpPath *path)
1721 {
1722 INT save_state;
1723 GpStatus retval;
1724
1725 if(!brush || !graphics || !path)
1726 return InvalidParameter;
1727
1728 save_state = SaveDC(graphics->hdc);
1729 EndPath(graphics->hdc);
1730 SelectObject(graphics->hdc, brush->gdibrush);
1731 SetPolyFillMode(graphics->hdc, (path->fill == FillModeAlternate ? ALTERNATE
1732 : WINDING));
1733
1734 BeginPath(graphics->hdc);
1735 retval = draw_poly(graphics, NULL, path->pathdata.Points,
1736 path->pathdata.Types, path->pathdata.Count, FALSE);
1737
1738 if(retval != Ok)
1739 goto end;
1740
1741 EndPath(graphics->hdc);
1742 FillPath(graphics->hdc);
1743
1744 retval = Ok;
1745
1746 end:
1747 RestoreDC(graphics->hdc, save_state);
1748
1749 return retval;
1750 }
1751
1752 GpStatus WINGDIPAPI GdipFillPie(GpGraphics *graphics, GpBrush *brush, REAL x,
1753 REAL y, REAL width, REAL height, REAL startAngle, REAL sweepAngle)
1754 {
1755 INT save_state;
1756
1757 if(!graphics || !brush)
1758 return InvalidParameter;
1759
1760 save_state = SaveDC(graphics->hdc);
1761 EndPath(graphics->hdc);
1762 SelectObject(graphics->hdc, brush->gdibrush);
1763 SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1764
1765 draw_pie(graphics, x, y, width, height, startAngle, sweepAngle);
1766
1767 RestoreDC(graphics->hdc, save_state);
1768
1769 return Ok;
1770 }
1771
1772 GpStatus WINGDIPAPI GdipFillPieI(GpGraphics *graphics, GpBrush *brush, INT x,
1773 INT y, INT width, INT height, REAL startAngle, REAL sweepAngle)
1774 {
1775 return GdipFillPie(graphics,brush,(REAL)x,(REAL)y,(REAL)width,(REAL)height,startAngle,sweepAngle);
1776 }
1777
1778 GpStatus WINGDIPAPI GdipFillPolygon(GpGraphics *graphics, GpBrush *brush,
1779 GDIPCONST GpPointF *points, INT count, GpFillMode fillMode)
1780 {
1781 INT save_state;
1782 GpPointF *ptf = NULL;
1783 POINT *pti = NULL;
1784 GpStatus retval = Ok;
1785
1786 if(!graphics || !brush || !points || !count)
1787 return InvalidParameter;
1788
1789 ptf = GdipAlloc(count * sizeof(GpPointF));
1790 pti = GdipAlloc(count * sizeof(POINT));
1791 if(!ptf || !pti){
1792 retval = OutOfMemory;
1793 goto end;
1794 }
1795
1796 memcpy(ptf, points, count * sizeof(GpPointF));
1797
1798 save_state = SaveDC(graphics->hdc);
1799 EndPath(graphics->hdc);
1800 SelectObject(graphics->hdc, brush->gdibrush);
1801 SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1802 SetPolyFillMode(graphics->hdc, (fillMode == FillModeAlternate ? ALTERNATE
1803 : WINDING));
1804
1805 transform_and_round_points(graphics, pti, ptf, count);
1806 Polygon(graphics->hdc, pti, count);
1807
1808 RestoreDC(graphics->hdc, save_state);
1809
1810 end:
1811 GdipFree(ptf);
1812 GdipFree(pti);
1813
1814 return retval;
1815 }
1816
1817 GpStatus WINGDIPAPI GdipFillPolygonI(GpGraphics *graphics, GpBrush *brush,
1818 GDIPCONST GpPoint *points, INT count, GpFillMode fillMode)
1819 {
1820 INT save_state, i;
1821 GpPointF *ptf = NULL;
1822 POINT *pti = NULL;
1823 GpStatus retval = Ok;
1824
1825 if(!graphics || !brush || !points || !count)
1826 return InvalidParameter;
1827
1828 ptf = GdipAlloc(count * sizeof(GpPointF));
1829 pti = GdipAlloc(count * sizeof(POINT));
1830 if(!ptf || !pti){
1831 retval = OutOfMemory;
1832 goto end;
1833 }
1834
1835 for(i = 0; i < count; i ++){
1836 ptf[i].X = (REAL) points[i].X;
1837 ptf[i].Y = (REAL) points[i].Y;
1838 }
1839
1840 save_state = SaveDC(graphics->hdc);
1841 EndPath(graphics->hdc);
1842 SelectObject(graphics->hdc, brush->gdibrush);
1843 SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1844 SetPolyFillMode(graphics->hdc, (fillMode == FillModeAlternate ? ALTERNATE
1845 : WINDING));
1846
1847 transform_and_round_points(graphics, pti, ptf, count);
1848 Polygon(graphics->hdc, pti, count);
1849
1850 RestoreDC(graphics->hdc, save_state);
1851
1852 end:
1853 GdipFree(ptf);
1854 GdipFree(pti);
1855
1856 return retval;
1857 }
1858
1859 GpStatus WINGDIPAPI GdipFillRectangle(GpGraphics *graphics, GpBrush *brush,
1860 REAL x, REAL y, REAL width, REAL height)
1861 {
1862 INT save_state;
1863 GpPointF ptf[4];
1864 POINT pti[4];
1865
1866 if(!graphics || !brush)
1867 return InvalidParameter;
1868
1869 ptf[0].X = x;
1870 ptf[0].Y = y;
1871 ptf[1].X = x + width;
1872 ptf[1].Y = y;
1873 ptf[2].X = x + width;
1874 ptf[2].Y = y + height;
1875 ptf[3].X = x;
1876 ptf[3].Y = y + height;
1877
1878 save_state = SaveDC(graphics->hdc);
1879 EndPath(graphics->hdc);
1880 SelectObject(graphics->hdc, brush->gdibrush);
1881 SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1882
1883 transform_and_round_points(graphics, pti, ptf, 4);
1884
1885 Polygon(graphics->hdc, pti, 4);
1886
1887 RestoreDC(graphics->hdc, save_state);
1888
1889 return Ok;
1890 }
1891
1892 GpStatus WINGDIPAPI GdipFillRectangleI(GpGraphics *graphics, GpBrush *brush,
1893 INT x, INT y, INT width, INT height)
1894 {
1895 INT save_state;
1896 GpPointF ptf[4];
1897 POINT pti[4];
1898
1899 if(!graphics || !brush)
1900 return InvalidParameter;
1901
1902 ptf[0].X = x;
1903 ptf[0].Y = y;
1904 ptf[1].X = x + width;
1905 ptf[1].Y = y;
1906 ptf[2].X = x + width;
1907 ptf[2].Y = y + height;
1908 ptf[3].X = x;
1909 ptf[3].Y = y + height;
1910
1911 save_state = SaveDC(graphics->hdc);
1912 EndPath(graphics->hdc);
1913 SelectObject(graphics->hdc, brush->gdibrush);
1914 SelectObject(graphics->hdc, GetStockObject(NULL_PEN));
1915
1916 transform_and_round_points(graphics, pti, ptf, 4);
1917
1918 Polygon(graphics->hdc, pti, 4);
1919
1920 RestoreDC(graphics->hdc, save_state);
1921
1922 return Ok;
1923 }
1924
1925 GpStatus WINGDIPAPI GdipFillRectangles(GpGraphics *graphics, GpBrush *brush, GDIPCONST GpRectF *rects,
1926 INT count)
1927 {
1928 GpStatus ret;
1929 INT i;
1930
1931 if(!rects)
1932 return InvalidParameter;
1933
1934 for(i = 0; i < count; i++){
1935 ret = GdipFillRectangle(graphics, brush, rects[i].X, rects[i].Y, rects[i].Width, rects[i].Height);
1936 if(ret != Ok) return ret;
1937 }
1938
1939 return Ok;
1940 }
1941
1942 GpStatus WINGDIPAPI GdipFillRectanglesI(GpGraphics *graphics, GpBrush *brush, GDIPCONST GpRect *rects,
1943 INT count)
1944 {
1945 GpRectF *rectsF;
1946 GpStatus ret;
1947 INT i;
1948
1949 if(!rects || count <= 0)
1950 return InvalidParameter;
1951
1952 rectsF = GdipAlloc(sizeof(GpRectF)*count);
1953 if(!rectsF)
1954 return OutOfMemory;
1955
1956 for(i = 0; i < count; i++){
1957 rectsF[i].X = (REAL)rects[i].X;
1958 rectsF[i].Y = (REAL)rects[i].Y;
1959 rectsF[i].X = (REAL)rects[i].Width;
1960 rectsF[i].Height = (REAL)rects[i].Height;
1961 }
1962
1963 ret = GdipFillRectangles(graphics,brush,rectsF,count);
1964 GdipFree(rectsF);
1965
1966 return ret;
1967 }
1968
1969 /* FIXME: Compositing mode is not used anywhere except the getter/setter. */
1970 GpStatus WINGDIPAPI GdipGetCompositingMode(GpGraphics *graphics,
1971 CompositingMode *mode)
1972 {
1973 if(!graphics || !mode)
1974 return InvalidParameter;
1975
1976 *mode = graphics->compmode;
1977
1978 return Ok;
1979 }
1980
1981 /* FIXME: Compositing quality is not used anywhere except the getter/setter. */
1982 GpStatus WINGDIPAPI GdipGetCompositingQuality(GpGraphics *graphics,
1983 CompositingQuality *quality)
1984 {
1985 if(!graphics || !quality)
1986 return InvalidParameter;
1987
1988 *quality = graphics->compqual;
1989
1990 return Ok;
1991 }
1992
1993 /* FIXME: Interpolation mode is not used anywhere except the getter/setter. */
1994 GpStatus WINGDIPAPI GdipGetInterpolationMode(GpGraphics *graphics,
1995 InterpolationMode *mode)
1996 {
1997 if(!graphics || !mode)
1998 return InvalidParameter;
1999
2000 *mode = graphics->interpolation;
2001
2002 return Ok;
2003 }
2004
2005 GpStatus WINGDIPAPI GdipGetPageScale(GpGraphics *graphics, REAL *scale)
2006 {
2007 if(!graphics || !scale)
2008 return InvalidParameter;
2009
2010 *scale = graphics->scale;
2011
2012 return Ok;
2013 }
2014
2015 GpStatus WINGDIPAPI GdipGetPageUnit(GpGraphics *graphics, GpUnit *unit)
2016 {
2017 if(!graphics || !unit)
2018 return InvalidParameter;
2019
2020 *unit = graphics->unit;
2021
2022 return Ok;
2023 }
2024
2025 /* FIXME: Pixel offset mode is not used anywhere except the getter/setter. */
2026 GpStatus WINGDIPAPI GdipGetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
2027 *mode)
2028 {
2029 if(!graphics || !mode)
2030 return InvalidParameter;
2031
2032 *mode = graphics->pixeloffset;
2033
2034 return Ok;
2035 }
2036
2037 /* FIXME: Smoothing mode is not used anywhere except the getter/setter. */
2038 GpStatus WINGDIPAPI GdipGetSmoothingMode(GpGraphics *graphics, SmoothingMode *mode)
2039 {
2040 if(!graphics || !mode)
2041 return InvalidParameter;
2042
2043 *mode = graphics->smoothing;
2044
2045 return Ok;
2046 }
2047
2048 /* FIXME: Text rendering hint is not used anywhere except the getter/setter. */
2049 GpStatus WINGDIPAPI GdipGetTextRenderingHint(GpGraphics *graphics,
2050 TextRenderingHint *hint)
2051 {
2052 if(!graphics || !hint)
2053 return InvalidParameter;
2054
2055 *hint = graphics->texthint;
2056
2057 return Ok;
2058 }
2059
2060 GpStatus WINGDIPAPI GdipGetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
2061 {
2062 if(!graphics || !matrix)
2063 return InvalidParameter;
2064
2065 *matrix = *graphics->worldtrans;
2066 return Ok;
2067 }
2068
2069 /* Find the smallest rectangle that bounds the text when it is printed in rect
2070 * according to the format options listed in format. If rect has 0 width and
2071 * height, then just find the smallest rectangle that bounds the text when it's
2072 * printed at location (rect->X, rect-Y). */
2073 GpStatus WINGDIPAPI GdipMeasureString(GpGraphics *graphics,
2074 GDIPCONST WCHAR *string, INT length, GDIPCONST GpFont *font,
2075 GDIPCONST RectF *rect, GDIPCONST GpStringFormat *format, RectF *bounds,
2076 INT *codepointsfitted, INT *linesfilled)
2077 {
2078 HFONT oldfont;
2079 WCHAR* stringdup;
2080 INT sum = 0, height = 0, fit, fitcpy, max_width = 0, i, j, lret, nwidth,
2081 nheight;
2082 SIZE size;
2083
2084 if(!graphics || !string || !font || !rect)
2085 return InvalidParameter;
2086
2087 if(codepointsfitted || linesfilled){
2088 FIXME("not implemented for given parameters\n");
2089 return NotImplemented;
2090 }
2091
2092 if(format)
2093 TRACE("may be ignoring some format flags: attr %x\n", format->attr);
2094
2095 if(length == -1) length = lstrlenW(string);
2096
2097 stringdup = GdipAlloc(length * sizeof(WCHAR));
2098 if(!stringdup) return OutOfMemory;
2099
2100 oldfont = SelectObject(graphics->hdc, CreateFontIndirectW(&font->lfw));
2101 nwidth = roundr(rect->Width);
2102 nheight = roundr(rect->Height);
2103
2104 if((nwidth == 0) && (nheight == 0))
2105 nwidth = nheight = INT_MAX;
2106
2107 for(i = 0, j = 0; i < length; i++){
2108 if(!isprint(string[i]) && (string[i] != '\n'))
2109 continue;
2110
2111 stringdup[j] = string[i];
2112 j++;
2113 }
2114
2115 stringdup[j] = 0;
2116 length = j;
2117
2118 while(sum < length){
2119 GetTextExtentExPointW(graphics->hdc, stringdup + sum, length - sum,
2120 nwidth, &fit, NULL, &size);
2121 fitcpy = fit;
2122
2123 if(fit == 0)
2124 break;
2125
2126 for(lret = 0; lret < fit; lret++)
2127 if(*(stringdup + sum + lret) == '\n')
2128 break;
2129
2130 /* Line break code (may look strange, but it imitates windows). */
2131 if(lret < fit)
2132 fit = lret; /* this is not an off-by-one error */
2133 else if(fit < (length - sum)){
2134 if(*(stringdup + sum + fit) == ' ')
2135 while(*(stringdup + sum + fit) == ' ')
2136 fit++;
2137 else
2138 while(*(stringdup + sum + fit - 1) != ' '){
2139 fit--;
2140
2141 if(*(stringdup + sum + fit) == '\t')
2142 break;
2143
2144 if(fit == 0){
2145 fit = fitcpy;
2146 break;
2147 }
2148 }
2149 }
2150
2151 GetTextExtentExPointW(graphics->hdc, stringdup + sum, fit,
2152 nwidth, &j, NULL, &size);
2153
2154 sum += fit + (lret < fitcpy ? 1 : 0);
2155 height += size.cy;
2156 max_width = max(max_width, size.cx);
2157
2158 if(height > nheight)
2159 break;
2160
2161 /* Stop if this was a linewrap (but not if it was a linebreak). */
2162 if((lret == fitcpy) && format && (format->attr & StringFormatFlagsNoWrap))
2163 break;
2164 }
2165
2166 bounds->X = rect->X;
2167 bounds->Y = rect->Y;
2168 bounds->Width = (REAL)max_width;
2169 bounds->Height = (REAL) min(height, nheight);
2170
2171 GdipFree(stringdup);
2172 DeleteObject(SelectObject(graphics->hdc, oldfont));
2173
2174 return Ok;
2175 }
2176
2177 GpStatus WINGDIPAPI GdipRestoreGraphics(GpGraphics *graphics, GraphicsState state)
2178 {
2179 static int calls;
2180
2181 if(!graphics)
2182 return InvalidParameter;
2183
2184 if(!(calls++))
2185 FIXME("graphics state not implemented\n");
2186
2187 return NotImplemented;
2188 }
2189
2190 GpStatus WINGDIPAPI GdipRotateWorldTransform(GpGraphics *graphics, REAL angle,
2191 GpMatrixOrder order)
2192 {
2193 if(!graphics)
2194 return InvalidParameter;
2195
2196 return GdipRotateMatrix(graphics->worldtrans, angle, order);
2197 }
2198
2199 GpStatus WINGDIPAPI GdipSaveGraphics(GpGraphics *graphics, GraphicsState *state)
2200 {
2201 static int calls;
2202
2203 if(!graphics || !state)
2204 return InvalidParameter;
2205
2206 if(!(calls++))
2207 FIXME("graphics state not implemented\n");
2208
2209 return NotImplemented;
2210 }
2211
2212 GpStatus WINGDIPAPI GdipScaleWorldTransform(GpGraphics *graphics, REAL sx,
2213 REAL sy, GpMatrixOrder order)
2214 {
2215 if(!graphics)
2216 return InvalidParameter;
2217
2218 return GdipScaleMatrix(graphics->worldtrans, sx, sy, order);
2219 }
2220
2221 GpStatus WINGDIPAPI GdipSetCompositingMode(GpGraphics *graphics,
2222 CompositingMode mode)
2223 {
2224 if(!graphics)
2225 return InvalidParameter;
2226
2227 graphics->compmode = mode;
2228
2229 return Ok;
2230 }
2231
2232 GpStatus WINGDIPAPI GdipSetCompositingQuality(GpGraphics *graphics,
2233 CompositingQuality quality)
2234 {
2235 if(!graphics)
2236 return InvalidParameter;
2237
2238 graphics->compqual = quality;
2239
2240 return Ok;
2241 }
2242
2243 GpStatus WINGDIPAPI GdipSetInterpolationMode(GpGraphics *graphics,
2244 InterpolationMode mode)
2245 {
2246 if(!graphics)
2247 return InvalidParameter;
2248
2249 graphics->interpolation = mode;
2250
2251 return Ok;
2252 }
2253
2254 GpStatus WINGDIPAPI GdipSetPageScale(GpGraphics *graphics, REAL scale)
2255 {
2256 if(!graphics || (scale <= 0.0))
2257 return InvalidParameter;
2258
2259 graphics->scale = scale;
2260
2261 return Ok;
2262 }
2263
2264 GpStatus WINGDIPAPI GdipSetPageUnit(GpGraphics *graphics, GpUnit unit)
2265 {
2266 if(!graphics || (unit == UnitWorld))
2267 return InvalidParameter;
2268
2269 graphics->unit = unit;
2270
2271 return Ok;
2272 }
2273
2274 GpStatus WINGDIPAPI GdipSetPixelOffsetMode(GpGraphics *graphics, PixelOffsetMode
2275 mode)
2276 {
2277 if(!graphics)
2278 return InvalidParameter;
2279
2280 graphics->pixeloffset = mode;
2281
2282 return Ok;
2283 }
2284
2285 GpStatus WINGDIPAPI GdipSetSmoothingMode(GpGraphics *graphics, SmoothingMode mode)
2286 {
2287 if(!graphics)
2288 return InvalidParameter;
2289
2290 graphics->smoothing = mode;
2291
2292 return Ok;
2293 }
2294
2295 GpStatus WINGDIPAPI GdipSetTextRenderingHint(GpGraphics *graphics,
2296 TextRenderingHint hint)
2297 {
2298 if(!graphics)
2299 return InvalidParameter;
2300
2301 graphics->texthint = hint;
2302
2303 return Ok;
2304 }
2305
2306 GpStatus WINGDIPAPI GdipSetWorldTransform(GpGraphics *graphics, GpMatrix *matrix)
2307 {
2308 if(!graphics || !matrix)
2309 return InvalidParameter;
2310
2311 GdipDeleteMatrix(graphics->worldtrans);
2312 return GdipCloneMatrix(matrix, &graphics->worldtrans);
2313 }
2314
2315 GpStatus WINGDIPAPI GdipTranslateWorldTransform(GpGraphics *graphics, REAL dx,
2316 REAL dy, GpMatrixOrder order)
2317 {
2318 if(!graphics)
2319 return InvalidParameter;
2320
2321 return GdipTranslateMatrix(graphics->worldtrans, dx, dy, order);
2322 }
2323
2324 GpStatus WINGDIPAPI GdipSetClipRectI(GpGraphics *graphics, INT x, INT y,
2325 INT width, INT height,
2326 CombineMode combineMode)
2327 {
2328 static int calls;
2329
2330 if(!(calls++))
2331 FIXME("not implemented\n");
2332
2333 return NotImplemented;
2334 }
2335
2336 GpStatus WINGDIPAPI GdipSetClipRegion(GpGraphics *graphics, GpRegion *region,
2337 CombineMode combineMode)
2338 {
2339 static int calls;
2340
2341 if(!(calls++))
2342 FIXME("not implemented\n");
2343
2344 return NotImplemented;
2345 }
2346
2347 GpStatus WINGDIPAPI GdipSetMetafileDownLevelRasterizationLimit(GpGraphics *graphics,
2348 UINT limitDpi)
2349 {
2350 static int calls;
2351
2352 if(!(calls++))
2353 FIXME("not implemented\n");
2354
2355 return NotImplemented;
2356 }
2357
2358 GpStatus WINGDIPAPI GdipDrawPolygon(GpGraphics *graphics,GpPen *pen,GDIPCONST GpPointF *points,
2359 INT count)
2360 {
2361 INT save_state;
2362 POINT *pti;
2363
2364 if(!graphics || !pen || count<=0)
2365 return InvalidParameter;
2366
2367 pti = GdipAlloc(sizeof(POINT) * count);
2368
2369 save_state = prepare_dc(graphics, pen);
2370 SelectObject(graphics->hdc, GetStockObject(NULL_BRUSH));
2371
2372 transform_and_round_points(graphics, pti, (GpPointF*)points, count);
2373 Polygon(graphics->hdc, pti, count);
2374
2375 restore_dc(graphics, save_state);
2376 GdipFree(pti);
2377
2378 return Ok;
2379 }
2380
2381 GpStatus WINGDIPAPI GdipDrawPolygonI(GpGraphics *graphics,GpPen *pen,GDIPCONST GpPoint *points,
2382 INT count)
2383 {
2384 GpStatus ret;
2385 GpPointF *ptf;
2386 INT i;
2387
2388 if(count<=0) return InvalidParameter;
2389 ptf = GdipAlloc(sizeof(GpPointF) * count);
2390
2391 for(i = 0;i < count; i++){
2392 ptf[i].X = (REAL)points[i].X;
2393 ptf[i].Y = (REAL)points[i].Y;
2394 }
2395
2396 ret = GdipDrawPolygon(graphics,pen,ptf,count);
2397 GdipFree(ptf);
2398
2399 return ret;
2400 }
2401
2402 GpStatus WINGDIPAPI GdipGetDpiX(GpGraphics *graphics, REAL* dpi)
2403 {
2404 if(!graphics || !dpi)
2405 return InvalidParameter;
2406
2407 *dpi = (REAL)GetDeviceCaps(graphics->hdc, LOGPIXELSX);
2408
2409 return Ok;
2410 }
2411
2412 GpStatus WINGDIPAPI GdipGetDpiY(GpGraphics *graphics, REAL* dpi)
2413 {
2414 if(!graphics || !dpi)
2415 return InvalidParameter;
2416
2417 *dpi = (REAL)GetDeviceCaps(graphics->hdc, LOGPIXELSY);
2418
2419 return Ok;
2420 }
2421
2422 GpStatus WINGDIPAPI GdipMultiplyWorldTransform(GpGraphics *graphics, GDIPCONST GpMatrix *matrix,
2423 GpMatrixOrder order)
2424 {
2425 GpMatrix m;
2426 GpStatus ret;
2427
2428 if(!graphics || !matrix)
2429 return InvalidParameter;
2430
2431 m = *(graphics->worldtrans);
2432
2433 ret = GdipMultiplyMatrix(&m, (GpMatrix*)matrix, order);
2434 if(ret == Ok)
2435 *(graphics->worldtrans) = m;
2436
2437 return ret;
2438 }