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
];
73 static BOOL init
= FALSE
;
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 borders 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
;
1135 GetTextMetricsW(hDc
, &tm
);
1136 GetWindowRect(hWnd
, &r
);
1138 r
.right
= r
.left
+ 30 * tm
.tmAveCharWidth
;
1139 r
.bottom
= r
.top
+ (sizeof(Globals
.history
.set
) / sizeof(Globals
.history
.set
[0])) * tm
.tmHeight
;
1140 AdjustWindowRect(&r
, GetWindowLongW(hWnd
, GWL_STYLE
), FALSE
);
1141 if (r
.left
< 0) {r
.right
-= r
.left
; r
.left
= 0;}
1142 if (r
.top
< 0) {r
.bottom
-= r
.top
; r
.top
= 0;}
1144 MoveWindow(hWnd
, r
.left
, r
.top
, r
.right
, r
.bottom
, TRUE
);
1145 ReleaseDC(hWnd
, hDc
);
1147 case WM_LBUTTONDOWN
:
1149 GetTextMetricsW(hDc
, &tm
);
1150 i
= HIWORD(lParam
) / tm
.tmHeight
;
1151 if (i
< Globals
.history
.index
)
1152 WINHELP_CreateHelpWindow(&Globals
.history
.set
[i
], SW_SHOW
, TRUE
);
1153 ReleaseDC(hWnd
, hDc
);
1156 hDc
= BeginPaint(hWnd
, &ps
);
1157 GetTextMetricsW(hDc
, &tm
);
1159 for (i
= 0; i
< Globals
.history
.index
; i
++)
1161 if (Globals
.history
.set
[i
].page
->file
== Globals
.active_win
->page
->file
)
1163 TextOutA(hDc
, 0, i
* tm
.tmHeight
,
1164 Globals
.history
.set
[i
].page
->lpszTitle
,
1165 strlen(Globals
.history
.set
[i
].page
->lpszTitle
));
1174 ptr1
= strrchr(Globals
.history
.set
[i
].page
->file
->lpszPath
, '\\');
1175 if (!ptr1
) ptr1
= Globals
.history
.set
[i
].page
->file
->lpszPath
;
1177 ptr2
= strrchr(ptr1
, '.');
1178 len
= ptr2
? ptr2
- ptr1
: strlen(ptr1
);
1179 if (len
> sizeof(buffer
)) len
= sizeof(buffer
);
1180 memcpy(buffer
, ptr1
, len
);
1181 if (len
< sizeof(buffer
)) buffer
[len
++] = ':';
1182 lstrcpynA(&buffer
[len
], Globals
.history
.set
[i
].page
->lpszTitle
, sizeof(buffer
) - len
);
1183 TextOutA(hDc
, 0, i
* tm
.tmHeight
, buffer
, strlen(buffer
));
1186 EndPaint(hWnd
, &ps
);
1189 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1190 if (hWnd
== win
->hHistoryWnd
)
1191 win
->hHistoryWnd
= 0;
1194 return DefWindowProcA(hWnd
, msg
, wParam
, lParam
);
1197 /**************************************************************************
1200 * HLPFILE_BPTreeCallback enumeration function for '|KWBTREE' internal file.
1203 static void cb_KWBTree(void *p
, void **next
, void *cookie
)
1205 HWND hListWnd
= cookie
;
1208 WINE_TRACE("Adding '%s' to search list\n", (char *)p
);
1209 SendMessageA(hListWnd
, LB_INSERTSTRING
, -1, (LPARAM
)p
);
1210 count
= SendMessageW(hListWnd
, LB_GETCOUNT
, 0, 0);
1211 SendMessageW(hListWnd
, LB_SETITEMDATA
, count
-1, (LPARAM
)p
);
1212 *next
= (char*)p
+ strlen((char*)p
) + 7;
1222 /**************************************************************************
1223 * WINHELP_IndexDlgProc
1226 static INT_PTR CALLBACK
WINHELP_IndexDlgProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1228 static struct index_data
* id
;
1234 id
= (struct index_data
*)((PROPSHEETPAGEA
*)lParam
)->lParam
;
1235 HLPFILE_BPTreeEnum(id
->hlpfile
->kwbtree
, cb_KWBTree
,
1236 GetDlgItem(hWnd
, IDC_INDEXLIST
));
1241 switch (HIWORD(wParam
))
1244 if (LOWORD(wParam
) == IDC_INDEXLIST
)
1245 SendMessageW(GetParent(hWnd
), PSM_PRESSBUTTON
, PSBTN_OK
, 0);
1250 switch (((NMHDR
*)lParam
)->code
)
1253 sel
= SendDlgItemMessageW(hWnd
, IDC_INDEXLIST
, LB_GETCURSEL
, 0, 0);
1259 p
= (BYTE
*)SendDlgItemMessageW(hWnd
, IDC_INDEXLIST
, LB_GETITEMDATA
, sel
, 0);
1260 count
= *(short*)((char *)p
+ strlen((char *)p
) + 1);
1263 MessageBoxA(hWnd
, "count > 1 not supported yet", "Error", MB_OK
| MB_ICONSTOP
);
1264 SetWindowLongPtrW(hWnd
, DWLP_MSGRESULT
, PSNRET_INVALID
);
1267 id
->offset
= *(ULONG
*)((char *)p
+ strlen((char *)p
) + 3);
1268 id
->offset
= *(long*)(id
->hlpfile
->kwdata
+ id
->offset
+ 9);
1269 if (id
->offset
== 0xFFFFFFFF)
1271 MessageBoxA(hWnd
, "macro keywords not supported yet", "Error", MB_OK
| MB_ICONSTOP
);
1272 SetWindowLongPtrW(hWnd
, DWLP_MSGRESULT
, PSNRET_INVALID
);
1276 SetWindowLongPtrW(hWnd
, DWLP_MSGRESULT
, PSNRET_NOERROR
);
1289 /**************************************************************************
1290 * WINHELP_SearchDlgProc
1293 static INT_PTR CALLBACK
WINHELP_SearchDlgProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1300 switch (((NMHDR
*)lParam
)->code
)
1303 SetWindowLongPtrW(hWnd
, DWLP_MSGRESULT
, PSNRET_NOERROR
);
1315 /***********************************************************************
1317 * WINHELP_MainWndProc
1319 static LRESULT CALLBACK
WINHELP_MainWndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1321 WINHELP_WINDOW
*win
;
1322 WINHELP_BUTTON
*button
;
1326 if (WINHELP_CheckPopup(hWnd
, msg
, wParam
, lParam
, &ret
)) return ret
;
1331 win
= (WINHELP_WINDOW
*) ((LPCREATESTRUCTA
) lParam
)->lpCreateParams
;
1332 SetWindowLongPtrW(hWnd
, 0, (ULONG_PTR
) win
);
1333 if (!win
->page
&& Globals
.isBook
)
1334 PostMessageW(hWnd
, WM_COMMAND
, MNID_FILE_OPEN
, 0);
1335 win
->hMainWnd
= hWnd
;
1338 case WM_WINDOWPOSCHANGED
:
1339 WINHELP_LayoutMainWindow((WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0));
1343 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1344 switch (LOWORD(wParam
))
1347 case MNID_FILE_OPEN
: MACRO_FileOpen(); break;
1348 case MNID_FILE_PRINT
: MACRO_Print(); break;
1349 case MNID_FILE_SETUP
: MACRO_PrinterSetup(); break;
1350 case MNID_FILE_EXIT
: MACRO_Exit(); break;
1353 case MNID_EDIT_COPYDLG
:
1354 SendDlgItemMessageW(hWnd
, CTL_ID_TEXT
, WM_COPY
, 0, 0);
1356 case MNID_EDIT_ANNOTATE
:MACRO_Annotate(); break;
1359 case MNID_BKMK_DEFINE
: MACRO_BookmarkDefine(); break;
1362 case MNID_HELP_HELPON
: MACRO_HelpOn(); break;
1363 case MNID_HELP_HELPTOP
: MACRO_HelpOnTop(); break;
1364 case MNID_HELP_ABOUT
: MACRO_About(); break;
1367 case MNID_CTXT_ANNOTATE
:MACRO_Annotate(); break;
1368 case MNID_CTXT_COPY
: MACRO_CopyDialog(); break;
1369 case MNID_CTXT_PRINT
: MACRO_Print(); break;
1370 case MNID_OPTS_HISTORY
: MACRO_History(); break;
1371 case MNID_OPTS_FONTS_SMALL
:
1372 case MNID_CTXT_FONTS_SMALL
:
1373 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1374 if (win
->font_scale
!= 0)
1376 win
->font_scale
= 0;
1377 WINHELP_SetupText(GetDlgItem(hWnd
, CTL_ID_TEXT
), win
, 0 /* FIXME */);
1380 case MNID_OPTS_FONTS_NORMAL
:
1381 case MNID_CTXT_FONTS_NORMAL
:
1382 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1383 if (win
->font_scale
!= 1)
1385 win
->font_scale
= 1;
1386 WINHELP_SetupText(GetDlgItem(hWnd
, CTL_ID_TEXT
), win
, 0 /* FIXME */);
1389 case MNID_OPTS_FONTS_LARGE
:
1390 case MNID_CTXT_FONTS_LARGE
:
1391 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1392 if (win
->font_scale
!= 2)
1394 win
->font_scale
= 2;
1395 WINHELP_SetupText(GetDlgItem(hWnd
, CTL_ID_TEXT
), win
, 0 /* FIXME */);
1401 for (button
= win
->first_button
; button
; button
= button
->next
)
1402 if (wParam
== button
->wParam
) break;
1404 MACRO_ExecuteMacro(win
, button
->lpszMacro
);
1405 else if (!HIWORD(wParam
))
1406 MessageBoxW(0, MAKEINTRESOURCEW(STID_NOT_IMPLEMENTED
),
1407 MAKEINTRESOURCEW(STID_WHERROR
), MB_OK
);
1411 /* EPP case WM_DESTROY: */
1412 /* EPP if (Globals.hPopupWnd) DestroyWindow(Globals.hPopupWnd); */
1415 return WINHELP_HandleCommand((HWND
)wParam
, lParam
);
1420 SendDlgItemMessageW(hWnd
, CTL_ID_TEXT
, WM_COPY
, 0, 0);
1426 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1427 hTextWnd
= GetDlgItem(win
->hMainWnd
, CTL_ID_TEXT
);
1432 SendMessageW(hTextWnd
, EM_SCROLL
, SB_LINEUP
, 0);
1435 SendMessageW(hTextWnd
, EM_SCROLL
, SB_LINEDOWN
, 0);
1438 SendMessageW(hTextWnd
, EM_SCROLL
, SB_PAGEUP
, 0);
1441 SendMessageW(hTextWnd
, EM_SCROLL
, SB_PAGEDOWN
, 0);
1450 if (wParam
== CTL_ID_TEXT
)
1454 switch (((NMHDR
*)lParam
)->code
)
1458 const MSGFILTER
* msgf
= (const MSGFILTER
*)lParam
;
1462 if (msgf
->wParam
== VK_ESCAPE
)
1463 WINHELP_ReleaseWindow((WINHELP_WINDOW
*)GetWindowLongPtrW(hWnd
, 0));
1465 case WM_RBUTTONDOWN
:
1470 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1471 hMenu
= LoadMenuW(Globals
.hInstance
, MAKEINTRESOURCEW(CONTEXT_MENU
));
1472 switch (win
->font_scale
)
1475 CheckMenuItem(hMenu
, MNID_CTXT_FONTS_SMALL
,
1476 MF_BYCOMMAND
|MF_CHECKED
);
1479 WINE_FIXME("Unsupported %d\n", win
->font_scale
);
1482 CheckMenuItem(hMenu
, MNID_CTXT_FONTS_NORMAL
,
1483 MF_BYCOMMAND
|MF_CHECKED
);
1486 CheckMenuItem(hMenu
, MNID_CTXT_FONTS_LARGE
,
1487 MF_BYCOMMAND
|MF_CHECKED
);
1490 pt
.x
= (int)(short)LOWORD(msgf
->lParam
);
1491 pt
.y
= (int)(short)HIWORD(msgf
->lParam
);
1492 ClientToScreen(msgf
->nmhdr
.hwndFrom
, &pt
);
1493 TrackPopupMenu(GetSubMenu(hMenu
, 0), TPM_LEFTALIGN
|TPM_TOPALIGN
,
1494 pt
.x
, pt
.y
, 0, hWnd
, NULL
);
1499 return WINHELP_HandleTextMouse((WINHELP_WINDOW
*)GetWindowLongPtrW(hWnd
, 0),
1500 msgf
->msg
, msgf
->lParam
);
1505 case EN_REQUESTRESIZE
:
1506 rc
= ((REQRESIZE
*)lParam
)->rc
;
1507 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1508 AdjustWindowRect(&rc
, GetWindowLongW(win
->hMainWnd
, GWL_STYLE
),
1510 SetWindowPos(win
->hMainWnd
, HWND_TOP
, 0, 0,
1511 rc
.right
- rc
.left
, rc
.bottom
- rc
.top
,
1512 SWP_NOMOVE
| SWP_NOZORDER
);
1513 WINHELP_LayoutMainWindow(win
);
1519 case WM_INITMENUPOPUP
:
1520 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1521 CheckMenuItem((HMENU
)wParam
, MNID_OPTS_FONTS_SMALL
,
1522 MF_BYCOMMAND
| (win
->font_scale
== 0) ? MF_CHECKED
: 0);
1523 CheckMenuItem((HMENU
)wParam
, MNID_OPTS_FONTS_NORMAL
,
1524 MF_BYCOMMAND
| (win
->font_scale
== 1) ? MF_CHECKED
: 0);
1525 CheckMenuItem((HMENU
)wParam
, MNID_OPTS_FONTS_LARGE
,
1526 MF_BYCOMMAND
| (win
->font_scale
== 2) ? MF_CHECKED
: 0);
1529 win
= (WINHELP_WINDOW
*) GetWindowLongPtrW(hWnd
, 0);
1530 WINHELP_DeleteWindow(win
);
1533 return DefWindowProcA(hWnd
, msg
, wParam
, lParam
);
1536 /**************************************************************************
1537 * WINHELP_CreateIndexWindow
1539 * Displays a dialog with keywords of current help file.
1542 BOOL
WINHELP_CreateIndexWindow(BOOL is_search
)
1544 HPROPSHEETPAGE psPage
[3];
1546 PROPSHEETHEADERA psHead
;
1547 struct index_data id
;
1550 if (Globals
.active_win
&& Globals
.active_win
->page
&& Globals
.active_win
->page
->file
)
1551 id
.hlpfile
= Globals
.active_win
->page
->file
;
1555 if (id
.hlpfile
->kwbtree
== NULL
)
1557 WINE_TRACE("No index provided\n");
1561 InitCommonControls();
1564 memset(&psp
, 0, sizeof(psp
));
1565 psp
.dwSize
= sizeof(psp
);
1567 psp
.hInstance
= Globals
.hInstance
;
1569 psp
.u
.pszTemplate
= MAKEINTRESOURCEA(IDD_INDEX
);
1570 psp
.lParam
= (LPARAM
)&id
;
1571 psp
.pfnDlgProc
= WINHELP_IndexDlgProc
;
1572 psPage
[0] = CreatePropertySheetPageA(&psp
);
1574 psp
.u
.pszTemplate
= MAKEINTRESOURCEA(IDD_SEARCH
);
1575 psp
.lParam
= (LPARAM
)&id
;
1576 psp
.pfnDlgProc
= WINHELP_SearchDlgProc
;
1577 psPage
[1] = CreatePropertySheetPageA(&psp
);
1579 memset(&psHead
, 0, sizeof(psHead
));
1580 psHead
.dwSize
= sizeof(psHead
);
1582 LoadStringA(Globals
.hInstance
, STID_PSH_INDEX
, buf
, sizeof(buf
));
1583 strcat(buf
, Globals
.active_win
->info
->caption
);
1585 psHead
.pszCaption
= buf
;
1587 psHead
.u2
.nStartPage
= is_search
? 1 : 0;
1588 psHead
.hwndParent
= Globals
.active_win
->hMainWnd
;
1589 psHead
.u3
.phpage
= psPage
;
1590 psHead
.dwFlags
= PSH_NOAPPLYNOW
;
1592 PropertySheetA(&psHead
);
1595 WINE_TRACE("got %d as an offset\n", id
.offset
);
1596 WINHELP_OpenHelpWindow(HLPFILE_PageByOffset
, id
.hlpfile
, id
.offset
,
1597 Globals
.active_win
->info
, SW_NORMAL
);
1602 /***********************************************************************
1604 * RegisterWinClasses
1606 static BOOL
WINHELP_RegisterWinClasses(void)
1608 WNDCLASSEXA class_main
, class_button_box
, class_history
;
1610 class_main
.cbSize
= sizeof(class_main
);
1611 class_main
.style
= CS_HREDRAW
| CS_VREDRAW
;
1612 class_main
.lpfnWndProc
= WINHELP_MainWndProc
;
1613 class_main
.cbClsExtra
= 0;
1614 class_main
.cbWndExtra
= sizeof(WINHELP_WINDOW
*);
1615 class_main
.hInstance
= Globals
.hInstance
;
1616 class_main
.hIcon
= LoadIconW(Globals
.hInstance
, MAKEINTRESOURCEW(IDI_WINHELP
));
1617 class_main
.hCursor
= LoadCursorW(0, (LPWSTR
)IDC_ARROW
);
1618 class_main
.hbrBackground
= (HBRUSH
)(COLOR_WINDOW
+1);
1619 class_main
.lpszMenuName
= 0;
1620 class_main
.lpszClassName
= MAIN_WIN_CLASS_NAME
;
1621 class_main
.hIconSm
= LoadImageW(Globals
.hInstance
, MAKEINTRESOURCEW(IDI_WINHELP
), IMAGE_ICON
,
1622 GetSystemMetrics(SM_CXSMICON
), GetSystemMetrics(SM_CYSMICON
),
1625 class_button_box
= class_main
;
1626 class_button_box
.lpfnWndProc
= WINHELP_ButtonBoxWndProc
;
1627 class_button_box
.cbWndExtra
= 0;
1628 class_button_box
.hbrBackground
= (HBRUSH
)(COLOR_BTNFACE
+1);
1629 class_button_box
.lpszClassName
= BUTTON_BOX_WIN_CLASS_NAME
;
1631 class_history
= class_main
;
1632 class_history
.lpfnWndProc
= WINHELP_HistoryWndProc
;
1633 class_history
.lpszClassName
= HISTORY_WIN_CLASS_NAME
;
1635 return (RegisterClassExA(&class_main
) &&
1636 RegisterClassExA(&class_button_box
) &&
1637 RegisterClassExA(&class_history
));
1640 /***********************************************************************
1644 int PASCAL
WinMain(HINSTANCE hInstance
, HINSTANCE prev
, LPSTR cmdline
, int show
)
1649 static CHAR default_wndname
[] = "main";
1650 LPSTR wndname
= default_wndname
;
1654 Globals
.hInstance
= hInstance
;
1656 if (LoadLibraryA("riched20.dll") == NULL
)
1657 return MessageBoxW(0, MAKEINTRESOURCEW(STID_NO_RICHEDIT
),
1658 MAKEINTRESOURCEW(STID_WHERROR
), MB_OK
);
1661 while (*cmdline
&& (*cmdline
== ' ' || *cmdline
== '-'))
1665 if (*cmdline
++ == ' ') continue;
1668 if (option
) cmdline
++;
1669 while (*cmdline
&& *cmdline
== ' ') cmdline
++;
1675 while (*cmdline
&& *cmdline
!= ' ') cmdline
++;
1676 if (*cmdline
) *cmdline
++ = '\0';
1677 lHash
= HLPFILE_Hash(topic_id
);
1682 Globals
.wVersion
= option
- '0';
1687 Globals
.isBook
= FALSE
;
1691 WINE_FIXME("Unsupported cmd line: %s\n", cmdline
);
1696 /* Create primary window */
1697 if (!WINHELP_RegisterWinClasses())
1699 WINE_FIXME("Couldn't register classes\n");
1706 if ((*cmdline
== '"') && (ptr
= strchr(cmdline
+1, '"')))
1711 if ((ptr
= strchr(cmdline
, '>')))
1716 hlpfile
= WINHELP_LookupHelpFile(cmdline
);
1717 if (!hlpfile
) return 0;
1719 else hlpfile
= NULL
;
1720 WINHELP_OpenHelpWindow(HLPFILE_PageByHash
, hlpfile
, lHash
,
1721 WINHELP_GetWindowInfo(hlpfile
, wndname
), show
);
1724 hAccel
= LoadAcceleratorsW(hInstance
, MAKEINTRESOURCEW(MAIN_ACCEL
));
1725 while ((Globals
.win_list
|| Globals
.active_popup
) && GetMessageW(&msg
, 0, 0, 0))
1727 HWND hWnd
= Globals
.active_win
? Globals
.active_win
->hMainWnd
: NULL
;
1728 if (!TranslateAcceleratorW(hWnd
, hAccel
, &msg
))
1730 TranslateMessage(&msg
);
1731 DispatchMessageW(&msg
);
1734 for (dll
= Globals
.dlls
; dll
; dll
= dll
->next
)
1736 if (dll
->class & DC_INITTERM
) dll
->handler(DW_TERM
, 0, 0);