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         return Ok;
 253     }
 254
 255     left = GdipAlloc(sizeof(region_element));
 256     if (!left)
 257         goto out;
 258     *left = region->node;
 259
 260     stat = clone_element(&path_region->node, &right);
 261     if (stat != Ok)
 262         goto out;
 263
 264     fuse_region(region, left, right, mode);
 265
 266     GdipDeleteRegion(path_region);
 267     return Ok;
 268
 269 out:
 270     GdipFree(left);
 271     delete_element(right);
 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         return Ok;
 300     }
 301
 302     left = GdipAlloc(sizeof(region_element));
 303     if (!left)
 304         goto out;
 305     memcpy(left, &region->node, sizeof(region_element));
 306
 307     stat = clone_element(&rect_region->node, &right);
 308     if (stat != Ok)
 309         goto out;
 310
 311     fuse_region(region, left, right, mode);
 312
 313     GdipDeleteRegion(rect_region);
 314     return Ok;
 315
 316 out:
 317     GdipFree(left);
 318     delete_element(right);
 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 GpStatus WINGDIPAPI GdipCombineRegionRegion(GpRegion *region1,
 345         GpRegion *region2, CombineMode mode)
 346 {
 347     region_element *left, *right = NULL;
 348     GpStatus stat;
 349     GpRegion *reg2copy;
 350
 351     TRACE("%p %p %d\n", region1, region2, mode);
 352
 353     if(!(region1 && region2))
 354         return InvalidParameter;
 355
 356     /* simply replace region data */
 357     if(mode == CombineModeReplace){
 358         stat = GdipCloneRegion(region2, &reg2copy);
 359         if(stat != Ok)  return stat;
 360
 361         delete_element(&region1->node);
 362         memcpy(region1, reg2copy, sizeof(GpRegion));
 363         return Ok;
 364     }
 365
 366     left  = GdipAlloc(sizeof(region_element));
 367     if (!left)
 368         return OutOfMemory;
 369
 370     *left = region1->node;
 371     stat = clone_element(&region2->node, &right);
 372     if (stat != Ok)
 373     {
 374         GdipFree(left);
 375         delete_element(right);
 376         return OutOfMemory;
 377     }
 378
 379     fuse_region(region1, left, right, mode);
 380     region1->header.num_children += region2->header.num_children;
 381
 382     return Ok;
 383 }
 384
 385 /*****************************************************************************
 386  * GdipCreateRegion [GDIPLUS.@]
 387  */
 388 GpStatus WINGDIPAPI GdipCreateRegion(GpRegion **region)
 389 {
 390     TRACE("%p\n", region);
 391
 392     if(!region)
 393         return InvalidParameter;
 394
 395     *region = GdipAlloc(sizeof(GpRegion));
 396     if(!*region)
 397         return OutOfMemory;
 398
 399     return init_region(*region, RegionDataInfiniteRect);
 400 }
 401
 402 /*****************************************************************************
 403  * GdipCreateRegionPath [GDIPLUS.@]
 404  *
 405  * Creates a GpRegion from a GpPath
 406  *
 407  * PARAMS
 408  *  path    [I] path to base the region on
 409  *  region  [O] pointer to the newly allocated region
 410  *
 411  * RETURNS
 412  *  SUCCESS: Ok
 413  *  FAILURE: InvalidParameter
 414  *
 415  * NOTES
 416  *  If a path has no floating point points, its points will be stored as shorts
 417  *  (INTPATH)
 418  *
 419  *  If a path is empty, it is considered to be an INTPATH
 420  */
 421 GpStatus WINGDIPAPI GdipCreateRegionPath(GpPath *path, GpRegion **region)
 422 {
 423     region_element* element;
 424     GpPoint  *pointsi;
 425     GpPointF *pointsf;
 426
 427     GpStatus stat;
 428     DWORD flags = FLAGS_INTPATH;
 429     INT count, i;
 430
 431     TRACE("%p, %p\n", path, region);
 432
 433     if (!(path && region))
 434         return InvalidParameter;
 435
 436     *region = GdipAlloc(sizeof(GpRegion));
 437     if(!*region)
 438         return OutOfMemory;
 439     stat = init_region(*region, RegionDataPath);
 440     if (stat != Ok)
 441     {
 442         GdipDeleteRegion(*region);
 443         return stat;
 444     }
 445     element = &(*region)->node;
 446     count = path->pathdata.Count;
 447
 448     /* Test to see if the path is an Integer path */
 449     if (count)
 450     {
 451         pointsi = GdipAlloc(sizeof(GpPoint) * count);
 452         pointsf = GdipAlloc(sizeof(GpPointF) * count);
 453         if (!(pointsi && pointsf))
 454         {
 455             GdipFree(pointsi);
 456             GdipFree(pointsf);
 457             GdipDeleteRegion(*region);
 458             return OutOfMemory;
 459         }
 460
 461         stat = GdipGetPathPointsI(path, pointsi, count);
 462         if (stat != Ok)
 463         {
 464             GdipDeleteRegion(*region);
 465             return stat;
 466         }
 467         stat = GdipGetPathPoints(path, pointsf, count);
 468         if (stat != Ok)
 469         {
 470             GdipDeleteRegion(*region);
 471             return stat;
 472         }
 473
 474         for (i = 0; i < count; i++)
 475         {
 476             if (!(pointsi[i].X == pointsf[i].X &&
 477                   pointsi[i].Y == pointsf[i].Y ))
 478             {
 479                 flags = FLAGS_NOFLAGS;
 480                 break;
 481             }
 482         }
 483         GdipFree(pointsi);
 484         GdipFree(pointsf);
 485     }
 486
 487     stat = GdipClonePath(path, &element->elementdata.pathdata.path);
 488     if (stat != Ok)
 489     {
 490         GdipDeleteRegion(*region);
 491         return stat;
 492     }
 493
 494     /* 3 for headers, once again size doesn't count itself */
 495     element->elementdata.pathdata.pathheader.size = ((sizeof(DWORD) * 3));
 496     switch(flags)
 497     {
 498         /* Floats, sent out as floats */
 499         case FLAGS_NOFLAGS:
 500             element->elementdata.pathdata.pathheader.size +=
 501                 (sizeof(DWORD) * count * 2);
 502             break;
 503         /* INTs, sent out as packed shorts */
 504         case FLAGS_INTPATH:
 505             element->elementdata.pathdata.pathheader.size +=
 506                 (sizeof(DWORD) * count);
 507             break;
 508         default:
 509             FIXME("Unhandled flags (%08x). Expect wrong results.\n", flags);
 510     }
 511     element->elementdata.pathdata.pathheader.size += get_pathtypes_size(path);
 512     element->elementdata.pathdata.pathheader.magic = VERSION_MAGIC;
 513     element->elementdata.pathdata.pathheader.count = count;
 514     element->elementdata.pathdata.pathheader.flags = flags;
 515     (*region)->header.size = sizeheader_size + get_element_size(element);
 516
 517     return Ok;
 518 }
 519
 520 /*****************************************************************************
 521  * GdipCreateRegionRect [GDIPLUS.@]
 522  */
 523 GpStatus WINGDIPAPI GdipCreateRegionRect(GDIPCONST GpRectF *rect,
 524         GpRegion **region)
 525 {
 526     GpStatus stat;
 527
 528     TRACE("%p, %p\n", rect, region);
 529
 530     if (!(rect && region))
 531         return InvalidParameter;
 532
 533     *region = GdipAlloc(sizeof(GpRegion));
 534     stat = init_region(*region, RegionDataRect);
 535     if(stat != Ok)
 536     {
 537         GdipDeleteRegion(*region);
 538         return stat;
 539     }
 540
 541     (*region)->node.elementdata.rect.X = rect->X;
 542     (*region)->node.elementdata.rect.Y = rect->Y;
 543     (*region)->node.elementdata.rect.Width = rect->Width;
 544     (*region)->node.elementdata.rect.Height = rect->Height;
 545
 546     return Ok;
 547 }
 548
 549 GpStatus WINGDIPAPI GdipCreateRegionRectI(GDIPCONST GpRect *rect,
 550         GpRegion **region)
 551 {
 552     GpRectF rectf;
 553
 554     TRACE("%p, %p\n", rect, region);
 555
 556     rectf.X = (REAL)rect->X;
 557     rectf.Y = (REAL)rect->Y;
 558     rectf.Width = (REAL)rect->Width;
 559     rectf.Height = (REAL)rect->Height;
 560
 561     return GdipCreateRegionRect(&rectf, region);
 562 }
 563
 564 GpStatus WINGDIPAPI GdipCreateRegionRgnData(GDIPCONST BYTE *data, INT size, GpRegion **region)
 565 {
 566     FIXME("(%p, %d, %p): stub\n", data, size, region);
 567
 568     *region = NULL;
 569     return NotImplemented;
 570 }
 571
 572 GpStatus WINGDIPAPI GdipCreateRegionHrgn(HRGN hrgn, GpRegion **region)
 573 {
 574     FIXME("(%p, %p): stub\n", hrgn, region);
 575
 576     if(!hrgn || !region)
 577         return InvalidParameter;
 578
 579     *region = NULL;
 580     return NotImplemented;
 581 }
 582
 583 GpStatus WINGDIPAPI GdipDeleteRegion(GpRegion *region)
 584 {
 585     TRACE("%p\n", region);
 586
 587     if (!region)
 588         return InvalidParameter;
 589
 590     delete_element(&region->node);
 591     GdipFree(region);
 592
 593     return Ok;
 594 }
 595
 596 GpStatus WINGDIPAPI GdipGetRegionBounds(GpRegion *region, GpGraphics *graphics, GpRectF *rect)
 597 {
 598     FIXME("(%p, %p, %p): stub\n", region, graphics, rect);
 599
 600     return NotImplemented;
 601 }
 602
 603 GpStatus WINGDIPAPI GdipGetRegionBoundsI(GpRegion *region, GpGraphics *graphics, GpRect *rect)
 604 {
 605     FIXME("(%p, %p, %p): stub\n", region, graphics, rect);
 606
 607     return NotImplemented;
 608 }
 609
 610 static inline void write_dword(DWORD* location, INT* offset, const DWORD write)
 611 {
 612     location[*offset] = write;
 613     (*offset)++;
 614 }
 615
 616 static inline void write_float(DWORD* location, INT* offset, const FLOAT write)
 617 {
 618     ((FLOAT*)location)[*offset] = write;
 619     (*offset)++;
 620 }
 621
 622 static inline void write_packed_point(DWORD* location, INT* offset,
 623         const GpPointF* write)
 624 {
 625     packed_point point;
 626
 627     point.X = write->X;
 628     point.Y = write->Y;
 629     memcpy(location + *offset, &point, sizeof(packed_point));
 630     (*offset)++;
 631 }
 632
 633 static inline void write_path_types(DWORD* location, INT* offset,
 634         const GpPath* path)
 635 {
 636     memcpy(location + *offset, path->pathdata.Types, path->pathdata.Count);
 637
 638     /* The unwritten parts of the DWORD (if any) must be cleared */
 639     if (path->pathdata.Count % sizeof(DWORD))
 640         ZeroMemory(((BYTE*)location) + (*offset * sizeof(DWORD)) +
 641                 path->pathdata.Count,
 642                 sizeof(DWORD) - path->pathdata.Count % sizeof(DWORD));
 643     *offset += (get_pathtypes_size(path) / sizeof(DWORD));
 644 }
 645
 646 static void write_element(const region_element* element, DWORD *buffer,
 647         INT* filled)
 648 {
 649     write_dword(buffer, filled, element->type);
 650     switch (element->type)
 651     {
 652         case CombineModeReplace:
 653         case CombineModeIntersect:
 654         case CombineModeUnion:
 655         case CombineModeXor:
 656         case CombineModeExclude:
 657         case CombineModeComplement:
 658             write_element(element->elementdata.combine.left, buffer, filled);
 659             write_element(element->elementdata.combine.right, buffer, filled);
 660             break;
 661         case RegionDataRect:
 662             write_float(buffer, filled, element->elementdata.rect.X);
 663             write_float(buffer, filled, element->elementdata.rect.Y);
 664             write_float(buffer, filled, element->elementdata.rect.Width);
 665             write_float(buffer, filled, element->elementdata.rect.Height);
 666             break;
 667         case RegionDataPath:
 668         {
 669             INT i;
 670             const GpPath* path = element->elementdata.pathdata.path;
 671
 672             memcpy(buffer + *filled, &element->elementdata.pathdata.pathheader,
 673                     sizeof(element->elementdata.pathdata.pathheader));
 674             *filled += sizeof(element->elementdata.pathdata.pathheader) / sizeof(DWORD);
 675             switch (element->elementdata.pathdata.pathheader.flags)
 676             {
 677                 case FLAGS_NOFLAGS:
 678                     for (i = 0; i < path->pathdata.Count; i++)
 679                     {
 680                         write_float(buffer, filled, path->pathdata.Points[i].X);
 681                         write_float(buffer, filled, path->pathdata.Points[i].Y);
 682                     }
 683                     break;
 684                 case FLAGS_INTPATH:
 685                     for (i = 0; i < path->pathdata.Count; i++)
 686                     {
 687                         write_packed_point(buffer, filled,
 688                                 &path->pathdata.Points[i]);
 689                     }
 690             }
 691             write_path_types(buffer, filled, path);
 692             break;
 693         }
 694         case RegionDataEmptyRect:
 695         case RegionDataInfiniteRect:
 696             break;
 697     }
 698 }
 699
 700 /*****************************************************************************
 701  * GdipGetRegionData [GDIPLUS.@]
 702  *
 703  * Returns the header, followed by combining ops and region elements.
 704  *
 705  * PARAMS
 706  *  region  [I] region to retrieve from
 707  *  buffer  [O] buffer to hold the resulting data
 708  *  size    [I] size of the buffer
 709  *  needed  [O] (optional) how much data was written
 710  *
 711  * RETURNS
 712  *  SUCCESS: Ok
 713  *  FAILURE: InvalidParamter
 714  *
 715  * NOTES
 716  *  The header contains the size, a checksum, a version string, and the number
 717  *  of children. The size does not count itself or the checksum.
 718  *  Version is always something like 0xdbc01001 or 0xdbc01002
 719  *
 720  *  An element is a RECT, or PATH; Combining ops are stored as their
 721  *  CombineMode value. Special regions (infinite, empty) emit just their
 722  *  op-code; GpRectFs emit their code followed by their points; GpPaths emit
 723  *  their code followed by a second header for the path followed by the actual
 724  *  path data. Followed by the flags for each point. The pathheader contains
 725  *  the size of the data to follow, a version number again, followed by a count
 726  *  of how many points, and any special flags which may apply. 0x4000 means its
 727  *  a path of shorts instead of FLOAT.
 728  *
 729  *  Combining Ops are stored in reverse order from when they were constructed;
 730  *  the output is a tree where the left side combining area is always taken
 731  *  first.
 732  */
 733 GpStatus WINGDIPAPI GdipGetRegionData(GpRegion *region, BYTE *buffer, UINT size,
 734         UINT *needed)
 735 {
 736     INT filled = 0;
 737
 738     TRACE("%p, %p, %d, %p\n", region, buffer, size, needed);
 739
 740     if (!(region && buffer && size))
 741         return InvalidParameter;
 742
 743     memcpy(buffer, &region->header, sizeof(region->header));
 744     filled += sizeof(region->header) / sizeof(DWORD);
 745     /* With few exceptions, everything written is DWORD aligned,
 746      * so use that as our base */
 747     write_element(&region->node, (DWORD*)buffer, &filled);
 748
 749     if (needed)
 750         *needed = filled * sizeof(DWORD);
 751
 752     return Ok;
 753 }
 754
 755 /*****************************************************************************
 756  * GdipGetRegionDataSize [GDIPLUS.@]
 757  */
 758 GpStatus WINGDIPAPI GdipGetRegionDataSize(GpRegion *region, UINT *needed)
 759 {
 760     TRACE("%p, %p\n", region, needed);
 761
 762     if (!(region && needed))
 763         return InvalidParameter;
 764
 765     /* header.size doesn't count header.size and header.checksum */
 766     *needed = region->header.size + sizeof(DWORD) * 2;
 767
 768     return Ok;
 769 }
 770
 771 static GpStatus get_path_hrgn(GpPath *path, GpGraphics *graphics, HRGN *hrgn)
 772 {
 773     HDC new_hdc=NULL;
 774     GpStatus stat;
 775     INT save_state;
 776
 777     if (!graphics)
 778     {
 779         new_hdc = GetDC(0);
 780         if (!new_hdc)
 781             return OutOfMemory;
 782
 783         stat = GdipCreateFromHDC(new_hdc, &graphics);
 784         if (stat != Ok)
 785         {
 786             ReleaseDC(0, new_hdc);
 787             return stat;
 788         }
 789     }
 790
 791     save_state = SaveDC(graphics->hdc);
 792     EndPath(graphics->hdc);
 793
 794     SetPolyFillMode(graphics->hdc, (path->fill == FillModeAlternate ? ALTERNATE
 795                                                                     : WINDING));
 796
 797     stat = trace_path(graphics, path);
 798     if (stat == Ok)
 799     {
 800         *hrgn = PathToRegion(graphics->hdc);
 801         stat = *hrgn ? Ok : OutOfMemory;
 802     }
 803
 804     RestoreDC(graphics->hdc, save_state);
 805     if (new_hdc)
 806     {
 807         ReleaseDC(0, new_hdc);
 808         GdipDeleteGraphics(graphics);
 809     }
 810
 811     return stat;
 812 }
 813
 814 static GpStatus get_region_hrgn(struct region_element *element, GpGraphics *graphics, HRGN *hrgn)
 815 {
 816     switch (element->type)
 817     {
 818         case RegionDataInfiniteRect:
 819             *hrgn = NULL;
 820             return Ok;
 821         case RegionDataEmptyRect:
 822             *hrgn = CreateRectRgn(0, 0, 0, 0);
 823             return *hrgn ? Ok : OutOfMemory;
 824         case RegionDataPath:
 825             return get_path_hrgn(element->elementdata.pathdata.path, graphics, hrgn);
 826         case RegionDataRect:
 827         {
 828             GpPath* path;
 829             GpStatus stat;
 830             GpRectF* rc = &element->elementdata.rect;
 831
 832             stat = GdipCreatePath(FillModeAlternate, &path);
 833             if (stat != Ok)
 834                 return stat;
 835             stat = GdipAddPathRectangle(path, rc->X, rc->Y, rc->Width, rc->Height);
 836
 837             if (stat == Ok)
 838                 stat = get_path_hrgn(path, graphics, hrgn);
 839
 840             GdipDeletePath(path);
 841
 842             return stat;
 843         }
 844         case CombineModeIntersect:
 845         case CombineModeUnion:
 846         case CombineModeXor:
 847         case CombineModeExclude:
 848         case CombineModeComplement:
 849         {
 850             HRGN left, right;
 851             GpStatus stat;
 852             int ret;
 853
 854             stat = get_region_hrgn(element->elementdata.combine.left, graphics, &left);
 855             if (stat != Ok)
 856             {
 857                 *hrgn = NULL;
 858                 return stat;
 859             }
 860
 861             if (left == NULL)
 862             {
 863                 /* existing region is infinite */
 864                 switch (element->type)
 865                 {
 866                     case CombineModeIntersect:
 867                         return get_region_hrgn(element->elementdata.combine.right, graphics, hrgn);
 868                     case CombineModeXor: case CombineModeExclude:
 869                         FIXME("cannot exclude from an infinite region\n");
 870                         /* fall-through */
 871                     case CombineModeUnion: case CombineModeComplement:
 872                         *hrgn = NULL;
 873                         return Ok;
 874                 }
 875             }
 876
 877             stat = get_region_hrgn(element->elementdata.combine.right, graphics, &right);
 878             if (stat != Ok)
 879             {
 880                 DeleteObject(left);
 881                 *hrgn = NULL;
 882                 return stat;
 883             }
 884
 885             if (right == NULL)
 886             {
 887                 /* new region is infinite */
 888                 switch (element->type)
 889                 {
 890                     case CombineModeIntersect:
 891                         *hrgn = left;
 892                         return Ok;
 893                     case CombineModeXor: case CombineModeComplement:
 894                         FIXME("cannot exclude from an infinite region\n");
 895                         /* fall-through */
 896                     case CombineModeUnion: case CombineModeExclude:
 897                         DeleteObject(left);
 898                         *hrgn = NULL;
 899                         return Ok;
 900                 }
 901             }
 902
 903             switch (element->type)
 904             {
 905                 case CombineModeIntersect:
 906                     ret = CombineRgn(left, left, right, RGN_AND);
 907                     break;
 908                 case CombineModeUnion:
 909                     ret = CombineRgn(left, left, right, RGN_OR);
 910                     break;
 911                 case CombineModeXor:
 912                     ret = CombineRgn(left, left, right, RGN_XOR);
 913                     break;
 914                 case CombineModeExclude:
 915                     ret = CombineRgn(left, left, right, RGN_DIFF);
 916                     break;
 917                 case CombineModeComplement:
 918                     ret = CombineRgn(left, right, left, RGN_DIFF);
 919                     break;
 920                 default:
 921                     ret = ERROR;
 922             }
 923
 924             DeleteObject(right);
 925
 926             if (ret == ERROR)
 927             {
 928                 DeleteObject(left);
 929                 *hrgn = NULL;
 930                 return GenericError;
 931             }
 932
 933             *hrgn = left;
 934             return Ok;
 935         }
 936         default:
 937             FIXME("GdipGetRegionHRgn unimplemented for region type=%x\n", element->type);
 938             *hrgn = NULL;
 939             return NotImplemented;
 940     }
 941 }
 942
 943 /*****************************************************************************
 944  * GdipGetRegionHRgn [GDIPLUS.@]
 945  */
 946 GpStatus WINGDIPAPI GdipGetRegionHRgn(GpRegion *region, GpGraphics *graphics, HRGN *hrgn)
 947 {
 948     TRACE("(%p, %p, %p)\n", region, graphics, hrgn);
 949
 950     if (!region || !hrgn)
 951         return InvalidParameter;
 952
 953     return get_region_hrgn(&region->node, graphics, hrgn);
 954 }
 955
 956 GpStatus WINGDIPAPI GdipIsEmptyRegion(GpRegion *region, GpGraphics *graphics, BOOL *res)
 957 {
 958     TRACE("(%p, %p, %p)\n", region, graphics, res);
 959
 960     if(!region || !graphics || !res)
 961         return InvalidParameter;
 962
 963     *res = (region->node.type == RegionDataEmptyRect);
 964
 965     return Ok;
 966 }
 967
 968 GpStatus WINGDIPAPI GdipIsEqualRegion(GpRegion *region, GpRegion *region2, GpGraphics *graphics,
 969                                       BOOL *res)
 970 {
 971     FIXME("(%p, %p, %p, %p): stub\n", region, region2, graphics, res);
 972
 973     return NotImplemented;
 974 }
 975
 976 /*****************************************************************************
 977  * GdipIsInfiniteRegion [GDIPLUS.@]
 978  */
 979 GpStatus WINGDIPAPI GdipIsInfiniteRegion(GpRegion *region, GpGraphics *graphics, BOOL *res)
 980 {
 981     /* I think graphics is ignored here */
 982     TRACE("(%p, %p, %p)\n", region, graphics, res);
 983
 984     if(!region || !graphics || !res)
 985         return InvalidParameter;
 986
 987     *res = (region->node.type == RegionDataInfiniteRect);
 988
 989     return Ok;
 990 }
 991
 992 /*****************************************************************************
 993  * GdipSetEmpty [GDIPLUS.@]
 994  */
 995 GpStatus WINGDIPAPI GdipSetEmpty(GpRegion *region)
 996 {
 997     GpStatus stat;
 998
 999     TRACE("%p\n", region);
1000
1001     if (!region)
1002         return InvalidParameter;
1003
1004     delete_element(&region->node);
1005     stat = init_region(region, RegionDataEmptyRect);
1006
1007     return stat;
1008 }
1009
1010 GpStatus WINGDIPAPI GdipSetInfinite(GpRegion *region)
1011 {
1012     GpStatus stat;
1013
1014     TRACE("%p\n", region);
1015
1016     if (!region)
1017         return InvalidParameter;
1018
1019     delete_element(&region->node);
1020     stat = init_region(region, RegionDataInfiniteRect);
1021
1022     return stat;
1023 }
1024
1025 GpStatus WINGDIPAPI GdipTransformRegion(GpRegion *region, GpMatrix *matrix)
1026 {
1027     FIXME("(%p, %p): stub\n", region, matrix);
1028
1029     return NotImplemented;
1030 }
1031
1032 GpStatus WINGDIPAPI GdipTranslateRegion(GpRegion *region, REAL dx, REAL dy)
1033 {
1034     FIXME("(%p, %f, %f): stub\n", region, dx, dy);
1035
1036     return NotImplemented;
1037 }
1038
1039 GpStatus WINGDIPAPI GdipTranslateRegionI(GpRegion *region, INT dx, INT dy)
1040 {
1041     FIXME("(%p, %d, %d): stub\n", region, dx, dy);
1042
1043     return NotImplemented;
1044 }