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