rom/intuition/setmenustrip.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$
   5 */
   6
   7 #include "intuition_intern.h"
   8 #include "menus.h"
   9
  10 void CalculateDims(struct Window *win, struct Menu *menu);
  11 void Characterize(struct Menu *menu);
  12
  13 /*****************************************************************************
  14
  15     NAME */
  16 #include <proto/intuition.h>
  17 #include <proto/exec.h>
  18 #include <intuition/intuition.h>
  19
  20 AROS_LH2(BOOL, SetMenuStrip,
  21
  22          /*  SYNOPSIS */
  23          AROS_LHA(struct Window *, window, A0),
  24          AROS_LHA(struct Menu   *, menu  , A1),
  25
  26          /*  LOCATION */
  27          struct IntuitionBase *, IntuitionBase, 44, Intuition)
  28
  29 /*  FUNCTION
  30     This function adds a MenuStrip to the Window, which can be invoked
  31     by the user after this call by pressing the right mouse button.
  32     Menus with no MenuItems will not be attached.
  33
  34     INPUTS
  35     window - The window to add the MenuStrip to
  36     menu   - The menu to be added to the window above.
  37
  38     RESULT
  39     TRUE if all menus have at least one menuitem.
  40
  41     NOTES
  42     This function calculates internal values and is therfore the
  43     official way to add a new MenuStrip to Window.
  44     Always do a ClearMenuStrip() before closing the Window or adding
  45     another MenuStrip to the Window.
  46
  47     EXAMPLE
  48
  49     BUGS
  50
  51     SEE ALSO
  52     ResetMenuStrip(), ClearMenuStrip()
  53
  54     INTERNALS
  55
  56     HISTORY
  57     11.06.99  SDuvan  implemented function
  58
  59 *****************************************************************************/
  60 {
  61     AROS_LIBFUNC_INIT
  62     AROS_LIBBASE_EXT_DECL(struct IntuitionBase *,IntuitionBase)
  63
  64     SANITY_CHECKR(window,FALSE)
  65
  66 #define HASSUBITEM 0x8000
  67
  68     ObtainSemaphore(&GetPrivIBase(IntuitionBase)->MenuLock);
  69
  70     /* If a menu is active for this task, we must wait until the
  71        user is done. We check the task rather than the window as
  72        semaphores is owned by tasks... */
  73     /* struct Task *me = FindTask(NULL); */
  74
  75     /* This must be before CalculateDims(). */
  76     Characterize(menu);
  77
  78     /* When entering here, this menustrip is NOT displayed as the user has
  79        removed it from the window using ClearMenuStrip() if it was ever
  80        attached to a window. */
  81     CalculateDims(window, menu);
  82
  83 #if 0 /* stegerg: ??? */
  84
  85     /*
  86     if(me == GPB(IntuiBase)->ib_ActiveMenuTask)
  87 {
  88     ObtainSemaphore(&GPB(IntuiBase)->ib_MenuWaitLock);
  89
  90     AddTail((struct Node *)me, &GPB(IntuiBase)->ib_MenuWaitList);
  91
  92     ReleaseSemaphore(&GPB(IntuiBase)->ib_MenuWaitLock);
  93
  94     Wait(SIGF_INTUITION);
  95 }
  96     */
  97 #endif
  98
  99     window->MenuStrip = menu;
 100
 101 #if 0 /* stegerg: ??? */
 102     /* Note that we have to do a similar test in the input handler
 103        as well. */
 104
 105     /* If we were just one of the tasks in the list... */
 106
 107     /*    if(me != GPB(IntuitionBase)->ib_ActiveMenuTask)
 108 {
 109     struct Task *sleeper;
 110
 111     ObtainSemaphore(&GPB(IntuitionBase)->ib_MenuWaitLock);
 112     sleeper = RemHead(&GPB(IntuitionBase)->ib_MenuWaitList);
 113     ReleaseSemaphore(&GPB(IntuitionBase)->ib_MenuWaitLock);
 114
 115     if(sleeper)
 116      Signal(sleeper, SIGF_INTUITION);
 117 }
 118     */
 119 #endif
 120
 121     ReleaseSemaphore(&GetPrivIBase(IntuitionBase)->MenuLock);
 122
 123     return TRUE;
 124
 125     AROS_LIBFUNC_EXIT
 126 } /* SetMenuStrip */
 127
 128 void CalculateDims(struct Window *win, struct Menu *menu)
 129 {
 130     struct MenuItem *item;
 131
 132     while(menu != NULL)
 133     {
 134         item = menu->FirstItem;
 135
 136         GetMenuBox(win, item, &menu->JazzX, &menu->JazzY, &menu->BeatX, &menu->BeatY);
 137
 138         menu = menu->NextMenu;
 139     }
 140 }
 141
 142 /* Mark items that has subitems. This is necessary for the input handler
 143    code. It's not possible to check item->SubItem within it as we save
 144    the layer coordinates there. */
 145 void Characterize(struct Menu *menu)
 146 {
 147     while(menu != NULL)
 148     {
 149         struct MenuItem *item;
 150
 151         item = menu->FirstItem;
 152
 153         while(item != NULL)
 154         {
 155             if(item->SubItem != NULL)
 156                 item->Flags |= HASSUBITEM;
 157
 158             item = item->NextItem;
 159         }
 160
 161         menu = menu->NextMenu;
 162     }
 163 }