hhctrl.ocx: Make the Index tab functional.
[wine] / dlls / hhctrl.ocx / help.c
1 /*
2  * Help Viewer Implementation
3  *
4  * Copyright 2005 James Hawkins
5  * Copyright 2007 Jacek Caban for CodeWeavers
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 #include "hhctrl.h"
23
24 #include "wingdi.h"
25 #include "commctrl.h"
26 #include "wininet.h"
27
28 #include "wine/debug.h"
29
30 #include "resource.h"
31
32 WINE_DEFAULT_DEBUG_CHANNEL(htmlhelp);
33
34 static LRESULT Help_OnSize(HWND hWnd);
35
36 /* Window type defaults */
37
38 #define WINTYPE_DEFAULT_X           280
39 #define WINTYPE_DEFAULT_Y           100
40 #define WINTYPE_DEFAULT_WIDTH       740
41 #define WINTYPE_DEFAULT_HEIGHT      640
42 #define WINTYPE_DEFAULT_NAVWIDTH    250
43
44 #define TAB_TOP_PADDING     8
45 #define TAB_RIGHT_PADDING   4
46 #define TAB_MARGIN  8
47
48 static const WCHAR szEmpty[] = {0};
49
50 /* Loads a string from the resource file */
51 static LPWSTR HH_LoadString(DWORD dwID)
52 {
53     LPWSTR string = NULL;
54     LPCWSTR stringresource;
55     int iSize;
56
57     iSize = LoadStringW(hhctrl_hinstance, dwID, (LPWSTR)&stringresource, 0);
58
59     string = heap_alloc((iSize + 2) * sizeof(WCHAR)); /* some strings (tab text) needs double-null termination */
60     memcpy(string, stringresource, iSize*sizeof(WCHAR));
61     string[iSize] = 0;
62
63     return string;
64 }
65
66 static HRESULT navigate_url(HHInfo *info, LPCWSTR surl)
67 {
68     VARIANT url;
69     HRESULT hres;
70
71     TRACE("%s\n", debugstr_w(surl));
72
73     V_VT(&url) = VT_BSTR;
74     V_BSTR(&url) = SysAllocString(surl);
75
76     hres = IWebBrowser2_Navigate2(info->web_browser, &url, 0, 0, 0, 0);
77
78     VariantClear(&url);
79
80     if(FAILED(hres))
81         TRACE("Navigation failed: %08x\n", hres);
82
83     return hres;
84 }
85
86 BOOL NavigateToUrl(HHInfo *info, LPCWSTR surl)
87 {
88     ChmPath chm_path;
89     BOOL ret;
90     HRESULT hres;
91
92     static const WCHAR url_indicator[] = {':', '/', '/', 0};
93
94     TRACE("%s\n", debugstr_w(surl));
95
96     if (strstrW(surl, url_indicator)) {
97         hres = navigate_url(info, surl);
98         if(SUCCEEDED(hres))
99             return TRUE;
100     } /* look up in chm if it doesn't look like a full url */
101
102     SetChmPath(&chm_path, info->pCHMInfo->szFile, surl);
103     ret = NavigateToChm(info, chm_path.chm_file, chm_path.chm_index);
104
105     heap_free(chm_path.chm_file);
106     heap_free(chm_path.chm_index);
107
108     return ret;
109 }
110
111 BOOL NavigateToChm(HHInfo *info, LPCWSTR file, LPCWSTR index)
112 {
113     WCHAR buf[INTERNET_MAX_URL_LENGTH];
114     WCHAR full_path[MAX_PATH];
115     LPWSTR ptr;
116
117     static const WCHAR url_format[] =
118         {'m','k',':','@','M','S','I','T','S','t','o','r','e',':','%','s',':',':','%','s','%','s',0};
119     static const WCHAR slash[] = {'/',0};
120     static const WCHAR empty[] = {0};
121
122     TRACE("%p %s %s\n", info, debugstr_w(file), debugstr_w(index));
123
124     if (!info->web_browser)
125         return FALSE;
126
127     if(!GetFullPathNameW(file, sizeof(full_path)/sizeof(full_path[0]), full_path, NULL)) {
128         WARN("GetFullPathName failed: %u\n", GetLastError());
129         return FALSE;
130     }
131
132     wsprintfW(buf, url_format, full_path, (!index || index[0] == '/') ? empty : slash, index);
133
134     /* FIXME: HACK */
135     if((ptr = strchrW(buf, '#')))
136        *ptr = 0;
137
138     return SUCCEEDED(navigate_url(info, buf));
139 }
140
141 /* Size Bar */
142
143 #define SIZEBAR_WIDTH   4
144
145 static const WCHAR szSizeBarClass[] = {
146     'H','H',' ','S','i','z','e','B','a','r',0
147 };
148
149 /* Draw the SizeBar */
150 static void SB_OnPaint(HWND hWnd)
151 {
152     PAINTSTRUCT ps;
153     HDC hdc;
154     RECT rc;
155     
156     hdc = BeginPaint(hWnd, &ps);
157
158     GetClientRect(hWnd, &rc);
159
160     /* dark frame */
161     rc.right += 1;
162     rc.bottom -= 1;
163     FrameRect(hdc, &rc, GetStockObject(GRAY_BRUSH));
164
165     /* white highlight */
166     SelectObject(hdc, GetStockObject(WHITE_PEN));
167     MoveToEx(hdc, rc.right, 1, NULL);
168     LineTo(hdc, 1, 1);
169     LineTo(hdc, 1, rc.bottom - 1);
170
171     
172     MoveToEx(hdc, 0, rc.bottom, NULL);
173     LineTo(hdc, rc.right, rc.bottom);
174
175     EndPaint(hWnd, &ps);
176 }
177
178 static void SB_OnLButtonDown(HWND hWnd, WPARAM wParam, LPARAM lParam)
179 {
180     SetCapture(hWnd);
181 }
182
183 static void SB_OnLButtonUp(HWND hWnd, WPARAM wParam, LPARAM lParam)
184 {
185     HHInfo *pHHInfo = (HHInfo *)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
186     POINT pt;
187
188     pt.x = (short)LOWORD(lParam);
189     pt.y = (short)HIWORD(lParam);
190
191     /* update the window sizes */
192     pHHInfo->WinType.iNavWidth += pt.x;
193     Help_OnSize(hWnd);
194
195     ReleaseCapture();
196 }
197
198 static void SB_OnMouseMove(HWND hWnd, WPARAM wParam, LPARAM lParam)
199 {
200     /* ignore WM_MOUSEMOVE if not dragging the SizeBar */
201     if (!(wParam & MK_LBUTTON))
202         return;
203 }
204
205 static LRESULT CALLBACK SizeBar_WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
206 {
207     switch (message)
208     {
209         case WM_LBUTTONDOWN:
210             SB_OnLButtonDown(hWnd, wParam, lParam);
211             break;
212         case WM_LBUTTONUP:
213             SB_OnLButtonUp(hWnd, wParam, lParam);
214             break;
215         case WM_MOUSEMOVE:
216             SB_OnMouseMove(hWnd, wParam, lParam);
217             break;
218         case WM_PAINT:
219             SB_OnPaint(hWnd);
220             break;
221         default:
222             return DefWindowProcW(hWnd, message, wParam, lParam);
223     }
224
225     return 0;
226 }
227
228 static void HH_RegisterSizeBarClass(HHInfo *pHHInfo)
229 {
230     WNDCLASSEXW wcex;
231
232     wcex.cbSize         = sizeof(WNDCLASSEXW);
233     wcex.style          = 0;
234     wcex.lpfnWndProc    = SizeBar_WndProc;
235     wcex.cbClsExtra     = 0;
236     wcex.cbWndExtra     = 0;
237     wcex.hInstance      = hhctrl_hinstance;
238     wcex.hIcon          = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
239     wcex.hCursor        = LoadCursorW(NULL, (LPCWSTR)IDC_SIZEWE);
240     wcex.hbrBackground  = (HBRUSH)(COLOR_MENU + 1);
241     wcex.lpszMenuName   = NULL;
242     wcex.lpszClassName  = szSizeBarClass;
243     wcex.hIconSm        = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
244
245     RegisterClassExW(&wcex);
246 }
247
248 static void SB_GetSizeBarRect(HHInfo *info, RECT *rc)
249 {
250     RECT rectWND, rectTB, rectNP;
251
252     GetClientRect(info->WinType.hwndHelp, &rectWND);
253     GetClientRect(info->WinType.hwndToolBar, &rectTB);
254     GetClientRect(info->WinType.hwndNavigation, &rectNP);
255
256     rc->left = rectNP.right;
257     rc->top = rectTB.bottom;
258     rc->bottom = rectWND.bottom - rectTB.bottom;
259     rc->right = SIZEBAR_WIDTH;
260 }
261
262 static BOOL HH_AddSizeBar(HHInfo *pHHInfo)
263 {
264     HWND hWnd;
265     HWND hwndParent = pHHInfo->WinType.hwndHelp;
266     DWORD dwStyles = WS_CHILDWINDOW | WS_VISIBLE | WS_OVERLAPPED;
267     DWORD dwExStyles = WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR;
268     RECT rc;
269
270     SB_GetSizeBarRect(pHHInfo, &rc);
271
272     hWnd = CreateWindowExW(dwExStyles, szSizeBarClass, szEmpty, dwStyles,
273                            rc.left, rc.top, rc.right, rc.bottom,
274                            hwndParent, NULL, hhctrl_hinstance, NULL);
275     if (!hWnd)
276         return FALSE;
277
278     /* store the pointer to the HH info struct */
279     SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LONG_PTR)pHHInfo);
280
281     pHHInfo->hwndSizeBar = hWnd;
282     return TRUE;
283 }
284
285 /* Child Window */
286
287 static const WCHAR szChildClass[] = {
288     'H','H',' ','C','h','i','l','d',0
289 };
290
291 static LRESULT Child_OnPaint(HWND hWnd)
292 {
293     PAINTSTRUCT ps;
294     HDC hdc;
295     RECT rc;
296
297     hdc = BeginPaint(hWnd, &ps);
298
299     /* Only paint the Navigation pane, identified by the fact
300      * that it has a child window
301      */
302     if (GetWindow(hWnd, GW_CHILD))
303     {
304         GetClientRect(hWnd, &rc);
305
306         /* set the border color */
307         SelectObject(hdc, GetStockObject(DC_PEN));
308         SetDCPenColor(hdc, GetSysColor(COLOR_BTNSHADOW));
309
310         /* Draw the top border */
311         LineTo(hdc, rc.right, 0);
312
313         SelectObject(hdc, GetStockObject(WHITE_PEN));
314         MoveToEx(hdc, 0, 1, NULL);
315         LineTo(hdc, rc.right, 1);
316     }
317
318     EndPaint(hWnd, &ps);
319
320     return 0;
321 }
322
323 static void ResizeTabChild(HHInfo *info, int tab)
324 {
325     HWND hwnd = info->tabs[tab].hwnd;
326     INT width, height;
327     RECT rect, tabrc;
328     DWORD cnt;
329
330     GetClientRect(info->WinType.hwndNavigation, &rect);
331     SendMessageW(info->hwndTabCtrl, TCM_GETITEMRECT, 0, (LPARAM)&tabrc);
332     cnt = SendMessageW(info->hwndTabCtrl, TCM_GETROWCOUNT, 0, 0);
333
334     rect.left = TAB_MARGIN;
335     rect.top = TAB_TOP_PADDING + cnt*(tabrc.bottom-tabrc.top) + TAB_MARGIN;
336     rect.right -= TAB_RIGHT_PADDING + TAB_MARGIN;
337     rect.bottom -= TAB_MARGIN;
338     width = rect.right-rect.left;
339     height = rect.bottom-rect.top;
340
341     SetWindowPos(hwnd, NULL, rect.left, rect.top, width, height,
342                  SWP_NOZORDER | SWP_NOACTIVATE);
343
344     /* Resize the tab widget column to perfectly fit the tab window and
345      * leave sufficient space for the scroll widget.
346      */
347     switch (tab)
348     {
349     case TAB_INDEX: {
350         int scroll_width = GetSystemMetrics(SM_CXVSCROLL);
351         int border_width = GetSystemMetrics(SM_CXBORDER);
352         int edge_width = GetSystemMetrics(SM_CXEDGE);
353
354         SendMessageW(info->tabs[TAB_INDEX].hwnd, LVM_SETCOLUMNWIDTH, 0,
355                      width-scroll_width-2*border_width-2*edge_width);
356
357         break;
358     }
359     }
360 }
361
362 static LRESULT Child_OnSize(HWND hwnd)
363 {
364     HHInfo *info = (HHInfo*)GetWindowLongPtrW(hwnd, GWLP_USERDATA);
365     RECT rect;
366
367     if(!info || hwnd != info->WinType.hwndNavigation)
368         return 0;
369
370     GetClientRect(hwnd, &rect);
371     SetWindowPos(info->hwndTabCtrl, HWND_TOP, 0, 0,
372                  rect.right - TAB_RIGHT_PADDING,
373                  rect.bottom - TAB_TOP_PADDING, SWP_NOMOVE);
374
375     ResizeTabChild(info, TAB_CONTENTS);
376     ResizeTabChild(info, TAB_INDEX);
377     return 0;
378 }
379
380 static LRESULT OnTabChange(HWND hwnd)
381 {
382     HHInfo *info = (HHInfo*)GetWindowLongPtrW(hwnd, GWLP_USERDATA);
383
384     TRACE("%p\n", hwnd);
385
386     if (!info)
387         return 0;
388
389     if(info->tabs[info->current_tab].hwnd)
390         ShowWindow(info->tabs[info->current_tab].hwnd, SW_HIDE);
391
392     info->current_tab = SendMessageW(info->hwndTabCtrl, TCM_GETCURSEL, 0, 0);
393
394     if(info->tabs[info->current_tab].hwnd)
395         ShowWindow(info->tabs[info->current_tab].hwnd, SW_SHOW);
396
397     return 0;
398 }
399
400 static LRESULT OnTopicChange(HWND hwnd, void *user_data)
401 {
402     HHInfo *info = (HHInfo*)GetWindowLongPtrW(hwnd, GWLP_USERDATA);
403     LPCWSTR chmfile = NULL, name = NULL, local = NULL;
404     ContentItem *citer;
405     IndexItem *iiter;
406
407     if(!user_data || !info)
408         return 0;
409
410     switch (info->current_tab)
411     {
412     case TAB_CONTENTS:
413         citer = (ContentItem *) user_data;
414         name = citer->name;
415         local = citer->local;
416         while(citer) {
417             if(citer->merge.chm_file) {
418                 chmfile = citer->merge.chm_file;
419                 break;
420             }
421             citer = citer->parent;
422         }
423         chmfile = citer->merge.chm_file;
424         break;
425     case TAB_INDEX:
426         iiter = (IndexItem *) user_data;
427         if(iiter->nItems == 0) {
428             FIXME("No entries for this item!\n");
429             return 0;
430         }
431         if(iiter->nItems > 1) {
432             FIXME("Support for sub-topics not implemented.\n");
433             return 0;
434         }
435         name = iiter->items[0].name;
436         local = iiter->items[0].local;
437         chmfile = iiter->merge.chm_file;
438         break;
439     default:
440         FIXME("Unhandled operation for this tab!\n");
441         return 0;
442     }
443
444     TRACE("name %s loal %s\n", debugstr_w(name), debugstr_w(local));
445
446     NavigateToChm(info, chmfile, local);
447     return 0;
448 }
449
450 static LRESULT CALLBACK Child_WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
451 {
452     switch (message)
453     {
454     case WM_PAINT:
455         return Child_OnPaint(hWnd);
456     case WM_SIZE:
457         return Child_OnSize(hWnd);
458     case WM_NOTIFY: {
459         NMHDR *nmhdr = (NMHDR*)lParam;
460         switch(nmhdr->code) {
461         case TCN_SELCHANGE:
462             return OnTabChange(hWnd);
463         case TVN_SELCHANGEDW:
464             return OnTopicChange(hWnd, (void*)((NMTREEVIEWW *)lParam)->itemNew.lParam);
465         case NM_DBLCLK:
466             return OnTopicChange(hWnd, (void*)((NMITEMACTIVATE *)lParam)->lParam);
467         }
468         break;
469     }
470     default:
471         return DefWindowProcW(hWnd, message, wParam, lParam);
472     }
473
474     return 0;
475 }
476
477 static void HH_RegisterChildWndClass(HHInfo *pHHInfo)
478 {
479     WNDCLASSEXW wcex;
480
481     wcex.cbSize         = sizeof(WNDCLASSEXW);
482     wcex.style          = 0;
483     wcex.lpfnWndProc    = Child_WndProc;
484     wcex.cbClsExtra     = 0;
485     wcex.cbWndExtra     = 0;
486     wcex.hInstance      = hhctrl_hinstance;
487     wcex.hIcon          = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
488     wcex.hCursor        = LoadCursorW(NULL, (LPCWSTR)IDC_ARROW);
489     wcex.hbrBackground  = (HBRUSH)(COLOR_BTNFACE + 1);
490     wcex.lpszMenuName   = NULL;
491     wcex.lpszClassName  = szChildClass;
492     wcex.hIconSm        = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
493
494     RegisterClassExW(&wcex);
495 }
496
497 /* Toolbar */
498
499 #define ICON_SIZE   20
500
501 static void TB_OnClick(HWND hWnd, DWORD dwID)
502 {
503     HHInfo *info = (HHInfo *)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
504
505     switch (dwID)
506     {
507         case IDTB_STOP:
508             DoPageAction(info, WB_STOP);
509             break;
510         case IDTB_REFRESH:
511             DoPageAction(info, WB_REFRESH);
512             break;
513         case IDTB_BACK:
514             DoPageAction(info, WB_GOBACK);
515             break;
516         case IDTB_HOME:
517             NavigateToChm(info, info->pCHMInfo->szFile, info->WinType.pszHome);
518             break;
519         case IDTB_FORWARD:
520             DoPageAction(info, WB_GOFORWARD);
521             break;
522         case IDTB_EXPAND:
523         case IDTB_CONTRACT:
524         case IDTB_SYNC:
525         case IDTB_PRINT:
526         case IDTB_OPTIONS:
527         case IDTB_BROWSE_FWD:
528         case IDTB_BROWSE_BACK:
529         case IDTB_JUMP1:
530         case IDTB_JUMP2:
531         case IDTB_CUSTOMIZE:
532         case IDTB_ZOOM:
533         case IDTB_TOC_NEXT:
534         case IDTB_TOC_PREV:
535             break;
536     }
537 }
538
539 static void TB_AddButton(TBBUTTON *pButtons, DWORD dwIndex, DWORD dwID)
540 {
541     /* FIXME: Load the correct button bitmaps */
542     pButtons[dwIndex].iBitmap = STD_PRINT;
543     pButtons[dwIndex].idCommand = dwID;
544     pButtons[dwIndex].fsState = TBSTATE_ENABLED;
545     pButtons[dwIndex].fsStyle = BTNS_BUTTON;
546     pButtons[dwIndex].dwData = 0;
547     pButtons[dwIndex].iString = 0;
548 }
549
550 static void TB_AddButtonsFromFlags(TBBUTTON *pButtons, DWORD dwButtonFlags, LPDWORD pdwNumButtons)
551 {
552     *pdwNumButtons = 0;
553
554     if (dwButtonFlags & HHWIN_BUTTON_EXPAND)
555         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_EXPAND);
556
557     if (dwButtonFlags & HHWIN_BUTTON_BACK)
558         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_BACK);
559
560     if (dwButtonFlags & HHWIN_BUTTON_FORWARD)
561         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_FORWARD);
562
563     if (dwButtonFlags & HHWIN_BUTTON_STOP)
564         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_STOP);
565
566     if (dwButtonFlags & HHWIN_BUTTON_REFRESH)
567         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_REFRESH);
568
569     if (dwButtonFlags & HHWIN_BUTTON_HOME)
570         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_HOME);
571
572     if (dwButtonFlags & HHWIN_BUTTON_SYNC)
573         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_SYNC);
574
575     if (dwButtonFlags & HHWIN_BUTTON_OPTIONS)
576         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_OPTIONS);
577
578     if (dwButtonFlags & HHWIN_BUTTON_PRINT)
579         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_PRINT);
580
581     if (dwButtonFlags & HHWIN_BUTTON_JUMP1)
582         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_JUMP1);
583
584     if (dwButtonFlags & HHWIN_BUTTON_JUMP2)
585         TB_AddButton(pButtons,(*pdwNumButtons)++, IDTB_JUMP2);
586
587     if (dwButtonFlags & HHWIN_BUTTON_ZOOM)
588         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_ZOOM);
589
590     if (dwButtonFlags & HHWIN_BUTTON_TOC_NEXT)
591         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_TOC_NEXT);
592
593     if (dwButtonFlags & HHWIN_BUTTON_TOC_PREV)
594         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_TOC_PREV);
595 }
596
597 static BOOL HH_AddToolbar(HHInfo *pHHInfo)
598 {
599     HWND hToolbar;
600     HWND hwndParent = pHHInfo->WinType.hwndHelp;
601     DWORD toolbarFlags;
602     TBBUTTON buttons[IDTB_TOC_PREV - IDTB_EXPAND];
603     TBADDBITMAP tbAB;
604     DWORD dwStyles, dwExStyles;
605     DWORD dwNumButtons, dwIndex;
606
607     if (pHHInfo->WinType.fsWinProperties & HHWIN_PARAM_TB_FLAGS)
608         toolbarFlags = pHHInfo->WinType.fsToolBarFlags;
609     else
610         toolbarFlags = HHWIN_DEF_BUTTONS;
611
612     TB_AddButtonsFromFlags(buttons, toolbarFlags, &dwNumButtons);
613
614     dwStyles = WS_CHILDWINDOW | WS_VISIBLE | TBSTYLE_FLAT |
615                TBSTYLE_WRAPABLE | TBSTYLE_TOOLTIPS | CCS_NODIVIDER;
616     dwExStyles = WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR;
617
618     hToolbar = CreateWindowExW(dwExStyles, TOOLBARCLASSNAMEW, NULL, dwStyles,
619                                0, 0, 0, 0, hwndParent, NULL,
620                                hhctrl_hinstance, NULL);
621     if (!hToolbar)
622         return FALSE;
623
624     SendMessageW(hToolbar, TB_SETBITMAPSIZE, 0, MAKELONG(ICON_SIZE, ICON_SIZE));
625     SendMessageW(hToolbar, TB_BUTTONSTRUCTSIZE, sizeof(TBBUTTON), 0);
626     SendMessageW(hToolbar, WM_SETFONT, (WPARAM)pHHInfo->hFont, TRUE);
627
628     /* FIXME: Load correct icons for all buttons */
629     tbAB.hInst = HINST_COMMCTRL;
630     tbAB.nID = IDB_STD_LARGE_COLOR;
631     SendMessageW(hToolbar, TB_ADDBITMAP, 0, (LPARAM)&tbAB);
632
633     for (dwIndex = 0; dwIndex < dwNumButtons; dwIndex++)
634     {
635         LPWSTR szBuf = HH_LoadString(buttons[dwIndex].idCommand);
636         DWORD dwLen = strlenW(szBuf);
637         szBuf[dwLen + 1] = 0; /* Double-null terminate */
638
639         buttons[dwIndex].iString = (DWORD)SendMessageW(hToolbar, TB_ADDSTRINGW, 0, (LPARAM)szBuf);
640         heap_free(szBuf);
641     }
642
643     SendMessageW(hToolbar, TB_ADDBUTTONSW, dwNumButtons, (LPARAM)buttons);
644     SendMessageW(hToolbar, TB_AUTOSIZE, 0, 0);
645     ShowWindow(hToolbar, SW_SHOW);
646
647     pHHInfo->WinType.hwndToolBar = hToolbar;
648     return TRUE;
649 }
650
651 /* Navigation Pane */
652
653 static void NP_GetNavigationRect(HHInfo *pHHInfo, RECT *rc)
654 {
655     HWND hwndParent = pHHInfo->WinType.hwndHelp;
656     HWND hwndToolbar = pHHInfo->WinType.hwndToolBar;
657     RECT rectWND, rectTB;
658
659     GetClientRect(hwndParent, &rectWND);
660     GetClientRect(hwndToolbar, &rectTB);
661
662     rc->left = 0;
663     rc->top = rectTB.bottom;
664     rc->bottom = rectWND.bottom - rectTB.bottom;
665
666     if (!(pHHInfo->WinType.fsValidMembers & HHWIN_PARAM_NAV_WIDTH) &&
667           pHHInfo->WinType.iNavWidth == 0)
668     {
669         pHHInfo->WinType.iNavWidth = WINTYPE_DEFAULT_NAVWIDTH;
670     }
671
672     rc->right = pHHInfo->WinType.iNavWidth;
673 }
674
675 static DWORD NP_CreateTab(HINSTANCE hInstance, HWND hwndTabCtrl, DWORD index)
676 {
677     TCITEMW tie;
678     LPWSTR tabText = HH_LoadString(index);
679     DWORD ret;
680
681     tie.mask = TCIF_TEXT;
682     tie.pszText = tabText;
683
684     ret = SendMessageW( hwndTabCtrl, TCM_INSERTITEMW, index, (LPARAM)&tie );
685
686     heap_free(tabText);
687     return ret;
688 }
689
690 static BOOL HH_AddNavigationPane(HHInfo *info)
691 {
692     HWND hWnd, hwndTabCtrl;
693     HWND hwndParent = info->WinType.hwndHelp;
694     DWORD dwStyles = WS_CHILDWINDOW | WS_VISIBLE;
695     DWORD dwExStyles = WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR;
696     RECT rc;
697
698     NP_GetNavigationRect(info, &rc);
699
700     hWnd = CreateWindowExW(dwExStyles, szChildClass, szEmpty, dwStyles,
701                            rc.left, rc.top, rc.right, rc.bottom,
702                            hwndParent, NULL, hhctrl_hinstance, NULL);
703     if (!hWnd)
704         return FALSE;
705
706     SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LONG_PTR)info);
707
708     hwndTabCtrl = CreateWindowExW(dwExStyles, WC_TABCONTROLW, szEmpty, dwStyles,
709                                   0, TAB_TOP_PADDING,
710                                   rc.right - TAB_RIGHT_PADDING,
711                                   rc.bottom - TAB_TOP_PADDING,
712                                   hWnd, NULL, hhctrl_hinstance, NULL);
713     if (!hwndTabCtrl)
714         return FALSE;
715
716     if (*info->WinType.pszToc)
717         info->tabs[TAB_CONTENTS].id = NP_CreateTab(hhctrl_hinstance, hwndTabCtrl, IDS_CONTENTS);
718
719     if (*info->WinType.pszIndex)
720         info->tabs[TAB_INDEX].id = NP_CreateTab(hhctrl_hinstance, hwndTabCtrl, IDS_INDEX);
721
722     if (info->WinType.fsWinProperties & HHWIN_PROP_TAB_SEARCH)
723         info->tabs[TAB_SEARCH].id = NP_CreateTab(hhctrl_hinstance, hwndTabCtrl, IDS_SEARCH);
724
725     if (info->WinType.fsWinProperties & HHWIN_PROP_TAB_FAVORITES)
726         info->tabs[TAB_FAVORITES].id = NP_CreateTab(hhctrl_hinstance, hwndTabCtrl, IDS_FAVORITES);
727
728     SendMessageW(hwndTabCtrl, WM_SETFONT, (WPARAM)info->hFont, TRUE);
729
730     info->hwndTabCtrl = hwndTabCtrl;
731     info->WinType.hwndNavigation = hWnd;
732     return TRUE;
733 }
734
735 /* HTML Pane */
736
737 static void HP_GetHTMLRect(HHInfo *info, RECT *rc)
738 {
739     RECT rectTB, rectWND, rectNP, rectSB;
740
741     GetClientRect(info->WinType.hwndHelp, &rectWND);
742     GetClientRect(info->WinType.hwndToolBar, &rectTB);
743     GetClientRect(info->WinType.hwndNavigation, &rectNP);
744     GetClientRect(info->hwndSizeBar, &rectSB);
745
746     rc->left = rectNP.right + rectSB.right;
747     rc->top = rectTB.bottom;
748     rc->right = rectWND.right - rc->left;
749     rc->bottom = rectWND.bottom - rectTB.bottom;
750 }
751
752 static BOOL HH_AddHTMLPane(HHInfo *pHHInfo)
753 {
754     HWND hWnd;
755     HWND hwndParent = pHHInfo->WinType.hwndHelp;
756     DWORD dwStyles = WS_CHILDWINDOW | WS_VISIBLE | WS_CLIPCHILDREN;
757     DWORD dwExStyles = WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR | WS_EX_CLIENTEDGE;
758     RECT rc;
759
760     HP_GetHTMLRect(pHHInfo, &rc);
761
762     hWnd = CreateWindowExW(dwExStyles, szChildClass, szEmpty, dwStyles,
763                            rc.left, rc.top, rc.right, rc.bottom,
764                            hwndParent, NULL, hhctrl_hinstance, NULL);
765     if (!hWnd)
766         return FALSE;
767
768     if (!InitWebBrowser(pHHInfo, hWnd))
769         return FALSE;
770
771     /* store the pointer to the HH info struct */
772     SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LONG_PTR)pHHInfo);
773
774     ShowWindow(hWnd, SW_SHOW);
775     UpdateWindow(hWnd);
776
777     pHHInfo->WinType.hwndHTML = hWnd;
778     return TRUE;
779 }
780
781 static BOOL AddContentTab(HHInfo *info)
782 {
783     if(info->tabs[TAB_CONTENTS].id == -1)
784         return TRUE; /* No "Contents" tab */
785     info->tabs[TAB_CONTENTS].hwnd = CreateWindowExW(WS_EX_CLIENTEDGE, WC_TREEVIEWW,
786            szEmpty, WS_CHILD | WS_BORDER | 0x25, 50, 50, 100, 100,
787            info->WinType.hwndNavigation, NULL, hhctrl_hinstance, NULL);
788     if(!info->tabs[TAB_CONTENTS].hwnd) {
789         ERR("Could not create treeview control\n");
790         return FALSE;
791     }
792
793     ResizeTabChild(info, TAB_CONTENTS);
794     ShowWindow(info->tabs[TAB_CONTENTS].hwnd, SW_SHOW);
795
796     return TRUE;
797 }
798
799 static BOOL AddIndexTab(HHInfo *info)
800 {
801     char hidden_column[] = "Column";
802     LVCOLUMNA lvc;
803
804     if(info->tabs[TAB_INDEX].id == -1)
805         return TRUE; /* No "Index" tab */
806     info->tabs[TAB_INDEX].hwnd = CreateWindowExW(WS_EX_CLIENTEDGE, WC_LISTVIEWW,
807            szEmpty, WS_CHILD | WS_BORDER | LVS_SINGLESEL | LVS_REPORT | LVS_NOCOLUMNHEADER, 50, 50, 100, 100,
808            info->WinType.hwndNavigation, NULL, hhctrl_hinstance, NULL);
809     if(!info->tabs[TAB_INDEX].hwnd) {
810         ERR("Could not create ListView control\n");
811         return FALSE;
812     }
813     memset(&lvc, 0, sizeof(lvc));
814     lvc.mask = LVCF_TEXT;
815     lvc.pszText = hidden_column;
816     if(SendMessageW(info->tabs[TAB_INDEX].hwnd, LVM_INSERTCOLUMNA, 0, (LPARAM) &lvc) == -1)
817     {
818         ERR("Could not create ListView column\n");
819         return FALSE;
820     }
821
822     ResizeTabChild(info, TAB_INDEX);
823     ShowWindow(info->tabs[TAB_INDEX].hwnd, SW_HIDE);
824
825     return TRUE;
826 }
827
828 /* Viewer Window */
829
830 static LRESULT Help_OnSize(HWND hWnd)
831 {
832     HHInfo *pHHInfo = (HHInfo *)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
833     DWORD dwSize;
834     RECT rc;
835
836     if (!pHHInfo)
837         return 0;
838
839     NP_GetNavigationRect(pHHInfo, &rc);
840     SetWindowPos(pHHInfo->WinType.hwndNavigation, HWND_TOP, 0, 0,
841                  rc.right, rc.bottom, SWP_NOMOVE);
842
843     SB_GetSizeBarRect(pHHInfo, &rc);
844     SetWindowPos(pHHInfo->hwndSizeBar, HWND_TOP, rc.left, rc.top,
845                  rc.right, rc.bottom, SWP_SHOWWINDOW);
846
847     HP_GetHTMLRect(pHHInfo, &rc);
848     SetWindowPos(pHHInfo->WinType.hwndHTML, HWND_TOP, rc.left, rc.top,
849                  rc.right, rc.bottom, SWP_SHOWWINDOW);
850
851     /* Resize browser window taking the frame size into account */
852     dwSize = GetSystemMetrics(SM_CXFRAME);
853     ResizeWebBrowser(pHHInfo, rc.right - dwSize, rc.bottom - dwSize);
854
855     return 0;
856 }
857
858 static LRESULT CALLBACK Help_WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
859 {
860     switch (message)
861     {
862     case WM_COMMAND:
863         if (HIWORD(wParam) == BN_CLICKED)
864             TB_OnClick(hWnd, LOWORD(wParam));
865         break;
866     case WM_SIZE:
867         return Help_OnSize(hWnd);
868     case WM_CLOSE:
869         ReleaseHelpViewer((HHInfo *)GetWindowLongPtrW(hWnd, GWLP_USERDATA));
870         return 0;
871     case WM_DESTROY:
872         if(hh_process)
873             PostQuitMessage(0);
874         break;
875
876     default:
877         return DefWindowProcW(hWnd, message, wParam, lParam);
878     }
879
880     return 0;
881 }
882
883 static BOOL HH_CreateHelpWindow(HHInfo *info)
884 {
885     HWND hWnd;
886     RECT winPos = info->WinType.rcWindowPos;
887     WNDCLASSEXW wcex;
888     DWORD dwStyles, dwExStyles;
889     DWORD x, y, width, height;
890
891     static const WCHAR windowClassW[] = {
892         'H','H',' ', 'P','a','r','e','n','t',0
893     };
894
895     wcex.cbSize         = sizeof(WNDCLASSEXW);
896     wcex.style          = CS_HREDRAW | CS_VREDRAW;
897     wcex.lpfnWndProc    = Help_WndProc;
898     wcex.cbClsExtra     = 0;
899     wcex.cbWndExtra     = 0;
900     wcex.hInstance      = hhctrl_hinstance;
901     wcex.hIcon          = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
902     wcex.hCursor        = LoadCursorW(NULL, (LPCWSTR)IDC_ARROW);
903     wcex.hbrBackground  = (HBRUSH)(COLOR_MENU + 1);
904     wcex.lpszMenuName   = NULL;
905     wcex.lpszClassName  = windowClassW;
906     wcex.hIconSm        = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
907
908     RegisterClassExW(&wcex);
909
910     /* Read in window parameters if available */
911     if (info->WinType.fsValidMembers & HHWIN_PARAM_STYLES)
912         dwStyles = info->WinType.dwStyles | WS_OVERLAPPEDWINDOW;
913     else
914         dwStyles = WS_OVERLAPPEDWINDOW | WS_VISIBLE |
915                    WS_CLIPSIBLINGS | WS_CLIPCHILDREN;
916
917     if (info->WinType.fsValidMembers & HHWIN_PARAM_EXSTYLES)
918         dwExStyles = info->WinType.dwExStyles;
919     else
920         dwExStyles = WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_APPWINDOW |
921                      WS_EX_WINDOWEDGE | WS_EX_RIGHTSCROLLBAR;
922
923     if (info->WinType.fsValidMembers & HHWIN_PARAM_RECT)
924     {
925         x = winPos.left;
926         y = winPos.top;
927         width = winPos.right - x;
928         height = winPos.bottom - y;
929     }
930     else
931     {
932         x = WINTYPE_DEFAULT_X;
933         y = WINTYPE_DEFAULT_Y;
934         width = WINTYPE_DEFAULT_WIDTH;
935         height = WINTYPE_DEFAULT_HEIGHT;
936     }
937
938     hWnd = CreateWindowExW(dwExStyles, windowClassW, info->WinType.pszCaption,
939                            dwStyles, x, y, width, height, NULL, NULL, hhctrl_hinstance, NULL);
940     if (!hWnd)
941         return FALSE;
942
943     ShowWindow(hWnd, SW_SHOW);
944     UpdateWindow(hWnd);
945
946     /* store the pointer to the HH info struct */
947     SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LONG_PTR)info);
948
949     info->WinType.hwndHelp = hWnd;
950     return TRUE;
951 }
952
953 static void HH_CreateFont(HHInfo *pHHInfo)
954 {
955     LOGFONTW lf;
956
957     GetObjectW(GetStockObject(ANSI_VAR_FONT), sizeof(LOGFONTW), &lf);
958     lf.lfWeight = FW_NORMAL;
959     lf.lfItalic = FALSE;
960     lf.lfUnderline = FALSE;
961
962     pHHInfo->hFont = CreateFontIndirectW(&lf);
963 }
964
965 static void HH_InitRequiredControls(DWORD dwControls)
966 {
967     INITCOMMONCONTROLSEX icex;
968
969     icex.dwSize = sizeof(INITCOMMONCONTROLSEX);
970     icex.dwICC = dwControls;
971     InitCommonControlsEx(&icex);
972 }
973
974 /* Creates the whole package */
975 static BOOL CreateViewer(HHInfo *pHHInfo)
976 {
977     HH_CreateFont(pHHInfo);
978
979     if (!HH_CreateHelpWindow(pHHInfo))
980         return FALSE;
981
982     HH_InitRequiredControls(ICC_BAR_CLASSES);
983
984     if (!HH_AddToolbar(pHHInfo))
985         return FALSE;
986
987     HH_RegisterChildWndClass(pHHInfo);
988
989     if (!HH_AddNavigationPane(pHHInfo))
990         return FALSE;
991
992     HH_RegisterSizeBarClass(pHHInfo);
993
994     if (!HH_AddSizeBar(pHHInfo))
995         return FALSE;
996
997     if (!HH_AddHTMLPane(pHHInfo))
998         return FALSE;
999
1000     if (!AddContentTab(pHHInfo))
1001         return FALSE;
1002
1003     if (!AddIndexTab(pHHInfo))
1004         return FALSE;
1005
1006     InitContent(pHHInfo);
1007     InitIndex(pHHInfo);
1008
1009     return TRUE;
1010 }
1011
1012 void ReleaseHelpViewer(HHInfo *info)
1013 {
1014     TRACE("(%p)\n", info);
1015
1016     if (!info)
1017         return;
1018
1019     /* Free allocated strings */
1020     heap_free(info->pszType);
1021     heap_free(info->pszCaption);
1022     heap_free(info->pszToc);
1023     heap_free(info->pszIndex);
1024     heap_free(info->pszFile);
1025     heap_free(info->pszHome);
1026     heap_free(info->pszJump1);
1027     heap_free(info->pszJump2);
1028     heap_free(info->pszUrlJump1);
1029     heap_free(info->pszUrlJump2);
1030
1031     if (info->pCHMInfo)
1032         CloseCHM(info->pCHMInfo);
1033
1034     ReleaseWebBrowser(info);
1035     ReleaseContent(info);
1036     ReleaseIndex(info);
1037
1038     if(info->WinType.hwndHelp)
1039         DestroyWindow(info->WinType.hwndHelp);
1040
1041     heap_free(info);
1042     OleUninitialize();
1043 }
1044
1045 HHInfo *CreateHelpViewer(LPCWSTR filename)
1046 {
1047     HHInfo *info = heap_alloc_zero(sizeof(HHInfo));
1048     int i;
1049
1050     /* Set the invalid tab ID (-1) as the default value for all
1051      * of the tabs, this matches a failed TCM_INSERTITEM call.
1052      */
1053     for(i=0;i<sizeof(info->tabs)/sizeof(HHTab);i++)
1054         info->tabs[i].id = -1;
1055
1056     OleInitialize(NULL);
1057
1058     info->pCHMInfo = OpenCHM(filename);
1059     if(!info->pCHMInfo) {
1060         ReleaseHelpViewer(info);
1061         return NULL;
1062     }
1063
1064     if (!LoadWinTypeFromCHM(info)) {
1065         ReleaseHelpViewer(info);
1066         return NULL;
1067     }
1068
1069     if(!CreateViewer(info)) {
1070         ReleaseHelpViewer(info);
1071         return NULL;
1072     }
1073
1074     return info;
1075 }