workbench/libs/muimaster/mui_layout.c

   1 /*
   2     Copyright © 2002-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <intuition/classusr.h>
   7 #include <clib/alib_protos.h>
   8 #include <proto/intuition.h>
   9 #include <proto/muimaster.h>
  10
  11 #include "mui.h"
  12 #include "muimaster_intern.h"
  13
  14 //#define MYDEBUG 1
  15 #include "debug.h"
  16
  17 /*****************************************************************************
  18
  19     NAME */
  20         AROS_LH6(BOOL, MUI_Layout,
  21
  22 /*  SYNOPSIS */
  23         AROS_LHA(Object *, obj, A0),
  24         AROS_LHA(LONG, left, D0),
  25         AROS_LHA(LONG, top, D1),
  26         AROS_LHA(LONG, width, D2),
  27         AROS_LHA(LONG, height, D3),
  28         AROS_LHA(ULONG, flags, D4),
  29
  30 /*  LOCATION */
  31         struct Library *, MUIMasterBase, 21, MUIMaster)
  32
  33 /*  FUNCTION
  34
  35     INPUTS
  36
  37     RESULT
  38
  39     NOTES
  40
  41     EXAMPLE
  42
  43     BUGS
  44
  45     SEE ALSO
  46
  47     INTERNALS
  48
  49 *****************************************************************************/
  50 {
  51     AROS_LIBFUNC_INIT
  52
  53     static const struct MUIP_Layout method = { MUIM_Layout };
  54     Object *parent = _parent(obj);
  55
  56 /*
  57  * Called only by groups, never by windows
  58  */
  59 //    ASSERT(parent != NULL);
  60
  61     if (_flags(parent) & MADF_ISVIRTUALGROUP)
  62     {
  63         /* I'm not yet sure what to do by virtual groups in virtual groups,
  64          * eighter add their offsets too or not, will be tested soon */
  65         IPTR val = 0;
  66         get(parent,MUIA_Virtgroup_Left,&val);
  67         left -= val;
  68         get(parent,MUIA_Virtgroup_Top,&val);
  69         top -= val;
  70     }
  71
  72     _left(obj) = left + _mleft(parent);
  73     _top(obj) = top + _mtop(parent);
  74     _width(obj) = width;
  75     _height(obj) = height;
  76
  77     D(bug("muimaster.library/mui_layout.c: 0x%lx %ldx%ldx%ldx%ld\n",obj,_left(obj),_top(obj),_right(obj),_bottom(obj)));
  78
  79     DoMethodA(obj, (Msg)&method);
  80     return TRUE;
  81
  82     AROS_LIBFUNC_EXIT
  83
  84 } /* MUIA_Layout */