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