comctl32/tests: Fix band info tests that depend on system font heights.
[wine] / dlls / gdiplus / region.c
1 /*
2  * Copyright (C) 2008 Google (Lei Zhang)
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
21 #include "windef.h"
22 #include "winbase.h"
23 #include "wingdi.h"
24
25 #include "objbase.h"
26
27 #include "gdiplus.h"
28 #include "gdiplus_private.h"
29 #include "wine/debug.h"
30
31 WINE_DEFAULT_DEBUG_CHANNEL(gdiplus);
32
33 /**********************************************************
34  *
35  * Data returned by GdipGetRegionData looks something like this:
36  *
37  * struct region_data_header
38  * {
39  *   DWORD size;     size in bytes of the data - 8.
40  *   DWORD magic1;   probably a checksum.
41  *   DWORD magic2;   always seems to be 0xdbc01001 - version?
42  *   DWORD num_ops;  number of combining ops * 2
43  * };
44  *
45  * Then follows a sequence of combining ops and region elements.
46  *
47  * A region element is either a RECTF or some path data.
48  *
49  * Combining ops are just stored as their CombineMode value.
50  *
51  * Each RECTF is preceded by the DWORD 0x10000000.  An empty rect is
52  * stored as 0x10000002 (with no following RECTF) and an infinite rect
53  * is stored as 0x10000003 (again with no following RECTF).
54  *
55  * Path data is preceded by the DWORD 0x10000001.  Then follows a
56  * DWORD size and then size bytes of data.
57  *
58  * The combining ops are stored in the reverse order to the region
59  * elements and in the reverse order to which the region was
60  * constructed.
61  *
62  * When two or more complex regions (ie those with more than one
63  * element) are combined, the combining op for the two regions comes
64  * first, then the combining ops for the region elements in region 1,
65  * followed by the region elements for region 1, then follows the
66  * combining ops for region 2 and finally region 2's region elements.
67  * Presumably you're supposed to use the 0x1000000x header to find the
68  * end of the op list (the count of the elements in each region is not
69  * stored).
70  *
71  * When a simple region (1 element) is combined, it's treated as if a
72  * single rect/path is being combined.
73  *
74  */
75
76 #define FLAGS_NOFLAGS   0x0
77 #define FLAGS_INTPATH   0x4000
78
79 /* Header size as far as header->size is concerned. This doesn't include
80  * header->size or header->checksum
81  */
82 static const INT sizeheader_size = sizeof(DWORD) * 2;
83
84 typedef struct packed_point
85 {
86     short X;
87     short Y;
88 } packed_point;
89
90 /* Everything is measured in DWORDS; round up if there's a remainder */
91 static inline INT get_pathtypes_size(const GpPath* path)
92 {
93     INT needed = path->pathdata.Count / sizeof(DWORD);
94
95     if (path->pathdata.Count % sizeof(DWORD) > 0)
96         needed++;
97
98     return needed * sizeof(DWORD);
99 }
100
101 static inline INT get_element_size(const region_element* element)
102 {
103     INT needed = sizeof(DWORD); /* DWORD for the type */
104     switch(element->type)
105     {
106         case RegionDataRect:
107             return needed + sizeof(GpRect);
108         case RegionDataPath:
109              needed += element->elementdata.pathdata.pathheader.size;
110              needed += sizeof(DWORD); /* Extra DWORD for pathheader.size */
111              return needed;
112         case RegionDataEmptyRect:
113         case RegionDataInfiniteRect:
114             return needed;
115         default:
116             needed += get_element_size(element->elementdata.combine.left);
117             needed += get_element_size(element->elementdata.combine.right);
118             return needed;
119     }
120
121     return 0;
122 }
123
124 /* Does not check parameters, caller must do that */
125 static inline GpStatus init_region(GpRegion* region, const RegionType type)
126 {
127     region->node.type       = type;
128     region->header.checksum = 0xdeadbeef;
129     region->header.magic    = VERSION_MAGIC;
130     region->header.num_children  = 0;
131     region->header.size     = sizeheader_size + get_element_size(&region->node);
132
133     return Ok;
134 }
135
136 static inline GpStatus clone_element(const region_element* element,
137         region_element** element2)
138 {
139     GpStatus stat;
140
141     /* root node is allocated with GpRegion */
142     if(!*element2){
143         *element2 = GdipAlloc(sizeof(region_element));
144         if (!*element2)
145             return OutOfMemory;
146     }
147
148     (*element2)->type = element->type;
149
150     switch (element->type)
151     {
152         case RegionDataRect:
153             (*element2)->elementdata.rect = element->elementdata.rect;
154             break;
155         case RegionDataEmptyRect:
156         case RegionDataInfiniteRect:
157             break;
158         case RegionDataPath:
159             (*element2)->elementdata.pathdata.pathheader = element->elementdata.pathdata.pathheader;
160             stat = GdipClonePath(element->elementdata.pathdata.path,
161                     &(*element2)->elementdata.pathdata.path);
162             if (stat != Ok) goto clone_out;
163             break;
164         default:
165             (*element2)->elementdata.combine.left  = NULL;
166             (*element2)->elementdata.combine.right = NULL;
167
168             stat = clone_element(element->elementdata.combine.left,
169                     &(*element2)->elementdata.combine.left);
170             if (stat != Ok) goto clone_out;
171             stat = clone_element(element->elementdata.combine.right,
172                     &(*element2)->elementdata.combine.right);
173             if (stat != Ok) goto clone_out;
174             break;
175     }
176
177     return Ok;
178
179 clone_out:
180     delete_element(*element2);
181     *element2 = NULL;
182     return stat;
183 }
184
185 /* Common code for CombineRegion*
186  * All the caller has to do is get its format into an element
187  */
188 static inline void fuse_region(GpRegion* region, region_element* left,
189         region_element* right, const CombineMode mode)
190 {
191     region->node.type = mode;
192     region->node.elementdata.combine.left = left;
193     region->node.elementdata.combine.right = right;
194
195     region->header.size = sizeheader_size + get_element_size(&region->node);
196     region->header.num_children += 2;
197 }
198
199 /*****************************************************************************
200  * GdipCloneRegion [GDIPLUS.@]
201  *
202  * Creates a deep copy of the region
203  *
204  * PARAMS
205  *  region  [I] source region
206  *  clone   [O] resulting clone
207  *
208  * RETURNS
209  *  SUCCESS: Ok
210  *  FAILURE: InvalidParameter or OutOfMemory
211  */
212 GpStatus WINGDIPAPI GdipCloneRegion(GpRegion *region, GpRegion **clone)
213 {
214     region_element *element;
215
216     TRACE("%p %p\n", region, clone);
217
218     if (!(region && clone))
219         return InvalidParameter;
220
221     *clone = GdipAlloc(sizeof(GpRegion));
222     if (!*clone)
223         return OutOfMemory;
224     element = &(*clone)->node;
225
226     (*clone)->header = region->header;
227     return clone_element(&region->node, &element);
228 }
229
230 /*****************************************************************************
231  * GdipCombineRegionPath [GDIPLUS.@]
232  */
233 GpStatus WINGDIPAPI GdipCombineRegionPath(GpRegion *region, GpPath *path, CombineMode mode)
234 {
235     GpRegion *path_region;
236     region_element *left, *right = NULL;
237     GpStatus stat;
238
239     TRACE("%p %p %d\n", region, path, mode);
240
241     if (!(region && path))
242         return InvalidParameter;
243
244     stat = GdipCreateRegionPath(path, &path_region);
245     if (stat != Ok)
246         return stat;
247
248     /* simply replace region data */
249     if(mode == CombineModeReplace){
250         delete_element(&region->node);
251         memcpy(region, path_region, sizeof(GpRegion));
252         GdipFree(path_region);
253         return Ok;
254     }
255
256     left = GdipAlloc(sizeof(region_element));
257     if (!left)
258         goto out;
259     *left = region->node;
260
261     stat = clone_element(&path_region->node, &right);
262     if (stat != Ok)
263         goto out;
264
265     fuse_region(region, left, right, mode);
266
267     GdipDeleteRegion(path_region);
268     return Ok;
269
270 out:
271     GdipFree(left);
272     GdipDeleteRegion(path_region);
273     return stat;
274 }
275
276 /*****************************************************************************
277  * GdipCombineRegionRect [GDIPLUS.@]
278  */
279 GpStatus WINGDIPAPI GdipCombineRegionRect(GpRegion *region,
280         GDIPCONST GpRectF *rect, CombineMode mode)
281 {
282     GpRegion *rect_region;
283     region_element *left, *right = NULL;
284     GpStatus stat;
285
286     TRACE("%p %p %d\n", region, rect, mode);
287
288     if (!(region && rect))
289         return InvalidParameter;
290
291     stat = GdipCreateRegionRect(rect, &rect_region);
292     if (stat != Ok)
293         return stat;
294
295     /* simply replace region data */
296     if(mode == CombineModeReplace){
297         delete_element(&region->node);
298         memcpy(region, rect_region, sizeof(GpRegion));
299         GdipFree(rect_region);
300         return Ok;
301     }
302
303     left = GdipAlloc(sizeof(region_element));
304     if (!left)
305         goto out;
306     memcpy(left, &region->node, sizeof(region_element));
307
308     stat = clone_element(&rect_region->node, &right);
309     if (stat != Ok)
310         goto out;
311
312     fuse_region(region, left, right, mode);
313
314     GdipDeleteRegion(rect_region);
315     return Ok;
316
317 out:
318     GdipFree(left);
319     GdipDeleteRegion(rect_region);
320     return stat;
321 }
322
323 /*****************************************************************************
324  * GdipCombineRegionRectI [GDIPLUS.@]
325  */
326 GpStatus WINGDIPAPI GdipCombineRegionRectI(GpRegion *region,
327         GDIPCONST GpRect *rect, CombineMode mode)
328 {
329     GpRectF rectf;
330
331     TRACE("%p %p %d\n", region, rect, mode);
332
333     if (!rect)
334         return InvalidParameter;
335
336     rectf.X = (REAL)rect->X;
337     rectf.Y = (REAL)rect->Y;
338     rectf.Height = (REAL)rect->Height;
339     rectf.Width = (REAL)rect->Width;
340
341     return GdipCombineRegionRect(region, &rectf, mode);
342 }
343
344 /*****************************************************************************
345  * GdipCombineRegionRegion [GDIPLUS.@]
346  */
347 GpStatus WINGDIPAPI GdipCombineRegionRegion(GpRegion *region1,
348         GpRegion *region2, CombineMode mode)
349 {
350     region_element *left, *right = NULL;
351     GpStatus stat;
352     GpRegion *reg2copy;
353
354     TRACE("%p %p %d\n", region1, region2, mode);
355
356     if(!(region1 && region2))
357         return InvalidParameter;
358
359     /* simply replace region data */
360     if(mode == CombineModeReplace){
361         stat = GdipCloneRegion(region2, &reg2copy);
362         if(stat != Ok)  return stat;
363
364         delete_element(&region1->node);
365         memcpy(region1, reg2copy, sizeof(GpRegion));
366         GdipFree(reg2copy);
367         return Ok;
368     }
369
370     left  = GdipAlloc(sizeof(region_element));
371     if (!left)
372         return OutOfMemory;
373
374     *left = region1->node;
375     stat = clone_element(&region2->node, &right);
376     if (stat != Ok)
377     {
378         GdipFree(left);
379         return OutOfMemory;
380     }
381
382     fuse_region(region1, left, right, mode);
383     region1->header.num_children += region2->header.num_children;
384
385     return Ok;
386 }
387
388 /*****************************************************************************
389  * GdipCreateRegion [GDIPLUS.@]
390  */
391 GpStatus WINGDIPAPI GdipCreateRegion(GpRegion **region)
392 {
393     TRACE("%p\n", region);
394
395     if(!region)
396         return InvalidParameter;
397
398     *region = GdipAlloc(sizeof(GpRegion));
399     if(!*region)
400         return OutOfMemory;
401
402     return init_region(*region, RegionDataInfiniteRect);
403 }
404
405 /*****************************************************************************
406  * GdipCreateRegionPath [GDIPLUS.@]
407  *
408  * Creates a GpRegion from a GpPath
409  *
410  * PARAMS
411  *  path    [I] path to base the region on
412  *  region  [O] pointer to the newly allocated region
413  *
414  * RETURNS
415  *  SUCCESS: Ok
416  *  FAILURE: InvalidParameter
417  *
418  * NOTES
419  *  If a path has no floating point points, its points will be stored as shorts
420  *  (INTPATH)
421  *
422  *  If a path is empty, it is considered to be an INTPATH
423  */
424 GpStatus WINGDIPAPI GdipCreateRegionPath(GpPath *path, GpRegion **region)
425 {
426     region_element* element;
427     GpPoint  *pointsi;
428     GpPointF *pointsf;
429
430     GpStatus stat;
431     DWORD flags = FLAGS_INTPATH;
432     INT count, i;
433
434     TRACE("%p, %p\n", path, region);
435
436     if (!(path && region))
437         return InvalidParameter;
438
439     *region = GdipAlloc(sizeof(GpRegion));
440     if(!*region)
441         return OutOfMemory;
442     stat = init_region(*region, RegionDataPath);
443     if (stat != Ok)
444     {
445         GdipDeleteRegion(*region);
446         return stat;
447     }
448     element = &(*region)->node;
449     count = path->pathdata.Count;
450
451     /* Test to see if the path is an Integer path */
452     if (count)
453     {
454         pointsi = GdipAlloc(sizeof(GpPoint) * count);
455         pointsf = GdipAlloc(sizeof(GpPointF) * count);
456         if (!(pointsi && pointsf))
457         {
458             GdipFree(pointsi);
459             GdipFree(pointsf);
460             GdipDeleteRegion(*region);
461             return OutOfMemory;
462         }
463
464         stat = GdipGetPathPointsI(path, pointsi, count);
465         if (stat != Ok)
466         {
467             GdipDeleteRegion(*region);
468             return stat;
469         }
470         stat = GdipGetPathPoints(path, pointsf, count);
471         if (stat != Ok)
472         {
473             GdipDeleteRegion(*region);
474             return stat;
475         }
476
477         for (i = 0; i < count; i++)
478         {
479             if (!(pointsi[i].X == pointsf[i].X &&
480                   pointsi[i].Y == pointsf[i].Y ))
481             {
482                 flags = FLAGS_NOFLAGS;
483                 break;
484             }
485         }
486         GdipFree(pointsi);
487         GdipFree(pointsf);
488     }
489
490     stat = GdipClonePath(path, &element->elementdata.pathdata.path);
491     if (stat != Ok)
492     {
493         GdipDeleteRegion(*region);
494         return stat;
495     }
496
497     /* 3 for headers, once again size doesn't count itself */
498     element->elementdata.pathdata.pathheader.size = ((sizeof(DWORD) * 3));
499     switch(flags)
500     {
501         /* Floats, sent out as floats */
502         case FLAGS_NOFLAGS:
503             element->elementdata.pathdata.pathheader.size +=
504                 (sizeof(DWORD) * count * 2);
505             break;
506         /* INTs, sent out as packed shorts */
507         case FLAGS_INTPATH:
508             element->elementdata.pathdata.pathheader.size +=
509                 (sizeof(DWORD) * count);
510             break;
511         default:
512             FIXME("Unhandled flags (%08x). Expect wrong results.\n", flags);
513     }
514     element->elementdata.pathdata.pathheader.size += get_pathtypes_size(path);
515     element->elementdata.pathdata.pathheader.magic = VERSION_MAGIC;
516     element->elementdata.pathdata.pathheader.count = count;
517     element->elementdata.pathdata.pathheader.flags = flags;
518     (*region)->header.size = sizeheader_size + get_element_size(element);
519
520     return Ok;
521 }
522
523 /*****************************************************************************
524  * GdipCreateRegionRect [GDIPLUS.@]
525  */
526 GpStatus WINGDIPAPI GdipCreateRegionRect(GDIPCONST GpRectF *rect,
527         GpRegion **region)
528 {
529     GpStatus stat;
530
531     TRACE("%p, %p\n", rect, region);
532
533     if (!(rect && region))
534         return InvalidParameter;
535
536     *region = GdipAlloc(sizeof(GpRegion));
537     stat = init_region(*region, RegionDataRect);
538     if(stat != Ok)
539     {
540         GdipDeleteRegion(*region);
541         return stat;
542     }
543
544     (*region)->node.elementdata.rect.X = rect->X;
545     (*region)->node.elementdata.rect.Y = rect->Y;
546     (*region)->node.elementdata.rect.Width = rect->Width;
547     (*region)->node.elementdata.rect.Height = rect->Height;
548
549     return Ok;
550 }
551
552 /*****************************************************************************
553  * GdipCreateRegionRectI [GDIPLUS.@]
554  */
555 GpStatus WINGDIPAPI GdipCreateRegionRectI(GDIPCONST GpRect *rect,
556         GpRegion **region)
557 {
558     GpRectF rectf;
559
560     TRACE("%p, %p\n", rect, region);
561
562     rectf.X = (REAL)rect->X;
563     rectf.Y = (REAL)rect->Y;
564     rectf.Width = (REAL)rect->Width;
565     rectf.Height = (REAL)rect->Height;
566
567     return GdipCreateRegionRect(&rectf, region);
568 }
569
570 GpStatus WINGDIPAPI GdipCreateRegionRgnData(GDIPCONST BYTE *data, INT size, GpRegion **region)
571 {
572     FIXME("(%p, %d, %p): stub\n", data, size, region);
573
574     *region = NULL;
575     return NotImplemented;
576 }
577
578
579 /******************************************************************************
580  * GdipCreateRegionHrgn [GDIPLUS.@]
581  */
582 GpStatus WINGDIPAPI GdipCreateRegionHrgn(HRGN hrgn, GpRegion **region)
583 {
584     DWORD size;
585     LPRGNDATA buf;
586     LPRECT rect;
587     GpStatus stat;
588     GpPath* path;
589     GpRegion* local;
590     int i;
591
592     TRACE("(%p, %p)\n", hrgn, region);
593
594     if(!region || !(size = GetRegionData(hrgn, 0, NULL)))
595         return InvalidParameter;
596
597     buf = GdipAlloc(size);
598     if(!buf)
599         return OutOfMemory;
600
601     if(!GetRegionData(hrgn, size, buf)){
602         GdipFree(buf);
603         return GenericError;
604     }
605
606     if(buf->rdh.nCount == 0){
607         if((stat = GdipCreateRegion(&local)) != Ok){
608             GdipFree(buf);
609             return stat;
610         }
611         if((stat = GdipSetEmpty(local)) != Ok){
612             GdipFree(buf);
613             GdipDeleteRegion(local);
614             return stat;
615         }
616         *region = local;
617         GdipFree(buf);
618         return Ok;
619     }
620
621     if((stat = GdipCreatePath(FillModeAlternate, &path)) != Ok){
622         GdipFree(buf);
623         return stat;
624     }
625
626     rect = (LPRECT)buf->Buffer;
627     for(i = 0; i < buf->rdh.nCount; i++){
628         if((stat = GdipAddPathRectangle(path, (REAL)rect->left, (REAL)rect->top,
629                         (REAL)(rect->right - rect->left), (REAL)(rect->bottom - rect->top))) != Ok){
630             GdipFree(buf);
631             GdipDeletePath(path);
632             return stat;
633         }
634         rect++;
635     }
636
637     stat = GdipCreateRegionPath(path, region);
638
639     GdipFree(buf);
640     GdipDeletePath(path);
641     return stat;
642 }
643
644 /*****************************************************************************
645  * GdipDeleteRegion [GDIPLUS.@]
646  */
647 GpStatus WINGDIPAPI GdipDeleteRegion(GpRegion *region)
648 {
649     TRACE("%p\n", region);
650
651     if (!region)
652         return InvalidParameter;
653
654     delete_element(&region->node);
655     GdipFree(region);
656
657     return Ok;
658 }
659
660 /*****************************************************************************
661  * GdipGetRegionBounds [GDIPLUS.@]
662  */
663 GpStatus WINGDIPAPI GdipGetRegionBounds(GpRegion *region, GpGraphics *graphics, GpRectF *rect)
664 {
665     HRGN hrgn;
666     RECT r;
667     GpStatus status;
668
669     TRACE("(%p, %p, %p)\n", region, graphics, rect);
670
671     if(!region || !graphics || !rect)
672         return InvalidParameter;
673
674     /* Contrary to MSDN, native ignores the graphics transform. */
675     status = GdipGetRegionHRgn(region, NULL, &hrgn);
676     if(status != Ok)
677         return status;
678
679     /* infinite */
680     if(!hrgn){
681         rect->X = rect->Y = -(REAL)(1 << 22);
682         rect->Width = rect->Height = (REAL)(1 << 23);
683         return Ok;
684     }
685
686     if(!GetRgnBox(hrgn, &r)){
687         DeleteObject(hrgn);
688         return GenericError;
689     }
690
691     rect->X = r.left;
692     rect->Y = r.top;
693     rect->Width  = r.right  - r.left;
694     rect->Height = r.bottom - r.top;
695
696     return Ok;
697 }
698
699 /*****************************************************************************
700  * GdipGetRegionBoundsI [GDIPLUS.@]
701  */
702 GpStatus WINGDIPAPI GdipGetRegionBoundsI(GpRegion *region, GpGraphics *graphics, GpRect *rect)
703 {
704     GpRectF rectf;
705     GpStatus status;
706
707     TRACE("(%p, %p, %p)\n", region, graphics, rect);
708
709     if(!rect)
710         return InvalidParameter;
711
712     status = GdipGetRegionBounds(region, graphics, &rectf);
713     if(status == Ok){
714         rect->X = roundr(rectf.X);
715         rect->Y = roundr(rectf.X);
716         rect->Width  = roundr(rectf.Width);
717         rect->Height = roundr(rectf.Height);
718     }
719
720     return status;
721 }
722
723 static inline void write_dword(DWORD* location, INT* offset, const DWORD write)
724 {
725     location[*offset] = write;
726     (*offset)++;
727 }
728
729 static inline void write_float(DWORD* location, INT* offset, const FLOAT write)
730 {
731     ((FLOAT*)location)[*offset] = write;
732     (*offset)++;
733 }
734
735 static inline void write_packed_point(DWORD* location, INT* offset,
736         const GpPointF* write)
737 {
738     packed_point point;
739
740     point.X = write->X;
741     point.Y = write->Y;
742     memcpy(location + *offset, &point, sizeof(packed_point));
743     (*offset)++;
744 }
745
746 static inline void write_path_types(DWORD* location, INT* offset,
747         const GpPath* path)
748 {
749     memcpy(location + *offset, path->pathdata.Types, path->pathdata.Count);
750
751     /* The unwritten parts of the DWORD (if any) must be cleared */
752     if (path->pathdata.Count % sizeof(DWORD))
753         ZeroMemory(((BYTE*)location) + (*offset * sizeof(DWORD)) +
754                 path->pathdata.Count,
755                 sizeof(DWORD) - path->pathdata.Count % sizeof(DWORD));
756     *offset += (get_pathtypes_size(path) / sizeof(DWORD));
757 }
758
759 static void write_element(const region_element* element, DWORD *buffer,
760         INT* filled)
761 {
762     write_dword(buffer, filled, element->type);
763     switch (element->type)
764     {
765         case CombineModeReplace:
766         case CombineModeIntersect:
767         case CombineModeUnion:
768         case CombineModeXor:
769         case CombineModeExclude:
770         case CombineModeComplement:
771             write_element(element->elementdata.combine.left, buffer, filled);
772             write_element(element->elementdata.combine.right, buffer, filled);
773             break;
774         case RegionDataRect:
775             write_float(buffer, filled, element->elementdata.rect.X);
776             write_float(buffer, filled, element->elementdata.rect.Y);
777             write_float(buffer, filled, element->elementdata.rect.Width);
778             write_float(buffer, filled, element->elementdata.rect.Height);
779             break;
780         case RegionDataPath:
781         {
782             INT i;
783             const GpPath* path = element->elementdata.pathdata.path;
784
785             memcpy(buffer + *filled, &element->elementdata.pathdata.pathheader,
786                     sizeof(element->elementdata.pathdata.pathheader));
787             *filled += sizeof(element->elementdata.pathdata.pathheader) / sizeof(DWORD);
788             switch (element->elementdata.pathdata.pathheader.flags)
789             {
790                 case FLAGS_NOFLAGS:
791                     for (i = 0; i < path->pathdata.Count; i++)
792                     {
793                         write_float(buffer, filled, path->pathdata.Points[i].X);
794                         write_float(buffer, filled, path->pathdata.Points[i].Y);
795                     }
796                     break;
797                 case FLAGS_INTPATH:
798                     for (i = 0; i < path->pathdata.Count; i++)
799                     {
800                         write_packed_point(buffer, filled,
801                                 &path->pathdata.Points[i]);
802                     }
803             }
804             write_path_types(buffer, filled, path);
805             break;
806         }
807         case RegionDataEmptyRect:
808         case RegionDataInfiniteRect:
809             break;
810     }
811 }
812
813 /*****************************************************************************
814  * GdipGetRegionData [GDIPLUS.@]
815  *
816  * Returns the header, followed by combining ops and region elements.
817  *
818  * PARAMS
819  *  region  [I] region to retrieve from
820  *  buffer  [O] buffer to hold the resulting data
821  *  size    [I] size of the buffer
822  *  needed  [O] (optional) how much data was written
823  *
824  * RETURNS
825  *  SUCCESS: Ok
826  *  FAILURE: InvalidParameter
827  *
828  * NOTES
829  *  The header contains the size, a checksum, a version string, and the number
830  *  of children. The size does not count itself or the checksum.
831  *  Version is always something like 0xdbc01001 or 0xdbc01002
832  *
833  *  An element is a RECT, or PATH; Combining ops are stored as their
834  *  CombineMode value. Special regions (infinite, empty) emit just their
835  *  op-code; GpRectFs emit their code followed by their points; GpPaths emit
836  *  their code followed by a second header for the path followed by the actual
837  *  path data. Followed by the flags for each point. The pathheader contains
838  *  the size of the data to follow, a version number again, followed by a count
839  *  of how many points, and any special flags which may apply. 0x4000 means its
840  *  a path of shorts instead of FLOAT.
841  *
842  *  Combining Ops are stored in reverse order from when they were constructed;
843  *  the output is a tree where the left side combining area is always taken
844  *  first.
845  */
846 GpStatus WINGDIPAPI GdipGetRegionData(GpRegion *region, BYTE *buffer, UINT size,
847         UINT *needed)
848 {
849     INT filled = 0;
850
851     TRACE("%p, %p, %d, %p\n", region, buffer, size, needed);
852
853     if (!(region && buffer && size))
854         return InvalidParameter;
855
856     memcpy(buffer, &region->header, sizeof(region->header));
857     filled += sizeof(region->header) / sizeof(DWORD);
858     /* With few exceptions, everything written is DWORD aligned,
859      * so use that as our base */
860     write_element(&region->node, (DWORD*)buffer, &filled);
861
862     if (needed)
863         *needed = filled * sizeof(DWORD);
864
865     return Ok;
866 }
867
868 /*****************************************************************************
869  * GdipGetRegionDataSize [GDIPLUS.@]
870  */
871 GpStatus WINGDIPAPI GdipGetRegionDataSize(GpRegion *region, UINT *needed)
872 {
873     TRACE("%p, %p\n", region, needed);
874
875     if (!(region && needed))
876         return InvalidParameter;
877
878     /* header.size doesn't count header.size and header.checksum */
879     *needed = region->header.size + sizeof(DWORD) * 2;
880
881     return Ok;
882 }
883
884 static GpStatus get_path_hrgn(GpPath *path, GpGraphics *graphics, HRGN *hrgn)
885 {
886     HDC new_hdc=NULL;
887     GpGraphics *new_graphics=NULL;
888     GpStatus stat;
889     INT save_state;
890
891     if (!graphics)
892     {
893         new_hdc = GetDC(0);
894         if (!new_hdc)
895             return OutOfMemory;
896
897         stat = GdipCreateFromHDC(new_hdc, &new_graphics);
898         graphics = new_graphics;
899         if (stat != Ok)
900         {
901             ReleaseDC(0, new_hdc);
902             return stat;
903         }
904     }
905     else if (!graphics->hdc)
906     {
907         graphics->hdc = new_hdc = GetDC(0);
908         if (!new_hdc)
909             return OutOfMemory;
910     }
911
912     save_state = SaveDC(graphics->hdc);
913     EndPath(graphics->hdc);
914
915     SetPolyFillMode(graphics->hdc, (path->fill == FillModeAlternate ? ALTERNATE
916                                                                     : WINDING));
917
918     stat = trace_path(graphics, path);
919     if (stat == Ok)
920     {
921         *hrgn = PathToRegion(graphics->hdc);
922         stat = *hrgn ? Ok : OutOfMemory;
923     }
924
925     RestoreDC(graphics->hdc, save_state);
926     if (new_hdc)
927     {
928         ReleaseDC(0, new_hdc);
929         if (new_graphics)
930             GdipDeleteGraphics(new_graphics);
931         else
932             graphics->hdc = NULL;
933     }
934
935     return stat;
936 }
937
938 static GpStatus get_region_hrgn(struct region_element *element, GpGraphics *graphics, HRGN *hrgn)
939 {
940     switch (element->type)
941     {
942         case RegionDataInfiniteRect:
943             *hrgn = NULL;
944             return Ok;
945         case RegionDataEmptyRect:
946             *hrgn = CreateRectRgn(0, 0, 0, 0);
947             return *hrgn ? Ok : OutOfMemory;
948         case RegionDataPath:
949             return get_path_hrgn(element->elementdata.pathdata.path, graphics, hrgn);
950         case RegionDataRect:
951         {
952             GpPath* path;
953             GpStatus stat;
954             GpRectF* rc = &element->elementdata.rect;
955
956             stat = GdipCreatePath(FillModeAlternate, &path);
957             if (stat != Ok)
958                 return stat;
959             stat = GdipAddPathRectangle(path, rc->X, rc->Y, rc->Width, rc->Height);
960
961             if (stat == Ok)
962                 stat = get_path_hrgn(path, graphics, hrgn);
963
964             GdipDeletePath(path);
965
966             return stat;
967         }
968         case CombineModeIntersect:
969         case CombineModeUnion:
970         case CombineModeXor:
971         case CombineModeExclude:
972         case CombineModeComplement:
973         {
974             HRGN left, right;
975             GpStatus stat;
976             int ret;
977
978             stat = get_region_hrgn(element->elementdata.combine.left, graphics, &left);
979             if (stat != Ok)
980             {
981                 *hrgn = NULL;
982                 return stat;
983             }
984
985             if (left == NULL)
986             {
987                 /* existing region is infinite */
988                 switch (element->type)
989                 {
990                     case CombineModeIntersect:
991                         return get_region_hrgn(element->elementdata.combine.right, graphics, hrgn);
992                     case CombineModeXor: case CombineModeExclude:
993                         FIXME("cannot exclude from an infinite region\n");
994                         /* fall-through */
995                     case CombineModeUnion: case CombineModeComplement:
996                         *hrgn = NULL;
997                         return Ok;
998                 }
999             }
1000
1001             stat = get_region_hrgn(element->elementdata.combine.right, graphics, &right);
1002             if (stat != Ok)
1003             {
1004                 DeleteObject(left);
1005                 *hrgn = NULL;
1006                 return stat;
1007             }
1008
1009             if (right == NULL)
1010             {
1011                 /* new region is infinite */
1012                 switch (element->type)
1013                 {
1014                     case CombineModeIntersect:
1015                         *hrgn = left;
1016                         return Ok;
1017                     case CombineModeXor: case CombineModeComplement:
1018                         FIXME("cannot exclude from an infinite region\n");
1019                         /* fall-through */
1020                     case CombineModeUnion: case CombineModeExclude:
1021                         DeleteObject(left);
1022                         *hrgn = NULL;
1023                         return Ok;
1024                 }
1025             }
1026
1027             switch (element->type)
1028             {
1029                 case CombineModeIntersect:
1030                     ret = CombineRgn(left, left, right, RGN_AND);
1031                     break;
1032                 case CombineModeUnion:
1033                     ret = CombineRgn(left, left, right, RGN_OR);
1034                     break;
1035                 case CombineModeXor:
1036                     ret = CombineRgn(left, left, right, RGN_XOR);
1037                     break;
1038                 case CombineModeExclude:
1039                     ret = CombineRgn(left, left, right, RGN_DIFF);
1040                     break;
1041                 case CombineModeComplement:
1042                     ret = CombineRgn(left, right, left, RGN_DIFF);
1043                     break;
1044                 default:
1045                     ret = ERROR;
1046             }
1047
1048             DeleteObject(right);
1049
1050             if (ret == ERROR)
1051             {
1052                 DeleteObject(left);
1053                 *hrgn = NULL;
1054                 return GenericError;
1055             }
1056
1057             *hrgn = left;
1058             return Ok;
1059         }
1060         default:
1061             FIXME("GdipGetRegionHRgn unimplemented for region type=%x\n", element->type);
1062             *hrgn = NULL;
1063             return NotImplemented;
1064     }
1065 }
1066
1067 /*****************************************************************************
1068  * GdipGetRegionHRgn [GDIPLUS.@]
1069  */
1070 GpStatus WINGDIPAPI GdipGetRegionHRgn(GpRegion *region, GpGraphics *graphics, HRGN *hrgn)
1071 {
1072     TRACE("(%p, %p, %p)\n", region, graphics, hrgn);
1073
1074     if (!region || !hrgn)
1075         return InvalidParameter;
1076
1077     return get_region_hrgn(&region->node, graphics, hrgn);
1078 }
1079
1080 GpStatus WINGDIPAPI GdipIsEmptyRegion(GpRegion *region, GpGraphics *graphics, BOOL *res)
1081 {
1082     TRACE("(%p, %p, %p)\n", region, graphics, res);
1083
1084     if(!region || !graphics || !res)
1085         return InvalidParameter;
1086
1087     *res = (region->node.type == RegionDataEmptyRect);
1088
1089     return Ok;
1090 }
1091
1092 /*****************************************************************************
1093  * GdipIsEqualRegion [GDIPLUS.@]
1094  */
1095 GpStatus WINGDIPAPI GdipIsEqualRegion(GpRegion *region, GpRegion *region2, GpGraphics *graphics,
1096                                       BOOL *res)
1097 {
1098     HRGN hrgn1, hrgn2;
1099     GpStatus stat;
1100
1101     TRACE("(%p, %p, %p, %p)\n", region, region2, graphics, res);
1102
1103     if(!region || !region2 || !graphics || !res)
1104         return InvalidParameter;
1105
1106     stat = GdipGetRegionHRgn(region, graphics, &hrgn1);
1107     if(stat != Ok)
1108         return stat;
1109     stat = GdipGetRegionHRgn(region2, graphics, &hrgn2);
1110     if(stat != Ok){
1111         DeleteObject(hrgn1);
1112         return stat;
1113     }
1114
1115     *res = EqualRgn(hrgn1, hrgn2);
1116
1117     /* one of GpRegions is infinite */
1118     if(*res == ERROR)
1119         *res = (!hrgn1 && !hrgn2);
1120
1121     DeleteObject(hrgn1);
1122     DeleteObject(hrgn2);
1123
1124     return Ok;
1125 }
1126
1127 /*****************************************************************************
1128  * GdipIsInfiniteRegion [GDIPLUS.@]
1129  */
1130 GpStatus WINGDIPAPI GdipIsInfiniteRegion(GpRegion *region, GpGraphics *graphics, BOOL *res)
1131 {
1132     /* I think graphics is ignored here */
1133     TRACE("(%p, %p, %p)\n", region, graphics, res);
1134
1135     if(!region || !graphics || !res)
1136         return InvalidParameter;
1137
1138     *res = (region->node.type == RegionDataInfiniteRect);
1139
1140     return Ok;
1141 }
1142
1143 /*****************************************************************************
1144  * GdipIsVisibleRegionRect [GDIPLUS.@]
1145  */
1146 GpStatus WINGDIPAPI GdipIsVisibleRegionRect(GpRegion* region, REAL x, REAL y, REAL w, REAL h, GpGraphics *graphics, BOOL *res)
1147 {
1148     HRGN hrgn;
1149     GpStatus stat;
1150     RECT rect;
1151
1152     TRACE("(%p, %.2f, %.2f, %.2f, %.2f, %p, %p)\n", region, x, y, w, h, graphics, res);
1153
1154     if(!region || !res)
1155         return InvalidParameter;
1156
1157     if((stat = GdipGetRegionHRgn(region, NULL, &hrgn)) != Ok)
1158         return stat;
1159
1160     /* infinite */
1161     if(!hrgn){
1162         *res = TRUE;
1163         return Ok;
1164     }
1165
1166     rect.left = ceilr(x);
1167     rect.top = ceilr(y);
1168     rect.right = ceilr(x + w);
1169     rect.bottom = ceilr(y + h);
1170
1171     *res = RectInRegion(hrgn, &rect);
1172
1173     DeleteObject(hrgn);
1174
1175     return Ok;
1176 }
1177
1178 /*****************************************************************************
1179  * GdipIsVisibleRegionRectI [GDIPLUS.@]
1180  */
1181 GpStatus WINGDIPAPI GdipIsVisibleRegionRectI(GpRegion* region, INT x, INT y, INT w, INT h, GpGraphics *graphics, BOOL *res)
1182 {
1183     TRACE("(%p, %d, %d, %d, %d, %p, %p)\n", region, x, y, w, h, graphics, res);
1184     if(!region || !res)
1185         return InvalidParameter;
1186
1187     return GdipIsVisibleRegionRect(region, (REAL)x, (REAL)y, (REAL)w, (REAL)h, graphics, res);
1188 }
1189
1190 /*****************************************************************************
1191  * GdipIsVisibleRegionPoint [GDIPLUS.@]
1192  */
1193 GpStatus WINGDIPAPI GdipIsVisibleRegionPoint(GpRegion* region, REAL x, REAL y, GpGraphics *graphics, BOOL *res)
1194 {
1195     HRGN hrgn;
1196     GpStatus stat;
1197
1198     TRACE("(%p, %.2f, %.2f, %p, %p)\n", region, x, y, graphics, res);
1199
1200     if(!region || !res)
1201         return InvalidParameter;
1202
1203     if((stat = GdipGetRegionHRgn(region, NULL, &hrgn)) != Ok)
1204         return stat;
1205
1206     /* infinite */
1207     if(!hrgn){
1208         *res = TRUE;
1209         return Ok;
1210     }
1211
1212     *res = PtInRegion(hrgn, roundr(x), roundr(y));
1213
1214     DeleteObject(hrgn);
1215
1216     return Ok;
1217 }
1218
1219 /*****************************************************************************
1220  * GdipIsVisibleRegionPointI [GDIPLUS.@]
1221  */
1222 GpStatus WINGDIPAPI GdipIsVisibleRegionPointI(GpRegion* region, INT x, INT y, GpGraphics *graphics, BOOL *res)
1223 {
1224     TRACE("(%p, %d, %d, %p, %p)\n", region, x, y, graphics, res);
1225
1226     return GdipIsVisibleRegionPoint(region, (REAL)x, (REAL)y, graphics, res);
1227 }
1228
1229 /*****************************************************************************
1230  * GdipSetEmpty [GDIPLUS.@]
1231  */
1232 GpStatus WINGDIPAPI GdipSetEmpty(GpRegion *region)
1233 {
1234     GpStatus stat;
1235
1236     TRACE("%p\n", region);
1237
1238     if (!region)
1239         return InvalidParameter;
1240
1241     delete_element(&region->node);
1242     stat = init_region(region, RegionDataEmptyRect);
1243
1244     return stat;
1245 }
1246
1247 GpStatus WINGDIPAPI GdipSetInfinite(GpRegion *region)
1248 {
1249     GpStatus stat;
1250
1251     TRACE("%p\n", region);
1252
1253     if (!region)
1254         return InvalidParameter;
1255
1256     delete_element(&region->node);
1257     stat = init_region(region, RegionDataInfiniteRect);
1258
1259     return stat;
1260 }
1261
1262 /* Transforms GpRegion elements with given matrix */
1263 static GpStatus transform_region_element(region_element* element, GpMatrix *matrix)
1264 {
1265     GpStatus stat;
1266
1267     switch(element->type)
1268     {
1269         case RegionDataEmptyRect:
1270         case RegionDataInfiniteRect:
1271             return Ok;
1272         case RegionDataRect:
1273         {
1274             /* We can't transform a rectangle, so convert it to a path. */
1275             GpRegion *new_region;
1276             GpPath *path;
1277
1278             stat = GdipCreatePath(FillModeAlternate, &path);
1279             if (stat == Ok)
1280             {
1281                 stat = GdipAddPathRectangle(path,
1282                     element->elementdata.rect.X, element->elementdata.rect.Y,
1283                     element->elementdata.rect.Width, element->elementdata.rect.Height);
1284
1285                 if (stat == Ok)
1286                     stat = GdipCreateRegionPath(path, &new_region);
1287
1288                 GdipDeletePath(path);
1289             }
1290
1291             if (stat == Ok)
1292             {
1293                 /* Steal the element from the created region. */
1294                 memcpy(element, &new_region->node, sizeof(region_element));
1295                 HeapFree(GetProcessHeap(), 0, new_region);
1296             }
1297             else
1298                 return stat;
1299         }
1300         /* Fall-through to do the actual conversion. */
1301         case RegionDataPath:
1302             stat = GdipTransformMatrixPoints(matrix,
1303                 element->elementdata.pathdata.path->pathdata.Points,
1304                 element->elementdata.pathdata.path->pathdata.Count);
1305             return stat;
1306         default:
1307             stat = transform_region_element(element->elementdata.combine.left, matrix);
1308             if (stat == Ok)
1309                 stat = transform_region_element(element->elementdata.combine.right, matrix);
1310             return stat;
1311     }
1312 }
1313
1314 GpStatus WINGDIPAPI GdipTransformRegion(GpRegion *region, GpMatrix *matrix)
1315 {
1316     TRACE("(%p, %p)\n", region, matrix);
1317
1318     if (!region || !matrix)
1319         return InvalidParameter;
1320
1321     return transform_region_element(&region->node, matrix);
1322 }
1323
1324 /* Translates GpRegion elements with specified offsets */
1325 static void translate_region_element(region_element* element, REAL dx, REAL dy)
1326 {
1327     INT i;
1328
1329     switch(element->type)
1330     {
1331         case RegionDataEmptyRect:
1332         case RegionDataInfiniteRect:
1333             return;
1334         case RegionDataRect:
1335             element->elementdata.rect.X += dx;
1336             element->elementdata.rect.Y += dy;
1337             return;
1338         case RegionDataPath:
1339             for(i = 0; i < element->elementdata.pathdata.path->pathdata.Count; i++){
1340                 element->elementdata.pathdata.path->pathdata.Points[i].X += dx;
1341                 element->elementdata.pathdata.path->pathdata.Points[i].Y += dy;
1342             }
1343             return;
1344         default:
1345             translate_region_element(element->elementdata.combine.left,  dx, dy);
1346             translate_region_element(element->elementdata.combine.right, dx, dy);
1347             return;
1348     }
1349 }
1350
1351 /*****************************************************************************
1352  * GdipTranslateRegion [GDIPLUS.@]
1353  */
1354 GpStatus WINGDIPAPI GdipTranslateRegion(GpRegion *region, REAL dx, REAL dy)
1355 {
1356     TRACE("(%p, %f, %f)\n", region, dx, dy);
1357
1358     if(!region)
1359         return InvalidParameter;
1360
1361     translate_region_element(&region->node, dx, dy);
1362
1363     return Ok;
1364 }
1365
1366 /*****************************************************************************
1367  * GdipTranslateRegionI [GDIPLUS.@]
1368  */
1369 GpStatus WINGDIPAPI GdipTranslateRegionI(GpRegion *region, INT dx, INT dy)
1370 {
1371     TRACE("(%p, %d, %d)\n", region, dx, dy);
1372
1373     return GdipTranslateRegion(region, (REAL)dx, (REAL)dy);
1374 }
1375
1376 static GpStatus get_region_scans_data(GpRegion *region, GpMatrix *matrix, LPRGNDATA *data)
1377 {
1378     GpRegion *region_copy;
1379     GpStatus stat;
1380     HRGN hrgn;
1381     DWORD data_size;
1382
1383     stat = GdipCloneRegion(region, &region_copy);
1384
1385     if (stat == Ok)
1386     {
1387         stat = GdipTransformRegion(region_copy, matrix);
1388
1389         if (stat == Ok)
1390             stat = GdipGetRegionHRgn(region_copy, NULL, &hrgn);
1391
1392         if (stat == Ok)
1393         {
1394             if (hrgn)
1395             {
1396                 data_size = GetRegionData(hrgn, 0, NULL);
1397
1398                 *data = GdipAlloc(data_size);
1399
1400                 if (*data)
1401                     GetRegionData(hrgn, data_size, *data);
1402                 else
1403                     stat = OutOfMemory;
1404
1405                 DeleteObject(hrgn);
1406             }
1407             else
1408             {
1409                 data_size = sizeof(RGNDATAHEADER) + sizeof(RECT);
1410
1411                 *data = GdipAlloc(data_size);
1412
1413                 if (*data)
1414                 {
1415                     (*data)->rdh.dwSize = sizeof(RGNDATAHEADER);
1416                     (*data)->rdh.iType = RDH_RECTANGLES;
1417                     (*data)->rdh.nCount = 1;
1418                     (*data)->rdh.nRgnSize = sizeof(RECT);
1419                     (*data)->rdh.rcBound.left = (*data)->rdh.rcBound.top = -0x400000;
1420                     (*data)->rdh.rcBound.right = (*data)->rdh.rcBound.bottom = 0x400000;
1421
1422                     memcpy(&(*data)->Buffer, &(*data)->rdh.rcBound, sizeof(RECT));
1423                 }
1424                 else
1425                     stat = OutOfMemory;
1426             }
1427         }
1428
1429         GdipDeleteRegion(region_copy);
1430     }
1431
1432     return stat;
1433 }
1434
1435 GpStatus WINGDIPAPI GdipGetRegionScansCount(GpRegion *region, UINT *count, GpMatrix *matrix)
1436 {
1437     GpStatus stat;
1438     LPRGNDATA data;
1439
1440     TRACE("(%p, %p, %p)\n", region, count, matrix);
1441
1442     if (!region || !count || !matrix)
1443         return InvalidParameter;
1444
1445     stat = get_region_scans_data(region, matrix, &data);
1446
1447     if (stat == Ok)
1448     {
1449         *count = data->rdh.nCount;
1450         GdipFree(data);
1451     }
1452
1453     return stat;
1454 }
1455
1456 GpStatus WINGDIPAPI GdipGetRegionScansI(GpRegion *region, GpRect *scans, INT *count, GpMatrix *matrix)
1457 {
1458     GpStatus stat;
1459     INT i;
1460     LPRGNDATA data;
1461     RECT *rects;
1462
1463     if (!region || !count || !matrix)
1464         return InvalidParameter;
1465
1466     stat = get_region_scans_data(region, matrix, &data);
1467
1468     if (stat == Ok)
1469     {
1470         *count = data->rdh.nCount;
1471         rects = (RECT*)&data->Buffer;
1472
1473         if (scans)
1474         {
1475             for (i=0; i<data->rdh.nCount; i++)
1476             {
1477                 scans[i].X = rects[i].left;
1478                 scans[i].Y = rects[i].top;
1479                 scans[i].Width = rects[i].right - rects[i].left;
1480                 scans[i].Height = rects[i].bottom - rects[i].top;
1481             }
1482         }
1483
1484         GdipFree(data);
1485     }
1486
1487     return Ok;
1488 }
1489
1490 GpStatus WINGDIPAPI GdipGetRegionScans(GpRegion *region, GpRectF *scans, INT *count, GpMatrix *matrix)
1491 {
1492     GpStatus stat;
1493     INT i;
1494     LPRGNDATA data;
1495     RECT *rects;
1496
1497     if (!region || !count || !matrix)
1498         return InvalidParameter;
1499
1500     stat = get_region_scans_data(region, matrix, &data);
1501
1502     if (stat == Ok)
1503     {
1504         *count = data->rdh.nCount;
1505         rects = (RECT*)&data->Buffer;
1506
1507         if (scans)
1508         {
1509             for (i=0; i<data->rdh.nCount; i++)
1510             {
1511                 scans[i].X = rects[i].left;
1512                 scans[i].Y = rects[i].top;
1513                 scans[i].Width = rects[i].right - rects[i].left;
1514                 scans[i].Height = rects[i].bottom - rects[i].top;
1515             }
1516         }
1517
1518         GdipFree(data);
1519     }
1520
1521     return Ok;
1522 }