rom/intuition/windowtoback.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     Move window behind all other windows.
   7 */
   8
   9 #include <proto/layers.h>
  10 #include "intuition_intern.h"
  11 #include "inputhandler_actions.h"
  12
  13 struct WindowToBackActionMsg
  14 {
  15     struct IntuiActionMsg  msg;
  16     struct Window         *window;
  17 };
  18
  19 static VOID int_windowtoback(struct WindowToBackActionMsg *msg,
  20                              struct IntuitionBase *IntuitionBase);
  21
  22 /*****************************************************************************
  23
  24     NAME */
  25 #include <intuition/intuition.h>
  26 #include <proto/intuition.h>
  27
  28 AROS_LH1(void, WindowToBack,
  29
  30          /*  SYNOPSIS */
  31          AROS_LHA(struct Window *, window, A0),
  32
  33          /*  LOCATION */
  34          struct IntuitionBase *, IntuitionBase, 51, Intuition)
  35
  36 /*  FUNCTION
  37     Bring a window to the back (ie. behind any other window).
  38
  39     INPUTS
  40     window - Which window
  41
  42     RESULT
  43     None.
  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                 intuition_lib.fd and clib/intuition_protos.h
  58
  59 *****************************************************************************/
  60 {
  61     AROS_LIBFUNC_INIT
  62
  63     struct WindowToBackActionMsg msg;
  64
  65     DEBUG_WINDOWTOBACK(dprintf("WindowToBack: Window 0x%lx\n", window));
  66
  67     if (!window)
  68         return;
  69
  70     msg.window = window;
  71     DoASyncAction((APTR)int_windowtoback, &msg.msg, sizeof(msg), IntuitionBase);
  72
  73     AROS_LIBFUNC_EXIT
  74
  75 } /* WindowToBack */
  76
  77
  78 static VOID int_windowtoback(struct WindowToBackActionMsg *msg,
  79                              struct IntuitionBase *IntuitionBase)
  80 {
  81     struct Window       *window = msg->window;
  82     struct Layer        *layer = WLAYER(window);
  83     struct Screen       *screen = window->WScreen;
  84     struct Requester    *req;
  85
  86     DEBUG_WINDOWTOBACK(dprintf("IntWindowToBack: Window 0x%lx\n", window));
  87
  88     if (!ResourceExisting(window, RESOURCE_WINDOW, IntuitionBase)) return;
  89
  90     if (!(layer->Flags & LAYERBACKDROP))
  91     {
  92         LOCK_REFRESH(screen);
  93
  94         for (req = window->FirstRequest; req; req = req->OlderRequest)
  95         {
  96             if (req->ReqLayer)
  97             {
  98                 BehindLayer(0, req->ReqLayer);
  99             }
 100         }
 101
 102         BehindLayer(0, layer);
 103
 104         /* GZZ window or regular window? */
 105         if (BLAYER(window))
 106         {
 107             /* move outer window behind! */
 108             /* attention: layer->back would not be valid as
 109                layer already moved!!
 110                */
 111             BehindLayer(0, BLAYER(window));
 112         }
 113
 114         CheckLayers(screen, IntuitionBase);
 115
 116         UNLOCK_REFRESH(screen);
 117     }
 118
 119     NotifyDepthArrangement(window, IntuitionBase);
 120 }