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