rom/intuition/changewindowshape.c

   1 /*
   2     Copyright © 1995-2007, 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/layers.h>
   8 #include "intuition_intern.h"
   9 #include "inputhandler_actions.h"
  10
  11 #ifdef ChangeLayerShape
  12
  13 struct ChangeWindowShapeActionMsg
  14 {
  15     struct IntuiActionMsg    msg;
  16     struct Window           *window;
  17     struct Region           *shape;
  18     struct Hook             *callback;
  19 };
  20
  21 static VOID int_changewindowshape(struct ChangeWindowShapeActionMsg *msg,
  22                                   struct IntuitionBase *IntuitionBase);
  23
  24 #endif
  25
  26 /*****************************************************************************
  27
  28     NAME */
  29 #include <proto/intuition.h>
  30
  31     AROS_LH3(struct Region *, ChangeWindowShape,
  32
  33 /*  SYNOPSIS */
  34          AROS_LHA(struct Window *, window, A0),
  35          AROS_LHA(struct Region *, newshape, A1),
  36          AROS_LHA(struct Hook *, callback, A2),
  37
  38 /*  LOCATION */
  39          struct IntuitionBase *, IntuitionBase, 143, Intuition)
  40
  41 /*  FUNCTION
  42         Make a window invisible.
  43
  44     INPUTS
  45     window - The window to affect.
  46
  47     RESULT
  48
  49     NOTES
  50
  51     EXAMPLE
  52
  53     BUGS
  54
  55     SEE ALSO
  56
  57     INTERNALS
  58
  59     HISTORY
  60
  61 *****************************************************************************/
  62 {
  63     AROS_LIBFUNC_INIT
  64
  65 #ifdef ChangeLayerShape
  66     struct ChangeWindowShapeActionMsg msg;
  67
  68     ASSERT_VALID_PTR(window);
  69
  70     if (IS_GZZWINDOW(window)) return NULL;
  71
  72     msg.window   = window;
  73     msg.shape    = newshape;
  74     msg.callback = callback;
  75     DoSyncAction((APTR)int_changewindowshape, &msg.msg, IntuitionBase);
  76
  77     return msg.shape;
  78 #else
  79
  80     /* shut up the compiler */
  81     IntuitionBase = IntuitionBase;
  82     callback = callback;
  83     newshape = newshape;
  84     window = window;
  85
  86     return NULL;
  87 #endif
  88
  89     AROS_LIBFUNC_EXIT
  90
  91 } /* ChangeWindowShape */
  92
  93
  94 #ifdef ChangeLayerShape
  95 static VOID int_changewindowshape(struct ChangeWindowShapeActionMsg *msg,
  96                                   struct IntuitionBase *IntuitionBase)
  97 {
  98     struct Window   *window = msg->window;
  99     struct Region   *shape = msg->shape;
 100     struct Hook     *callback = msg->callback;
 101     struct Screen   *screen = window->WScreen;
 102
 103     if (!ResourceExisting(window, RESOURCE_WINDOW, IntuitionBase)) return;
 104
 105     LOCK_REFRESH(screen);
 106     msg->shape = ChangeLayerShape(window->WLayer, shape, callback);
 107     UNLOCK_REFRESH(screen);
 108
 109     CheckLayers(screen, IntuitionBase);
 110 }
 111 #endif