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