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