rom/graphics/clearregionregion.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: (AROS only) Graphics function ClearRegionRegion()
   6     Lang: english
   7 */
   8
   9 #include "graphics_intern.h"
  10 #include <proto/graphics.h>
  11 #include <graphics/regions.h>
  12 #include "intregions.h"
  13
  14 /*****************************************************************************
  15
  16     NAME */
  17 #include <clib/graphics_protos.h>
  18
  19         AROS_LH2(BOOL, ClearRegionRegion,
  20
  21 /*  SYNOPSIS */
  22         AROS_LHA(struct Region *, R1, A0),
  23         AROS_LHA(struct Region *, R2, A1),
  24
  25 /*  LOCATION */
  26         struct GfxBase *, GfxBase, 182, Graphics)
  27
  28 /*  FUNCTION
  29         Clear the given Region region1 from the given Region region2
  30         leaving the result in region2.
  31
  32     INPUTS
  33         region1 - pointer to a Region structure
  34         region2 - pointer to a Rectangle structure
  35
  36     RESULT
  37         FALSE if not enough memory was available, else TRUE
  38
  39     NOTES
  40         This function does not exist in AmigaOS.
  41
  42     EXAMPLE
  43
  44     BUGS
  45
  46     SEE ALSO
  47         ClearRectRegion(), AndRectRegion(), OrRectRegion(), XorRectRegion()
  48
  49     INTERNALS
  50
  51     HISTORY
  52         13-12-2000  stegerg implemented
  53
  54 *****************************************************************************/
  55 {
  56     AROS_LIBFUNC_INIT
  57
  58     struct Region R3;
  59
  60     /* If the regions don't overlap just return */
  61     if (!overlap(R1->bounds, R2->bounds))
  62         return TRUE;
  63
  64     InitRegion(&R3);
  65
  66     if
  67     (
  68         _DoOperationBandBand
  69         (
  70             _ClearBandBand,
  71             MinX(R1),
  72             MinX(R2),
  73             MinY(R1),
  74             MinY(R2),
  75             R1->RegionRectangle,
  76             R2->RegionRectangle,
  77             &R3.RegionRectangle,
  78             &R3.bounds,
  79             GfxBase
  80         )
  81     )
  82     {
  83         ClearRegion(R2);
  84
  85         *R2 = R3;
  86
  87         _TranslateRegionRectangles(R3.RegionRectangle, -MinX(&R3), -MinY(&R3));
  88
  89         return TRUE;
  90     }
  91
  92     return FALSE;
  93
  94     AROS_LIBFUNC_EXIT
  95
  96 } /* ClearRegionRegion */