workbench/libs/asl/eraserclass.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8
   9 #include <proto/alib.h>
  10 #include <proto/exec.h>
  11 #include <proto/utility.h>
  12 #include <proto/intuition.h>
  13 #include <proto/graphics.h>
  14 #include <proto/layers.h>
  15
  16 #include <exec/memory.h>
  17 #include <intuition/screens.h>
  18 #include <intuition/cghooks.h>
  19 #include <intuition/imageclass.h>
  20 #include <intuition/gadgetclass.h>
  21 #include <graphics/gfx.h>
  22
  23 #include <string.h>
  24
  25 #include "asl_intern.h"
  26 #include "layout.h"
  27
  28 #define SDEBUG 0
  29 #define DEBUG 0
  30
  31 #include <aros/debug.h>
  32
  33
  34 #ifdef __MORPHOS__
  35 #ifndef NewRectRegion
  36 #define NewRectRegion(_MinX,_MinY,_MaxX,_MaxY) \
  37 ({ struct Region *_region; \
  38         if ((_region = NewRegion())) \
  39         { struct Rectangle _rect; \
  40                 _rect.MinX = _MinX; \
  41                 _rect.MinY = _MinY; \
  42                 _rect.MaxX = _MaxX; \
  43                 _rect.MaxY = _MaxY; \
  44                 if (!OrRectRegion(_region, &_rect)) { DisposeRegion(_region); _region = NULL; } \
  45         } \
  46         _region; \
  47 })
  48 #endif
  49 #endif
  50
  51
  52 #define CLASS_ASLBASE ((struct AslBase_intern *)cl->cl_UserData)
  53 #define HOOK_ASLBASE  ((struct AslBase_intern *)hook->h_Data)
  54
  55 #define AslBase CLASS_ASLBASE
  56
  57 /********************** ASL ERASER CLASS **************************************************/
  58
  59 IPTR AslEraser__OM_NEW(Class * cl, Object * o, struct opSet * msg)
  60 {
  61     struct Gadget *g = (struct Gadget *)DoSuperMethodA(cl, o, (Msg)msg);
  62
  63     if (g)
  64     {
  65         g->Flags |= GFLG_RELSPECIAL;
  66
  67         g->LeftEdge = 20000;
  68         g->TopEdge  = 20000;
  69         g->Width    = 1;
  70         g->Height   = 1;
  71
  72     } /* if (g) */
  73
  74     return (IPTR)g;
  75 }
  76
  77 /***********************************************************************************/
  78
  79 IPTR AslEraser__GM_HITTEST(Class *cl, Object *o, struct gpHitTest *msg)
  80 {
  81     return 0;
  82 }
  83
  84
  85 /***********************************************************************************/
  86
  87 IPTR AslEraser__GM_RENDER(Class *cl, Object *o, struct gpRender *msg)
  88 {
  89     WORD x, y, w, h, x2, y2;
  90
  91     if (msg->gpr_Redraw == GREDRAW_REDRAW)
  92     {
  93         struct Window *win = msg->gpr_GInfo->gi_Window;
  94         struct RastPort *rp = msg->gpr_RPort;
  95         struct Region *clip;
  96
  97         if ((clip = NewRectRegion(win->BorderLeft,
  98                                   win->BorderTop,
  99                                   win->Width - 1 - win->BorderRight,
 100                                   win->Height - 1 - win->BorderBottom)))
 101         {
 102             struct Gadget *g = win->FirstGadget;
 103             struct RegionRectangle *rr;
 104
 105             while(g)
 106             {
 107                 struct Rectangle rect;
 108
 109                 getgadgetbounds(g, msg->gpr_GInfo, &x, &y, &w, &h);
 110
 111                 rect.MinX = x;
 112                 rect.MinY = y;
 113                 rect.MaxX = x + w - 1;
 114                 rect.MaxY = y + h - 1;
 115
 116                 ClearRectRegion(clip, &rect);
 117
 118                 g = g->NextGadget;
 119             }
 120
 121
 122             SetABPenDrMd(rp, msg->gpr_GInfo->gi_DrInfo->dri_Pens[BACKGROUNDPEN], 0, JAM2);
 123             rr = clip->RegionRectangle;
 124             while(rr)
 125             {
 126                 x  = clip->bounds.MinX + rr->bounds.MinX;
 127                 y  = clip->bounds.MinY + rr->bounds.MinY;
 128                 x2 = clip->bounds.MinX + rr->bounds.MaxX;
 129                 y2 = clip->bounds.MinY + rr->bounds.MaxY;
 130
 131                 RectFill(rp, x, y, x2, y2);
 132
 133                 rr = rr->Next;
 134             }
 135
 136             DisposeRegion(clip);
 137
 138         }
 139
 140     } /* if (msg->gpr_Redraw == GREDRAW_REDRAW) */
 141
 142     return 0;
 143 }
 144
 145 /***********************************************************************************/