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

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