rom/intuition/windowlimits.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     Set the minimum and maximum size of a window.
   7 */
   8
   9 #include "intuition_intern.h"
  10
  11 /*****************************************************************************
  12
  13     NAME */
  14 #include <exec/types.h>
  15 #include <intuition/intuition.h>
  16 #include <proto/intuition.h>
  17
  18     AROS_LH5(BOOL, WindowLimits,
  19
  20 /*  SYNOPSIS */
  21          AROS_LHA(struct Window *, window, A0),
  22          AROS_LHA(WORD,            MinWidth, D0),
  23          AROS_LHA(WORD,            MinHeight, D1),
  24          AROS_LHA(UWORD,           MaxWidth, D2),
  25          AROS_LHA(UWORD,           MaxHeight, D3),
  26
  27 /*  LOCATION */
  28          struct IntuitionBase *, IntuitionBase, 53, Intuition)
  29
  30 /*  FUNCTION
  31     This functions sets the minimum and maximum sizes of a window.
  32
  33     INPUTS
  34     Window - window to change
  35     MinWidth, MinHeight - the minimum size, may be 0 for no change
  36     MaxWidth, MaxHeight - the maximum size, may be 0 for no change,
  37         may be -1 for no maximum size
  38
  39     RESULT
  40     A boolean. FALSE is returned if any of the provided sizes is out
  41     of range. Note that the other sizes take effect, though. TRUE if
  42     all sizes could be set.
  43
  44     NOTES
  45
  46     EXAMPLE
  47
  48     BUGS
  49
  50     SEE ALSO
  51     OpenWindow()
  52
  53     INTERNALS
  54
  55     HISTORY
  56
  57 *****************************************************************************/
  58 {
  59     AROS_LIBFUNC_INIT
  60
  61     BOOL retval = TRUE;
  62
  63     DEBUG_WINDOWLIMITS(dprintf("WindowLimits(Window 0x%lx MinWidth %ld MinHeight %ld MaxWidth %ld MaxHeight %ld)\n",window,MinWidth,MinHeight,MaxWidth,MaxHeight));
  64
  65     IntuitionBase = IntuitionBase;  /* shut up the compiler */
  66
  67     SANITY_CHECKR(window,FALSE)
  68
  69     /* convert -1 to screen width/height */
  70     if ((WORD)MaxWidth == -1) MaxWidth = window->WScreen->Width;
  71     if ((WORD)MaxHeight == -1) MaxHeight = window->WScreen->Height;
  72
  73     /* crop maxwidth/height to screen width/height */
  74     if (MaxWidth > window->WScreen->Width) MaxWidth = window->WScreen->Width;
  75     if (MaxHeight > window->WScreen->Height) MaxHeight = window->WScreen->Height;
  76
  77     if (MinWidth)
  78     {
  79         if(window->Width >= MinWidth)
  80             window->MinWidth = MinWidth;
  81         else
  82             retval = FALSE;
  83     }
  84
  85     if (MinHeight)
  86     {
  87         if(window->Height >= MinHeight)
  88             window->MinHeight = MinHeight;
  89         else
  90             retval = FALSE;
  91     }
  92
  93     if (MaxWidth)
  94     {
  95         if(window->Width <= MaxWidth)
  96             window->MaxWidth = MaxWidth;
  97         else
  98             retval = FALSE;
  99     }
 100
 101     if (MaxHeight)
 102     {
 103         if(window->Height <= MaxHeight)
 104             window->MaxHeight = MaxHeight;
 105         else
 106             retval = FALSE;
 107     }
 108
 109     return retval;
 110
 111     AROS_LIBFUNC_EXIT
 112
 113 } /* WindowLimits */