2 * GDI drawing functions.
4 * Copyright 1993, 1994 Alexandre Julliard
5 * Copyright 1997 Bertho A. Stultiens
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
24 #include "wine/port.h"
35 #include "gdi_private.h"
36 #include "wine/debug.h"
38 WINE_DEFAULT_DEBUG_CHANNEL(gdi
);
41 /***********************************************************************
44 BOOL WINAPI
LineTo( HDC hdc
, INT x
, INT y
)
46 DC
* dc
= DC_GetDCUpdate( hdc
);
51 if(PATH_IsPathOpen(dc
->path
))
52 ret
= PATH_LineTo(dc
, x
, y
);
54 ret
= dc
->funcs
->pLineTo
&& dc
->funcs
->pLineTo(dc
->physDev
,x
,y
);
59 GDI_ReleaseObj( hdc
);
64 /***********************************************************************
67 BOOL WINAPI
MoveToEx( HDC hdc
, INT x
, INT y
, LPPOINT pt
)
70 DC
* dc
= DC_GetDCPtr( hdc
);
81 if(PATH_IsPathOpen(dc
->path
)) ret
= PATH_MoveTo(dc
);
82 else if (dc
->funcs
->pMoveTo
) ret
= dc
->funcs
->pMoveTo(dc
->physDev
,x
,y
);
83 GDI_ReleaseObj( hdc
);
88 /***********************************************************************
91 BOOL WINAPI
Arc( HDC hdc
, INT left
, INT top
, INT right
,
92 INT bottom
, INT xstart
, INT ystart
,
96 DC
* dc
= DC_GetDCUpdate( hdc
);
99 if(PATH_IsPathOpen(dc
->path
))
100 ret
= PATH_Arc(dc
, left
, top
, right
, bottom
, xstart
, ystart
, xend
, yend
,0);
101 else if (dc
->funcs
->pArc
)
102 ret
= dc
->funcs
->pArc(dc
->physDev
,left
,top
,right
,bottom
,xstart
,ystart
,xend
,yend
);
103 GDI_ReleaseObj( hdc
);
108 /***********************************************************************
111 BOOL WINAPI
ArcTo( HDC hdc
,
113 INT right
, INT bottom
,
114 INT xstart
, INT ystart
,
118 DC
* dc
= DC_GetDCUpdate( hdc
);
119 if(!dc
) return FALSE
;
121 if(dc
->funcs
->pArcTo
)
123 result
= dc
->funcs
->pArcTo( dc
->physDev
, left
, top
, right
, bottom
,
124 xstart
, ystart
, xend
, yend
);
125 GDI_ReleaseObj( hdc
);
128 GDI_ReleaseObj( hdc
);
131 * According to the documentation, a line is drawn from the current
132 * position to the starting point of the arc.
134 LineTo(hdc
, xstart
, ystart
);
136 * Then the arc is drawn.
138 result
= Arc(hdc
, left
, top
, right
, bottom
, xstart
, ystart
, xend
, yend
);
140 * If no error occurred, the current position is moved to the ending
143 if (result
) MoveToEx(hdc
, xend
, yend
, NULL
);
148 /***********************************************************************
151 BOOL WINAPI
Pie( HDC hdc
, INT left
, INT top
,
152 INT right
, INT bottom
, INT xstart
, INT ystart
,
156 DC
* dc
= DC_GetDCUpdate( hdc
);
157 if (!dc
) return FALSE
;
159 if(PATH_IsPathOpen(dc
->path
))
160 ret
= PATH_Arc(dc
,left
,top
,right
,bottom
,xstart
,ystart
,xend
,yend
,2);
161 else if(dc
->funcs
->pPie
)
162 ret
= dc
->funcs
->pPie(dc
->physDev
,left
,top
,right
,bottom
,xstart
,ystart
,xend
,yend
);
164 GDI_ReleaseObj( hdc
);
169 /***********************************************************************
172 BOOL WINAPI
Chord( HDC hdc
, INT left
, INT top
,
173 INT right
, INT bottom
, INT xstart
, INT ystart
,
177 DC
* dc
= DC_GetDCUpdate( hdc
);
178 if (!dc
) return FALSE
;
180 if(PATH_IsPathOpen(dc
->path
))
181 ret
= PATH_Arc(dc
,left
,top
,right
,bottom
,xstart
,ystart
,xend
,yend
,1);
182 else if(dc
->funcs
->pChord
)
183 ret
= dc
->funcs
->pChord(dc
->physDev
,left
,top
,right
,bottom
,xstart
,ystart
,xend
,yend
);
185 GDI_ReleaseObj( hdc
);
190 /***********************************************************************
193 BOOL WINAPI
Ellipse( HDC hdc
, INT left
, INT top
,
194 INT right
, INT bottom
)
197 DC
* dc
= DC_GetDCUpdate( hdc
);
198 if (!dc
) return FALSE
;
200 if(PATH_IsPathOpen(dc
->path
))
201 ret
= PATH_Ellipse(dc
,left
,top
,right
,bottom
);
202 else if (dc
->funcs
->pEllipse
)
203 ret
= dc
->funcs
->pEllipse(dc
->physDev
,left
,top
,right
,bottom
);
205 GDI_ReleaseObj( hdc
);
210 /***********************************************************************
211 * Rectangle (GDI32.@)
213 BOOL WINAPI
Rectangle( HDC hdc
, INT left
, INT top
,
214 INT right
, INT bottom
)
217 DC
* dc
= DC_GetDCUpdate( hdc
);
220 if(PATH_IsPathOpen(dc
->path
))
221 ret
= PATH_Rectangle(dc
, left
, top
, right
, bottom
);
222 else if (dc
->funcs
->pRectangle
)
223 ret
= dc
->funcs
->pRectangle(dc
->physDev
,left
,top
,right
,bottom
);
224 GDI_ReleaseObj( hdc
);
230 /***********************************************************************
231 * RoundRect (GDI32.@)
233 BOOL WINAPI
RoundRect( HDC hdc
, INT left
, INT top
, INT right
,
234 INT bottom
, INT ell_width
, INT ell_height
)
237 DC
*dc
= DC_GetDCUpdate( hdc
);
241 if(PATH_IsPathOpen(dc
->path
))
242 ret
= PATH_RoundRect(dc
,left
,top
,right
,bottom
,ell_width
,ell_height
);
243 else if (dc
->funcs
->pRoundRect
)
244 ret
= dc
->funcs
->pRoundRect(dc
->physDev
,left
,top
,right
,bottom
,ell_width
,ell_height
);
245 GDI_ReleaseObj( hdc
);
250 /***********************************************************************
253 COLORREF WINAPI
SetPixel( HDC hdc
, INT x
, INT y
, COLORREF color
)
256 DC
* dc
= DC_GetDCUpdate( hdc
);
259 if (dc
->funcs
->pSetPixel
) ret
= dc
->funcs
->pSetPixel(dc
->physDev
,x
,y
,color
);
260 GDI_ReleaseObj( hdc
);
265 /***********************************************************************
266 * SetPixelV (GDI32.@)
268 BOOL WINAPI
SetPixelV( HDC hdc
, INT x
, INT y
, COLORREF color
)
271 DC
* dc
= DC_GetDCUpdate( hdc
);
274 if (dc
->funcs
->pSetPixel
)
276 dc
->funcs
->pSetPixel(dc
->physDev
,x
,y
,color
);
279 GDI_ReleaseObj( hdc
);
284 /***********************************************************************
287 COLORREF WINAPI
GetPixel( HDC hdc
, INT x
, INT y
)
289 COLORREF ret
= CLR_INVALID
;
290 DC
* dc
= DC_GetDCUpdate( hdc
);
294 /* FIXME: should this be in the graphics driver? */
295 if (PtVisible( hdc
, x
, y
))
297 if (dc
->funcs
->pGetPixel
) ret
= dc
->funcs
->pGetPixel(dc
->physDev
,x
,y
);
299 GDI_ReleaseObj( hdc
);
305 /******************************************************************************
306 * ChoosePixelFormat [GDI32.@]
307 * Matches a pixel format to given format
310 * hdc [I] Device context to search for best pixel match
311 * ppfd [I] Pixel format for which a match is sought
314 * Success: Pixel format index closest to given format
317 INT WINAPI
ChoosePixelFormat( HDC hdc
, const PIXELFORMATDESCRIPTOR
* ppfd
)
320 DC
* dc
= DC_GetDCPtr( hdc
);
322 TRACE("(%p,%p)\n",hdc
,ppfd
);
326 if (!dc
->funcs
->pChoosePixelFormat
) FIXME(" :stub\n");
327 else ret
= dc
->funcs
->pChoosePixelFormat(dc
->physDev
,ppfd
);
329 GDI_ReleaseObj( hdc
);
334 /******************************************************************************
335 * SetPixelFormat [GDI32.@]
336 * Sets pixel format of device context
339 * hdc [I] Device context to search for best pixel match
340 * iPixelFormat [I] Pixel format index
341 * ppfd [I] Pixel format for which a match is sought
347 BOOL WINAPI
SetPixelFormat( HDC hdc
, INT iPixelFormat
,
348 const PIXELFORMATDESCRIPTOR
*ppfd
)
351 DC
* dc
= DC_GetDCPtr( hdc
);
353 TRACE("(%p,%d,%p)\n",hdc
,iPixelFormat
,ppfd
);
357 if (!dc
->funcs
->pSetPixelFormat
) FIXME(" :stub\n");
358 else bRet
= dc
->funcs
->pSetPixelFormat(dc
->physDev
,iPixelFormat
,ppfd
);
360 GDI_ReleaseObj( hdc
);
365 /******************************************************************************
366 * GetPixelFormat [GDI32.@]
367 * Gets index of pixel format of DC
370 * hdc [I] Device context whose pixel format index is sought
373 * Success: Currently selected pixel format
376 INT WINAPI
GetPixelFormat( HDC hdc
)
379 DC
* dc
= DC_GetDCPtr( hdc
);
385 if (!dc
->funcs
->pGetPixelFormat
) FIXME(" :stub\n");
386 else ret
= dc
->funcs
->pGetPixelFormat(dc
->physDev
);
388 GDI_ReleaseObj( hdc
);
393 /******************************************************************************
394 * DescribePixelFormat [GDI32.@]
395 * Gets info about pixel format from DC
398 * hdc [I] Device context
399 * iPixelFormat [I] Pixel format selector
400 * nBytes [I] Size of buffer
401 * ppfd [O] Pointer to structure to receive pixel format data
404 * Success: Maximum pixel format index of the device context
407 INT WINAPI
DescribePixelFormat( HDC hdc
, INT iPixelFormat
, UINT nBytes
,
408 LPPIXELFORMATDESCRIPTOR ppfd
)
411 DC
* dc
= DC_GetDCPtr( hdc
);
413 TRACE("(%p,%d,%d,%p): stub\n",hdc
,iPixelFormat
,nBytes
,ppfd
);
417 if (!dc
->funcs
->pDescribePixelFormat
)
420 ppfd
->nSize
= nBytes
;
424 else ret
= dc
->funcs
->pDescribePixelFormat(dc
->physDev
,iPixelFormat
,nBytes
,ppfd
);
426 GDI_ReleaseObj( hdc
);
431 /******************************************************************************
432 * SwapBuffers [GDI32.@]
433 * Exchanges front and back buffers of window
436 * hdc [I] Device context whose buffers get swapped
442 BOOL WINAPI
SwapBuffers( HDC hdc
)
445 DC
* dc
= DC_GetDCPtr( hdc
);
449 if (!dc
) return TRUE
;
451 if (!dc
->funcs
->pSwapBuffers
)
456 else bRet
= dc
->funcs
->pSwapBuffers(dc
->physDev
);
458 GDI_ReleaseObj( hdc
);
463 /***********************************************************************
466 BOOL WINAPI
PaintRgn( HDC hdc
, HRGN hrgn
)
469 DC
* dc
= DC_GetDCUpdate( hdc
);
472 if (dc
->funcs
->pPaintRgn
) ret
= dc
->funcs
->pPaintRgn(dc
->physDev
,hrgn
);
473 GDI_ReleaseObj( hdc
);
479 /***********************************************************************
482 BOOL WINAPI
FillRgn( HDC hdc
, HRGN hrgn
, HBRUSH hbrush
)
486 DC
* dc
= DC_GetDCUpdate( hdc
);
488 if (!dc
) return FALSE
;
489 if(dc
->funcs
->pFillRgn
)
490 retval
= dc
->funcs
->pFillRgn(dc
->physDev
, hrgn
, hbrush
);
491 else if ((prevBrush
= SelectObject( hdc
, hbrush
)))
493 retval
= PaintRgn( hdc
, hrgn
);
494 SelectObject( hdc
, prevBrush
);
496 GDI_ReleaseObj( hdc
);
501 /***********************************************************************
504 BOOL WINAPI
FrameRgn( HDC hdc
, HRGN hrgn
, HBRUSH hbrush
,
505 INT nWidth
, INT nHeight
)
508 DC
*dc
= DC_GetDCUpdate( hdc
);
510 if (!dc
) return FALSE
;
511 if(dc
->funcs
->pFrameRgn
)
512 ret
= dc
->funcs
->pFrameRgn( dc
->physDev
, hrgn
, hbrush
, nWidth
, nHeight
);
515 HRGN tmp
= CreateRectRgn( 0, 0, 0, 0 );
518 if (REGION_FrameRgn( tmp
, hrgn
, nWidth
, nHeight
))
520 FillRgn( hdc
, tmp
, hbrush
);
526 GDI_ReleaseObj( hdc
);
531 /***********************************************************************
532 * InvertRgn (GDI32.@)
534 BOOL WINAPI
InvertRgn( HDC hdc
, HRGN hrgn
)
539 DC
*dc
= DC_GetDCUpdate( hdc
);
540 if (!dc
) return FALSE
;
542 if(dc
->funcs
->pInvertRgn
)
543 retval
= dc
->funcs
->pInvertRgn( dc
->physDev
, hrgn
);
546 prevBrush
= SelectObject( hdc
, GetStockObject(BLACK_BRUSH
) );
547 prevROP
= SetROP2( hdc
, R2_NOT
);
548 retval
= PaintRgn( hdc
, hrgn
);
549 SelectObject( hdc
, prevBrush
);
550 SetROP2( hdc
, prevROP
);
552 GDI_ReleaseObj( hdc
);
557 /**********************************************************************
560 BOOL WINAPI
Polyline( HDC hdc
, const POINT
* pt
, INT count
)
563 DC
* dc
= DC_GetDCUpdate( hdc
);
566 if (PATH_IsPathOpen(dc
->path
)) ret
= PATH_Polyline(dc
, pt
, count
);
567 else if (dc
->funcs
->pPolyline
) ret
= dc
->funcs
->pPolyline(dc
->physDev
,pt
,count
);
568 GDI_ReleaseObj( hdc
);
573 /**********************************************************************
574 * PolylineTo (GDI32.@)
576 BOOL WINAPI
PolylineTo( HDC hdc
, const POINT
* pt
, DWORD cCount
)
578 DC
* dc
= DC_GetDCUpdate( hdc
);
581 if(!dc
) return FALSE
;
583 if(PATH_IsPathOpen(dc
->path
))
584 ret
= PATH_PolylineTo(dc
, pt
, cCount
);
586 else if(dc
->funcs
->pPolylineTo
)
587 ret
= dc
->funcs
->pPolylineTo(dc
->physDev
, pt
, cCount
);
589 else { /* do it using Polyline */
590 POINT
*pts
= HeapAlloc( GetProcessHeap(), 0,
591 sizeof(POINT
) * (cCount
+ 1) );
594 pts
[0].x
= dc
->CursPosX
;
595 pts
[0].y
= dc
->CursPosY
;
596 memcpy( pts
+ 1, pt
, sizeof(POINT
) * cCount
);
597 ret
= Polyline( hdc
, pts
, cCount
+ 1 );
598 HeapFree( GetProcessHeap(), 0, pts
);
602 dc
->CursPosX
= pt
[cCount
-1].x
;
603 dc
->CursPosY
= pt
[cCount
-1].y
;
605 GDI_ReleaseObj( hdc
);
610 /**********************************************************************
613 BOOL WINAPI
Polygon( HDC hdc
, const POINT
* pt
, INT count
)
616 DC
* dc
= DC_GetDCUpdate( hdc
);
619 if (PATH_IsPathOpen(dc
->path
)) ret
= PATH_Polygon(dc
, pt
, count
);
620 else if (dc
->funcs
->pPolygon
) ret
= dc
->funcs
->pPolygon(dc
->physDev
,pt
,count
);
621 GDI_ReleaseObj( hdc
);
627 /**********************************************************************
628 * PolyPolygon (GDI32.@)
630 BOOL WINAPI
PolyPolygon( HDC hdc
, const POINT
* pt
, const INT
* counts
,
634 DC
* dc
= DC_GetDCUpdate( hdc
);
637 if (PATH_IsPathOpen(dc
->path
)) ret
= PATH_PolyPolygon(dc
, pt
, counts
, polygons
);
638 else if (dc
->funcs
->pPolyPolygon
) ret
= dc
->funcs
->pPolyPolygon(dc
->physDev
,pt
,counts
,polygons
);
639 GDI_ReleaseObj( hdc
);
644 /**********************************************************************
645 * PolyPolyline (GDI32.@)
647 BOOL WINAPI
PolyPolyline( HDC hdc
, const POINT
* pt
, const DWORD
* counts
,
651 DC
* dc
= DC_GetDCUpdate( hdc
);
654 if (PATH_IsPathOpen(dc
->path
)) ret
= PATH_PolyPolyline(dc
, pt
, counts
, polylines
);
655 else if (dc
->funcs
->pPolyPolyline
) ret
= dc
->funcs
->pPolyPolyline(dc
->physDev
,pt
,counts
,polylines
);
656 GDI_ReleaseObj( hdc
);
661 /**********************************************************************
662 * ExtFloodFill (GDI32.@)
664 BOOL WINAPI
ExtFloodFill( HDC hdc
, INT x
, INT y
, COLORREF color
,
668 DC
* dc
= DC_GetDCUpdate( hdc
);
671 if (dc
->funcs
->pExtFloodFill
) ret
= dc
->funcs
->pExtFloodFill(dc
->physDev
,x
,y
,color
,fillType
);
672 GDI_ReleaseObj( hdc
);
678 /**********************************************************************
679 * FloodFill (GDI32.@)
681 BOOL WINAPI
FloodFill( HDC hdc
, INT x
, INT y
, COLORREF color
)
683 return ExtFloodFill( hdc
, x
, y
, color
, FLOODFILLBORDER
);
687 /******************************************************************************
688 * PolyBezier [GDI32.@]
689 * Draws one or more Bezier curves
692 * hDc [I] Handle to device context
693 * lppt [I] Pointer to endpoints and control points
694 * cPoints [I] Count of endpoints and control points
700 BOOL WINAPI
PolyBezier( HDC hdc
, const POINT
* lppt
, DWORD cPoints
)
705 /* cPoints must be 3 * n + 1 (where n>=1) */
706 if (cPoints
== 1 || (cPoints
% 3) != 1) return FALSE
;
708 dc
= DC_GetDCUpdate( hdc
);
709 if(!dc
) return FALSE
;
711 if(PATH_IsPathOpen(dc
->path
))
712 ret
= PATH_PolyBezier(dc
, lppt
, cPoints
);
713 else if (dc
->funcs
->pPolyBezier
)
714 ret
= dc
->funcs
->pPolyBezier(dc
->physDev
, lppt
, cPoints
);
715 else /* We'll convert it into line segments and draw them using Polyline */
720 if ((Pts
= GDI_Bezier( lppt
, cPoints
, &nOut
)))
722 TRACE("Pts = %p, no = %d\n", Pts
, nOut
);
723 ret
= Polyline( dc
->hSelf
, Pts
, nOut
);
724 HeapFree( GetProcessHeap(), 0, Pts
);
728 GDI_ReleaseObj( hdc
);
732 /******************************************************************************
733 * PolyBezierTo [GDI32.@]
734 * Draws one or more Bezier curves
737 * hDc [I] Handle to device context
738 * lppt [I] Pointer to endpoints and control points
739 * cPoints [I] Count of endpoints and control points
745 BOOL WINAPI
PolyBezierTo( HDC hdc
, const POINT
* lppt
, DWORD cPoints
)
750 /* cbPoints must be 3 * n (where n>=1) */
751 if (!cPoints
|| (cPoints
% 3) != 0) return FALSE
;
753 dc
= DC_GetDCUpdate( hdc
);
754 if(!dc
) return FALSE
;
756 if(PATH_IsPathOpen(dc
->path
))
757 ret
= PATH_PolyBezierTo(dc
, lppt
, cPoints
);
758 else if(dc
->funcs
->pPolyBezierTo
)
759 ret
= dc
->funcs
->pPolyBezierTo(dc
->physDev
, lppt
, cPoints
);
760 else { /* We'll do it using PolyBezier */
762 pt
= HeapAlloc( GetProcessHeap(), 0, sizeof(POINT
) * (cPoints
+ 1) );
763 if(!pt
) return FALSE
;
764 pt
[0].x
= dc
->CursPosX
;
765 pt
[0].y
= dc
->CursPosY
;
766 memcpy(pt
+ 1, lppt
, sizeof(POINT
) * cPoints
);
767 ret
= PolyBezier(dc
->hSelf
, pt
, cPoints
+1);
768 HeapFree( GetProcessHeap(), 0, pt
);
771 dc
->CursPosX
= lppt
[cPoints
-1].x
;
772 dc
->CursPosY
= lppt
[cPoints
-1].y
;
774 GDI_ReleaseObj( hdc
);
778 /***********************************************************************
781 BOOL WINAPI
AngleArc(HDC hdc
, INT x
, INT y
, DWORD dwRadius
, FLOAT eStartAngle
, FLOAT eSweepAngle
)
783 INT x1
,y1
,x2
,y2
, arcdir
;
787 if( (signed int)dwRadius
< 0 )
790 dc
= DC_GetDCUpdate( hdc
);
791 if(!dc
) return FALSE
;
793 if(dc
->funcs
->pAngleArc
)
795 result
= dc
->funcs
->pAngleArc( dc
->physDev
, x
, y
, dwRadius
, eStartAngle
, eSweepAngle
);
797 GDI_ReleaseObj( hdc
);
800 GDI_ReleaseObj( hdc
);
802 /* AngleArc always works counterclockwise */
803 arcdir
= GetArcDirection( hdc
);
804 SetArcDirection( hdc
, AD_COUNTERCLOCKWISE
);
806 x1
= x
+ cos(eStartAngle
*M_PI
/180) * dwRadius
;
807 y1
= y
- sin(eStartAngle
*M_PI
/180) * dwRadius
;
808 x2
= x
+ cos((eStartAngle
+eSweepAngle
)*M_PI
/180) * dwRadius
;
809 y2
= x
- sin((eStartAngle
+eSweepAngle
)*M_PI
/180) * dwRadius
;
811 LineTo( hdc
, x1
, y1
);
812 if( eSweepAngle
>= 0 )
813 result
= Arc( hdc
, x
-dwRadius
, y
-dwRadius
, x
+dwRadius
, y
+dwRadius
,
816 result
= Arc( hdc
, x
-dwRadius
, y
-dwRadius
, x
+dwRadius
, y
+dwRadius
,
819 if( result
) MoveToEx( hdc
, x2
, y2
, NULL
);
820 SetArcDirection( hdc
, arcdir
);
824 /***********************************************************************
827 BOOL WINAPI
PolyDraw(HDC hdc
, const POINT
*lppt
, const BYTE
*lpbTypes
,
835 dc
= DC_GetDCUpdate( hdc
);
836 if(!dc
) return FALSE
;
838 if(dc
->funcs
->pPolyDraw
)
840 result
= dc
->funcs
->pPolyDraw( dc
->physDev
, lppt
, lpbTypes
, cCount
);
841 GDI_ReleaseObj( hdc
);
844 GDI_ReleaseObj( hdc
);
846 /* check for each bezierto if there are two more points */
847 for( i
= 0; i
< cCount
; i
++ )
848 if( lpbTypes
[i
] != PT_MOVETO
&&
849 lpbTypes
[i
] & PT_BEZIERTO
)
857 /* if no moveto occurs, we will close the figure here */
858 lastmove
.x
= dc
->CursPosX
;
859 lastmove
.y
= dc
->CursPosY
;
862 for( i
= 0; i
< cCount
; i
++ )
864 if( lpbTypes
[i
] == PT_MOVETO
)
866 MoveToEx( hdc
, lppt
[i
].x
, lppt
[i
].y
, NULL
);
867 lastmove
.x
= dc
->CursPosX
;
868 lastmove
.y
= dc
->CursPosY
;
870 else if( lpbTypes
[i
] & PT_LINETO
)
871 LineTo( hdc
, lppt
[i
].x
, lppt
[i
].y
);
872 else if( lpbTypes
[i
] & PT_BEZIERTO
)
874 PolyBezierTo( hdc
, &lppt
[i
], 3 );
880 if( lpbTypes
[i
] & PT_CLOSEFIGURE
)
882 if( PATH_IsPathOpen( dc
->path
) )
885 LineTo( hdc
, lastmove
.x
, lastmove
.y
);
893 /**********************************************************************
896 BOOL WINAPI
LineDDA(INT nXStart
, INT nYStart
, INT nXEnd
, INT nYEnd
,
897 LINEDDAPROC callback
, LPARAM lParam
)
899 INT xadd
= 1, yadd
= 1;
902 INT dx
= nXEnd
- nXStart
;
903 INT dy
= nYEnd
- nYStart
;
915 if (dx
> dy
) /* line is "more horizontal" */
917 err
= 2*dy
- dx
; erradd
= 2*dy
- 2*dx
;
918 for(cnt
= 0;cnt
<= dx
; cnt
++)
920 callback(nXStart
,nYStart
,lParam
);
930 else /* line is "more vertical" */
932 err
= 2*dx
- dy
; erradd
= 2*dx
- 2*dy
;
933 for(cnt
= 0;cnt
<= dy
; cnt
++)
935 callback(nXStart
,nYStart
,lParam
);
949 /******************************************************************
951 * *Very* simple bezier drawing code,
953 * It uses a recursive algorithm to divide the curve in a series
954 * of straight line segements. Not ideal but for me sufficient.
955 * If you are in need for something better look for some incremental
958 * 7 July 1998 Rein Klazes
962 * some macro definitions for bezier drawing
964 * to avoid truncation errors the coordinates are
965 * shifted upwards. When used in drawing they are
966 * shifted down again, including correct rounding
967 * and avoiding floating point arithmetic
968 * 4 bits should allow 27 bits coordinates which I saw
969 * somewhere in the win32 doc's
973 #define BEZIERSHIFTBITS 4
974 #define BEZIERSHIFTUP(x) ((x)<<BEZIERSHIFTBITS)
975 #define BEZIERPIXEL BEZIERSHIFTUP(1)
976 #define BEZIERSHIFTDOWN(x) (((x)+(1<<(BEZIERSHIFTBITS-1)))>>BEZIERSHIFTBITS)
977 /* maximum depth of recursion */
978 #define BEZIERMAXDEPTH 8
980 /* size of array to store points on */
981 /* enough for one curve */
982 #define BEZIER_INITBUFSIZE (150)
984 /* calculate Bezier average, in this case the middle
985 * correctly rounded...
988 #define BEZIERMIDDLE(Mid, P1, P2) \
989 (Mid).x=((P1).x+(P2).x + 1)/2;\
990 (Mid).y=((P1).y+(P2).y + 1)/2;
992 /**********************************************************
993 * BezierCheck helper function to check
994 * that recursion can be terminated
995 * Points[0] and Points[3] are begin and endpoint
996 * Points[1] and Points[2] are control points
997 * level is the recursion depth
998 * returns true if the recusion can be terminated
1000 static BOOL
BezierCheck( int level
, POINT
*Points
)
1003 dx
=Points
[3].x
-Points
[0].x
;
1004 dy
=Points
[3].y
-Points
[0].y
;
1005 if(abs(dy
)<=abs(dx
)){/* shallow line */
1006 /* check that control points are between begin and end */
1007 if(Points
[1].x
< Points
[0].x
){
1008 if(Points
[1].x
< Points
[3].x
)
1011 if(Points
[1].x
> Points
[3].x
)
1013 if(Points
[2].x
< Points
[0].x
){
1014 if(Points
[2].x
< Points
[3].x
)
1017 if(Points
[2].x
> Points
[3].x
)
1019 dx
=BEZIERSHIFTDOWN(dx
);
1020 if(!dx
) return TRUE
;
1021 if(abs(Points
[1].y
-Points
[0].y
-(dy
/dx
)*
1022 BEZIERSHIFTDOWN(Points
[1].x
-Points
[0].x
)) > BEZIERPIXEL
||
1023 abs(Points
[2].y
-Points
[0].y
-(dy
/dx
)*
1024 BEZIERSHIFTDOWN(Points
[2].x
-Points
[0].x
)) > BEZIERPIXEL
)
1028 }else{ /* steep line */
1029 /* check that control points are between begin and end */
1030 if(Points
[1].y
< Points
[0].y
){
1031 if(Points
[1].y
< Points
[3].y
)
1034 if(Points
[1].y
> Points
[3].y
)
1036 if(Points
[2].y
< Points
[0].y
){
1037 if(Points
[2].y
< Points
[3].y
)
1040 if(Points
[2].y
> Points
[3].y
)
1042 dy
=BEZIERSHIFTDOWN(dy
);
1043 if(!dy
) return TRUE
;
1044 if(abs(Points
[1].x
-Points
[0].x
-(dx
/dy
)*
1045 BEZIERSHIFTDOWN(Points
[1].y
-Points
[0].y
)) > BEZIERPIXEL
||
1046 abs(Points
[2].x
-Points
[0].x
-(dx
/dy
)*
1047 BEZIERSHIFTDOWN(Points
[2].y
-Points
[0].y
)) > BEZIERPIXEL
)
1054 /* Helper for GDI_Bezier.
1055 * Just handles one Bezier, so Points should point to four POINTs
1057 static void GDI_InternalBezier( POINT
*Points
, POINT
**PtsOut
, INT
*dwOut
,
1058 INT
*nPtsOut
, INT level
)
1060 if(*nPtsOut
== *dwOut
) {
1062 *PtsOut
= HeapReAlloc( GetProcessHeap(), 0, *PtsOut
,
1063 *dwOut
* sizeof(POINT
) );
1066 if(!level
|| BezierCheck(level
, Points
)) {
1068 (*PtsOut
)[0].x
= BEZIERSHIFTDOWN(Points
[0].x
);
1069 (*PtsOut
)[0].y
= BEZIERSHIFTDOWN(Points
[0].y
);
1072 (*PtsOut
)[*nPtsOut
].x
= BEZIERSHIFTDOWN(Points
[3].x
);
1073 (*PtsOut
)[*nPtsOut
].y
= BEZIERSHIFTDOWN(Points
[3].y
);
1076 POINT Points2
[4]; /* for the second recursive call */
1077 Points2
[3]=Points
[3];
1078 BEZIERMIDDLE(Points2
[2], Points
[2], Points
[3]);
1079 BEZIERMIDDLE(Points2
[0], Points
[1], Points
[2]);
1080 BEZIERMIDDLE(Points2
[1],Points2
[0],Points2
[2]);
1082 BEZIERMIDDLE(Points
[1], Points
[0], Points
[1]);
1083 BEZIERMIDDLE(Points
[2], Points
[1], Points2
[0]);
1084 BEZIERMIDDLE(Points
[3], Points
[2], Points2
[1]);
1086 Points2
[0]=Points
[3];
1088 /* do the two halves */
1089 GDI_InternalBezier(Points
, PtsOut
, dwOut
, nPtsOut
, level
-1);
1090 GDI_InternalBezier(Points2
, PtsOut
, dwOut
, nPtsOut
, level
-1);
1096 /***********************************************************************
1097 * GDI_Bezier [INTERNAL]
1098 * Calculate line segments that approximate -what microsoft calls- a bezier
1100 * The routine recursively divides the curve in two parts until a straight
1105 * Points [I] Ptr to count POINTs which are the end and control points
1106 * of the set of Bezier curves to flatten.
1107 * count [I] Number of Points. Must be 3n+1.
1108 * nPtsOut [O] Will contain no of points that have been produced (i.e. no. of
1113 * Ptr to an array of POINTs that contain the lines that approximinate the
1114 * Beziers. The array is allocated on the process heap and it is the caller's
1115 * responsibility to HeapFree it. [this is not a particularly nice interface
1116 * but since we can't know in advance how many points will generate, the
1117 * alternative would be to call the function twice, once to determine the size
1118 * and a second time to do the work - I decided this was too much of a pain].
1120 POINT
*GDI_Bezier( const POINT
*Points
, INT count
, INT
*nPtsOut
)
1123 INT Bezier
, dwOut
= BEZIER_INITBUFSIZE
, i
;
1125 if (count
== 1 || (count
- 1) % 3 != 0) {
1126 ERR("Invalid no. of points %d\n", count
);
1130 out
= HeapAlloc( GetProcessHeap(), 0, dwOut
* sizeof(POINT
));
1131 for(Bezier
= 0; Bezier
< (count
-1)/3; Bezier
++) {
1133 memcpy(ptBuf
, Points
+ Bezier
* 3, sizeof(POINT
) * 4);
1134 for(i
= 0; i
< 4; i
++) {
1135 ptBuf
[i
].x
= BEZIERSHIFTUP(ptBuf
[i
].x
);
1136 ptBuf
[i
].y
= BEZIERSHIFTUP(ptBuf
[i
].y
);
1138 GDI_InternalBezier( ptBuf
, &out
, &dwOut
, nPtsOut
, BEZIERMAXDEPTH
);
1140 TRACE("Produced %d points\n", *nPtsOut
);
1144 /******************************************************************************
1145 * GdiGradientFill (GDI32.@)
1147 * FIXME: we don't support the Alpha channel properly
1149 BOOL WINAPI
GdiGradientFill( HDC hdc
, TRIVERTEX
*vert_array
, ULONG nvert
,
1150 void * grad_array
, ULONG ngrad
, ULONG mode
)
1154 TRACE("vert_array:0x%08lx nvert:%d grad_array:0x%08lx ngrad:%d\n",
1155 (long)vert_array
, nvert
, (long)grad_array
, ngrad
);
1159 case GRADIENT_FILL_RECT_H
:
1160 for(i
= 0; i
< ngrad
; i
++)
1162 GRADIENT_RECT
*rect
= ((GRADIENT_RECT
*)grad_array
) + i
;
1163 TRIVERTEX
*v1
= vert_array
+ rect
->UpperLeft
;
1164 TRIVERTEX
*v2
= vert_array
+ rect
->LowerRight
;
1165 int y1
= v1
->y
< v2
->y
? v1
->y
: v2
->y
;
1166 int y2
= v2
->y
> v1
->y
? v2
->y
: v1
->y
;
1175 for (x
= 0; x
< dx
; x
++)
1180 hPen
= CreatePen( PS_SOLID
, 1, RGB(
1181 (v1
->Red
* (dx
- x
) + v2
->Red
* x
) / dx
>> 8,
1182 (v1
->Green
* (dx
- x
) + v2
->Green
* x
) / dx
>> 8,
1183 (v1
->Blue
* (dx
- x
) + v2
->Blue
* x
) / dx
>> 8));
1184 hOldPen
= SelectObject( hdc
, hPen
);
1185 pts
[0].x
= v1
->x
+ x
;
1187 pts
[1].x
= v1
->x
+ x
;
1189 Polyline( hdc
, &pts
[0], 2 );
1190 DeleteObject( SelectObject(hdc
, hOldPen
) );
1194 case GRADIENT_FILL_RECT_V
:
1195 for(i
= 0; i
< ngrad
; i
++)
1197 GRADIENT_RECT
*rect
= ((GRADIENT_RECT
*)grad_array
) + i
;
1198 TRIVERTEX
*v1
= vert_array
+ rect
->UpperLeft
;
1199 TRIVERTEX
*v2
= vert_array
+ rect
->LowerRight
;
1200 int x1
= v1
->x
< v2
->x
? v1
->x
: v2
->x
;
1201 int x2
= v2
->x
> v1
->x
? v2
->x
: v1
->x
;
1210 for (y
= 0; y
< dy
; y
++)
1215 hPen
= CreatePen( PS_SOLID
, 1, RGB(
1216 (v1
->Red
* (dy
- y
) + v2
->Red
* y
) / dy
>> 8,
1217 (v1
->Green
* (dy
- y
) + v2
->Green
* y
) / dy
>> 8,
1218 (v1
->Blue
* (dy
- y
) + v2
->Blue
* y
) / dy
>> 8));
1219 hOldPen
= SelectObject( hdc
, hPen
);
1221 pts
[0].y
= v1
->y
+ y
;
1223 pts
[1].y
= v1
->y
+ y
;
1224 Polyline( hdc
, &pts
[0], 2 );
1225 DeleteObject( SelectObject(hdc
, hOldPen
) );
1229 case GRADIENT_FILL_TRIANGLE
:
1230 for (i
= 0; i
< ngrad
; i
++)
1232 GRADIENT_TRIANGLE
*tri
= ((GRADIENT_TRIANGLE
*)grad_array
) + i
;
1233 TRIVERTEX
*v1
= vert_array
+ tri
->Vertex1
;
1234 TRIVERTEX
*v2
= vert_array
+ tri
->Vertex2
;
1235 TRIVERTEX
*v3
= vert_array
+ tri
->Vertex3
;
1239 { TRIVERTEX
*t
= v1
; v1
= v2
; v2
= t
; }
1242 TRIVERTEX
*t
= v2
; v2
= v3
; v3
= t
;
1244 { t
= v1
; v1
= v2
; v2
= t
; }
1246 /* v1->y <= v2->y <= v3->y */
1249 for (y
= 0; y
< dy
; y
++)
1251 /* v1->y <= y < v3->y */
1252 TRIVERTEX
*v
= y
< (v2
->y
- v1
->y
) ? v1
: v3
;
1253 /* (v->y <= y < v2->y) || (v2->y <= y < v->y) */
1254 int dy2
= v2
->y
- v
->y
;
1255 int y2
= y
+ v1
->y
- v
->y
;
1257 int x1
= (v3
->x
* y
+ v1
->x
* (dy
- y
)) / dy
;
1258 int x2
= (v2
->x
* y2
+ v
-> x
* (dy2
- y2
)) / dy2
;
1259 int r1
= (v3
->Red
* y
+ v1
->Red
* (dy
- y
)) / dy
;
1260 int r2
= (v2
->Red
* y2
+ v
-> Red
* (dy2
- y2
)) / dy2
;
1261 int g1
= (v3
->Green
* y
+ v1
->Green
* (dy
- y
)) / dy
;
1262 int g2
= (v2
->Green
* y2
+ v
-> Green
* (dy2
- y2
)) / dy2
;
1263 int b1
= (v3
->Blue
* y
+ v1
->Blue
* (dy
- y
)) / dy
;
1264 int b2
= (v2
->Blue
* y2
+ v
-> Blue
* (dy2
- y2
)) / dy2
;
1270 for (x
= 0; x
< dx
; x
++)
1271 SetPixel (hdc
, x
+ x1
, y
+ v1
->y
, RGB(
1272 (r1
* (dx
- x
) + r2
* x
) / dx
>> 8,
1273 (g1
* (dx
- x
) + g2
* x
) / dx
>> 8,
1274 (b1
* (dx
- x
) + b2
* x
) / dx
>> 8));
1279 for (x
= 0; x
< dx
; x
++)
1280 SetPixel (hdc
, x
+ x2
, y
+ v1
->y
, RGB(
1281 (r2
* (dx
- x
) + r1
* x
) / dx
>> 8,
1282 (g2
* (dx
- x
) + g1
* x
) / dx
>> 8,
1283 (b2
* (dx
- x
) + b1
* x
) / dx
>> 8));