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