rom/intuition/eraseimage.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     Copyright © 2001-2003, The MorphOS Development Team. All Rights Reserved.
   4     $Id$
   5 */
   6
   7 #include <proto/graphics.h>
   8 #include <proto/layers.h>
   9 #include "intuition_intern.h"
  10 #include <intuition/classusr.h>
  11 #ifdef __MORPHOS__
  12 #include <clib/alib_protos.h>
  13 #else
  14 #include <proto/alib.h>
  15 #endif
  16
  17 /*****************************************************************************
  18
  19     NAME */
  20 #include <graphics/rastport.h>
  21 #include <graphics/rpattr.h>
  22 #include <intuition/intuition.h>
  23 #include <intuition/imageclass.h>
  24 #include <proto/intuition.h>
  25
  26     AROS_LH4(void, EraseImage,
  27
  28 /*  SYNOPSIS */
  29          AROS_LHA(struct RastPort *, rp, A0),
  30          AROS_LHA(struct Image    *, image, A1),
  31          AROS_LHA(LONG             , leftOffset, D0),
  32          AROS_LHA(LONG             , topOffset, D1),
  33
  34 /*  LOCATION */
  35          struct IntuitionBase *, IntuitionBase, 105, Intuition)
  36
  37 /*  FUNCTION
  38     Erase an image on the screen.
  39
  40     INPUTS
  41     rp - Render in this RastPort
  42     image - Erase this image
  43     leftOffset, topOffset - Add this offset the the position in the
  44         image.
  45
  46     RESULT
  47     None.
  48
  49     NOTES
  50
  51     EXAMPLE
  52
  53     BUGS
  54
  55     SEE ALSO
  56     DrawImage(), DrawImageState()
  57
  58     INTERNALS
  59
  60     HISTORY
  61     29-10-95    digulla automatically created from
  62                 intuition_lib.fd and clib/intuition_protos.h
  63     23-10.96    aldi    commited the code
  64
  65 *****************************************************************************/
  66 {
  67     AROS_LIBFUNC_INIT
  68
  69     struct GfxBase *GfxBase = GetPrivIBase(IntuitionBase)->GfxBase;
  70     struct LayersBase *LayersBase = GetPrivIBase(IntuitionBase)->LayersBase;
  71     EXTENDWORD(leftOffset);
  72     EXTENDWORD(topOffset);
  73
  74     SANITY_CHECK(rp)
  75     SANITY_CHECK(image)
  76
  77     if (rp->Layer) LockLayer(0,rp->Layer);
  78
  79     if (image != NULL)
  80     {
  81         if (image->Depth == CUSTOMIMAGEDEPTH)
  82         {
  83             struct impErase method;
  84
  85         #ifdef __MORPHOS__
  86             IPTR penmode;
  87
  88             GetRPAttrs(rp,RPTAG_PenMode,(ULONG)&penmode,TAG_DONE);
  89         #endif
  90
  91             method.MethodID     = IM_ERASE;
  92             method.imp_RPort    = rp;
  93             method.imp_Offset.X = leftOffset;
  94             method.imp_Offset.Y = topOffset;
  95
  96             DoMethodA ((Object *)image, (Msg)&method);
  97
  98         #ifdef __MORPHOS__
  99             SetRPAttrs(rp,RPTAG_PenMode,penmode,TAG_DONE);
 100         #endif
 101         }
 102         else
 103         {
 104             EraseRect (rp,
 105                        leftOffset + image->LeftEdge,
 106                        topOffset  + image->TopEdge,
 107                        leftOffset + image->LeftEdge + image->Width,
 108                        topOffset  + image->TopEdge  + image->Height
 109                       );
 110         }
 111     }
 112
 113     if (rp->Layer) UnlockLayer(rp->Layer);
 114
 115     AROS_LIBFUNC_EXIT
 116 } /* EraseImage */