rom/intuition/zipwindow.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 "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     HISTORY
  58
  59 *****************************************************************************/
  60 {
  61     AROS_LIBFUNC_INIT
  62
  63     struct ZipWindowActionMsg msg;
  64
  65     DEBUG_ZIPWINDOW(dprintf("ZipWindow(Window 0x%lx)\n",window));
  66
  67     SANITY_CHECK(window)
  68
  69     msg.window = window;
  70
  71     DoASyncAction((APTR)int_zipwindow, &msg.msg, sizeof(msg), IntuitionBase);
  72 //    DoSyncAction((APTR)int_zipwindow, &msg.msg, IntuitionBase);
  73
  74     AROS_LIBFUNC_EXIT
  75
  76 } /* ZipWindow */
  77
  78
  79 static VOID int_zipwindow(struct ZipWindowActionMsg *msg,
  80                           struct IntuitionBase *IntuitionBase)
  81 {
  82     struct Window       *window = msg->window;
  83     struct IntWindow    *w = (struct IntWindow *)window;
  84     LONG                 NewLeftEdge, NewTopEdge, NewWidth, NewHeight;
  85
  86     if (!ResourceExisting(window, RESOURCE_WINDOW, IntuitionBase)) return;
  87
  88     NewLeftEdge = window->LeftEdge;
  89     if (w->ZipLeftEdge != ~0)
  90     {
  91         NewLeftEdge    = w->ZipLeftEdge;
  92     #ifdef __MORPHOS__
  93         w->ZipLeftEdge = w->window.LeftEdge;
  94     #else
  95         w->ZipLeftEdge = w->window.RelLeftEdge;
  96     #endif
  97     }
  98
  99     NewTopEdge = window->TopEdge;
 100     if (w->ZipTopEdge != ~0)
 101     {
 102         NewTopEdge    = w->ZipTopEdge;
 103     #ifdef __MORPHOS__
 104         w->ZipTopEdge = w->window.TopEdge;
 105     #else
 106         w->ZipTopEdge = w->window.RelTopEdge;
 107 #   endif
 108     }
 109
 110     NewWidth = window->Width;
 111     if (w->ZipWidth != ~0)
 112     {
 113         NewWidth    = w->ZipWidth;
 114         if (window->Flags & WFLG_SIZEGADGET)
 115         {
 116             if (NewWidth < (ULONG)window->MinWidth) NewWidth = window->MinWidth;
 117             if (NewWidth > (ULONG)window->MaxWidth) NewWidth = window->MaxWidth;
 118         }
 119         w->ZipWidth = w->window.Width;
 120     }
 121
 122     NewHeight = window->Height;
 123     if (w->ZipHeight != ~0)
 124     {
 125         NewHeight    = w->ZipHeight;
 126         if (window->Flags & WFLG_SIZEGADGET)
 127         {
 128             if (NewHeight < (ULONG)window->MinHeight) NewHeight = window->MinHeight;
 129             if (NewHeight > (ULONG)window->MaxHeight) NewHeight = window->MaxHeight;
 130         }
 131         w->ZipHeight = w->window.Height;
 132     }
 133
 134     DoMoveSizeWindow(window, NewLeftEdge, NewTopEdge, NewWidth, NewHeight, TRUE, IntuitionBase);
 135
 136     if (window->Flags & WFLG_ZOOMED)
 137         AROS_ATOMIC_AND(window->Flags, ~WFLG_ZOOMED);
 138     else
 139         AROS_ATOMIC_OR(window->Flags, WFLG_ZOOMED);
 140 }