rom/intuition/changedecorationa.c

   1 /*
   2     Copyright © 1995-2003, The AROS Development Team. All rights reserved.
   3     Copyright © 2001-2003, The MorphOS Development Team. All Rights Reserved.
   4     $Id: sendintuimessage.c 23476 2005-07-31 17:07:04Z stegerg $
   5 */
   6
   7 #include <proto/utility.h>
   8 #include <intuition/windecorclass.h>
   9 #include <intuition/scrdecorclass.h>
  10 #include <intuition/screens.h>
  11
  12 #include "intuition_intern.h"
  13 #include "inputhandler_actions.h"
  14
  15 struct ChangeDecorationActionMsg
  16 {
  17     struct IntuiActionMsg    msg;
  18     ULONG                    which;
  19     Object                  **decorobjptr;
  20     struct SignalSemaphore  *decorsem;
  21     struct DrawInfo         *dri;
  22 };
  23
  24 static VOID int_changedecoration(struct ChangeDecorationActionMsg *msg,
  25                                  struct IntuitionBase *IntuitionBase);
  26
  27 /*****************************************************************************
  28
  29     NAME */
  30 #include <proto/intuition.h>
  31
  32 AROS_LH4(Object *, ChangeDecorationA,
  33
  34          /*  SYNOPSIS */
  35          AROS_LHA(ULONG, which, D0),
  36          AROS_LHA(CONST_STRPTR, classID, A1),
  37          AROS_LHA(struct DrawInfo *, dri, A0),
  38          AROS_LHA(struct TagItem *, tagList, A2),
  39
  40          /*  LOCATION */
  41          struct IntuitionBase *, IntuitionBase, 153, Intuition)
  42
  43 /*  FUNCTION
  44
  45     INPUTS
  46
  47     RESULT
  48
  49     NOTES
  50
  51     EXAMPLE
  52
  53     BUGS
  54
  55     SEE ALSO
  56
  57     INTERNALS
  58
  59 *****************************************************************************/
  60 {
  61     AROS_LIBFUNC_INIT
  62     AROS_LIBBASE_EXT_DECL(struct IntuitionBase *,IntuitionBase)
  63
  64     Object          *old = 0, *new;
  65     struct TagItem  decor_tags[] =
  66     {
  67         {TAG_IGNORE , (IPTR)dri                                     },
  68         {TAG_IGNORE , (IPTR)((struct IntDrawInfo *)dri)->dri_Screen },
  69         {TAG_DONE                                                   }
  70     };
  71     struct ChangeDecorationActionMsg msg;
  72
  73     ASSERT_VALID_PTR(dri);
  74
  75     switch(which)
  76     {
  77         case DECORATION_WINDOW:
  78             decor_tags[0].ti_Tag = WDA_DrawInfo;
  79             decor_tags[1].ti_Tag = WDA_Screen;
  80             msg.decorobjptr = &((struct IntDrawInfo *)dri)->dri_WinDecorObj;
  81             msg.decorsem = &((struct IntDrawInfo *)dri)->dri_WinDecorSem;
  82             break;
  83
  84         case DECORATION_SCREEN:
  85             decor_tags[0].ti_Tag = SDA_DrawInfo;
  86             decor_tags[1].ti_Tag = SDA_Screen;
  87             msg.decorobjptr = &((struct IntDrawInfo *)dri)->dri_ScrDecorObj;
  88             msg.decorsem = &((struct IntDrawInfo *)dri)->dri_ScrDecorSem;
  89             break;
  90
  91         default:
  92             return 0;
  93     }
  94
  95     new = NewObjectA(NULL, (UBYTE *)classID, decor_tags);
  96     if (new)
  97     {
  98         ObtainSemaphore(msg.decorsem);
  99         old = *msg.decorobjptr;
 100         *msg.decorobjptr = new;
 101         ReleaseSemaphore(msg.decorsem);
 102     }
 103
 104     msg.dri = dri;
 105     msg.which = which;
 106     DoASyncAction((APTR)int_changedecoration, &msg.msg, sizeof(msg), IntuitionBase);
 107
 108     return old;
 109
 110     AROS_LIBFUNC_EXIT
 111 }
 112
 113 static VOID int_changedecoration(struct ChangeDecorationActionMsg *msg,
 114                                  struct IntuitionBase *IntuitionBase)
 115 {
 116     struct Screen *scr = ((struct IntDrawInfo *)msg->dri)->dri_Screen;
 117     struct Window *win;
 118
 119     if (!ResourceExisting(scr, RESOURCE_SCREEN, IntuitionBase)) return;
 120
 121     switch(msg->which)
 122     {
 123         case DECORATION_WINDOW:
 124             for(win = scr->FirstWindow; win; win = win->NextWindow)
 125             {
 126                 LOCKGADGET
 127
 128                 if (win->FirstGadget)
 129                 {
 130                     struct wdpLayoutBorderGadgets layoutmsg;
 131
 132                     layoutmsg.MethodID    = WDM_LAYOUT_BORDERGADGETS;
 133                     layoutmsg.wdp_Window  = win;
 134                     layoutmsg.wdp_Gadgets = win->FirstGadget;
 135                     layoutmsg.wdp_Flags   = WDF_LBG_MULTIPLE |
 136                                             WDF_LBG_INGADLIST;
 137
 138                     LOCKSHARED_WINDECOR(msg->dri);
 139                     DoMethodA(((struct IntDrawInfo *)msg->dri)->dri_WinDecorObj, (Msg)&layoutmsg);
 140                     UNLOCK_WINDECOR(msg->dri);
 141                 }
 142
 143                 UNLOCKGADGET
 144
 145                 RefreshWindowFrame(win);
 146
 147             } /* for(win = scr->FirstWindow; win; win = win->NextWindow) */
 148             break;
 149
 150         case DECORATION_SCREEN:
 151             RenderScreenBar(scr, FALSE, IntuitionBase);
 152             break;
 153
 154     } /* switch(msg->which) */
 155 }
 156