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