Fix the USER32 DLL initialization and cleanup routines to prevent memory/resource...
[reactos.git] / reactos / lib / user32 / windows / menu.c
index 83f0637..65d1749 100644 (file)
@@ -2,6 +2,11 @@
  *  ReactOS kernel
  *  Copyright (C) 1998, 1999, 2000, 2001 ReactOS Team
  *
+ *  Partly based on Wine code
+ *  Copyright 1993 Martin Ayotte
+ *  Copyright 1994 Alexandre Julliard
+ *  Copyright 1997 Morten Welinder
+ *
  *  This program is free software; you can redistribute it and/or modify
  *  it under the terms of the GNU General Public License as published by
  *  the Free Software Foundation; either version 2 of the License, or
@@ -16,7 +21,7 @@
  *  along with this program; if not, write to the Free Software
  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  */
-/* $Id: menu.c,v 1.40 2004/01/02 19:49:47 gvg Exp $
+/* $Id$
  *
  * PROJECT:         ReactOS user32.dll
  * FILE:            lib/user32/windows/menu.c
 
 /* INCLUDES ******************************************************************/
 
-#include <windows.h>
 #include <user32.h>
+#define NDEBUG
 #include <debug.h>
-#include <string.h>
-#include <draw.h>
-#include <window.h>
-#include <strpool.h>
 
-#include <user32/callback.h>
-#include "user32/regcontrol.h"
-#include "../controls/controls.h"
+/* internal popup menu window messages */
+#define MM_SETMENUHANDLE (WM_USER + 0)
+#define MM_GETMENUHANDLE (WM_USER + 1)
+
+/* Internal MenuTrackMenu() flags */
+#define TPM_INTERNAL           0xF0000000
+#define TPM_ENTERIDLEEX                0x80000000              /* set owner window for WM_ENTERIDLE */
+#define TPM_BUTTONDOWN         0x40000000              /* menu was clicked before tracking */
+#define TPM_POPUPMENU           0x20000000              /* menu is a popup menu */
 
 /* TYPES *********************************************************************/
 
-#define MENU_TYPE_MASK ((MF_STRING | MF_BITMAP | MF_OWNERDRAW | MF_SEPARATOR))
+#define MENU_TYPE_MASK (MF_STRING | MF_BITMAP | MF_OWNERDRAW | MF_SEPARATOR)
+
+#define MENU_ITEM_TYPE(flags) ((flags) & MENU_TYPE_MASK)
+#define IS_STRING_ITEM(flags) (MF_STRING == MENU_ITEM_TYPE(flags))
+#define IS_BITMAP_ITEM(flags) (MF_BITMAP == MENU_ITEM_TYPE(flags))
+
+#define IS_SYSTEM_MENU(MenuInfo)  \
+       (0 == ((MenuInfo)->Flags & MF_POPUP) && 0 != ((MenuInfo)->Flags & MF_SYSMENU))
+
+#define IS_SYSTEM_POPUP(MenuInfo) \
+       (0 != ((MenuInfo)->Flags & MF_POPUP) && 0 != ((MenuInfo)->Flags & MF_SYSMENU))
+
+#define IS_MAGIC_ITEM(Bmp)   ((int) Bmp <12)
 
-#define MENU_ITEM_TYPE(flags) \
-  ((flags) & (MF_STRING | MF_BITMAP | MF_OWNERDRAW | MF_SEPARATOR))
-  
 #define MENU_BAR_ITEMS_SPACE (12)
 #define SEPARATOR_HEIGHT (5)
 #define MENU_TAB_SPACE (8)
 
+#define ITEM_PREV              -1
+#define ITEM_NEXT               1
+
 #ifndef MF_END
 #define MF_END             (0x0080)
 #endif
 #define POPUPMENU_CLASS_ATOMA   MAKEINTATOMA(32768)  /* PopupMenu */
 #define POPUPMENU_CLASS_ATOMW   MAKEINTATOMW(32768)  /* PopupMenu */
 
+/* internal flags for menu tracking */
+
+#define TF_ENDMENU              0x0001
+#define TF_SUSPENDPOPUP         0x0002
+#define TF_SKIPREMOVE          0x0004
+
+typedef struct
+{
+  UINT  TrackFlags;
+  HMENU CurrentMenu; /* current submenu (can be equal to hTopMenu)*/
+  HMENU TopMenu;     /* initial menu */
+  HWND  OwnerWnd;    /* where notifications are sent */
+  POINT Pt;
+} MTRACKER;
+
 static LRESULT WINAPI PopupMenuWndProcW(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam);
 
 /*********************************************************************
@@ -72,19 +106,19 @@ static LRESULT WINAPI PopupMenuWndProcW(HWND hwnd, UINT message, WPARAM wParam,
 const struct builtin_class_descr POPUPMENU_builtin_class =
 {
     POPUPMENU_CLASS_ATOMW,                     /* name */
-    CS_GLOBALCLASS | CS_SAVEBITS | CS_DBLCLKS, /* style  */
+    CS_SAVEBITS | CS_DBLCLKS,                  /* style  */
     (WNDPROC) PopupMenuWndProcW,               /* FIXME - procW */
     (WNDPROC) NULL,                            /* FIXME - procA */
     sizeof(MENUINFO *),                        /* extra */
-    (LPCWSTR) IDC_ARROW,                        /* cursor */
-    (HBRUSH)(COLOR_MENU + 1)                    /* brush */
+    (LPCWSTR) IDC_ARROW,                       /* cursor */
+    (HBRUSH)(COLOR_MENU + 1)                   /* brush */
 };
 
 
 /* INTERNAL FUNCTIONS ********************************************************/
 
-/* Rip the fun and easy to use and fun WINE unicode string manipulation routines. 
- * Of course I didnt copy the ASM code because we want this to be portable 
+/* Rip the fun and easy to use and fun WINE unicode string manipulation routines.
+ * Of course I didnt copy the ASM code because we want this to be portable
  * and it needs to go away.
  */
 
@@ -98,373 +132,3316 @@ const struct builtin_class_descr POPUPMENU_builtin_class =
 HFONT hMenuFont = NULL;
 HFONT hMenuFontBold = NULL;
 
-static LRESULT WINAPI PopupMenuWndProcW(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
+/* Flag set by EndMenu() to force an exit from menu tracking */
+static BOOL fEndMenu = FALSE;
+
+/* Use global popup window because there's no way 2 menus can
+ * be tracked at the same time.  */
+static HWND TopPopup;
+
+/* Dimension of the menu bitmaps */
+static WORD ArrowBitmapWidth = 0, ArrowBitmapHeight = 0;
+
+static HBITMAP StdMnArrow = NULL;
+static HBITMAP BmpSysMenu = NULL;
+
+/***********************************************************************
+ *           MenuGetRosMenuInfo
+ *
+ * Get full information about menu
+ */
+static BOOL FASTCALL
+MenuGetRosMenuInfo(PROSMENUINFO MenuInfo, HMENU Menu)
+{
+  MenuInfo->cbSize = sizeof(ROSMENUINFO);
+  MenuInfo->fMask = MIM_BACKGROUND | MIM_HELPID | MIM_MAXHEIGHT | MIM_MENUDATA | MIM_STYLE;
+
+  return NtUserMenuInfo(Menu, MenuInfo, FALSE);
+}
+
+/***********************************************************************
+ *           MenuSetRosMenuInfo
+ *
+ * Set full information about menu
+ */
+static BOOL FASTCALL
+MenuSetRosMenuInfo(PROSMENUINFO MenuInfo)
+{
+  MenuInfo->cbSize = sizeof(ROSMENUINFO);
+  MenuInfo->fMask = MIM_BACKGROUND | MIM_HELPID | MIM_MAXHEIGHT | MIM_MENUDATA | MIM_STYLE;
+
+  return NtUserMenuInfo(MenuInfo->Self, MenuInfo, TRUE);
+}
+
+/***********************************************************************
+ *           MenuInitRosMenuItemInfo
+ *
+ * Initialize a buffer for use with MenuGet/SetRosMenuItemInfo
+ */
+static VOID FASTCALL
+MenuInitRosMenuItemInfo(PROSMENUITEMINFO ItemInfo)
+{
+  ZeroMemory(ItemInfo, sizeof(ROSMENUITEMINFO));
+  ItemInfo->cbSize = sizeof(ROSMENUITEMINFO);
+}
+
+/***********************************************************************
+ *           MenuGetRosMenuItemInfo
+ *
+ * Get full information about a menu item
+ */
+static BOOL FASTCALL
+MenuGetRosMenuItemInfo(HMENU Menu, UINT Index, PROSMENUITEMINFO ItemInfo)
+{
+  if (ItemInfo->dwTypeData != NULL)
+    {
+      HeapFree(GetProcessHeap(), 0, ItemInfo->dwTypeData);
+    }
+
+  ItemInfo->fMask = MIIM_BITMAP | MIIM_CHECKMARKS | MIIM_DATA | MIIM_FTYPE
+                    | MIIM_ID | MIIM_STATE | MIIM_STRING | MIIM_SUBMENU | MIIM_TYPE;
+  ItemInfo->dwTypeData = NULL;
+
+  if (! NtUserMenuItemInfo(Menu, Index, TRUE, ItemInfo, FALSE))
+    {
+      ItemInfo->fType = 0;
+      return FALSE;
+    }
+
+  if (MENU_ITEM_TYPE(ItemInfo->fType) == MF_STRING)
+    {
+      ItemInfo->cch++;
+      ItemInfo->dwTypeData = HeapAlloc(GetProcessHeap(), 0,
+                                       ItemInfo->cch * sizeof(WCHAR));
+      if (NULL == ItemInfo->dwTypeData)
+        {
+          return FALSE;
+        }
+
+      if (! NtUserMenuItemInfo(Menu, Index, TRUE, ItemInfo, FALSE))
+        {
+          ItemInfo->fType = 0;
+          return FALSE;
+        }
+    }
+
+  return TRUE;
+}
+
+/***********************************************************************
+ *           MenuSetRosMenuItemInfo
+ *
+ * Set full information about a menu item
+ */
+static BOOL FASTCALL
+MenuSetRosMenuItemInfo(HMENU Menu, UINT Index, PROSMENUITEMINFO ItemInfo)
 {
-  switch(message)
+  BOOL Ret;
+
+  if (MENU_ITEM_TYPE(ItemInfo->fType) == MF_STRING &&
+      ItemInfo->dwTypeData != NULL)
   {
-    default:
-      return DefWindowProcW(hwnd, message, wParam, lParam);
+    ItemInfo->cch = wcslen(ItemInfo->dwTypeData);
   }
-  return 0;
+  ItemInfo->fMask = MIIM_BITMAP | MIIM_CHECKMARKS | MIIM_DATA | MIIM_FTYPE
+                    | MIIM_ID | MIIM_STATE | MIIM_STRING | MIIM_SUBMENU | MIIM_TYPE;
+
+
+  Ret = NtUserMenuItemInfo(Menu, Index, TRUE, ItemInfo, TRUE);
+
+  return Ret;
 }
 
-/**********************************************************************
- *         MENUEX_ParseResource
+/***********************************************************************
+ *           MenuCleanupRosMenuItemInfo
  *
- * Parse an extended menu resource and add items to the menu.
- * Return a pointer to the end of the resource.
+ * Cleanup after use of MenuGet/SetRosMenuItemInfo
+ */
+static VOID FASTCALL
+MenuCleanupRosMenuItemInfo(PROSMENUITEMINFO ItemInfo)
+{
+  if (ItemInfo->dwTypeData != NULL)
+    {
+      HeapFree(GetProcessHeap(), 0, ItemInfo->dwTypeData);
+    }
+}
+
+/***********************************************************************
+ *           MenuGetAllRosMenuItemInfo
  *
- * FIXME - should we be passing an LPCSTR to a predominantly UNICODE function?
+ * Get full information about all menu items
  */
-static LPCSTR MENUEX_ParseResource( LPCSTR res, HMENU hMenu)
+static INT FASTCALL
+MenuGetAllRosMenuItemInfo(HMENU Menu, PROSMENUITEMINFO *ItemInfo)
 {
-  WORD resinfo;
-  
-  do
+  DWORD BufSize;
+
+  BufSize = NtUserBuildMenuItemList(Menu, (VOID *) 1, 0, 0);
+  if (BufSize <= 0)
     {
-      MENUITEMINFOW mii;
+      return -1;
+    }
+  *ItemInfo = HeapAlloc(GetProcessHeap(), 0, BufSize);
+  if (NULL == *ItemInfo)
+    {
+      return -1;
+    }
 
-      mii.cbSize = sizeof(mii);
-      mii.fMask = MIIM_STATE | MIIM_ID | MIIM_TYPE;
-      mii.fType = GET_DWORD(res);
-      res += sizeof(DWORD);
-      mii.fState = GET_DWORD(res);
-      res += sizeof(DWORD);
-      mii.wID = GET_DWORD(res);
-      res += sizeof(DWORD);
-      resinfo = GET_WORD(res);
-      res += sizeof(WORD);
-      /* Align the text on a word boundary.  */
-      res += (~((int)res - 1)) & 1;
-      mii.dwTypeData = (LPWSTR) res;
-      res += (1 + wcslen(mii.dwTypeData)) * sizeof(WCHAR);
-      /* Align the following fields on a dword boundary.  */
-      res += (~((int)res - 1)) & 3;
+  return NtUserBuildMenuItemList(Menu, *ItemInfo, BufSize, 0);
+}
 
-      if (resinfo & 1) /* Pop-up? */
-       {
-         /* DWORD helpid = GET_DWORD(res); FIXME: use this.  */
-         res += sizeof(DWORD);
-         mii.hSubMenu = CreatePopupMenu();
-         if (!mii.hSubMenu)
-             return NULL;
-         if (!(res = MENUEX_ParseResource(res, mii.hSubMenu)))
-         {
-             DestroyMenu(mii.hSubMenu);
-             return NULL;
-         }
-         mii.fMask |= MIIM_SUBMENU;
-         mii.fType |= MF_POPUP;
-       }
-      else if(!*mii.dwTypeData && !(mii.fType & MF_SEPARATOR))
-       {
-         DbgPrint("WARN: Converting NULL menu item %04x, type %04x to SEPARATOR\n",
-             mii.wID, mii.fType);
-         mii.fType |= MF_SEPARATOR;
-       }
-    InsertMenuItemW(hMenu, -1, MF_BYPOSITION, &mii);
-  }
-  while (!(resinfo & MF_END));
-  return res;
+/***********************************************************************
+ *           MenuCleanupAllRosMenuItemInfo
+ *
+ * Cleanup after use of MenuGetAllRosMenuItemInfo
+ */
+static VOID FASTCALL
+MenuCleanupAllRosMenuItemInfo(PROSMENUITEMINFO ItemInfo)
+{
+  HeapFree(GetProcessHeap(), 0, ItemInfo);
 }
 
 
-/**********************************************************************
- *         MENU_ParseResource
+/***********************************************************************
+ *           MenuLoadBitmaps
  *
- * Parse a standard menu resource and add items to the menu.
- * Return a pointer to the end of the resource.
+ * Load the arrow bitmap. We can't do this from MenuInit since user32
+ * can also be used (and thus initialized) from text-mode.
+ */
+static void FASTCALL
+MenuLoadBitmaps(VOID)
+{
+  /* Load menu bitmaps */
+  if (NULL == StdMnArrow)
+    {
+      StdMnArrow = LoadBitmapW(0, MAKEINTRESOURCEW(OBM_MNARROW));
+
+      if (NULL != StdMnArrow)
+        {
+          BITMAP bm;
+          GetObjectW(StdMnArrow, sizeof(BITMAP), &bm);
+          ArrowBitmapWidth = bm.bmWidth;
+          ArrowBitmapHeight = bm.bmHeight;
+        }
+    }
+
+  /* Load system buttons bitmaps */
+  if (NULL == BmpSysMenu)
+    {
+      BmpSysMenu = LoadBitmapW(0, MAKEINTRESOURCEW(OBM_CLOSE));
+    }
+}
+
+/***********************************************************************
+ *           MenuGetBitmapItemSize
  *
- * NOTE: flags is equivalent to the mtOption field
+ * Get the size of a bitmap item.
  */
-static LPCSTR MENU_ParseResource( LPCSTR res, HMENU hMenu, BOOL unicode )
+static void FASTCALL
+MenuGetBitmapItemSize(UINT Id, DWORD Data, SIZE *Size)
 {
-  WORD flags, id = 0;
-  HMENU hSubMenu;
-  LPCSTR str;
-  BOOL end = FALSE;
+  BITMAP Bm;
+  HBITMAP Bmp = (HBITMAP) Id;
 
-  do
-  {
-    flags = GET_WORD(res);
+  Size->cx = Size->cy = 0;
 
-    /* remove MF_END flag before passing it to AppendMenu()! */
-    end = (flags & MF_END);
-    if(end) flags ^= MF_END;
+  /* check if there is a magic menu item associated with this item */
+  if (0 != Id && IS_MAGIC_ITEM(Id))
+    {
+      switch((INT_PTR) LOWORD(Id))
+        {
+          case (INT_PTR) HBMMENU_SYSTEM:
+            if (0 != Data)
+              {
+                Bmp = (HBITMAP) Data;
+                break;
+              }
+            /* fall through */
+          case (INT_PTR) HBMMENU_MBAR_RESTORE:
+          case (INT_PTR) HBMMENU_MBAR_MINIMIZE:
+          case (INT_PTR) HBMMENU_MBAR_MINIMIZE_D:
+          case (INT_PTR) HBMMENU_MBAR_CLOSE:
+          case (INT_PTR) HBMMENU_MBAR_CLOSE_D:
+            /* FIXME: Why we need to subtract these magic values? */
+            Size->cx = GetSystemMetrics(SM_CXSIZE) - 2;
+            Size->cy = GetSystemMetrics(SM_CYSIZE) - 4;
+            return;
+          case (INT_PTR) HBMMENU_CALLBACK:
+          case (INT_PTR) HBMMENU_POPUP_CLOSE:
+          case (INT_PTR) HBMMENU_POPUP_RESTORE:
+          case (INT_PTR) HBMMENU_POPUP_MAXIMIZE:
+          case (INT_PTR) HBMMENU_POPUP_MINIMIZE:
+          default:
+            DPRINT("Magic menu bitmap not implemented\n");
+            return;
+        }
+    }
 
-    res += sizeof(WORD);
-    if(!(flags & MF_POPUP))
+  if (GetObjectW(Bmp, sizeof(BITMAP), &Bm))
     {
-      id = GET_WORD(res);
-      res += sizeof(WORD);
+      Size->cx = Bm.bmWidth;
+      Size->cy = Bm.bmHeight;
     }
-    str = res;
-    if(!unicode)
-      res += strlen(str) + 1;
-    else
-      res += (wcslen((LPCWSTR)str) + 1) * sizeof(WCHAR);
-    if (flags & MF_POPUP)
+}
+
+/***********************************************************************
+ *           MenuDrawBitmapItem
+ *
+ * Draw a bitmap item.
+ */
+static void FASTCALL
+MenuDrawBitmapItem(HDC Dc, PROSMENUITEMINFO Item, const RECT *Rect, BOOL MenuBar)
+{
+  BITMAP Bm;
+  DWORD Rop;
+  HDC DcMem;
+  HBITMAP Bmp = (HBITMAP) Item->hbmpItem;
+  int w = Rect->right - Rect->left;
+  int h = Rect->bottom - Rect->top;
+  int BmpXoffset = 0;
+  int Left, Top;
+
+  /* Check if there is a magic menu item associated with this item */
+  if (IS_MAGIC_ITEM(Item->hbmpItem))
     {
-      hSubMenu = CreatePopupMenu();
-      if(!hSubMenu) return NULL;
-      if(!(res = MENU_ParseResource(res, hSubMenu, unicode)))
-        return NULL;
-      if(!unicode)
-        AppendMenuA(hMenu, flags, (UINT)hSubMenu, str);
+      UINT Flags = 0;
+      RECT r;
+
+      r = *Rect;
+      switch ((int) Item->hbmpItem)
+        {
+          case (INT_PTR) HBMMENU_SYSTEM:
+            if (NULL != Item->hbmpItem)
+              {
+                Bmp = Item->hbmpItem;
+                if (! GetObjectW(Bmp, sizeof(BITMAP), &Bm))
+                  {
+                    return;
+                  }
+              }
+            else
+              {
+                Bmp = BmpSysMenu;
+                if (! GetObjectW(Bmp, sizeof(BITMAP), &Bm))
+                  {
+                    return;
+                  }
+                /* only use right half of the bitmap */
+                BmpXoffset = Bm.bmWidth / 2;
+                Bm.bmWidth -= BmpXoffset;
+              }
+            goto got_bitmap;
+          case (INT_PTR) HBMMENU_MBAR_RESTORE:
+            Flags = DFCS_CAPTIONRESTORE;
+            break;
+          case (INT_PTR) HBMMENU_MBAR_MINIMIZE:
+            r.right += 1;
+            Flags = DFCS_CAPTIONMIN;
+            break;
+          case (INT_PTR) HBMMENU_MBAR_MINIMIZE_D:
+            r.right += 1;
+            Flags = DFCS_CAPTIONMIN | DFCS_INACTIVE;
+            break;
+          case (INT_PTR) HBMMENU_MBAR_CLOSE:
+            Flags = DFCS_CAPTIONCLOSE;
+            break;
+          case (INT_PTR) HBMMENU_MBAR_CLOSE_D:
+            Flags = DFCS_CAPTIONCLOSE | DFCS_INACTIVE;
+            break;
+          case (INT_PTR) HBMMENU_CALLBACK:
+          case (INT_PTR) HBMMENU_POPUP_CLOSE:
+          case (INT_PTR) HBMMENU_POPUP_RESTORE:
+          case (INT_PTR) HBMMENU_POPUP_MAXIMIZE:
+          case (INT_PTR) HBMMENU_POPUP_MINIMIZE:
+          default:
+            DPRINT("Magic menu bitmap not implemented\n");
+            return;
+        }
+      InflateRect(&r, -1, -1);
+      if (0 != (Item->fState & MF_HILITE))
+        {
+          Flags |= DFCS_PUSHED;
+        }
+      DrawFrameControl(Dc, &r, DFC_CAPTION, Flags);
+      return;
+    }
+
+  if (NULL == Bmp || ! GetObjectW(Bmp, sizeof(BITMAP), &Bm))
+    {
+      return;
+    }
+
+got_bitmap:
+  DcMem = CreateCompatibleDC(Dc);
+  SelectObject(DcMem, Bmp);
+
+  /* handle fontsize > bitmap_height */
+  Top = (Bm.bmHeight < h) ? Rect->top + (h - Bm.bmHeight) / 2 : Rect->top;
+  Left = Rect->left;
+  Rop = (0 != (Item->fState & MF_HILITE) && ! IS_MAGIC_ITEM(Item->hbmpItem)) ? NOTSRCCOPY : SRCCOPY;
+  if (0 != (Item->fState & MF_HILITE) && IS_BITMAP_ITEM(Item->fType))
+    {
+      SetBkColor(Dc, GetSysColor(COLOR_HIGHLIGHT));
+    }
+  BitBlt(Dc, Left, Top, w, h, DcMem, BmpXoffset, 0, Rop);
+  DeleteDC(DcMem);
+}
+
+/***********************************************************************
+ *           MenuDrawMenuItem
+ *
+ * Draw a single menu item.
+ */
+static void FASTCALL
+MenuDrawMenuItem(HWND Wnd, PROSMENUINFO MenuInfo, HWND WndOwner, HDC Dc,
+                 PROSMENUITEMINFO Item, UINT Height, BOOL MenuBar, UINT Action)
+{
+  RECT Rect;
+  PWCHAR Text;
+
+  if (0 != (Item->fType & MF_SYSMENU))
+    {
+      if (! IsIconic(Wnd))
+        {
+          UserGetInsideRectNC(Wnd, &Rect);
+          UserDrawSysMenuButton(Wnd, Dc, &Rect,
+                                Item->fState & (MF_HILITE | MF_MOUSESELECT));
+       }
+
+      return;
+    }
+
+  /* Setup colors */
+
+  if (0 != (Item->fState & MF_HILITE))
+    {
+      if (MenuBar)
+        {
+          SetTextColor(Dc, GetSysColor(COLOR_MENUTEXT));
+          SetBkColor(Dc, GetSysColor(COLOR_MENU));
+        }
       else
-        AppendMenuW(hMenu, flags, (UINT)hSubMenu, (LPCWSTR)str);
+        {
+          if (0 != (Item->fState & MF_GRAYED))
+            {
+              SetTextColor(Dc, GetSysColor(COLOR_GRAYTEXT));
+            }
+          else
+            {
+              SetTextColor(Dc, GetSysColor(COLOR_HIGHLIGHTTEXT));
+            }
+          SetBkColor(Dc, GetSysColor(COLOR_HIGHLIGHT));
+        }
     }
-    else  /* Not a popup */
+  else
     {
-      if(!unicode)
-        AppendMenuA(hMenu, flags, id, *str ? str : NULL);
+      if (0 != (Item->fState & MF_GRAYED))
+        {
+          SetTextColor(Dc, GetSysColor(COLOR_GRAYTEXT));
+        }
+      else
+        {
+          SetTextColor(Dc, GetSysColor(COLOR_MENUTEXT));
+        }
+      SetBkColor(Dc, GetSysColor(COLOR_MENU));
+    }
+
+  if (0 != (Item->fType & MF_OWNERDRAW))
+    {
+      /*
+      ** Experimentation under Windows reveals that an owner-drawn
+      ** menu is given the rectangle which includes the space it requested
+      ** in its response to WM_MEASUREITEM _plus_ width for a checkmark
+      ** and a popup-menu arrow.  This is the value of lpitem->rect.
+      ** Windows will leave all drawing to the application except for
+      ** the popup-menu arrow.  Windows always draws that itself, after
+      ** the menu owner has finished drawing.
+      */
+      DRAWITEMSTRUCT dis;
+
+      dis.CtlType   = ODT_MENU;
+      dis.CtlID     = 0;
+      dis.itemID    = Item->wID;
+      dis.itemData  = (DWORD)Item->dwItemData;
+      dis.itemState = 0;
+      if (0 != (Item->fState & MF_CHECKED))
+        {
+          dis.itemState |= ODS_CHECKED;
+        }
+      if (0 != (Item->fState & MF_GRAYED))
+        {
+          dis.itemState |= ODS_GRAYED | ODS_DISABLED;
+        }
+      if (0 != (Item->fState & MF_HILITE))
+        {
+          dis.itemState |= ODS_SELECTED;
+        }
+      dis.itemAction = Action; /* ODA_DRAWENTIRE | ODA_SELECT | ODA_FOCUS; */
+      dis.hwndItem   = (HWND) MenuInfo->Self;
+      dis.hDC        = Dc;
+      dis.rcItem     = Item->Rect;
+      DPRINT("Ownerdraw: owner=%p itemID=%d, itemState=%d, itemAction=%d, "
+             "hwndItem=%p, hdc=%p, rcItem={%ld,%ld,%ld,%ld}\n", Wnd,
+             dis.itemID, dis.itemState, dis.itemAction, dis.hwndItem,
+             dis.hDC, dis.rcItem.left, dis.rcItem.top, dis.rcItem.right,
+             dis.rcItem.bottom);
+      SendMessageW(WndOwner, WM_DRAWITEM, 0, (LPARAM) &dis);
+      /* Fall through to draw popup-menu arrow */
+    }
+
+  DPRINT("rect={%ld,%ld,%ld,%ld}\n", Item->Rect.left, Item->Rect.top,
+                                     Item->Rect.right, Item->Rect.bottom);
+
+  if (MenuBar && 0 != (Item->fType & MF_SEPARATOR))
+    {
+      return;
+    }
+
+  Rect = Item->Rect;
+
+  if (0 == (Item->fType & MF_OWNERDRAW))
+    {
+      if (Item->fState & MF_HILITE)
+        {
+          if (MenuBar)
+            {
+              DrawEdge(Dc, &Rect, BDR_SUNKENOUTER, BF_RECT);
+            }
+          else
+            {
+              FillRect(Dc, &Rect, GetSysColorBrush(COLOR_HIGHLIGHT));
+            }
+        }
+      else
+        {
+          FillRect(Dc, &Rect, GetSysColorBrush(COLOR_MENU));
+        }
+    }
+
+  SetBkMode(Dc, TRANSPARENT);
+
+  if (0 == (Item->fType & MF_OWNERDRAW))
+    {
+      /* vertical separator */
+      if (! MenuBar && 0 != (Item->fType & MF_MENUBARBREAK))
+        {
+          RECT rc = Rect;
+          rc.top = 3;
+          rc.bottom = Height - 3;
+          DrawEdge(Dc, &rc, EDGE_ETCHED, BF_LEFT);
+        }
+
+      /* horizontal separator */
+      if (0 != (Item->fType & MF_SEPARATOR))
+        {
+          RECT rc = Rect;
+          rc.left++;
+          rc.right--;
+          rc.top += SEPARATOR_HEIGHT / 2;
+          DrawEdge(Dc, &rc, EDGE_ETCHED, BF_TOP);
+
+         return;
+        }
+    }
+
+#if 0
+  /* helper lines for debugging */
+  FrameRect(Dc, &Rect, GetStockObject(BLACK_BRUSH));
+  SelectObject(Dc, SYSCOLOR_GetPen(COLOR_WINDOWFRAME));
+  MoveToEx(Dc, Rect.left, (Rect.top + Rect.bottom) / 2, NULL);
+  LineTo(Dc, Rect.right, (Rect.top + Rect.bottom) / 2);
+#endif
+
+  if (! MenuBar)
+    {
+      INT y = Rect.top + Rect.bottom;
+      UINT CheckBitmapWidth = GetSystemMetrics(SM_CXMENUCHECK);
+      UINT CheckBitmapHeight = GetSystemMetrics(SM_CYMENUCHECK);
+
+      if (0 == (Item->fType & MF_OWNERDRAW))
+        {
+          /* Draw the check mark
+           *
+           * FIXME:
+           * Custom checkmark bitmaps are monochrome but not always 1bpp.
+           */
+          HBITMAP bm = 0 != (Item->fState & MF_CHECKED) ? Item->hbmpChecked : Item->hbmpUnchecked;
+          if (NULL != bm)  /* we have a custom bitmap */
+            {
+              HDC DcMem = CreateCompatibleDC(Dc);
+              SelectObject(DcMem, bm);
+              BitBlt(Dc, Rect.left, (y - CheckBitmapHeight) / 2,
+                     CheckBitmapWidth, CheckBitmapHeight,
+                     DcMem, 0, 0, SRCCOPY);
+              DeleteDC(DcMem);
+            }
+          else if (0 != (Item->fState & MF_CHECKED))  /* standard bitmaps */
+            {
+              RECT r;
+              HBITMAP bm = CreateBitmap(CheckBitmapWidth, CheckBitmapHeight, 1, 1, NULL);
+              HDC DcMem = CreateCompatibleDC(Dc);
+              SelectObject(DcMem, bm);
+              SetRect( &r, 0, 0, CheckBitmapWidth, CheckBitmapHeight);
+              DrawFrameControl(DcMem, &r, DFC_MENU,
+                               0 != (Item->fType & MFT_RADIOCHECK) ?
+                               DFCS_MENUBULLET : DFCS_MENUCHECK);
+              BitBlt(Dc, Rect.left, (y - r.bottom) / 2, r.right, r.bottom,
+                     DcMem, 0, 0, SRCCOPY );
+              DeleteDC(DcMem);
+              DeleteObject(bm);
+            }
+        }
+
+      /* Draw the popup-menu arrow */
+      if (0 != (Item->fType & MF_POPUP))
+        {
+          HDC DcMem = CreateCompatibleDC(Dc);
+          HBITMAP OrigBitmap;
+
+          OrigBitmap = SelectObject(DcMem, StdMnArrow);
+          BitBlt(Dc, Rect.right - ArrowBitmapWidth - 1,
+                 (y - ArrowBitmapHeight) / 2,
+                 ArrowBitmapWidth, ArrowBitmapHeight,
+                 DcMem, 0, 0, SRCCOPY);
+          SelectObject(DcMem, OrigBitmap);
+          DeleteDC(DcMem);
+        }
+
+      Rect.left += CheckBitmapWidth;
+      Rect.right -= ArrowBitmapWidth;
+    }
+
+  /* Done for owner-drawn */
+  if (0 != (Item->fType & MF_OWNERDRAW))
+    {
+      return;
+    }
+
+  /* Draw the item text or bitmap */
+  if (IS_BITMAP_ITEM(Item->fType))
+    {
+      MenuDrawBitmapItem(Dc, Item, &Rect, MenuBar);
+      return;
+    }
+  /* No bitmap - process text if present */
+  else if (IS_STRING_ITEM(Item->fType))
+    {
+      register int i;
+      HFONT FontOld = NULL;
+
+      UINT uFormat = MenuBar ? DT_CENTER | DT_VCENTER | DT_SINGLELINE
+                     : DT_LEFT | DT_VCENTER | DT_SINGLELINE;
+
+      if (0 != (Item->fState & MFS_DEFAULT))
+        {
+          FontOld = SelectObject(Dc, hMenuFontBold);
+        }
+
+      if (MenuBar)
+        {
+          Rect.left += MENU_BAR_ITEMS_SPACE / 2;
+          Rect.right -= MENU_BAR_ITEMS_SPACE / 2;
+        }
+
+      Text = (PWCHAR) Item->dwTypeData;
+      for (i = 0; L'\0' != Text[i]; i++)
+        {
+          if (L'\t' == Text[i] || L'\b' == Text[i])
+            {
+              break;
+            }
+        }
+
+      if (0 != (Item->fState & MF_GRAYED))
+       {
+          if (0 == (Item->fState & MF_HILITE))
+           {
+              ++Rect.left; ++Rect.top; ++Rect.right; ++Rect.bottom;
+              SetTextColor(Dc, RGB(0xff, 0xff, 0xff));
+              DrawTextW(Dc, Text, i, &Rect, uFormat);
+              --Rect.left; --Rect.top; --Rect.right; --Rect.bottom;
+           }
+          SetTextColor(Dc, RGB(0x80, 0x80, 0x80));
+        }
+
+      DrawTextW(Dc, Text, i, &Rect, uFormat);
+
+      /* paint the shortcut text */
+      if (! MenuBar && L'\0' != Text[i])  /* There's a tab or flush-right char */
+        {
+          if (L'\t' == Text[i])
+            {
+              Rect.left = Item->XTab;
+              uFormat = DT_LEFT | DT_VCENTER | DT_SINGLELINE;
+            }
+          else
+            {
+              uFormat = DT_RIGHT | DT_VCENTER | DT_SINGLELINE;
+            }
+
+          if (0 != (Item->fState & MF_GRAYED))
+            {
+              if (0 == (Item->fState & MF_HILITE))
+                {
+                  ++Rect.left; ++Rect.top; ++Rect.right; ++Rect.bottom;
+                  SetTextColor(Dc, RGB(0xff, 0xff, 0xff));
+                  DrawTextW(Dc, Text + i + 1, -1, &Rect, uFormat);
+                  --Rect.left; --Rect.top; --Rect.right; --Rect.bottom;
+                }
+              SetTextColor(Dc, RGB(0x80, 0x80, 0x80));
+           }
+          DrawTextW(Dc, Text + i + 1, -1, &Rect, uFormat);
+        }
+
+      if (NULL != FontOld)
+        {
+          SelectObject(Dc, FontOld);
+        }
+    }
+}
+
+/***********************************************************************
+ *           MenuDrawPopupMenu
+ *
+ * Paint a popup menu.
+ */
+static void FASTCALL
+MenuDrawPopupMenu(HWND Wnd, HDC Dc, HMENU Menu)
+{
+  HBRUSH PrevBrush = NULL;
+  HPEN PrevPen;
+  RECT Rect;
+  ROSMENUINFO MenuInfo;
+  ROSMENUITEMINFO ItemInfo;
+  UINT u;
+
+  DPRINT("wnd=%x dc=%x menu=%x\n", Wnd, Dc, Menu);
+
+  GetClientRect(Wnd, &Rect);
+
+  if (NULL != (PrevBrush = SelectObject(Dc, GetSysColorBrush(COLOR_MENU)))
+      && NULL != SelectObject(Dc, hMenuFont))
+    {
+      Rectangle(Dc, Rect.left, Rect.top, Rect.right, Rect.bottom);
+
+      PrevPen = SelectObject(Dc, GetStockObject(NULL_PEN));
+      if (NULL != PrevPen)
+        {
+          DrawEdge(Dc, &Rect, EDGE_RAISED, BF_RECT);
+
+          /* draw menu items */
+
+          if (MenuGetRosMenuInfo(&MenuInfo, Menu) && 0 != MenuInfo.MenuItemCount)
+            {
+              MenuInitRosMenuItemInfo(&ItemInfo);
+
+              for (u = 0; u < MenuInfo.MenuItemCount; u++)
+                {
+                  if (MenuGetRosMenuItemInfo(MenuInfo.Self, u, &ItemInfo))
+                    {
+                      MenuDrawMenuItem(Wnd, &MenuInfo, MenuInfo.WndOwner, Dc, &ItemInfo,
+                                      MenuInfo.Height, FALSE, ODA_DRAWENTIRE);
+                    }
+                }
+
+             MenuCleanupRosMenuItemInfo(&ItemInfo);
+           }
+       }
+      else
+        {
+          SelectObject(Dc, PrevBrush);
+       }
+    }
+}
+
+static LRESULT WINAPI
+PopupMenuWndProcW(HWND Wnd, UINT Message, WPARAM wParam, LPARAM lParam)
+{
+  DPRINT("hwnd=%x msg=0x%04x wp=0x%04x lp=0x%08lx\n", Wnd, Message, wParam, lParam);
+
+  switch(Message)
+    {
+    case WM_CREATE:
+      {
+        CREATESTRUCTW *cs = (CREATESTRUCTW *) lParam;
+        SetWindowLongW(Wnd, 0, (LONG) cs->lpCreateParams);
+        return 0;
+      }
+
+    case WM_MOUSEACTIVATE:  /* We don't want to be activated */
+      return MA_NOACTIVATE;
+
+    case WM_PAINT:
+      {
+        PAINTSTRUCT ps;
+        BeginPaint(Wnd, &ps);
+        MenuDrawPopupMenu(Wnd, ps.hdc, (HMENU)GetWindowLongW(Wnd, 0));
+        EndPaint(Wnd, &ps);
+        return 0;
+      }
+
+    case WM_ERASEBKGND:
+      return 1;
+
+    case WM_DESTROY:
+      /* zero out global pointer in case resident popup window was destroyed. */
+      if (Wnd == TopPopup)
+        {
+          TopPopup = NULL;
+        }
+      break;
+
+    case WM_SHOWWINDOW:
+      if (0 != wParam)
+        {
+          if (0 == GetWindowLongW(Wnd, 0))
+            {
+              OutputDebugStringA("no menu to display\n");
+            }
+        }
+      else
+        {
+          SetWindowLongW(Wnd, 0, 0);
+        }
+      break;
+
+    case MM_SETMENUHANDLE:
+      SetWindowLongW(Wnd, 0, wParam);
+      break;
+
+    case MM_GETMENUHANDLE:
+      return GetWindowLongW(Wnd, 0);
+
+    default:
+      return DefWindowProcW(Wnd, Message, wParam, lParam);
+    }
+
+  return 0;
+}
+
+/**********************************************************************
+ *         MENUEX_ParseResource
+ *
+ * Parse an extended menu resource and add items to the menu.
+ * Return a pointer to the end of the resource.
+ *
+ * FIXME - should we be passing an LPCSTR to a predominantly UNICODE function?
+ */
+static LPCSTR MENUEX_ParseResource( LPCSTR res, HMENU hMenu)
+{
+  WORD resinfo;
+
+  do
+    {
+      MENUITEMINFOW mii;
+
+      mii.cbSize = sizeof(mii);
+      mii.fMask = MIIM_STATE | MIIM_ID | MIIM_TYPE;
+      mii.fType = GET_DWORD(res);
+      res += sizeof(DWORD);
+      mii.fState = GET_DWORD(res);
+      res += sizeof(DWORD);
+      mii.wID = GET_DWORD(res);
+      res += sizeof(DWORD);
+      resinfo = GET_WORD(res);
+      res += sizeof(WORD);
+      /* Align the text on a word boundary.  */
+      res += (~((int)res - 1)) & 1;
+      mii.dwTypeData = (LPWSTR) res;
+      res += (1 + wcslen(mii.dwTypeData)) * sizeof(WCHAR);
+      /* Align the following fields on a dword boundary.  */
+      res += (~((int)res - 1)) & 3;
+
+      if (resinfo & 1) /* Pop-up? */
+       {
+         /* DWORD helpid = GET_DWORD(res); FIXME: use this.  */
+         res += sizeof(DWORD);
+         mii.hSubMenu = CreatePopupMenu();
+         if (!mii.hSubMenu)
+             return NULL;
+         if (!(res = MENUEX_ParseResource(res, mii.hSubMenu)))
+         {
+             DestroyMenu(mii.hSubMenu);
+             return NULL;
+         }
+         mii.fMask |= MIIM_SUBMENU;
+         mii.fType |= MF_POPUP;
+       }
+      else if(!*mii.dwTypeData && !(mii.fType & MF_SEPARATOR))
+       {
+         DbgPrint("WARN: Converting NULL menu item %04x, type %04x to SEPARATOR\n",
+             mii.wID, mii.fType);
+         mii.fType |= MF_SEPARATOR;
+       }
+    InsertMenuItemW(hMenu, -1, MF_BYPOSITION, &mii);
+  }
+  while (!(resinfo & MF_END));
+  return res;
+}
+
+
+/**********************************************************************
+ *         MENU_ParseResource
+ *
+ * Parse a standard menu resource and add items to the menu.
+ * Return a pointer to the end of the resource.
+ *
+ * NOTE: flags is equivalent to the mtOption field
+ */
+static LPCSTR MENU_ParseResource( LPCSTR res, HMENU hMenu, BOOL unicode )
+{
+  WORD flags, id = 0;
+  HMENU hSubMenu;
+  LPCSTR str;
+  BOOL end = FALSE;
+
+  do
+  {
+    flags = GET_WORD(res);
+
+    /* remove MF_END flag before passing it to AppendMenu()! */
+    end = (flags & MF_END);
+    if(end) flags ^= MF_END;
+
+    res += sizeof(WORD);
+    if(!(flags & MF_POPUP))
+    {
+      id = GET_WORD(res);
+      res += sizeof(WORD);
+    }
+    str = res;
+    if(!unicode)
+      res += strlen(str) + 1;
+    else
+      res += (wcslen((LPCWSTR)str) + 1) * sizeof(WCHAR);
+    if (flags & MF_POPUP)
+    {
+      hSubMenu = CreatePopupMenu();
+      if(!hSubMenu) return NULL;
+      if(!(res = MENU_ParseResource(res, hSubMenu, unicode)))
+        return NULL;
+      if(!unicode)
+        AppendMenuA(hMenu, flags, (UINT)hSubMenu, str);
+      else
+        AppendMenuW(hMenu, flags, (UINT)hSubMenu, (LPCWSTR)str);
+    }
+    else  /* Not a popup */
+    {
+      if(!unicode)
+        AppendMenuA(hMenu, flags, id, *str ? str : NULL);
+      else
+        AppendMenuW(hMenu, flags, id,
+                    *(LPCWSTR)str ? (LPCWSTR)str : NULL);
+    }
+  } while(!end);
+
+  return res;
+}
+
+
+NTSTATUS STDCALL
+User32LoadSysMenuTemplateForKernel(PVOID Arguments, ULONG ArgumentLength)
+{
+  LRESULT Result;
+  HMODULE hUser32;
+  hUser32 = GetModuleHandleW(L"USER32");
+  Result = (LRESULT)LoadMenuW(hUser32, L"SYSMENU");
+  return(ZwCallbackReturn(&Result, sizeof(LRESULT), STATUS_SUCCESS));
+}
+
+
+BOOL
+MenuInit(VOID)
+{
+  NONCLIENTMETRICSW ncm;
+
+  /* get the menu font */
+  if(!hMenuFont || !hMenuFontBold)
+  {
+    ncm.cbSize = sizeof(ncm);
+    if(!SystemParametersInfoW(SPI_GETNONCLIENTMETRICS, sizeof(ncm), &ncm, 0))
+    {
+      DbgPrint("MenuInit(): SystemParametersInfoW(SPI_GETNONCLIENTMETRICS) failed!\n");
+      return FALSE;
+    }
+
+    hMenuFont = CreateFontIndirectW(&ncm.lfMenuFont);
+    if(hMenuFont == NULL)
+    {
+      DbgPrint("MenuInit(): CreateFontIndirectW(hMenuFont) failed!\n");
+      return FALSE;
+    }
+
+    ncm.lfMenuFont.lfWeight = max(ncm.lfMenuFont.lfWeight + 300, 1000);
+    hMenuFontBold = CreateFontIndirectW(&ncm.lfMenuFont);
+    if(hMenuFontBold == NULL)
+    {
+      DbgPrint("MenuInit(): CreateFontIndirectW(hMenuFontBold) failed!\n");
+      DeleteObject(hMenuFont);
+      hMenuFont = NULL;
+      return FALSE;
+    }
+  }
+
+  return TRUE;
+}
+
+
+VOID
+MenuCleanup(VOID)
+{
+  if (hMenuFont)
+  {
+    DeleteObject(hMenuFont);
+    hMenuFont = NULL;
+  }
+
+  if (hMenuFontBold)
+  {
+    DeleteObject(hMenuFontBold);
+    hMenuFontBold = NULL;
+  }
+}
+
+
+
+/***********************************************************************
+ *           MenuCalcItemSize
+ *
+ * Calculate the size of the menu item and store it in ItemInfo->rect.
+ */
+static void FASTCALL
+MenuCalcItemSize(HDC Dc, PROSMENUITEMINFO ItemInfo, HWND WndOwner,
+                 INT OrgX, INT OrgY, BOOL MenuBar)
+{
+  PWCHAR p;
+  UINT CheckBitmapWidth = GetSystemMetrics(SM_CXMENUCHECK);
+
+  DPRINT("dc=%x owner=%x (%d,%d)\n", Dc, WndOwner, OrgX, OrgY);
+
+  SetRect(&ItemInfo->Rect, OrgX, OrgY, OrgX, OrgY);
+
+  if (0 != (ItemInfo->fType & MF_OWNERDRAW))
+    {
+      /*
+       ** Experimentation under Windows reveals that an owner-drawn
+       ** menu is expected to return the size of the content part of
+       ** the menu item, not including the checkmark nor the submenu
+       ** arrow.  Windows adds those values itself and returns the
+       ** enlarged rectangle on subsequent WM_DRAWITEM messages.
+       */
+      MEASUREITEMSTRUCT mis;
+      mis.CtlType    = ODT_MENU;
+      mis.CtlID      = 0;
+      mis.itemID     = ItemInfo->wID;
+      mis.itemData   = (DWORD)ItemInfo->dwItemData;
+      mis.itemHeight = 0;
+      mis.itemWidth  = 0;
+      SendMessageW(WndOwner, WM_MEASUREITEM, 0, (LPARAM) &mis);
+      ItemInfo->Rect.right += mis.itemWidth;
+
+      if (MenuBar)
+        {
+          ItemInfo->Rect.right += MENU_BAR_ITEMS_SPACE;
+
+          /* under at least win95 you seem to be given a standard
+             height for the menu and the height value is ignored */
+
+          ItemInfo->Rect.bottom += GetSystemMetrics(SM_CYMENU) - 1;
+        }
+      else
+        {
+          ItemInfo->Rect.bottom += mis.itemHeight;
+        }
+
+      DPRINT("id=%04x size=%dx%d\n", ItemInfo->wID, mis.itemWidth, mis.itemHeight);
+      /* Fall through to get check/arrow width calculation. */
+    }
+
+  if (0 != (ItemInfo->fType & MF_SEPARATOR))
+    {
+      ItemInfo->Rect.bottom += SEPARATOR_HEIGHT;
+      return;
+    }
+
+  if (! MenuBar)
+    {
+      ItemInfo->Rect.right += 2 * CheckBitmapWidth;
+      if (0 != (ItemInfo->fType & MF_POPUP))
+        {
+          ItemInfo->Rect.right += ArrowBitmapWidth;
+        }
+    }
+
+  if (0 != (ItemInfo->fType & MF_OWNERDRAW))
+    {
+      return;
+    }
+
+  if (IS_BITMAP_ITEM(ItemInfo->fType))
+    {
+      SIZE Size;
+
+      MenuGetBitmapItemSize((int) ItemInfo->hbmpItem, (DWORD) ItemInfo->hbmpItem, &Size);
+      ItemInfo->Rect.right  += Size.cx;
+      ItemInfo->Rect.bottom += Size.cy;
+
+      /* Leave space for the sunken border */
+      ItemInfo->Rect.right  += 2;
+      ItemInfo->Rect.bottom += 2;
+
+      /* Special case: Minimize button doesn't have a space behind it. */
+      if (ItemInfo->hbmpItem == (HBITMAP)HBMMENU_MBAR_MINIMIZE ||
+          ItemInfo->hbmpItem == (HBITMAP)HBMMENU_MBAR_MINIMIZE_D)
+        ItemInfo->Rect.right -= 1;
+    }
+
+  /* it must be a text item - unless it's the system menu */
+  if (0 == (ItemInfo->fType & MF_SYSMENU) && IS_STRING_ITEM(ItemInfo->fType))
+    {
+      SIZE Size;
+
+      GetTextExtentPoint32W(Dc, (LPWSTR) ItemInfo->dwTypeData,
+                            wcslen((LPWSTR) ItemInfo->dwTypeData), &Size);
+
+      ItemInfo->Rect.right += Size.cx;
+      ItemInfo->Rect.bottom += max(Size.cy, GetSystemMetrics(SM_CYMENU) - 1);
+      ItemInfo->XTab = 0;
+
+      if (MenuBar)
+        {
+          ItemInfo->Rect.right += MENU_BAR_ITEMS_SPACE;
+        }
+      else if ((p = wcschr((LPWSTR) ItemInfo->dwTypeData, L'\t' )) != NULL)
+       {
+          /* Item contains a tab (only meaningful in popup menus) */
+          GetTextExtentPoint32W(Dc, (LPWSTR) ItemInfo->dwTypeData,
+                                (int)(p - (LPWSTR) ItemInfo->dwTypeData), &Size);
+          ItemInfo->XTab = CheckBitmapWidth + MENU_TAB_SPACE + Size.cx;
+          ItemInfo->Rect.right += MENU_TAB_SPACE;
+        }
+      else
+        {
+          if (NULL != wcschr((LPWSTR) ItemInfo->dwTypeData, L'\b'))
+            {
+              ItemInfo->Rect.right += MENU_TAB_SPACE;
+            }
+          ItemInfo->XTab = ItemInfo->Rect.right - CheckBitmapWidth
+                          - ArrowBitmapWidth;
+        }
+    }
+
+  DPRINT("(%ld,%ld)-(%ld,%ld)\n", ItemInfo->Rect.left, ItemInfo->Rect.top, ItemInfo->Rect.right, ItemInfo->Rect.bottom);
+}
+
+/***********************************************************************
+ *           MenuPopupMenuCalcSize
+ *
+ * Calculate the size of a popup menu.
+ */
+static void FASTCALL
+MenuPopupMenuCalcSize(PROSMENUINFO MenuInfo, HWND WndOwner)
+{
+  ROSMENUITEMINFO ItemInfo;
+  HDC Dc;
+  int Start, i;
+  int OrgX, OrgY, MaxX, MaxTab, MaxTabWidth;
+
+  MenuInfo->Width = MenuInfo->Height = 0;
+  if (0 == MenuInfo->MenuItemCount)
+    {
+      MenuSetRosMenuInfo(MenuInfo);
+      return;
+    }
+
+  Dc = GetDC(NULL);
+  SelectObject(Dc, hMenuFont);
+
+  Start = 0;
+  MaxX = 2 + 1;
+
+  MenuInitRosMenuItemInfo(&ItemInfo);
+  while (Start < MenuInfo->MenuItemCount)
+    {
+      OrgX = MaxX;
+      OrgY = 2;
+
+      MaxTab = MaxTabWidth = 0;
+
+      /* Parse items until column break or end of menu */
+      for (i = Start; i < MenuInfo->MenuItemCount; i++)
+       {
+          if (! MenuGetRosMenuItemInfo(MenuInfo->Self, i, &ItemInfo))
+            {
+              MenuCleanupRosMenuItemInfo(&ItemInfo);
+              MenuSetRosMenuInfo(MenuInfo);
+              return;
+            }
+          if (i != Start &&
+              0 != (ItemInfo.fType & (MF_MENUBREAK | MF_MENUBARBREAK)))
+            {
+              break;
+            }
+
+          MenuCalcItemSize(Dc, &ItemInfo, WndOwner, OrgX, OrgY, FALSE);
+          if (! MenuSetRosMenuItemInfo(MenuInfo->Self, i, &ItemInfo))
+            {
+              MenuCleanupRosMenuItemInfo(&ItemInfo);
+              MenuSetRosMenuInfo(MenuInfo);
+              return;
+            }
+
+          if (0 != (ItemInfo.fType & MF_MENUBARBREAK))
+            {
+              OrgX++;
+            }
+          MaxX = max(MaxX, ItemInfo.Rect.right);
+          OrgY = ItemInfo.Rect.bottom;
+          if (IS_STRING_ITEM(ItemInfo.fType) && 0 != ItemInfo.XTab)
+           {
+              MaxTab = max(MaxTab, ItemInfo.XTab);
+              MaxTabWidth = max(MaxTabWidth, ItemInfo.Rect.right - ItemInfo.XTab);
+            }
+        }
+
+      /* Finish the column (set all items to the largest width found) */
+      MaxX = max(MaxX, MaxTab + MaxTabWidth);
+      while (Start < i)
+        {
+          if (MenuGetRosMenuItemInfo(MenuInfo->Self, Start, &ItemInfo))
+            {
+              ItemInfo.Rect.right = MaxX;
+              if (IS_STRING_ITEM(ItemInfo.fType) && 0 != ItemInfo.XTab)
+                {
+                  ItemInfo.XTab = MaxTab;
+                }
+              MenuSetRosMenuItemInfo(MenuInfo->Self, Start, &ItemInfo);
+            }
+          Start++;
+       }
+      MenuInfo->Height = max(MenuInfo->Height, OrgY);
+    }
+
+  MenuInfo->Width = MaxX;
+
+  /* space for 3d border */
+  MenuInfo->Height += 2;
+  MenuInfo->Width += 2;
+
+  ReleaseDC(NULL, Dc);
+  MenuCleanupRosMenuItemInfo(&ItemInfo);
+  MenuSetRosMenuInfo(MenuInfo);
+}
+
+/***********************************************************************
+ *           MenuMenuBarCalcSize
+ *
+ * FIXME: Word 6 implements its own MDI and its own 'close window' bitmap
+ * height is off by 1 pixel which causes lengthy window relocations when
+ * active document window is maximized/restored.
+ *
+ * Calculate the size of the menu bar.
+ */
+static void FASTCALL
+MenuMenuBarCalcSize(HDC Dc, LPRECT Rect, PROSMENUINFO MenuInfo, HWND WndOwner)
+{
+  ROSMENUITEMINFO ItemInfo;
+  int Start, i, OrgX, OrgY, MaxY, HelpPos;
+
+  if (NULL == Rect || NULL == MenuInfo)
+    {
+      return;
+    }
+  if (0 == MenuInfo->MenuItemCount)
+    {
+      return;
+    }
+
+  DPRINT("left=%ld top=%ld right=%ld bottom=%ld\n",
+         Rect->left, Rect->top, Rect->right, Rect->bottom);
+  MenuInfo->Width = Rect->right - Rect->left;
+  MenuInfo->Height = 0;
+  MaxY = Rect->top + 1;
+  Start = 0;
+  HelpPos = -1;
+  MenuInitRosMenuItemInfo(&ItemInfo);
+  while (Start < MenuInfo->MenuItemCount)
+    {
+      if (! MenuGetRosMenuItemInfo(MenuInfo->Self, Start, &ItemInfo))
+        {
+          MenuCleanupRosMenuItemInfo(&ItemInfo);
+          return;
+        }
+      OrgX = Rect->left;
+      OrgY = MaxY;
+
+      /* Parse items until line break or end of menu */
+      for (i = Start; i < MenuInfo->MenuItemCount; i++)
+       {
+          if (-1 == HelpPos && 0 != (ItemInfo.fType & MF_RIGHTJUSTIFY))
+            {
+              HelpPos = i;
+            }
+          if (i != Start &&
+              0 != (ItemInfo.fType & (MF_MENUBREAK | MF_MENUBARBREAK)))
+            {
+              break;
+            }
+
+          DPRINT("calling MENU_CalcItemSize org=(%d, %d)\n", OrgX, OrgY);
+          MenuCalcItemSize(Dc, &ItemInfo, WndOwner, OrgX, OrgY, TRUE);
+          if (! MenuSetRosMenuItemInfo(MenuInfo->Self, i, &ItemInfo))
+            {
+              MenuCleanupRosMenuItemInfo(&ItemInfo);
+              return;
+            }
+
+          if (ItemInfo.Rect.right > Rect->right)
+            {
+              if (i != Start)
+                {
+                  break;
+                }
+              else
+                {
+                  ItemInfo.Rect.right = Rect->right;
+                }
+            }
+          MaxY = max(MaxY, ItemInfo.Rect.bottom );
+          OrgX = ItemInfo.Rect.right;
+          if (i + 1 < MenuInfo->MenuItemCount)
+            {
+              if (! MenuGetRosMenuItemInfo(MenuInfo->Self, i + 1, &ItemInfo))
+                {
+                  MenuCleanupRosMenuItemInfo(&ItemInfo);
+                  return;
+                }
+            }
+       }
+
+/* FIXME: Is this really needed? */
+#if 0
+      /* Finish the line (set all items to the largest height found) */
+      while (Start < i)
+        {
+          if (MenuGetRosMenuItemInfo(MenuInfo->Self, Start, &ItemInfo))
+            {
+              ItemInfo.Rect.bottom = MaxY;
+              MenuSetRosMenuItemInfo(MenuInfo->Self, Start, &ItemInfo);
+            }
+          Start++;
+        }
+#else
+     Start = i;
+#endif
+    }
+
+  Rect->bottom = MaxY;
+  MenuInfo->Height = Rect->bottom - Rect->top;
+  MenuSetRosMenuInfo(MenuInfo);
+
+  if (-1 != HelpPos)
+    {
+      /* Flush right all items between the MF_RIGHTJUSTIFY and */
+      /* the last item (if several lines, only move the last line) */
+      if (! MenuGetRosMenuItemInfo(MenuInfo->Self, MenuInfo->MenuItemCount - 1, &ItemInfo))
+        {
+          MenuCleanupRosMenuItemInfo(&ItemInfo);
+          return;
+        }
+      OrgY = ItemInfo.Rect.top;
+      OrgX = Rect->right;
+      for (i = MenuInfo->MenuItemCount - 1; HelpPos <= i; i--)
+        {
+          if (i < HelpPos)
+            {
+              break;                           /* done */
+            }
+          if (ItemInfo.Rect.top != OrgY)
+            {
+              break;                           /* Other line */
+            }
+          if (OrgX <= ItemInfo.Rect.right)
+            {
+              break;                           /* Too far right already */
+            }
+          ItemInfo.Rect.left += OrgX - ItemInfo.Rect.right;
+          ItemInfo.Rect.right = OrgX;
+          OrgX = ItemInfo.Rect.left;
+          MenuSetRosMenuItemInfo(MenuInfo->Self, i, &ItemInfo);
+          if (HelpPos + 1 <= i &&
+              ! MenuGetRosMenuItemInfo(MenuInfo->Self, i - 1, &ItemInfo))
+            {
+              MenuCleanupRosMenuItemInfo(&ItemInfo);
+              return;
+            }
+        }
+    }
+
+  MenuCleanupRosMenuItemInfo(&ItemInfo);
+}
+
+/***********************************************************************
+ *           DrawMenuBarTemp   (USER32.@)
+ *
+ * UNDOCUMENTED !!
+ *
+ * called by W98SE desk.cpl Control Panel Applet
+ *
+ * Not 100% sure about the param names, but close.
+ *
+ * @implemented
+ */
+DWORD WINAPI
+DrawMenuBarTemp(HWND Wnd, HDC DC, LPRECT Rect, HMENU Menu, HFONT Font)
+{
+  ROSMENUINFO MenuInfo;
+  ROSMENUITEMINFO ItemInfo;
+  UINT i;
+  HFONT FontOld = NULL;
+
+  if (NULL == Menu)
+    {
+      Menu = GetMenu(Wnd);
+    }
+
+  if (NULL == Font)
+    {
+      Font = hMenuFont;
+    }
+
+  if (NULL == Rect || ! MenuGetRosMenuInfo(&MenuInfo, Menu))
+    {
+      return GetSystemMetrics(SM_CYMENU);
+    }
+
+  DPRINT("(%x, %x, %p, %x, %x)\n", Wnd, DC, Rect, Menu, Font);
+
+  FontOld = SelectObject(DC, Font);
+
+  if (0 == MenuInfo.Height)
+    {
+      MenuMenuBarCalcSize(DC, Rect, &MenuInfo, Wnd);
+    }
+
+  Rect->bottom = Rect->top + MenuInfo.Height;
+
+  FillRect(DC, Rect, GetSysColorBrush(COLOR_MENU));
+
+  SelectObject(DC, GetSysColorPen(COLOR_3DFACE));
+  MoveToEx(DC, Rect->left, Rect->bottom, NULL);
+  LineTo(DC, Rect->right, Rect->bottom);
+
+  if (0 == MenuInfo.MenuItemCount)
+    {
+      SelectObject(DC, FontOld);
+      return GetSystemMetrics(SM_CYMENU);
+    }
+
+  MenuInitRosMenuItemInfo(&ItemInfo);
+  for (i = 0; i < MenuInfo.MenuItemCount; i++)
+    {
+      if (MenuGetRosMenuItemInfo(MenuInfo.Self, i, &ItemInfo))
+        {
+          MenuDrawMenuItem(Wnd, &MenuInfo, Wnd, DC, &ItemInfo,
+                           MenuInfo.Height, TRUE, ODA_DRAWENTIRE);
+        }
+    }
+  MenuCleanupRosMenuItemInfo(&ItemInfo);
+
+  SelectObject(DC, FontOld);
+
+  return MenuInfo.Height;
+}
+
+
+/***********************************************************************
+ *           MenuDrawMenuBar
+ *
+ * Paint a menu bar. Returns the height of the menu bar.
+ * called from [windows/nonclient.c]
+ */
+UINT MenuDrawMenuBar(HDC DC, LPRECT Rect, HWND Wnd, BOOL SuppressDraw)
+{
+  ROSMENUINFO MenuInfo;
+  HFONT FontOld = NULL;
+  HMENU Menu = GetMenu(Wnd);
+
+  if (NULL == Rect || ! MenuGetRosMenuInfo(&MenuInfo, Menu))
+    {
+      return GetSystemMetrics(SM_CYMENU);
+    }
+
+  if (SuppressDraw)
+    {
+      FontOld = SelectObject(DC, hMenuFont);
+
+      MenuMenuBarCalcSize(DC, Rect, &MenuInfo, Wnd);
+
+      Rect->bottom = Rect->top + MenuInfo.Height;
+
+      if (NULL != FontOld)
+        {
+          SelectObject(DC, FontOld);
+        }
+      return MenuInfo.Height;
+    }
+  else
+    {
+      return DrawMenuBarTemp(Wnd, DC, Rect, Menu, NULL);
+    }
+}
+
+/***********************************************************************
+ *           MenuInitTracking
+ */
+static BOOL FASTCALL
+MenuInitTracking(HWND Wnd, HMENU Menu, BOOL Popup, UINT Flags)
+{
+  DPRINT("Wnd=%p Menu=%p\n", Wnd, Menu);
+
+  HideCaret(0);
+
+  /* Send WM_ENTERMENULOOP and WM_INITMENU message only if TPM_NONOTIFY flag is not specified */
+  if (0 == (Flags & TPM_NONOTIFY))
+    {
+      SendMessageW(Wnd, WM_ENTERMENULOOP, Popup, 0);
+    }
+
+  SendMessageW(Wnd, WM_SETCURSOR, (WPARAM) Wnd, HTCAPTION);
+
+  if (0 == (Flags & TPM_NONOTIFY))
+    {
+      ROSMENUINFO MenuInfo;
+
+      SendMessageW(Wnd, WM_INITMENU, (WPARAM)Menu, 0);
+
+      if (MenuGetRosMenuInfo(&MenuInfo, Menu) && 0 == MenuInfo.Height)
+        {
+          /* app changed/recreated menu bar entries in WM_INITMENU
+             Recalculate menu sizes else clicks will not work */
+          SetWindowPos(Wnd, 0, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE |
+                       SWP_NOACTIVATE | SWP_NOZORDER | SWP_FRAMECHANGED );
+
+        }
+    }
+
+  return TRUE;
+}
+
+
+/***********************************************************************
+ *           MenuShowPopup
+ *
+ * Display a popup menu.
+ */
+static BOOL FASTCALL
+MenuShowPopup(HWND WndOwner, HMENU Menu, UINT Id,
+              INT X, INT Y, INT XAnchor, INT YAnchor )
+{
+  ROSMENUINFO MenuInfo;
+  ROSMENUITEMINFO ItemInfo;
+  UINT Width, Height;
+
+  DPRINT("owner=%x hmenu=%x id=0x%04x x=0x%04x y=0x%04x xa=0x%04x ya=0x%04x\n",
+         WndOwner, Menu, Id, X, Y, XAnchor, YAnchor);
+
+  if (! MenuGetRosMenuInfo(&MenuInfo, Menu))
+    {
+      return FALSE;
+    }
+
+  if (NO_SELECTED_ITEM != MenuInfo.FocusedItem)
+    {
+      MenuInitRosMenuItemInfo(&ItemInfo);
+      if (MenuGetRosMenuItemInfo(MenuInfo.Self, MenuInfo.FocusedItem, &ItemInfo))
+        {
+          ItemInfo.fState &= ~(MF_HILITE|MF_MOUSESELECT);
+          MenuSetRosMenuItemInfo(MenuInfo.Self, MenuInfo.FocusedItem, &ItemInfo);
+        }
+      MenuCleanupRosMenuItemInfo(&ItemInfo);
+      MenuInfo.FocusedItem = NO_SELECTED_ITEM;
+    }
+
+  /* store the owner for DrawItem */
+  MenuInfo.WndOwner = WndOwner;
+  MenuSetRosMenuInfo(&MenuInfo);
+
+  MenuPopupMenuCalcSize(&MenuInfo, WndOwner);
+
+  /* adjust popup menu pos so that it fits within the desktop */
+
+  Width = MenuInfo.Width + GetSystemMetrics(SM_CXBORDER);
+  Height = MenuInfo.Height + GetSystemMetrics(SM_CYBORDER);
+
+  if (GetSystemMetrics(SM_CXSCREEN ) < X + Width)
+    {
+      if (0 != XAnchor)
+        {
+          X -= Width - XAnchor;
+        }
+      if (GetSystemMetrics(SM_CXSCREEN) < X + Width)
+        {
+          X = GetSystemMetrics(SM_CXSCREEN) - Width;
+        }
+    }
+  if (X < 0 )
+    {
+      X = 0;
+    }
+
+  if (GetSystemMetrics(SM_CYSCREEN) < Y + Height)
+    {
+      if (0 != YAnchor)
+        {
+          Y -= Height + YAnchor;
+        }
+      if (GetSystemMetrics(SM_CYSCREEN) < Y + Height)
+        {
+          Y = GetSystemMetrics(SM_CYSCREEN) - Height;
+        }
+    }
+  if (Y < 0 )
+    {
+      Y = 0;
+    }
+
+
+  /* NOTE: In Windows, top menu popup is not owned. */
+  MenuInfo.Wnd = CreateWindowExW(0, POPUPMENU_CLASS_ATOMW, NULL,
+                                 WS_POPUP, X, Y, Width, Height,
+                                 WndOwner, 0, (HINSTANCE) GetWindowLongW(WndOwner, GWL_HINSTANCE),
+                                 (LPVOID) MenuInfo.Self);
+  if (NULL == MenuInfo.Wnd || ! MenuSetRosMenuInfo(&MenuInfo))
+    {
+      return FALSE;
+    }
+  if (NULL == TopPopup)
+    {
+      TopPopup = MenuInfo.Wnd;
+    }
+
+  /* Display the window */
+  SetWindowPos(MenuInfo.Wnd, HWND_TOPMOST, 0, 0, 0, 0,
+               SWP_SHOWWINDOW | SWP_NOSIZE | SWP_NOMOVE | SWP_NOACTIVATE);
+  UpdateWindow(MenuInfo.Wnd);
+
+  return TRUE;
+}
+
+/***********************************************************************
+ *           MenuFindSubMenu
+ *
+ * Find a Sub menu. Return the position of the submenu, and modifies
+ * *hmenu in case it is found in another sub-menu.
+ * If the submenu cannot be found, NO_SELECTED_ITEM is returned.
+ */
+static UINT FASTCALL
+MenuFindSubMenu(HMENU *Menu, HMENU SubTarget)
+{
+  ROSMENUINFO MenuInfo;
+  ROSMENUITEMINFO ItemInfo;
+  UINT i;
+  HMENU SubMenu;
+  UINT Pos;
+
+  if ((HMENU) 0xffff == *Menu
+      || ! MenuGetRosMenuInfo(&MenuInfo, *Menu))
+    {
+      return NO_SELECTED_ITEM;
+    }
+
+  MenuInitRosMenuItemInfo(&ItemInfo);
+  for (i = 0; i < MenuInfo.MenuItemCount; i++)
+    {
+      if (! MenuGetRosMenuItemInfo(MenuInfo.Self, i, &ItemInfo))
+        {
+          MenuCleanupRosMenuItemInfo(&ItemInfo);
+          return NO_SELECTED_ITEM;
+        }
+      if (0 == (ItemInfo.fType & MF_POPUP))
+        {
+          continue;
+        }
+      if (ItemInfo.hSubMenu == SubTarget)
+        {
+          MenuCleanupRosMenuItemInfo(&ItemInfo);
+          return i;
+        }
+      SubMenu = ItemInfo.hSubMenu;
+      Pos = MenuFindSubMenu(&SubMenu, SubTarget);
+      if (NO_SELECTED_ITEM != Pos)
+        {
+          *Menu = SubMenu;
+          return Pos;
+        }
+    }
+  MenuCleanupRosMenuItemInfo(&ItemInfo);
+
+  return NO_SELECTED_ITEM;
+}
+
+/***********************************************************************
+ *           MenuSelectItem
+ */
+static void FASTCALL
+MenuSelectItem(HWND WndOwner, PROSMENUINFO MenuInfo, UINT Index,
+               BOOL SendMenuSelect, HMENU TopMenu)
+{
+  HDC Dc;
+  ROSMENUITEMINFO ItemInfo;
+  ROSMENUINFO TopMenuInfo;
+  int Pos;
+
+  DPRINT("owner=%x menu=%p index=0x%04x select=0x%04x\n", WndOwner, MenuInfo, Index, SendMenuSelect);
+
+  if (NULL == MenuInfo || 0 == MenuInfo->MenuItemCount || NULL == MenuInfo->Wnd)
+    {
+      return;
+    }
+
+  if (MenuInfo->FocusedItem == Index)
+    {
+      return;
+    }
+
+  if (0 != (MenuInfo->Flags & MF_POPUP))
+    {
+      Dc = GetDC(MenuInfo->Wnd);
+    }
+  else
+    {
+      Dc = GetDCEx(MenuInfo->Wnd, 0, DCX_CACHE | DCX_WINDOW);
+    }
+
+  if (NULL == TopPopup)
+    {
+      TopPopup = MenuInfo->Wnd;
+    }
+
+  SelectObject(Dc, hMenuFont);
+  MenuInitRosMenuItemInfo(&ItemInfo);
+
+  /* Clear previous highlighted item */
+  if (NO_SELECTED_ITEM != MenuInfo->FocusedItem)
+    {
+      if (MenuGetRosMenuItemInfo(MenuInfo->Self, MenuInfo->FocusedItem, &ItemInfo))
+        {
+          ItemInfo.fState &= ~(MF_HILITE|MF_MOUSESELECT);
+          MenuSetRosMenuItemInfo(MenuInfo->Self, MenuInfo->FocusedItem, &ItemInfo);
+        }
+      MenuDrawMenuItem(MenuInfo->Wnd, MenuInfo, WndOwner, Dc, &ItemInfo,
+                       MenuInfo->Height, ! (MenuInfo->Flags & MF_POPUP),
+                       ODA_SELECT);
+    }
+
+  /* Highlight new item (if any) */
+  MenuInfo->FocusedItem = Index;
+  MenuSetRosMenuInfo(MenuInfo);
+  if (NO_SELECTED_ITEM != MenuInfo->FocusedItem)
+    {
+      if (MenuGetRosMenuItemInfo(MenuInfo->Self, MenuInfo->FocusedItem, &ItemInfo))
+        {
+          if (0 == (ItemInfo.fType & MF_SEPARATOR))
+            {
+              ItemInfo.fState |= MF_HILITE;
+              MenuSetRosMenuItemInfo(MenuInfo->Self, MenuInfo->FocusedItem, &ItemInfo);
+              MenuDrawMenuItem(MenuInfo->Wnd, MenuInfo, WndOwner, Dc,
+                               &ItemInfo, MenuInfo->Height, ! (MenuInfo->Flags & MF_POPUP),
+                               ODA_SELECT);
+            }
+          if (SendMenuSelect)
+            {
+              SendMessageW(WndOwner, WM_MENUSELECT,
+                           MAKELONG(ItemInfo.fType & MF_POPUP ? Index : ItemInfo.wID,
+                                    ItemInfo.fType | ItemInfo.fState | MF_MOUSESELECT |
+                                    (MenuInfo->Flags & MF_SYSMENU)), (LPARAM) MenuInfo->Self);
+            }
+        }
+    }
+  else if (SendMenuSelect)
+    {
+      if (NULL != TopMenu)
+        {
+          Pos = MenuFindSubMenu(&TopMenu, MenuInfo->Self);
+          if (NO_SELECTED_ITEM != Pos)
+            {
+              if (MenuGetRosMenuInfo(&TopMenuInfo, TopMenu)
+                  && MenuGetRosMenuItemInfo(TopMenu, Pos, &ItemInfo))
+                {
+                  SendMessageW(WndOwner, WM_MENUSELECT,
+                               MAKELONG(Pos, ItemInfo.fType | ItemInfo.fState
+                                             | MF_MOUSESELECT
+                                             | (TopMenuInfo.Flags & MF_SYSMENU)),
+                               (LPARAM) TopMenu);
+                }
+            }
+        }
+    }
+
+  MenuCleanupRosMenuItemInfo(&ItemInfo);
+  ReleaseDC(MenuInfo->Wnd, Dc);
+}
+
+/***********************************************************************
+ *           MenuMoveSelection
+ *
+ * Moves currently selected item according to the Offset parameter.
+ * If there is no selection then it should select the last item if
+ * Offset is ITEM_PREV or the first item if Offset is ITEM_NEXT.
+ */
+static void FASTCALL
+MenuMoveSelection(HWND WndOwner, PROSMENUINFO MenuInfo, INT Offset)
+{
+  INT i;
+  ROSMENUITEMINFO ItemInfo;
+  INT OrigPos;
+
+  DPRINT("hwnd=%x menu=%x off=0x%04x\n", WndOwner, MenuInfo, Offset);
+
+  /* Prevent looping */
+  if (0 == MenuInfo->MenuItemCount || 0 == Offset)
+    return;
+  else if (Offset < -1)
+    Offset = -1;
+  else if (Offset > 1)
+    Offset = 1;
+
+  MenuInitRosMenuItemInfo(&ItemInfo);
+
+  OrigPos = MenuInfo->FocusedItem;
+  if (OrigPos == NO_SELECTED_ITEM) /* NO_SELECTED_ITEM is not -1 ! */
+    {
+       OrigPos = 0;
+       i = -1;
+    }
+  else
+    {
+      i = MenuInfo->FocusedItem;
+    }
+
+  do
+    {
+      /* Step */
+      i += Offset;
+      /* Clip and wrap around */
+      if (i < 0)
+        {
+          i = MenuInfo->MenuItemCount - 1;
+        }
+      else if (i >= MenuInfo->MenuItemCount)
+        {
+          i = 0;
+        }
+      /* If this is a good candidate; */
+      if (MenuGetRosMenuItemInfo(MenuInfo->Self, i, &ItemInfo) &&
+          0 == (ItemInfo.fType & MF_SEPARATOR) &&
+          0 == (ItemInfo.fState & (MFS_DISABLED | MFS_GRAYED)) )
+        {
+          MenuSelectItem(WndOwner, MenuInfo, i, TRUE, NULL);
+          MenuCleanupRosMenuItemInfo(&ItemInfo);
+          return;
+        }
+    } while (i != OrigPos);
+
+  /* Not found */
+  MenuCleanupRosMenuItemInfo(&ItemInfo);
+}
+
+/***********************************************************************
+ *           MenuInitSysMenuPopup
+ *
+ * Grey the appropriate items in System menu.
+ */
+void FASTCALL
+MenuInitSysMenuPopup(HMENU Menu, DWORD Style, DWORD ClsStyle, LONG HitTest )
+{
+  BOOL Gray;
+  UINT DefItem;
+  #if 0
+  MENUITEMINFOW mii;
+  #endif
+
+  Gray = 0 == (Style & WS_THICKFRAME) || 0 != (Style & (WS_MAXIMIZE | WS_MINIMIZE));
+  EnableMenuItem(Menu, SC_SIZE, (Gray ? MF_GRAYED : MF_ENABLED));
+  Gray = 0 != (Style & WS_MAXIMIZE);
+  EnableMenuItem(Menu, SC_MOVE, (Gray ? MF_GRAYED : MF_ENABLED));
+  Gray = 0 == (Style & WS_MINIMIZEBOX) || 0 != (Style & WS_MINIMIZE);
+  EnableMenuItem(Menu, SC_MINIMIZE, (Gray ? MF_GRAYED : MF_ENABLED));
+  Gray = 0 == (Style & WS_MAXIMIZEBOX) || 0 != (Style & WS_MAXIMIZE);
+  EnableMenuItem(Menu, SC_MAXIMIZE, (Gray ? MF_GRAYED : MF_ENABLED));
+  Gray = 0 == (Style & (WS_MAXIMIZE | WS_MINIMIZE));
+  EnableMenuItem(Menu, SC_RESTORE, (Gray ? MF_GRAYED : MF_ENABLED));
+  Gray = 0 != (ClsStyle & CS_NOCLOSE);
+
+  /* The menu item must keep its state if it's disabled */
+  if (Gray)
+    {
+      EnableMenuItem(Menu, SC_CLOSE, MF_GRAYED);
+    }
+
+  /* Set default menu item */
+  if(Style & WS_MINIMIZE)
+  {
+    DefItem = SC_RESTORE;
+  }
+  else
+  {
+    if(HitTest == HTCAPTION)
+    {
+      DefItem = ((Style & (WS_MAXIMIZE | WS_MINIMIZE)) ? SC_RESTORE : SC_MAXIMIZE);
+    }
+    else
+    {
+      DefItem = SC_CLOSE;
+    }
+  }
+  #if 0
+  mii.cbSize = sizeof(MENUITEMINFOW);
+  mii.fMask = MIIM_STATE;
+  if((DefItem != SC_CLOSE) && GetMenuItemInfoW(Menu, DefItem, FALSE, &mii) &&
+     (mii.fState & (MFS_GRAYED | MFS_DISABLED)))
+  {
+    DefItem = SC_CLOSE;
+  }
+  #endif
+  SetMenuDefaultItem(Menu, DefItem, MF_BYCOMMAND);
+}
+
+/***********************************************************************
+ *           MenuShowSubPopup
+ *
+ * Display the sub-menu of the selected item of this menu.
+ * Return the handle of the submenu, or menu if no submenu to display.
+ */
+static HMENU FASTCALL
+MenuShowSubPopup(HWND WndOwner, PROSMENUINFO MenuInfo, BOOL SelectFirst, UINT Flags)
+{
+  extern void FASTCALL NcGetSysPopupPos(HWND Wnd, RECT *Rect);
+  RECT Rect;
+  ROSMENUITEMINFO ItemInfo;
+  ROSMENUINFO SubMenuInfo;
+  HDC Dc;
+  HMENU Ret;
+
+  DPRINT("owner=%x menu=%p 0x%04x\n", WndOwner, MenuInfo, SelectFirst);
+
+  if (NO_SELECTED_ITEM == MenuInfo->FocusedItem)
+    {
+      return MenuInfo->Self;
+    }
+
+  MenuInitRosMenuItemInfo(&ItemInfo);
+  if (! MenuGetRosMenuItemInfo(MenuInfo->Self, MenuInfo->FocusedItem, &ItemInfo))
+    {
+      MenuCleanupRosMenuItemInfo(&ItemInfo);
+      return MenuInfo->Self;
+    }
+  if (0 == (ItemInfo.fType & MF_POPUP) || 0 != (ItemInfo.fState & (MF_GRAYED | MF_DISABLED)))
+    {
+      MenuCleanupRosMenuItemInfo(&ItemInfo);
+      return MenuInfo->Self;
+    }
+
+  /* message must be sent before using item,
+     because nearly everything may be changed by the application ! */
+
+  /* Send WM_INITMENUPOPUP message only if TPM_NONOTIFY flag is not specified */
+  if (0 == (Flags & TPM_NONOTIFY))
+    {
+      SendMessageW(WndOwner, WM_INITMENUPOPUP, (WPARAM) ItemInfo.hSubMenu,
+                   MAKELONG(MenuInfo->FocusedItem, IS_SYSTEM_MENU(MenuInfo)));
+    }
+
+  if (! MenuGetRosMenuItemInfo(MenuInfo->Self, MenuInfo->FocusedItem, &ItemInfo))
+    {
+      MenuCleanupRosMenuItemInfo(&ItemInfo);
+      return MenuInfo->Self;
+    }
+  Rect = ItemInfo.Rect;
+
+  /* correct item if modified as a reaction to WM_INITMENUPOPUP message */
+  if (0 == (ItemInfo.fState & MF_HILITE))
+    {
+      if (0 != (MenuInfo->Flags & MF_POPUP))
+        {
+          Dc = GetDC(MenuInfo->Wnd);
+        }
+      else
+        {
+          Dc = GetDCEx(MenuInfo->Wnd, 0, DCX_CACHE | DCX_WINDOW);
+        }
+
+      SelectObject(Dc, hMenuFont);
+
+      ItemInfo.fState |= MF_HILITE;
+      MenuSetRosMenuItemInfo(MenuInfo->Self, MenuInfo->FocusedItem, &ItemInfo);
+      MenuDrawMenuItem(MenuInfo->Wnd, MenuInfo, WndOwner, Dc, &ItemInfo, MenuInfo->Height,
+                       ! (MenuInfo->Flags & MF_POPUP), ODA_DRAWENTIRE);
+      ReleaseDC(MenuInfo->Wnd, Dc);
+    }
+
+  if (0 == ItemInfo.Rect.top && 0 == ItemInfo.Rect.left
+      && 0 == ItemInfo.Rect.bottom && 0 == ItemInfo.Rect.right)
+    {
+      ItemInfo.Rect = Rect;
+    }
+
+  ItemInfo.fState |= MF_MOUSESELECT;
+
+  MenuSetRosMenuItemInfo(MenuInfo->Self, MenuInfo->FocusedItem, &ItemInfo);
+
+  if (IS_SYSTEM_MENU(MenuInfo))
+    {
+      MenuInitSysMenuPopup(ItemInfo.hSubMenu, GetWindowLongW(MenuInfo->Wnd, GWL_STYLE),
+                           GetClassLongW(MenuInfo->Wnd, GCL_STYLE), HTSYSMENU);
+
+      NcGetSysPopupPos(MenuInfo->Wnd, &Rect);
+      Rect.top = Rect.bottom;
+      Rect.right = GetSystemMetrics(SM_CXSIZE);
+      Rect.bottom = GetSystemMetrics(SM_CYSIZE);
+    }
+  else
+    {
+      GetWindowRect(MenuInfo->Wnd, &Rect);
+      if (0 != (MenuInfo->Flags & MF_POPUP))
+       {
+          Rect.left += ItemInfo.Rect.right - GetSystemMetrics(SM_CXBORDER);
+          Rect.top += ItemInfo.Rect.top;
+          Rect.right = ItemInfo.Rect.left - ItemInfo.Rect.right + GetSystemMetrics(SM_CXBORDER);
+          Rect.bottom = ItemInfo.Rect.top - ItemInfo.Rect.bottom;
+        }
+      else
+        {
+          Rect.left += ItemInfo.Rect.left;
+          Rect.top += ItemInfo.Rect.bottom;
+          Rect.right = ItemInfo.Rect.right - ItemInfo.Rect.left;
+          Rect.bottom = ItemInfo.Rect.bottom - ItemInfo.Rect.top;
+        }
+    }
+
+  MenuShowPopup(WndOwner, ItemInfo.hSubMenu, MenuInfo->FocusedItem,
+                Rect.left, Rect.top, Rect.right, Rect.bottom );
+  if (SelectFirst && MenuGetRosMenuInfo(&SubMenuInfo, ItemInfo.hSubMenu))
+    {
+      MenuMoveSelection(WndOwner, &SubMenuInfo, ITEM_NEXT);
+    }
+
+  Ret = ItemInfo.hSubMenu;
+  MenuCleanupRosMenuItemInfo(&ItemInfo);
+
+  return Ret;
+}
+
+/***********************************************************************
+ *           MenuHideSubPopups
+ *
+ * Hide the sub-popup menus of this menu.
+ */
+static void FASTCALL
+MenuHideSubPopups(HWND WndOwner, PROSMENUINFO MenuInfo, BOOL SendMenuSelect)
+{
+  ROSMENUINFO SubMenuInfo;
+  ROSMENUITEMINFO ItemInfo;
+
+  DPRINT("owner=%x menu=%x 0x%04x\n", WndOwner, MenuInfo, SendMenuSelect);
+
+  if (NULL != MenuInfo && NULL != TopPopup && NO_SELECTED_ITEM != MenuInfo->FocusedItem)
+    {
+      MenuInitRosMenuItemInfo(&ItemInfo);
+      if (! MenuGetRosMenuItemInfo(MenuInfo->Self, MenuInfo->FocusedItem, &ItemInfo)
+          || 0 == (ItemInfo.fType & MF_POPUP)
+          || 0 == (ItemInfo.fState & MF_MOUSESELECT))
+        {
+          MenuCleanupRosMenuItemInfo(&ItemInfo);
+          return;
+        }
+      ItemInfo.fState &= ~MF_MOUSESELECT;
+      MenuSetRosMenuItemInfo(MenuInfo->Self, MenuInfo->FocusedItem, &ItemInfo);
+      if (MenuGetRosMenuInfo(&SubMenuInfo, ItemInfo.hSubMenu))
+        {
+          MenuHideSubPopups(WndOwner, &SubMenuInfo, FALSE);
+          MenuSelectItem(WndOwner, &SubMenuInfo, NO_SELECTED_ITEM, SendMenuSelect, NULL);
+          DestroyWindow(SubMenuInfo.Wnd);
+          SubMenuInfo.Wnd = NULL;
+          MenuSetRosMenuInfo(&SubMenuInfo);
+        }
+    }
+}
+
+/***********************************************************************
+ *           MenuSwitchTracking
+ *
+ * Helper function for menu navigation routines.
+ */
+static void FASTCALL
+MenuSwitchTracking(MTRACKER* Mt, PROSMENUINFO PtMenuInfo, UINT Index)
+{
+  ROSMENUINFO TopMenuInfo;
+
+  DPRINT("%x menu=%x 0x%04x\n", Mt, PtMenuInfo->Self, Index);
+
+  if (MenuGetRosMenuInfo(&TopMenuInfo, Mt->TopMenu) &&
+      Mt->TopMenu != PtMenuInfo->Self &&
+      0 == ((PtMenuInfo->Flags | TopMenuInfo.Flags) & MF_POPUP))
+    {
+      /* both are top level menus (system and menu-bar) */
+      MenuHideSubPopups(Mt->OwnerWnd, &TopMenuInfo, FALSE);
+      MenuSelectItem(Mt->OwnerWnd, &TopMenuInfo, NO_SELECTED_ITEM, FALSE, NULL);
+      Mt->TopMenu = PtMenuInfo->Self;
+    }
+  else
+    {
+      MenuHideSubPopups(Mt->OwnerWnd, PtMenuInfo, FALSE);
+    }
+
+  MenuSelectItem(Mt->OwnerWnd, PtMenuInfo, Index, TRUE, NULL);
+}
+
+/***********************************************************************
+ *           MenuExecFocusedItem
+ *
+ * Execute a menu item (for instance when user pressed Enter).
+ * Return the wID of the executed item. Otherwise, -1 indicating
+ * that no menu item was executed;
+ * Have to receive the flags for the TrackPopupMenu options to avoid
+ * sending unwanted message.
+ *
+ */
+static INT FASTCALL
+MenuExecFocusedItem(MTRACKER *Mt, PROSMENUINFO MenuInfo, UINT Flags)
+{
+  ROSMENUITEMINFO ItemInfo;
+  UINT wID;
+
+  DPRINT("%p menu=%p\n", Mt, MenuInfo);
+
+  if (0 == MenuInfo->MenuItemCount || NO_SELECTED_ITEM == MenuInfo->FocusedItem)
+    {
+      return -1;
+    }
+
+  MenuInitRosMenuItemInfo(&ItemInfo);
+  if (! MenuGetRosMenuItemInfo(MenuInfo->Self, MenuInfo->FocusedItem, &ItemInfo))
+    {
+      MenuCleanupRosMenuItemInfo(&ItemInfo);
+      return -1;
+    }
+
+  DPRINT("%p %08x %p\n", MenuInfo, ItemInfo.wID, ItemInfo.hSubMenu);
+
+  if (0 == (ItemInfo.fType & MF_POPUP))
+    {
+      if (0 == (ItemInfo.fState & (MF_GRAYED | MF_DISABLED))
+          && 0 == (ItemInfo.fType & MF_SEPARATOR))
+        {
+          /* If TPM_RETURNCMD is set you return the id, but
+            do not send a message to the owner */
+          if (0 == (Flags & TPM_RETURNCMD))
+           {
+              if (0 != (MenuInfo->Flags & MF_SYSMENU))
+                {
+                  PostMessageW(Mt->OwnerWnd, WM_SYSCOMMAND, ItemInfo.wID,
+                               MAKELPARAM((SHORT) Mt->Pt.x, (SHORT) Mt->Pt.y));
+                }
+              else
+                {
+                  PostMessageW(Mt->OwnerWnd, WM_COMMAND, ItemInfo.wID, 0);
+                }
+            }
+          wID = ItemInfo.wID;
+          MenuCleanupRosMenuItemInfo(&ItemInfo);
+         return wID;
+        }
+    }
+  else
+    {
+      Mt->CurrentMenu = MenuShowSubPopup(Mt->OwnerWnd, MenuInfo, TRUE, Flags);
+    }
+
+  return -1;
+}
+
+/***********************************************************************
+ *           MenuButtonDown
+ *
+ * Return TRUE if we can go on with menu tracking.
+ */
+static BOOL FASTCALL
+MenuButtonDown(MTRACKER* Mt, HMENU PtMenu, UINT Flags)
+{
+  int Index;
+  ROSMENUINFO MenuInfo;
+  ROSMENUITEMINFO Item;
+
+  DPRINT("%x PtMenu=%p\n", Mt, PtMenu);
+
+  if (NULL != PtMenu)
+    {
+      if (! MenuGetRosMenuInfo(&MenuInfo, PtMenu))
+        {
+          return FALSE;
+        }
+      if (IS_SYSTEM_MENU(&MenuInfo))
+        {
+          Index = 0;
+        }
+      else
+        {
+          Index = NtUserMenuItemFromPoint(Mt->OwnerWnd, PtMenu, Mt->Pt.x, Mt->Pt.y);
+        }
+      MenuInitRosMenuItemInfo(&Item);
+      if (NO_SELECTED_ITEM == Index || ! MenuGetRosMenuItemInfo(PtMenu, Index, &Item))
+        {
+          MenuCleanupRosMenuItemInfo(&Item);
+          return FALSE;
+        }
+
+      if (!(Item.fType & MF_SEPARATOR) &&
+          !(Item.fState & (MFS_DISABLED | MFS_GRAYED)) )
+       {
+          if (MenuInfo.FocusedItem != Index)
+            {
+              MenuSwitchTracking(Mt, &MenuInfo, Index);
+            }
+
+          /* If the popup menu is not already "popped" */
+          if (0 == (Item.fState & MF_MOUSESELECT))
+            {
+              Mt->CurrentMenu = MenuShowSubPopup(Mt->OwnerWnd, &MenuInfo, FALSE, Flags);
+            }
+        }
+
+      MenuCleanupRosMenuItemInfo(&Item);
+
+      return TRUE;
+    }
+
+  /* else the click was on the menu bar, finish the tracking */
+
+  return FALSE;
+}
+
+/***********************************************************************
+ *           MenuButtonUp
+ *
+ * Return the value of MenuExecFocusedItem if
+ * the selected item was not a popup. Else open the popup.
+ * A -1 return value indicates that we go on with menu tracking.
+ *
+ */
+static INT FASTCALL
+MenuButtonUp(MTRACKER *Mt, HMENU PtMenu, UINT Flags)
+{
+  UINT Id;
+  ROSMENUINFO MenuInfo;
+  ROSMENUITEMINFO ItemInfo;
+
+  DPRINT("%p hmenu=%x\n", Mt, PtMenu);
+
+  if (NULL != PtMenu)
+    {
+      Id = 0;
+      if (! MenuGetRosMenuInfo(&MenuInfo, PtMenu))
+        {
+          return -1;
+        }
+
+      if (! IS_SYSTEM_MENU(&MenuInfo))
+        {
+          Id = NtUserMenuItemFromPoint(Mt->OwnerWnd, MenuInfo.Self, Mt->Pt.x, Mt->Pt.y);
+        }
+      MenuInitRosMenuItemInfo(&ItemInfo);
+      if (0 <= Id && MenuGetRosMenuItemInfo(MenuInfo.Self, Id, &ItemInfo) &&
+          MenuInfo.FocusedItem == Id)
+        {
+          if (0 == (ItemInfo.fType & MF_POPUP))
+            {
+              MenuCleanupRosMenuItemInfo(&ItemInfo);
+              return MenuExecFocusedItem(Mt, &MenuInfo, Flags);
+            }
+          MenuCleanupRosMenuItemInfo(&ItemInfo);
+
+          /* If we are dealing with the top-level menu            */
+          /* and this is a click on an already "popped" item:     */
+          /* Stop the menu tracking and close the opened submenus */
+          if (Mt->TopMenu == MenuInfo.Self && MenuInfo.TimeToHide)
+            {
+              MenuCleanupRosMenuItemInfo(&ItemInfo);
+              return 0;
+            }
+        }
+      MenuCleanupRosMenuItemInfo(&ItemInfo);
+      MenuInfo.TimeToHide = TRUE;
+      MenuSetRosMenuInfo(&MenuInfo);
+    }
+
+  return -1;
+}
+
+/***********************************************************************
+ *           MenuPtMenu
+ *
+ * Walks menu chain trying to find a menu pt maps to.
+ */
+static HMENU FASTCALL
+MenuPtMenu(HMENU Menu, POINT Pt)
+{
+  extern LRESULT DefWndNCHitTest(HWND hWnd, POINT Point);
+  ROSMENUINFO MenuInfo;
+  ROSMENUITEMINFO ItemInfo;
+  HMENU Ret = NULL;
+  INT Ht;
+
+  if (! MenuGetRosMenuInfo(&MenuInfo, Menu))
+    {
+      return NULL;
+    }
+
+  /* try subpopup first (if any) */
+  if (NO_SELECTED_ITEM != MenuInfo.FocusedItem)
+    {
+      MenuInitRosMenuItemInfo(&ItemInfo);
+      if (MenuGetRosMenuItemInfo(MenuInfo.Self, MenuInfo.FocusedItem, &ItemInfo) &&
+          0 != (ItemInfo.fType & MF_POPUP) &&
+          0 != (ItemInfo.fState & MF_MOUSESELECT))
+        {
+          Ret = MenuPtMenu(ItemInfo.hSubMenu, Pt);
+          if (NULL != Ret)
+            {
+              MenuCleanupRosMenuItemInfo(&ItemInfo);
+              return Ret;
+            }
+        }
+      MenuCleanupRosMenuItemInfo(&ItemInfo);
+    }
+
+  /* check the current window (avoiding WM_HITTEST) */
+  Ht = DefWndNCHitTest(MenuInfo.Wnd, Pt);
+  if (0 != (MenuInfo.Flags & MF_POPUP))
+    {
+      if (HTNOWHERE != Ht && HTERROR != Ht)
+        {
+          Ret = Menu;
+        }
+    }
+  else if (HTSYSMENU == Ht)
+    {
+      Ret = NtUserGetSystemMenu(MenuInfo.Wnd, FALSE);
+    }
+  else if (HTMENU == Ht)
+    {
+      Ret = GetMenu(MenuInfo.Wnd);
+    }
+
+  return Ret;
+}
+
+/***********************************************************************
+ *           MenuMouseMove
+ *
+ * Return TRUE if we can go on with menu tracking.
+ */
+static BOOL FASTCALL
+MenuMouseMove(MTRACKER *Mt, HMENU PtMenu, UINT Flags)
+{
+  UINT Index;
+  ROSMENUINFO MenuInfo;
+  ROSMENUITEMINFO ItemInfo;
+
+  if (NULL != PtMenu)
+    {
+      if (! MenuGetRosMenuInfo(&MenuInfo, PtMenu))
+        {
+          return TRUE;
+        }
+      if (IS_SYSTEM_MENU(&MenuInfo))
+        {
+          Index = 0;
+        }
+      else
+        {
+          Index = NtUserMenuItemFromPoint(Mt->OwnerWnd, PtMenu, Mt->Pt.x, Mt->Pt.y);
+        }
+    }
+  else
+    {
+      Index = NO_SELECTED_ITEM;
+    }
+
+  if (NO_SELECTED_ITEM == Index)
+    {
+      if (Mt->CurrentMenu == MenuInfo.Self ||
+          MenuGetRosMenuInfo(&MenuInfo, Mt->CurrentMenu))
+        {
+          MenuSelectItem(Mt->OwnerWnd, &MenuInfo, NO_SELECTED_ITEM,
+                         TRUE, Mt->TopMenu);
+        }
+    }
+  else if (MenuInfo.FocusedItem != Index)
+    {
+       MenuInitRosMenuItemInfo(&ItemInfo);
+       if (MenuGetRosMenuItemInfo(MenuInfo.Self, Index, &ItemInfo) &&
+           !(ItemInfo.fType & MF_SEPARATOR) &&
+           !(ItemInfo.fState & (MFS_DISABLED | MFS_GRAYED)) )
+       {
+           MenuSwitchTracking(Mt, &MenuInfo, Index);
+           Mt->CurrentMenu = MenuShowSubPopup(Mt->OwnerWnd, &MenuInfo, FALSE, Flags);
+       }
+       MenuCleanupRosMenuItemInfo(&ItemInfo);
+    }
+
+  return TRUE;
+}
+
+/******************************************************************************
+ *
+ *   UINT MenuGetStartOfNextColumn(PROSMENUINFO MenuInfo)
+ */
+static UINT MenuGetStartOfNextColumn(PROSMENUINFO MenuInfo)
+{
+  UINT i;
+  PROSMENUITEMINFO MenuItems;
+
+  i = MenuInfo->FocusedItem;
+  if (NO_SELECTED_ITEM == i)
+    {
+      return i;
+    }
+
+  if (MenuGetAllRosMenuItemInfo(MenuInfo->Self, &MenuItems) <= 0)
+    {
+      return NO_SELECTED_ITEM;
+    }
+
+  for (i++ ; i < MenuInfo->MenuItemCount; i++)
+    {
+      if (0 != (MenuItems[i].fType & MF_MENUBARBREAK))
+        {
+          return i;
+        }
+    }
+
+  return NO_SELECTED_ITEM;
+}
+
+/******************************************************************************
+ *
+ *   UINT MenuGetStartOfPrevColumn(PROSMENUINFO MenuInfo)
+ */
+static UINT FASTCALL
+MenuGetStartOfPrevColumn(PROSMENUINFO MenuInfo)
+{
+  UINT i;
+  PROSMENUITEMINFO MenuItems;
+
+  if (0 == MenuInfo->FocusedItem || NO_SELECTED_ITEM == MenuInfo->FocusedItem)
+    {
+      return NO_SELECTED_ITEM;
+    }
+
+  if (MenuGetAllRosMenuItemInfo(MenuInfo->Self, &MenuItems) <= 0)
+    {
+      return NO_SELECTED_ITEM;
+    }
+
+  /* Find the start of the column */
+
+  for (i = MenuInfo->FocusedItem;
+       0 != i && 0 == (MenuItems[i].fType & MF_MENUBARBREAK);
+       --i)
+    {
+      ; /* empty */
+    }
+
+  if (0 == i)
+    {
+      MenuCleanupAllRosMenuItemInfo(MenuItems);
+      return NO_SELECTED_ITEM;
+    }
+
+  for (--i; 0 != i; --i)
+    {
+      if (MenuItems[i].fType & MF_MENUBARBREAK)
+        {
+          break;
+        }
+    }
+
+  MenuCleanupAllRosMenuItemInfo(MenuItems);
+  DPRINT("ret %d.\n", i );
+
+  return i;
+}
+
+/***********************************************************************
+ *           MenuGetSubPopup
+ *
+ * Return the handle of the selected sub-popup menu (if any).
+ */
+static HMENU FASTCALL
+MenuGetSubPopup(HMENU Menu)
+{
+  ROSMENUINFO MenuInfo;
+  ROSMENUITEMINFO ItemInfo;
+
+  if (! MenuGetRosMenuInfo(&MenuInfo, Menu)
+      || NO_SELECTED_ITEM == MenuInfo.FocusedItem)
+    {
+      return NULL;
+    }
+
+  MenuInitRosMenuItemInfo(&ItemInfo);
+  if (! MenuGetRosMenuItemInfo(MenuInfo.Self, MenuInfo.FocusedItem, &ItemInfo))
+    {
+      MenuCleanupRosMenuItemInfo(&ItemInfo);
+      return NULL;
+    }
+  if (0 != (ItemInfo.fType & MF_POPUP) && 0 != (ItemInfo.fState & MF_MOUSESELECT))
+    {
+      MenuCleanupRosMenuItemInfo(&ItemInfo);
+      return ItemInfo.hSubMenu;
+    }
+
+  MenuCleanupRosMenuItemInfo(&ItemInfo);
+  return NULL;
+}
+
+/***********************************************************************
+ *           MenuDoNextMenu
+ *
+ * NOTE: WM_NEXTMENU documented in Win32 is a bit different.
+ */
+static LRESULT FASTCALL
+MenuDoNextMenu(MTRACKER* Mt, UINT Vk)
+{
+  ROSMENUINFO TopMenuInfo;
+  ROSMENUINFO MenuInfo;
+
+  if (! MenuGetRosMenuInfo(&TopMenuInfo, Mt->TopMenu))
+    {
+      return (LRESULT) FALSE;
+    }
+
+  if ((VK_LEFT == Vk && 0 == TopMenuInfo.FocusedItem)
+      || (VK_RIGHT == Vk && TopMenuInfo.FocusedItem == TopMenuInfo.MenuItemCount - 1))
+    {
+      MDINEXTMENU NextMenu;
+      HMENU NewMenu;
+      HWND NewWnd;
+      UINT Id = 0;
+
+      NextMenu.hmenuIn = (IS_SYSTEM_MENU(&TopMenuInfo)) ? GetSubMenu(Mt->TopMenu, 0) : Mt->TopMenu;
+      NextMenu.hmenuNext = NULL;
+      NextMenu.hwndNext = NULL;
+      SendMessageW(Mt->OwnerWnd, WM_NEXTMENU, Vk, (LPARAM) &NextMenu);
+
+      DPRINT("%p [%p] -> %p [%p]\n",
+             Mt->CurrentMenu, Mt->OwnerWnd, NextMenu.hmenuNext, NextMenu.hwndNext );
+
+      if (NULL == NextMenu.hmenuNext || NULL == NextMenu.hwndNext)
+        {
+          DWORD Style = GetWindowLongW(Mt->OwnerWnd, GWL_STYLE);
+          NewWnd = Mt->OwnerWnd;
+          if (IS_SYSTEM_MENU(&TopMenuInfo))
+            {
+              /* switch to the menu bar */
+
+              if (0 != (Style & WS_CHILD)
+                  || NULL == (NewMenu = GetMenu(NewWnd)))
+                {
+                  return FALSE;
+                }
+
+              if (VK_LEFT == Vk)
+                {
+                  if (! MenuGetRosMenuInfo(&MenuInfo, NewMenu))
+                    {
+                      return FALSE;
+                    }
+                  Id = MenuInfo.MenuItemCount - 1;
+                }
+            }
+          else if (0 != (Style & WS_SYSMENU))
+            {
+              /* switch to the system menu */
+              NewMenu = NtUserGetSystemMenu(NewWnd, FALSE);
+            }
+          else
+            {
+              return FALSE;
+            }
+        }
+      else    /* application returned a new menu to switch to */
+        {
+          NewMenu = NextMenu.hmenuNext;
+          NewWnd = NextMenu.hwndNext;
+
+          if (IsMenu(NewMenu) && IsWindow(NewWnd))
+            {
+              DWORD Style = GetWindowLongW(NewWnd, GWL_STYLE);
+
+              if (0 != (Style & WS_SYSMENU)
+                  && GetSystemMenu(NewWnd, FALSE) == NewMenu)
+                {
+                  /* get the real system menu */
+                  NewMenu = NtUserGetSystemMenu(NewWnd, FALSE);
+                }
+              else if (0 != (Style & WS_CHILD) || GetMenu(NewWnd) != NewMenu)
+                {
+                  /* FIXME: Not sure what to do here;
+                   * perhaps try to track NewMenu as a popup? */
+
+                  DPRINT(" -- got confused.\n");
+                  return FALSE;
+                }
+            }
+          else
+            {
+              return FALSE;
+            }
+        }
+
+      if (NewMenu != Mt->TopMenu)
+        {
+          MenuSelectItem(Mt->OwnerWnd, &TopMenuInfo, NO_SELECTED_ITEM,
+                         FALSE, 0 );
+          if (Mt->CurrentMenu != Mt->TopMenu)
+            {
+              MenuHideSubPopups(Mt->OwnerWnd, &TopMenuInfo, FALSE);
+            }
+        }
+
+      if (NewWnd != Mt->OwnerWnd)
+        {
+          Mt->OwnerWnd = NewWnd;
+          SetCapture(Mt->OwnerWnd);
+          NtUserSetGUIThreadHandle(MSQ_STATE_MENUOWNER, Mt->OwnerWnd);
+        }
+
+      Mt->TopMenu = Mt->CurrentMenu = NewMenu; /* all subpopups are hidden */
+      if (MenuGetRosMenuInfo(&TopMenuInfo, Mt->TopMenu))
+        {
+          MenuSelectItem(Mt->OwnerWnd, &TopMenuInfo, Id, TRUE, 0);
+        }
+
+      return TRUE;
+    }
+
+  return FALSE;
+}
+
+/***********************************************************************
+ *           MenuSuspendPopup
+ *
+ * The idea is not to show the popup if the next input message is
+ * going to hide it anyway.
+ */
+static BOOL FASTCALL
+MenuSuspendPopup(MTRACKER* Mt, UINT Message)
+{
+  MSG Msg;
+
+  Msg.hwnd = Mt->OwnerWnd;
+
+  PeekMessageW(&Msg, 0, 0, 0, PM_NOYIELD | PM_REMOVE);
+  Mt->TrackFlags |= TF_SKIPREMOVE;
+
+  switch (Message)
+    {
+      case WM_KEYDOWN:
+        PeekMessageW(&Msg, 0, 0, 0, PM_NOYIELD | PM_NOREMOVE);
+        if (WM_KEYUP == Msg.message || WM_PAINT == Msg.message)
+          {
+            PeekMessageW(&Msg, 0, 0, 0, PM_NOYIELD | PM_REMOVE);
+            PeekMessageW(&Msg, 0, 0, 0, PM_NOYIELD | PM_NOREMOVE);
+            if (WM_KEYDOWN == Msg.message
+                && (VK_LEFT == Msg.wParam || VK_RIGHT == Msg.wParam))
+              {
+                Mt->TrackFlags |= TF_SUSPENDPOPUP;
+                return TRUE;
+              }
+          }
+        break;
+    }
+
+  /* failures go through this */
+  Mt->TrackFlags &= ~TF_SUSPENDPOPUP;
+
+  return FALSE;
+}
+
+/***********************************************************************
+ *           MenuKeyEscape
+ *
+ * Handle a VK_ESCAPE key event in a menu.
+ */
+static BOOL FASTCALL
+MenuKeyEscape(MTRACKER *Mt, UINT Flags)
+{
+  BOOL EndMenu = TRUE;
+  ROSMENUINFO MenuInfo;
+  HMENU MenuTmp, MenuPrev;
+
+  if (Mt->CurrentMenu != Mt->TopMenu)
+    {
+      if (MenuGetRosMenuInfo(&MenuInfo, Mt->CurrentMenu)
+          && 0 != (MenuInfo.Flags & MF_POPUP))
+        {
+          MenuPrev = MenuTmp = Mt->TopMenu;
+
+          /* close topmost popup */
+          while (MenuTmp != Mt->CurrentMenu)
+            {
+              MenuPrev = MenuTmp;
+              MenuTmp = MenuGetSubPopup(MenuPrev);
+            }
+
+          if (MenuGetRosMenuInfo(&MenuInfo, MenuPrev))
+            {
+              MenuHideSubPopups(Mt->OwnerWnd, &MenuInfo, TRUE);
+            }
+          Mt->CurrentMenu = MenuPrev;
+          EndMenu = FALSE;
+        }
+    }
+
+  return EndMenu;
+}
+
+/***********************************************************************
+ *           MenuKeyLeft
+ *
+ * Handle a VK_LEFT key event in a menu.
+ */
+static void FASTCALL
+MenuKeyLeft(MTRACKER* Mt, UINT Flags)
+{
+  ROSMENUINFO MenuInfo;
+  ROSMENUINFO TopMenuInfo;
+  ROSMENUINFO PrevMenuInfo;
+  HMENU MenuTmp, MenuPrev;
+  UINT PrevCol;
+
+  MenuPrev = MenuTmp = Mt->TopMenu;
+
+  if (! MenuGetRosMenuInfo(&MenuInfo, Mt->CurrentMenu))
+    {
+      return;
+    }
+
+  /* Try to move 1 column left (if possible) */
+  if (NO_SELECTED_ITEM != (PrevCol = MenuGetStartOfPrevColumn(&MenuInfo)))
+    {
+      if (MenuGetRosMenuInfo(&MenuInfo, Mt->CurrentMenu))
+        {
+          MenuSelectItem(Mt->OwnerWnd, &MenuInfo, PrevCol, TRUE, 0);
+        }
+      return;
+    }
+
+  /* close topmost popup */
+  while (MenuTmp != Mt->CurrentMenu)
+    {
+      MenuPrev = MenuTmp;
+      MenuTmp = MenuGetSubPopup(MenuPrev);
+    }
+
+  if (! MenuGetRosMenuInfo(&PrevMenuInfo, MenuPrev))
+    {
+      return;
+    }
+  MenuHideSubPopups(Mt->OwnerWnd, &PrevMenuInfo, TRUE);
+  Mt->CurrentMenu = MenuPrev;
+
+  if (! MenuGetRosMenuInfo(&TopMenuInfo, Mt->TopMenu))
+    {
+      return;
+    }
+  if ((MenuPrev == Mt->TopMenu) && 0 == (TopMenuInfo.Flags & MF_POPUP))
+    {
+      /* move menu bar selection if no more popups are left */
+
+      if (! MenuDoNextMenu(Mt, VK_LEFT))
+        {
+          MenuMoveSelection(Mt->OwnerWnd, &TopMenuInfo, ITEM_PREV);
+        }
+
+      if (MenuPrev != MenuTmp || 0 != (Mt->TrackFlags & TF_SUSPENDPOPUP))
+        {
+          /* A sublevel menu was displayed - display the next one
+           * unless there is another displacement coming up */
+
+          if (! MenuSuspendPopup(Mt, WM_KEYDOWN)
+              && MenuGetRosMenuInfo(&TopMenuInfo, Mt->TopMenu))
+            {
+              Mt->CurrentMenu = MenuShowSubPopup(Mt->OwnerWnd, &TopMenuInfo,
+                                                 TRUE, Flags);
+            }
+        }
+    }
+}
+
+/***********************************************************************
+ *           MenuKeyRight
+ *
+ * Handle a VK_RIGHT key event in a menu.
+ */
+static void FASTCALL
+MenuKeyRight(MTRACKER *Mt, UINT Flags)
+{
+  HMENU MenuTmp;
+  ROSMENUINFO MenuInfo;
+  ROSMENUINFO CurrentMenuInfo;
+  UINT NextCol;
+
+  DPRINT("MenuKeyRight called, cur %p, top %p.\n",
+         Mt->CurrentMenu, Mt->TopMenu);
+
+  if (! MenuGetRosMenuInfo(&MenuInfo, Mt->TopMenu))
+    {
+      return;
+    }
+  if (0 != (MenuInfo.Flags & MF_POPUP) || (Mt->CurrentMenu != Mt->TopMenu))
+    {
+      /* If already displaying a popup, try to display sub-popup */
+
+      MenuTmp = Mt->CurrentMenu;
+      if (MenuGetRosMenuInfo(&CurrentMenuInfo, Mt->CurrentMenu))
+        {
+          Mt->CurrentMenu = MenuShowSubPopup(Mt->OwnerWnd, &CurrentMenuInfo, TRUE, Flags);
+        }
+
+      /* if subpopup was displayed then we are done */
+      if (MenuTmp != Mt->CurrentMenu)
+        {
+          return;
+        }
+    }
+
+  if (! MenuGetRosMenuInfo(&CurrentMenuInfo, Mt->CurrentMenu))
+    {
+      return;
+    }
+
+  /* Check to see if there's another column */
+  if (NO_SELECTED_ITEM != (NextCol = MenuGetStartOfNextColumn(&CurrentMenuInfo)))
+    {
+      DPRINT("Going to %d.\n", NextCol);
+      if (MenuGetRosMenuInfo(&MenuInfo, Mt->CurrentMenu))
+        {
+          MenuSelectItem(Mt->OwnerWnd, &MenuInfo, NextCol, TRUE, 0);
+        }
+      return;
+    }
+
+  if (0 == (MenuInfo.Flags & MF_POPUP))        /* menu bar tracking */
+    {
+      if (Mt->CurrentMenu != Mt->TopMenu)
+        {
+          MenuHideSubPopups(Mt->OwnerWnd, &MenuInfo, FALSE );
+          MenuTmp = Mt->CurrentMenu = Mt->TopMenu;
+        }
+      else
+        {
+          MenuTmp = NULL;
+        }
+
+      /* try to move to the next item */
+      if (! MenuDoNextMenu(Mt, VK_RIGHT))
+        {
+          MenuMoveSelection(Mt->OwnerWnd, &MenuInfo, ITEM_NEXT);
+        }
+
+      if (NULL != MenuTmp || 0 != (Mt->TrackFlags & TF_SUSPENDPOPUP))
+        {
+          if (! MenuSuspendPopup(Mt, WM_KEYDOWN)
+              && MenuGetRosMenuInfo(&MenuInfo, Mt->TopMenu))
+            {
+              Mt->CurrentMenu = MenuShowSubPopup(Mt->OwnerWnd, &MenuInfo,
+                                                 TRUE, Flags);
+            }
+        }
+    }
+}
+
+/***********************************************************************
+ *           MenuFindItemByKey
+ *
+ * Find the menu item selected by a key press.
+ * Return item id, -1 if none, -2 if we should close the menu.
+ */
+static UINT FASTCALL
+MenuFindItemByKey(HWND WndOwner, PROSMENUINFO MenuInfo,
+                  WCHAR Key, BOOL ForceMenuChar)
+{
+  ROSMENUINFO SysMenuInfo;
+  PROSMENUITEMINFO Items, ItemInfo;
+  LRESULT MenuChar;
+  UINT i;
+
+  DPRINT("\tlooking for '%c' (0x%02x) in [%p]\n", (char) Key, Key, MenuInfo);
+
+  if (NULL == MenuInfo || ! IsMenu(MenuInfo->Self))
+    {
+      if (MenuGetRosMenuInfo(&SysMenuInfo, GetSystemMenu(WndOwner, FALSE)))
+        {
+          MenuInfo = &SysMenuInfo;
+        }
       else
-        AppendMenuW(hMenu, flags, id,
-                    *(LPCWSTR)str ? (LPCWSTR)str : NULL);
+        {
+          MenuInfo = NULL;
+        }
     }
-  } while(!end);
 
-  return res;
-}
+  if (NULL != MenuInfo)
+    {
+      if (MenuGetAllRosMenuItemInfo(MenuInfo->Self, &Items) <= 0)
+        {
+          return -1;
+        }
+      if (! ForceMenuChar)
+        {
+          Key = towupper(Key);
+          ItemInfo = Items;
+          for (i = 0; i < MenuInfo->MenuItemCount; i++, ItemInfo++)
+            {
+              if (IS_STRING_ITEM(ItemInfo->fType) && NULL != ItemInfo->dwTypeData)
+                {
+                  WCHAR *p = (WCHAR *) ItemInfo->dwTypeData - 2;
+                  do
+                    {
+                      p = wcschr(p + 2, '&');
+                   }
+                  while (NULL != p && L'&' == p[1]);
+                  if (NULL != p && (towupper(p[1]) == Key))
+                    {
+                      return i;
+                    }
+                }
+            }
+        }
 
+      MenuChar = SendMessageW(WndOwner, WM_MENUCHAR,
+                              MAKEWPARAM(Key, MenuInfo->Flags), (LPARAM) MenuInfo->Self);
+      if (2 == HIWORD(MenuChar))
+        {
+          return LOWORD(MenuChar);
+        }
+      if (1 == HIWORD(MenuChar))
+        {
+          return (UINT) (-2);
+        }
+    }
 
-NTSTATUS STDCALL
-User32LoadSysMenuTemplateForKernel(PVOID Arguments, ULONG ArgumentLength)
-{
-  LRESULT Result;
-  HMODULE hUser32;
-  hUser32 = GetModuleHandleW(L"USER32");
-  Result = (LRESULT)LoadMenuW(hUser32, L"SYSMENU");
-  return(ZwCallbackReturn(&Result, sizeof(LRESULT), STATUS_SUCCESS));
+  return (UINT)(-1);
 }
 
-
-BOOL
-MenuInit(VOID)
+/***********************************************************************
+ *           MenuTrackMenu
+ *
+ * Menu tracking code.
+ */
+static INT FASTCALL
+MenuTrackMenu(HMENU Menu, UINT Flags, INT x, INT y,
+              HWND Wnd, const RECT *Rect )
 {
-  NONCLIENTMETRICSW ncm;
-  
-  /* get the menu font */
-  if(!hMenuFont || !hMenuFontBold)
-  {
-    ncm.cbSize = sizeof(ncm);
-    if(!SystemParametersInfoW(SPI_GETNONCLIENTMETRICS, sizeof(ncm), &ncm, 0))
+  MSG Msg;
+  ROSMENUINFO MenuInfo;
+  ROSMENUITEMINFO ItemInfo;
+  BOOL fRemove;
+  INT ExecutedMenuId = -1;
+  MTRACKER Mt;
+  BOOL EnterIdleSent = FALSE;
+
+  Mt.TrackFlags = 0;
+  Mt.CurrentMenu = Menu;
+  Mt.TopMenu = Menu;
+  Mt.OwnerWnd = Wnd;
+  Mt.Pt.x = x;
+  Mt.Pt.y = y;
+
+  DPRINT("Menu=%x Flags=0x%08x (%d,%d) Wnd=%x (%ld,%ld)-(%ld,%ld)\n",
+         Menu, Flags, x, y, Wnd, Rect ? Rect->left : 0, Rect ? Rect->top : 0,
+         Rect ? Rect->right : 0, Rect ? Rect->bottom : 0);
+
+  fEndMenu = FALSE;
+  if (! MenuGetRosMenuInfo(&MenuInfo, Menu))
     {
-      DbgPrint("MenuInit(): SystemParametersInfoW(SPI_GETNONCLIENTMETRICS) failed!\n");
       return FALSE;
     }
-    
-    hMenuFont = CreateFontIndirectW(&ncm.lfMenuFont);
-    if(hMenuFont == NULL)
+
+  if (0 != (Flags & TPM_BUTTONDOWN))
     {
-      DbgPrint("MenuInit(): CreateFontIndirectW(hMenuFont) failed!\n");
-      return FALSE;
+      /* Get the result in order to start the tracking or not */
+      fRemove = MenuButtonDown(&Mt, Menu, Flags);
+      fEndMenu = ! fRemove;
     }
-    
-    ncm.lfMenuFont.lfWeight = max(ncm.lfMenuFont.lfWeight + 300, 1000);
-    hMenuFontBold = CreateFontIndirectW(&ncm.lfMenuFont);
-    if(hMenuFontBold == NULL)
+
+  SetCapture(Mt.OwnerWnd);
+  NtUserSetGUIThreadHandle(MSQ_STATE_MENUOWNER, Mt.OwnerWnd);
+
+  while (! fEndMenu)
     {
-      DbgPrint("MenuInit(): CreateFontIndirectW(hMenuFontBold) failed!\n");
-      return FALSE;
-    }
-  }
+      /* we have to keep the message in the queue until it's
+       * clear that menu loop is not over yet. */
 
-  return TRUE;
-}
+      for (;;)
+        {
+          if (PeekMessageW(&Msg, 0, 0, 0, PM_NOREMOVE))
+            {
+              if (! CallMsgFilterW(&Msg, MSGF_MENU))
+                {
+                  break;
+                }
+              /* remove the message from the queue */
+              PeekMessageW(&Msg, 0, Msg.message, Msg.message, PM_REMOVE );
+            }
+          else
+            {
+              if (! EnterIdleSent)
+                {
+                  HWND Win = (0 != (Flags & TPM_ENTERIDLEEX)
+                              && 0 != (MenuInfo.Flags & MF_POPUP)) ? MenuInfo.Wnd : NULL;
+                  EnterIdleSent = TRUE;
+                  SendMessageW(Mt.OwnerWnd, WM_ENTERIDLE, MSGF_MENU, (LPARAM) Win);
+                }
+              WaitMessage();
+            }
+        }
 
+      /* check if EndMenu() tried to cancel us, by posting this message */
+      if (WM_CANCELMODE == Msg.message)
+        {
+          /* we are now out of the loop */
+          fEndMenu = TRUE;
 
-ULONG
-MenuGetMenuBarHeight(HWND hWnd, ULONG MenuBarWidth, LONG OrgX, LONG OrgY)
-{
-  /*ULONG MenuId;
-  PPOPUP_MENU Menu;
-  RECT Rect;
-  HDC hDC;
+          /* remove the message from the queue */
+          PeekMessageW(&Msg, 0, Msg.message, Msg.message, PM_REMOVE);
 
-  MenuId = GetWindowLong(hWnd, GWL_ID);
-  Menu = MenuGetMenu((HMENU)MenuId);
-  if (Menu == NULL)
-    {
-      return(0);
-    }
-  hDC = GetDCEx(hWnd, 0, DCX_CACHE | DCX_WINDOW);
-  SelectObject(hDC, hMenuFont);
-  SetRect(&Rect, OrgX, OrgY, OrgX + MenuBarWidth, 
-         OrgY + GetSystemMetrics(SM_CYMENU));
-  MenuMenuBarCalcSize(hDC, &Rect, Menu, hWnd);
-  ReleaseDC(hWnd, hDC);*/
-  return(GetSystemMetrics(SM_CYMENU));
-}
+          /* break out of internal loop, ala ESCAPE */
+          break;
+        }
 
-static BOOL
-MeasureMenuItem(HWND hWnd, HMENU mnu, HDC hDC, MENUITEMINFOW *mii, RECT *mir, LPWSTR str)
-{
-  BOOL res = FALSE;
-  MEASUREITEMSTRUCT mis;
-  SIZE sz;
-  
-  if(mii->fType & MFT_OWNERDRAW)
-  {
-    /* send WM_MEASUREITEM message to window */
-    mis.CtlType = ODT_MENU;
-    mis.CtlID = 0;
-    mis.itemID = mii->wID;
-    mis.itemWidth = 0;
-    mis.itemHeight = 0;
-    mis.itemData = mii->dwItemData;
-    res = (BOOL)SendMessageW(hWnd, WM_MEASUREITEM, 0, (LPARAM)&mis);
-    if(res)
-    {
-      mir->right = mir->left + mis.itemWidth;
-      mir->bottom = mir->top + mis.itemHeight;
+      TranslateMessage(&Msg);
+      Mt.Pt = Msg.pt;
+
+      if (Msg.hwnd == MenuInfo.Wnd || WM_TIMER != Msg.message)
+        {
+          EnterIdleSent = FALSE;
+        }
+
+      fRemove = FALSE;
+      if (WM_MOUSEFIRST <= Msg.message && Msg.message <= WM_MOUSELAST)
+        {
+          /*
+           * Use the mouse coordinates in lParam instead of those in the MSG
+           * struct to properly handle synthetic messages. They are already
+           * in screen coordinates.
+           */
+          Mt.Pt.x = (short) LOWORD(Msg.lParam);
+          Mt.Pt.y = (short) HIWORD(Msg.lParam);
+
+          /* Find a menu for this mouse event */
+          Menu = MenuPtMenu(Mt.TopMenu, Mt.Pt);
+
+          switch(Msg.message)
+            {
+              /* no WM_NC... messages in captured state */
+
+              case WM_RBUTTONDBLCLK:
+              case WM_RBUTTONDOWN:
+                if (0 == (Flags & TPM_RIGHTBUTTON))
+                  {
+                    break;
+                  }
+                /* fall through */
+              case WM_LBUTTONDBLCLK:
+              case WM_LBUTTONDOWN:
+                /* If the message belongs to the menu, removes it from the queue */
+                /* Else, end menu tracking */
+                fRemove = MenuButtonDown(&Mt, Menu, Flags);
+                fEndMenu = ! fRemove;
+                break;
+
+              case WM_RBUTTONUP:
+                if (0 == (Flags & TPM_RIGHTBUTTON))
+                  {
+                    break;
+                  }
+                /* fall through */
+              case WM_LBUTTONUP:
+                /* Check if a menu was selected by the mouse */
+                if (NULL != Menu)
+                  {
+                    ExecutedMenuId = MenuButtonUp(&Mt, Menu, Flags);
+
+                    /* End the loop if ExecutedMenuId is an item ID */
+                    /* or if the job was done (ExecutedMenuId = 0). */
+                    fEndMenu = fRemove = (-1 != ExecutedMenuId);
+                  }
+                else
+                  {
+                    /* No menu was selected by the mouse */
+                    /* if the function was called by TrackPopupMenu, continue
+                       with the menu tracking. If not, stop it */
+                    fEndMenu = (0 != (Flags & TPM_POPUPMENU) ? FALSE : TRUE);
+                  }
+                break;
+
+              case WM_MOUSEMOVE:
+                if (Menu)
+                  {
+                    fEndMenu |= ! MenuMouseMove(&Mt, Menu, Flags);
+                  }
+                break;
+
+           } /* switch(Msg.message) - mouse */
+       }
+      else if (WM_KEYFIRST <= Msg.message && Msg.message <= WM_KEYLAST)
+       {
+          fRemove = TRUE;  /* Keyboard messages are always removed */
+          switch(Msg.message)
+            {
+              case WM_KEYDOWN:
+                switch(Msg.wParam)
+                  {
+                    case VK_HOME:
+                    case VK_END:
+                      if (MenuGetRosMenuInfo(&MenuInfo, Mt.CurrentMenu))
+                        {
+                          MenuSelectItem(Mt.OwnerWnd, &MenuInfo, NO_SELECTED_ITEM,
+                                         FALSE, 0 );
+                        }
+                      /* fall through */
+
+                    case VK_UP:
+                      if (MenuGetRosMenuInfo(&MenuInfo, Mt.CurrentMenu))
+                        {
+                          MenuMoveSelection(Mt.OwnerWnd, &MenuInfo,
+                                            VK_HOME == Msg.wParam ? ITEM_NEXT : ITEM_PREV);
+                        }
+                      break;
+
+                    case VK_DOWN: /* If on menu bar, pull-down the menu */
+                      if (MenuGetRosMenuInfo(&MenuInfo, Mt.CurrentMenu))
+                        {
+                          if (0 == (MenuInfo.Flags & MF_POPUP))
+                            {
+                              if (MenuGetRosMenuInfo(&MenuInfo, Mt.TopMenu))
+                                {
+                                  Mt.CurrentMenu = MenuShowSubPopup(Mt.OwnerWnd, &MenuInfo,
+                                                                    TRUE, Flags);
+                                }
+                            }
+                          else      /* otherwise try to move selection */
+                            {
+                              MenuMoveSelection(Mt.OwnerWnd, &MenuInfo, ITEM_NEXT);
+                            }
+                        }
+                      break;
+
+                    case VK_LEFT:
+                      MenuKeyLeft(&Mt, Flags);
+                      break;
+
+                    case VK_RIGHT:
+                      MenuKeyRight(&Mt, Flags);
+                      break;
+
+                    case VK_ESCAPE:
+                      fEndMenu = MenuKeyEscape(&Mt, Flags);
+                      break;
+
+                    case VK_F1:
+                      {
+                        HELPINFO hi;
+                        hi.cbSize = sizeof(HELPINFO);
+                        hi.iContextType = HELPINFO_MENUITEM;
+                        if (MenuGetRosMenuInfo(&MenuInfo, Mt.CurrentMenu))
+                          {
+                            if (NO_SELECTED_ITEM == MenuInfo.FocusedItem)
+                              {
+                                hi.iCtrlId = 0;
+                              }
+                            else
+                              {
+                                MenuInitRosMenuItemInfo(&ItemInfo);
+                                if (MenuGetRosMenuItemInfo(MenuInfo.Self,
+                                                           MenuInfo.FocusedItem,
+                                                           &ItemInfo))
+                                  {
+                                    hi.iCtrlId = ItemInfo.wID;
+                                  }
+                                else
+                                  {
+                                    hi.iCtrlId = 0;
+                                  }
+                                MenuCleanupRosMenuItemInfo(&ItemInfo);
+                              }
+                          }
+                        hi.hItemHandle = Menu;
+                       hi.dwContextId = MenuInfo.dwContextHelpID;
+                       hi.MousePos = Msg.pt;
+                       SendMessageW(Wnd, WM_HELP, 0, (LPARAM) &hi);
+                        break;
+                      }
+
+                    default:
+                      break;
+                  }
+                break;  /* WM_KEYDOWN */
+
+              case WM_SYSKEYDOWN:
+                switch (Msg.wParam)
+                  {
+                    DbgPrint("Menu.c WM_SYSKEYDOWN wPram %d\n",Msg.wParam);
+                    case VK_MENU:
+                      fEndMenu = TRUE;
+                      break;
+                    case VK_LMENU:
+                      fEndMenu = TRUE;
+                      break;
+                  }
+                break;  /* WM_SYSKEYDOWN */
+
+              case WM_CHAR:
+                {
+                  UINT Pos;
+
+                  if (! MenuGetRosMenuInfo(&MenuInfo, Mt.CurrentMenu))
+                    {
+                      break;
+                    }
+                  if (L'\r' == Msg.wParam || L' ' == Msg.wParam)
+                    {
+                      ExecutedMenuId = MenuExecFocusedItem(&Mt, &MenuInfo, Flags);
+                      fEndMenu = (ExecutedMenuId != -1);
+                      break;
+                    }
+
+                  /* Hack to avoid control chars. */
+                  /* We will find a better way real soon... */
+                  if (Msg.wParam < 32)
+                    {
+                      break;
+                    }
+
+                  Pos = MenuFindItemByKey(Mt.OwnerWnd, &MenuInfo,
+                                          LOWORD(Msg.wParam), FALSE);
+                  if ((UINT) -2 == Pos)
+                    {
+                      fEndMenu = TRUE;
+                    }
+                  else if ((UINT) -1 == Pos)
+                    {
+                      MessageBeep(0);
+                    }
+                  else
+                    {
+                      MenuSelectItem(Mt.OwnerWnd, &MenuInfo, Pos, TRUE, 0);
+                      ExecutedMenuId = MenuExecFocusedItem(&Mt, &MenuInfo, Flags);
+                      fEndMenu = (-1 != ExecutedMenuId);
+                    }
+               }
+              break;
+            }  /* switch(msg.message) - kbd */
+        }
+      else
+        {
+          DispatchMessageW(&Msg);
+        }
+
+      if (! fEndMenu)
+        {
+          fRemove = TRUE;
+        }
+
+      /* finally remove message from the queue */
+
+      if (fRemove && 0 == (Mt.TrackFlags & TF_SKIPREMOVE))
+        {
+          PeekMessageW(&Msg, 0, Msg.message, Msg.message, PM_REMOVE);
+        }
+      else
+        {
+          Mt.TrackFlags &= ~TF_SKIPREMOVE;
+        }
     }
-    else
+
+  NtUserSetGUIThreadHandle(MSQ_STATE_MENUOWNER, NULL);
+  SetCapture(NULL);  /* release the capture */
+
+  /* If dropdown is still painted and the close box is clicked on
+     then the menu will be destroyed as part of the DispatchMessage above.
+     This will then invalidate the menu handle in Mt.hTopMenu. We should
+     check for this first.  */
+  if (IsMenu(Mt.TopMenu))
     {
-      /* FIXME calculate size internally assuming the menu item is empty */
-      mir->right = mir->left + 1;
-      mir->bottom = mir->top + 1;
+      if (IsWindow(Mt.OwnerWnd))
+        {
+          if (MenuGetRosMenuInfo(&MenuInfo, Mt.TopMenu))
+            {
+              MenuHideSubPopups(Mt.OwnerWnd, &MenuInfo, FALSE);
+
+              if (0 != (MenuInfo.Flags & MF_POPUP))
+                {
+                  DestroyWindow(MenuInfo.Wnd);
+                  MenuInfo.Wnd = NULL;
+                }
+              MenuSelectItem(Mt.OwnerWnd, &MenuInfo, NO_SELECTED_ITEM, FALSE, NULL);
+            }
+
+          SendMessageW(Mt.OwnerWnd, WM_MENUSELECT, MAKELONG(0, 0xffff), 0);
+        }
+
+      if (MenuGetRosMenuInfo(&MenuInfo, Mt.TopMenu))
+        {
+          /* Reset the variable for hiding menu */
+          MenuInfo.TimeToHide = FALSE;
+          MenuSetRosMenuInfo(&MenuInfo);
+        }
     }
-    return res;
-  }
-  else
-  {
-    GetTextExtentPoint32W(hDC, str, mii->cch, &sz);
-    /* FIXME calculate the size of the menu item */
-    mir->right = mir->left + sz.cx + 6;
-    mir->bottom = mir->top + max(sz.cy, GetSystemMetrics(SM_CYMENU));
-    return TRUE;
-  }
-}
 
-static BOOL
-DrawMenuItem(HWND hWnd, HMENU mnu, HDC hDC, MENUITEMINFOW *mii, RECT *mir, LPWSTR str)
-{
-  BOOL res = FALSE;
-  DRAWITEMSTRUCT dis;
-  
-  if(mii->fType & MFT_OWNERDRAW)
-  {
-    /* send WM_DRAWITEM message to window */
-    dis.CtlType = ODT_MENU;
-    dis.CtlID = 0;
-    dis.itemID = mii->wID;
-    dis.itemAction = ODA_DRAWENTIRE; /* FIXME */
-    dis.itemState = 0; /* FIXME */
-    dis.hwndItem = (HWND)mnu;
-    dis.hDC = hDC;
-    RtlCopyMemory(&dis.rcItem, mir, sizeof(RECT));
-    dis.itemData = mii->dwItemData;
-    res = (BOOL)SendMessageW(hWnd, WM_DRAWITEM, 0, (LPARAM)&dis);
-    return res;
-  }
-  else
-  {
-    /* FIXME draw the menu item */
-    SetTextColor(hDC, COLOR_MENUTEXT);
-    SetBkMode(hDC, TRANSPARENT);
-    DrawTextW(hDC, str, mii->cch, mir, DT_SINGLELINE | DT_VCENTER | DT_CENTER);
-  }
-  return res;
+  /* The return value is only used by TrackPopupMenu */
+  return (-1 != ExecutedMenuId) ? ExecutedMenuId : 0;
 }
 
+/***********************************************************************
+ *           MenuExitTracking
+ */
+static BOOL FASTCALL
+MenuExitTracking(HWND Wnd)
+{
+  DPRINT("hwnd=%p\n", Wnd);
 
-UINT
-MenuDrawMenuBar(HDC hDC, LPRECT Rect, HWND hWnd, BOOL Draw)
-{
-  UINT height;
-  HMENU mnu;
-  HANDLE hHeap;
-  PVOID Buf, hBuf;
-  DWORD BufSize, Items, Items2;
-  MENUITEMINFOW *mii;
-  RECT *omir, *mir = NULL;
-  LPWSTR str;
-  
-  FillRect(hDC, Rect, GetSysColorBrush(COLOR_MENU));
-
-  height = Rect->bottom - Rect->top;
-  mnu = GetMenu(hWnd); /* Fixme - pass menu handle as parameter */
-  /* get menu item list size */
-  BufSize = NtUserBuildMenuItemList(mnu, (VOID*)1, 0, 0);
-  if(BufSize)
-  {
-    /* FIXME cache menu bar items using NtUserDrawMenuBarTemp() 
-             instead of allocating and deallocating memory everytime */
-
-    hHeap = GetProcessHeap();
-    hBuf = HeapAlloc(hHeap, 0, BufSize);
-    if(!hBuf)
-      return(Rect->bottom - Rect->top);
-    Buf = hBuf;
-    /* copy menu items into buffer */
-    Items = Items2 = NtUserBuildMenuItemList(mnu, Buf, BufSize, 0);
-    
-    /* calculate menu item rectangles */
-    while(Items > 0)
-    {
-      omir = mir;
-      mii = (LPMENUITEMINFOW)Buf;
-      Buf += sizeof(MENUITEMINFOW);
-      mir = (LPRECT)Buf;
-      Buf += sizeof(RECT);
-      if(mii->cch)
-      {
-        str = (LPWSTR)Buf;
-        Buf += (mii->cch + 1) * sizeof(WCHAR);
-      }
-      else
-        str = NULL;
-      if(omir)
-      {
-        mir->left = omir->right + 1;
-        mir->top = omir->top;
-        mir->right += mir->left;
-        mir->bottom += mir->top;
-      }
-      else
-      {
-        mir->left = Rect->left;
-        mir->top = Rect->top;
-      }
-      MeasureMenuItem(hWnd, mnu, hDC, mii, mir, str);
-      
-      height = max(height, mir->top + mir->bottom);
-      /* DbgPrint("Measure menu item %ws: (%d, %d, %d, %d)\n", str, mir->left, mir->top, mir->right, mir->bottom); */
-      Items--;
-    }
-    height = max(height, GetSystemMetrics(SM_CYMENU));
-    
-    Buf = hBuf;
-    /* draw menu items */
-    while (Items2 > 0)
-    {
-      mii = (LPMENUITEMINFOW)Buf;
-      Buf += sizeof(MENUITEMINFOW);
-      mir = (LPRECT)Buf;
-      Buf += sizeof(RECT);
-      if(mii->cch)
-      {
-        str = (LPWSTR)Buf;
-        Buf += (mii->cch + 1) * sizeof(WCHAR);
-      }
-      else
-        str = NULL;
-      /* DbgPrint("Draw menu item %ws at (%d, %d, %d, %d)\n", str, mir->left, mir->top, mir->right, mir->bottom); */
-      DrawMenuItem(hWnd, mnu, hDC, mii, mir, str);
-      Items2--;
-    }
-    
-    HeapFree(hHeap, 0, hBuf);
-  }
-
-  return height;
+  SendMessageW(Wnd, WM_EXITMENULOOP, 0, 0);
+  ShowCaret(0);
+  return TRUE;
 }
 
 
 VOID
-MenuTrackMouseMenuBar(HWND hWnd, ULONG Ht, POINT Pt)
+MenuTrackMouseMenuBar(HWND Wnd, ULONG Ht, POINT Pt)
 {
+  HMENU Menu = (HTSYSMENU == Ht) ? NtUserGetSystemMenu(Wnd, FALSE) : GetMenu(Wnd);
+  UINT Flags = TPM_ENTERIDLEEX | TPM_BUTTONDOWN | TPM_LEFTALIGN | TPM_LEFTBUTTON;
+
+  DPRINT("wnd=%p ht=0x%04x (%ld,%ld)\n", Wnd, Ht, Pt.x, Pt.y);
+
+  if (IsMenu(Menu))
+    {
+      /* map point to parent client coordinates */
+      HWND Parent = GetAncestor(Wnd, GA_PARENT );
+      if (Parent != GetDesktopWindow())
+        {
+          ScreenToClient(Parent, &Pt);
+        }
+
+      MenuInitTracking(Wnd, Menu, FALSE, Flags);
+      MenuTrackMenu(Menu, Flags, Pt.x, Pt.y, Wnd, NULL);
+      MenuExitTracking(Wnd);
+    }
 }
 
 
@@ -478,20 +3455,20 @@ MenuTrackKbdMenuBar(HWND hWnd, ULONG wParam, ULONG Key)
 /*static BOOL
 MenuIsStringItem(ULONG TypeData)
 {
-  return((TypeData & MENU_TYPE_MASK) == MF_STRING);
+  return(MF_STRING == MENU_ITEM_TYPE(ItemInfo->fType));
 }*/
 
 
 /*
  * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 AppendMenuA(HMENU hMenu,
            UINT uFlags,
            UINT_PTR uIDNewItem,
            LPCSTR lpNewItem)
 {
-  return(InsertMenuA(hMenu, -1, uFlags | MF_BYPOSITION, uIDNewItem, 
+  return(InsertMenuA(hMenu, -1, uFlags | MF_BYPOSITION, uIDNewItem,
                     lpNewItem));
 }
 
@@ -499,13 +3476,13 @@ AppendMenuA(HMENU hMenu,
 /*
  * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 AppendMenuW(HMENU hMenu,
            UINT uFlags,
            UINT_PTR uIDNewItem,
            LPCWSTR lpNewItem)
 {
-  return(InsertMenuW(hMenu, -1, uFlags | MF_BYPOSITION, uIDNewItem, 
+  return(InsertMenuW(hMenu, -1, uFlags | MF_BYPOSITION, uIDNewItem,
                     lpNewItem));
 }
 
@@ -523,17 +3500,52 @@ CheckMenuItem(HMENU hmenu,
 
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 CheckMenuRadioItem(HMENU hmenu,
                   UINT idFirst,
                   UINT idLast,
                   UINT idCheck,
                   UINT uFlags)
 {
+  ROSMENUINFO mi;
+  PROSMENUITEMINFO Items;
+  int i;
+  BOOL ret = FALSE;
+
+  mi.cbSize = sizeof(MENUINFO);
+
   UNIMPLEMENTED;
-  return FALSE;
+
+  if(idFirst > idLast) return ret;
+
+  if(!NtUserMenuInfo(hmenu, &mi, FALSE)) return ret;
+
+  if(MenuGetAllRosMenuItemInfo(mi.Self, &Items) <= 0) return ret;
+
+  for (i = 0 ; i < mi.MenuItemCount; i++)
+    {
+      if (0 != (Items[i].fType & MF_MENUBARBREAK)) break;
+      if ( i >= idFirst && i <= idLast )
+      {
+         if ( i == idCheck)
+         {
+             Items[i].fType |= MFT_RADIOCHECK;
+             Items[i].fState |= MFS_CHECKED;
+         }
+         else
+         {
+             Items[i].fType &= ~MFT_RADIOCHECK;
+             Items[i].fState &= ~MFS_CHECKED;
+         }
+         if(!MenuSetRosMenuItemInfo(mi.Self, i ,&Items[i]))
+             break;
+      }
+   if ( i == mi.MenuItemCount) ret = TRUE;
+    }
+  MenuCleanupRosMenuItemInfo(Items);
+  return ret;
 }
 
 
@@ -543,7 +3555,8 @@ CheckMenuRadioItem(HMENU hmenu,
 HMENU STDCALL
 CreateMenu(VOID)
 {
-  return NtUserCreateMenu();
+  MenuLoadBitmaps();
+  return NtUserCreateMenu(FALSE);
 }
 
 
@@ -553,15 +3566,15 @@ CreateMenu(VOID)
 HMENU STDCALL
 CreatePopupMenu(VOID)
 {
-  /* FIXME - add MF_POPUP style? */
-  return NtUserCreateMenu();
+  MenuLoadBitmaps();
+  return NtUserCreateMenu(TRUE);
 }
 
 
 /*
  * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 DeleteMenu(HMENU hMenu,
           UINT uPosition,
           UINT uFlags)
@@ -573,7 +3586,7 @@ DeleteMenu(HMENU hMenu,
 /*
  * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 DestroyMenu(HMENU hMenu)
 {
     return NtUserDestroyMenu(hMenu);
@@ -581,21 +3594,19 @@ DestroyMenu(HMENU hMenu)
 
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 DrawMenuBar(HWND hWnd)
 {
-  UNIMPLEMENTED
-  /* FIXME - return NtUserCallHwndLock(hWnd, 0x55); */
-  return FALSE;
+  return (BOOL)NtUserCallHwndLock(hWnd, HWNDLOCK_ROUTINE_DRAWMENUBAR);
 }
 
 
 /*
  * @implemented
  */
-UINT STDCALL
+BOOL STDCALL
 EnableMenuItem(HMENU hMenu,
               UINT uIDEnableItem,
               UINT uEnable)
@@ -606,7 +3617,7 @@ EnableMenuItem(HMENU hMenu,
 /*
  * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 EndMenu(VOID)
 {
   GUITHREADINFO guii;
@@ -625,21 +3636,20 @@ EndMenu(VOID)
 HMENU STDCALL
 GetMenu(HWND hWnd)
 {
-  return (HMENU)NtUserCallOneParam((DWORD)hWnd, ONEPARAM_ROUTINE_GETMENU);
+  return NtUserGetMenu(hWnd);
 }
 
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 GetMenuBarInfo(HWND hwnd,
               LONG idObject,
               LONG idItem,
               PMENUBARINFO pmbi)
 {
-  UNIMPLEMENTED;
-  return FALSE;
+  return (BOOL)NtUserGetMenuBarInfo(hwnd, idObject, idItem, pmbi);
 }
 
 
@@ -649,7 +3659,7 @@ GetMenuBarInfo(HWND hwnd,
 LONG STDCALL
 GetMenuCheckMarkDimensions(VOID)
 {
-  return(MAKELONG(GetSystemMetrics(SM_CXMENUCHECK), 
+  return(MAKELONG(GetSystemMetrics(SM_CXMENUCHECK),
                  GetSystemMetrics(SM_CYMENUCHECK)));
 }
 
@@ -669,22 +3679,22 @@ GetMenuDefaultItem(HMENU hMenu,
 /*
  * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 GetMenuInfo(HMENU hmenu,
            LPMENUINFO lpcmi)
 {
-  MENUINFO mi;
+  ROSMENUINFO mi;
   BOOL res = FALSE;
-  
+
   if(!lpcmi || (lpcmi->cbSize != sizeof(MENUINFO)))
     return FALSE;
-  
+
   RtlZeroMemory(&mi, sizeof(MENUINFO));
   mi.cbSize = sizeof(MENUINFO);
   mi.fMask = lpcmi->fMask;
-  
+
   res = NtUserMenuInfo(hmenu, &mi, FALSE);
-  
+
   memcpy(lpcmi, &mi, sizeof(MENUINFO));
   return res;
 }
@@ -694,9 +3704,11 @@ GetMenuInfo(HMENU hmenu,
  * @implemented
  */
 int STDCALL
-GetMenuItemCount(HMENU hMenu)
+GetMenuItemCount(HMENU Menu)
 {
-  return NtUserBuildMenuItemList(hMenu, NULL, 0, 0);
+  ROSMENUINFO MenuInfo;
+
+  return MenuGetRosMenuInfo(&MenuInfo, Menu) ? MenuInfo.MenuItemCount : 0;
 }
 
 
@@ -707,65 +3719,116 @@ UINT STDCALL
 GetMenuItemID(HMENU hMenu,
              int nPos)
 {
-  MENUITEMINFOW mii;
-  
+  ROSMENUITEMINFO mii;
+
   mii.cbSize = sizeof(MENUITEMINFOW);
   mii.fMask = MIIM_ID | MIIM_SUBMENU;
-  
-  if(!NtUserMenuItemInfo(hMenu, nPos, MF_BYPOSITION, &mii, FALSE))
-  {
-    return -1;
-  }
-  
-  if(mii.hSubMenu) return -1;
-  if(mii.wID == 0) return -1;
-  
+
+  if (! NtUserMenuItemInfo(hMenu, nPos, MF_BYPOSITION, &mii, FALSE))
+    {
+      return -1;
+    }
+
+  if (NULL != mii.hSubMenu)
+    {
+      return -1;
+    }
+  if (0 == mii.wID)
+    {
+      return -1;
+    }
+
   return mii.wID;
 }
 
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 GetMenuItemInfoA(
-  HMENU hMenu,
-  UINT uItem,
-  WINBOOL fByPosition,
-  LPMENUITEMINFOA lpmii)
+   HMENU Menu,
+   UINT Item,
+   BOOL ByPosition,
+   LPMENUITEMINFOA mii)
 {
-  UNIMPLEMENTED;
-  return FALSE;
+   LPSTR AnsiBuffer;
+   MENUITEMINFOW miiW;
+
+   if (mii->cbSize != sizeof(MENUITEMINFOA) &&
+       mii->cbSize != sizeof(MENUITEMINFOA) - sizeof(HBITMAP))
+   {
+      SetLastError(ERROR_INVALID_PARAMETER);
+      return FALSE;
+   }
+
+   if ((mii->fMask & (MIIM_STRING | MIIM_TYPE)) == 0)
+   {
+      /* No text requested, just pass on */
+      return NtUserMenuItemInfo(Menu, Item, ByPosition, (PROSMENUITEMINFO) mii, FALSE);
+   }
+
+   RtlCopyMemory(&miiW, mii, mii->cbSize);
+   AnsiBuffer = mii->dwTypeData;
+
+   if (AnsiBuffer != NULL)
+   {
+      miiW.dwTypeData = RtlAllocateHeap(GetProcessHeap(), 0,
+                                        miiW.cch * sizeof(WCHAR));
+      if (miiW.dwTypeData == NULL)
+         return FALSE;
+   }
+
+   if (!NtUserMenuItemInfo(Menu, Item, ByPosition, (PROSMENUITEMINFO)&miiW, FALSE))
+   {
+      HeapFree(GetProcessHeap(), 0, miiW.dwTypeData);
+      return FALSE;
+   }
+
+   if (AnsiBuffer != NULL)
+   {
+      if (IS_STRING_ITEM(miiW.fType))
+      {
+         WideCharToMultiByte(CP_ACP, 0, miiW.dwTypeData, miiW.cch, AnsiBuffer,
+                             mii->cch, NULL, NULL);
+      }
+      RtlFreeHeap(GetProcessHeap(), 0, miiW.dwTypeData);
+   }
+
+   RtlCopyMemory(mii, &miiW, miiW.cbSize);
+   if (AnsiBuffer)
+   {
+        mii->dwTypeData = AnsiBuffer;
+        mii->cch = strlen(AnsiBuffer);
+   }
+   return TRUE;
 }
 
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL
-STDCALL
+BOOL STDCALL
 GetMenuItemInfoW(
-  HMENU hMenu,
-  UINT uItem,
-  WINBOOL fByPosition,
-  LPMENUITEMINFOW lpmii)
+   HMENU Menu,
+   UINT Item,
+   BOOL ByPosition,
+   LPMENUITEMINFOW mii)
 {
-  UNIMPLEMENTED;
-  return FALSE;
+   return NtUserMenuItemInfo(Menu, Item, ByPosition, (PROSMENUITEMINFO) mii, FALSE);
 }
 
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 GetMenuItemRect(HWND hWnd,
                HMENU hMenu,
                UINT uItem,
                LPRECT lprcItem)
 {
-  UNIMPLEMENTED;
-  return(FALSE);
+  return NtUserGetMenuItemRect( hWnd, hMenu, uItem, lprcItem);
 }
 
 
@@ -779,35 +3842,42 @@ GetMenuState(
   UINT uId,
   UINT uFlags)
 {
-  MENUITEMINFOW mii;
+  ROSMENUINFO MenuInfo;
+  ROSMENUITEMINFO mii;
+
   mii.cbSize = sizeof(MENUITEMINFOW);
   mii.fMask = MIIM_STATE | MIIM_TYPE | MIIM_SUBMENU;
-  
+  mii.dwTypeData = NULL;
+
   SetLastError(0);
   if(NtUserMenuItemInfo(hMenu, uId, uFlags, &mii, FALSE))
-  {
-    UINT nSubItems = 0;
-    if(mii.hSubMenu)
     {
-      nSubItems = (UINT)NtUserBuildMenuItemList(mii.hSubMenu, NULL, 0, 0);
-      
-      /* FIXME - ported from wine, does that work (0xff)? */
-      if(GetLastError() != ERROR_INVALID_MENU_HANDLE)
-        return (nSubItems << 8) | ((mii.fState | mii.fType) & 0xff);
+      UINT nSubItems = 0;
+      if(mii.hSubMenu)
+        {
+          if (! MenuGetRosMenuInfo(&MenuInfo, mii.hSubMenu))
+            {
+              return (UINT) -1;
+            }
+          nSubItems = MenuInfo.MenuItemCount;
+
+          /* FIXME - ported from wine, does that work (0xff)? */
+          if(GetLastError() != ERROR_INVALID_MENU_HANDLE)
+            return (nSubItems << 8) | ((mii.fState | mii.fType) & 0xff);
 
-      return (UINT)-1; /* Invalid submenu */
+          return (UINT)-1; /* Invalid submenu */
+        }
+
+      /* FIXME - ported from wine, does that work? */
+      return (mii.fType | mii.fState);
     }
-    
-    /* FIXME - ported from wine, does that work? */
-    return (mii.fType | mii.fState);
-  }
-  
+
   return (UINT)-1;
 }
 
 
 /*
- * @unimplemented
+ * @implemented
  */
 int
 STDCALL
@@ -818,13 +3888,22 @@ GetMenuStringA(
   int nMaxCount,
   UINT uFlag)
 {
-  UNIMPLEMENTED;
-  return 0;
+  MENUITEMINFOA mii;
+  mii.dwTypeData = lpString;
+  mii.fMask = MIIM_STRING;
+  mii.fType = MF_STRING;
+  mii.cbSize = sizeof(MENUITEMINFOA);
+  mii.cch = nMaxCount;
+
+  if(!(GetMenuItemInfoA( hMenu, uIDItem, (BOOL)(MF_BYPOSITION & uFlag),&mii)))
+     return 0;
+  else
+     return mii.cch;
 }
 
 
 /*
- * @unimplemented
+ * @implemented
  */
 int
 STDCALL
@@ -835,8 +3914,16 @@ GetMenuStringW(
   int nMaxCount,
   UINT uFlag)
 {
-  UNIMPLEMENTED;
-  return 0;
+  MENUITEMINFOW miiW;
+  miiW.dwTypeData = lpString;
+  miiW.fMask = MIIM_STRING;
+  miiW.cbSize = sizeof(MENUITEMINFOW);
+  miiW.cch = nMaxCount;
+
+  if(!(GetMenuItemInfoW( hMenu, uIDItem, (BOOL)(MF_BYPOSITION & uFlag),&miiW)))
+     return 0;
+  else
+     return miiW.cch;
 }
 
 
@@ -849,21 +3936,40 @@ GetSubMenu(
   HMENU hMenu,
   int nPos)
 {
-  MENUITEMINFOW mi;
-  mi.cbSize = sizeof(mi);
+  ROSMENUITEMINFO mi;
+
+  mi.cbSize = sizeof(MENUITEMINFOW);
   mi.fMask = MIIM_SUBMENU;
-  if(NtUserMenuItemInfo(hMenu, (UINT)nPos, MF_BYPOSITION, &mi, FALSE))
-  {
-    return mi.hSubMenu;
-  }
-  return (HMENU)0;
+
+  if (NtUserMenuItemInfo(hMenu, (UINT)nPos, MF_BYPOSITION, &mi, FALSE))
+    {
+      return IsMenu(mi.hSubMenu) ? mi.hSubMenu : NULL;
+    }
+
+  return NULL;
+}
+
+/*
+ * @implemented
+ */
+HMENU
+STDCALL
+GetSystemMenu(
+  HWND hWnd,
+  BOOL bRevert)
+{
+  HMENU TopMenu;
+
+  TopMenu = NtUserGetSystemMenu(hWnd, bRevert);
+
+  return NULL == TopMenu ? NULL : GetSubMenu(TopMenu, 0);
 }
 
 
 /*
  * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 HiliteMenuItem(
   HWND hwnd,
@@ -878,7 +3984,7 @@ HiliteMenuItem(
 /*
  * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 InsertMenuA(
   HMENU hMenu,
@@ -889,20 +3995,53 @@ InsertMenuA(
 {
   MENUITEMINFOA mii;
   mii.cbSize = sizeof(MENUITEMINFOA);
-  mii.fMask = MIIM_FTYPE | MIIM_STRING;
-  mii.fType = 0;  
-  
+  mii.fMask = MIIM_FTYPE | MIIM_STRING | MIIM_STATE;
+  mii.fType = 0;
+  mii.fState = MFS_ENABLED;
+
   if(uFlags & MF_BITMAP)
   {
-    mii.fType |= MFT_BITMAP;
+    mii.fType |= MFT_BITMAP;
+    mii.fMask |= MIIM_BITMAP;
+    mii.hbmpItem = (HBITMAP) lpNewItem;
+  }
+  else if(uFlags & MF_OWNERDRAW)
+  {
+    mii.fType |= MFT_OWNERDRAW;
+    mii.fMask |= MIIM_DATA;
+    mii.dwItemData = (DWORD) lpNewItem;
+  }
+  else
+  {
+    mii.fMask |= MIIM_TYPE;
+    mii.dwTypeData = (LPSTR)lpNewItem;
+    mii.cch = (NULL == lpNewItem ? 0 : strlen(lpNewItem));
+  }
+
+  if(uFlags & MF_RIGHTJUSTIFY)
+  {
+    mii.fType |= MFT_RIGHTJUSTIFY;
+  }
+  if(uFlags & MF_MENUBREAK)
+  {
+    mii.fType |= MFT_MENUBREAK;
   }
-  else if(uFlags & MF_OWNERDRAW)
+  if(uFlags & MF_MENUBARBREAK)
   {
-    mii.fType |= MFT_OWNERDRAW;
+    mii.fType |= MFT_MENUBARBREAK;
+  }
+  if(uFlags & MF_DISABLED)
+  {
+    mii.fState |= MFS_DISABLED;
+  }
+  if(uFlags & MF_GRAYED)
+  {
+    mii.fState |= MFS_GRAYED;
   }
-  mii.dwTypeData = (LPSTR)lpNewItem;
+
   if(uFlags & MF_POPUP)
   {
+    mii.fType |= MF_POPUP;
     mii.fMask |= MIIM_SUBMENU;
     mii.hSubMenu = (HMENU)uIDNewItem;
   }
@@ -911,50 +4050,50 @@ InsertMenuA(
     mii.fMask |= MIIM_ID;
     mii.wID = (UINT)uIDNewItem;
   }
-  return InsertMenuItemA(hMenu, uPosition, (WINBOOL)!(MF_BYPOSITION & uFlags), &mii);
+  return InsertMenuItemA(hMenu, uPosition, (BOOL)((MF_BYPOSITION & uFlags) > 0), &mii);
 }
 
 
 /*
  * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 InsertMenuItemA(
   HMENU hMenu,
   UINT uItem,
-  WINBOOL fByPosition,
+  BOOL fByPosition,
   LPCMENUITEMINFOA lpmii)
 {
   MENUITEMINFOW mi;
   UNICODE_STRING MenuText;
-  WINBOOL res = FALSE;
+  BOOL res = FALSE;
   BOOL CleanHeap = FALSE;
   NTSTATUS Status;
 
-  if((lpmii->cbSize == sizeof(MENUITEMINFOA)) || 
+  if((lpmii->cbSize == sizeof(MENUITEMINFOA)) ||
      (lpmii->cbSize == sizeof(MENUITEMINFOA) - sizeof(HBITMAP)))
   {
     RtlMoveMemory ( &mi, lpmii, lpmii->cbSize );
 
     /* copy the text string */
-    if((mi.fMask & (MIIM_TYPE | MIIM_STRING)) && 
+    if((mi.fMask & (MIIM_TYPE | MIIM_STRING)) &&
       (MENU_ITEM_TYPE(mi.fType) == MF_STRING) && mi.dwTypeData)
     {
-      Status = HEAP_strdupAtoW ( &mi.dwTypeData, (LPCSTR)mi.dwTypeData, &mi.cch );
+      Status = RtlCreateUnicodeStringFromAsciiz(&MenuText, (LPSTR)mi.dwTypeData);
       if (!NT_SUCCESS (Status))
       {
         SetLastError (RtlNtStatusToDosError(Status));
         return FALSE;
       }
-      RtlInitUnicodeString(&MenuText, (PWSTR)mi.dwTypeData);
-      mi.dwTypeData = (LPWSTR)&MenuText;
+      mi.dwTypeData = MenuText.Buffer;
+      mi.cch = MenuText.Length / sizeof(WCHAR);
       CleanHeap = TRUE;
     }
 
     res = NtUserInsertMenuItem(hMenu, uItem, fByPosition, &mi);
 
-    if ( CleanHeap ) HEAP_free ( mi.dwTypeData );
+    if ( CleanHeap ) RtlFreeUnicodeString ( &MenuText );
   }
   return res;
 }
@@ -963,50 +4102,39 @@ InsertMenuItemA(
 /*
  * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 InsertMenuItemW(
   HMENU hMenu,
   UINT uItem,
-  WINBOOL fByPosition,
+  BOOL fByPosition,
   LPCMENUITEMINFOW lpmii)
 {
   MENUITEMINFOW mi;
   UNICODE_STRING MenuText;
-  WINBOOL res = FALSE;
-  BOOL CleanHeap = FALSE;
-  HANDLE hHeap = RtlGetProcessHeap();
+  BOOL res = FALSE;
   mi.hbmpItem = (HBITMAP)0;
 
-  // while we could just pass 'lpmii' to win32k, we make a copy so that
-  // if a bad user passes bad data, we crash his process instead of the
-  // entire kernel
+  /* while we could just pass 'lpmii' to win32k, we make a copy so that
+     if a bad user passes bad data, we crash his process instead of the
+     entire kernel */
 
-  if((lpmii->cbSize == sizeof(MENUITEMINFOW)) || 
+  if((lpmii->cbSize == sizeof(MENUITEMINFOW)) ||
      (lpmii->cbSize == sizeof(MENUITEMINFOW) - sizeof(HBITMAP)))
   {
     memcpy(&mi, lpmii, lpmii->cbSize);
-    
+
     /* copy the text string */
-    if((mi.fMask & (MIIM_TYPE | MIIM_STRING)) && 
-      (MENU_ITEM_TYPE(mi.fType) == MF_STRING) && mi.dwTypeData)
+    if((mi.fMask & (MIIM_TYPE | MIIM_STRING)) &&
+      (MENU_ITEM_TYPE(mi.fType) == MF_STRING) &&
+      mi.dwTypeData != NULL)
     {
-      if(lpmii->cch > 0)
-      {
-        if(!RtlCreateUnicodeString(&MenuText, (PWSTR)lpmii->dwTypeData))
-        {
-          SetLastError (RtlNtStatusToDosError(STATUS_NO_MEMORY));
-          return FALSE;
-        }
-        mi.dwTypeData = (LPWSTR)&MenuText;
-        mi.cch = MenuText.Length / sizeof(WCHAR);
-        CleanHeap = TRUE;
-      }
+      RtlInitUnicodeString(&MenuText, (PWSTR)lpmii->dwTypeData);
+      mi.dwTypeData = MenuText.Buffer;
+      mi.cch = MenuText.Length / sizeof(WCHAR);
     };
-    
+
     res = NtUserInsertMenuItem(hMenu, uItem, fByPosition, &mi);
-    
-    if(CleanHeap) RtlFreeHeap (hHeap, 0, mi.dwTypeData);
   }
   return res;
 }
@@ -1015,7 +4143,7 @@ InsertMenuItemW(
 /*
  * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 InsertMenuW(
   HMENU hMenu,
@@ -1026,20 +4154,53 @@ InsertMenuW(
 {
   MENUITEMINFOW mii;
   mii.cbSize = sizeof(MENUITEMINFOW);
-  mii.fMask = MIIM_FTYPE | MIIM_STRING;
+  mii.fMask = MIIM_FTYPE | MIIM_STRING | MIIM_STATE;
   mii.fType = 0;
+  mii.fState = MFS_ENABLED;
 
   if(uFlags & MF_BITMAP)
   {
     mii.fType |= MFT_BITMAP;
+    mii.fMask |= MIIM_BITMAP;
+    mii.hbmpItem = (HBITMAP) lpNewItem;
   }
   else if(uFlags & MF_OWNERDRAW)
   {
     mii.fType |= MFT_OWNERDRAW;
+    mii.fMask |= MIIM_DATA;
+    mii.dwItemData = (DWORD) lpNewItem;
+  }
+  else
+  {
+    mii.fMask |= MIIM_TYPE;
+    mii.dwTypeData = (LPWSTR)lpNewItem;
+    mii.cch = (NULL == lpNewItem ? 0 : wcslen(lpNewItem));
+  }
+
+  if(uFlags & MF_RIGHTJUSTIFY)
+  {
+    mii.fType |= MFT_RIGHTJUSTIFY;
+  }
+  if(uFlags & MF_MENUBREAK)
+  {
+    mii.fType |= MFT_MENUBREAK;
+  }
+  if(uFlags & MF_MENUBARBREAK)
+  {
+    mii.fType |= MFT_MENUBARBREAK;
+  }
+  if(uFlags & MF_DISABLED)
+  {
+    mii.fState |= MFS_DISABLED;
+  }
+  if(uFlags & MF_GRAYED)
+  {
+    mii.fState |= MFS_GRAYED;
   }
-  mii.dwTypeData = (LPWSTR)lpNewItem;
+
   if(uFlags & MF_POPUP)
   {
+    mii.fType |= MF_POPUP;
     mii.fMask |= MIIM_SUBMENU;
     mii.hSubMenu = (HMENU)uIDNewItem;
   }
@@ -1048,22 +4209,21 @@ InsertMenuW(
     mii.fMask |= MIIM_ID;
     mii.wID = (UINT)uIDNewItem;
   }
-  return InsertMenuItemW(hMenu, uPosition, (WINBOOL)!(MF_BYPOSITION & uFlags), &mii);
+  return InsertMenuItemW(hMenu, uPosition, (BOOL)((MF_BYPOSITION & uFlags) > 0), &mii);
 }
 
 
 /*
  * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 IsMenu(
-  HMENU hMenu)
+  HMENU Menu)
 {
-  DWORD ret;
-  SetLastError(ERROR_SUCCESS);
-  ret = NtUserBuildMenuItemList(hMenu, NULL, 0, 0);
-  return ((ret == (DWORD)-1) || (GetLastError() == ERROR_INVALID_MENU_HANDLE));
+  ROSMENUINFO MenuInfo;
+
+  return MenuGetRosMenuInfo(&MenuInfo, Menu);
 }
 
 
@@ -1152,7 +4312,7 @@ LoadMenuW(HINSTANCE hInstance,
 
 
 /*
- * @unimplemented
+ * @implemented
  */
 int
 STDCALL
@@ -1161,15 +4321,14 @@ MenuItemFromPoint(
   HMENU hMenu,
   POINT ptScreen)
 {
-  UNIMPLEMENTED;
-  return 0;
+  return NtUserMenuItemFromPoint(hWnd, hMenu, ptScreen.x, ptScreen.y);
 }
 
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 ModifyMenuA(
   HMENU hMnu,
@@ -1178,15 +4337,96 @@ ModifyMenuA(
   UINT_PTR uIDNewItem,
   LPCSTR lpNewItem)
 {
+  MENUITEMINFOA mii;
+  memset( &mii, 0, sizeof(mii) );
+  mii.cbSize = sizeof(MENUITEMINFOA);
+  mii.fMask = MIIM_FTYPE | MIIM_STRING | MIIM_STATE;
+  mii.fType = 0;
+  mii.fState = MFS_ENABLED;
+
   UNIMPLEMENTED;
-  return FALSE;
+
+  if(!GetMenuItemInfoA( hMnu,
+                        uPosition,
+                       (BOOL)(MF_BYPOSITION & uFlags),
+                        &mii)) return FALSE;
+
+  if(uFlags & MF_BITMAP)
+  {
+    mii.fType |= MFT_BITMAP;
+    mii.fMask |= MIIM_BITMAP;
+    mii.hbmpItem = (HBITMAP) lpNewItem;
+  }
+  else if(uFlags & MF_OWNERDRAW)
+  {
+    mii.fType |= MFT_OWNERDRAW;
+    mii.fMask |= MIIM_DATA;
+    mii.dwItemData = (DWORD) lpNewItem;
+  }
+  else /* Default action MF_STRING. */
+  {
+    if(mii.dwTypeData != NULL)
+    {
+      HeapFree(GetProcessHeap(),0, mii.dwTypeData);
+    }
+    /* Item beginning with a backspace is a help item */
+    if (*lpNewItem == '\b')
+    {
+       mii.fType |= MF_HELP;
+       lpNewItem++;
+    }
+    mii.fMask |= MIIM_TYPE;
+    mii.dwTypeData = (LPSTR)lpNewItem;
+    mii.cch = (NULL == lpNewItem ? 0 : strlen(lpNewItem));
+  }
+
+  if(uFlags & MF_RIGHTJUSTIFY)
+  {
+    mii.fType |= MFT_RIGHTJUSTIFY;
+  }
+  if(uFlags & MF_MENUBREAK)
+  {
+    mii.fType |= MFT_MENUBREAK;
+  }
+  if(uFlags & MF_MENUBARBREAK)
+  {
+    mii.fType |= MFT_MENUBARBREAK;
+  }
+  if(uFlags & MF_DISABLED)
+  {
+    mii.fState |= MFS_DISABLED;
+  }
+  if(uFlags & MF_GRAYED)
+  {
+    mii.fState |= MFS_GRAYED;
+  }
+
+  if ((mii.fType & MF_POPUP) && (uFlags & MF_POPUP) && (mii.hSubMenu != (HMENU)uIDNewItem))
+    NtUserDestroyMenu( mii.hSubMenu );   /* ModifyMenu() spec */
+
+  if(uFlags & MF_POPUP)
+  {
+    mii.fType |= MF_POPUP;
+    mii.fMask |= MIIM_SUBMENU;
+    mii.hSubMenu = (HMENU)uIDNewItem;
+  }
+  else
+  {
+    mii.fMask |= MIIM_ID;
+    mii.wID = (UINT)uIDNewItem;
+  }
+
+  return SetMenuItemInfoA( hMnu,
+                           uPosition,
+                          (BOOL)(MF_BYPOSITION & uFlags),
+                           &mii);
 }
 
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 ModifyMenuW(
   HMENU hMnu,
@@ -1195,15 +4435,95 @@ ModifyMenuW(
   UINT_PTR uIDNewItem,
   LPCWSTR lpNewItem)
 {
+  MENUITEMINFOW mii;
+  memset ( &mii, 0, sizeof(mii) );
+  mii.cbSize = sizeof(MENUITEMINFOW);
+  mii.fMask = MIIM_FTYPE | MIIM_STRING | MIIM_STATE;
+  mii.fState = MFS_ENABLED;
+
   UNIMPLEMENTED;
-  return FALSE;
+
+  if(!NtUserMenuItemInfo( hMnu,
+                          uPosition,
+                         (BOOL)(MF_BYPOSITION & uFlags),
+                         (PROSMENUITEMINFO) &mii,
+                          FALSE)) return FALSE;
+
+  if(uFlags & MF_BITMAP)
+  {
+    mii.fType |= MFT_BITMAP;
+    mii.fMask |= MIIM_BITMAP;
+    mii.hbmpItem = (HBITMAP) lpNewItem;
+  }
+  else if(uFlags & MF_OWNERDRAW)
+  {
+    mii.fType |= MFT_OWNERDRAW;
+    mii.fMask |= MIIM_DATA;
+    mii.dwItemData = (DWORD) lpNewItem;
+  }
+  else
+  {
+    /*if(mii.dwTypeData != NULL)
+    {
+      HeapFree(GetProcessHeap(),0, mii.dwTypeData);
+    }*/
+    if (*lpNewItem == '\b')
+    {
+       mii.fType |= MF_HELP;
+       lpNewItem++;
+    }
+    mii.fMask |= MIIM_TYPE;
+    mii.dwTypeData = (LPWSTR)lpNewItem;
+    mii.cch = (NULL == lpNewItem ? 0 : wcslen(lpNewItem));
+  }
+
+  if(uFlags & MF_RIGHTJUSTIFY)
+  {
+    mii.fType |= MFT_RIGHTJUSTIFY;
+  }
+  if(uFlags & MF_MENUBREAK)
+  {
+    mii.fType |= MFT_MENUBREAK;
+  }
+  if(uFlags & MF_MENUBARBREAK)
+  {
+    mii.fType |= MFT_MENUBARBREAK;
+  }
+  if(uFlags & MF_DISABLED)
+  {
+    mii.fState |= MFS_DISABLED;
+  }
+  if(uFlags & MF_GRAYED)
+  {
+    mii.fState |= MFS_GRAYED;
+  }
+
+  if ((mii.fType & MF_POPUP) && (uFlags & MF_POPUP) && (mii.hSubMenu != (HMENU)uIDNewItem))
+    NtUserDestroyMenu( mii.hSubMenu );
+
+  if(uFlags & MF_POPUP)
+  {
+    mii.fType |= MF_POPUP;
+    mii.fMask |= MIIM_SUBMENU;
+    mii.hSubMenu = (HMENU)uIDNewItem;
+  }
+  else
+  {
+    mii.fMask |= MIIM_ID;
+    mii.wID = (UINT)uIDNewItem;
+  }
+
+  return SetMenuItemInfoW( hMnu,
+                           uPosition,
+                           (BOOL)(MF_BYPOSITION & uFlags),
+                           &mii);
 }
 
 
 /*
  * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 RemoveMenu(
   HMENU hMenu,
@@ -1217,7 +4537,7 @@ RemoveMenu(
 /*
  * @implemented
  */
-WINBOOL STDCALL
+BOOL STDCALL
 SetMenu(HWND hWnd,
        HMENU hMenu)
 {
@@ -1228,7 +4548,7 @@ SetMenu(HWND hWnd,
 /*
  * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 SetMenuDefaultItem(
   HMENU hMenu,
@@ -1242,26 +4562,26 @@ SetMenuDefaultItem(
 /*
  * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 SetMenuInfo(
   HMENU hmenu,
   LPCMENUINFO lpcmi)
 {
-  MENUINFO mi;
+  ROSMENUINFO mi;
   BOOL res = FALSE;
   if(lpcmi->cbSize != sizeof(MENUINFO))
     return res;
-    
+
   memcpy(&mi, lpcmi, sizeof(MENUINFO));
   return NtUserMenuInfo(hmenu, &mi, TRUE);
 }
 
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 SetMenuItemBitmaps(
   HMENU hMenu,
@@ -1270,91 +4590,172 @@ SetMenuItemBitmaps(
   HBITMAP hBitmapUnchecked,
   HBITMAP hBitmapChecked)
 {
-  UNIMPLEMENTED;
-  return FALSE;
+  ROSMENUITEMINFO uItem;
+
+  if(!(NtUserMenuItemInfo(hMenu, uPosition, 
+                 (BOOL)(MF_BYPOSITION & uFlags), &uItem, FALSE))) return FALSE;
+
+  if (!hBitmapChecked && !hBitmapUnchecked)
+  {
+    uItem.fState &= ~MF_USECHECKBITMAPS;
+  }
+  else  /* Install new bitmaps */
+  {
+    uItem.hbmpChecked = hBitmapChecked;
+    uItem.hbmpUnchecked = hBitmapUnchecked;
+    uItem.fState |= MF_USECHECKBITMAPS;
+  }
+ return NtUserMenuItemInfo(hMenu, uPosition,
+                                 (BOOL)(MF_BYPOSITION & uFlags), &uItem, TRUE);
 }
 
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 SetMenuItemInfoA(
   HMENU hMenu,
   UINT uItem,
-  WINBOOL fByPosition,
-  LPMENUITEMINFOA lpmii)
+  BOOL fByPosition,
+  LPCMENUITEMINFOA lpmii)
 {
-  UNIMPLEMENTED;
-  return FALSE;
+  MENUITEMINFOW MenuItemInfoW;
+  UNICODE_STRING UnicodeString;
+  ULONG Result;
+
+  RtlCopyMemory(&MenuItemInfoW, lpmii, min(lpmii->cbSize, sizeof(MENUITEMINFOW)));
+
+  if ((MenuItemInfoW.fMask & (MIIM_TYPE | MIIM_STRING)) &&
+      (MENU_ITEM_TYPE(MenuItemInfoW.fType) == MF_STRING) &&
+      MenuItemInfoW.dwTypeData != NULL)
+  {
+    RtlCreateUnicodeStringFromAsciiz(&UnicodeString,
+                                     (LPSTR)MenuItemInfoW.dwTypeData);
+    MenuItemInfoW.dwTypeData = UnicodeString.Buffer;
+    MenuItemInfoW.cch = UnicodeString.Length / sizeof(WCHAR);
+  }
+  else
+  {
+    UnicodeString.Buffer = NULL;
+  }
+
+  Result = NtUserMenuItemInfo(hMenu, uItem, fByPosition,
+                              (PROSMENUITEMINFO)&MenuItemInfoW, TRUE);
+
+  if (UnicodeString.Buffer != NULL)
+  {
+    RtlFreeUnicodeString(&UnicodeString);
+  }
+
+  return Result;
 }
 
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 SetMenuItemInfoW(
   HMENU hMenu,
   UINT uItem,
-  WINBOOL fByPosition,
-  LPMENUITEMINFOW lpmii)
+  BOOL fByPosition,
+  LPCMENUITEMINFOW lpmii)
 {
-  UNIMPLEMENTED;
-  return FALSE;
+  MENUITEMINFOW MenuItemInfoW;
+
+  RtlCopyMemory(&MenuItemInfoW, lpmii, min(lpmii->cbSize, sizeof(MENUITEMINFOW)));
+  if (0 != (MenuItemInfoW.fMask & MIIM_STRING))
+  {
+    MenuItemInfoW.cch = wcslen(MenuItemInfoW.dwTypeData);
+  }
+
+  return NtUserMenuItemInfo(hMenu, uItem, fByPosition,
+                            (PROSMENUITEMINFO)&MenuItemInfoW, TRUE);
+}
+
+/*
+ * @implemented
+ */
+BOOL
+STDCALL
+SetSystemMenu (
+  HWND hwnd,
+  HMENU hMenu)
+{
+  if(!hwnd)
+  {
+    SetLastError(ERROR_INVALID_WINDOW_HANDLE);
+    return FALSE;
+  }
+  if(!hMenu)
+  {
+    SetLastError(ERROR_INVALID_MENU_HANDLE);
+    return FALSE;
+  }
+  return NtUserSetSystemMenu(hwnd, hMenu);
 }
 
 
 /*
  * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 TrackPopupMenu(
-  HMENU hMenu,
-  UINT uFlags,
+  HMENU Menu,
+  UINT Flags,
   int x,
   int y,
-  int nReserved,
-  HWND hWnd,
-  CONST RECT *prcRect)
+  int Reserved,
+  HWND Wnd,
+  CONST RECT *Rect)
 {
-  TPMPARAMS tpm;
-  
-  if(prcRect)
-  {
-    tpm.cbSize = sizeof(TPMPARAMS);
-    tpm.rcExclude = *prcRect;
-  }
-  
-  return (WINBOOL)NtUserTrackPopupMenuEx(hMenu, uFlags, x, y, hWnd, 
-                                         (prcRect ? &tpm : NULL));
+  BOOL ret = FALSE;
+
+  MenuInitTracking(Wnd, Menu, TRUE, Flags);
+
+  /* Send WM_INITMENUPOPUP message only if TPM_NONOTIFY flag is not specified */
+  if (0 == (Flags & TPM_NONOTIFY))
+    {
+      SendMessageW(Wnd, WM_INITMENUPOPUP, (WPARAM) Menu, 0);
+    }
+
+  if (MenuShowPopup(Wnd, Menu, 0, x, y, 0, 0 ))
+    {
+      ret = MenuTrackMenu(Menu, Flags | TPM_POPUPMENU, 0, 0, Wnd, Rect);
+    }
+  MenuExitTracking(Wnd);
+
+  return ret;
 }
 
 
 /*
- * @implemented
+ * @unimplemented
  */
-WINBOOL
+BOOL
 STDCALL
 TrackPopupMenuEx(
-  HMENU hmenu,
-  UINT fuFlags,
+  HMENU Menu,
+  UINT Flags,
   int x,
   int y,
-  HWND hwnd,
-  LPTPMPARAMS lptpm)
+  HWND Wnd,
+  LPTPMPARAMS Tpm)
 {
-  return (WINBOOL)NtUserTrackPopupMenuEx(hmenu, fuFlags, x, y, hwnd, lptpm);
+  /* Not fully implemented */
+  return TrackPopupMenu(Menu, Flags, x, y, 0, Wnd,
+                        NULL != Tpm ? &Tpm->rcExclude : NULL);
 }
 
 
 /*
  * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 SetMenuContextHelpId(HMENU hmenu,
           DWORD dwContextHelpId)
@@ -1370,10 +4771,10 @@ DWORD
 STDCALL
 GetMenuContextHelpId(HMENU hmenu)
 {
-  MENUINFO mi;
-  mi.cbSize = sizeof(MENUINFO);
+  ROSMENUINFO mi;
+  mi.cbSize = sizeof(ROSMENUINFO);
   mi.fMask = MIM_HELPID;
-  
+
   if(NtUserMenuInfo(hmenu, &mi, FALSE))
   {
     return mi.dwContextHelpID;
@@ -1381,23 +4782,6 @@ GetMenuContextHelpId(HMENU hmenu)
   return 0;
 }
 
-/*
- * @unimplemented
- */
-DWORD
-STDCALL
-DrawMenuBarTemp(
-               HWND   hwnd,
-               HDC    hDC,
-               LPRECT lprect,
-               HMENU  hMenu,
-               HFONT  hFont
-               )
-{
-  UNIMPLEMENTED;
-  return FALSE;
-}
-
 /*
  * @unimplemented
  */
@@ -1431,9 +4815,9 @@ MenuWindowProcW(
 }
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 ChangeMenuW(
     HMENU hMenu,
@@ -1442,14 +4826,36 @@ ChangeMenuW(
     UINT cmdInsert,
     UINT flags)
 {
-  UNIMPLEMENTED;
-  return FALSE;
+    /*
+        FIXME: Word passes the item id in 'cmd' and 0 or 0xffff as cmdInsert
+        for MF_DELETE. We should check the parameters for all others
+        MF_* actions also (anybody got a doc on ChangeMenu?).
+    */
+
+    switch(flags & (MF_APPEND | MF_DELETE | MF_CHANGE | MF_REMOVE | MF_INSERT))
+    {
+        case MF_APPEND :
+            return AppendMenuW(hMenu, flags &~ MF_APPEND, cmdInsert, lpszNewItem);
+
+        case MF_DELETE :
+            return DeleteMenu(hMenu, cmd, flags &~ MF_DELETE);
+
+        case MF_CHANGE :
+            return ModifyMenuW(hMenu, cmd, flags &~ MF_CHANGE, cmdInsert, lpszNewItem);
+
+        case MF_REMOVE :
+            return RemoveMenu(hMenu, flags & MF_BYPOSITION ? cmd : cmdInsert,
+                                flags &~ MF_REMOVE);
+
+        default :   /* MF_INSERT */
+            return InsertMenuW(hMenu, cmd, flags, cmdInsert, lpszNewItem);
+    };
 }
 
 /*
- * @unimplemented
+ * @implemented
  */
-WINBOOL
+BOOL
 STDCALL
 ChangeMenuA(
     HMENU hMenu,
@@ -1458,6 +4864,28 @@ ChangeMenuA(
     UINT cmdInsert,
     UINT flags)
 {
-  UNIMPLEMENTED;
-  return FALSE;
+    /*
+        FIXME: Word passes the item id in 'cmd' and 0 or 0xffff as cmdInsert
+        for MF_DELETE. We should check the parameters for all others
+        MF_* actions also (anybody got a doc on ChangeMenu?).
+    */
+
+    switch(flags & (MF_APPEND | MF_DELETE | MF_CHANGE | MF_REMOVE | MF_INSERT))
+    {
+        case MF_APPEND :
+            return AppendMenuA(hMenu, flags &~ MF_APPEND, cmdInsert, lpszNewItem);
+
+        case MF_DELETE :
+            return DeleteMenu(hMenu, cmd, flags &~ MF_DELETE);
+
+        case MF_CHANGE :
+            return ModifyMenuA(hMenu, cmd, flags &~ MF_CHANGE, cmdInsert, lpszNewItem);
+
+        case MF_REMOVE :
+            return RemoveMenu(hMenu, flags & MF_BYPOSITION ? cmd : cmdInsert,
+                                flags &~ MF_REMOVE);
+
+        default :   /* MF_INSERT */
+            return InsertMenuA(hMenu, cmd, flags, cmdInsert, lpszNewItem);
+    };
 }