git.oblomov.eu Git - wine/blob - controls/menu.c

   1 /*
   2  * Menu functions
   3  *
   4  * Copyright 1993 Martin Ayotte
   5  * Copyright 1994 Alexandre Julliard
   6  * Copyright 1997 Morten Welinder
   7  */
   8
   9 /*
  10  * Note: the style MF_MOUSESELECT is used to mark popup items that
  11  * have been selected, i.e. their popup menu is currently displayed.
  12  * This is probably not the meaning this style has in MS-Windows.
  13  */
  14
  15 #include <assert.h>
  16 #include <ctype.h>
  17 #include <stdlib.h>
  18 #include <string.h>
  19
  20 #include "windef.h"
  21 #include "wingdi.h"
  22 #include "wine/winbase16.h"
  23 #include "wine/winuser16.h"
  24 #include "win.h"
  25 #include "task.h"
  26 #include "heap.h"
  27 #include "menu.h"
  28 #include "nonclient.h"
  29 #include "user.h"
  30 #include "message.h"
  31 #include "tweak.h"
  32
  33 #include "debugtools.h"
  34
  35 DEFAULT_DEBUG_CHANNEL(menu)
  36
  37
  38 /* internal popup menu window messages */
  39
  40 #define MM_SETMENUHANDLE        (WM_USER + 0)
  41 #define MM_GETMENUHANDLE        (WM_USER + 1)
  42
  43 /* Menu item structure */
  44 typedef struct {
  45     /* ----------- MENUITEMINFO Stuff ----------- */
  46     UINT fType;                 /* Item type. */
  47     UINT fState;                /* Item state.  */
  48     UINT wID;                   /* Item id.  */
  49     HMENU hSubMenu;             /* Pop-up menu.  */
  50     HBITMAP hCheckBit;          /* Bitmap when checked.  */
  51     HBITMAP hUnCheckBit;        /* Bitmap when unchecked.  */
  52     LPSTR text;                 /* Item text or bitmap handle.  */
  53     DWORD dwItemData;           /* Application defined.  */
  54     DWORD dwTypeData;           /* depends on fMask */
  55     HBITMAP hbmpItem;           /* bitmap in win98 style menus */
  56     /* ----------- Wine stuff ----------- */
  57     RECT      rect;             /* Item area (relative to menu window) */
  58     UINT      xTab;             /* X position of text after Tab */
  59 } MENUITEM;
  60
  61 /* Popup menu structure */
  62 typedef struct {
  63     WORD        wFlags;       /* Menu flags (MF_POPUP, MF_SYSMENU) */
  64     WORD        wMagic;       /* Magic number */
  65     HQUEUE16    hTaskQ;       /* Task queue for this menu */
  66     WORD        Width;        /* Width of the whole menu */
  67     WORD        Height;       /* Height of the whole menu */
  68     WORD        nItems;       /* Number of items in the menu */
  69     HWND        hWnd;         /* Window containing the menu */
  70     MENUITEM    *items;       /* Array of menu items */
  71     UINT        FocusedItem;  /* Currently focused item */
  72     HWND        hwndOwner;    /* window receiving the messages for ownerdraw */
  73     BOOL        bTimeToHide;  /* Request hiding when receiving a second click in the top-level menu item */
  74     /* ------------ MENUINFO members ------ */
  75     DWORD       dwStyle;        /* Extended mennu style */
  76     UINT        cyMax;          /* max hight of the whole menu, 0 is screen hight */
  77     HBRUSH      hbrBack;        /* brush for menu background */
  78     DWORD       dwContextHelpID;
  79     DWORD       dwMenuData;     /* application defined value */
  80     HMENU       hSysMenuOwner;  /* Handle to the dummy sys menu holder */
  81 } POPUPMENU, *LPPOPUPMENU;
  82
  83 /* internal flags for menu tracking */
  84
  85 #define TF_ENDMENU              0x0001
  86 #define TF_SUSPENDPOPUP         0x0002
  87 #define TF_SKIPREMOVE           0x0004
  88
  89 typedef struct
  90 {
  91     UINT        trackFlags;
  92     HMENU       hCurrentMenu; /* current submenu (can be equal to hTopMenu)*/
  93     HMENU       hTopMenu;     /* initial menu */
  94     HWND        hOwnerWnd;    /* where notifications are sent */
  95     POINT       pt;
  96 } MTRACKER;
  97
  98 #define MENU_MAGIC   0x554d  /* 'MU' */
  99 #define IS_A_MENU(pmenu) ((pmenu) && (pmenu)->wMagic == MENU_MAGIC)
 100
 101 #define ITEM_PREV               -1
 102 #define ITEM_NEXT                1
 103
 104   /* Internal MENU_TrackMenu() flags */
 105 #define TPM_INTERNAL            0xF0000000
 106 #define TPM_ENTERIDLEEX         0x80000000              /* set owner window for WM_ENTERIDLE */
 107 #define TPM_BUTTONDOWN          0x40000000              /* menu was clicked before tracking */
 108 #define TPM_POPUPMENU           0x20000000              /* menu is a popup menu */
 109
 110   /* popup menu shade thickness */
 111 #define POPUP_XSHADE            4
 112 #define POPUP_YSHADE            4
 113
 114   /* Space between 2 menu bar items */
 115 #define MENU_BAR_ITEMS_SPACE 12
 116
 117   /* Minimum width of a tab character */
 118 #define MENU_TAB_SPACE 8
 119
 120   /* Height of a separator item */
 121 #define SEPARATOR_HEIGHT 5
 122
 123   /* (other menu->FocusedItem values give the position of the focused item) */
 124 #define NO_SELECTED_ITEM  0xffff
 125
 126 #define MENU_ITEM_TYPE(flags) \
 127   ((flags) & (MF_STRING | MF_BITMAP | MF_OWNERDRAW | MF_SEPARATOR))
 128
 129 #define IS_STRING_ITEM(flags) (MENU_ITEM_TYPE ((flags)) == MF_STRING)
 130 #define IS_BITMAP_ITEM(flags) (MENU_ITEM_TYPE ((flags)) == MF_BITMAP)
 131
 132 #define IS_SYSTEM_MENU(menu)  \
 133         (!((menu)->wFlags & MF_POPUP) && (menu)->wFlags & MF_SYSMENU)
 134
 135 #define IS_SYSTEM_POPUP(menu) \
 136         ((menu)->wFlags & MF_POPUP && (menu)->wFlags & MF_SYSMENU)
 137
 138 #define TYPE_MASK (MFT_STRING | MFT_BITMAP | MFT_OWNERDRAW | MFT_SEPARATOR | \
 139                    MFT_MENUBARBREAK | MFT_MENUBREAK | MFT_RADIOCHECK | \
 140                    MFT_RIGHTORDER | MFT_RIGHTJUSTIFY | \
 141                    MF_POPUP | MF_SYSMENU | MF_HELP)
 142 #define STATE_MASK (~TYPE_MASK)
 143
 144   /* Dimension of the menu bitmaps */
 145 static WORD check_bitmap_width = 0, check_bitmap_height = 0;
 146 static WORD arrow_bitmap_width = 0, arrow_bitmap_height = 0;
 147
 148 static HBITMAP hStdRadioCheck = 0;
 149 static HBITMAP hStdCheck = 0;
 150 static HBITMAP hStdMnArrow = 0;
 151
 152 /* Minimze/restore/close buttons to be inserted in menubar */
 153 static HBITMAP hBmpMinimize = 0;
 154 static HBITMAP hBmpMinimizeD = 0;
 155 static HBITMAP hBmpMaximize = 0;
 156 static HBITMAP hBmpMaximizeD = 0;
 157 static HBITMAP hBmpClose = 0;
 158 static HBITMAP hBmpCloseD = 0;
 159
 160
 161 static HBRUSH   hShadeBrush = 0;
 162 static HFONT    hMenuFont = 0;
 163 static HFONT    hMenuFontBold = 0;
 164
 165 static HMENU MENU_DefSysPopup = 0;  /* Default system menu popup */
 166
 167 /* Use global popup window because there's no way 2 menus can
 168  * be tracked at the same time.  */
 169
 170 static WND* pTopPopupWnd   = 0;
 171 static UINT uSubPWndLevel = 0;
 172
 173   /* Flag set by EndMenu() to force an exit from menu tracking */
 174 static BOOL fEndMenu = FALSE;
 175
 176
 177 /***********************************************************************
 178  *           debug_print_menuitem
 179  *
 180  * Print a menuitem in readable form.
 181  */
 182
 183 #define debug_print_menuitem(pre, mp, post) \
 184   if(!TRACE_ON(menu)) ; else do_debug_print_menuitem(pre, mp, post)
 185
 186 #define MENUOUT(text) \
 187   DPRINTF("%s%s", (count++ ? "," : ""), (text))
 188
 189 #define MENUFLAG(bit,text) \
 190   do { \
 191     if (flags & (bit)) { flags &= ~(bit); MENUOUT ((text)); } \
 192   } while (0)
 193
 194 static void do_debug_print_menuitem(const char *prefix, MENUITEM * mp,
 195                                     const char *postfix)
 196 {
 197     TRACE("%s ", prefix);
 198     if (mp) {
 199         UINT flags = mp->fType;
 200         int typ = MENU_ITEM_TYPE(flags);
 201         DPRINTF( "{ ID=0x%x", mp->wID);
 202         if (flags & MF_POPUP)
 203             DPRINTF( ", Sub=0x%x", mp->hSubMenu);
 204         if (flags) {
 205             int count = 0;
 206             DPRINTF( ", Typ=");
 207             if (typ == MFT_STRING)
 208                 /* Nothing */ ;
 209             else if (typ == MFT_SEPARATOR)
 210                 MENUOUT("sep");
 211             else if (typ == MFT_OWNERDRAW)
 212                 MENUOUT("own");
 213             else if (typ == MFT_BITMAP)
 214                 MENUOUT("bit");
 215             else
 216                 MENUOUT("???");
 217             flags -= typ;
 218
 219             MENUFLAG(MF_POPUP, "pop");
 220             MENUFLAG(MFT_MENUBARBREAK, "barbrk");
 221             MENUFLAG(MFT_MENUBREAK, "brk");
 222             MENUFLAG(MFT_RADIOCHECK, "radio");
 223             MENUFLAG(MFT_RIGHTORDER, "rorder");
 224             MENUFLAG(MF_SYSMENU, "sys");
 225             MENUFLAG(MFT_RIGHTJUSTIFY, "right");        /* same as MF_HELP */
 226
 227             if (flags)
 228                 DPRINTF( "+0x%x", flags);
 229         }
 230         flags = mp->fState;
 231         if (flags) {
 232             int count = 0;
 233             DPRINTF( ", State=");
 234             MENUFLAG(MFS_GRAYED, "grey");
 235             MENUFLAG(MFS_DEFAULT, "default");
 236             MENUFLAG(MFS_DISABLED, "dis");
 237             MENUFLAG(MFS_CHECKED, "check");
 238             MENUFLAG(MFS_HILITE, "hi");
 239             MENUFLAG(MF_USECHECKBITMAPS, "usebit");
 240             MENUFLAG(MF_MOUSESELECT, "mouse");
 241             if (flags)
 242                 DPRINTF( "+0x%x", flags);
 243         }
 244         if (mp->hCheckBit)
 245             DPRINTF( ", Chk=0x%x", mp->hCheckBit);
 246         if (mp->hUnCheckBit)
 247             DPRINTF( ", Unc=0x%x", mp->hUnCheckBit);
 248
 249         if (typ == MFT_STRING) {
 250             if (mp->text)
 251                 DPRINTF( ", Text=\"%s\"", mp->text);
 252             else
 253                 DPRINTF( ", Text=Null");
 254         } else if (mp->text == NULL)
 255             /* Nothing */ ;
 256         else
 257             DPRINTF( ", Text=%p", mp->text);
 258         if (mp->dwItemData)
 259             DPRINTF( ", ItemData=0x%08lx", mp->dwItemData);
 260         DPRINTF( " }");
 261     } else {
 262         DPRINTF( "NULL");
 263     }
 264
 265     DPRINTF(" %s\n", postfix);
 266 }
 267
 268 #undef MENUOUT
 269 #undef MENUFLAG
 270
 271
 272 /***********************************************************************
 273  *           MENU_GetMenu
 274  *
 275  * Validate the given menu handle and returns the menu structure pointer.
 276  */
 277 POPUPMENU *MENU_GetMenu(HMENU hMenu)
 278 {
 279     POPUPMENU *menu;
 280     menu = (POPUPMENU *) USER_HEAP_LIN_ADDR(hMenu);
 281     if (!IS_A_MENU(menu))
 282     {
 283         ERR("invalid menu handle=%x, ptr=%p, magic=%x\n", hMenu, menu, menu? menu->wMagic:0);
 284         menu = NULL;
 285     }
 286     return menu;
 287 }
 288
 289 /***********************************************************************
 290  *           MENU_CopySysPopup
 291  *
 292  * Return the default system menu.
 293  */
 294 static HMENU MENU_CopySysPopup(void)
 295 {
 296     HMENU hMenu = LoadMenuA(GetModuleHandleA("USER32"), "SYSMENU");
 297
 298     if( hMenu ) {
 299         POPUPMENU* menu = (POPUPMENU *) USER_HEAP_LIN_ADDR(hMenu);
 300         menu->wFlags |= MF_SYSMENU | MF_POPUP;
 301         SetMenuDefaultItem(hMenu, SC_CLOSE, FALSE);
 302     }
 303     else {
 304         hMenu = 0;
 305         ERR("Unable to load default system menu\n" );
 306     }
 307
 308     TRACE("returning %x.\n", hMenu );
 309
 310     return hMenu;
 311 }
 312
 313 /***********************************************************************
 314  *           MENU_GetTopPopupWnd()
 315  *
 316  * Return the locked pointer pTopPopupWnd.
 317  */
 318 static WND *MENU_GetTopPopupWnd()
 319 {
 320     return WIN_LockWndPtr(pTopPopupWnd);
 321 }
 322 /***********************************************************************
 323  *           MENU_ReleaseTopPopupWnd()
 324  *
 325  * Realease the locked pointer pTopPopupWnd.
 326  */
 327 static void MENU_ReleaseTopPopupWnd()
 328 {
 329     WIN_ReleaseWndPtr(pTopPopupWnd);
 330 }
 331 /***********************************************************************
 332  *           MENU_DestroyTopPopupWnd()
 333  *
 334  * Destroy the locked pointer pTopPopupWnd.
 335  */
 336 static void MENU_DestroyTopPopupWnd()
 337 {
 338     WND *tmpWnd = pTopPopupWnd;
 339     pTopPopupWnd = NULL;
 340     WIN_ReleaseWndPtr(tmpWnd);
 341 }
 342
 343
 344
 345 /**********************************************************************
 346  *           MENU_GetSysMenu
 347  *
 348  * Create a copy of the system menu. System menu in Windows is
 349  * a special menu-bar with the single entry - system menu popup.
 350  * This popup is presented to the outside world as a "system menu".
 351  * However, the real system menu handle is sometimes seen in the
 352  * WM_MENUSELECT paramemters (and Word 6 likes it this way).
 353  */
 354 HMENU MENU_GetSysMenu( HWND hWnd, HMENU hPopupMenu )
 355 {
 356     HMENU hMenu;
 357
 358     if ((hMenu = CreateMenu()))
 359     {
 360         POPUPMENU *menu = (POPUPMENU*) USER_HEAP_LIN_ADDR(hMenu);
 361         menu->wFlags = MF_SYSMENU;
 362         menu->hWnd = hWnd;
 363
 364         if (hPopupMenu == (HMENU)(-1))
 365             hPopupMenu = MENU_CopySysPopup();
 366         else if( !hPopupMenu ) hPopupMenu = MENU_DefSysPopup;
 367
 368         if (hPopupMenu)
 369         {
 370             InsertMenuA( hMenu, -1, MF_SYSMENU | MF_POPUP | MF_BYPOSITION, hPopupMenu, NULL );
 371
 372             menu->items[0].fType = MF_SYSMENU | MF_POPUP;
 373             menu->items[0].fState = 0;
 374             menu = (POPUPMENU*) USER_HEAP_LIN_ADDR(hPopupMenu);
 375             menu->wFlags |= MF_SYSMENU;
 376
 377             TRACE("GetSysMenu hMenu=%04x (%04x)\n", hMenu, hPopupMenu );
 378             return hMenu;
 379         }
 380         DestroyMenu( hMenu );
 381     }
 382     ERR("failed to load system menu!\n");
 383     return 0;
 384 }
 385
 386
 387 /***********************************************************************
 388  *           MENU_Init
 389  *
 390  * Menus initialisation.
 391  */
 392 BOOL MENU_Init()
 393 {
 394     HBITMAP hBitmap;
 395     NONCLIENTMETRICSA ncm;
 396
 397     static unsigned char shade_bits[16] = { 0x55, 0, 0xAA, 0,
 398                                             0x55, 0, 0xAA, 0,
 399                                             0x55, 0, 0xAA, 0,
 400                                             0x55, 0, 0xAA, 0 };
 401
 402     /* Load menu bitmaps */
 403     hStdCheck = LoadBitmapA(0, MAKEINTRESOURCEA(OBM_CHECK));
 404     hStdRadioCheck = LoadBitmapA(0, MAKEINTRESOURCEA(OBM_RADIOCHECK));
 405     hStdMnArrow = LoadBitmapA(0, MAKEINTRESOURCEA(OBM_MNARROW));
 406     /* Load system buttons bitmaps */
 407     hBmpMinimize = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_REDUCE));
 408     hBmpMinimizeD = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_REDUCED));
 409     hBmpMaximize = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_RESTORE));
 410     hBmpMaximizeD = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_RESTORED));
 411     hBmpClose = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_CLOSE));
 412     hBmpCloseD = LoadBitmapA(0,MAKEINTRESOURCEA(OBM_CLOSED));
 413
 414     if (hStdCheck)
 415     {
 416         BITMAP bm;
 417         GetObjectA( hStdCheck, sizeof(bm), &bm );
 418         check_bitmap_width = bm.bmWidth;
 419         check_bitmap_height = bm.bmHeight;
 420     } else
 421          return FALSE;
 422
 423     /* Assume that radio checks have the same size as regular check.  */
 424     if (!hStdRadioCheck)
 425          return FALSE;
 426
 427     if (hStdMnArrow)
 428     {
 429         BITMAP bm;
 430         GetObjectA( hStdMnArrow, sizeof(bm), &bm );
 431         arrow_bitmap_width = bm.bmWidth;
 432         arrow_bitmap_height = bm.bmHeight;
 433     } else
 434         return FALSE;
 435
 436     if (! (hBitmap = CreateBitmap( 8, 8, 1, 1, shade_bits)))
 437         return FALSE;
 438
 439     if(!(hShadeBrush = CreatePatternBrush( hBitmap )))
 440         return FALSE;
 441
 442     DeleteObject( hBitmap );
 443     if (!(MENU_DefSysPopup = MENU_CopySysPopup()))
 444         return FALSE;
 445
 446     ncm.cbSize = sizeof (NONCLIENTMETRICSA);
 447     if (!(SystemParametersInfoA(SPI_GETNONCLIENTMETRICS, sizeof(NONCLIENTMETRICSA), &ncm, 0)))
 448         return FALSE;
 449
 450     if (!(hMenuFont = CreateFontIndirectA( &ncm.lfMenuFont )))
 451         return FALSE;
 452
 453     ncm.lfMenuFont.lfWeight += 300;
 454     if ( ncm.lfMenuFont.lfWeight > 1000)
 455         ncm.lfMenuFont.lfWeight = 1000;
 456
 457     if (!(hMenuFontBold = CreateFontIndirectA( &ncm.lfMenuFont )))
 458         return FALSE;
 459
 460     return TRUE;
 461 }
 462
 463 /***********************************************************************
 464  *           MENU_InitSysMenuPopup
 465  *
 466  * Grey the appropriate items in System menu.
 467  */
 468 static void MENU_InitSysMenuPopup( HMENU hmenu, DWORD style, DWORD clsStyle )
 469 {
 470     BOOL gray;
 471
 472     gray = !(style & WS_THICKFRAME) || (style & (WS_MAXIMIZE | WS_MINIMIZE));
 473     EnableMenuItem( hmenu, SC_SIZE, (gray ? MF_GRAYED : MF_ENABLED) );
 474     gray = ((style & WS_MAXIMIZE) != 0);
 475     EnableMenuItem( hmenu, SC_MOVE, (gray ? MF_GRAYED : MF_ENABLED) );
 476     gray = !(style & WS_MINIMIZEBOX) || (style & WS_MINIMIZE);
 477     EnableMenuItem( hmenu, SC_MINIMIZE, (gray ? MF_GRAYED : MF_ENABLED) );
 478     gray = !(style & WS_MAXIMIZEBOX) || (style & WS_MAXIMIZE);
 479     EnableMenuItem( hmenu, SC_MAXIMIZE, (gray ? MF_GRAYED : MF_ENABLED) );
 480     gray = !(style & (WS_MAXIMIZE | WS_MINIMIZE));
 481     EnableMenuItem( hmenu, SC_RESTORE, (gray ? MF_GRAYED : MF_ENABLED) );
 482     gray = (clsStyle & CS_NOCLOSE) != 0;
 483
 484     /* The menu item must keep its state if it's disabled */
 485     if(gray)
 486         EnableMenuItem( hmenu, SC_CLOSE, MF_GRAYED);
 487 }
 488
 489
 490 /******************************************************************************
 491  *
 492  *   UINT32  MENU_GetStartOfNextColumn(
 493  *     HMENU32  hMenu )
 494  *
 495  *****************************************************************************/
 496
 497 static UINT  MENU_GetStartOfNextColumn(
 498     HMENU  hMenu )
 499 {
 500     POPUPMENU  *menu = (POPUPMENU *)USER_HEAP_LIN_ADDR(hMenu);
 501     UINT  i = menu->FocusedItem + 1;
 502
 503     if(!menu)
 504         return NO_SELECTED_ITEM;
 505
 506     if( i == NO_SELECTED_ITEM )
 507         return i;
 508
 509     for( ; i < menu->nItems; ++i ) {
 510         if (menu->items[i].fType & MF_MENUBARBREAK)
 511             return i;
 512     }
 513
 514     return NO_SELECTED_ITEM;
 515 }
 516
 517
 518 /******************************************************************************
 519  *
 520  *   UINT32  MENU_GetStartOfPrevColumn(
 521  *     HMENU32  hMenu )
 522  *
 523  *****************************************************************************/
 524
 525 static UINT  MENU_GetStartOfPrevColumn(
 526     HMENU  hMenu )
 527 {
 528     POPUPMENU const  *menu = (POPUPMENU *)USER_HEAP_LIN_ADDR(hMenu);
 529     UINT  i;
 530
 531     if( !menu )
 532         return NO_SELECTED_ITEM;
 533
 534     if( menu->FocusedItem == 0 || menu->FocusedItem == NO_SELECTED_ITEM )
 535         return NO_SELECTED_ITEM;
 536
 537     /* Find the start of the column */
 538
 539     for(i = menu->FocusedItem; i != 0 &&
 540          !(menu->items[i].fType & MF_MENUBARBREAK);
 541         --i); /* empty */
 542
 543     if(i == 0)
 544         return NO_SELECTED_ITEM;
 545
 546     for(--i; i != 0; --i) {
 547         if (menu->items[i].fType & MF_MENUBARBREAK)
 548             break;
 549     }
 550
 551     TRACE("ret %d.\n", i );
 552
 553     return i;
 554 }
 555
 556
 557
 558 /***********************************************************************
 559  *           MENU_FindItem
 560  *
 561  * Find a menu item. Return a pointer on the item, and modifies *hmenu
 562  * in case the item was in a sub-menu.
 563  */
 564 static MENUITEM *MENU_FindItem( HMENU *hmenu, UINT *nPos, UINT wFlags )
 565 {
 566     POPUPMENU *menu;
 567     UINT i;
 568
 569     if (((*hmenu)==0xffff) || (!(menu = MENU_GetMenu(*hmenu)))) return NULL;
 570     if (wFlags & MF_BYPOSITION)
 571     {
 572         if (*nPos >= menu->nItems) return NULL;
 573         return &menu->items[*nPos];
 574     }
 575     else
 576     {
 577         MENUITEM *item = menu->items;
 578         for (i = 0; i < menu->nItems; i++, item++)
 579         {
 580             if (item->wID == *nPos)
 581             {
 582                 *nPos = i;
 583                 return item;
 584             }
 585             else if (item->fType & MF_POPUP)
 586             {
 587                 HMENU hsubmenu = item->hSubMenu;
 588                 MENUITEM *subitem = MENU_FindItem( &hsubmenu, nPos, wFlags );
 589                 if (subitem)
 590                 {
 591                     *hmenu = hsubmenu;
 592                     return subitem;
 593                 }
 594             }
 595         }
 596     }
 597     return NULL;
 598 }
 599
 600 /***********************************************************************
 601  *           MENU_FindSubMenu
 602  *
 603  * Find a Sub menu. Return the position of the submenu, and modifies
 604  * *hmenu in case it is found in another sub-menu.
 605  * If the submenu cannot be found, NO_SELECTED_ITEM is returned.
 606  */
 607 UINT MENU_FindSubMenu( HMENU *hmenu, HMENU hSubTarget )
 608 {
 609     POPUPMENU *menu;
 610     UINT i;
 611     MENUITEM *item;
 612     if (((*hmenu)==0xffff) ||
 613             (!(menu = MENU_GetMenu(*hmenu))))
 614         return NO_SELECTED_ITEM;
 615     item = menu->items;
 616     for (i = 0; i < menu->nItems; i++, item++) {
 617         if(!(item->fType & MF_POPUP)) continue;
 618         if (item->hSubMenu == hSubTarget) {
 619             return i;
 620         }
 621         else  {
 622             HMENU hsubmenu = item->hSubMenu;
 623             UINT pos = MENU_FindSubMenu( &hsubmenu, hSubTarget );
 624             if (pos != NO_SELECTED_ITEM) {
 625                 *hmenu = hsubmenu;
 626                 return pos;
 627             }
 628         }
 629     }
 630     return NO_SELECTED_ITEM;
 631 }
 632
 633 /***********************************************************************
 634  *           MENU_FreeItemData
 635  */
 636 static void MENU_FreeItemData( MENUITEM* item )
 637 {
 638     /* delete text */
 639     if (IS_STRING_ITEM(item->fType) && item->text)
 640         HeapFree( SystemHeap, 0, item->text );
 641 }
 642
 643 /***********************************************************************
 644  *           MENU_FindItemByCoords
 645  *
 646  * Find the item at the specified coordinates (screen coords). Does
 647  * not work for child windows and therefore should not be called for
 648  * an arbitrary system menu.
 649  */
 650 static MENUITEM *MENU_FindItemByCoords( POPUPMENU *menu,
 651                                         POINT pt, UINT *pos )
 652 {
 653     MENUITEM *item;
 654     UINT i;
 655     RECT wrect;
 656
 657     if (!GetWindowRect(menu->hWnd,&wrect)) return NULL;
 658     pt.x -= wrect.left;pt.y -= wrect.top;
 659     item = menu->items;
 660     for (i = 0; i < menu->nItems; i++, item++)
 661     {
 662         if ((pt.x >= item->rect.left) && (pt.x < item->rect.right) &&
 663             (pt.y >= item->rect.top) && (pt.y < item->rect.bottom))
 664         {
 665             if (pos) *pos = i;
 666             return item;
 667         }
 668     }
 669     return NULL;
 670 }
 671
 672
 673 /***********************************************************************
 674  *           MENU_FindItemByKey
 675  *
 676  * Find the menu item selected by a key press.
 677  * Return item id, -1 if none, -2 if we should close the menu.
 678  */
 679 static UINT MENU_FindItemByKey( HWND hwndOwner, HMENU hmenu,
 680                                   UINT key, BOOL forceMenuChar )
 681 {
 682     TRACE("\tlooking for '%c' in [%04x]\n", (char)key, (UINT16)hmenu );
 683
 684     if (!IsMenu( hmenu ))
 685     {
 686         WND* w = WIN_FindWndPtr(hwndOwner);
 687         hmenu = GetSubMenu(w->hSysMenu, 0);
 688         WIN_ReleaseWndPtr(w);
 689     }
 690
 691     if (hmenu)
 692     {
 693         POPUPMENU *menu = MENU_GetMenu( hmenu );
 694         MENUITEM *item = menu->items;
 695         LONG menuchar;
 696
 697         if( !forceMenuChar )
 698         {
 699              UINT i;
 700
 701              key = toupper(key);
 702              for (i = 0; i < menu->nItems; i++, item++)
 703              {
 704                 if (item->text && (IS_STRING_ITEM(item->fType)))
 705                 {
 706                     char *p = item->text - 2;
 707                     do
 708                     {
 709                         p = strchr (p + 2, '&');
 710                     }
 711                     while (p != NULL && p [1] == '&');
 712                     if (p && (toupper(p[1]) == key)) return i;
 713                 }
 714              }
 715         }
 716         menuchar = SendMessageA( hwndOwner, WM_MENUCHAR,
 717                                    MAKEWPARAM( key, menu->wFlags ), hmenu );
 718         if (HIWORD(menuchar) == 2) return LOWORD(menuchar);
 719         if (HIWORD(menuchar) == 1) return (UINT)(-2);
 720     }
 721     return (UINT)(-1);
 722 }
 723 /***********************************************************************
 724  *           MENU_LoadMagicItem
 725  *
 726  * Load the bitmap associated with the magic menu item and its style
 727  */
 728
 729 static HBITMAP MENU_LoadMagicItem(UINT id, BOOL hilite, DWORD dwItemData)
 730 {
 731     /*
 732      * Magic menu item id's section
 733      * These magic id's are used by windows to insert "standard" mdi
 734      * buttons (minimize,restore,close) on menu. Under windows,
 735      * these magic id's make sure the right things appear when those
 736      * bitmap buttons are pressed/selected/released.
 737      */
 738
 739     switch(id & 0xffff)
 740     {   case HBMMENU_SYSTEM:
 741             return (dwItemData) ?
 742                 (HBITMAP)dwItemData :
 743                 (hilite ? hBmpMinimizeD : hBmpMinimize);
 744         case HBMMENU_MBAR_RESTORE:
 745             return (hilite ? hBmpMaximizeD: hBmpMaximize);
 746         case HBMMENU_MBAR_MINIMIZE:
 747             return (hilite ? hBmpMinimizeD : hBmpMinimize);
 748         case HBMMENU_MBAR_CLOSE:
 749             return (hilite ? hBmpCloseD : hBmpClose);
 750         case HBMMENU_CALLBACK:
 751         case HBMMENU_MBAR_CLOSE_D:
 752         case HBMMENU_MBAR_MINIMIZE_D:
 753         case HBMMENU_POPUP_CLOSE:
 754         case HBMMENU_POPUP_RESTORE:
 755         case HBMMENU_POPUP_MAXIMIZE:
 756         case HBMMENU_POPUP_MINIMIZE:
 757         default:
 758             FIXME("Magic 0x%08x not implemented\n", id);
 759             return 0;
 760     }
 761
 762 }
 763
 764 /***********************************************************************
 765  *           MENU_CalcItemSize
 766  *
 767  * Calculate the size of the menu item and store it in lpitem->rect.
 768  */
 769 static void MENU_CalcItemSize( HDC hdc, MENUITEM *lpitem, HWND hwndOwner,
 770                                INT orgX, INT orgY, BOOL menuBar )
 771 {
 772     char *p;
 773
 774     TRACE("dc=0x%04x owner=0x%04x (%d,%d)\n", hdc, hwndOwner, orgX, orgY);
 775     debug_print_menuitem("MENU_CalcItemSize: menuitem:", lpitem,
 776                          (menuBar ? " (MenuBar)" : ""));
 777
 778     SetRect( &lpitem->rect, orgX, orgY, orgX, orgY );
 779
 780     if (lpitem->fType & MF_OWNERDRAW)
 781     {
 782         MEASUREITEMSTRUCT mis;
 783         mis.CtlType    = ODT_MENU;
 784         mis.CtlID      = 0;
 785         mis.itemID     = lpitem->wID;
 786         mis.itemData   = (DWORD)lpitem->dwItemData;
 787         mis.itemHeight = 0;
 788         mis.itemWidth  = 0;
 789         SendMessageA( hwndOwner, WM_MEASUREITEM, 0, (LPARAM)&mis );
 790         lpitem->rect.bottom += mis.itemHeight;
 791         lpitem->rect.right  += mis.itemWidth;
 792         TRACE("id=%04x size=%dx%d\n",
 793                      lpitem->wID, mis.itemWidth, mis.itemHeight);
 794         return;
 795     }
 796
 797     if (lpitem->fType & MF_SEPARATOR)
 798     {
 799         lpitem->rect.bottom += SEPARATOR_HEIGHT;
 800         return;
 801     }
 802
 803     if (!menuBar)
 804     {
 805         lpitem->rect.right += 2 * check_bitmap_width;
 806         if (lpitem->fType & MF_POPUP)
 807             lpitem->rect.right += arrow_bitmap_width;
 808     }
 809
 810     if (IS_BITMAP_ITEM(lpitem->fType))
 811     {
 812         BITMAP bm;
 813         HBITMAP resBmp = 0;
 814
 815         /* Check if there is a magic menu item associated with this item */
 816         if((LOWORD((int)lpitem->text))<12)
 817         {
 818             resBmp = MENU_LoadMagicItem((int)lpitem->text, (lpitem->fType & MF_HILITE),
 819                                         lpitem->dwItemData);
 820         }
 821         else
 822             resBmp = (HBITMAP)lpitem->text;
 823
 824         if (GetObjectA(resBmp, sizeof(bm), &bm ))
 825         {
 826             lpitem->rect.right  += bm.bmWidth;
 827             lpitem->rect.bottom += bm.bmHeight;
 828
 829         }
 830     }
 831
 832
 833     /* If we get here, then it must be a text item */
 834     if (IS_STRING_ITEM( lpitem->fType ))
 835     {   SIZE size;
 836
 837         GetTextExtentPoint32A(hdc, lpitem->text,  strlen(lpitem->text), &size);
 838
 839         lpitem->rect.right  += size.cx;
 840         if (TWEAK_WineLook == WIN31_LOOK)
 841             lpitem->rect.bottom += MAX( size.cy, GetSystemMetrics(SM_CYMENU) );
 842         else
 843             lpitem->rect.bottom += MAX (size.cy, GetSystemMetrics(SM_CYMENU)-1);
 844         lpitem->xTab = 0;
 845
 846         if (menuBar)
 847         {
 848              lpitem->rect.right += MENU_BAR_ITEMS_SPACE;
 849         }
 850         else if ((p = strchr( lpitem->text, '\t' )) != NULL)
 851         {
 852             /* Item contains a tab (only meaningful in popup menus) */
 853             GetTextExtentPoint32A(hdc, lpitem->text, (int)(p - lpitem->text) , &size);
 854             lpitem->xTab = check_bitmap_width + MENU_TAB_SPACE + size.cx;
 855             lpitem->rect.right += MENU_TAB_SPACE;
 856         }
 857         else
 858         {
 859             if (strchr( lpitem->text, '\b' ))
 860                 lpitem->rect.right += MENU_TAB_SPACE;
 861             lpitem->xTab = lpitem->rect.right - check_bitmap_width
 862                            - arrow_bitmap_width;
 863         }
 864     }
 865     TRACE("(%d,%d)-(%d,%d)\n", lpitem->rect.left, lpitem->rect.top, lpitem->rect.right, lpitem->rect.bottom);
 866 }
 867
 868
 869 /***********************************************************************
 870  *           MENU_PopupMenuCalcSize
 871  *
 872  * Calculate the size of a popup menu.
 873  */
 874 static void MENU_PopupMenuCalcSize( LPPOPUPMENU lppop, HWND hwndOwner )
 875 {
 876     MENUITEM *lpitem;
 877     HDC hdc;
 878     int start, i;
 879     int orgX, orgY, maxX, maxTab, maxTabWidth;
 880
 881     lppop->Width = lppop->Height = 0;
 882     if (lppop->nItems == 0) return;
 883     hdc = GetDC( 0 );
 884
 885     SelectObject( hdc, hMenuFont);
 886
 887     start = 0;
 888     maxX = (TWEAK_WineLook == WIN31_LOOK) ? GetSystemMetrics(SM_CXBORDER) : 2 ;
 889
 890     while (start < lppop->nItems)
 891     {
 892         lpitem = &lppop->items[start];
 893         orgX = maxX;
 894         orgY = (TWEAK_WineLook == WIN31_LOOK) ? GetSystemMetrics(SM_CYBORDER) : 2;
 895
 896         maxTab = maxTabWidth = 0;
 897
 898           /* Parse items until column break or end of menu */
 899         for (i = start; i < lppop->nItems; i++, lpitem++)
 900         {
 901             if ((i != start) &&
 902                 (lpitem->fType & (MF_MENUBREAK | MF_MENUBARBREAK))) break;
 903
 904             MENU_CalcItemSize( hdc, lpitem, hwndOwner, orgX, orgY, FALSE );
 905
 906             if (lpitem->fType & MF_MENUBARBREAK) orgX++;
 907             maxX = MAX( maxX, lpitem->rect.right );
 908             orgY = lpitem->rect.bottom;
 909             if (IS_STRING_ITEM(lpitem->fType) && lpitem->xTab)
 910             {
 911                 maxTab = MAX( maxTab, lpitem->xTab );
 912                 maxTabWidth = MAX(maxTabWidth,lpitem->rect.right-lpitem->xTab);
 913             }
 914         }
 915
 916           /* Finish the column (set all items to the largest width found) */
 917         maxX = MAX( maxX, maxTab + maxTabWidth );
 918         for (lpitem = &lppop->items[start]; start < i; start++, lpitem++)
 919         {
 920             lpitem->rect.right = maxX;
 921             if (IS_STRING_ITEM(lpitem->fType) && lpitem->xTab)
 922                 lpitem->xTab = maxTab;
 923
 924         }
 925         lppop->Height = MAX( lppop->Height, orgY );
 926     }
 927
 928     lppop->Width  = maxX;
 929
 930     /* space for 3d border */
 931     if(TWEAK_WineLook > WIN31_LOOK)
 932     {
 933         lppop->Height += 2;
 934         lppop->Width += 2;
 935     }
 936
 937     ReleaseDC( 0, hdc );
 938 }
 939
 940
 941 /***********************************************************************
 942  *           MENU_MenuBarCalcSize
 943  *
 944  * FIXME: Word 6 implements its own MDI and its own 'close window' bitmap
 945  * height is off by 1 pixel which causes lengthy window relocations when
 946  * active document window is maximized/restored.
 947  *
 948  * Calculate the size of the menu bar.
 949  */
 950 static void MENU_MenuBarCalcSize( HDC hdc, LPRECT lprect,
 951                                   LPPOPUPMENU lppop, HWND hwndOwner )
 952 {
 953     MENUITEM *lpitem;
 954     int start, i, orgX, orgY, maxY, helpPos;
 955
 956     if ((lprect == NULL) || (lppop == NULL)) return;
 957     if (lppop->nItems == 0) return;
 958     TRACE("left=%d top=%d right=%d bottom=%d\n",
 959                  lprect->left, lprect->top, lprect->right, lprect->bottom);
 960     lppop->Width  = lprect->right - lprect->left;
 961     lppop->Height = 0;
 962     maxY = lprect->top;
 963     start = 0;
 964     helpPos = -1;
 965     while (start < lppop->nItems)
 966     {
 967         lpitem = &lppop->items[start];
 968         orgX = lprect->left;
 969         orgY = maxY;
 970
 971           /* Parse items until line break or end of menu */
 972         for (i = start; i < lppop->nItems; i++, lpitem++)
 973         {
 974             if ((helpPos == -1) && (lpitem->fType & MF_HELP)) helpPos = i;
 975             if ((i != start) &&
 976                 (lpitem->fType & (MF_MENUBREAK | MF_MENUBARBREAK))) break;
 977
 978             TRACE("calling MENU_CalcItemSize org=(%d, %d)\n",
 979                          orgX, orgY );
 980             debug_print_menuitem ("  item: ", lpitem, "");
 981             MENU_CalcItemSize( hdc, lpitem, hwndOwner, orgX, orgY, TRUE );
 982
 983             if (lpitem->rect.right > lprect->right)
 984             {
 985                 if (i != start) break;
 986                 else lpitem->rect.right = lprect->right;
 987             }
 988             maxY = MAX( maxY, lpitem->rect.bottom );
 989             orgX = lpitem->rect.right;
 990         }
 991
 992           /* Finish the line (set all items to the largest height found) */
 993         while (start < i) lppop->items[start++].rect.bottom = maxY;
 994     }
 995
 996     lprect->bottom = maxY;
 997     lppop->Height = lprect->bottom - lprect->top;
 998
 999     /* Flush right all magic items and items between the MF_HELP and */
1000     /* the last item (if several lines, only move the last line) */
1001     lpitem = &lppop->items[lppop->nItems-1];
1002     orgY = lpitem->rect.top;
1003     orgX = lprect->right;
1004     for (i = lppop->nItems - 1; i >= helpPos; i--, lpitem--)
1005     {
1006         if ( !IS_BITMAP_ITEM(lpitem->fType) && ((helpPos ==-1) ? TRUE : (helpPos>i) ))
1007             break;                              /* done */
1008         if (lpitem->rect.top != orgY) break;    /* Other line */
1009         if (lpitem->rect.right >= orgX) break;  /* Too far right already */
1010         lpitem->rect.left += orgX - lpitem->rect.right;
1011         lpitem->rect.right = orgX;
1012         orgX = lpitem->rect.left;
1013     }
1014 }
1015
1016 /***********************************************************************
1017  *           MENU_DrawMenuItem
1018  *
1019  * Draw a single menu item.
1020  */
1021 static void MENU_DrawMenuItem( HWND hwnd, HMENU hmenu, HWND hwndOwner, HDC hdc, MENUITEM *lpitem,
1022                                UINT height, BOOL menuBar, UINT odaction )
1023 {
1024     RECT rect;
1025
1026     debug_print_menuitem("MENU_DrawMenuItem: ", lpitem, "");
1027
1028     if (lpitem->fType & MF_SYSMENU)
1029     {
1030         if( !IsIconic(hwnd) ) {
1031             if (TWEAK_WineLook > WIN31_LOOK)
1032                 NC_DrawSysButton95( hwnd, hdc,
1033                                     lpitem->fState &
1034                                     (MF_HILITE | MF_MOUSESELECT) );
1035             else
1036                 NC_DrawSysButton( hwnd, hdc,
1037                                   lpitem->fState &
1038                                   (MF_HILITE | MF_MOUSESELECT) );
1039         }
1040
1041         return;
1042     }
1043
1044     if (lpitem->fType & MF_OWNERDRAW)
1045     {
1046         DRAWITEMSTRUCT dis;
1047
1048         dis.CtlType   = ODT_MENU;
1049         dis.CtlID     = 0;
1050         dis.itemID    = lpitem->wID;
1051         dis.itemData  = (DWORD)lpitem->dwItemData;
1052         dis.itemState = 0;
1053         if (lpitem->fState & MF_CHECKED) dis.itemState |= ODS_CHECKED;
1054         if (lpitem->fState & MF_GRAYED)  dis.itemState |= ODS_GRAYED;
1055         if (lpitem->fState & MF_HILITE)  dis.itemState |= ODS_SELECTED;
1056         dis.itemAction = odaction; /* ODA_DRAWENTIRE | ODA_SELECT | ODA_FOCUS; */
1057         dis.hwndItem   = hmenu;
1058         dis.hDC        = hdc;
1059         dis.rcItem     = lpitem->rect;
1060         TRACE("Ownerdraw: owner=%04x itemID=%d, itemState=%d, itemAction=%d, "
1061               "hwndItem=%04x, hdc=%04x, rcItem={%d,%d,%d,%d}\n", hwndOwner,
1062               dis.itemID, dis.itemState, dis.itemAction, dis.hwndItem,
1063               dis.hDC, dis.rcItem.left, dis.rcItem.top, dis.rcItem.right,
1064               dis.rcItem.bottom);
1065         SendMessageA( hwndOwner, WM_DRAWITEM, 0, (LPARAM)&dis );
1066         return;
1067     }
1068
1069     TRACE("rect={%d,%d,%d,%d}\n", lpitem->rect.left, lpitem->rect.top,
1070                                         lpitem->rect.right,lpitem->rect.bottom);
1071
1072     if (menuBar && (lpitem->fType & MF_SEPARATOR)) return;
1073
1074     rect = lpitem->rect;
1075
1076     if ((lpitem->fState & MF_HILITE) && !(IS_BITMAP_ITEM(lpitem->fType)))
1077         if ((menuBar) &&  (TWEAK_WineLook==WIN98_LOOK))
1078             DrawEdge(hdc, &rect, BDR_SUNKENOUTER, BF_RECT);
1079         else
1080             FillRect( hdc, &rect, GetSysColorBrush(COLOR_HIGHLIGHT) );
1081     else
1082         FillRect( hdc, &rect, GetSysColorBrush(COLOR_MENU) );
1083
1084     SetBkMode( hdc, TRANSPARENT );
1085
1086     /* vertical separator */
1087     if (!menuBar && (lpitem->fType & MF_MENUBARBREAK))
1088     {
1089         if (TWEAK_WineLook > WIN31_LOOK)
1090         {
1091             RECT rc = rect;
1092             rc.top = 3;
1093             rc.bottom = height - 3;
1094             DrawEdge (hdc, &rc, EDGE_ETCHED, BF_LEFT);
1095         }
1096         else
1097         {
1098             SelectObject( hdc, GetSysColorPen(COLOR_WINDOWFRAME) );
1099             MoveTo16( hdc, rect.left, 0 );
1100             LineTo( hdc, rect.left, height );
1101         }
1102     }
1103
1104     /* horizontal separator */
1105     if (lpitem->fType & MF_SEPARATOR)
1106     {
1107         if (TWEAK_WineLook > WIN31_LOOK)
1108         {
1109             RECT rc = rect;
1110             rc.left++;
1111             rc.right--;
1112             rc.top += SEPARATOR_HEIGHT / 2;
1113             DrawEdge (hdc, &rc, EDGE_ETCHED, BF_TOP);
1114         }
1115         else
1116         {
1117             SelectObject( hdc, GetSysColorPen(COLOR_WINDOWFRAME) );
1118             MoveTo16( hdc, rect.left, rect.top + SEPARATOR_HEIGHT/2 );
1119             LineTo( hdc, rect.right, rect.top + SEPARATOR_HEIGHT/2 );
1120         }
1121         return;
1122     }
1123
1124       /* Setup colors */
1125
1126     if ((lpitem->fState & MF_HILITE) && !(IS_BITMAP_ITEM(lpitem->fType)) )
1127     {
1128         if (lpitem->fState & MF_GRAYED)
1129             SetTextColor( hdc, GetSysColor( COLOR_GRAYTEXT ) );
1130         else
1131             SetTextColor( hdc, GetSysColor( COLOR_HIGHLIGHTTEXT ) );
1132         SetBkColor( hdc, GetSysColor( COLOR_HIGHLIGHT ) );
1133     }
1134     else
1135     {
1136         if (lpitem->fState & MF_GRAYED)
1137             SetTextColor( hdc, GetSysColor( COLOR_GRAYTEXT ) );
1138         else
1139             SetTextColor( hdc, GetSysColor( COLOR_MENUTEXT ) );
1140         SetBkColor( hdc, GetSysColor( COLOR_MENU ) );
1141     }
1142
1143         /* helper lines for debugging */
1144 /*      FrameRect(hdc, &rect, GetStockObject(BLACK_BRUSH));
1145         SelectObject( hdc, GetSysColorPen(COLOR_WINDOWFRAME) );
1146         MoveTo16( hdc, rect.left, (rect.top + rect.bottom)/2 );
1147         LineTo( hdc, rect.right, (rect.top + rect.bottom)/2 );
1148 */
1149
1150     if (!menuBar)
1151     {
1152         INT     y = rect.top + rect.bottom;
1153
1154           /* Draw the check mark
1155            *
1156            * FIXME:
1157            * Custom checkmark bitmaps are monochrome but not always 1bpp.
1158            */
1159
1160         if (lpitem->fState & MF_CHECKED)
1161         {
1162             HBITMAP bm = lpitem->hCheckBit ? lpitem->hCheckBit :
1163                         ((lpitem->fType & MFT_RADIOCHECK) ? hStdRadioCheck : hStdCheck);
1164             HDC hdcMem = CreateCompatibleDC( hdc );
1165
1166             SelectObject( hdcMem, bm );
1167             BitBlt( hdc, rect.left, (y - check_bitmap_height) / 2,
1168                       check_bitmap_width, check_bitmap_height,
1169                       hdcMem, 0, 0, SRCCOPY );
1170             DeleteDC( hdcMem );
1171         }
1172         else if (lpitem->hUnCheckBit)
1173         {
1174             HDC hdcMem = CreateCompatibleDC( hdc );
1175
1176             SelectObject( hdcMem, lpitem->hUnCheckBit );
1177             BitBlt( hdc, rect.left, (y - check_bitmap_height) / 2,
1178                       check_bitmap_width, check_bitmap_height,
1179                       hdcMem, 0, 0, SRCCOPY );
1180             DeleteDC( hdcMem );
1181         }
1182
1183           /* Draw the popup-menu arrow */
1184         if (lpitem->fType & MF_POPUP)
1185         {
1186             HDC hdcMem = CreateCompatibleDC( hdc );
1187
1188             SelectObject( hdcMem, hStdMnArrow );
1189             BitBlt( hdc, rect.right - arrow_bitmap_width - 1,
1190                       (y - arrow_bitmap_height) / 2,
1191                       arrow_bitmap_width, arrow_bitmap_height,
1192                       hdcMem, 0, 0, SRCCOPY );
1193             DeleteDC( hdcMem );
1194         }
1195
1196         rect.left += check_bitmap_width;
1197         rect.right -= arrow_bitmap_width;
1198     }
1199
1200     /* Draw the item text or bitmap */
1201     if (IS_BITMAP_ITEM(lpitem->fType))
1202     {   int top;
1203
1204         HBITMAP resBmp = 0;
1205
1206         HDC hdcMem = CreateCompatibleDC( hdc );
1207
1208         /*
1209          * Check if there is a magic menu item associated with this item
1210          * and load the appropriate bitmap
1211          */
1212         if((LOWORD((int)lpitem->text)) < 12)
1213         {
1214             resBmp = MENU_LoadMagicItem((int)lpitem->text, (lpitem->fState & MF_HILITE),
1215                                         lpitem->dwItemData);
1216         }
1217         else
1218             resBmp = (HBITMAP)lpitem->text;
1219
1220         if (resBmp)
1221         {
1222             BITMAP bm;
1223             GetObjectA( resBmp, sizeof(bm), &bm );
1224
1225             SelectObject(hdcMem,resBmp );
1226
1227             /* handle fontsize >  bitmap_height */
1228             top = ((rect.bottom-rect.top)>bm.bmHeight) ?
1229                 rect.top+(rect.bottom-rect.top-bm.bmHeight)/2 : rect.top;
1230
1231             BitBlt( hdc, rect.left, top, rect.right - rect.left,
1232                   rect.bottom - rect.top, hdcMem, 0, 0, SRCCOPY );
1233         }
1234         DeleteDC( hdcMem );
1235
1236         return;
1237
1238     }
1239     /* No bitmap - process text if present */
1240     else if (IS_STRING_ITEM(lpitem->fType))
1241     {
1242         register int i;
1243         HFONT hfontOld = 0;
1244
1245         UINT uFormat = (menuBar) ?
1246                         DT_CENTER | DT_VCENTER | DT_SINGLELINE :
1247                         DT_LEFT | DT_VCENTER | DT_SINGLELINE;
1248
1249         if ( lpitem->fState & MFS_DEFAULT )
1250         {
1251              hfontOld = SelectObject( hdc, hMenuFontBold);
1252         }
1253
1254         if (menuBar)
1255         {
1256             rect.left += MENU_BAR_ITEMS_SPACE / 2;
1257             rect.right -= MENU_BAR_ITEMS_SPACE / 2;
1258             i = strlen( lpitem->text );
1259         }
1260         else
1261         {
1262             for (i = 0; lpitem->text[i]; i++)
1263                 if ((lpitem->text[i] == '\t') || (lpitem->text[i] == '\b'))
1264                     break;
1265         }
1266
1267         if( !(TWEAK_WineLook == WIN31_LOOK) && (lpitem->fState & MF_GRAYED))
1268         {
1269             if (!(lpitem->fState & MF_HILITE) )
1270             {
1271                 ++rect.left; ++rect.top; ++rect.right; ++rect.bottom;
1272                 SetTextColor(hdc, RGB(0xff, 0xff, 0xff));
1273                 DrawTextA( hdc, lpitem->text, i, &rect, uFormat );
1274                 --rect.left; --rect.top; --rect.right; --rect.bottom;
1275             }
1276             SetTextColor(hdc, RGB(0x80, 0x80, 0x80));
1277         }
1278
1279         DrawTextA( hdc, lpitem->text, i, &rect, uFormat);
1280
1281         /* paint the shortcut text */
1282         if (lpitem->text[i])  /* There's a tab or flush-right char */
1283         {
1284             if (lpitem->text[i] == '\t')
1285             {
1286                 rect.left = lpitem->xTab;
1287                 uFormat = DT_LEFT | DT_VCENTER | DT_SINGLELINE;
1288             }
1289             else
1290             {
1291                 uFormat = DT_RIGHT | DT_VCENTER | DT_SINGLELINE;
1292             }
1293
1294             if( !(TWEAK_WineLook == WIN31_LOOK) && (lpitem->fState & MF_GRAYED))
1295             {
1296                 if (!(lpitem->fState & MF_HILITE) )
1297                 {
1298                     ++rect.left; ++rect.top; ++rect.right; ++rect.bottom;
1299                     SetTextColor(hdc, RGB(0xff, 0xff, 0xff));
1300                     DrawTextA( hdc, lpitem->text + i + 1, -1, &rect, uFormat );
1301                     --rect.left; --rect.top; --rect.right; --rect.bottom;
1302                 }
1303                 SetTextColor(hdc, RGB(0x80, 0x80, 0x80));
1304             }
1305             DrawTextA( hdc, lpitem->text + i + 1, -1, &rect, uFormat );
1306         }
1307
1308         if (hfontOld)
1309             SelectObject (hdc, hfontOld);
1310     }
1311 }
1312
1313
1314 /***********************************************************************
1315  *           MENU_DrawPopupMenu
1316  *
1317  * Paint a popup menu.
1318  */
1319 static void MENU_DrawPopupMenu( HWND hwnd, HDC hdc, HMENU hmenu )
1320 {
1321     HBRUSH hPrevBrush = 0;
1322     RECT rect;
1323
1324     TRACE("wnd=0x%04x dc=0x%04x menu=0x%04x\n", hwnd, hdc, hmenu);
1325
1326     GetClientRect( hwnd, &rect );
1327
1328     if(TWEAK_WineLook == WIN31_LOOK)
1329     {
1330         rect.bottom -= POPUP_YSHADE * GetSystemMetrics(SM_CYBORDER);
1331         rect.right -= POPUP_XSHADE * GetSystemMetrics(SM_CXBORDER);
1332     }
1333
1334     if((hPrevBrush = SelectObject( hdc, GetSysColorBrush(COLOR_MENU) ))
1335         && (SelectObject( hdc, hMenuFont)))
1336     {
1337         HPEN hPrevPen;
1338
1339         Rectangle( hdc, rect.left, rect.top, rect.right, rect.bottom );
1340
1341         hPrevPen = SelectObject( hdc, GetStockObject( NULL_PEN ) );
1342         if( hPrevPen )
1343         {
1344             INT ropPrev, i;
1345             POPUPMENU *menu;
1346
1347             /* draw 3-d shade */
1348             if(TWEAK_WineLook == WIN31_LOOK) {
1349                 SelectObject( hdc, hShadeBrush );
1350                 SetBkMode( hdc, TRANSPARENT );
1351                 ropPrev = SetROP2( hdc, R2_MASKPEN );
1352
1353                 i = rect.right;         /* why SetBrushOrg() doesn't? */
1354                 PatBlt( hdc, i & 0xfffffffe,
1355                           rect.top + POPUP_YSHADE*GetSystemMetrics(SM_CYBORDER),
1356                           i%2 + POPUP_XSHADE*GetSystemMetrics(SM_CXBORDER),
1357                           rect.bottom - rect.top, 0x00a000c9 );
1358                 i = rect.bottom;
1359                 PatBlt( hdc, rect.left + POPUP_XSHADE*GetSystemMetrics(SM_CXBORDER),
1360                           i & 0xfffffffe,rect.right - rect.left,
1361                           i%2 + POPUP_YSHADE*GetSystemMetrics(SM_CYBORDER), 0x00a000c9 );
1362                 SelectObject( hdc, hPrevPen );
1363                 SelectObject( hdc, hPrevBrush );
1364                 SetROP2( hdc, ropPrev );
1365             }
1366             else
1367                 DrawEdge (hdc, &rect, EDGE_RAISED, BF_RECT);
1368
1369             /* draw menu items */
1370
1371             menu = MENU_GetMenu( hmenu );
1372             if (menu && menu->nItems)
1373             {
1374                 MENUITEM *item;
1375                 UINT u;
1376
1377                 for (u = menu->nItems, item = menu->items; u > 0; u--, item++)
1378                     MENU_DrawMenuItem( hwnd, hmenu, menu->hwndOwner, hdc, item,
1379                                        menu->Height, FALSE, ODA_DRAWENTIRE );
1380
1381             }
1382         } else
1383         {
1384             SelectObject( hdc, hPrevBrush );
1385         }
1386     }
1387 }
1388
1389 /***********************************************************************
1390  *           MENU_DrawMenuBar
1391  *
1392  * Paint a menu bar. Returns the height of the menu bar.
1393  * called from [windows/nonclient.c]
1394  */
1395 UINT MENU_DrawMenuBar( HDC hDC, LPRECT lprect, HWND hwnd,
1396                          BOOL suppress_draw)
1397 {
1398     LPPOPUPMENU lppop;
1399     UINT i,retvalue;
1400     HFONT hfontOld = 0;
1401
1402     WND *wndPtr = WIN_FindWndPtr( hwnd );
1403
1404     lppop = MENU_GetMenu ((HMENU)wndPtr->wIDmenu );
1405     if (lppop == NULL || lprect == NULL)
1406     {
1407         retvalue = GetSystemMetrics(SM_CYMENU);
1408         goto END;
1409     }
1410
1411     TRACE("(%04x, %p, %p)\n", hDC, lprect, lppop);
1412
1413     hfontOld = SelectObject( hDC, hMenuFont);
1414
1415     if (lppop->Height == 0)
1416         MENU_MenuBarCalcSize(hDC, lprect, lppop, hwnd);
1417
1418     lprect->bottom = lprect->top + lppop->Height;
1419
1420     if (suppress_draw)
1421     {
1422         retvalue = lppop->Height;
1423         goto END;
1424     }
1425
1426     FillRect(hDC, lprect, GetSysColorBrush(COLOR_MENU) );
1427
1428     if (TWEAK_WineLook == WIN31_LOOK)
1429     {
1430         SelectObject( hDC, GetSysColorPen(COLOR_WINDOWFRAME) );
1431         MoveTo16( hDC, lprect->left, lprect->bottom );
1432         LineTo( hDC, lprect->right, lprect->bottom );
1433     }
1434     else
1435     {
1436         SelectObject( hDC, GetSysColorPen(COLOR_3DFACE));
1437         MoveTo16( hDC, lprect->left, lprect->bottom );
1438         LineTo( hDC, lprect->right, lprect->bottom );
1439     }
1440
1441     if (lppop->nItems == 0)
1442     {
1443         retvalue = GetSystemMetrics(SM_CYMENU);
1444         goto END;
1445     }
1446
1447     for (i = 0; i < lppop->nItems; i++)
1448     {
1449         MENU_DrawMenuItem( hwnd, (HMENU)wndPtr->wIDmenu, GetWindow(hwnd,GW_OWNER),
1450                          hDC, &lppop->items[i], lppop->Height, TRUE, ODA_DRAWENTIRE );
1451     }
1452     retvalue = lppop->Height;
1453
1454 END:
1455     if (hfontOld)
1456         SelectObject (hDC, hfontOld);
1457
1458     WIN_ReleaseWndPtr(wndPtr);
1459     return retvalue;
1460 }
1461
1462 /***********************************************************************
1463  *           MENU_PatchResidentPopup
1464  */
1465 BOOL MENU_PatchResidentPopup( HQUEUE16 checkQueue, WND* checkWnd )
1466 {
1467     WND *pTPWnd = MENU_GetTopPopupWnd();
1468
1469     if( pTPWnd )
1470     {
1471         HTASK16 hTask = 0;
1472
1473         TRACE("patching resident popup: %04x %04x [%04x %04x]\n",
1474                 checkQueue, checkWnd ? checkWnd->hwndSelf : 0, pTPWnd->hmemTaskQ,
1475                 pTPWnd->owner ? pTPWnd->owner->hwndSelf : 0);
1476
1477         switch( checkQueue )
1478         {
1479             case 0: /* checkWnd is the new popup owner */
1480                  if( checkWnd )
1481                  {
1482                      pTPWnd->owner = checkWnd;
1483                      if( pTPWnd->hmemTaskQ != checkWnd->hmemTaskQ )
1484                          hTask = QUEUE_GetQueueTask( checkWnd->hmemTaskQ );
1485                  }
1486                  break;
1487
1488             case 0xFFFF: /* checkWnd is destroyed */
1489                  if( pTPWnd->owner == checkWnd )
1490                      pTPWnd->owner = NULL;
1491                  MENU_ReleaseTopPopupWnd();
1492                  return TRUE;
1493
1494             default: /* checkQueue is exiting */
1495                  if( pTPWnd->hmemTaskQ == checkQueue )
1496                  {
1497                      hTask = QUEUE_GetQueueTask( pTPWnd->hmemTaskQ );
1498                      hTask = TASK_GetNextTask( hTask );
1499                  }
1500                  break;
1501         }
1502
1503         if( hTask )
1504         {
1505             TDB* task = (TDB*)GlobalLock16( hTask );
1506             if( task )
1507             {
1508                 pTPWnd->hInstance = task->hInstance;
1509                 pTPWnd->hmemTaskQ = task->hQueue;
1510                 MENU_ReleaseTopPopupWnd();
1511                 return TRUE;
1512             }
1513             else WARN("failed to patch resident popup.\n");
1514         }
1515     }
1516     MENU_ReleaseTopPopupWnd();
1517     return FALSE;
1518 }
1519
1520 /***********************************************************************
1521  *           MENU_ShowPopup
1522  *
1523  * Display a popup menu.
1524  */
1525 static BOOL MENU_ShowPopup( HWND hwndOwner, HMENU hmenu, UINT id,
1526                               INT x, INT y, INT xanchor, INT yanchor )
1527 {
1528     POPUPMENU   *menu;
1529     WND         *wndOwner = NULL;
1530
1531     TRACE("owner=0x%04x hmenu=0x%04x id=0x%04x x=0x%04x y=0x%04x xa=0x%04x ya=0x%04x\n",
1532     hwndOwner, hmenu, id, x, y, xanchor, yanchor);
1533
1534     if (!(menu = MENU_GetMenu( hmenu ))) return FALSE;
1535     if (menu->FocusedItem != NO_SELECTED_ITEM)
1536     {
1537         menu->items[menu->FocusedItem].fState &= ~(MF_HILITE|MF_MOUSESELECT);
1538         menu->FocusedItem = NO_SELECTED_ITEM;
1539     }
1540
1541     /* store the owner for DrawItem*/
1542     menu->hwndOwner = hwndOwner;
1543
1544     if( (wndOwner = WIN_FindWndPtr( hwndOwner )) )
1545     {
1546         UINT    width, height;
1547
1548         MENU_PopupMenuCalcSize( menu, hwndOwner );
1549
1550         /* adjust popup menu pos so that it fits within the desktop */
1551
1552         width = menu->Width + GetSystemMetrics(SM_CXBORDER);
1553         height = menu->Height + GetSystemMetrics(SM_CYBORDER);
1554
1555         if( x + width > GetSystemMetrics(SM_CXSCREEN ))
1556         {
1557             if( xanchor )
1558                 x -= width - xanchor;
1559             if( x + width > GetSystemMetrics(SM_CXSCREEN))
1560                 x = GetSystemMetrics(SM_CXSCREEN) - width;
1561         }
1562         if( x < 0 ) x = 0;
1563
1564         if( y + height > GetSystemMetrics(SM_CYSCREEN ))
1565         {
1566             if( yanchor )
1567                 y -= height + yanchor;
1568             if( y + height > GetSystemMetrics(SM_CYSCREEN ))
1569                 y = GetSystemMetrics(SM_CYSCREEN) - height;
1570         }
1571         if( y < 0 ) y = 0;
1572
1573         if( TWEAK_WineLook == WIN31_LOOK )
1574         {
1575             width += POPUP_XSHADE * GetSystemMetrics(SM_CXBORDER);      /* add space for shading */
1576             height += POPUP_YSHADE * GetSystemMetrics(SM_CYBORDER);
1577         }
1578
1579         /* NOTE: In Windows, top menu popup is not owned. */
1580         if (!pTopPopupWnd)      /* create top level popup menu window */
1581         {
1582             assert( uSubPWndLevel == 0 );
1583
1584             pTopPopupWnd = WIN_FindWndPtr(CreateWindowA( POPUPMENU_CLASS_ATOM, NULL,
1585                                           WS_POPUP, x, y, width, height,
1586                                           hwndOwner, 0, wndOwner->hInstance,
1587                                           (LPVOID)hmenu ));
1588             if (!pTopPopupWnd)
1589             {
1590                 WIN_ReleaseWndPtr(wndOwner);
1591                 return FALSE;
1592             }
1593             menu->hWnd = pTopPopupWnd->hwndSelf;
1594             MENU_ReleaseTopPopupWnd();
1595         }
1596         else
1597             if( uSubPWndLevel )
1598             {
1599                 /* create a new window for the submenu */
1600
1601                 menu->hWnd = CreateWindowA( POPUPMENU_CLASS_ATOM, NULL,
1602                                           WS_POPUP, x, y, width, height,
1603                                           hwndOwner, 0, wndOwner->hInstance,
1604                                           (LPVOID)hmenu );
1605                 if( !menu->hWnd )
1606                 {
1607                     WIN_ReleaseWndPtr(wndOwner);
1608                     return FALSE;
1609                 }
1610             }
1611             else /* top level popup menu window already exists */
1612             {
1613                 WND *pTPWnd = MENU_GetTopPopupWnd();
1614                 menu->hWnd = pTPWnd->hwndSelf;
1615
1616                 MENU_PatchResidentPopup( 0, wndOwner );
1617                 SendMessageA( pTPWnd->hwndSelf, MM_SETMENUHANDLE, (WPARAM16)hmenu, 0L);
1618
1619                 /* adjust its size */
1620
1621                 SetWindowPos( menu->hWnd, 0, x, y, width, height,
1622                                 SWP_NOACTIVATE | SWP_NOZORDER | SWP_NOREDRAW);
1623                 MENU_ReleaseTopPopupWnd();
1624             }
1625
1626         uSubPWndLevel++;        /* menu level counter */
1627
1628       /* Display the window */
1629
1630         SetWindowPos( menu->hWnd, HWND_TOP, 0, 0, 0, 0,
1631                         SWP_SHOWWINDOW | SWP_NOSIZE | SWP_NOMOVE | SWP_NOACTIVATE );
1632         UpdateWindow( menu->hWnd );
1633         WIN_ReleaseWndPtr(wndOwner);
1634         return TRUE;
1635     }
1636     return FALSE;
1637 }
1638
1639
1640 /***********************************************************************
1641  *           MENU_SelectItem
1642  */
1643 static void MENU_SelectItem( HWND hwndOwner, HMENU hmenu, UINT wIndex,
1644                              BOOL sendMenuSelect, HMENU topmenu )
1645 {
1646     LPPOPUPMENU lppop;
1647     HDC hdc;
1648
1649     TRACE("owner=0x%04x menu=0x%04x index=0x%04x select=0x%04x\n", hwndOwner, hmenu, wIndex, sendMenuSelect);
1650
1651     lppop = MENU_GetMenu( hmenu );
1652     if ((!lppop) || (!lppop->nItems)) return;
1653
1654     if (lppop->FocusedItem == wIndex) return;
1655     if (lppop->wFlags & MF_POPUP) hdc = GetDC( lppop->hWnd );
1656     else hdc = GetDCEx( lppop->hWnd, 0, DCX_CACHE | DCX_WINDOW);
1657
1658     SelectObject( hdc, hMenuFont);
1659
1660       /* Clear previous highlighted item */
1661     if (lppop->FocusedItem != NO_SELECTED_ITEM)
1662     {
1663         lppop->items[lppop->FocusedItem].fState &= ~(MF_HILITE|MF_MOUSESELECT);
1664         MENU_DrawMenuItem(lppop->hWnd, hmenu, hwndOwner, hdc,&lppop->items[lppop->FocusedItem],
1665                           lppop->Height, !(lppop->wFlags & MF_POPUP),
1666                           ODA_SELECT );
1667     }
1668
1669       /* Highlight new item (if any) */
1670     lppop->FocusedItem = wIndex;
1671     if (lppop->FocusedItem != NO_SELECTED_ITEM)
1672     {
1673         if(!(lppop->items[wIndex].fType & MF_SEPARATOR)) {
1674             lppop->items[wIndex].fState |= MF_HILITE;
1675             MENU_DrawMenuItem( lppop->hWnd, hmenu, hwndOwner, hdc,
1676                     &lppop->items[wIndex], lppop->Height,
1677                     !(lppop->wFlags & MF_POPUP), ODA_SELECT );
1678         }
1679         if (sendMenuSelect)
1680         {
1681             MENUITEM *ip = &lppop->items[lppop->FocusedItem];
1682             SendMessageA( hwndOwner, WM_MENUSELECT,
1683                      MAKELONG(ip->fType & MF_POPUP ? wIndex: ip->wID,
1684                      ip->fType | ip->fState | MF_MOUSESELECT |
1685                      (lppop->wFlags & MF_SYSMENU)), hmenu);
1686         }
1687     }
1688     else if (sendMenuSelect) {
1689         if(topmenu){
1690             int pos;
1691             if((pos=MENU_FindSubMenu(&topmenu, hmenu))!=NO_SELECTED_ITEM){
1692                 POPUPMENU *ptm = (POPUPMENU *) USER_HEAP_LIN_ADDR( topmenu );
1693                 MENUITEM *ip = &ptm->items[pos];
1694                 SendMessageA( hwndOwner, WM_MENUSELECT, MAKELONG(pos,
1695                          ip->fType | ip->fState | MF_MOUSESELECT |
1696                          (ptm->wFlags & MF_SYSMENU)), topmenu);
1697             }
1698         }
1699     }
1700     ReleaseDC( lppop->hWnd, hdc );
1701 }
1702
1703
1704 /***********************************************************************
1705  *           MENU_MoveSelection
1706  *
1707  * Moves currently selected item according to the offset parameter.
1708  * If there is no selection then it should select the last item if
1709  * offset is ITEM_PREV or the first item if offset is ITEM_NEXT.
1710  */
1711 static void MENU_MoveSelection( HWND hwndOwner, HMENU hmenu, INT offset )
1712 {
1713     INT i;
1714     POPUPMENU *menu;
1715
1716     TRACE("hwnd=0x%04x hmenu=0x%04x off=0x%04x\n", hwndOwner, hmenu, offset);
1717
1718     menu = MENU_GetMenu( hmenu );
1719     if ((!menu) || (!menu->items)) return;
1720
1721     if ( menu->FocusedItem != NO_SELECTED_ITEM )
1722     {
1723         if( menu->nItems == 1 ) return; else
1724         for (i = menu->FocusedItem + offset ; i >= 0 && i < menu->nItems
1725                                             ; i += offset)
1726             if (!(menu->items[i].fType & MF_SEPARATOR))
1727             {
1728                 MENU_SelectItem( hwndOwner, hmenu, i, TRUE, 0 );
1729                 return;
1730             }
1731     }
1732
1733     for ( i = (offset > 0) ? 0 : menu->nItems - 1;
1734                   i >= 0 && i < menu->nItems ; i += offset)
1735         if (!(menu->items[i].fType & MF_SEPARATOR))
1736         {
1737             MENU_SelectItem( hwndOwner, hmenu, i, TRUE, 0 );
1738             return;
1739         }
1740 }
1741
1742
1743 /**********************************************************************
1744  *         MENU_SetItemData
1745  *
1746  * Set an item flags, id and text ptr. Called by InsertMenu() and
1747  * ModifyMenu().
1748  */
1749 static BOOL MENU_SetItemData( MENUITEM *item, UINT flags, UINT id,
1750                                 LPCSTR str )
1751 {
1752     LPSTR prevText = IS_STRING_ITEM(item->fType) ? item->text : NULL;
1753
1754     debug_print_menuitem("MENU_SetItemData from: ", item, "");
1755
1756     if (IS_STRING_ITEM(flags))
1757     {
1758         if (!str || !*str)
1759         {
1760             flags |= MF_SEPARATOR;
1761             item->text = NULL;
1762         }
1763         else
1764         {
1765             LPSTR text;
1766             /* Item beginning with a backspace is a help item */
1767             if (*str == '\b')
1768             {
1769                 flags |= MF_HELP;
1770                 str++;
1771             }
1772             if (!(text = HEAP_strdupA( SystemHeap, 0, str ))) return FALSE;
1773             item->text = text;
1774         }
1775     }
1776     else if (IS_BITMAP_ITEM(flags))
1777         item->text = (LPSTR)(HBITMAP)LOWORD(str);
1778     else item->text = NULL;
1779
1780     if (flags & MF_OWNERDRAW)
1781         item->dwItemData = (DWORD)str;
1782     else
1783         item->dwItemData = 0;
1784
1785     if ((item->fType & MF_POPUP) && (flags & MF_POPUP) && (item->hSubMenu != id) )
1786         DestroyMenu( item->hSubMenu );   /* ModifyMenu() spec */
1787
1788     if (flags & MF_POPUP)
1789     {
1790         POPUPMENU *menu = MENU_GetMenu((UINT16)id);
1791         if (menu) menu->wFlags |= MF_POPUP;
1792         else
1793         {
1794             item->wID = 0;
1795             item->hSubMenu = 0;
1796             item->fType = 0;
1797             item->fState = 0;
1798             return FALSE;
1799         }
1800     }
1801
1802     item->wID = id;
1803     if (flags & MF_POPUP)
1804       item->hSubMenu = id;
1805
1806     if ((item->fType & MF_POPUP) && !(flags & MF_POPUP) )
1807       flags |= MF_POPUP; /* keep popup */
1808
1809     item->fType = flags & TYPE_MASK;
1810     item->fState = (flags & STATE_MASK) &
1811         ~(MF_HILITE | MF_MOUSESELECT | MF_BYPOSITION);
1812
1813
1814     /* Don't call SetRectEmpty here! */
1815
1816
1817     if (prevText) HeapFree( SystemHeap, 0, prevText );
1818
1819     debug_print_menuitem("MENU_SetItemData to  : ", item, "");
1820     return TRUE;
1821 }
1822
1823
1824 /**********************************************************************
1825  *         MENU_InsertItem
1826  *
1827  * Insert a new item into a menu.
1828  */
1829 static MENUITEM *MENU_InsertItem( HMENU hMenu, UINT pos, UINT flags )
1830 {
1831     MENUITEM *newItems;
1832     POPUPMENU *menu;
1833
1834     if (!(menu = MENU_GetMenu(hMenu)))
1835         return NULL;
1836
1837     /* Find where to insert new item */
1838
1839     if ((pos==(UINT)-1) || ((flags & MF_BYPOSITION) && (pos == menu->nItems))) {
1840         /* Special case: append to menu */
1841         /* Some programs specify the menu length to do that */
1842         pos = menu->nItems;
1843     } else {
1844         if (!MENU_FindItem( &hMenu, &pos, flags ))
1845         {
1846             FIXME("item %x not found\n", pos );
1847             return NULL;
1848         }
1849         if (!(menu = MENU_GetMenu(hMenu)))
1850             return NULL;
1851     }
1852
1853     /* Create new items array */
1854
1855     newItems = HeapAlloc( SystemHeap, 0, sizeof(MENUITEM) * (menu->nItems+1) );
1856     if (!newItems)
1857     {
1858         WARN("allocation failed\n" );
1859         return NULL;
1860     }
1861     if (menu->nItems > 0)
1862     {
1863           /* Copy the old array into the new */
1864         if (pos > 0) memcpy( newItems, menu->items, pos * sizeof(MENUITEM) );
1865         if (pos < menu->nItems) memcpy( &newItems[pos+1], &menu->items[pos],
1866                                         (menu->nItems-pos)*sizeof(MENUITEM) );
1867         HeapFree( SystemHeap, 0, menu->items );
1868     }
1869     menu->items = newItems;
1870     menu->nItems++;
1871     memset( &newItems[pos], 0, sizeof(*newItems) );
1872     menu->Height = 0; /* force size recalculate */
1873     return &newItems[pos];
1874 }
1875
1876
1877 /**********************************************************************
1878  *         MENU_ParseResource
1879  *
1880  * Parse a standard menu resource and add items to the menu.
1881  * Return a pointer to the end of the resource.
1882  */
1883 static LPCSTR MENU_ParseResource( LPCSTR res, HMENU hMenu, BOOL unicode )
1884 {
1885     WORD flags, id = 0;
1886     LPCSTR str;
1887
1888     do
1889     {
1890         flags = GET_WORD(res);
1891         res += sizeof(WORD);
1892         if (!(flags & MF_POPUP))
1893         {
1894             id = GET_WORD(res);
1895             res += sizeof(WORD);
1896         }
1897         if (!IS_STRING_ITEM(flags))
1898             ERR("not a string item %04x\n", flags );
1899         str = res;
1900         if (!unicode) res += strlen(str) + 1;
1901         else res += (lstrlenW((LPCWSTR)str) + 1) * sizeof(WCHAR);
1902         if (flags & MF_POPUP)
1903         {
1904             HMENU hSubMenu = CreatePopupMenu();
1905             if (!hSubMenu) return NULL;
1906             if (!(res = MENU_ParseResource( res, hSubMenu, unicode )))
1907                 return NULL;
1908             if (!unicode) AppendMenuA( hMenu, flags, (UINT)hSubMenu, str );
1909             else AppendMenuW( hMenu, flags, (UINT)hSubMenu, (LPCWSTR)str );
1910         }
1911         else  /* Not a popup */
1912         {
1913             if (!unicode) AppendMenuA( hMenu, flags, id, *str ? str : NULL );
1914             else AppendMenuW( hMenu, flags, id,
1915                                 *(LPCWSTR)str ? (LPCWSTR)str : NULL );
1916         }
1917     } while (!(flags & MF_END));
1918     return res;
1919 }
1920
1921
1922 /**********************************************************************
1923  *         MENUEX_ParseResource
1924  *
1925  * Parse an extended menu resource and add items to the menu.
1926  * Return a pointer to the end of the resource.
1927  */
1928 static LPCSTR MENUEX_ParseResource( LPCSTR res, HMENU hMenu)
1929 {
1930     WORD resinfo;
1931     do {
1932         MENUITEMINFOW mii;
1933
1934         mii.cbSize = sizeof(mii);
1935         mii.fMask = MIIM_STATE | MIIM_ID | MIIM_TYPE;
1936         mii.fType = GET_DWORD(res);
1937         res += sizeof(DWORD);
1938         mii.fState = GET_DWORD(res);
1939         res += sizeof(DWORD);
1940         mii.wID = GET_DWORD(res);
1941         res += sizeof(DWORD);
1942         resinfo = GET_WORD(res); /* FIXME: for 16-bit apps this is a byte.  */
1943         res += sizeof(WORD);
1944         /* Align the text on a word boundary.  */
1945         res += (~((int)res - 1)) & 1;
1946         mii.dwTypeData = (LPWSTR) res;
1947         res += (1 + lstrlenW(mii.dwTypeData)) * sizeof(WCHAR);
1948         /* Align the following fields on a dword boundary.  */
1949         res += (~((int)res - 1)) & 3;
1950
1951         /* FIXME: This is inefficient and cannot be optimised away by gcc.  */
1952         {
1953             LPSTR newstr = HEAP_strdupWtoA(GetProcessHeap(),
1954                                            0, mii.dwTypeData);
1955             TRACE("Menu item: [%08x,%08x,%04x,%04x,%s]\n",
1956                          mii.fType, mii.fState, mii.wID, resinfo, newstr);
1957             HeapFree( GetProcessHeap(), 0, newstr );
1958         }
1959
1960         if (resinfo & 1) {      /* Pop-up? */
1961             /* DWORD helpid = GET_DWORD(res); FIXME: use this.  */
1962             res += sizeof(DWORD);
1963             mii.hSubMenu = CreatePopupMenu();
1964             if (!mii.hSubMenu)
1965                 return NULL;
1966             if (!(res = MENUEX_ParseResource(res, mii.hSubMenu))) {
1967                 DestroyMenu(mii.hSubMenu);
1968                 return NULL;
1969         }
1970             mii.fMask |= MIIM_SUBMENU;
1971             mii.fType |= MF_POPUP;
1972         }
1973         InsertMenuItemW(hMenu, -1, MF_BYPOSITION, &mii);
1974     } while (!(resinfo & MF_END));
1975     return res;
1976 }
1977
1978
1979 /***********************************************************************
1980  *           MENU_GetSubPopup
1981  *
1982  * Return the handle of the selected sub-popup menu (if any).
1983  */
1984 static HMENU MENU_GetSubPopup( HMENU hmenu )
1985 {
1986     POPUPMENU *menu;
1987     MENUITEM *item;
1988
1989     menu = MENU_GetMenu( hmenu );
1990
1991     if ((!menu) || (menu->FocusedItem == NO_SELECTED_ITEM)) return 0;
1992
1993     item = &menu->items[menu->FocusedItem];
1994     if ((item->fType & MF_POPUP) && (item->fState & MF_MOUSESELECT))
1995         return item->hSubMenu;
1996     return 0;
1997 }
1998
1999
2000 /***********************************************************************
2001  *           MENU_HideSubPopups
2002  *
2003  * Hide the sub-popup menus of this menu.
2004  */
2005 static void MENU_HideSubPopups( HWND hwndOwner, HMENU hmenu,
2006                                 BOOL sendMenuSelect )
2007 {
2008     POPUPMENU *menu = MENU_GetMenu( hmenu );
2009
2010     TRACE("owner=0x%04x hmenu=0x%04x 0x%04x\n", hwndOwner, hmenu, sendMenuSelect);
2011
2012     if (menu && uSubPWndLevel)
2013     {
2014         HMENU hsubmenu;
2015         POPUPMENU *submenu;
2016         MENUITEM *item;
2017
2018         if (menu->FocusedItem != NO_SELECTED_ITEM)
2019         {
2020             item = &menu->items[menu->FocusedItem];
2021             if (!(item->fType & MF_POPUP) ||
2022                 !(item->fState & MF_MOUSESELECT)) return;
2023             item->fState &= ~MF_MOUSESELECT;
2024             hsubmenu = item->hSubMenu;
2025         } else return;
2026
2027         submenu = MENU_GetMenu( hsubmenu );
2028         MENU_HideSubPopups( hwndOwner, hsubmenu, FALSE );
2029         MENU_SelectItem( hwndOwner, hsubmenu, NO_SELECTED_ITEM, sendMenuSelect, 0 );
2030
2031         if (submenu->hWnd == MENU_GetTopPopupWnd()->hwndSelf )
2032         {
2033             ShowWindow( submenu->hWnd, SW_HIDE );
2034             uSubPWndLevel = 0;
2035         }
2036         else
2037         {
2038             DestroyWindow( submenu->hWnd );
2039             submenu->hWnd = 0;
2040         }
2041         MENU_ReleaseTopPopupWnd();
2042     }
2043 }
2044
2045
2046 /***********************************************************************
2047  *           MENU_ShowSubPopup
2048  *
2049  * Display the sub-menu of the selected item of this menu.
2050  * Return the handle of the submenu, or hmenu if no submenu to display.
2051  */
2052 static HMENU MENU_ShowSubPopup( HWND hwndOwner, HMENU hmenu,
2053                                   BOOL selectFirst, UINT wFlags )
2054 {
2055     RECT rect;
2056     POPUPMENU *menu;
2057     MENUITEM *item;
2058     WND *wndPtr;
2059     HDC hdc;
2060
2061     TRACE("owner=0x%04x hmenu=0x%04x 0x%04x\n", hwndOwner, hmenu, selectFirst);
2062
2063     if (!(menu = MENU_GetMenu( hmenu ))) return hmenu;
2064
2065     if (!(wndPtr = WIN_FindWndPtr( menu->hWnd )) ||
2066         (menu->FocusedItem == NO_SELECTED_ITEM))
2067     {
2068         WIN_ReleaseWndPtr(wndPtr);
2069         return hmenu;
2070     }
2071
2072     item = &menu->items[menu->FocusedItem];
2073     if (!(item->fType & MF_POPUP) ||
2074         (item->fState & (MF_GRAYED | MF_DISABLED)))
2075     {
2076         WIN_ReleaseWndPtr(wndPtr);
2077         return hmenu;
2078     }
2079
2080     /* message must be send before using item,
2081        because nearly everything may by changed by the application ! */
2082
2083     /* Send WM_INITMENUPOPUP message only if TPM_NONOTIFY flag is not specified */
2084     if (!(wFlags & TPM_NONOTIFY))
2085        SendMessageA( hwndOwner, WM_INITMENUPOPUP, item->hSubMenu,
2086                    MAKELONG( menu->FocusedItem, IS_SYSTEM_MENU(menu) ));
2087
2088     item = &menu->items[menu->FocusedItem];
2089     rect = item->rect;
2090
2091     /* correct item if modified as a reaction to WM_INITMENUPOPUP-message */
2092     if (!(item->fState & MF_HILITE))
2093     {
2094         if (menu->wFlags & MF_POPUP) hdc = GetDC( menu->hWnd );
2095         else hdc = GetDCEx( menu->hWnd, 0, DCX_CACHE | DCX_WINDOW);
2096
2097         SelectObject( hdc, hMenuFont);
2098
2099         item->fState |= MF_HILITE;
2100         MENU_DrawMenuItem( menu->hWnd, hmenu, hwndOwner, hdc, item, menu->Height, !(menu->wFlags & MF_POPUP), ODA_DRAWENTIRE );
2101         ReleaseDC( menu->hWnd, hdc );
2102     }
2103     if (!item->rect.top && !item->rect.left && !item->rect.bottom && !item->rect.right)
2104       item->rect = rect;
2105
2106     item->fState |= MF_MOUSESELECT;
2107
2108     if (IS_SYSTEM_MENU(menu))
2109     {
2110         MENU_InitSysMenuPopup(item->hSubMenu, wndPtr->dwStyle, GetClassLongA(wndPtr->hwndSelf, GCL_STYLE));
2111
2112         NC_GetSysPopupPos( wndPtr, &rect );
2113         rect.top = rect.bottom;
2114         rect.right = GetSystemMetrics(SM_CXSIZE);
2115         rect.bottom = GetSystemMetrics(SM_CYSIZE);
2116     }
2117     else
2118     {
2119         if (menu->wFlags & MF_POPUP)
2120         {
2121             rect.left = wndPtr->rectWindow.left + item->rect.right-arrow_bitmap_width;
2122             rect.top = wndPtr->rectWindow.top + item->rect.top;
2123             rect.right = item->rect.left - item->rect.right + 2*arrow_bitmap_width;
2124             rect.bottom = item->rect.top - item->rect.bottom;
2125         }
2126         else
2127         {
2128             rect.left = wndPtr->rectWindow.left + item->rect.left;
2129             rect.top = wndPtr->rectWindow.top + item->rect.bottom;
2130             rect.right = item->rect.right - item->rect.left;
2131             rect.bottom = item->rect.bottom - item->rect.top;
2132         }
2133     }
2134
2135     MENU_ShowPopup( hwndOwner, item->hSubMenu, menu->FocusedItem,
2136                     rect.left, rect.top, rect.right, rect.bottom );
2137     if (selectFirst)
2138         MENU_MoveSelection( hwndOwner, item->hSubMenu, ITEM_NEXT );
2139     WIN_ReleaseWndPtr(wndPtr);
2140     return item->hSubMenu;
2141 }
2142
2143
2144
2145 /**********************************************************************
2146  *         MENU_IsMenuActive
2147  */
2148 BOOL MENU_IsMenuActive(void)
2149 {
2150     return pTopPopupWnd && (pTopPopupWnd->dwStyle & WS_VISIBLE);
2151 }
2152
2153 /***********************************************************************
2154  *           MENU_PtMenu
2155  *
2156  * Walks menu chain trying to find a menu pt maps to.
2157  */
2158 static HMENU MENU_PtMenu( HMENU hMenu, POINT16 pt )
2159 {
2160    POPUPMENU *menu = MENU_GetMenu( hMenu );
2161    register UINT ht = menu->FocusedItem;
2162
2163    /* try subpopup first (if any) */
2164     ht = (ht != NO_SELECTED_ITEM &&
2165           (menu->items[ht].fType & MF_POPUP) &&
2166           (menu->items[ht].fState & MF_MOUSESELECT))
2167         ? (UINT) MENU_PtMenu(menu->items[ht].hSubMenu, pt) : 0;
2168
2169    if( !ht )    /* check the current window (avoiding WM_HITTEST) */
2170    {
2171         ht = (UINT)NC_HandleNCHitTest( menu->hWnd, pt );
2172         if( menu->wFlags & MF_POPUP )
2173             ht =  (ht != (UINT)HTNOWHERE &&
2174                    ht != (UINT)HTERROR) ? (UINT)hMenu : 0;
2175         else
2176         {
2177             WND* wndPtr = WIN_FindWndPtr(menu->hWnd);
2178
2179             ht = ( ht == HTSYSMENU ) ? (UINT)(wndPtr->hSysMenu)
2180                  : ( ht == HTMENU ) ? (UINT)(wndPtr->wIDmenu) : 0;
2181             WIN_ReleaseWndPtr(wndPtr);
2182         }
2183    }
2184    return (HMENU)ht;
2185 }
2186
2187 /***********************************************************************
2188  *           MENU_ExecFocusedItem
2189  *
2190  * Execute a menu item (for instance when user pressed Enter).
2191  * Return the wID of the executed item. Otherwise, -1 indicating
2192  * that no menu item wase executed;
2193  * Have to receive the flags for the TrackPopupMenu options to avoid
2194  * sending unwanted message.
2195  *
2196  */
2197 static INT MENU_ExecFocusedItem( MTRACKER* pmt, HMENU hMenu, UINT wFlags )
2198 {
2199     MENUITEM *item;
2200     POPUPMENU *menu = MENU_GetMenu( hMenu );
2201
2202     TRACE("%p hmenu=0x%04x\n", pmt, hMenu);
2203
2204     if (!menu || !menu->nItems ||
2205         (menu->FocusedItem == NO_SELECTED_ITEM)) return -1;
2206
2207     item = &menu->items[menu->FocusedItem];
2208
2209     TRACE("%08x %08x %08x\n",
2210                  hMenu, item->wID, item->hSubMenu);
2211
2212     if (!(item->fType & MF_POPUP))
2213     {
2214         if (!(item->fState & (MF_GRAYED | MF_DISABLED)))
2215         {
2216             /* If TPM_RETURNCMD is set you return the id, but
2217                do not send a message to the owner */
2218             if(!(wFlags & TPM_RETURNCMD))
2219             {
2220                 if( menu->wFlags & MF_SYSMENU )
2221                     PostMessageA( pmt->hOwnerWnd, WM_SYSCOMMAND, item->wID,
2222                                   MAKELPARAM((INT16)pmt->pt.x, (INT16)pmt->pt.y) );
2223                 else
2224                     PostMessageA( pmt->hOwnerWnd, WM_COMMAND, item->wID, 0 );
2225             }
2226             return item->wID;
2227         }
2228     }
2229     else
2230         pmt->hCurrentMenu = MENU_ShowSubPopup(pmt->hOwnerWnd, hMenu, TRUE, wFlags);
2231
2232     return -1;
2233 }
2234
2235 /***********************************************************************
2236  *           MENU_SwitchTracking
2237  *
2238  * Helper function for menu navigation routines.
2239  */
2240 static void MENU_SwitchTracking( MTRACKER* pmt, HMENU hPtMenu, UINT id )
2241 {
2242     POPUPMENU *ptmenu = MENU_GetMenu( hPtMenu );
2243     POPUPMENU *topmenu = MENU_GetMenu( pmt->hTopMenu );
2244
2245     TRACE("%p hmenu=0x%04x 0x%04x\n", pmt, hPtMenu, id);
2246
2247     if( pmt->hTopMenu != hPtMenu &&
2248         !((ptmenu->wFlags | topmenu->wFlags) & MF_POPUP) )
2249     {
2250         /* both are top level menus (system and menu-bar) */
2251         MENU_HideSubPopups( pmt->hOwnerWnd, pmt->hTopMenu, FALSE );
2252         MENU_SelectItem( pmt->hOwnerWnd, pmt->hTopMenu, NO_SELECTED_ITEM, FALSE, 0 );
2253         pmt->hTopMenu = hPtMenu;
2254     }
2255     else MENU_HideSubPopups( pmt->hOwnerWnd, hPtMenu, FALSE );
2256     MENU_SelectItem( pmt->hOwnerWnd, hPtMenu, id, TRUE, 0 );
2257 }
2258
2259
2260 /***********************************************************************
2261  *           MENU_ButtonDown
2262  *
2263  * Return TRUE if we can go on with menu tracking.
2264  */
2265 static BOOL MENU_ButtonDown( MTRACKER* pmt, HMENU hPtMenu, UINT wFlags )
2266 {
2267     TRACE("%p hmenu=0x%04x\n", pmt, hPtMenu);
2268
2269     if (hPtMenu)
2270     {
2271         UINT id = 0;
2272         POPUPMENU *ptmenu = MENU_GetMenu( hPtMenu );
2273         MENUITEM *item;
2274
2275         if( IS_SYSTEM_MENU(ptmenu) )
2276             item = ptmenu->items;
2277         else
2278             item = MENU_FindItemByCoords( ptmenu, pmt->pt, &id );
2279
2280         if( item )
2281         {
2282             if( ptmenu->FocusedItem != id )
2283                 MENU_SwitchTracking( pmt, hPtMenu, id );
2284
2285             /* If the popup menu is not already "popped" */
2286             if(!(item->fState & MF_MOUSESELECT ))
2287             {
2288                 pmt->hCurrentMenu = MENU_ShowSubPopup( pmt->hOwnerWnd, hPtMenu, FALSE, wFlags );
2289
2290                 /* In win31, a newly popped menu always remain opened for the next buttonup */
2291                 if(TWEAK_WineLook == WIN31_LOOK)
2292                     ptmenu->bTimeToHide = FALSE;
2293             }
2294
2295             return TRUE;
2296         }
2297         /* Else the click was on the menu bar, finish the tracking */
2298     }
2299     return FALSE;
2300 }
2301
2302 /***********************************************************************
2303  *           MENU_ButtonUp
2304  *
2305  * Return the value of MENU_ExecFocusedItem if
2306  * the selected item was not a popup. Else open the popup.
2307  * A -1 return value indicates that we go on with menu tracking.
2308  *
2309  */
2310 static INT MENU_ButtonUp( MTRACKER* pmt, HMENU hPtMenu, UINT wFlags)
2311 {
2312     TRACE("%p hmenu=0x%04x\n", pmt, hPtMenu);
2313
2314     if (hPtMenu)
2315     {
2316         UINT id = 0;
2317         POPUPMENU *ptmenu = MENU_GetMenu( hPtMenu );
2318         MENUITEM *item;
2319
2320         if( IS_SYSTEM_MENU(ptmenu) )
2321             item = ptmenu->items;
2322         else
2323             item = MENU_FindItemByCoords( ptmenu, pmt->pt, &id );
2324
2325         if( item && (ptmenu->FocusedItem == id ))
2326         {
2327             if( !(item->fType & MF_POPUP) )
2328                 return MENU_ExecFocusedItem( pmt, hPtMenu, wFlags);
2329
2330             /* If we are dealing with the top-level menu and that this */
2331             /* is a click on an already "poppped" item                 */
2332             /* Stop the menu tracking and close the opened submenus    */
2333             if((pmt->hTopMenu == hPtMenu) && (ptmenu->bTimeToHide == TRUE))
2334                 return 0;
2335         }
2336         ptmenu->bTimeToHide = TRUE;
2337     }
2338     return -1;
2339 }
2340
2341
2342 /***********************************************************************
2343  *           MENU_MouseMove
2344  *
2345  * Return TRUE if we can go on with menu tracking.
2346  */
2347 static BOOL MENU_MouseMove( MTRACKER* pmt, HMENU hPtMenu, UINT wFlags )
2348 {
2349     UINT id = NO_SELECTED_ITEM;
2350     POPUPMENU *ptmenu = NULL;
2351
2352     if( hPtMenu )
2353     {
2354         ptmenu = MENU_GetMenu( hPtMenu );
2355         if( IS_SYSTEM_MENU(ptmenu) )
2356             id = 0;
2357         else
2358             MENU_FindItemByCoords( ptmenu, pmt->pt, &id );
2359     }
2360
2361     if( id == NO_SELECTED_ITEM )
2362     {
2363         MENU_SelectItem( pmt->hOwnerWnd, pmt->hCurrentMenu,
2364                          NO_SELECTED_ITEM, TRUE, pmt->hTopMenu);
2365
2366     }
2367     else if( ptmenu->FocusedItem != id )
2368     {
2369             MENU_SwitchTracking( pmt, hPtMenu, id );
2370             pmt->hCurrentMenu = MENU_ShowSubPopup(pmt->hOwnerWnd, hPtMenu, FALSE, wFlags);
2371     }
2372     return TRUE;
2373 }
2374
2375
2376 /***********************************************************************
2377  *           MENU_DoNextMenu
2378  *
2379  * NOTE: WM_NEXTMENU documented in Win32 is a bit different.
2380  */
2381 static LRESULT MENU_DoNextMenu( MTRACKER* pmt, UINT vk )
2382 {
2383     POPUPMENU *menu = MENU_GetMenu( pmt->hTopMenu );
2384
2385     if( (vk == VK_LEFT &&  menu->FocusedItem == 0 ) ||
2386         (vk == VK_RIGHT && menu->FocusedItem == menu->nItems - 1))
2387     {
2388         WND*    wndPtr;
2389         HMENU hNewMenu;
2390         HWND  hNewWnd;
2391         UINT  id = 0;
2392         LRESULT l = SendMessageA( pmt->hOwnerWnd, WM_NEXTMENU, vk,
2393                 (IS_SYSTEM_MENU(menu)) ? GetSubMenu16(pmt->hTopMenu,0) : pmt->hTopMenu );
2394
2395         TRACE("%04x [%04x] -> %04x [%04x]\n",
2396                      (UINT16)pmt->hCurrentMenu, (UINT16)pmt->hOwnerWnd, LOWORD(l), HIWORD(l) );
2397
2398         if( l == 0 )
2399         {
2400             wndPtr = WIN_FindWndPtr(pmt->hOwnerWnd);
2401
2402             hNewWnd = pmt->hOwnerWnd;
2403             if( IS_SYSTEM_MENU(menu) )
2404             {
2405                 /* switch to the menu bar */
2406
2407                 if( wndPtr->dwStyle & WS_CHILD || !wndPtr->wIDmenu )
2408                 {
2409                     WIN_ReleaseWndPtr(wndPtr);
2410                     return FALSE;
2411                 }
2412
2413                 hNewMenu = wndPtr->wIDmenu;
2414                 if( vk == VK_LEFT )
2415                 {
2416                     menu = MENU_GetMenu( hNewMenu );
2417                     id = menu->nItems - 1;
2418                 }
2419             }
2420             else if( wndPtr->dwStyle & WS_SYSMENU )
2421             {
2422                 /* switch to the system menu */
2423                 hNewMenu = wndPtr->hSysMenu;
2424             }
2425             else
2426             {
2427                 WIN_ReleaseWndPtr(wndPtr);
2428                 return FALSE;
2429         }
2430             WIN_ReleaseWndPtr(wndPtr);
2431         }
2432         else    /* application returned a new menu to switch to */
2433         {
2434             hNewMenu = LOWORD(l); hNewWnd = HIWORD(l);
2435
2436             if( IsMenu(hNewMenu) && IsWindow(hNewWnd) )
2437             {
2438                 wndPtr = WIN_FindWndPtr(hNewWnd);
2439
2440                 if( wndPtr->dwStyle & WS_SYSMENU &&
2441                     GetSubMenu16(wndPtr->hSysMenu, 0) == hNewMenu )
2442                 {
2443                     /* get the real system menu */
2444                     hNewMenu =  wndPtr->hSysMenu;
2445                 }
2446                 else if( wndPtr->dwStyle & WS_CHILD || wndPtr->wIDmenu != hNewMenu )
2447                 {
2448                     /* FIXME: Not sure what to do here, perhaps,
2449                      * try to track hNewMenu as a popup? */
2450
2451                     TRACE(" -- got confused.\n");
2452                     WIN_ReleaseWndPtr(wndPtr);
2453                     return FALSE;
2454                 }
2455                 WIN_ReleaseWndPtr(wndPtr);
2456             }
2457             else return FALSE;
2458         }
2459
2460         if( hNewMenu != pmt->hTopMenu )
2461         {
2462             MENU_SelectItem( pmt->hOwnerWnd, pmt->hTopMenu, NO_SELECTED_ITEM,
2463                     FALSE, 0 );
2464             if( pmt->hCurrentMenu != pmt->hTopMenu )
2465                 MENU_HideSubPopups( pmt->hOwnerWnd, pmt->hTopMenu, FALSE );
2466         }
2467
2468         if( hNewWnd != pmt->hOwnerWnd )
2469         {
2470             ReleaseCapture();
2471             pmt->hOwnerWnd = hNewWnd;
2472             EVENT_Capture( pmt->hOwnerWnd, HTMENU );
2473         }
2474
2475         pmt->hTopMenu = pmt->hCurrentMenu = hNewMenu; /* all subpopups are hidden */
2476         MENU_SelectItem( pmt->hOwnerWnd, pmt->hTopMenu, id, TRUE, 0 );
2477
2478         return TRUE;
2479     }
2480     return FALSE;
2481 }
2482
2483 /***********************************************************************
2484  *           MENU_SuspendPopup
2485  *
2486  * The idea is not to show the popup if the next input message is
2487  * going to hide it anyway.
2488  */
2489 static BOOL MENU_SuspendPopup( MTRACKER* pmt, UINT16 uMsg )
2490 {
2491     MSG msg;
2492
2493     msg.hwnd = pmt->hOwnerWnd;
2494
2495     PeekMessageA( &msg, 0, 0, 0, PM_NOYIELD | PM_REMOVE);
2496     pmt->trackFlags |= TF_SKIPREMOVE;
2497
2498     switch( uMsg )
2499     {
2500         case WM_KEYDOWN:
2501              PeekMessageA( &msg, 0, 0, 0, PM_NOYIELD | PM_NOREMOVE);
2502              if( msg.message == WM_KEYUP || msg.message == WM_PAINT )
2503              {
2504                  PeekMessageA( &msg, 0, 0, 0, PM_NOYIELD | PM_REMOVE);
2505                  PeekMessageA( &msg, 0, 0, 0, PM_NOYIELD | PM_NOREMOVE);
2506                  if( msg.message == WM_KEYDOWN &&
2507                     (msg.wParam == VK_LEFT || msg.wParam == VK_RIGHT))
2508                  {
2509                      pmt->trackFlags |= TF_SUSPENDPOPUP;
2510                      return TRUE;
2511                  }
2512              }
2513              break;
2514     }
2515
2516     /* failures go through this */
2517     pmt->trackFlags &= ~TF_SUSPENDPOPUP;
2518     return FALSE;
2519 }
2520
2521 /***********************************************************************
2522  *           MENU_KeyLeft
2523  *
2524  * Handle a VK_LEFT key event in a menu.
2525  */
2526 static void MENU_KeyLeft( MTRACKER* pmt, UINT wFlags )
2527 {
2528     POPUPMENU *menu;
2529     HMENU hmenutmp, hmenuprev;
2530     UINT  prevcol;
2531
2532     hmenuprev = hmenutmp = pmt->hTopMenu;
2533     menu = MENU_GetMenu( hmenutmp );
2534
2535     /* Try to move 1 column left (if possible) */
2536     if( (prevcol = MENU_GetStartOfPrevColumn( pmt->hCurrentMenu )) !=
2537         NO_SELECTED_ITEM ) {
2538
2539         MENU_SelectItem( pmt->hOwnerWnd, pmt->hCurrentMenu,
2540                          prevcol, TRUE, 0 );
2541         return;
2542     }
2543
2544     /* close topmost popup */
2545     while (hmenutmp != pmt->hCurrentMenu)
2546     {
2547         hmenuprev = hmenutmp;
2548         hmenutmp = MENU_GetSubPopup( hmenuprev );
2549     }
2550
2551     MENU_HideSubPopups( pmt->hOwnerWnd, hmenuprev, TRUE );
2552     pmt->hCurrentMenu = hmenuprev;
2553
2554     if ( (hmenuprev == pmt->hTopMenu) && !(menu->wFlags & MF_POPUP) )
2555     {
2556         /* move menu bar selection if no more popups are left */
2557
2558         if( !MENU_DoNextMenu( pmt, VK_LEFT) )
2559              MENU_MoveSelection( pmt->hOwnerWnd, pmt->hTopMenu, ITEM_PREV );
2560
2561         if ( hmenuprev != hmenutmp || pmt->trackFlags & TF_SUSPENDPOPUP )
2562         {
2563            /* A sublevel menu was displayed - display the next one
2564             * unless there is another displacement coming up */
2565
2566             if( !MENU_SuspendPopup( pmt, WM_KEYDOWN ) )
2567                 pmt->hCurrentMenu = MENU_ShowSubPopup(pmt->hOwnerWnd,
2568                                                 pmt->hTopMenu, TRUE, wFlags);
2569         }
2570     }
2571 }
2572
2573
2574 /***********************************************************************
2575  *           MENU_KeyRight
2576  *
2577  * Handle a VK_RIGHT key event in a menu.
2578  */
2579 static void MENU_KeyRight( MTRACKER* pmt, UINT wFlags )
2580 {
2581     HMENU hmenutmp;
2582     POPUPMENU *menu = MENU_GetMenu( pmt->hTopMenu );
2583     UINT  nextcol;
2584
2585     TRACE("MENU_KeyRight called, cur %x (%s), top %x (%s).\n",
2586                   pmt->hCurrentMenu,
2587                   (MENU_GetMenu(pmt->hCurrentMenu))->
2588                      items[0].text,
2589                   pmt->hTopMenu, menu->items[0].text );
2590
2591     if ( (menu->wFlags & MF_POPUP) || (pmt->hCurrentMenu != pmt->hTopMenu))
2592     {
2593         /* If already displaying a popup, try to display sub-popup */
2594
2595         hmenutmp = pmt->hCurrentMenu;
2596         pmt->hCurrentMenu = MENU_ShowSubPopup(pmt->hOwnerWnd, hmenutmp, TRUE, wFlags);
2597
2598         /* if subpopup was displayed then we are done */
2599         if (hmenutmp != pmt->hCurrentMenu) return;
2600     }
2601
2602     /* Check to see if there's another column */
2603     if( (nextcol = MENU_GetStartOfNextColumn( pmt->hCurrentMenu )) !=
2604         NO_SELECTED_ITEM ) {
2605         TRACE("Going to %d.\n", nextcol );
2606         MENU_SelectItem( pmt->hOwnerWnd, pmt->hCurrentMenu,
2607                          nextcol, TRUE, 0 );
2608         return;
2609     }
2610
2611     if (!(menu->wFlags & MF_POPUP))     /* menu bar tracking */
2612     {
2613         if( pmt->hCurrentMenu != pmt->hTopMenu )
2614         {
2615             MENU_HideSubPopups( pmt->hOwnerWnd, pmt->hTopMenu, FALSE );
2616             hmenutmp = pmt->hCurrentMenu = pmt->hTopMenu;
2617         } else hmenutmp = 0;
2618
2619         /* try to move to the next item */
2620         if( !MENU_DoNextMenu( pmt, VK_RIGHT) )
2621              MENU_MoveSelection( pmt->hOwnerWnd, pmt->hTopMenu, ITEM_NEXT );
2622
2623         if( hmenutmp || pmt->trackFlags & TF_SUSPENDPOPUP )
2624             if( !MENU_SuspendPopup(pmt, WM_KEYDOWN) )
2625                 pmt->hCurrentMenu = MENU_ShowSubPopup(pmt->hOwnerWnd,
2626                                                        pmt->hTopMenu, TRUE, wFlags);
2627     }
2628 }
2629
2630 /***********************************************************************
2631  *           MENU_TrackMenu
2632  *
2633  * Menu tracking code.
2634  */
2635 static INT MENU_TrackMenu( HMENU hmenu, UINT wFlags, INT x, INT y,
2636                               HWND hwnd, const RECT *lprect )
2637 {
2638     MSG msg;
2639     POPUPMENU *menu;
2640     BOOL fRemove;
2641     INT executedMenuId = -1;
2642     MTRACKER mt;
2643     BOOL enterIdleSent = FALSE;
2644
2645     mt.trackFlags = 0;
2646     mt.hCurrentMenu = hmenu;
2647     mt.hTopMenu = hmenu;
2648     mt.hOwnerWnd = hwnd;
2649     mt.pt.x = x;
2650     mt.pt.y = y;
2651
2652     TRACE("hmenu=0x%04x flags=0x%08x (%d,%d) hwnd=0x%04x (%d,%d)-(%d,%d)\n",
2653             hmenu, wFlags, x, y, hwnd, (lprect) ? lprect->left : 0, (lprect) ? lprect->top : 0,
2654             (lprect) ? lprect->right : 0,  (lprect) ? lprect->bottom : 0);
2655
2656     fEndMenu = FALSE;
2657     if (!(menu = MENU_GetMenu( hmenu ))) return FALSE;
2658
2659     if (wFlags & TPM_BUTTONDOWN)
2660     {
2661         /* Get the result in order to start the tracking or not */
2662         fRemove = MENU_ButtonDown( &mt, hmenu, wFlags );
2663         fEndMenu = !fRemove;
2664     }
2665
2666     EVENT_Capture( mt.hOwnerWnd, HTMENU );
2667
2668     while (!fEndMenu)
2669     {
2670         menu = MENU_GetMenu( mt.hCurrentMenu );
2671         msg.hwnd = (wFlags & TPM_ENTERIDLEEX && menu->wFlags & MF_POPUP) ? menu->hWnd : 0;
2672
2673         /* we have to keep the message in the queue until it's
2674          * clear that menu loop is not over yet. */
2675
2676         if (!MSG_InternalGetMessage( QMSG_WIN32A, &msg, msg.hwnd, mt.hOwnerWnd,
2677                                      MSGF_MENU, PM_NOREMOVE, !enterIdleSent, &enterIdleSent )) break;
2678
2679         TranslateMessage( &msg );
2680         mt.pt = msg.pt;
2681
2682         if ( (msg.hwnd==menu->hWnd) || (msg.message!=WM_TIMER) )
2683           enterIdleSent=FALSE;
2684
2685         fRemove = FALSE;
2686         if ((msg.message >= WM_MOUSEFIRST) && (msg.message <= WM_MOUSELAST))
2687         {
2688             /* Find a menu for this mouse event */
2689             POINT16 pt16;
2690             CONV_POINT32TO16( &msg.pt, &pt16 );
2691             hmenu = MENU_PtMenu( mt.hTopMenu, pt16 );
2692
2693             switch(msg.message)
2694             {
2695                 /* no WM_NC... messages in captured state */
2696
2697                 case WM_RBUTTONDBLCLK:
2698                 case WM_RBUTTONDOWN:
2699                     if (!(wFlags & TPM_RIGHTBUTTON)) break;
2700                     /* fall through */
2701                 case WM_LBUTTONDBLCLK:
2702                 case WM_LBUTTONDOWN:
2703                     /* If the message belongs to the menu, removes it from the queue */
2704                     /* Else, end menu tracking */
2705                     fRemove = MENU_ButtonDown( &mt, hmenu, wFlags );
2706                     fEndMenu = !fRemove;
2707                     break;
2708
2709                 case WM_RBUTTONUP:
2710                     if (!(wFlags & TPM_RIGHTBUTTON)) break;
2711                     /* fall through */
2712                 case WM_LBUTTONUP:
2713                     /* Check if a menu was selected by the mouse */
2714                     if (hmenu)
2715                     {
2716                         executedMenuId = MENU_ButtonUp( &mt, hmenu, wFlags);
2717
2718                         /* End the loop if executedMenuId is an item ID */
2719                         /* or if the job was done (executedMenuId = 0). */
2720                         fEndMenu = fRemove = (executedMenuId != -1);
2721                     }
2722                     /* No menu was selected by the mouse */
2723                     /* if the function was called by TrackPopupMenu, continue
2724                        with the menu tracking. If not, stop it */
2725                     else
2726                         fEndMenu = ((wFlags & TPM_POPUPMENU) ? FALSE : TRUE);
2727
2728                     break;
2729
2730                 case WM_MOUSEMOVE:
2731                     /* In win95 winelook, the selected menu item must be changed every time the
2732                        mouse moves. In Win31 winelook, the mouse button has to be held down */
2733
2734                     if ( (TWEAK_WineLook > WIN31_LOOK) ||
2735                          ( (msg.wParam & MK_LBUTTON) ||
2736                            ((wFlags & TPM_RIGHTBUTTON) && (msg.wParam & MK_RBUTTON))) )
2737
2738                         fEndMenu |= !MENU_MouseMove( &mt, hmenu, wFlags );
2739
2740             } /* switch(msg.message) - mouse */
2741         }
2742         else if ((msg.message >= WM_KEYFIRST) && (msg.message <= WM_KEYLAST))
2743         {
2744             fRemove = TRUE;  /* Keyboard messages are always removed */
2745             switch(msg.message)
2746             {
2747             case WM_KEYDOWN:
2748                 switch(msg.wParam)
2749                 {
2750                 case VK_HOME:
2751                 case VK_END:
2752                     MENU_SelectItem( mt.hOwnerWnd, mt.hCurrentMenu,
2753                                      NO_SELECTED_ITEM, FALSE, 0 );
2754                 /* fall through */
2755                 case VK_UP:
2756                     MENU_MoveSelection( mt.hOwnerWnd, mt.hCurrentMenu,
2757                                        (msg.wParam == VK_HOME)? ITEM_NEXT : ITEM_PREV );
2758                     break;
2759
2760                 case VK_DOWN: /* If on menu bar, pull-down the menu */
2761
2762                     menu = MENU_GetMenu( mt.hCurrentMenu );
2763                     if (!(menu->wFlags & MF_POPUP))
2764                         mt.hCurrentMenu = MENU_ShowSubPopup(mt.hOwnerWnd, mt.hTopMenu, TRUE, wFlags);
2765                     else      /* otherwise try to move selection */
2766                         MENU_MoveSelection( mt.hOwnerWnd, mt.hCurrentMenu, ITEM_NEXT );
2767                     break;
2768
2769                 case VK_LEFT:
2770                     MENU_KeyLeft( &mt, wFlags );
2771                     break;
2772
2773                 case VK_RIGHT:
2774                     MENU_KeyRight( &mt, wFlags );
2775                     break;
2776
2777                 case VK_ESCAPE:
2778                     fEndMenu = TRUE;
2779                     break;
2780
2781                 case VK_F1:
2782                     {
2783                         HELPINFO hi;
2784                         hi.cbSize = sizeof(HELPINFO);
2785                         hi.iContextType = HELPINFO_MENUITEM;
2786                         if (menu->FocusedItem == NO_SELECTED_ITEM)
2787                             hi.iCtrlId = 0;
2788                         else
2789                             hi.iCtrlId = menu->items[menu->FocusedItem].wID;
2790                         hi.hItemHandle = hmenu;
2791                         hi.dwContextId = menu->dwContextHelpID;
2792                         hi.MousePos = msg.pt;
2793                         SendMessageA(hwnd, WM_HELP, 0, (LPARAM)&hi);
2794                         break;
2795                     }
2796
2797                 default:
2798                     break;
2799                 }
2800                 break;  /* WM_KEYDOWN */
2801
2802             case WM_SYSKEYDOWN:
2803                 switch(msg.wParam)
2804                 {
2805                 case VK_MENU:
2806                     fEndMenu = TRUE;
2807                     break;
2808
2809                 }
2810                 break;  /* WM_SYSKEYDOWN */
2811
2812             case WM_CHAR:
2813                 {
2814                     UINT        pos;
2815
2816                     if (msg.wParam == '\r' || msg.wParam == ' ')
2817                     {
2818                         executedMenuId = MENU_ExecFocusedItem(&mt,mt.hCurrentMenu, wFlags);
2819                         fEndMenu = (executedMenuId != -1);
2820
2821                         break;
2822                     }
2823
2824                       /* Hack to avoid control chars. */
2825                       /* We will find a better way real soon... */
2826                     if ((msg.wParam <= 32) || (msg.wParam >= 127)) break;
2827
2828                     pos = MENU_FindItemByKey( mt.hOwnerWnd, mt.hCurrentMenu,
2829                                               LOWORD(msg.wParam), FALSE );
2830                     if (pos == (UINT)-2) fEndMenu = TRUE;
2831                     else if (pos == (UINT)-1) MessageBeep(0);
2832                     else
2833                     {
2834                         MENU_SelectItem( mt.hOwnerWnd, mt.hCurrentMenu, pos,
2835                                 TRUE, 0 );
2836                         executedMenuId = MENU_ExecFocusedItem(&mt,mt.hCurrentMenu, wFlags);
2837                         fEndMenu = (executedMenuId != -1);
2838                     }
2839                 }
2840                 break;
2841             }  /* switch(msg.message) - kbd */
2842         }
2843         else
2844         {
2845             DispatchMessageA( &msg );
2846         }
2847
2848         if (!fEndMenu) fRemove = TRUE;
2849
2850         /* finally remove message from the queue */
2851
2852         if (fRemove && !(mt.trackFlags & TF_SKIPREMOVE) )
2853             PeekMessageA( &msg, 0, msg.message, msg.message, PM_REMOVE );
2854         else mt.trackFlags &= ~TF_SKIPREMOVE;
2855     }
2856
2857     ReleaseCapture();
2858
2859     menu = MENU_GetMenu( mt.hTopMenu );
2860
2861     if( IsWindow( mt.hOwnerWnd ) )
2862     {
2863         MENU_HideSubPopups( mt.hOwnerWnd, mt.hTopMenu, FALSE );
2864
2865         if (menu && menu->wFlags & MF_POPUP)
2866         {
2867             ShowWindow( menu->hWnd, SW_HIDE );
2868             uSubPWndLevel = 0;
2869         }
2870         MENU_SelectItem( mt.hOwnerWnd, mt.hTopMenu, NO_SELECTED_ITEM, FALSE, 0 );
2871         SendMessageA( mt.hOwnerWnd, WM_MENUSELECT, MAKELONG(0,0xffff), 0 );
2872     }
2873
2874     /* Reset the variable for hiding menu */
2875     menu->bTimeToHide = FALSE;
2876
2877     /* The return value is only used by TrackPopupMenu */
2878     return ((executedMenuId != -1) ? executedMenuId : 0);
2879 }
2880
2881 /***********************************************************************
2882  *           MENU_InitTracking
2883  */
2884 static BOOL MENU_InitTracking(HWND hWnd, HMENU hMenu, BOOL bPopup, UINT wFlags)
2885 {
2886     TRACE("hwnd=0x%04x hmenu=0x%04x\n", hWnd, hMenu);
2887
2888     HideCaret(0);
2889
2890     /* Send WM_ENTERMENULOOP and WM_INITMENU message only if TPM_NONOTIFY flag is not specified */
2891     if (!(wFlags & TPM_NONOTIFY))
2892        SendMessageA( hWnd, WM_ENTERMENULOOP, bPopup, 0 );
2893
2894     SendMessageA( hWnd, WM_SETCURSOR, hWnd, HTCAPTION );
2895
2896     if (!(wFlags & TPM_NONOTIFY))
2897        SendMessageA( hWnd, WM_INITMENU, hMenu, 0 );
2898
2899     return TRUE;
2900 }
2901 /***********************************************************************
2902  *           MENU_ExitTracking
2903  */
2904 static BOOL MENU_ExitTracking(HWND hWnd)
2905 {
2906     TRACE("hwnd=0x%04x\n", hWnd);
2907
2908     SendMessageA( hWnd, WM_EXITMENULOOP, 0, 0 );
2909     ShowCaret(0);
2910     return TRUE;
2911 }
2912
2913 /***********************************************************************
2914  *           MENU_TrackMouseMenuBar
2915  *
2916  * Menu-bar tracking upon a mouse event. Called from NC_HandleSysCommand().
2917  */
2918 void MENU_TrackMouseMenuBar( WND* wndPtr, INT ht, POINT pt )
2919 {
2920     HWND  hWnd = wndPtr->hwndSelf;
2921     HMENU hMenu = (ht == HTSYSMENU) ? wndPtr->hSysMenu : wndPtr->wIDmenu;
2922     UINT wFlags = TPM_ENTERIDLEEX | TPM_BUTTONDOWN | TPM_LEFTALIGN | TPM_LEFTBUTTON;
2923
2924     TRACE("pwnd=%p ht=0x%04x (%ld,%ld)\n", wndPtr, ht, pt.x, pt.y);
2925
2926     if (IsMenu(hMenu))
2927     {
2928         MENU_InitTracking( hWnd, hMenu, FALSE, wFlags );
2929         MENU_TrackMenu( hMenu, wFlags, pt.x, pt.y, hWnd, NULL );
2930         MENU_ExitTracking(hWnd);
2931     }
2932 }
2933
2934
2935 /***********************************************************************
2936  *           MENU_TrackKbdMenuBar
2937  *
2938  * Menu-bar tracking upon a keyboard event. Called from NC_HandleSysCommand().
2939  */
2940 void MENU_TrackKbdMenuBar( WND* wndPtr, UINT wParam, INT vkey)
2941 {
2942    UINT uItem = NO_SELECTED_ITEM;
2943    HMENU hTrackMenu;
2944    UINT wFlags = TPM_ENTERIDLEEX | TPM_LEFTALIGN | TPM_LEFTBUTTON;
2945
2946     /* find window that has a menu */
2947
2948     while( wndPtr->dwStyle & WS_CHILD)
2949         if( !(wndPtr = wndPtr->parent) ) return;
2950
2951     /* check if we have to track a system menu */
2952
2953     if( (wndPtr->dwStyle & (WS_CHILD | WS_MINIMIZE)) ||
2954         !wndPtr->wIDmenu || vkey == VK_SPACE )
2955     {
2956         if( !(wndPtr->dwStyle & WS_SYSMENU) ) return;
2957         hTrackMenu = wndPtr->hSysMenu;
2958         uItem = 0;
2959         wParam |= HTSYSMENU;    /* prevent item lookup */
2960     }
2961     else
2962         hTrackMenu = wndPtr->wIDmenu;
2963
2964     if (IsMenu( hTrackMenu ))
2965     {
2966         MENU_InitTracking( wndPtr->hwndSelf, hTrackMenu, FALSE, wFlags );
2967
2968         if( vkey && vkey != VK_SPACE )
2969         {
2970             uItem = MENU_FindItemByKey( wndPtr->hwndSelf, hTrackMenu,
2971                                         vkey, (wParam & HTSYSMENU) );
2972             if( uItem >= (UINT)(-2) )
2973             {
2974                 if( uItem == (UINT)(-1) ) MessageBeep(0);
2975                 hTrackMenu = 0;
2976             }
2977         }
2978
2979         if( hTrackMenu )
2980         {
2981             MENU_SelectItem( wndPtr->hwndSelf, hTrackMenu, uItem, TRUE, 0 );
2982
2983             if( uItem == NO_SELECTED_ITEM )
2984                 MENU_MoveSelection( wndPtr->hwndSelf, hTrackMenu, ITEM_NEXT );
2985             else if( vkey )
2986                 PostMessageA( wndPtr->hwndSelf, WM_KEYDOWN, VK_DOWN, 0L );
2987
2988             MENU_TrackMenu( hTrackMenu, wFlags, 0, 0, wndPtr->hwndSelf, NULL );
2989         }
2990
2991         MENU_ExitTracking (wndPtr->hwndSelf);
2992     }
2993 }
2994
2995
2996 /**********************************************************************
2997  *           TrackPopupMenu16   (USER.416)
2998  */
2999 BOOL16 WINAPI TrackPopupMenu16( HMENU16 hMenu, UINT16 wFlags, INT16 x, INT16 y,
3000                            INT16 nReserved, HWND16 hWnd, const RECT16 *lpRect )
3001 {
3002     RECT r;
3003     if (lpRect)
3004          CONV_RECT16TO32( lpRect, &r );
3005     return TrackPopupMenu( hMenu, wFlags, x, y, nReserved, hWnd,
3006                              lpRect ? &r : NULL );
3007 }
3008
3009
3010 /**********************************************************************
3011  *           TrackPopupMenu   (USER32.549)
3012  *
3013  * Like the win32 API, the function return the command ID only if the
3014  * flag TPM_RETURNCMD is on.
3015  *
3016  */
3017 BOOL WINAPI TrackPopupMenu( HMENU hMenu, UINT wFlags, INT x, INT y,
3018                            INT nReserved, HWND hWnd, const RECT *lpRect )
3019 {
3020     BOOL ret = FALSE;
3021
3022     MENU_InitTracking(hWnd, hMenu, TRUE, wFlags);
3023
3024     /* Send WM_INITMENUPOPUP message only if TPM_NONOTIFY flag is not specified */
3025     if (!(wFlags & TPM_NONOTIFY))
3026         SendMessageA( hWnd, WM_INITMENUPOPUP, hMenu, 0);
3027
3028     if (MENU_ShowPopup( hWnd, hMenu, 0, x, y, 0, 0 ))
3029         ret = MENU_TrackMenu( hMenu, wFlags | TPM_POPUPMENU, 0, 0, hWnd, lpRect );
3030     MENU_ExitTracking(hWnd);
3031
3032     if( (!(wFlags & TPM_RETURNCMD)) && (ret != FALSE) )
3033         ret = 1;
3034
3035     return ret;
3036 }
3037
3038 /**********************************************************************
3039  *           TrackPopupMenuEx   (USER32.550)
3040  */
3041 BOOL WINAPI TrackPopupMenuEx( HMENU hMenu, UINT wFlags, INT x, INT y,
3042                                 HWND hWnd, LPTPMPARAMS lpTpm )
3043 {
3044     FIXME("not fully implemented\n" );
3045     return TrackPopupMenu( hMenu, wFlags, x, y, 0, hWnd,
3046                              lpTpm ? &lpTpm->rcExclude : NULL );
3047 }
3048
3049 /***********************************************************************
3050  *           PopupMenuWndProc
3051  *
3052  * NOTE: Windows has totally different (and undocumented) popup wndproc.
3053  */
3054 LRESULT WINAPI PopupMenuWndProc( HWND hwnd, UINT message, WPARAM wParam,
3055                                  LPARAM lParam )
3056 {
3057     WND* wndPtr = WIN_FindWndPtr(hwnd);
3058     LRESULT retvalue;
3059
3060     TRACE("hwnd=0x%04x msg=0x%04x wp=0x%04x lp=0x%08lx\n",
3061     hwnd, message, wParam, lParam);
3062
3063     switch(message)
3064     {
3065     case WM_CREATE:
3066         {
3067             CREATESTRUCTA *cs = (CREATESTRUCTA*)lParam;
3068             SetWindowLongA( hwnd, 0, (LONG)cs->lpCreateParams );
3069             retvalue = 0;
3070             goto END;
3071         }
3072
3073     case WM_MOUSEACTIVATE:  /* We don't want to be activated */
3074         retvalue = MA_NOACTIVATE;
3075         goto END;
3076
3077     case WM_PAINT:
3078         {
3079             PAINTSTRUCT ps;
3080             BeginPaint( hwnd, &ps );
3081             MENU_DrawPopupMenu( hwnd, ps.hdc,
3082                                 (HMENU)GetWindowLongA( hwnd, 0 ) );
3083             EndPaint( hwnd, &ps );
3084             retvalue = 0;
3085             goto END;
3086         }
3087     case WM_ERASEBKGND:
3088         retvalue = 1;
3089         goto END;
3090
3091     case WM_DESTROY:
3092
3093         /* zero out global pointer in case resident popup window
3094          * was somehow destroyed. */
3095
3096         if(MENU_GetTopPopupWnd() )
3097         {
3098             if( hwnd == pTopPopupWnd->hwndSelf )
3099             {
3100                 ERR("resident popup destroyed!\n");
3101
3102                 MENU_DestroyTopPopupWnd();
3103                 uSubPWndLevel = 0;
3104             }
3105             else
3106                 uSubPWndLevel--;
3107             MENU_ReleaseTopPopupWnd();
3108         }
3109         break;
3110
3111     case WM_SHOWWINDOW:
3112
3113         if( wParam )
3114         {
3115             if( !(*(HMENU*)wndPtr->wExtra) )
3116                 ERR("no menu to display\n");
3117         }
3118         else
3119             *(HMENU*)wndPtr->wExtra = 0;
3120         break;
3121
3122     case MM_SETMENUHANDLE:
3123
3124         *(HMENU*)wndPtr->wExtra = (HMENU)wParam;
3125         break;
3126
3127     case MM_GETMENUHANDLE:
3128
3129         retvalue = *(HMENU*)wndPtr->wExtra;
3130         goto END;
3131
3132     default:
3133         retvalue = DefWindowProcA( hwnd, message, wParam, lParam );
3134         goto END;
3135     }
3136     retvalue = 0;
3137 END:
3138     WIN_ReleaseWndPtr(wndPtr);
3139     return retvalue;
3140 }
3141
3142
3143 /***********************************************************************
3144  *           MENU_GetMenuBarHeight
3145  *
3146  * Compute the size of the menu bar height. Used by NC_HandleNCCalcSize().
3147  */
3148 UINT MENU_GetMenuBarHeight( HWND hwnd, UINT menubarWidth,
3149                               INT orgX, INT orgY )
3150 {
3151     HDC hdc;
3152     RECT rectBar;
3153     WND *wndPtr;
3154     LPPOPUPMENU lppop;
3155     UINT retvalue;
3156
3157     TRACE("HWND 0x%x, width %d, at (%d, %d).\n",
3158                  hwnd, menubarWidth, orgX, orgY );
3159
3160     if (!(wndPtr = WIN_FindWndPtr( hwnd )))
3161         return 0;
3162
3163     if (!(lppop = MENU_GetMenu((HMENU16)wndPtr->wIDmenu)))
3164     {
3165         WIN_ReleaseWndPtr(wndPtr);
3166         return 0;
3167     }
3168
3169     hdc = GetDCEx( hwnd, 0, DCX_CACHE | DCX_WINDOW );
3170     SelectObject( hdc, hMenuFont);
3171     SetRect(&rectBar, orgX, orgY, orgX+menubarWidth, orgY+GetSystemMetrics(SM_CYMENU));
3172     MENU_MenuBarCalcSize( hdc, &rectBar, lppop, hwnd );
3173     ReleaseDC( hwnd, hdc );
3174     retvalue = lppop->Height;
3175     WIN_ReleaseWndPtr(wndPtr);
3176     return retvalue;
3177 }
3178
3179
3180 /*******************************************************************
3181  *         ChangeMenu16    (USER.153)
3182  */
3183 BOOL16 WINAPI ChangeMenu16( HMENU16 hMenu, UINT16 pos, SEGPTR data,
3184                             UINT16 id, UINT16 flags )
3185 {
3186     TRACE("menu=%04x pos=%d data=%08lx id=%04x flags=%04x\n",
3187                   hMenu, pos, (DWORD)data, id, flags );
3188     if (flags & MF_APPEND) return AppendMenu16( hMenu, flags & ~MF_APPEND,
3189                                                 id, data );
3190
3191     /* FIXME: Word passes the item id in 'pos' and 0 or 0xffff as id */
3192     /* for MF_DELETE. We should check the parameters for all others */
3193     /* MF_* actions also (anybody got a doc on ChangeMenu?). */
3194
3195     if (flags & MF_DELETE) return DeleteMenu16(hMenu, pos, flags & ~MF_DELETE);
3196     if (flags & MF_CHANGE) return ModifyMenu16(hMenu, pos, flags & ~MF_CHANGE,
3197                                                id, data );
3198     if (flags & MF_REMOVE) return RemoveMenu16(hMenu,
3199                                               flags & MF_BYPOSITION ? pos : id,
3200                                               flags & ~MF_REMOVE );
3201     /* Default: MF_INSERT */
3202     return InsertMenu16( hMenu, pos, flags, id, data );
3203 }
3204
3205
3206 /*******************************************************************
3207  *         ChangeMenu32A    (USER32.23)
3208  */
3209 BOOL WINAPI ChangeMenuA( HMENU hMenu, UINT pos, LPCSTR data,
3210                              UINT id, UINT flags )
3211 {
3212     TRACE("menu=%08x pos=%d data=%08lx id=%08x flags=%08x\n",
3213                   hMenu, pos, (DWORD)data, id, flags );
3214     if (flags & MF_APPEND) return AppendMenuA( hMenu, flags & ~MF_APPEND,
3215                                                  id, data );
3216     if (flags & MF_DELETE) return DeleteMenu(hMenu, pos, flags & ~MF_DELETE);
3217     if (flags & MF_CHANGE) return ModifyMenuA(hMenu, pos, flags & ~MF_CHANGE,
3218                                                 id, data );
3219     if (flags & MF_REMOVE) return RemoveMenu( hMenu,
3220                                               flags & MF_BYPOSITION ? pos : id,
3221                                               flags & ~MF_REMOVE );
3222     /* Default: MF_INSERT */
3223     return InsertMenuA( hMenu, pos, flags, id, data );
3224 }
3225
3226
3227 /*******************************************************************
3228  *         ChangeMenu32W    (USER32.24)
3229  */
3230 BOOL WINAPI ChangeMenuW( HMENU hMenu, UINT pos, LPCWSTR data,
3231                              UINT id, UINT flags )
3232 {
3233     TRACE("menu=%08x pos=%d data=%08lx id=%08x flags=%08x\n",
3234                   hMenu, pos, (DWORD)data, id, flags );
3235     if (flags & MF_APPEND) return AppendMenuW( hMenu, flags & ~MF_APPEND,
3236                                                  id, data );
3237     if (flags & MF_DELETE) return DeleteMenu(hMenu, pos, flags & ~MF_DELETE);
3238     if (flags & MF_CHANGE) return ModifyMenuW(hMenu, pos, flags & ~MF_CHANGE,
3239                                                 id, data );
3240     if (flags & MF_REMOVE) return RemoveMenu( hMenu,
3241                                               flags & MF_BYPOSITION ? pos : id,
3242                                               flags & ~MF_REMOVE );
3243     /* Default: MF_INSERT */
3244     return InsertMenuW( hMenu, pos, flags, id, data );
3245 }
3246
3247
3248 /*******************************************************************
3249  *         CheckMenuItem16    (USER.154)
3250  */
3251 BOOL16 WINAPI CheckMenuItem16( HMENU16 hMenu, UINT16 id, UINT16 flags )
3252 {
3253     return (BOOL16)CheckMenuItem( hMenu, id, flags );
3254 }
3255
3256
3257 /*******************************************************************
3258  *         CheckMenuItem    (USER32.46)
3259  */
3260 DWORD WINAPI CheckMenuItem( HMENU hMenu, UINT id, UINT flags )
3261 {
3262     MENUITEM *item;
3263     DWORD ret;
3264
3265     TRACE("menu=%04x id=%04x flags=%04x\n", hMenu, id, flags );
3266     if (!(item = MENU_FindItem( &hMenu, &id, flags ))) return -1;
3267     ret = item->fState & MF_CHECKED;
3268     if (flags & MF_CHECKED) item->fState |= MF_CHECKED;
3269     else item->fState &= ~MF_CHECKED;
3270     return ret;
3271 }
3272
3273
3274 /**********************************************************************
3275  *         EnableMenuItem16    (USER.155)
3276  */
3277 UINT16 WINAPI EnableMenuItem16( HMENU16 hMenu, UINT16 wItemID, UINT16 wFlags )
3278 {
3279     return EnableMenuItem( hMenu, wItemID, wFlags );
3280 }
3281
3282
3283 /**********************************************************************
3284  *         EnableMenuItem32    (USER32.170)
3285  */
3286 UINT WINAPI EnableMenuItem( HMENU hMenu, UINT wItemID, UINT wFlags )
3287 {
3288     UINT    oldflags;
3289     MENUITEM *item;
3290     POPUPMENU *menu;
3291
3292     TRACE("(%04x, %04X, %04X) !\n",
3293                  hMenu, wItemID, wFlags);
3294
3295     /* Get the Popupmenu to access the owner menu */
3296     if (!(menu = MENU_GetMenu(hMenu)))
3297         return (UINT)-1;
3298
3299     if (!(item = MENU_FindItem( &hMenu, &wItemID, wFlags )))
3300         return (UINT)-1;
3301
3302     oldflags = item->fState & (MF_GRAYED | MF_DISABLED);
3303     item->fState ^= (oldflags ^ wFlags) & (MF_GRAYED | MF_DISABLED);
3304
3305     /* In win95 if the close item in the system menu change update the close button */
3306     if (TWEAK_WineLook == WIN95_LOOK)
3307         if((item->wID == SC_CLOSE) && (oldflags != wFlags))
3308         {
3309             if (menu->hSysMenuOwner != 0)
3310             {
3311                 POPUPMENU* parentMenu;
3312
3313                 /* Get the parent menu to access*/
3314                 if (!(parentMenu = MENU_GetMenu(menu->hSysMenuOwner)))
3315                     return (UINT)-1;
3316
3317                 /* Refresh the frame to reflect the change*/
3318                 SetWindowPos(parentMenu->hWnd, 0, 0, 0, 0, 0,
3319                              SWP_NOACTIVATE | SWP_NOMOVE | SWP_NOSIZE | SWP_NOZORDER);
3320             }
3321         }
3322
3323     return oldflags;
3324 }
3325
3326
3327 /*******************************************************************
3328  *         GetMenuString16    (USER.161)
3329  */
3330 INT16 WINAPI GetMenuString16( HMENU16 hMenu, UINT16 wItemID,
3331                               LPSTR str, INT16 nMaxSiz, UINT16 wFlags )
3332 {
3333     return GetMenuStringA( hMenu, wItemID, str, nMaxSiz, wFlags );
3334 }
3335
3336
3337 /*******************************************************************
3338  *         GetMenuString32A    (USER32.268)
3339  */
3340 INT WINAPI GetMenuStringA(
3341         HMENU hMenu,    /* [in] menuhandle */
3342         UINT wItemID,   /* [in] menu item (dep. on wFlags) */
3343         LPSTR str,      /* [out] outbuffer. If NULL, func returns entry length*/
3344         INT nMaxSiz,    /* [in] length of buffer. if 0, func returns entry len*/
3345         UINT wFlags     /* [in] MF_ flags */
3346 ) {
3347     MENUITEM *item;
3348
3349     TRACE("menu=%04x item=%04x ptr=%p len=%d flags=%04x\n",
3350                  hMenu, wItemID, str, nMaxSiz, wFlags );
3351     if (!(item = MENU_FindItem( &hMenu, &wItemID, wFlags ))) return 0;
3352     if (!IS_STRING_ITEM(item->fType)) return 0;
3353     if (!str || !nMaxSiz) return strlen(item->text);
3354     str[0] = '\0';
3355     lstrcpynA( str, item->text, nMaxSiz );
3356     TRACE("returning '%s'\n", str );
3357     return strlen(str);
3358 }
3359
3360
3361 /*******************************************************************
3362  *         GetMenuString32W    (USER32.269)
3363  */
3364 INT WINAPI GetMenuStringW( HMENU hMenu, UINT wItemID,
3365                                LPWSTR str, INT nMaxSiz, UINT wFlags )
3366 {
3367     MENUITEM *item;
3368
3369     TRACE("menu=%04x item=%04x ptr=%p len=%d flags=%04x\n",
3370                  hMenu, wItemID, str, nMaxSiz, wFlags );
3371     if (!(item = MENU_FindItem( &hMenu, &wItemID, wFlags ))) return 0;
3372     if (!IS_STRING_ITEM(item->fType)) return 0;
3373     if (!str || !nMaxSiz) return strlen(item->text);
3374     str[0] = '\0';
3375     lstrcpynAtoW( str, item->text, nMaxSiz );
3376     return lstrlenW(str);
3377 }
3378
3379
3380 /**********************************************************************
3381  *         HiliteMenuItem16    (USER.162)
3382  */
3383 BOOL16 WINAPI HiliteMenuItem16( HWND16 hWnd, HMENU16 hMenu, UINT16 wItemID,
3384                                 UINT16 wHilite )
3385 {
3386     return HiliteMenuItem( hWnd, hMenu, wItemID, wHilite );
3387 }
3388
3389
3390 /**********************************************************************
3391  *         HiliteMenuItem32    (USER32.318)
3392  */
3393 BOOL WINAPI HiliteMenuItem( HWND hWnd, HMENU hMenu, UINT wItemID,
3394                                 UINT wHilite )
3395 {
3396     LPPOPUPMENU menu;
3397     TRACE("(%04x, %04x, %04x, %04x);\n",
3398                  hWnd, hMenu, wItemID, wHilite);
3399     if (!MENU_FindItem( &hMenu, &wItemID, wHilite )) return FALSE;
3400     if (!(menu = MENU_GetMenu(hMenu))) return FALSE;
3401     if (menu->FocusedItem == wItemID) return TRUE;
3402     MENU_HideSubPopups( hWnd, hMenu, FALSE );
3403     MENU_SelectItem( hWnd, hMenu, wItemID, TRUE, 0 );
3404     return TRUE;
3405 }
3406
3407
3408 /**********************************************************************
3409  *         GetMenuState16    (USER.250)
3410  */
3411 UINT16 WINAPI GetMenuState16( HMENU16 hMenu, UINT16 wItemID, UINT16 wFlags )
3412 {
3413     return GetMenuState( hMenu, wItemID, wFlags );
3414 }
3415
3416
3417 /**********************************************************************
3418  *         GetMenuState    (USER32.267)
3419  */
3420 UINT WINAPI GetMenuState( HMENU hMenu, UINT wItemID, UINT wFlags )
3421 {
3422     MENUITEM *item;
3423     TRACE("(menu=%04x, id=%04x, flags=%04x);\n",
3424                  hMenu, wItemID, wFlags);
3425     if (!(item = MENU_FindItem( &hMenu, &wItemID, wFlags ))) return -1;
3426     debug_print_menuitem ("  item: ", item, "");
3427     if (item->fType & MF_POPUP)
3428     {
3429         POPUPMENU *menu = MENU_GetMenu( item->hSubMenu );
3430         if (!menu) return -1;
3431         else return (menu->nItems << 8) | ((item->fState|item->fType) & 0xff);
3432     }
3433     else
3434     {
3435         /* We used to (from way back then) mask the result to 0xff.  */
3436         /* I don't know why and it seems wrong as the documented */
3437         /* return flag MF_SEPARATOR is outside that mask.  */
3438         return (item->fType | item->fState);
3439     }
3440 }
3441
3442
3443 /**********************************************************************
3444  *         GetMenuItemCount16    (USER.263)
3445  */
3446 INT16 WINAPI GetMenuItemCount16( HMENU16 hMenu )
3447 {
3448     LPPOPUPMENU menu = MENU_GetMenu(hMenu);
3449     if (!menu) return -1;
3450     TRACE("(%04x) returning %d\n",
3451                   hMenu, menu->nItems );
3452     return menu->nItems;
3453 }
3454
3455
3456 /**********************************************************************
3457  *         GetMenuItemCount32    (USER32.262)
3458  */
3459 INT WINAPI GetMenuItemCount( HMENU hMenu )
3460 {
3461     LPPOPUPMENU menu = MENU_GetMenu(hMenu);
3462     if (!menu) return -1;
3463     TRACE("(%04x) returning %d\n",
3464                   hMenu, menu->nItems );
3465     return menu->nItems;
3466 }
3467
3468 /**********************************************************************
3469  *         GetMenuItemID16    (USER.264)
3470  */
3471 UINT16 WINAPI GetMenuItemID16( HMENU16 hMenu, INT16 nPos )
3472 {
3473     return (UINT16) GetMenuItemID (hMenu, nPos);
3474 }
3475
3476 /**********************************************************************
3477  *         GetMenuItemID32    (USER32.263)
3478  */
3479 UINT WINAPI GetMenuItemID( HMENU hMenu, INT nPos )
3480 {
3481     MENUITEM * lpmi;
3482
3483     if (!(lpmi = MENU_FindItem(&hMenu,&nPos,MF_BYPOSITION))) return 0;
3484     if (lpmi->fType & MF_POPUP) return -1;
3485     return lpmi->wID;
3486
3487 }
3488
3489 /*******************************************************************
3490  *         InsertMenu16    (USER.410)
3491  */
3492 BOOL16 WINAPI InsertMenu16( HMENU16 hMenu, UINT16 pos, UINT16 flags,
3493                             UINT16 id, SEGPTR data )
3494 {
3495     UINT pos32 = (UINT)pos;
3496     if ((pos == (UINT16)-1) && (flags & MF_BYPOSITION)) pos32 = (UINT)-1;
3497     if (IS_STRING_ITEM(flags) && data)
3498         return InsertMenuA( hMenu, pos32, flags, id,
3499                               (LPSTR)PTR_SEG_TO_LIN(data) );
3500     return InsertMenuA( hMenu, pos32, flags, id, (LPSTR)data );
3501 }
3502
3503
3504 /*******************************************************************
3505  *         InsertMenu32A    (USER32.322)
3506  */
3507 BOOL WINAPI InsertMenuA( HMENU hMenu, UINT pos, UINT flags,
3508                              UINT id, LPCSTR str )
3509 {
3510     MENUITEM *item;
3511
3512     if (IS_STRING_ITEM(flags) && str)
3513         TRACE("hMenu %04x, pos %d, flags %08x, "
3514                       "id %04x, str '%s'\n",
3515                       hMenu, pos, flags, id, str );
3516     else TRACE("hMenu %04x, pos %d, flags %08x, "
3517                        "id %04x, str %08lx (not a string)\n",
3518                        hMenu, pos, flags, id, (DWORD)str );
3519
3520     if (!(item = MENU_InsertItem( hMenu, pos, flags ))) return FALSE;
3521
3522     if (!(MENU_SetItemData( item, flags, id, str )))
3523     {
3524         RemoveMenu( hMenu, pos, flags );
3525         return FALSE;
3526     }
3527
3528     if (flags & MF_POPUP)  /* Set the MF_POPUP flag on the popup-menu */
3529         (MENU_GetMenu((HMENU16)id))->wFlags |= MF_POPUP;
3530
3531     item->hCheckBit = item->hUnCheckBit = 0;
3532     return TRUE;
3533 }
3534
3535
3536 /*******************************************************************
3537  *         InsertMenu32W    (USER32.325)
3538  */
3539 BOOL WINAPI InsertMenuW( HMENU hMenu, UINT pos, UINT flags,
3540                              UINT id, LPCWSTR str )
3541 {
3542     BOOL ret;
3543
3544     if (IS_STRING_ITEM(flags) && str)
3545     {
3546         LPSTR newstr = HEAP_strdupWtoA( GetProcessHeap(), 0, str );
3547         ret = InsertMenuA( hMenu, pos, flags, id, newstr );
3548         HeapFree( GetProcessHeap(), 0, newstr );
3549         return ret;
3550     }
3551     else return InsertMenuA( hMenu, pos, flags, id, (LPCSTR)str );
3552 }
3553
3554
3555 /*******************************************************************
3556  *         AppendMenu16    (USER.411)
3557  */
3558 BOOL16 WINAPI AppendMenu16(HMENU16 hMenu, UINT16 flags, UINT16 id, SEGPTR data)
3559 {
3560     return InsertMenu16( hMenu, -1, flags | MF_BYPOSITION, id, data );
3561 }
3562
3563
3564 /*******************************************************************
3565  *         AppendMenu32A    (USER32.5)
3566  */
3567 BOOL WINAPI AppendMenuA( HMENU hMenu, UINT flags,
3568                              UINT id, LPCSTR data )
3569 {
3570     return InsertMenuA( hMenu, -1, flags | MF_BYPOSITION, id, data );
3571 }
3572
3573
3574 /*******************************************************************
3575  *         AppendMenu32W    (USER32.6)
3576  */
3577 BOOL WINAPI AppendMenuW( HMENU hMenu, UINT flags,
3578                              UINT id, LPCWSTR data )
3579 {
3580     return InsertMenuW( hMenu, -1, flags | MF_BYPOSITION, id, data );
3581 }
3582
3583
3584 /**********************************************************************
3585  *         RemoveMenu16    (USER.412)
3586  */
3587 BOOL16 WINAPI RemoveMenu16( HMENU16 hMenu, UINT16 nPos, UINT16 wFlags )
3588 {
3589     return RemoveMenu( hMenu, nPos, wFlags );
3590 }
3591
3592
3593 /**********************************************************************
3594  *         RemoveMenu    (USER32.441)
3595  */
3596 BOOL WINAPI RemoveMenu( HMENU hMenu, UINT nPos, UINT wFlags )
3597 {
3598     LPPOPUPMENU menu;
3599     MENUITEM *item;
3600
3601     TRACE("(menu=%04x pos=%04x flags=%04x)\n",hMenu, nPos, wFlags);
3602     if (!(item = MENU_FindItem( &hMenu, &nPos, wFlags ))) return FALSE;
3603     if (!(menu = MENU_GetMenu(hMenu))) return FALSE;
3604
3605       /* Remove item */
3606
3607     MENU_FreeItemData( item );
3608
3609     if (--menu->nItems == 0)
3610     {
3611         HeapFree( SystemHeap, 0, menu->items );
3612         menu->items = NULL;
3613     }
3614     else
3615     {
3616         while(nPos < menu->nItems)
3617         {
3618             *item = *(item+1);
3619             item++;
3620             nPos++;
3621         }
3622         menu->items = HeapReAlloc( SystemHeap, 0, menu->items,
3623                                    menu->nItems * sizeof(MENUITEM) );
3624     }
3625     return TRUE;
3626 }
3627
3628
3629 /**********************************************************************
3630  *         DeleteMenu16    (USER.413)
3631  */
3632 BOOL16 WINAPI DeleteMenu16( HMENU16 hMenu, UINT16 nPos, UINT16 wFlags )
3633 {
3634     return DeleteMenu( hMenu, nPos, wFlags );
3635 }
3636
3637
3638 /**********************************************************************
3639  *         DeleteMenu32    (USER32.129)
3640  */
3641 BOOL WINAPI DeleteMenu( HMENU hMenu, UINT nPos, UINT wFlags )
3642 {
3643     MENUITEM *item = MENU_FindItem( &hMenu, &nPos, wFlags );
3644     if (!item) return FALSE;
3645     if (item->fType & MF_POPUP) DestroyMenu( item->hSubMenu );
3646       /* nPos is now the position of the item */
3647     RemoveMenu( hMenu, nPos, wFlags | MF_BYPOSITION );
3648     return TRUE;
3649 }
3650
3651
3652 /*******************************************************************
3653  *         ModifyMenu16    (USER.414)
3654  */
3655 BOOL16 WINAPI ModifyMenu16( HMENU16 hMenu, UINT16 pos, UINT16 flags,
3656                             UINT16 id, SEGPTR data )
3657 {
3658     if (IS_STRING_ITEM(flags))
3659         return ModifyMenuA( hMenu, pos, flags, id,
3660                               (LPSTR)PTR_SEG_TO_LIN(data) );
3661     return ModifyMenuA( hMenu, pos, flags, id, (LPSTR)data );
3662 }
3663
3664
3665 /*******************************************************************
3666  *         ModifyMenu32A    (USER32.397)
3667  */
3668 BOOL WINAPI ModifyMenuA( HMENU hMenu, UINT pos, UINT flags,
3669                              UINT id, LPCSTR str )
3670 {
3671     MENUITEM *item;
3672
3673     if (IS_STRING_ITEM(flags))
3674     {
3675         TRACE("%04x %d %04x %04x '%s'\n",
3676                       hMenu, pos, flags, id, str ? str : "#NULL#" );
3677         if (!str) return FALSE;
3678     }
3679     else
3680     {
3681         TRACE("%04x %d %04x %04x %08lx\n",
3682                       hMenu, pos, flags, id, (DWORD)str );
3683     }
3684
3685     if (!(item = MENU_FindItem( &hMenu, &pos, flags ))) return FALSE;
3686     return MENU_SetItemData( item, flags, id, str );
3687 }
3688
3689
3690 /*******************************************************************
3691  *         ModifyMenu32W    (USER32.398)
3692  */
3693 BOOL WINAPI ModifyMenuW( HMENU hMenu, UINT pos, UINT flags,
3694                              UINT id, LPCWSTR str )
3695 {
3696     BOOL ret;
3697
3698     if (IS_STRING_ITEM(flags) && str)
3699     {
3700         LPSTR newstr = HEAP_strdupWtoA( GetProcessHeap(), 0, str );
3701         ret = ModifyMenuA( hMenu, pos, flags, id, newstr );
3702         HeapFree( GetProcessHeap(), 0, newstr );
3703         return ret;
3704     }
3705     else return ModifyMenuA( hMenu, pos, flags, id, (LPCSTR)str );
3706 }
3707
3708
3709 /**********************************************************************
3710  *         CreatePopupMenu16    (USER.415)
3711  */
3712 HMENU16 WINAPI CreatePopupMenu16(void)
3713 {
3714     return CreatePopupMenu();
3715 }
3716
3717
3718 /**********************************************************************
3719  *         CreatePopupMenu32    (USER32.82)
3720  */
3721 HMENU WINAPI CreatePopupMenu(void)
3722 {
3723     HMENU hmenu;
3724     POPUPMENU *menu;
3725
3726     if (!(hmenu = CreateMenu())) return 0;
3727     menu = (POPUPMENU *) USER_HEAP_LIN_ADDR( hmenu );
3728     menu->wFlags |= MF_POPUP;
3729     menu->bTimeToHide = FALSE;
3730     return hmenu;
3731 }
3732
3733
3734 /**********************************************************************
3735  *         GetMenuCheckMarkDimensions    (USER.417) (USER32.258)
3736  */
3737 DWORD WINAPI GetMenuCheckMarkDimensions(void)
3738 {
3739     return MAKELONG( check_bitmap_width, check_bitmap_height );
3740 }
3741
3742
3743 /**********************************************************************
3744  *         SetMenuItemBitmaps16    (USER.418)
3745  */
3746 BOOL16 WINAPI SetMenuItemBitmaps16( HMENU16 hMenu, UINT16 nPos, UINT16 wFlags,
3747                                     HBITMAP16 hNewUnCheck, HBITMAP16 hNewCheck)
3748 {
3749     return SetMenuItemBitmaps( hMenu, nPos, wFlags, hNewUnCheck, hNewCheck );
3750 }
3751
3752
3753 /**********************************************************************
3754  *         SetMenuItemBitmaps32    (USER32.490)
3755  */
3756 BOOL WINAPI SetMenuItemBitmaps( HMENU hMenu, UINT nPos, UINT wFlags,
3757                                     HBITMAP hNewUnCheck, HBITMAP hNewCheck)
3758 {
3759     MENUITEM *item;
3760     TRACE("(%04x, %04x, %04x, %04x, %04x)\n",
3761                  hMenu, nPos, wFlags, hNewCheck, hNewUnCheck);
3762     if (!(item = MENU_FindItem( &hMenu, &nPos, wFlags ))) return FALSE;
3763
3764     if (!hNewCheck && !hNewUnCheck)
3765     {
3766         item->fState &= ~MF_USECHECKBITMAPS;
3767     }
3768     else  /* Install new bitmaps */
3769     {
3770         item->hCheckBit = hNewCheck;
3771         item->hUnCheckBit = hNewUnCheck;
3772         item->fState |= MF_USECHECKBITMAPS;
3773     }
3774     return TRUE;
3775 }
3776
3777
3778 /**********************************************************************
3779  *         CreateMenu16    (USER.151)
3780  */
3781 HMENU16 WINAPI CreateMenu16(void)
3782 {
3783     return CreateMenu();
3784 }
3785
3786
3787 /**********************************************************************
3788  *         CreateMenu    (USER32.81)
3789  */
3790 HMENU WINAPI CreateMenu(void)
3791 {
3792     HMENU hMenu;
3793     LPPOPUPMENU menu;
3794     if (!(hMenu = USER_HEAP_ALLOC( sizeof(POPUPMENU) ))) return 0;
3795     menu = (LPPOPUPMENU) USER_HEAP_LIN_ADDR(hMenu);
3796
3797     ZeroMemory(menu, sizeof(POPUPMENU));
3798     menu->wMagic = MENU_MAGIC;
3799     menu->FocusedItem = NO_SELECTED_ITEM;
3800     menu->bTimeToHide = FALSE;
3801
3802     TRACE("return %04x\n", hMenu );
3803
3804     return hMenu;
3805 }
3806
3807
3808 /**********************************************************************
3809  *         DestroyMenu16    (USER.152)
3810  */
3811 BOOL16 WINAPI DestroyMenu16( HMENU16 hMenu )
3812 {
3813     return DestroyMenu( hMenu );
3814 }
3815
3816
3817 /**********************************************************************
3818  *         DestroyMenu32    (USER32.134)
3819  */
3820 BOOL WINAPI DestroyMenu( HMENU hMenu )
3821 {
3822     TRACE("(%04x)\n", hMenu);
3823
3824     /* Silently ignore attempts to destroy default system popup */
3825
3826     if (hMenu && hMenu != MENU_DefSysPopup)
3827     {
3828         LPPOPUPMENU lppop = (LPPOPUPMENU) USER_HEAP_LIN_ADDR(hMenu);
3829         WND *pTPWnd = MENU_GetTopPopupWnd();
3830
3831         if( pTPWnd && (hMenu == *(HMENU*)pTPWnd->wExtra) )
3832           *(UINT*)pTPWnd->wExtra = 0;
3833
3834         if (!IS_A_MENU(lppop)) lppop = NULL;
3835         if ( lppop )
3836         {
3837             lppop->wMagic = 0;  /* Mark it as destroyed */
3838
3839             if ((lppop->wFlags & MF_POPUP) && lppop->hWnd &&
3840                 (!pTPWnd || (lppop->hWnd != pTPWnd->hwndSelf)))
3841                 DestroyWindow( lppop->hWnd );
3842
3843             if (lppop->items)   /* recursively destroy submenus */
3844             {
3845                 int i;
3846                 MENUITEM *item = lppop->items;
3847                 for (i = lppop->nItems; i > 0; i--, item++)
3848                 {
3849                     if (item->fType & MF_POPUP) DestroyMenu(item->hSubMenu);
3850                     MENU_FreeItemData( item );
3851                 }
3852                 HeapFree( SystemHeap, 0, lppop->items );
3853             }
3854             USER_HEAP_FREE( hMenu );
3855             MENU_ReleaseTopPopupWnd();
3856         }
3857         else
3858         {
3859             MENU_ReleaseTopPopupWnd();
3860             return FALSE;
3861         }
3862     }
3863     return (hMenu != MENU_DefSysPopup);
3864 }
3865
3866
3867 /**********************************************************************
3868  *         GetSystemMenu16    (USER.156)
3869  */
3870 HMENU16 WINAPI GetSystemMenu16( HWND16 hWnd, BOOL16 bRevert )
3871 {
3872     return GetSystemMenu( hWnd, bRevert );
3873 }
3874
3875
3876 /**********************************************************************
3877  *         GetSystemMenu32    (USER32.291)
3878  */
3879 HMENU WINAPI GetSystemMenu( HWND hWnd, BOOL bRevert )
3880 {
3881     WND *wndPtr = WIN_FindWndPtr( hWnd );
3882     HMENU retvalue = 0;
3883
3884     if (wndPtr)
3885     {
3886         if( wndPtr->hSysMenu )
3887         {
3888             if( bRevert )
3889             {
3890                 DestroyMenu(wndPtr->hSysMenu);
3891                 wndPtr->hSysMenu = 0;
3892             }
3893             else
3894             {
3895                 POPUPMENU *menu = MENU_GetMenu( wndPtr->hSysMenu );
3896                 if( menu )
3897                 {
3898                    if( menu->nItems > 0 && menu->items[0].hSubMenu == MENU_DefSysPopup )
3899                       menu->items[0].hSubMenu = MENU_CopySysPopup();
3900                 }
3901                 else
3902                 {
3903                    WARN("Current sys-menu (%04x) of wnd %04x is broken\n",
3904                         wndPtr->hSysMenu, hWnd);
3905                    wndPtr->hSysMenu = 0;
3906                 }
3907             }
3908         }
3909
3910         if(!wndPtr->hSysMenu && (wndPtr->dwStyle & WS_SYSMENU) )
3911             wndPtr->hSysMenu = MENU_GetSysMenu( hWnd, (HMENU)(-1) );
3912
3913         if( wndPtr->hSysMenu )
3914         {
3915             POPUPMENU *menu;
3916             retvalue = GetSubMenu16(wndPtr->hSysMenu, 0);
3917
3918             /* Store the dummy sysmenu handle to facilitate the refresh */
3919             /* of the close button if the SC_CLOSE item change */
3920             menu = MENU_GetMenu(retvalue);
3921             if ( menu )
3922                menu->hSysMenuOwner = wndPtr->hSysMenu;
3923         }
3924         WIN_ReleaseWndPtr(wndPtr);
3925     }
3926     return retvalue;
3927 }
3928
3929
3930 /*******************************************************************
3931  *         SetSystemMenu16    (USER.280)
3932  */
3933 BOOL16 WINAPI SetSystemMenu16( HWND16 hwnd, HMENU16 hMenu )
3934 {
3935     return SetSystemMenu( hwnd, hMenu );
3936 }
3937
3938
3939 /*******************************************************************
3940  *         SetSystemMenu32    (USER32.508)
3941  */
3942 BOOL WINAPI SetSystemMenu( HWND hwnd, HMENU hMenu )
3943 {
3944     WND *wndPtr = WIN_FindWndPtr(hwnd);
3945
3946     if (wndPtr)
3947     {
3948         if (wndPtr->hSysMenu) DestroyMenu( wndPtr->hSysMenu );
3949         wndPtr->hSysMenu = MENU_GetSysMenu( hwnd, hMenu );
3950         WIN_ReleaseWndPtr(wndPtr);
3951         return TRUE;
3952     }
3953     return FALSE;
3954 }
3955
3956
3957 /**********************************************************************
3958  *         GetMenu16    (USER.157)
3959  */
3960 HMENU16 WINAPI GetMenu16( HWND16 hWnd )
3961 {
3962     return (HMENU16)GetMenu(hWnd);
3963 }
3964
3965
3966 /**********************************************************************
3967  *         GetMenu32    (USER32.257)
3968  */
3969 HMENU WINAPI GetMenu( HWND hWnd )
3970 {
3971     HMENU retvalue;
3972     WND * wndPtr = WIN_FindWndPtr(hWnd);
3973     if (wndPtr && !(wndPtr->dwStyle & WS_CHILD))
3974     {
3975         retvalue = (HMENU)wndPtr->wIDmenu;
3976         goto END;
3977     }
3978     retvalue = 0;
3979 END:
3980     WIN_ReleaseWndPtr(wndPtr);
3981     return retvalue;
3982 }
3983
3984
3985 /**********************************************************************
3986  *         SetMenu16    (USER.158)
3987  */
3988 BOOL16 WINAPI SetMenu16( HWND16 hWnd, HMENU16 hMenu )
3989 {
3990     return SetMenu( hWnd, hMenu );
3991 }
3992
3993
3994 /**********************************************************************
3995  *         SetMenu32    (USER32.487)
3996  */
3997 BOOL WINAPI SetMenu( HWND hWnd, HMENU hMenu )
3998 {
3999     WND * wndPtr = WIN_FindWndPtr(hWnd);
4000
4001     TRACE("(%04x, %04x);\n", hWnd, hMenu);
4002
4003     if (hMenu && !IsMenu(hMenu))
4004     {
4005         WARN("hMenu is not a menu handle\n");
4006         return FALSE;
4007     }
4008
4009
4010     if (wndPtr && !(wndPtr->dwStyle & WS_CHILD))
4011     {
4012         if (GetCapture() == hWnd) ReleaseCapture();
4013
4014         wndPtr->wIDmenu = (UINT)hMenu;
4015         if (hMenu != 0)
4016         {
4017             LPPOPUPMENU lpmenu;
4018
4019             if (!(lpmenu = MENU_GetMenu(hMenu)))
4020             {
4021                 WIN_ReleaseWndPtr(wndPtr);
4022                 return FALSE;
4023             }
4024             lpmenu->hWnd = hWnd;
4025             lpmenu->wFlags &= ~MF_POPUP;  /* Can't be a popup */
4026             lpmenu->Height = 0;  /* Make sure we recalculate the size */
4027         }
4028         if (IsWindowVisible(hWnd))
4029             SetWindowPos( hWnd, 0, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE |
4030                         SWP_NOACTIVATE | SWP_NOZORDER | SWP_FRAMECHANGED );
4031         WIN_ReleaseWndPtr(wndPtr);
4032         return TRUE;
4033     }
4034     WIN_ReleaseWndPtr(wndPtr);
4035     return FALSE;
4036 }
4037
4038
4039
4040 /**********************************************************************
4041  *         GetSubMenu16    (USER.159)
4042  */
4043 HMENU16 WINAPI GetSubMenu16( HMENU16 hMenu, INT16 nPos )
4044 {
4045     return GetSubMenu( hMenu, nPos );
4046 }
4047
4048
4049 /**********************************************************************
4050  *         GetSubMenu32    (USER32.288)
4051  */
4052 HMENU WINAPI GetSubMenu( HMENU hMenu, INT nPos )
4053 {
4054     MENUITEM * lpmi;
4055
4056     if (!(lpmi = MENU_FindItem(&hMenu,&nPos,MF_BYPOSITION))) return 0;
4057     if (!(lpmi->fType & MF_POPUP)) return 0;
4058     return lpmi->hSubMenu;
4059 }
4060
4061
4062 /**********************************************************************
4063  *         DrawMenuBar16    (USER.160)
4064  */
4065 void WINAPI DrawMenuBar16( HWND16 hWnd )
4066 {
4067     DrawMenuBar( hWnd );
4068 }
4069
4070
4071 /**********************************************************************
4072  *         DrawMenuBar    (USER32.161)
4073  */
4074 BOOL WINAPI DrawMenuBar( HWND hWnd )
4075 {
4076     LPPOPUPMENU lppop;
4077     WND *wndPtr = WIN_FindWndPtr(hWnd);
4078     if (wndPtr && !(wndPtr->dwStyle & WS_CHILD) && wndPtr->wIDmenu)
4079     {
4080         lppop = MENU_GetMenu((HMENU16)wndPtr->wIDmenu);
4081         if (lppop == NULL)
4082         {
4083             WIN_ReleaseWndPtr(wndPtr);
4084             return FALSE;
4085         }
4086
4087         lppop->Height = 0; /* Make sure we call MENU_MenuBarCalcSize */
4088         lppop->hwndOwner = hWnd;
4089         SetWindowPos( hWnd, 0, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE |
4090                         SWP_NOACTIVATE | SWP_NOZORDER | SWP_FRAMECHANGED );
4091         WIN_ReleaseWndPtr(wndPtr);
4092         return TRUE;
4093     }
4094     WIN_ReleaseWndPtr(wndPtr);
4095     return FALSE;
4096 }
4097
4098
4099 /***********************************************************************
4100  *           EndMenu   (USER.187) (USER32.175)
4101  */
4102 void WINAPI EndMenu(void)
4103 {
4104     /*
4105      * FIXME: NOT ENOUGH! This has to cancel menu tracking right away.
4106      */
4107
4108     fEndMenu = TRUE;
4109 }
4110
4111
4112 /***********************************************************************
4113  *           LookupMenuHandle   (USER.217)
4114  */
4115 HMENU16 WINAPI LookupMenuHandle16( HMENU16 hmenu, INT16 id )
4116 {
4117     HMENU hmenu32 = hmenu;
4118     UINT id32 = id;
4119     if (!MENU_FindItem( &hmenu32, &id32, MF_BYCOMMAND )) return 0;
4120     else return hmenu32;
4121 }
4122
4123
4124 /**********************************************************************
4125  *          LoadMenu16    (USER.150)
4126  */
4127 HMENU16 WINAPI LoadMenu16( HINSTANCE16 instance, SEGPTR name )
4128 {
4129     HRSRC16 hRsrc;
4130     HGLOBAL16 handle;
4131     HMENU16 hMenu;
4132
4133     if (HIWORD(name))
4134     {
4135         char *str = (char *)PTR_SEG_TO_LIN( name );
4136         TRACE("(%04x,'%s')\n", instance, str );
4137         if (str[0] == '#') name = (SEGPTR)atoi( str + 1 );
4138     }
4139     else
4140         TRACE("(%04x,%04x)\n",instance,LOWORD(name));
4141
4142     if (!name) return 0;
4143
4144     /* check for Win32 module */
4145     if (HIWORD(instance))
4146         return LoadMenuA(instance,PTR_SEG_TO_LIN(name));
4147     instance = GetExePtr( instance );
4148
4149     if (!(hRsrc = FindResource16( instance, name, RT_MENU16 ))) return 0;
4150     if (!(handle = LoadResource16( instance, hRsrc ))) return 0;
4151     hMenu = LoadMenuIndirect16(LockResource16(handle));
4152     FreeResource16( handle );
4153     return hMenu;
4154 }
4155
4156
4157 /*****************************************************************
4158  *        LoadMenu32A   (USER32.370)
4159  */
4160 HMENU WINAPI LoadMenuA( HINSTANCE instance, LPCSTR name )
4161 {
4162     HRSRC hrsrc = FindResourceA( instance, name, RT_MENUA );
4163     if (!hrsrc) return 0;
4164     return LoadMenuIndirectA( (LPCVOID)LoadResource( instance, hrsrc ));
4165 }
4166
4167
4168 /*****************************************************************
4169  *        LoadMenu32W   (USER32.373)
4170  */
4171 HMENU WINAPI LoadMenuW( HINSTANCE instance, LPCWSTR name )
4172 {
4173     HRSRC hrsrc = FindResourceW( instance, name, RT_MENUW );
4174     if (!hrsrc) return 0;
4175     return LoadMenuIndirectW( (LPCVOID)LoadResource( instance, hrsrc ));
4176 }
4177
4178
4179 /**********************************************************************
4180  *          LoadMenuIndirect16    (USER.220)
4181  */
4182 HMENU16 WINAPI LoadMenuIndirect16( LPCVOID template )
4183 {
4184     HMENU16 hMenu;
4185     WORD version, offset;
4186     LPCSTR p = (LPCSTR)template;
4187
4188     TRACE("(%p)\n", template );
4189     version = GET_WORD(p);
4190     p += sizeof(WORD);
4191     if (version)
4192     {
4193         WARN("version must be 0 for Win16\n" );
4194         return 0;
4195     }
4196     offset = GET_WORD(p);
4197     p += sizeof(WORD) + offset;
4198     if (!(hMenu = CreateMenu())) return 0;
4199     if (!MENU_ParseResource( p, hMenu, FALSE ))
4200     {
4201         DestroyMenu( hMenu );
4202         return 0;
4203     }
4204     return hMenu;
4205 }
4206
4207
4208 /**********************************************************************
4209  *          LoadMenuIndirect32A    (USER32.371)
4210  */
4211 HMENU WINAPI LoadMenuIndirectA( LPCVOID template )
4212 {
4213     HMENU16 hMenu;
4214     WORD version, offset;
4215     LPCSTR p = (LPCSTR)template;
4216
4217     TRACE("%p\n", template );
4218     version = GET_WORD(p);
4219     p += sizeof(WORD);
4220     switch (version)
4221       {
4222       case 0:
4223         offset = GET_WORD(p);
4224         p += sizeof(WORD) + offset;
4225         if (!(hMenu = CreateMenu())) return 0;
4226         if (!MENU_ParseResource( p, hMenu, TRUE ))
4227           {
4228             DestroyMenu( hMenu );
4229             return 0;
4230           }
4231         return hMenu;
4232       case 1:
4233         offset = GET_WORD(p);
4234         p += sizeof(WORD) + offset;
4235         if (!(hMenu = CreateMenu())) return 0;
4236         if (!MENUEX_ParseResource( p, hMenu))
4237           {
4238             DestroyMenu( hMenu );
4239             return 0;
4240           }
4241         return hMenu;
4242       default:
4243         ERR("version %d not supported.\n", version);
4244         return 0;
4245       }
4246 }
4247
4248
4249 /**********************************************************************
4250  *          LoadMenuIndirect32W    (USER32.372)
4251  */
4252 HMENU WINAPI LoadMenuIndirectW( LPCVOID template )
4253 {
4254     /* FIXME: is there anything different between A and W? */
4255     return LoadMenuIndirectA( template );
4256 }
4257
4258
4259 /**********************************************************************
4260  *              IsMenu16    (USER.358)
4261  */
4262 BOOL16 WINAPI IsMenu16( HMENU16 hmenu )
4263 {
4264     LPPOPUPMENU menu = (LPPOPUPMENU) USER_HEAP_LIN_ADDR(hmenu);
4265     return IS_A_MENU(menu);
4266 }
4267
4268
4269 /**********************************************************************
4270  *              IsMenu32    (USER32.346)
4271  */
4272 BOOL WINAPI IsMenu(HMENU hmenu)
4273 {
4274     LPPOPUPMENU menu = (LPPOPUPMENU) USER_HEAP_LIN_ADDR(hmenu);
4275     return IS_A_MENU(menu);
4276 }
4277
4278 /**********************************************************************
4279  *              GetMenuItemInfo32_common
4280  */
4281
4282 static BOOL GetMenuItemInfo_common ( HMENU hmenu, UINT item, BOOL bypos,
4283                                         LPMENUITEMINFOA lpmii, BOOL unicode)
4284 {
4285     MENUITEM *menu = MENU_FindItem (&hmenu, &item, bypos? MF_BYPOSITION : 0);
4286
4287     debug_print_menuitem("GetMenuItemInfo32_common: ", menu, "");
4288
4289     if (!menu)
4290         return FALSE;
4291
4292     if (lpmii->fMask & MIIM_TYPE) {
4293         lpmii->fType = menu->fType;
4294         switch (MENU_ITEM_TYPE(menu->fType)) {
4295                 case MF_STRING:
4296                     if (menu->text && lpmii->dwTypeData && lpmii->cch) {
4297                         if (unicode) {
4298                             lstrcpynAtoW((LPWSTR) lpmii->dwTypeData, menu->text, lpmii->cch);
4299                             lpmii->cch = lstrlenW((LPWSTR)menu->text);
4300                         } else {
4301                             lstrcpynA(lpmii->dwTypeData, menu->text, lpmii->cch);
4302                             lpmii->cch = lstrlenA(menu->text);
4303                         }
4304                     }
4305                     break;
4306                 case MF_OWNERDRAW:
4307                 case MF_BITMAP:
4308                     lpmii->dwTypeData = menu->text;
4309                     /* fall through */
4310                 default:
4311                     lpmii->cch = 0;
4312         }
4313     }
4314
4315     if (lpmii->fMask & MIIM_STRING) {
4316         if (unicode) {
4317             lstrcpynAtoW((LPWSTR) lpmii->dwTypeData, menu->text, lpmii->cch);
4318             lpmii->cch = lstrlenW((LPWSTR)menu->text);
4319         } else {
4320             lstrcpynA(lpmii->dwTypeData, menu->text, lpmii->cch);
4321             lpmii->cch = lstrlenA(menu->text);
4322         }
4323     }
4324
4325     if (lpmii->fMask & MIIM_FTYPE)
4326         lpmii->fType = menu->fType;
4327
4328     if (lpmii->fMask & MIIM_BITMAP)
4329         lpmii->hbmpItem = menu->hbmpItem;
4330
4331     if (lpmii->fMask & MIIM_STATE)
4332         lpmii->fState = menu->fState;
4333
4334     if (lpmii->fMask & MIIM_ID)
4335         lpmii->wID = menu->wID;
4336
4337     if (lpmii->fMask & MIIM_SUBMENU)
4338         lpmii->hSubMenu = menu->hSubMenu;
4339
4340     if (lpmii->fMask & MIIM_CHECKMARKS) {
4341         lpmii->hbmpChecked = menu->hCheckBit;
4342         lpmii->hbmpUnchecked = menu->hUnCheckBit;
4343     }
4344     if (lpmii->fMask & MIIM_DATA)
4345         lpmii->dwItemData = menu->dwItemData;
4346
4347   return TRUE;
4348 }
4349
4350 /**********************************************************************
4351  *              GetMenuItemInfoA    (USER32.264)
4352  */
4353 BOOL WINAPI GetMenuItemInfoA( HMENU hmenu, UINT item, BOOL bypos,
4354                                   LPMENUITEMINFOA lpmii)
4355 {
4356     return GetMenuItemInfo_common (hmenu, item, bypos, lpmii, FALSE);
4357 }
4358
4359 /**********************************************************************
4360  *              GetMenuItemInfoW    (USER32.265)
4361  */
4362 BOOL WINAPI GetMenuItemInfoW( HMENU hmenu, UINT item, BOOL bypos,
4363                                   LPMENUITEMINFOW lpmii)
4364 {
4365     return GetMenuItemInfo_common (hmenu, item, bypos,
4366                                      (LPMENUITEMINFOA)lpmii, TRUE);
4367 }
4368
4369 /**********************************************************************
4370  *              SetMenuItemInfo32_common
4371  */
4372
4373 static BOOL SetMenuItemInfo_common(MENUITEM * menu,
4374                                        const MENUITEMINFOA *lpmii,
4375                                        BOOL unicode)
4376 {
4377     if (!menu) return FALSE;
4378
4379     if (lpmii->fMask & MIIM_TYPE ) {
4380         /* Get rid of old string.  */
4381         if ( IS_STRING_ITEM(menu->fType) && menu->text) {
4382             HeapFree(SystemHeap, 0, menu->text);
4383             menu->text = NULL;
4384         }
4385
4386         /* make only MENU_ITEM_TYPE bits in menu->fType equal lpmii->fType */
4387         menu->fType &= ~MENU_ITEM_TYPE(menu->fType);
4388         menu->fType |= MENU_ITEM_TYPE(lpmii->fType);
4389
4390         menu->text = lpmii->dwTypeData;
4391
4392         if (IS_STRING_ITEM(menu->fType) && menu->text) {
4393             if (unicode)
4394                 menu->text = HEAP_strdupWtoA(SystemHeap, 0,  (LPWSTR) lpmii->dwTypeData);
4395             else
4396                 menu->text = HEAP_strdupA(SystemHeap, 0, lpmii->dwTypeData);
4397         }
4398     }
4399
4400     if (lpmii->fMask & MIIM_FTYPE ) {
4401         /* free the string when the type is changing */
4402         if ( (!IS_STRING_ITEM(lpmii->fType)) && IS_STRING_ITEM(menu->fType) && menu->text) {
4403             HeapFree(SystemHeap, 0, menu->text);
4404             menu->text = NULL;
4405         }
4406         menu->fType &= ~MENU_ITEM_TYPE(menu->fType);
4407         menu->fType |= MENU_ITEM_TYPE(lpmii->fType);
4408     }
4409
4410     if (lpmii->fMask & MIIM_STRING ) {
4411         /* free the string when used */
4412         if ( IS_STRING_ITEM(menu->fType) && menu->text) {
4413             HeapFree(SystemHeap, 0, menu->text);
4414             if (unicode)
4415                 menu->text = HEAP_strdupWtoA(SystemHeap, 0,  (LPWSTR) lpmii->dwTypeData);
4416             else
4417                 menu->text = HEAP_strdupA(SystemHeap, 0, lpmii->dwTypeData);
4418         }
4419     }
4420
4421     if (lpmii->fMask & MIIM_STATE)
4422     {
4423         /* fixme: MFS_DEFAULT do we have to reset the other menu items? */
4424         menu->fState = lpmii->fState;
4425     }
4426
4427     if (lpmii->fMask & MIIM_ID)
4428         menu->wID = lpmii->wID;
4429
4430     if (lpmii->fMask & MIIM_SUBMENU) {
4431         menu->hSubMenu = lpmii->hSubMenu;
4432         if (menu->hSubMenu) {
4433             POPUPMENU *subMenu = MENU_GetMenu((UINT16)menu->hSubMenu);
4434             if (subMenu) {
4435                 subMenu->wFlags |= MF_POPUP;
4436                 menu->fType |= MF_POPUP;
4437             }
4438             else
4439                 /* FIXME: Return an error ? */
4440                 menu->fType &= ~MF_POPUP;
4441         }
4442         else
4443             menu->fType &= ~MF_POPUP;
4444     }
4445
4446     if (lpmii->fMask & MIIM_CHECKMARKS)
4447     {
4448         menu->hCheckBit = lpmii->hbmpChecked;
4449         menu->hUnCheckBit = lpmii->hbmpUnchecked;
4450     }
4451     if (lpmii->fMask & MIIM_DATA)
4452         menu->dwItemData = lpmii->dwItemData;
4453
4454     debug_print_menuitem("SetMenuItemInfo32_common: ", menu, "");
4455     return TRUE;
4456 }
4457
4458 /**********************************************************************
4459  *              SetMenuItemInfo32A    (USER32.491)
4460  */
4461 BOOL WINAPI SetMenuItemInfoA(HMENU hmenu, UINT item, BOOL bypos,
4462                                  const MENUITEMINFOA *lpmii)
4463 {
4464     return SetMenuItemInfo_common(MENU_FindItem(&hmenu, &item, bypos? MF_BYPOSITION : 0),
4465                                     lpmii, FALSE);
4466 }
4467
4468 /**********************************************************************
4469  *              SetMenuItemInfo32W    (USER32.492)
4470  */
4471 BOOL WINAPI SetMenuItemInfoW(HMENU hmenu, UINT item, BOOL bypos,
4472                                  const MENUITEMINFOW *lpmii)
4473 {
4474     return SetMenuItemInfo_common(MENU_FindItem(&hmenu, &item, bypos? MF_BYPOSITION : 0),
4475                                     (const MENUITEMINFOA*)lpmii, TRUE);
4476 }
4477
4478 /**********************************************************************
4479  *              SetMenuDefaultItem    (USER32.489)
4480  *
4481  */
4482 BOOL WINAPI SetMenuDefaultItem(HMENU hmenu, UINT uItem, UINT bypos)
4483 {
4484         UINT i;
4485         POPUPMENU *menu;
4486         MENUITEM *item;
4487
4488         TRACE("(0x%x,%d,%d)\n", hmenu, uItem, bypos);
4489
4490         if (!(menu = MENU_GetMenu(hmenu))) return FALSE;
4491
4492         /* reset all default-item flags */
4493         item = menu->items;
4494         for (i = 0; i < menu->nItems; i++, item++)
4495         {
4496             item->fState &= ~MFS_DEFAULT;
4497         }
4498
4499         /* no default item */
4500         if ( -1 == uItem)
4501         {
4502             return TRUE;
4503         }
4504
4505         item = menu->items;
4506         if ( bypos )
4507         {
4508             if ( uItem >= menu->nItems ) return FALSE;
4509             item[uItem].fState |= MFS_DEFAULT;
4510             return TRUE;
4511         }
4512         else
4513         {
4514             for (i = 0; i < menu->nItems; i++, item++)
4515             {
4516                 if (item->wID == uItem)
4517                 {
4518                      item->fState |= MFS_DEFAULT;
4519                      return TRUE;
4520                 }
4521             }
4522
4523         }
4524         return FALSE;
4525 }
4526
4527 /**********************************************************************
4528  *              GetMenuDefaultItem    (USER32.260)
4529  */
4530 UINT WINAPI GetMenuDefaultItem(HMENU hmenu, UINT bypos, UINT flags)
4531 {
4532         POPUPMENU *menu;
4533         MENUITEM * item;
4534         UINT i = 0;
4535
4536         TRACE("(0x%x,%d,%d)\n", hmenu, bypos, flags);
4537
4538         if (!(menu = MENU_GetMenu(hmenu))) return -1;
4539
4540         /* find default item */
4541         item = menu->items;
4542
4543         /* empty menu */
4544         if (! item) return -1;
4545
4546         while ( !( item->fState & MFS_DEFAULT ) )
4547         {
4548             i++; item++;
4549             if  (i >= menu->nItems ) return -1;
4550         }
4551
4552         /* default: don't return disabled items */
4553         if ( (!(GMDI_USEDISABLED & flags)) && (item->fState & MFS_DISABLED )) return -1;
4554
4555         /* search rekursiv when needed */
4556         if ( (item->fType & MF_POPUP) &&  (flags & GMDI_GOINTOPOPUPS) )
4557         {
4558             UINT ret;
4559             ret = GetMenuDefaultItem( item->hSubMenu, bypos, flags );
4560             if ( -1 != ret ) return ret;
4561
4562             /* when item not found in submenu, return the popup item */
4563         }
4564         return ( bypos ) ? i : item->wID;
4565
4566 }
4567
4568 /*******************************************************************
4569  *              InsertMenuItem16   (USER.441)
4570  *
4571  * FIXME: untested
4572  */
4573 BOOL16 WINAPI InsertMenuItem16( HMENU16 hmenu, UINT16 pos, BOOL16 byposition,
4574                                 const MENUITEMINFO16 *mii )
4575 {
4576     MENUITEMINFOA miia;
4577
4578     miia.cbSize        = sizeof(miia);
4579     miia.fMask         = mii->fMask;
4580     miia.dwTypeData    = mii->dwTypeData;
4581     miia.fType         = mii->fType;
4582     miia.fState        = mii->fState;
4583     miia.wID           = mii->wID;
4584     miia.hSubMenu      = mii->hSubMenu;
4585     miia.hbmpChecked   = mii->hbmpChecked;
4586     miia.hbmpUnchecked = mii->hbmpUnchecked;
4587     miia.dwItemData    = mii->dwItemData;
4588     miia.cch           = mii->cch;
4589     if (IS_STRING_ITEM(miia.fType))
4590         miia.dwTypeData = PTR_SEG_TO_LIN(miia.dwTypeData);
4591     return InsertMenuItemA( hmenu, pos, byposition, &miia );
4592 }
4593
4594
4595 /**********************************************************************
4596  *              InsertMenuItem32A    (USER32.323)
4597  */
4598 BOOL WINAPI InsertMenuItemA(HMENU hMenu, UINT uItem, BOOL bypos,
4599                                 const MENUITEMINFOA *lpmii)
4600 {
4601     MENUITEM *item = MENU_InsertItem(hMenu, uItem, bypos ? MF_BYPOSITION : 0 );
4602     return SetMenuItemInfo_common(item, lpmii, FALSE);
4603 }
4604
4605
4606 /**********************************************************************
4607  *              InsertMenuItem32W    (USER32.324)
4608  */
4609 BOOL WINAPI InsertMenuItemW(HMENU hMenu, UINT uItem, BOOL bypos,
4610                                 const MENUITEMINFOW *lpmii)
4611 {
4612     MENUITEM *item = MENU_InsertItem(hMenu, uItem, bypos ? MF_BYPOSITION : 0 );
4613     return SetMenuItemInfo_common(item, (const MENUITEMINFOA*)lpmii, TRUE);
4614 }
4615
4616 /**********************************************************************
4617  *              CheckMenuRadioItem32    (USER32.47)
4618  */
4619
4620 BOOL WINAPI CheckMenuRadioItem(HMENU hMenu,
4621                                    UINT first, UINT last, UINT check,
4622                                    UINT bypos)
4623 {
4624      MENUITEM *mifirst, *milast, *micheck;
4625      HMENU mfirst = hMenu, mlast = hMenu, mcheck = hMenu;
4626
4627      TRACE("ox%x: %d-%d, check %d, bypos=%d\n",
4628                   hMenu, first, last, check, bypos);
4629
4630      mifirst = MENU_FindItem (&mfirst, &first, bypos);
4631      milast = MENU_FindItem (&mlast, &last, bypos);
4632      micheck = MENU_FindItem (&mcheck, &check, bypos);
4633
4634      if (mifirst == NULL || milast == NULL || micheck == NULL ||
4635          mifirst > milast || mfirst != mlast || mfirst != mcheck ||
4636          micheck > milast || micheck < mifirst)
4637           return FALSE;
4638
4639      while (mifirst <= milast)
4640      {
4641           if (mifirst == micheck)
4642           {
4643                mifirst->fType |= MFT_RADIOCHECK;
4644                mifirst->fState |= MFS_CHECKED;
4645           } else {
4646                mifirst->fType &= ~MFT_RADIOCHECK;
4647                mifirst->fState &= ~MFS_CHECKED;
4648           }
4649           mifirst++;
4650      }
4651
4652      return TRUE;
4653 }
4654
4655 /**********************************************************************
4656  *              CheckMenuRadioItem16    (not a Windows API)
4657  */
4658
4659 BOOL16 WINAPI CheckMenuRadioItem16(HMENU16 hMenu,
4660                                    UINT16 first, UINT16 last, UINT16 check,
4661                                    BOOL16 bypos)
4662 {
4663      return CheckMenuRadioItem (hMenu, first, last, check, bypos);
4664 }
4665
4666 /**********************************************************************
4667  *              GetMenuItemRect32    (USER32.266)
4668  *
4669  *      ATTENTION: Here, the returned values in rect are the screen
4670  *                 coordinates of the item just like if the menu was
4671  *                 always on the upper left side of the application.
4672  *
4673  */
4674 BOOL WINAPI GetMenuItemRect (HWND hwnd, HMENU hMenu, UINT uItem,
4675                                  LPRECT rect)
4676 {
4677      POPUPMENU *itemMenu;
4678      MENUITEM *item;
4679      HWND referenceHwnd;
4680
4681      TRACE("(0x%x,0x%x,%d,%p)\n", hwnd, hMenu, uItem, rect);
4682
4683      item = MENU_FindItem (&hMenu, &uItem, MF_BYPOSITION);
4684      referenceHwnd = hwnd;
4685
4686      if(!hwnd)
4687      {
4688          itemMenu = MENU_GetMenu(hMenu);
4689          if (itemMenu == NULL)
4690              return FALSE;
4691
4692          if(itemMenu->hWnd == 0)
4693              return FALSE;
4694          referenceHwnd = itemMenu->hWnd;
4695      }
4696
4697      if ((rect == NULL) || (item == NULL))
4698          return FALSE;
4699
4700      *rect = item->rect;
4701
4702      MapWindowPoints(referenceHwnd, 0, (LPPOINT)rect, 2);
4703
4704      return TRUE;
4705 }
4706
4707 /**********************************************************************
4708  *              GetMenuItemRect16    (USER.665)
4709  */
4710
4711 BOOL16 WINAPI GetMenuItemRect16 (HWND16 hwnd, HMENU16 hMenu, UINT16 uItem,
4712                                  LPRECT16 rect)
4713 {
4714      RECT r32;
4715      BOOL res;
4716
4717      if (!rect) return FALSE;
4718      res = GetMenuItemRect (hwnd, hMenu, uItem, &r32);
4719      CONV_RECT32TO16 (&r32, rect);
4720      return res;
4721 }
4722
4723 /**********************************************************************
4724  *              SetMenuInfo
4725  *
4726  * FIXME
4727  *      MIM_APPLYTOSUBMENUS
4728  *      actually use the items to draw the menu
4729  */
4730 BOOL WINAPI SetMenuInfo (HMENU hMenu, LPCMENUINFO lpmi)
4731 {
4732     POPUPMENU *menu;
4733
4734     TRACE("(0x%04x %p)\n", hMenu, lpmi);
4735
4736     if (lpmi && (lpmi->cbSize==sizeof(MENUINFO)) && (menu = MENU_GetMenu(hMenu)))
4737     {
4738
4739         if (lpmi->fMask & MIM_BACKGROUND)
4740             menu->hbrBack = lpmi->hbrBack;
4741
4742         if (lpmi->fMask & MIM_HELPID)
4743             menu->dwContextHelpID = lpmi->dwContextHelpID;
4744
4745         if (lpmi->fMask & MIM_MAXHEIGHT)
4746             menu->cyMax = lpmi->cyMax;
4747
4748         if (lpmi->fMask & MIM_MENUDATA)
4749             menu->dwMenuData = lpmi->dwMenuData;
4750
4751         if (lpmi->fMask & MIM_STYLE)
4752             menu->dwStyle = lpmi->dwStyle;
4753
4754         return TRUE;
4755     }
4756     return FALSE;
4757 }
4758
4759 /**********************************************************************
4760  *              GetMenuInfo
4761  *
4762  *  NOTES
4763  *      win98/NT5.0
4764  *
4765  */
4766 BOOL WINAPI GetMenuInfo (HMENU hMenu, LPMENUINFO lpmi)
4767 {   POPUPMENU *menu;
4768
4769     TRACE("(0x%04x %p)\n", hMenu, lpmi);
4770
4771     if (lpmi && (menu = MENU_GetMenu(hMenu)))
4772     {
4773
4774         if (lpmi->fMask & MIM_BACKGROUND)
4775             lpmi->hbrBack = menu->hbrBack;
4776
4777         if (lpmi->fMask & MIM_HELPID)
4778             lpmi->dwContextHelpID = menu->dwContextHelpID;
4779
4780         if (lpmi->fMask & MIM_MAXHEIGHT)
4781             lpmi->cyMax = menu->cyMax;
4782
4783         if (lpmi->fMask & MIM_MENUDATA)
4784             lpmi->dwMenuData = menu->dwMenuData;
4785
4786         if (lpmi->fMask & MIM_STYLE)
4787             lpmi->dwStyle = menu->dwStyle;
4788
4789         return TRUE;
4790     }
4791     return FALSE;
4792 }
4793
4794 /**********************************************************************
4795  *         SetMenuContextHelpId16    (USER.384)
4796  */
4797 BOOL16 WINAPI SetMenuContextHelpId16( HMENU16 hMenu, DWORD dwContextHelpID)
4798 {
4799         return SetMenuContextHelpId( hMenu, dwContextHelpID );
4800 }
4801
4802
4803 /**********************************************************************
4804  *         SetMenuContextHelpId    (USER32.488)
4805  */
4806 BOOL WINAPI SetMenuContextHelpId( HMENU hMenu, DWORD dwContextHelpID)
4807 {
4808     LPPOPUPMENU menu;
4809
4810     TRACE("(0x%04x 0x%08lx)\n", hMenu, dwContextHelpID);
4811
4812     if ((menu = MENU_GetMenu(hMenu)))
4813     {
4814         menu->dwContextHelpID = dwContextHelpID;
4815         return TRUE;
4816     }
4817     return FALSE;
4818 }
4819
4820 /**********************************************************************
4821  *         GetMenuContextHelpId16    (USER.385)
4822  */
4823 DWORD WINAPI GetMenuContextHelpId16( HMENU16 hMenu )
4824 {
4825         return GetMenuContextHelpId( hMenu );
4826 }
4827
4828 /**********************************************************************
4829  *         GetMenuContextHelpId    (USER32.488)
4830  */
4831 DWORD WINAPI GetMenuContextHelpId( HMENU hMenu )
4832 {
4833     LPPOPUPMENU menu;
4834
4835     TRACE("(0x%04x)\n", hMenu);
4836
4837     if ((menu = MENU_GetMenu(hMenu)))
4838     {
4839         return menu->dwContextHelpID;
4840     }
4841     return 0;
4842 }
4843
4844 /**********************************************************************
4845  *         MenuItemFromPoint    (USER32.387)
4846  */
4847 UINT WINAPI MenuItemFromPoint(HWND hWnd, HMENU hMenu, POINT ptScreen)
4848 {
4849     FIXME("(0x%04x,0x%04x,(%ld,%ld)):stub\n",
4850           hWnd, hMenu, ptScreen.x, ptScreen.y);
4851     return 0;
4852 }