rom/intuition/zipwindow.c

   1 /*
   2     Copyright © 1995-2013, The AROS Development Team. All rights reserved.
   3     Copyright © 2001-2003, The MorphOS Development Team. All Rights Reserved.
   4     $Id$
   5 */
   6
   7 #include "intuition_intern.h"
   8 #include "inputhandler_actions.h"
   9
  10 struct ZipWindowActionMsg
  11 {
  12     struct IntuiActionMsg  msg;
  13     struct Window         *window;
  14 };
  15
  16 static VOID int_zipwindow(struct ZipWindowActionMsg *msg,
  17                           struct IntuitionBase *IntuitionBase);
  18
  19 /*****************************************************************************
  20
  21     NAME */
  22 #include <intuition/intuition.h>
  23 #include <proto/intuition.h>
  24
  25         AROS_LH1(void, ZipWindow,
  26
  27 /*  SYNOPSIS */
  28         AROS_LHA(struct Window *, window, A0),
  29
  30 /*  LOCATION */
  31         struct IntuitionBase *, IntuitionBase, 84, Intuition)
  32
  33 /*  FUNCTION
  34         "Zip" (move and resize) a window to the coordinates and dimensions
  35         the window had at the last call of ZipWindow(), or invoked via the
  36         zoom-gadget.
  37
  38     INPUTS
  39         window - Which window
  40
  41     RESULT
  42         None.
  43
  44     NOTES
  45         This call is deferred. Wait() for IDCMP_CHANGEWINDOW if your
  46         program depends on the new size.
  47
  48     EXAMPLE
  49
  50     BUGS
  51
  52     SEE ALSO
  53         ChangeWindowBox(), MoveWindow(), SizeWindow()
  54
  55     INTERNALS
  56
  57 *****************************************************************************/
  58 {
  59     AROS_LIBFUNC_INIT
  60
  61     struct ZipWindowActionMsg msg;
  62
  63     DEBUG_ZIPWINDOW(dprintf("ZipWindow(Window 0x%lx)\n",window));
  64
  65     SANITY_CHECK(window)
  66
  67     msg.window = window;
  68
  69     DoASyncAction((APTR)int_zipwindow, &msg.msg, sizeof(msg), IntuitionBase);
  70 //    DoSyncAction((APTR)int_zipwindow, &msg.msg, IntuitionBase);
  71
  72     AROS_LIBFUNC_EXIT
  73
  74 } /* ZipWindow */
  75
  76
  77 static VOID int_zipwindow(struct ZipWindowActionMsg *msg,
  78                           struct IntuitionBase *IntuitionBase)
  79 {
  80     struct Window       *window = msg->window;
  81     struct IntWindow    *w = (struct IntWindow *)window;
  82     LONG                 NewLeftEdge, NewTopEdge, NewWidth, NewHeight;
  83
  84     if (!ResourceExisting(window, RESOURCE_WINDOW, IntuitionBase)) return;
  85
  86     NewLeftEdge = window->LeftEdge;
  87     if (w->ZipLeftEdge != ~0)
  88     {
  89         NewLeftEdge    = w->ZipLeftEdge;
  90     #ifdef __MORPHOS__
  91         w->ZipLeftEdge = w->window.LeftEdge;
  92     #else
  93         w->ZipLeftEdge = w->window.RelLeftEdge;
  94     #endif
  95     }
  96
  97     NewTopEdge = window->TopEdge;
  98     if (w->ZipTopEdge != ~0)
  99     {
 100         NewTopEdge    = w->ZipTopEdge;
 101     #ifdef __MORPHOS__
 102         w->ZipTopEdge = w->window.TopEdge;
 103     #else
 104         w->ZipTopEdge = w->window.RelTopEdge;
 105 #   endif
 106     }
 107
 108     NewWidth = window->Width;
 109     if (w->ZipWidth != ~0)
 110     {
 111         NewWidth    = w->ZipWidth;
 112         if (window->Flags & WFLG_SIZEGADGET)
 113         {
 114             if (NewWidth < (ULONG)window->MinWidth) NewWidth = window->MinWidth;
 115             if (NewWidth > (ULONG)window->MaxWidth) NewWidth = window->MaxWidth;
 116         }
 117         w->ZipWidth = w->window.Width;
 118     }
 119
 120     NewHeight = window->Height;
 121     if (w->ZipHeight != ~0)
 122     {
 123         NewHeight    = w->ZipHeight;
 124         if (window->Flags & WFLG_SIZEGADGET)
 125         {
 126             if (NewHeight < (ULONG)window->MinHeight) NewHeight = window->MinHeight;
 127             if (NewHeight > (ULONG)window->MaxHeight) NewHeight = window->MaxHeight;
 128         }
 129         w->ZipHeight = w->window.Height;
 130     }
 131
 132     DoMoveSizeWindow(window, NewLeftEdge, NewTopEdge, NewWidth, NewHeight, TRUE, IntuitionBase);
 133
 134     if (window->Flags & WFLG_ZOOMED)
 135         AROS_ATOMIC_AND(window->Flags, ~WFLG_ZOOMED);
 136     else
 137         AROS_ATOMIC_OR(window->Flags, WFLG_ZOOMED);
 138 }