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