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