rom/intuition/eraseimage.c

   1 /*
   2     Copyright © 1995-2003, 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     AROS_LIBBASE_EXT_DECL(struct IntuitionBase *,IntuitionBase)
  69
  70     EXTENDWORD(leftOffset);
  71     EXTENDWORD(topOffset);
  72
  73     SANITY_CHECK(rp)
  74     SANITY_CHECK(image)
  75
  76     if (rp->Layer) LockLayer(0,rp->Layer);
  77
  78     if (image != NULL)
  79     {
  80         if (image->Depth == CUSTOMIMAGEDEPTH)
  81         {
  82             struct impErase method;
  83             ULONG penmode;
  84
  85         #ifdef __MORPHOS__
  86             GetRPAttrs(rp,RPTAG_PenMode,(ULONG)&penmode,TAG_DONE);
  87         #endif
  88
  89             method.MethodID     = IM_ERASE;
  90             method.imp_RPort    = rp;
  91             method.imp_Offset.X = leftOffset;
  92             method.imp_Offset.Y = topOffset;
  93
  94             DoMethodA ((Object *)image, (Msg)&method);
  95
  96         #ifdef __MORPHOS__
  97             SetRPAttrs(rp,RPTAG_PenMode,penmode,TAG_DONE);
  98         #endif
  99         }
 100         else
 101         {
 102             EraseRect (rp,
 103                        leftOffset + image->LeftEdge,
 104                        topOffset  + image->TopEdge,
 105                        leftOffset + image->LeftEdge + image->Width,
 106                        topOffset  + image->TopEdge  + image->Height
 107                       );
 108         }
 109     }
 110
 111     if (rp->Layer) UnlockLayer(rp->Layer);
 112
 113     AROS_LIBFUNC_EXIT
 114 } /* EraseImage */