rom/graphics/rectfill.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$    $Log
   4
   5     Desc: Graphics function RectFill()
   6     Lang: english
   7 */
   8
   9 #include <proto/oop.h>
  10
  11 #include "graphics_intern.h"
  12 #include "gfxfuncsupport.h"
  13 #include "graphics_driver.h"
  14
  15 /*****************************************************************************
  16
  17     NAME */
  18 #include <graphics/rastport.h>
  19 #include <proto/graphics.h>
  20
  21         AROS_LH5(void, RectFill,
  22
  23 /*  SYNOPSIS */
  24         AROS_LHA(struct RastPort *, rp, A1),
  25         AROS_LHA(LONG             , xMin, D0),
  26         AROS_LHA(LONG             , yMin, D1),
  27         AROS_LHA(LONG             , xMax, D2),
  28         AROS_LHA(LONG             , yMax, D3),
  29
  30 /*  LOCATION */
  31         struct GfxBase *, GfxBase, 51, Graphics)
  32
  33 /*  FUNCTION
  34         Fills a rectangular area with the current pens, drawing mode
  35         and areafill pattern. If no areafill pattern is defined fill
  36         with foreground pen.
  37
  38     INPUTS
  39         rp - RastPort
  40         xMin,yMin - upper left corner
  41         xMax,yMax - lower right corner
  42
  43     RESULT
  44
  45     NOTES
  46
  47     EXAMPLE
  48
  49     BUGS
  50
  51     SEE ALSO
  52
  53     INTERNALS
  54
  55     HISTORY
  56         29-10-95    digulla automatically created from
  57                             graphics_lib.fd and clib/graphics_protos.h
  58
  59 *****************************************************************************/
  60 {
  61     AROS_LIBFUNC_INIT
  62
  63     FIX_GFXCOORD(xMin);
  64     FIX_GFXCOORD(yMin);
  65     FIX_GFXCOORD(xMax);
  66     FIX_GFXCOORD(yMax);
  67
  68     if ((xMax >= xMin) && (yMax >= yMin))
  69     {
  70         if (rp->AreaPtrn)
  71         {
  72             /* When rasport has areaptrn, let BltPattern do the job */
  73             BltPattern(rp, NULL, xMin, yMin, xMax, yMax, 0);
  74         }
  75         else
  76         {
  77             OOP_Object *gc  = GetDriverData(rp, GfxBase);
  78             struct Rectangle rr;
  79             HIDDT_Pixel oldfg = 0;
  80
  81             if (rp->DrawMode & INVERSVID) {
  82                 oldfg = GC_FG(gc);
  83                 GC_FG(gc) = GC_BG(gc);
  84             }
  85
  86             /* This is the same as fillrect_pendrmd() */
  87
  88             rr.MinX = xMin;
  89             rr.MinY = yMin;
  90             rr.MaxX = xMax;
  91             rr.MaxY = yMax;
  92
  93             do_render_with_gc(rp, NULL, &rr, fillrect_render, NULL, gc, TRUE, FALSE, GfxBase);
  94
  95             if (rp->DrawMode & INVERSVID) {
  96                 GC_FG(gc) = oldfg;
  97             }
  98         }
  99     } /* if ((xMax >= xMin) && (yMax >= yMin)) */
 100
 101     AROS_LIBFUNC_EXIT
 102
 103 } /* RectFill */