rom/intuition/setmenustrip.c

   1 /*
   2     Copyright © 1995-2013, 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 *****************************************************************************/
  57 {
  58     AROS_LIBFUNC_INIT
  59
  60     SANITY_CHECKR(window,FALSE)
  61
  62 #define HASSUBITEM 0x8000
  63
  64     ObtainSemaphore(&GetPrivIBase(IntuitionBase)->MenuLock);
  65
  66     /* If a menu is active for this task, we must wait until the
  67        user is done. We check the task rather than the window as
  68        semaphores is owned by tasks... */
  69     /* struct Task *me = FindTask(NULL); */
  70
  71     /* This must be before CalculateDims(). */
  72     Characterize(menu);
  73
  74     /* When entering here, this menustrip is NOT displayed as the user has
  75        removed it from the window using ClearMenuStrip() if it was ever
  76        attached to a window. */
  77     CalculateDims(window, menu);
  78
  79 #if 0 /* stegerg: ??? */
  80
  81     /*
  82     if(me == GPB(IntuiBase)->ib_ActiveMenuTask)
  83 {
  84     ObtainSemaphore(&GPB(IntuiBase)->ib_MenuWaitLock);
  85
  86     AddTail((struct Node *)me, &GPB(IntuiBase)->ib_MenuWaitList);
  87
  88     ReleaseSemaphore(&GPB(IntuiBase)->ib_MenuWaitLock);
  89
  90     Wait(SIGF_INTUITION);
  91 }
  92     */
  93 #endif
  94
  95     window->MenuStrip = menu;
  96
  97 #if 0 /* stegerg: ??? */
  98     /* Note that we have to do a similar test in the input handler
  99        as well. */
 100
 101     /* If we were just one of the tasks in the list... */
 102
 103     /*    if(me != GPB(IntuitionBase)->ib_ActiveMenuTask)
 104 {
 105     struct Task *sleeper;
 106
 107     ObtainSemaphore(&GPB(IntuitionBase)->ib_MenuWaitLock);
 108     sleeper = RemHead(&GPB(IntuitionBase)->ib_MenuWaitList);
 109     ReleaseSemaphore(&GPB(IntuitionBase)->ib_MenuWaitLock);
 110
 111     if(sleeper)
 112      Signal(sleeper, SIGF_INTUITION);
 113 }
 114     */
 115 #endif
 116
 117     ReleaseSemaphore(&GetPrivIBase(IntuitionBase)->MenuLock);
 118
 119     return TRUE;
 120
 121     AROS_LIBFUNC_EXIT
 122 } /* SetMenuStrip */
 123
 124 void CalculateDims(struct Window *win, struct Menu *menu)
 125 {
 126     struct MenuItem *item;
 127
 128     while(menu != NULL)
 129     {
 130         item = menu->FirstItem;
 131
 132         GetMenuBox(win, item, &menu->JazzX, &menu->JazzY, &menu->BeatX, &menu->BeatY);
 133
 134         menu = menu->NextMenu;
 135     }
 136 }
 137
 138 /* Mark items that has subitems. This is necessary for the input handler
 139    code. It's not possible to check item->SubItem within it as we save
 140    the layer coordinates there. */
 141 void Characterize(struct Menu *menu)
 142 {
 143     while(menu != NULL)
 144     {
 145         struct MenuItem *item;
 146
 147         item = menu->FirstItem;
 148
 149         while(item != NULL)
 150         {
 151             if(item->SubItem != NULL)
 152                 item->Flags |= HASSUBITEM;
 153
 154             item = item->NextItem;
 155         }
 156
 157         menu = menu->NextMenu;
 158     }
 159 }