4 * Copyright 1996 Ulrich Schmid <uschmid@mail.hh.provi.de>
5 * 2002 Sylvain Petreolle <spetreolle@yahoo.fr>
6 * 2002, 2008 Eric Pouech <eric.pouech@wanadoo.fr>
7 * 2004 Ken Belleau <jamez@ivic.qc.ca>
8 * 2008 Kirill K. Smirnov <lich@math.spbu.ru>
10 * This library is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU Lesser General Public
12 * License as published by the Free Software Foundation; either
13 * version 2.1 of the License, or (at your option) any later version.
15 * This library is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 * Lesser General Public License for more details.
20 * You should have received a copy of the GNU Lesser General Public
21 * License along with this library; if not, write to the Free Software
22 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
31 #define NONAMELESSUNION
32 #define NONAMELESSSTRUCT
40 #include "winhelp_res.h"
45 #include "wine/debug.h"
47 WINE_DEFAULT_DEBUG_CHANNEL(winhelp
);
49 WINHELP_GLOBALS Globals
= {3, NULL
, TRUE
, NULL
, NULL
, NULL
, NULL
, NULL
, {{{NULL
,NULL
}},0}, NULL
};
51 #define CTL_ID_BUTTON 0x700
52 #define CTL_ID_TEXT 0x701
55 /***********************************************************************
59 static void WINHELP_InitFonts(HWND hWnd
)
61 WINHELP_WINDOW
*win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
62 LOGFONTW logfontlist
[] = {
63 {-10, 0, 0, 0, 400, 0, 0, 0, DEFAULT_CHARSET
, 0, 0, 0, 32, {'H','e','l','v',0}},
64 {-12, 0, 0, 0, 700, 0, 0, 0, DEFAULT_CHARSET
, 0, 0, 0, 32, {'H','e','l','v',0}},
65 {-12, 0, 0, 0, 700, 0, 0, 0, DEFAULT_CHARSET
, 0, 0, 0, 32, {'H','e','l','v',0}},
66 {-12, 0, 0, 0, 400, 0, 0, 0, DEFAULT_CHARSET
, 0, 0, 0, 32, {'H','e','l','v',0}},
67 {-12, 0, 0, 0, 700, 0, 0, 0, DEFAULT_CHARSET
, 0, 0, 0, 32, {'H','e','l','v',0}},
68 {-10, 0, 0, 0, 700, 0, 0, 0, DEFAULT_CHARSET
, 0, 0, 0, 32, {'H','e','l','v',0}},
69 { -8, 0, 0, 0, 400, 0, 0, 0, DEFAULT_CHARSET
, 0, 0, 0, 32, {'H','e','l','v',0}}};
70 #define FONTS_LEN (sizeof(logfontlist)/sizeof(*logfontlist))
72 static HFONT fonts
[FONTS_LEN
];
75 win
->fonts_len
= FONTS_LEN
;
82 for (i
= 0; i
< FONTS_LEN
; i
++)
84 fonts
[i
] = CreateFontIndirectW(&logfontlist
[i
]);
91 static DWORD CALLBACK
WINHELP_RtfStreamIn(DWORD_PTR cookie
, BYTE
* buff
,
94 struct RtfData
* rd
= (struct RtfData
*)cookie
;
96 if (rd
->where
>= rd
->ptr
) return 1;
97 if (rd
->where
+ cb
> rd
->ptr
)
98 cb
= rd
->ptr
- rd
->where
;
99 memcpy(buff
, rd
->where
, cb
);
105 static void WINHELP_SetupText(HWND hTextWnd
, WINHELP_WINDOW
* win
, ULONG relative
)
107 static const WCHAR emptyW
[1];
108 /* At first clear area - needed by EM_POSFROMCHAR/EM_SETSCROLLPOS */
109 SendMessageW(hTextWnd
, WM_SETTEXT
, 0, (LPARAM
)emptyW
);
110 SendMessageW(hTextWnd
, WM_SETREDRAW
, FALSE
, 0);
111 SendMessageW(hTextWnd
, EM_SETBKGNDCOLOR
, 0, (LPARAM
)win
->info
->sr_color
);
112 /* set word-wrap to window size (undocumented) */
113 SendMessageW(hTextWnd
, EM_SETTARGETDEVICE
, 0, 0);
123 if (HLPFILE_BrowsePage(win
->page
, &rd
, win
->font_scale
, relative
))
126 es
.dwCookie
= (DWORD_PTR
)&rd
;
128 es
.pfnCallback
= WINHELP_RtfStreamIn
;
130 SendMessageW(hTextWnd
, EM_STREAMIN
, SF_RTF
, (LPARAM
)&es
);
131 cp
= rd
.char_pos_rel
;
133 /* FIXME: else leaking potentially the rd.first_link chain */
134 HeapFree(GetProcessHeap(), 0, rd
.data
);
135 SendMessageW(hTextWnd
, EM_POSFROMCHAR
, (WPARAM
)&ptl
, cp
? cp
- 1 : 0);
136 pt
.x
= 0; pt
.y
= ptl
.y
;
137 SendMessageW(hTextWnd
, EM_SETSCROLLPOS
, 0, (LPARAM
)&pt
);
139 SendMessageW(hTextWnd
, WM_SETREDRAW
, TRUE
, 0);
140 RedrawWindow(hTextWnd
, NULL
, NULL
, RDW_FRAME
|RDW_INVALIDATE
);
143 /***********************************************************************
145 * WINHELP_GetOpenFileName
147 BOOL
WINHELP_GetOpenFileName(LPSTR lpszFile
, int len
)
149 OPENFILENAMEA openfilename
;
150 CHAR szDir
[MAX_PATH
];
151 CHAR szzFilter
[2 * MAX_STRING_LEN
+ 100];
156 LoadStringA(Globals
.hInstance
, STID_HELP_FILES_HLP
, p
, MAX_STRING_LEN
);
160 LoadStringA(Globals
.hInstance
, STID_ALL_FILES
, p
, MAX_STRING_LEN
);
166 GetCurrentDirectoryA(sizeof(szDir
), szDir
);
170 openfilename
.lStructSize
= sizeof(openfilename
);
171 openfilename
.hwndOwner
= (Globals
.active_win
? Globals
.active_win
->hMainWnd
: 0);
172 openfilename
.hInstance
= Globals
.hInstance
;
173 openfilename
.lpstrFilter
= szzFilter
;
174 openfilename
.lpstrCustomFilter
= 0;
175 openfilename
.nMaxCustFilter
= 0;
176 openfilename
.nFilterIndex
= 1;
177 openfilename
.lpstrFile
= lpszFile
;
178 openfilename
.nMaxFile
= len
;
179 openfilename
.lpstrFileTitle
= 0;
180 openfilename
.nMaxFileTitle
= 0;
181 openfilename
.lpstrInitialDir
= szDir
;
182 openfilename
.lpstrTitle
= 0;
183 openfilename
.Flags
= OFN_ENABLESIZING
| OFN_HIDEREADONLY
| OFN_READONLY
;
184 openfilename
.nFileOffset
= 0;
185 openfilename
.nFileExtension
= 0;
186 openfilename
.lpstrDefExt
= 0;
187 openfilename
.lCustData
= 0;
188 openfilename
.lpfnHook
= 0;
189 openfilename
.lpTemplateName
= 0;
191 return GetOpenFileNameA(&openfilename
);
194 /***********************************************************************
196 * WINHELP_MessageBoxIDS_s
198 static INT
WINHELP_MessageBoxIDS_s(UINT ids_text
, LPCSTR str
, UINT ids_title
, WORD type
)
200 CHAR text
[MAX_STRING_LEN
];
201 CHAR newtext
[MAX_STRING_LEN
+ MAX_PATH
];
203 LoadStringA(Globals
.hInstance
, ids_text
, text
, sizeof(text
));
204 wsprintfA(newtext
, text
, str
);
206 return MessageBoxA(0, newtext
, MAKEINTRESOURCEA(ids_title
), type
);
209 /***********************************************************************
211 * WINHELP_LookupHelpFile
213 HLPFILE
* WINHELP_LookupHelpFile(LPCSTR lpszFile
)
216 char szFullName
[MAX_PATH
];
217 char szAddPath
[MAX_PATH
];
221 * NOTE: This is needed by popup windows only.
222 * In other cases it's not needed but does not hurt though.
224 if (Globals
.active_win
&& Globals
.active_win
->page
&& Globals
.active_win
->page
->file
)
226 strcpy(szAddPath
, Globals
.active_win
->page
->file
->lpszPath
);
227 p
= strrchr(szAddPath
, '\\');
232 * FIXME: Should we swap conditions?
234 if (!SearchPathA(NULL
, lpszFile
, ".hlp", MAX_PATH
, szFullName
, NULL
) &&
235 !SearchPathA(szAddPath
, lpszFile
, ".hlp", MAX_PATH
, szFullName
, NULL
))
237 if (WINHELP_MessageBoxIDS_s(STID_FILE_NOT_FOUND_s
, lpszFile
, STID_WHERROR
,
238 MB_YESNO
|MB_ICONQUESTION
) != IDYES
)
240 if (!WINHELP_GetOpenFileName(szFullName
, MAX_PATH
))
243 hlpfile
= HLPFILE_ReadHlpFile(szFullName
);
245 WINHELP_MessageBoxIDS_s(STID_HLPFILE_ERROR_s
, lpszFile
,
246 STID_WHERROR
, MB_OK
|MB_ICONSTOP
);
250 /******************************************************************
251 * WINHELP_GetWindowInfo
255 HLPFILE_WINDOWINFO
* WINHELP_GetWindowInfo(HLPFILE
* hlpfile
, LPCSTR name
)
257 static HLPFILE_WINDOWINFO mwi
;
260 if (!name
|| !name
[0])
261 name
= Globals
.active_win
->info
->name
;
264 for (i
= 0; i
< hlpfile
->numWindows
; i
++)
265 if (!lstrcmpiA(hlpfile
->windows
[i
].name
, name
))
266 return &hlpfile
->windows
[i
];
268 if (strcmp(name
, "main") != 0)
270 WINE_FIXME("Couldn't find window info for %s\n", name
);
276 strcpy(mwi
.type
, "primary");
277 strcpy(mwi
.name
, "main");
278 if (hlpfile
&& hlpfile
->lpszTitle
[0])
281 LoadStringA(Globals
.hInstance
, STID_WINE_HELP
, tmp
, sizeof(tmp
));
282 snprintf(mwi
.caption
, sizeof(mwi
.caption
), "%s %s - %s",
283 hlpfile
->lpszTitle
, tmp
, hlpfile
->lpszPath
);
286 LoadStringA(Globals
.hInstance
, STID_WINE_HELP
, mwi
.caption
, sizeof(mwi
.caption
));
287 mwi
.origin
.x
= mwi
.origin
.y
= mwi
.size
.cx
= mwi
.size
.cy
= CW_USEDEFAULT
;
289 mwi
.win_style
= WS_OVERLAPPEDWINDOW
;
290 mwi
.sr_color
= mwi
.nsr_color
= 0xFFFFFF;
295 /******************************************************************
296 * HLPFILE_GetPopupWindowInfo
300 static HLPFILE_WINDOWINFO
* WINHELP_GetPopupWindowInfo(HLPFILE
* hlpfile
,
301 WINHELP_WINDOW
* parent
, LPARAM mouse
)
303 static HLPFILE_WINDOWINFO wi
;
307 wi
.type
[0] = wi
.name
[0] = wi
.caption
[0] = '\0';
309 /* Calculate horizontal size and position of a popup window */
310 GetWindowRect(parent
->hMainWnd
, &parent_rect
);
311 wi
.size
.cx
= (parent_rect
.right
- parent_rect
.left
) / 2;
312 wi
.size
.cy
= 10; /* need a non null value, so that border are taken into account while computing */
314 wi
.origin
.x
= (short)LOWORD(mouse
);
315 wi
.origin
.y
= (short)HIWORD(mouse
);
316 ClientToScreen(parent
->hMainWnd
, &wi
.origin
);
317 wi
.origin
.x
-= wi
.size
.cx
/ 2;
318 wi
.origin
.x
= min(wi
.origin
.x
, GetSystemMetrics(SM_CXSCREEN
) - wi
.size
.cx
);
319 wi
.origin
.x
= max(wi
.origin
.x
, 0);
322 wi
.win_style
= WS_POPUP
| WS_BORDER
;
323 if (parent
->page
->file
->has_popup_color
)
324 wi
.sr_color
= parent
->page
->file
->popup_color
;
326 wi
.sr_color
= parent
->info
->sr_color
;
327 wi
.nsr_color
= 0xFFFFFF;
340 } WINHELP
,*LPWINHELP
;
342 static BOOL
WINHELP_HasWorkingWindow(void)
344 if (!Globals
.active_win
) return FALSE
;
345 if (Globals
.active_win
->next
|| Globals
.win_list
!= Globals
.active_win
) return TRUE
;
346 return Globals
.active_win
->page
!= NULL
&& Globals
.active_win
->page
->file
!= NULL
;
349 /******************************************************************
350 * WINHELP_HandleCommand
354 static LRESULT
WINHELP_HandleCommand(HWND hSrcWnd
, LPARAM lParam
)
356 COPYDATASTRUCT
* cds
= (COPYDATASTRUCT
*)lParam
;
359 if (cds
->dwData
!= 0xA1DE505)
361 WINE_FIXME("Wrong magic number (%08lx)\n", cds
->dwData
);
369 char* ptr
= (wh
->ofsFilename
) ? (LPSTR
)wh
+ wh
->ofsFilename
: NULL
;
371 WINE_TRACE("Got[%u]: cmd=%u data=%08x fn=%s\n",
372 wh
->size
, wh
->command
, wh
->data
, ptr
);
378 MACRO_JumpContext(ptr
, "main", wh
->data
);
380 if (!WINHELP_HasWorkingWindow()) MACRO_Exit();
388 MACRO_JumpContents(ptr
, "main");
390 if (!WINHELP_HasWorkingWindow()) MACRO_Exit();
392 case HELP_HELPONHELP
:
394 if (!WINHELP_HasWorkingWindow()) MACRO_Exit();
396 /* case HELP_SETINDEX: */
397 case HELP_SETCONTENTS
:
400 MACRO_SetContents(ptr
, wh
->data
);
403 case HELP_CONTEXTPOPUP
:
406 MACRO_PopupContext(ptr
, wh
->data
);
409 /* case HELP_FORCEFILE:*/
410 /* case HELP_CONTEXTMENU: */
412 /* in fact, should be the topic dialog box */
413 WINE_FIXME("HELP_FINDER: stub\n");
416 MACRO_JumpHash(ptr
, "main", 0);
419 /* case HELP_WM_HELP: */
420 /* case HELP_SETPOPUP_POS: */
422 /* case HELP_COMMAND: */
423 /* case HELP_PARTIALKEY: */
424 /* case HELP_MULTIKEY: */
425 /* case HELP_SETWINPOS: */
427 WINE_FIXME("Unhandled command (%x) for remote winhelp control\n", wh
->command
);
431 /* Always return success for now */
435 void WINHELP_LayoutMainWindow(WINHELP_WINDOW
* win
)
437 RECT rect
, button_box_rect
;
439 HWND hButtonBoxWnd
= GetDlgItem(win
->hMainWnd
, CTL_ID_BUTTON
);
440 HWND hTextWnd
= GetDlgItem(win
->hMainWnd
, CTL_ID_TEXT
);
442 GetClientRect(win
->hMainWnd
, &rect
);
444 /* Update button box and text Window */
445 SetWindowPos(hButtonBoxWnd
, HWND_TOP
,
447 rect
.right
- rect
.left
,
448 rect
.bottom
- rect
.top
, 0);
450 if (GetWindowRect(hButtonBoxWnd
, &button_box_rect
))
451 text_top
= rect
.top
+ button_box_rect
.bottom
- button_box_rect
.top
;
453 SetWindowPos(hTextWnd
, HWND_TOP
,
455 rect
.right
- rect
.left
,
456 rect
.bottom
- text_top
, 0);
460 /******************************************************************
461 * WINHELP_DeleteButtons
464 static void WINHELP_DeleteButtons(WINHELP_WINDOW
* win
)
469 for (b
= win
->first_button
; b
; b
= bp
)
471 DestroyWindow(b
->hWnd
);
473 HeapFree(GetProcessHeap(), 0, b
);
475 win
->first_button
= NULL
;
478 /******************************************************************
479 * WINHELP_DeleteBackSet
482 void WINHELP_DeleteBackSet(WINHELP_WINDOW
* win
)
486 for (i
= 0; i
< win
->back
.index
; i
++)
488 HLPFILE_FreeHlpFile(win
->back
.set
[i
].page
->file
);
489 win
->back
.set
[i
].page
= NULL
;
494 /******************************************************************
495 * WINHELP_DeletePageLinks
498 static void WINHELP_DeletePageLinks(HLPFILE_PAGE
* page
)
503 for (curr
= page
->first_link
; curr
; curr
= next
)
506 HeapFree(GetProcessHeap(), 0, curr
);
510 /***********************************************************************
514 WINHELP_WINDOW
* WINHELP_GrabWindow(WINHELP_WINDOW
* win
)
516 WINE_TRACE("Grab %p#%d++\n", win
, win
->ref_count
);
521 /***********************************************************************
523 * WINHELP_RelaseWindow
525 BOOL
WINHELP_ReleaseWindow(WINHELP_WINDOW
* win
)
527 WINE_TRACE("Release %p#%d--\n", win
, win
->ref_count
);
529 if (!--win
->ref_count
)
531 DestroyWindow(win
->hMainWnd
);
537 /***********************************************************************
539 * WINHELP_DeleteWindow
541 static void WINHELP_DeleteWindow(WINHELP_WINDOW
* win
)
547 for (w
= &Globals
.win_list
; *w
; w
= &(*w
)->next
)
555 bExit
= (Globals
.wVersion
>= 4 && !lstrcmpiA(win
->info
->name
, "main"));
557 if (Globals
.active_win
== win
)
559 Globals
.active_win
= Globals
.win_list
;
560 if (Globals
.win_list
)
561 SetActiveWindow(Globals
.win_list
->hMainWnd
);
564 if (win
== Globals
.active_popup
)
565 Globals
.active_popup
= NULL
;
567 hTextWnd
= GetDlgItem(win
->hMainWnd
, CTL_ID_TEXT
);
568 SetWindowLongPtrA(hTextWnd
, GWLP_WNDPROC
, (LONG_PTR
)win
->origRicheditWndProc
);
570 WINHELP_DeleteButtons(win
);
572 if (win
->page
) WINHELP_DeletePageLinks(win
->page
);
573 if (win
->hHistoryWnd
) DestroyWindow(win
->hHistoryWnd
);
575 DeleteObject(win
->hBrush
);
577 WINHELP_DeleteBackSet(win
);
579 if (win
->page
) HLPFILE_FreeHlpFile(win
->page
->file
);
580 HeapFree(GetProcessHeap(), 0, win
);
582 if (bExit
) MACRO_Exit();
583 if (!Globals
.win_list
)
587 static char* WINHELP_GetCaption(WINHELP_WNDPAGE
* wpage
)
589 if (wpage
->wininfo
->caption
[0]) return wpage
->wininfo
->caption
;
590 return wpage
->page
->file
->lpszTitle
;
593 static void WINHELP_RememberPage(WINHELP_WINDOW
* win
, WINHELP_WNDPAGE
* wpage
)
597 if (!Globals
.history
.index
|| Globals
.history
.set
[0].page
!= wpage
->page
)
599 num
= sizeof(Globals
.history
.set
) / sizeof(Globals
.history
.set
[0]);
600 /* we're full, remove latest entry */
601 if (Globals
.history
.index
== num
)
603 HLPFILE_FreeHlpFile(Globals
.history
.set
[num
- 1].page
->file
);
604 Globals
.history
.index
--;
606 memmove(&Globals
.history
.set
[1], &Globals
.history
.set
[0],
607 Globals
.history
.index
* sizeof(Globals
.history
.set
[0]));
608 Globals
.history
.set
[0] = *wpage
;
609 Globals
.history
.index
++;
610 wpage
->page
->file
->wRefCount
++;
612 if (win
->hHistoryWnd
) InvalidateRect(win
->hHistoryWnd
, NULL
, TRUE
);
614 num
= sizeof(win
->back
.set
) / sizeof(win
->back
.set
[0]);
615 if (win
->back
.index
== num
)
617 /* we're full, remove latest entry */
618 HLPFILE_FreeHlpFile(win
->back
.set
[0].page
->file
);
619 memmove(&win
->back
.set
[0], &win
->back
.set
[1],
620 (num
- 1) * sizeof(win
->back
.set
[0]));
623 win
->back
.set
[win
->back
.index
++] = *wpage
;
624 wpage
->page
->file
->wRefCount
++;
627 /***********************************************************************
631 static HLPFILE_LINK
* WINHELP_FindLink(WINHELP_WINDOW
* win
, LPARAM pos
)
634 POINTL mouse_ptl
, char_ptl
, char_next_ptl
;
637 if (!win
->page
) return NULL
;
639 mouse_ptl
.x
= (short)LOWORD(pos
);
640 mouse_ptl
.y
= (short)HIWORD(pos
);
641 cp
= SendMessageW(GetDlgItem(win
->hMainWnd
, CTL_ID_TEXT
), EM_CHARFROMPOS
,
642 0, (LPARAM
)&mouse_ptl
);
644 for (link
= win
->page
->first_link
; link
; link
= link
->next
)
646 if (link
->cpMin
<= cp
&& cp
<= link
->cpMax
)
648 /* check whether we're at end of line */
649 SendMessageW(GetDlgItem(win
->hMainWnd
, CTL_ID_TEXT
), EM_POSFROMCHAR
,
650 (LPARAM
)&char_ptl
, cp
);
651 SendMessageW(GetDlgItem(win
->hMainWnd
, CTL_ID_TEXT
), EM_POSFROMCHAR
,
652 (LPARAM
)&char_next_ptl
, cp
+ 1);
655 HLPFILE_HOTSPOTLINK
* hslink
= (HLPFILE_HOTSPOTLINK
*)link
;
656 if ((mouse_ptl
.x
< char_ptl
.x
+ hslink
->x
) ||
657 (mouse_ptl
.x
>= char_ptl
.x
+ hslink
->x
+ hslink
->width
) ||
658 (mouse_ptl
.y
< char_ptl
.y
+ hslink
->y
) ||
659 (mouse_ptl
.y
>= char_ptl
.y
+ hslink
->y
+ hslink
->height
))
663 if (char_next_ptl
.y
!= char_ptl
.y
|| mouse_ptl
.x
>= char_next_ptl
.x
)
671 static LRESULT CALLBACK
WINHELP_RicheditWndProc(HWND hWnd
, UINT msg
,
672 WPARAM wParam
, LPARAM lParam
)
674 WINHELP_WINDOW
*win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(GetParent(hWnd
), 0);
680 messagePos
= GetMessagePos();
681 pt
.x
= (short)LOWORD(messagePos
);
682 pt
.y
= (short)HIWORD(messagePos
);
683 ScreenToClient(hWnd
, &pt
);
684 if (win
->page
&& WINHELP_FindLink(win
, MAKELPARAM(pt
.x
, pt
.y
)))
686 SetCursor(win
->hHandCur
);
691 return CallWindowProcA(win
->origRicheditWndProc
, hWnd
, msg
, wParam
, lParam
);
695 /***********************************************************************
697 * WINHELP_CreateHelpWindow
699 BOOL
WINHELP_CreateHelpWindow(WINHELP_WNDPAGE
* wpage
, int nCmdShow
, BOOL remember
)
701 WINHELP_WINDOW
* win
= NULL
;
702 BOOL bPrimary
, bPopup
, bReUsed
= FALSE
;
704 HWND hTextWnd
= NULL
;
706 bPrimary
= !lstrcmpiA(wpage
->wininfo
->name
, "main");
707 bPopup
= !bPrimary
&& (wpage
->wininfo
->win_style
& WS_POPUP
);
711 for (win
= Globals
.win_list
; win
; win
= win
->next
)
713 if (!lstrcmpiA(win
->info
->name
, wpage
->wininfo
->name
))
715 if (win
->page
== wpage
->page
&& win
->info
== wpage
->wininfo
)
717 /* see #22979, some hlp files have a macro (run at page opening), which
718 * jumps to the very same page
719 * Exit gracefully in that case
723 WINHELP_DeleteButtons(win
);
725 SetWindowTextA(win
->hMainWnd
, WINHELP_GetCaption(wpage
));
726 if (win
->info
!= wpage
->wininfo
)
730 DWORD flags
= SWP_NOSIZE
| SWP_NOMOVE
;
732 if (wpage
->wininfo
->origin
.x
!= CW_USEDEFAULT
&&
733 wpage
->wininfo
->origin
.y
!= CW_USEDEFAULT
)
735 pt
= wpage
->wininfo
->origin
;
736 flags
&= ~SWP_NOSIZE
;
738 if (wpage
->wininfo
->size
.cx
!= CW_USEDEFAULT
&&
739 wpage
->wininfo
->size
.cy
!= CW_USEDEFAULT
)
741 sz
= wpage
->wininfo
->size
;
742 flags
&= ~SWP_NOMOVE
;
744 SetWindowPos(win
->hMainWnd
, HWND_TOP
, pt
.x
, pt
.y
, sz
.cx
, sz
.cy
, flags
);
747 if (wpage
->page
&& win
->page
&& wpage
->page
->file
!= win
->page
->file
)
748 WINHELP_DeleteBackSet(win
);
749 WINHELP_InitFonts(win
->hMainWnd
);
751 win
->page
= wpage
->page
;
752 win
->info
= wpage
->wininfo
;
753 hTextWnd
= GetDlgItem(win
->hMainWnd
, CTL_ID_TEXT
);
754 WINHELP_SetupText(hTextWnd
, win
, wpage
->relative
);
756 InvalidateRect(win
->hMainWnd
, NULL
, TRUE
);
757 if (win
->hHistoryWnd
) InvalidateRect(win
->hHistoryWnd
, NULL
, TRUE
);
766 /* Initialize WINHELP_WINDOW struct */
767 win
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(WINHELP_WINDOW
));
768 if (!win
) return FALSE
;
769 win
->next
= Globals
.win_list
;
770 Globals
.win_list
= win
;
772 win
->hHandCur
= LoadCursorW(0, (LPWSTR
)IDC_HAND
);
775 WINHELP_GrabWindow(win
);
777 win
->page
= wpage
->page
;
778 win
->info
= wpage
->wininfo
;
779 WINHELP_GrabWindow(win
);
781 if (!bPopup
&& wpage
->page
&& remember
)
783 WINHELP_RememberPage(win
, wpage
);
787 Globals
.active_popup
= win
;
789 Globals
.active_win
= win
;
791 /* Initialize default pushbuttons */
792 if (bPrimary
&& wpage
->page
)
794 CHAR buffer
[MAX_STRING_LEN
];
796 LoadStringA(Globals
.hInstance
, STID_CONTENTS
, buffer
, sizeof(buffer
));
797 MACRO_CreateButton("BTN_CONTENTS", buffer
, "Contents()");
798 LoadStringA(Globals
.hInstance
, STID_INDEX
, buffer
, sizeof(buffer
));
799 MACRO_CreateButton("BTN_INDEX", buffer
, "Finder()");
800 LoadStringA(Globals
.hInstance
, STID_BACK
, buffer
, sizeof(buffer
));
801 MACRO_CreateButton("BTN_BACK", buffer
, "Back()");
802 if (win
->back
.index
<= 1) MACRO_DisableButton("BTN_BACK");
807 win
->hMainWnd
= CreateWindowExA((bPopup
) ? WS_EX_TOOLWINDOW
: 0, MAIN_WIN_CLASS_NAME
,
808 WINHELP_GetCaption(wpage
),
809 bPrimary
? WS_OVERLAPPEDWINDOW
: wpage
->wininfo
->win_style
,
810 wpage
->wininfo
->origin
.x
, wpage
->wininfo
->origin
.y
,
811 wpage
->wininfo
->size
.cx
, wpage
->wininfo
->size
.cy
,
812 bPopup
? Globals
.active_win
->hMainWnd
: NULL
,
813 bPrimary
? LoadMenuW(Globals
.hInstance
, MAKEINTRESOURCEW(MAIN_MENU
)) : 0,
814 Globals
.hInstance
, win
);
816 /* Create button box and text Window */
817 CreateWindowA(BUTTON_BOX_WIN_CLASS_NAME
, "", WS_CHILD
| WS_VISIBLE
,
818 0, 0, 0, 0, win
->hMainWnd
, (HMENU
)CTL_ID_BUTTON
, Globals
.hInstance
, NULL
);
820 hTextWnd
= CreateWindowA(RICHEDIT_CLASS20A
, NULL
,
821 ES_MULTILINE
| ES_READONLY
| WS_CHILD
| WS_HSCROLL
| WS_VSCROLL
| WS_VISIBLE
,
822 0, 0, 0, 0, win
->hMainWnd
, (HMENU
)CTL_ID_TEXT
, Globals
.hInstance
, NULL
);
823 SendMessageW(hTextWnd
, EM_SETEVENTMASK
, 0,
824 SendMessageW(hTextWnd
, EM_GETEVENTMASK
, 0, 0) | ENM_MOUSEEVENTS
);
825 win
->origRicheditWndProc
= (WNDPROC
)SetWindowLongPtrA(hTextWnd
, GWLP_WNDPROC
,
826 (LONG_PTR
)WINHELP_RicheditWndProc
);
829 hIcon
= (wpage
->page
) ? wpage
->page
->file
->hIcon
: NULL
;
830 if (!hIcon
) hIcon
= LoadImageW(Globals
.hInstance
, MAKEINTRESOURCEW(IDI_WINHELP
), IMAGE_ICON
,
831 GetSystemMetrics(SM_CXSMICON
), GetSystemMetrics(SM_CYSMICON
), LR_SHARED
);
832 SendMessageW(win
->hMainWnd
, WM_SETICON
, ICON_SMALL
, (DWORD_PTR
)hIcon
);
834 /* Initialize file specific pushbuttons */
835 if (!(wpage
->wininfo
->win_style
& WS_POPUP
) && wpage
->page
)
837 HLPFILE_MACRO
*macro
;
838 for (macro
= wpage
->page
->file
->first_macro
; macro
; macro
= macro
->next
)
839 MACRO_ExecuteMacro(win
, macro
->lpszMacro
);
841 for (macro
= wpage
->page
->first_macro
; macro
; macro
= macro
->next
)
842 MACRO_ExecuteMacro(win
, macro
->lpszMacro
);
844 /* See #17681, in some cases, the newly created window is closed by the macros it contains
845 * (braindead), so deal with this case
847 for (win
= Globals
.win_list
; win
; win
= win
->next
)
849 if (!lstrcmpiA(win
->info
->name
, wpage
->wininfo
->name
)) break;
851 if (!win
|| !WINHELP_ReleaseWindow(win
)) return TRUE
;
855 DWORD mask
= SendMessageW(hTextWnd
, EM_GETEVENTMASK
, 0, 0);
857 win
->font_scale
= Globals
.active_win
->font_scale
;
858 WINHELP_SetupText(hTextWnd
, win
, wpage
->relative
);
860 /* we need the window to be shown for richedit to compute the size */
861 ShowWindow(win
->hMainWnd
, nCmdShow
);
862 SendMessageW(hTextWnd
, EM_SETEVENTMASK
, 0, mask
| ENM_REQUESTRESIZE
);
863 SendMessageW(hTextWnd
, EM_REQUESTRESIZE
, 0, 0);
864 SendMessageW(hTextWnd
, EM_SETEVENTMASK
, 0, mask
);
868 WINHELP_SetupText(hTextWnd
, win
, wpage
->relative
);
869 WINHELP_LayoutMainWindow(win
);
870 ShowWindow(win
->hMainWnd
, nCmdShow
);
876 /******************************************************************
877 * WINHELP_OpenHelpWindow
878 * Main function to search for a page and display it in a window
880 BOOL
WINHELP_OpenHelpWindow(HLPFILE_PAGE
* (*lookup
)(HLPFILE
*, LONG
, ULONG
*),
881 HLPFILE
* hlpfile
, LONG val
, HLPFILE_WINDOWINFO
* wi
,
884 WINHELP_WNDPAGE wpage
;
886 wpage
.page
= lookup(hlpfile
, val
, &wpage
.relative
);
887 if (wpage
.page
) wpage
.page
->file
->wRefCount
++;
889 return WINHELP_CreateHelpWindow(&wpage
, nCmdShow
, TRUE
);
892 /******************************************************************
893 * WINHELP_HandleTextMouse
896 static BOOL
WINHELP_HandleTextMouse(WINHELP_WINDOW
* win
, UINT msg
, LPARAM lParam
)
905 if ((link
= WINHELP_FindLink(win
, lParam
)))
907 HLPFILE_WINDOWINFO
* wi
;
909 switch (link
->cookie
)
912 if ((hlpfile
= WINHELP_LookupHelpFile(link
->string
)))
914 if (link
->window
== -1)
917 if (wi
->win_style
& WS_POPUP
) wi
= Globals
.active_win
->info
;
919 else if (link
->window
< hlpfile
->numWindows
)
920 wi
= &hlpfile
->windows
[link
->window
];
923 WINE_WARN("link to window %d/%d\n", link
->window
, hlpfile
->numWindows
);
926 WINHELP_OpenHelpWindow(HLPFILE_PageByHash
, hlpfile
, link
->hash
, wi
, SW_NORMAL
);
930 if ((hlpfile
= WINHELP_LookupHelpFile(link
->string
)))
931 WINHELP_OpenHelpWindow(HLPFILE_PageByHash
, hlpfile
, link
->hash
,
932 WINHELP_GetPopupWindowInfo(hlpfile
, win
, lParam
),
936 MACRO_ExecuteMacro(win
, link
->string
);
939 WINE_FIXME("Unknown link cookie %d\n", link
->cookie
);
948 /***********************************************************************
952 static BOOL
WINHELP_CheckPopup(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
, LRESULT
* lret
)
954 WINHELP_WINDOW
* popup
;
956 if (!Globals
.active_popup
) return FALSE
;
962 MSGFILTER
* msgf
= (MSGFILTER
*)lParam
;
963 if (msgf
->nmhdr
.code
== EN_MSGFILTER
)
965 if (!WINHELP_CheckPopup(hWnd
, msgf
->msg
, msgf
->wParam
, msgf
->lParam
, NULL
))
973 if (LOWORD(wParam
) != WA_INACTIVE
|| (HWND
)lParam
== Globals
.active_win
->hMainWnd
||
974 (HWND
)lParam
== Globals
.active_popup
->hMainWnd
||
975 GetWindow((HWND
)lParam
, GW_OWNER
) == Globals
.active_win
->hMainWnd
)
979 if (msg
== WM_LBUTTONDOWN
)
980 WINHELP_HandleTextMouse(Globals
.active_popup
, msg
, lParam
);
984 case WM_NCLBUTTONDOWN
:
985 case WM_NCMBUTTONDOWN
:
986 case WM_NCRBUTTONDOWN
:
987 popup
= Globals
.active_popup
;
988 Globals
.active_popup
= NULL
;
989 WINHELP_ReleaseWindow(popup
);
995 /***********************************************************************
997 * WINHELP_ButtonWndProc
999 static LRESULT CALLBACK
WINHELP_ButtonWndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1001 if (WINHELP_CheckPopup(hWnd
, msg
, wParam
, lParam
, NULL
)) return 0;
1003 if (msg
== WM_KEYDOWN
)
1012 return SendMessageA(GetParent(hWnd
), msg
, wParam
, lParam
);
1016 return CallWindowProcA(Globals
.button_proc
, hWnd
, msg
, wParam
, lParam
);
1019 /***********************************************************************
1021 * WINHELP_ButtonBoxWndProc
1023 static LRESULT CALLBACK
WINHELP_ButtonBoxWndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1026 WINHELP_WINDOW
*win
;
1027 WINHELP_BUTTON
*button
;
1031 if (WINHELP_CheckPopup(hWnd
, msg
, wParam
, lParam
, NULL
)) return 0L;
1035 case WM_WINDOWPOSCHANGING
:
1036 winpos
= (WINDOWPOS
*) lParam
;
1037 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(GetParent(hWnd
), 0);
1039 /* Update buttons */
1042 for (button
= win
->first_button
; button
; button
= button
->next
)
1048 button
->hWnd
= CreateWindowA(STRING_BUTTON
, button
->lpszName
,
1049 WS_CHILD
| WS_VISIBLE
| BS_PUSHBUTTON
,
1051 hWnd
, (HMENU
) button
->wParam
,
1052 Globals
.hInstance
, 0);
1055 if (Globals
.button_proc
== NULL
)
1057 NONCLIENTMETRICSW ncm
;
1058 Globals
.button_proc
= (WNDPROC
) GetWindowLongPtrA(button
->hWnd
, GWLP_WNDPROC
);
1060 ncm
.cbSize
= sizeof(NONCLIENTMETRICSW
);
1061 SystemParametersInfoW(SPI_GETNONCLIENTMETRICS
,
1062 sizeof(NONCLIENTMETRICSW
), &ncm
, 0);
1063 Globals
.hButtonFont
= CreateFontIndirectW(&ncm
.lfMenuFont
);
1065 SetWindowLongPtrA(button
->hWnd
, GWLP_WNDPROC
, (LONG_PTR
) WINHELP_ButtonWndProc
);
1066 if (Globals
.hButtonFont
)
1067 SendMessageW(button
->hWnd
, WM_SETFONT
, (WPARAM
)Globals
.hButtonFont
, TRUE
);
1070 hDc
= GetDC(button
->hWnd
);
1071 GetTextExtentPointA(hDc
, button
->lpszName
, strlen(button
->lpszName
), &textsize
);
1072 ReleaseDC(button
->hWnd
, hDc
);
1074 button_size
.cx
= max(button_size
.cx
, textsize
.cx
+ BUTTON_CX
);
1075 button_size
.cy
= max(button_size
.cy
, textsize
.cy
+ BUTTON_CY
);
1080 for (button
= win
->first_button
; button
; button
= button
->next
)
1082 SetWindowPos(button
->hWnd
, HWND_TOP
, x
, y
, button_size
.cx
, button_size
.cy
, 0);
1084 if (x
+ 2 * button_size
.cx
<= winpos
->cx
)
1085 x
+= button_size
.cx
;
1087 x
= 0, y
+= button_size
.cy
;
1089 winpos
->cy
= y
+ (x
? button_size
.cy
: 0);
1093 SendMessageW(GetParent(hWnd
), msg
, wParam
, lParam
);
1104 return SendMessageA(GetParent(hWnd
), msg
, wParam
, lParam
);
1109 return DefWindowProcA(hWnd
, msg
, wParam
, lParam
);
1112 /******************************************************************
1113 * WINHELP_HistoryWndProc
1117 static LRESULT CALLBACK
WINHELP_HistoryWndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1119 WINHELP_WINDOW
* win
;
1129 win
= (WINHELP_WINDOW
*)((LPCREATESTRUCTA
)lParam
)->lpCreateParams
;
1130 SetWindowLongPtrW(hWnd
, 0, (ULONG_PTR
)win
);
1131 win
->hHistoryWnd
= hWnd
;
1134 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1136 GetTextMetricsW(hDc
, &tm
);
1137 GetWindowRect(hWnd
, &r
);
1139 r
.right
= r
.left
+ 30 * tm
.tmAveCharWidth
;
1140 r
.bottom
= r
.top
+ (sizeof(Globals
.history
.set
) / sizeof(Globals
.history
.set
[0])) * tm
.tmHeight
;
1141 AdjustWindowRect(&r
, GetWindowLongW(hWnd
, GWL_STYLE
), FALSE
);
1142 if (r
.left
< 0) {r
.right
-= r
.left
; r
.left
= 0;}
1143 if (r
.top
< 0) {r
.bottom
-= r
.top
; r
.top
= 0;}
1145 MoveWindow(hWnd
, r
.left
, r
.top
, r
.right
, r
.bottom
, TRUE
);
1146 ReleaseDC(hWnd
, hDc
);
1148 case WM_LBUTTONDOWN
:
1149 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1151 GetTextMetricsW(hDc
, &tm
);
1152 i
= HIWORD(lParam
) / tm
.tmHeight
;
1153 if (i
< Globals
.history
.index
)
1154 WINHELP_CreateHelpWindow(&Globals
.history
.set
[i
], SW_SHOW
, TRUE
);
1155 ReleaseDC(hWnd
, hDc
);
1158 hDc
= BeginPaint(hWnd
, &ps
);
1159 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1160 GetTextMetricsW(hDc
, &tm
);
1162 for (i
= 0; i
< Globals
.history
.index
; i
++)
1164 if (Globals
.history
.set
[i
].page
->file
== Globals
.active_win
->page
->file
)
1166 TextOutA(hDc
, 0, i
* tm
.tmHeight
,
1167 Globals
.history
.set
[i
].page
->lpszTitle
,
1168 strlen(Globals
.history
.set
[i
].page
->lpszTitle
));
1177 ptr1
= strrchr(Globals
.history
.set
[i
].page
->file
->lpszPath
, '\\');
1178 if (!ptr1
) ptr1
= Globals
.history
.set
[i
].page
->file
->lpszPath
;
1180 ptr2
= strrchr(ptr1
, '.');
1181 len
= ptr2
? ptr2
- ptr1
: strlen(ptr1
);
1182 if (len
> sizeof(buffer
)) len
= sizeof(buffer
);
1183 memcpy(buffer
, ptr1
, len
);
1184 if (len
< sizeof(buffer
)) buffer
[len
++] = ':';
1185 lstrcpynA(&buffer
[len
], Globals
.history
.set
[i
].page
->lpszTitle
, sizeof(buffer
) - len
);
1186 TextOutA(hDc
, 0, i
* tm
.tmHeight
, buffer
, strlen(buffer
));
1189 EndPaint(hWnd
, &ps
);
1192 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1193 if (hWnd
== win
->hHistoryWnd
)
1194 win
->hHistoryWnd
= 0;
1197 return DefWindowProcA(hWnd
, msg
, wParam
, lParam
);
1200 /**************************************************************************
1203 * HLPFILE_BPTreeCallback enumeration function for '|KWBTREE' internal file.
1206 static void cb_KWBTree(void *p
, void **next
, void *cookie
)
1208 HWND hListWnd
= cookie
;
1211 WINE_TRACE("Adding '%s' to search list\n", (char *)p
);
1212 SendMessageA(hListWnd
, LB_INSERTSTRING
, -1, (LPARAM
)p
);
1213 count
= SendMessageW(hListWnd
, LB_GETCOUNT
, 0, 0);
1214 SendMessageW(hListWnd
, LB_SETITEMDATA
, count
-1, (LPARAM
)p
);
1215 *next
= (char*)p
+ strlen((char*)p
) + 7;
1225 /**************************************************************************
1226 * WINHELP_IndexDlgProc
1229 static INT_PTR CALLBACK
WINHELP_IndexDlgProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1231 static struct index_data
* id
;
1237 id
= (struct index_data
*)((PROPSHEETPAGEA
*)lParam
)->lParam
;
1238 HLPFILE_BPTreeEnum(id
->hlpfile
->kwbtree
, cb_KWBTree
,
1239 GetDlgItem(hWnd
, IDC_INDEXLIST
));
1244 switch (HIWORD(wParam
))
1247 if (LOWORD(wParam
) == IDC_INDEXLIST
)
1248 SendMessageW(GetParent(hWnd
), PSM_PRESSBUTTON
, PSBTN_OK
, 0);
1253 switch (((NMHDR
*)lParam
)->code
)
1256 sel
= SendDlgItemMessageW(hWnd
, IDC_INDEXLIST
, LB_GETCURSEL
, 0, 0);
1262 p
= (BYTE
*)SendDlgItemMessageW(hWnd
, IDC_INDEXLIST
, LB_GETITEMDATA
, sel
, 0);
1263 count
= *(short*)((char *)p
+ strlen((char *)p
) + 1);
1266 MessageBoxA(hWnd
, "count > 1 not supported yet", "Error", MB_OK
| MB_ICONSTOP
);
1267 SetWindowLongPtrW(hWnd
, DWLP_MSGRESULT
, PSNRET_INVALID
);
1270 id
->offset
= *(ULONG
*)((char *)p
+ strlen((char *)p
) + 3);
1271 id
->offset
= *(long*)(id
->hlpfile
->kwdata
+ id
->offset
+ 9);
1272 if (id
->offset
== 0xFFFFFFFF)
1274 MessageBoxA(hWnd
, "macro keywords not supported yet", "Error", MB_OK
| MB_ICONSTOP
);
1275 SetWindowLongPtrW(hWnd
, DWLP_MSGRESULT
, PSNRET_INVALID
);
1279 SetWindowLongPtrW(hWnd
, DWLP_MSGRESULT
, PSNRET_NOERROR
);
1292 /**************************************************************************
1293 * WINHELP_SearchDlgProc
1296 static INT_PTR CALLBACK
WINHELP_SearchDlgProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1303 switch (((NMHDR
*)lParam
)->code
)
1306 SetWindowLongPtrW(hWnd
, DWLP_MSGRESULT
, PSNRET_NOERROR
);
1318 /***********************************************************************
1320 * WINHELP_MainWndProc
1322 static LRESULT CALLBACK
WINHELP_MainWndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1324 WINHELP_WINDOW
*win
;
1325 WINHELP_BUTTON
*button
;
1329 if (WINHELP_CheckPopup(hWnd
, msg
, wParam
, lParam
, &ret
)) return ret
;
1334 win
= (WINHELP_WINDOW
*) ((LPCREATESTRUCTA
) lParam
)->lpCreateParams
;
1335 SetWindowLongPtrW(hWnd
, 0, (ULONG_PTR
) win
);
1336 if (!win
->page
&& Globals
.isBook
)
1337 PostMessageW(hWnd
, WM_COMMAND
, MNID_FILE_OPEN
, 0);
1338 win
->hMainWnd
= hWnd
;
1341 case WM_WINDOWPOSCHANGED
:
1342 WINHELP_LayoutMainWindow((WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0));
1346 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1347 switch (LOWORD(wParam
))
1350 case MNID_FILE_OPEN
: MACRO_FileOpen(); break;
1351 case MNID_FILE_PRINT
: MACRO_Print(); break;
1352 case MNID_FILE_SETUP
: MACRO_PrinterSetup(); break;
1353 case MNID_FILE_EXIT
: MACRO_Exit(); break;
1356 case MNID_EDIT_COPYDLG
:
1357 SendDlgItemMessageW(hWnd
, CTL_ID_TEXT
, WM_COPY
, 0, 0);
1359 case MNID_EDIT_ANNOTATE
:MACRO_Annotate(); break;
1362 case MNID_BKMK_DEFINE
: MACRO_BookmarkDefine(); break;
1365 case MNID_HELP_HELPON
: MACRO_HelpOn(); break;
1366 case MNID_HELP_HELPTOP
: MACRO_HelpOnTop(); break;
1367 case MNID_HELP_ABOUT
: MACRO_About(); break;
1370 case MNID_CTXT_ANNOTATE
:MACRO_Annotate(); break;
1371 case MNID_CTXT_COPY
: MACRO_CopyDialog(); break;
1372 case MNID_CTXT_PRINT
: MACRO_Print(); break;
1373 case MNID_OPTS_HISTORY
: MACRO_History(); break;
1374 case MNID_OPTS_FONTS_SMALL
:
1375 case MNID_CTXT_FONTS_SMALL
:
1376 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1377 if (win
->font_scale
!= 0)
1379 win
->font_scale
= 0;
1380 WINHELP_SetupText(GetDlgItem(hWnd
, CTL_ID_TEXT
), win
, 0 /* FIXME */);
1383 case MNID_OPTS_FONTS_NORMAL
:
1384 case MNID_CTXT_FONTS_NORMAL
:
1385 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1386 if (win
->font_scale
!= 1)
1388 win
->font_scale
= 1;
1389 WINHELP_SetupText(GetDlgItem(hWnd
, CTL_ID_TEXT
), win
, 0 /* FIXME */);
1392 case MNID_OPTS_FONTS_LARGE
:
1393 case MNID_CTXT_FONTS_LARGE
:
1394 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1395 if (win
->font_scale
!= 2)
1397 win
->font_scale
= 2;
1398 WINHELP_SetupText(GetDlgItem(hWnd
, CTL_ID_TEXT
), win
, 0 /* FIXME */);
1404 for (button
= win
->first_button
; button
; button
= button
->next
)
1405 if (wParam
== button
->wParam
) break;
1407 MACRO_ExecuteMacro(win
, button
->lpszMacro
);
1408 else if (!HIWORD(wParam
))
1409 MessageBoxW(0, MAKEINTRESOURCEW(STID_NOT_IMPLEMENTED
),
1410 MAKEINTRESOURCEW(STID_WHERROR
), MB_OK
);
1414 /* EPP case WM_DESTROY: */
1415 /* EPP if (Globals.hPopupWnd) DestroyWindow(Globals.hPopupWnd); */
1418 return WINHELP_HandleCommand((HWND
)wParam
, lParam
);
1423 SendDlgItemMessageW(hWnd
, CTL_ID_TEXT
, WM_COPY
, 0, 0);
1429 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1430 hTextWnd
= GetDlgItem(win
->hMainWnd
, CTL_ID_TEXT
);
1435 SendMessageW(hTextWnd
, EM_SCROLL
, SB_LINEUP
, 0);
1438 SendMessageW(hTextWnd
, EM_SCROLL
, SB_LINEDOWN
, 0);
1441 SendMessageW(hTextWnd
, EM_SCROLL
, SB_PAGEUP
, 0);
1444 SendMessageW(hTextWnd
, EM_SCROLL
, SB_PAGEDOWN
, 0);
1453 if (wParam
== CTL_ID_TEXT
)
1457 switch (((NMHDR
*)lParam
)->code
)
1461 const MSGFILTER
* msgf
= (const MSGFILTER
*)lParam
;
1465 if (msgf
->wParam
== VK_ESCAPE
)
1466 WINHELP_ReleaseWindow((WINHELP_WINDOW
*)GetWindowLongPtrW(hWnd
, 0));
1468 case WM_RBUTTONDOWN
:
1473 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1474 hMenu
= LoadMenuW(Globals
.hInstance
, MAKEINTRESOURCEW(CONTEXT_MENU
));
1475 switch (win
->font_scale
)
1478 CheckMenuItem(hMenu
, MNID_CTXT_FONTS_SMALL
,
1479 MF_BYCOMMAND
|MF_CHECKED
);
1482 WINE_FIXME("Unsupported %d\n", win
->font_scale
);
1485 CheckMenuItem(hMenu
, MNID_CTXT_FONTS_NORMAL
,
1486 MF_BYCOMMAND
|MF_CHECKED
);
1489 CheckMenuItem(hMenu
, MNID_CTXT_FONTS_LARGE
,
1490 MF_BYCOMMAND
|MF_CHECKED
);
1493 pt
.x
= (int)(short)LOWORD(msgf
->lParam
);
1494 pt
.y
= (int)(short)HIWORD(msgf
->lParam
);
1495 ClientToScreen(msgf
->nmhdr
.hwndFrom
, &pt
);
1496 TrackPopupMenu(GetSubMenu(hMenu
, 0), TPM_LEFTALIGN
|TPM_TOPALIGN
,
1497 pt
.x
, pt
.y
, 0, hWnd
, NULL
);
1502 return WINHELP_HandleTextMouse((WINHELP_WINDOW
*)GetWindowLongPtrW(hWnd
, 0),
1503 msgf
->msg
, msgf
->lParam
);
1508 case EN_REQUESTRESIZE
:
1509 rc
= ((REQRESIZE
*)lParam
)->rc
;
1510 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1511 AdjustWindowRect(&rc
, GetWindowLongW(win
->hMainWnd
, GWL_STYLE
),
1513 SetWindowPos(win
->hMainWnd
, HWND_TOP
, 0, 0,
1514 rc
.right
- rc
.left
, rc
.bottom
- rc
.top
,
1515 SWP_NOMOVE
| SWP_NOZORDER
);
1516 WINHELP_LayoutMainWindow(win
);
1522 case WM_INITMENUPOPUP
:
1523 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1524 CheckMenuItem((HMENU
)wParam
, MNID_OPTS_FONTS_SMALL
,
1525 MF_BYCOMMAND
| (win
->font_scale
== 0) ? MF_CHECKED
: 0);
1526 CheckMenuItem((HMENU
)wParam
, MNID_OPTS_FONTS_NORMAL
,
1527 MF_BYCOMMAND
| (win
->font_scale
== 1) ? MF_CHECKED
: 0);
1528 CheckMenuItem((HMENU
)wParam
, MNID_OPTS_FONTS_LARGE
,
1529 MF_BYCOMMAND
| (win
->font_scale
== 2) ? MF_CHECKED
: 0);
1532 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1533 WINHELP_DeleteWindow(win
);
1536 return DefWindowProcA(hWnd
, msg
, wParam
, lParam
);
1539 /**************************************************************************
1540 * WINHELP_CreateIndexWindow
1542 * Displays a dialog with keywords of current help file.
1545 BOOL
WINHELP_CreateIndexWindow(BOOL is_search
)
1547 HPROPSHEETPAGE psPage
[3];
1549 PROPSHEETHEADERA psHead
;
1550 struct index_data id
;
1553 if (Globals
.active_win
&& Globals
.active_win
->page
&& Globals
.active_win
->page
->file
)
1554 id
.hlpfile
= Globals
.active_win
->page
->file
;
1558 if (id
.hlpfile
->kwbtree
== NULL
)
1560 WINE_TRACE("No index provided\n");
1564 InitCommonControls();
1567 memset(&psp
, 0, sizeof(psp
));
1568 psp
.dwSize
= sizeof(psp
);
1570 psp
.hInstance
= Globals
.hInstance
;
1572 psp
.u
.pszTemplate
= MAKEINTRESOURCEA(IDD_INDEX
);
1573 psp
.lParam
= (LPARAM
)&id
;
1574 psp
.pfnDlgProc
= WINHELP_IndexDlgProc
;
1575 psPage
[0] = CreatePropertySheetPageA(&psp
);
1577 psp
.u
.pszTemplate
= MAKEINTRESOURCEA(IDD_SEARCH
);
1578 psp
.lParam
= (LPARAM
)&id
;
1579 psp
.pfnDlgProc
= WINHELP_SearchDlgProc
;
1580 psPage
[1] = CreatePropertySheetPageA(&psp
);
1582 memset(&psHead
, 0, sizeof(psHead
));
1583 psHead
.dwSize
= sizeof(psHead
);
1585 LoadStringA(Globals
.hInstance
, STID_PSH_INDEX
, buf
, sizeof(buf
));
1586 strcat(buf
, Globals
.active_win
->info
->caption
);
1588 psHead
.pszCaption
= buf
;
1590 psHead
.u2
.nStartPage
= is_search
? 1 : 0;
1591 psHead
.hwndParent
= Globals
.active_win
->hMainWnd
;
1592 psHead
.u3
.phpage
= psPage
;
1593 psHead
.dwFlags
= PSH_NOAPPLYNOW
;
1595 PropertySheetA(&psHead
);
1598 WINE_TRACE("got %d as an offset\n", id
.offset
);
1599 WINHELP_OpenHelpWindow(HLPFILE_PageByOffset
, id
.hlpfile
, id
.offset
,
1600 Globals
.active_win
->info
, SW_NORMAL
);
1605 /***********************************************************************
1607 * RegisterWinClasses
1609 static BOOL
WINHELP_RegisterWinClasses(void)
1611 WNDCLASSEXA class_main
, class_button_box
, class_history
;
1613 class_main
.cbSize
= sizeof(class_main
);
1614 class_main
.style
= CS_HREDRAW
| CS_VREDRAW
;
1615 class_main
.lpfnWndProc
= WINHELP_MainWndProc
;
1616 class_main
.cbClsExtra
= 0;
1617 class_main
.cbWndExtra
= sizeof(WINHELP_WINDOW
*);
1618 class_main
.hInstance
= Globals
.hInstance
;
1619 class_main
.hIcon
= LoadIconW(Globals
.hInstance
, MAKEINTRESOURCEW(IDI_WINHELP
));
1620 class_main
.hCursor
= LoadCursorW(0, (LPWSTR
)IDC_ARROW
);
1621 class_main
.hbrBackground
= (HBRUSH
)(COLOR_WINDOW
+1);
1622 class_main
.lpszMenuName
= 0;
1623 class_main
.lpszClassName
= MAIN_WIN_CLASS_NAME
;
1624 class_main
.hIconSm
= LoadImageW(Globals
.hInstance
, MAKEINTRESOURCEW(IDI_WINHELP
), IMAGE_ICON
,
1625 GetSystemMetrics(SM_CXSMICON
), GetSystemMetrics(SM_CYSMICON
),
1628 class_button_box
= class_main
;
1629 class_button_box
.lpfnWndProc
= WINHELP_ButtonBoxWndProc
;
1630 class_button_box
.cbWndExtra
= 0;
1631 class_button_box
.hbrBackground
= (HBRUSH
)(COLOR_BTNFACE
+1);
1632 class_button_box
.lpszClassName
= BUTTON_BOX_WIN_CLASS_NAME
;
1634 class_history
= class_main
;
1635 class_history
.lpfnWndProc
= WINHELP_HistoryWndProc
;
1636 class_history
.lpszClassName
= HISTORY_WIN_CLASS_NAME
;
1638 return (RegisterClassExA(&class_main
) &&
1639 RegisterClassExA(&class_button_box
) &&
1640 RegisterClassExA(&class_history
));
1643 /***********************************************************************
1647 int PASCAL
WinMain(HINSTANCE hInstance
, HINSTANCE prev
, LPSTR cmdline
, int show
)
1652 static CHAR default_wndname
[] = "main";
1653 LPSTR wndname
= default_wndname
;
1657 Globals
.hInstance
= hInstance
;
1659 if (LoadLibraryA("riched20.dll") == NULL
)
1660 return MessageBoxW(0, MAKEINTRESOURCEW(STID_NO_RICHEDIT
),
1661 MAKEINTRESOURCEW(STID_WHERROR
), MB_OK
);
1664 while (*cmdline
&& (*cmdline
== ' ' || *cmdline
== '-'))
1668 if (*cmdline
++ == ' ') continue;
1671 if (option
) cmdline
++;
1672 while (*cmdline
&& *cmdline
== ' ') cmdline
++;
1678 while (*cmdline
&& *cmdline
!= ' ') cmdline
++;
1679 if (*cmdline
) *cmdline
++ = '\0';
1680 lHash
= HLPFILE_Hash(topic_id
);
1685 Globals
.wVersion
= option
- '0';
1690 Globals
.isBook
= FALSE
;
1694 WINE_FIXME("Unsupported cmd line: %s\n", cmdline
);
1699 /* Create primary window */
1700 if (!WINHELP_RegisterWinClasses())
1702 WINE_FIXME("Couldn't register classes\n");
1709 if ((*cmdline
== '"') && (ptr
= strchr(cmdline
+1, '"')))
1714 if ((ptr
= strchr(cmdline
, '>')))
1719 hlpfile
= WINHELP_LookupHelpFile(cmdline
);
1720 if (!hlpfile
) return 0;
1722 else hlpfile
= NULL
;
1723 WINHELP_OpenHelpWindow(HLPFILE_PageByHash
, hlpfile
, lHash
,
1724 WINHELP_GetWindowInfo(hlpfile
, wndname
), show
);
1727 hAccel
= LoadAcceleratorsW(hInstance
, MAKEINTRESOURCEW(MAIN_ACCEL
));
1728 while ((Globals
.win_list
|| Globals
.active_popup
) && GetMessageW(&msg
, 0, 0, 0))
1730 HWND hWnd
= Globals
.active_win
? Globals
.active_win
->hMainWnd
: NULL
;
1731 if (!TranslateAcceleratorW(hWnd
, hAccel
, &msg
))
1733 TranslateMessage(&msg
);
1734 DispatchMessageW(&msg
);
1737 for (dll
= Globals
.dlls
; dll
; dll
= dll
->next
)
1739 if (dll
->class & DC_INITTERM
) dll
->handler(DW_TERM
, 0, 0);