vbscript: Make vbscode_t own the memory it uses.
[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  * Copyright 2011 Owen Rudge for CodeWeavers
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * This library is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with this library; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21  */
22
23 #include "hhctrl.h"
24
25 #include "wingdi.h"
26 #include "commctrl.h"
27 #include "wininet.h"
28
29 #include "wine/debug.h"
30
31 #include "resource.h"
32
33 WINE_DEFAULT_DEBUG_CHANNEL(htmlhelp);
34
35 static LRESULT Help_OnSize(HWND hWnd);
36 static void ExpandContract(HHInfo *pHHInfo);
37
38 /* Window type defaults */
39
40 #define WINTYPE_DEFAULT_X           280
41 #define WINTYPE_DEFAULT_Y           100
42 #define WINTYPE_DEFAULT_WIDTH       740
43 #define WINTYPE_DEFAULT_HEIGHT      640
44 #define WINTYPE_DEFAULT_NAVWIDTH    250
45
46 #define TAB_TOP_PADDING     8
47 #define TAB_RIGHT_PADDING   4
48 #define TAB_MARGIN  8
49 #define EDIT_HEIGHT         20
50
51 static const WCHAR szEmpty[] = {0};
52
53 /* Loads a string from the resource file */
54 static LPWSTR HH_LoadString(DWORD dwID)
55 {
56     LPWSTR string = NULL;
57     LPCWSTR stringresource;
58     int iSize;
59
60     iSize = LoadStringW(hhctrl_hinstance, dwID, (LPWSTR)&stringresource, 0);
61
62     string = heap_alloc((iSize + 2) * sizeof(WCHAR)); /* some strings (tab text) needs double-null termination */
63     memcpy(string, stringresource, iSize*sizeof(WCHAR));
64     string[iSize] = 0;
65
66     return string;
67 }
68
69 static HRESULT navigate_url(HHInfo *info, LPCWSTR surl)
70 {
71     VARIANT url;
72     HRESULT hres;
73
74     TRACE("%s\n", debugstr_w(surl));
75
76     V_VT(&url) = VT_BSTR;
77     V_BSTR(&url) = SysAllocString(surl);
78
79     hres = IWebBrowser2_Navigate2(info->web_browser, &url, 0, 0, 0, 0);
80
81     VariantClear(&url);
82
83     if(FAILED(hres))
84         TRACE("Navigation failed: %08x\n", hres);
85
86     return hres;
87 }
88
89 BOOL NavigateToUrl(HHInfo *info, LPCWSTR surl)
90 {
91     ChmPath chm_path;
92     BOOL ret;
93     HRESULT hres;
94
95     static const WCHAR url_indicator[] = {':', '/', '/', 0};
96
97     TRACE("%s\n", debugstr_w(surl));
98
99     if (strstrW(surl, url_indicator)) {
100         hres = navigate_url(info, surl);
101         if(SUCCEEDED(hres))
102             return TRUE;
103     } /* look up in chm if it doesn't look like a full url */
104
105     SetChmPath(&chm_path, info->pCHMInfo->szFile, surl);
106     ret = NavigateToChm(info, chm_path.chm_file, chm_path.chm_index);
107
108     heap_free(chm_path.chm_file);
109     heap_free(chm_path.chm_index);
110
111     return ret;
112 }
113
114 static BOOL AppendFullPathURL(LPCWSTR file, LPWSTR buf, LPCWSTR index)
115 {
116     static const WCHAR url_format[] =
117         {'m','k',':','@','M','S','I','T','S','t','o','r','e',':','%','s',':',':','%','s','%','s',0};
118     static const WCHAR slash[] = {'/',0};
119     static const WCHAR empty[] = {0};
120     WCHAR full_path[MAX_PATH];
121
122     TRACE("%s %p %s\n", debugstr_w(file), buf, debugstr_w(index));
123
124     if(!GetFullPathNameW(file, sizeof(full_path)/sizeof(full_path[0]), full_path, NULL)) {
125         WARN("GetFullPathName failed: %u\n", GetLastError());
126         return FALSE;
127     }
128
129     wsprintfW(buf, url_format, full_path, (!index || index[0] == '/') ? empty : slash, index);
130     return TRUE;
131 }
132
133 BOOL NavigateToChm(HHInfo *info, LPCWSTR file, LPCWSTR index)
134 {
135     WCHAR buf[INTERNET_MAX_URL_LENGTH];
136     LPWSTR ptr;
137
138     TRACE("%p %s %s\n", info, debugstr_w(file), debugstr_w(index));
139
140     if ((!info->web_browser) || !AppendFullPathURL(file, buf, index))
141         return FALSE;
142
143     /* FIXME: HACK */
144     if((ptr = strchrW(buf, '#')))
145        *ptr = 0;
146
147     return SUCCEEDED(navigate_url(info, buf));
148 }
149
150 static void DoSync(HHInfo *info)
151 {
152     WCHAR buf[INTERNET_MAX_URL_LENGTH];
153     HRESULT hres;
154     DWORD len;
155     BSTR url;
156
157     hres = IWebBrowser2_get_LocationURL(info->web_browser, &url);
158
159     if (FAILED(hres))
160     {
161         WARN("get_LocationURL failed: %08x\n", hres);
162         return;
163     }
164
165     /* If we're not currently viewing a page in the active .chm file, abort */
166     if ((!AppendFullPathURL(info->pszFile, buf, NULL)) || (len = lstrlenW(buf) > lstrlenW(url)))
167     {
168         SysFreeString(url);
169         return;
170     }
171
172     if (lstrcmpiW(buf, url) > 0)
173     {
174         static const WCHAR delimW[] = {':',':','/',0};
175         const WCHAR *index;
176
177         index = strstrW(url, delimW);
178
179         if (index)
180             ActivateContentTopic(info->tabs[TAB_CONTENTS].hwnd, index + 3, info->content); /* skip over ::/ */
181     }
182
183     SysFreeString(url);
184 }
185
186 /* Size Bar */
187
188 #define SIZEBAR_WIDTH   4
189
190 static const WCHAR szSizeBarClass[] = {
191     'H','H',' ','S','i','z','e','B','a','r',0
192 };
193
194 /* Draw the SizeBar */
195 static void SB_OnPaint(HWND hWnd)
196 {
197     PAINTSTRUCT ps;
198     HDC hdc;
199     RECT rc;
200     
201     hdc = BeginPaint(hWnd, &ps);
202
203     GetClientRect(hWnd, &rc);
204
205     /* dark frame */
206     rc.right += 1;
207     rc.bottom -= 1;
208     FrameRect(hdc, &rc, GetStockObject(GRAY_BRUSH));
209
210     /* white highlight */
211     SelectObject(hdc, GetStockObject(WHITE_PEN));
212     MoveToEx(hdc, rc.right, 1, NULL);
213     LineTo(hdc, 1, 1);
214     LineTo(hdc, 1, rc.bottom - 1);
215
216     
217     MoveToEx(hdc, 0, rc.bottom, NULL);
218     LineTo(hdc, rc.right, rc.bottom);
219
220     EndPaint(hWnd, &ps);
221 }
222
223 static void SB_OnLButtonDown(HWND hWnd, WPARAM wParam, LPARAM lParam)
224 {
225     SetCapture(hWnd);
226 }
227
228 static void SB_OnLButtonUp(HWND hWnd, WPARAM wParam, LPARAM lParam)
229 {
230     HHInfo *pHHInfo = (HHInfo *)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
231     POINT pt;
232
233     pt.x = (short)LOWORD(lParam);
234     pt.y = (short)HIWORD(lParam);
235
236     /* update the window sizes */
237     pHHInfo->WinType.iNavWidth += pt.x;
238     Help_OnSize(hWnd);
239
240     ReleaseCapture();
241 }
242
243 static void SB_OnMouseMove(HWND hWnd, WPARAM wParam, LPARAM lParam)
244 {
245     /* ignore WM_MOUSEMOVE if not dragging the SizeBar */
246     if (!(wParam & MK_LBUTTON))
247         return;
248 }
249
250 static LRESULT CALLBACK SizeBar_WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
251 {
252     switch (message)
253     {
254         case WM_LBUTTONDOWN:
255             SB_OnLButtonDown(hWnd, wParam, lParam);
256             break;
257         case WM_LBUTTONUP:
258             SB_OnLButtonUp(hWnd, wParam, lParam);
259             break;
260         case WM_MOUSEMOVE:
261             SB_OnMouseMove(hWnd, wParam, lParam);
262             break;
263         case WM_PAINT:
264             SB_OnPaint(hWnd);
265             break;
266         default:
267             return DefWindowProcW(hWnd, message, wParam, lParam);
268     }
269
270     return 0;
271 }
272
273 static void HH_RegisterSizeBarClass(HHInfo *pHHInfo)
274 {
275     WNDCLASSEXW wcex;
276
277     wcex.cbSize         = sizeof(WNDCLASSEXW);
278     wcex.style          = 0;
279     wcex.lpfnWndProc    = SizeBar_WndProc;
280     wcex.cbClsExtra     = 0;
281     wcex.cbWndExtra     = 0;
282     wcex.hInstance      = hhctrl_hinstance;
283     wcex.hIcon          = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
284     wcex.hCursor        = LoadCursorW(NULL, (LPCWSTR)IDC_SIZEWE);
285     wcex.hbrBackground  = (HBRUSH)(COLOR_MENU + 1);
286     wcex.lpszMenuName   = NULL;
287     wcex.lpszClassName  = szSizeBarClass;
288     wcex.hIconSm        = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
289
290     RegisterClassExW(&wcex);
291 }
292
293 static void SB_GetSizeBarRect(HHInfo *info, RECT *rc)
294 {
295     RECT rectWND, rectTB, rectNP;
296
297     GetClientRect(info->WinType.hwndHelp, &rectWND);
298     GetClientRect(info->WinType.hwndToolBar, &rectTB);
299     GetClientRect(info->WinType.hwndNavigation, &rectNP);
300
301     rc->left = rectNP.right;
302     rc->top = rectTB.bottom;
303     rc->bottom = rectWND.bottom - rectTB.bottom;
304     rc->right = SIZEBAR_WIDTH;
305 }
306
307 static BOOL HH_AddSizeBar(HHInfo *pHHInfo)
308 {
309     HWND hWnd;
310     HWND hwndParent = pHHInfo->WinType.hwndHelp;
311     DWORD dwStyles = WS_CHILDWINDOW | WS_OVERLAPPED;
312     DWORD dwExStyles = WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR;
313     RECT rc;
314
315     if (!pHHInfo->WinType.fNotExpanded)
316         dwStyles |= WS_VISIBLE;
317
318     SB_GetSizeBarRect(pHHInfo, &rc);
319
320     hWnd = CreateWindowExW(dwExStyles, szSizeBarClass, szEmpty, dwStyles,
321                            rc.left, rc.top, rc.right, rc.bottom,
322                            hwndParent, NULL, hhctrl_hinstance, NULL);
323     if (!hWnd)
324         return FALSE;
325
326     /* store the pointer to the HH info struct */
327     SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LONG_PTR)pHHInfo);
328
329     pHHInfo->hwndSizeBar = hWnd;
330     return TRUE;
331 }
332
333 /* Child Window */
334
335 static const WCHAR szChildClass[] = {
336     'H','H',' ','C','h','i','l','d',0
337 };
338
339 static LRESULT Child_OnPaint(HWND hWnd)
340 {
341     PAINTSTRUCT ps;
342     HDC hdc;
343     RECT rc;
344
345     hdc = BeginPaint(hWnd, &ps);
346
347     /* Only paint the Navigation pane, identified by the fact
348      * that it has a child window
349      */
350     if (GetWindow(hWnd, GW_CHILD))
351     {
352         GetClientRect(hWnd, &rc);
353
354         /* set the border color */
355         SelectObject(hdc, GetStockObject(DC_PEN));
356         SetDCPenColor(hdc, GetSysColor(COLOR_BTNSHADOW));
357
358         /* Draw the top border */
359         LineTo(hdc, rc.right, 0);
360
361         SelectObject(hdc, GetStockObject(WHITE_PEN));
362         MoveToEx(hdc, 0, 1, NULL);
363         LineTo(hdc, rc.right, 1);
364     }
365
366     EndPaint(hWnd, &ps);
367
368     return 0;
369 }
370
371 static void ResizeTabChild(HHInfo *info, int tab)
372 {
373     HWND hwnd = info->tabs[tab].hwnd;
374     INT width, height;
375     RECT rect, tabrc;
376     DWORD cnt;
377
378     GetClientRect(info->WinType.hwndNavigation, &rect);
379     SendMessageW(info->hwndTabCtrl, TCM_GETITEMRECT, 0, (LPARAM)&tabrc);
380     cnt = SendMessageW(info->hwndTabCtrl, TCM_GETROWCOUNT, 0, 0);
381
382     rect.left = TAB_MARGIN;
383     rect.top = TAB_TOP_PADDING + cnt*(tabrc.bottom-tabrc.top) + TAB_MARGIN;
384     rect.right -= TAB_RIGHT_PADDING + TAB_MARGIN;
385     rect.bottom -= TAB_MARGIN;
386     width = rect.right-rect.left;
387     height = rect.bottom-rect.top;
388
389     SetWindowPos(hwnd, NULL, rect.left, rect.top, width, height,
390                  SWP_NOZORDER | SWP_NOACTIVATE);
391
392     switch (tab)
393     {
394     case TAB_INDEX: {
395         int scroll_width = GetSystemMetrics(SM_CXVSCROLL);
396         int border_width = GetSystemMetrics(SM_CXBORDER);
397         int edge_width = GetSystemMetrics(SM_CXEDGE);
398
399         /* Resize the tab widget column to perfectly fit the tab window and
400          * leave sufficient space for the scroll widget.
401          */
402         SendMessageW(info->tabs[TAB_INDEX].hwnd, LVM_SETCOLUMNWIDTH, 0,
403                      width-scroll_width-2*border_width-2*edge_width);
404
405         break;
406     }
407     case TAB_SEARCH: {
408         int scroll_width = GetSystemMetrics(SM_CXVSCROLL);
409         int border_width = GetSystemMetrics(SM_CXBORDER);
410         int edge_width = GetSystemMetrics(SM_CXEDGE);
411         int top_pos = 0;
412
413         SetWindowPos(info->search.hwndEdit, NULL, 0, top_pos, width,
414                       EDIT_HEIGHT, SWP_NOZORDER | SWP_NOACTIVATE);
415         top_pos += EDIT_HEIGHT + TAB_MARGIN;
416         SetWindowPos(info->search.hwndList, NULL, 0, top_pos, width,
417                       height-top_pos, SWP_NOZORDER | SWP_NOACTIVATE);
418         /* Resize the tab widget column to perfectly fit the tab window and
419          * leave sufficient space for the scroll widget.
420          */
421         SendMessageW(info->search.hwndList, LVM_SETCOLUMNWIDTH, 0,
422                      width-scroll_width-2*border_width-2*edge_width);
423
424         break;
425     }
426     }
427 }
428
429 static LRESULT Child_OnSize(HWND hwnd)
430 {
431     HHInfo *info = (HHInfo*)GetWindowLongPtrW(hwnd, GWLP_USERDATA);
432     RECT rect;
433
434     if(!info || hwnd != info->WinType.hwndNavigation)
435         return 0;
436
437     GetClientRect(hwnd, &rect);
438     SetWindowPos(info->hwndTabCtrl, HWND_TOP, 0, 0,
439                  rect.right - TAB_RIGHT_PADDING,
440                  rect.bottom - TAB_TOP_PADDING, SWP_NOMOVE);
441
442     ResizeTabChild(info, TAB_CONTENTS);
443     ResizeTabChild(info, TAB_INDEX);
444     ResizeTabChild(info, TAB_SEARCH);
445     return 0;
446 }
447
448 static LRESULT OnTabChange(HWND hwnd)
449 {
450     HHInfo *info = (HHInfo*)GetWindowLongPtrW(hwnd, GWLP_USERDATA);
451
452     TRACE("%p\n", hwnd);
453
454     if (!info)
455         return 0;
456
457     if(info->tabs[info->current_tab].hwnd)
458         ShowWindow(info->tabs[info->current_tab].hwnd, SW_HIDE);
459
460     info->current_tab = SendMessageW(info->hwndTabCtrl, TCM_GETCURSEL, 0, 0);
461
462     if(info->tabs[info->current_tab].hwnd)
463         ShowWindow(info->tabs[info->current_tab].hwnd, SW_SHOW);
464
465     return 0;
466 }
467
468 static LRESULT OnTopicChange(HHInfo *info, void *user_data)
469 {
470     LPCWSTR chmfile = NULL, name = NULL, local = NULL;
471     ContentItem *citer;
472     SearchItem *siter;
473     IndexItem *iiter;
474
475     if(!user_data || !info)
476         return 0;
477
478     switch (info->current_tab)
479     {
480     case TAB_CONTENTS:
481         citer = (ContentItem *) user_data;
482         name = citer->name;
483         local = citer->local;
484         while(citer) {
485             if(citer->merge.chm_file) {
486                 chmfile = citer->merge.chm_file;
487                 break;
488             }
489             citer = citer->parent;
490         }
491         break;
492     case TAB_INDEX:
493         iiter = (IndexItem *) user_data;
494         if(iiter->nItems == 0) {
495             FIXME("No entries for this item!\n");
496             return 0;
497         }
498         if(iiter->nItems > 1) {
499             int i = 0;
500             LVITEMW lvi;
501
502             SendMessageW(info->popup.hwndList, LVM_DELETEALLITEMS, 0, 0);
503             for(i=0;i<iiter->nItems;i++) {
504                 IndexSubItem *item = &iiter->items[i];
505                 WCHAR *name = iiter->keyword;
506
507                 if(item->name)
508                     name = item->name;
509                 memset(&lvi, 0, sizeof(lvi));
510                 lvi.iItem = i;
511                 lvi.mask = LVIF_TEXT|LVIF_PARAM;
512                 lvi.cchTextMax = strlenW(name)+1;
513                 lvi.pszText = name;
514                 lvi.lParam = (LPARAM) item;
515                 SendMessageW(info->popup.hwndList, LVM_INSERTITEMW, 0, (LPARAM)&lvi);
516             }
517             ShowWindow(info->popup.hwndPopup, SW_SHOW);
518             return 0;
519         }
520         name = iiter->items[0].name;
521         local = iiter->items[0].local;
522         chmfile = iiter->merge.chm_file;
523         break;
524     case TAB_SEARCH:
525         siter = (SearchItem *) user_data;
526         name = siter->filename;
527         local = siter->filename;
528         chmfile = info->pCHMInfo->szFile;
529         break;
530     default:
531         FIXME("Unhandled operation for this tab!\n");
532         return 0;
533     }
534
535     if(!chmfile)
536     {
537         FIXME("No help file found for this item!\n");
538         return 0;
539     }
540
541     TRACE("name %s loal %s\n", debugstr_w(name), debugstr_w(local));
542
543     NavigateToChm(info, chmfile, local);
544     return 0;
545 }
546
547 /* Capture the Enter/Return key and send it up to Child_WndProc as an NM_RETURN message */
548 static LRESULT CALLBACK EditChild_WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
549 {
550     WNDPROC editWndProc = (WNDPROC)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
551
552     if(message == WM_KEYUP && wParam == VK_RETURN)
553     {
554         NMHDR nmhdr;
555
556         nmhdr.hwndFrom = hWnd;
557         nmhdr.code = NM_RETURN;
558         SendMessageW(GetParent(GetParent(hWnd)), WM_NOTIFY, wParam, (LPARAM)&nmhdr);
559     }
560     return editWndProc(hWnd, message, wParam, lParam);
561 }
562
563 static LRESULT CALLBACK Child_WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
564 {
565     switch (message)
566     {
567     case WM_PAINT:
568         return Child_OnPaint(hWnd);
569     case WM_SIZE:
570         return Child_OnSize(hWnd);
571     case WM_NOTIFY: {
572         HHInfo *info = (HHInfo*)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
573         NMHDR *nmhdr = (NMHDR*)lParam;
574
575         switch(nmhdr->code) {
576         case TCN_SELCHANGE:
577             return OnTabChange(hWnd);
578         case TVN_SELCHANGEDW:
579             return OnTopicChange(info, (void*)((NMTREEVIEWW *)lParam)->itemNew.lParam);
580         case NM_DBLCLK:
581             if(!info)
582                 return 0;
583             switch(info->current_tab)
584             {
585             case TAB_INDEX:
586                 return OnTopicChange(info, (void*)((NMITEMACTIVATE *)lParam)->lParam);
587             case TAB_SEARCH:
588                 return OnTopicChange(info, (void*)((NMITEMACTIVATE *)lParam)->lParam);
589             }
590             break;
591         case NM_RETURN:
592             if(!info)
593                 return 0;
594             switch(info->current_tab) {
595             case TAB_INDEX: {
596                 HWND hwndList = info->tabs[TAB_INDEX].hwnd;
597                 LVITEMW lvItem;
598
599                 lvItem.iItem = (int) SendMessageW(hwndList, LVM_GETSELECTIONMARK, 0, 0);
600                 lvItem.mask = TVIF_PARAM;
601                 SendMessageW(hwndList, LVM_GETITEMW, 0, (LPARAM)&lvItem);
602                 OnTopicChange(info, (void*) lvItem.lParam);
603                 return 0;
604             }
605             case TAB_SEARCH: {
606                 if(nmhdr->hwndFrom == info->search.hwndEdit) {
607                     char needle[100];
608                     DWORD i, len;
609
610                     len = GetWindowTextA(info->search.hwndEdit, needle, sizeof(needle));
611                     if(!len)
612                     {
613                         FIXME("Unable to get search text.\n");
614                         return 0;
615                     }
616                     /* Convert the requested text for comparison later against the
617                      * lower case version of HTML file contents.
618                      */
619                     for(i=0;i<len;i++)
620                         needle[i] = tolower(needle[i]);
621                     InitSearch(info, needle);
622                     return 0;
623                 }else if(nmhdr->hwndFrom == info->search.hwndList) {
624                     HWND hwndList = info->search.hwndList;
625                     LVITEMW lvItem;
626
627                     lvItem.iItem = (int) SendMessageW(hwndList, LVM_GETSELECTIONMARK, 0, 0);
628                     lvItem.mask = TVIF_PARAM;
629                     SendMessageW(hwndList, LVM_GETITEMW, 0, (LPARAM)&lvItem);
630                     OnTopicChange(info, (void*) lvItem.lParam);
631                     return 0;
632                 }
633                 break;
634             }
635             }
636             break;
637         }
638         break;
639     }
640     default:
641         return DefWindowProcW(hWnd, message, wParam, lParam);
642     }
643
644     return 0;
645 }
646
647 static void HH_RegisterChildWndClass(HHInfo *pHHInfo)
648 {
649     WNDCLASSEXW wcex;
650
651     wcex.cbSize         = sizeof(WNDCLASSEXW);
652     wcex.style          = 0;
653     wcex.lpfnWndProc    = Child_WndProc;
654     wcex.cbClsExtra     = 0;
655     wcex.cbWndExtra     = 0;
656     wcex.hInstance      = hhctrl_hinstance;
657     wcex.hIcon          = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
658     wcex.hCursor        = LoadCursorW(NULL, (LPCWSTR)IDC_ARROW);
659     wcex.hbrBackground  = (HBRUSH)(COLOR_BTNFACE + 1);
660     wcex.lpszMenuName   = NULL;
661     wcex.lpszClassName  = szChildClass;
662     wcex.hIconSm        = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
663
664     RegisterClassExW(&wcex);
665 }
666
667 /* Toolbar */
668
669 #define ICON_SIZE   20
670
671 static void DisplayPopupMenu(HHInfo *info)
672 {
673     HMENU menu, submenu;
674     TBBUTTONINFOW button;
675     MENUITEMINFOW item;
676     POINT coords;
677     RECT rect;
678     DWORD index;
679
680     menu = LoadMenuW(hhctrl_hinstance, MAKEINTRESOURCEW(MENU_POPUP));
681
682     if (!menu)
683         return;
684
685     submenu = GetSubMenu(menu, 0);
686
687     /* Update the Show/Hide menu item */
688     item.cbSize = sizeof(MENUITEMINFOW);
689     item.fMask = MIIM_FTYPE | MIIM_STATE | MIIM_STRING;
690     item.fType = MFT_STRING;
691     item.fState = MF_ENABLED;
692
693     if (info->WinType.fNotExpanded)
694         item.dwTypeData = HH_LoadString(IDS_SHOWTABS);
695     else
696         item.dwTypeData = HH_LoadString(IDS_HIDETABS);
697
698     SetMenuItemInfoW(submenu, IDTB_EXPAND, FALSE, &item);
699     heap_free(item.dwTypeData);
700
701     /* Find the index toolbar button */
702     button.cbSize = sizeof(TBBUTTONINFOW);
703     button.dwMask = TBIF_COMMAND;
704     index = SendMessageW(info->WinType.hwndToolBar, TB_GETBUTTONINFOW, IDTB_OPTIONS, (LPARAM) &button);
705
706     if (index == -1)
707        return;
708
709     /* Get position */
710     SendMessageW(info->WinType.hwndToolBar, TB_GETITEMRECT, index, (LPARAM) &rect);
711
712     coords.x = rect.left;
713     coords.y = rect.bottom;
714
715     ClientToScreen(info->WinType.hwndToolBar, &coords);
716     TrackPopupMenu(submenu, TPM_LEFTALIGN | TPM_TOPALIGN | TPM_LEFTBUTTON | TPM_NOANIMATION, coords.x, coords.y, 0, info->WinType.hwndHelp, NULL);
717 }
718
719 static void TB_OnClick(HWND hWnd, DWORD dwID)
720 {
721     HHInfo *info = (HHInfo *)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
722
723     switch (dwID)
724     {
725         case IDTB_STOP:
726             DoPageAction(info, WB_STOP);
727             break;
728         case IDTB_REFRESH:
729             DoPageAction(info, WB_REFRESH);
730             break;
731         case IDTB_BACK:
732             DoPageAction(info, WB_GOBACK);
733             break;
734         case IDTB_HOME:
735             NavigateToChm(info, info->pCHMInfo->szFile, info->WinType.pszHome);
736             break;
737         case IDTB_FORWARD:
738             DoPageAction(info, WB_GOFORWARD);
739             break;
740         case IDTB_PRINT:
741             DoPageAction(info, WB_PRINT);
742             break;
743         case IDTB_EXPAND:
744         case IDTB_CONTRACT:
745             ExpandContract(info);
746             break;
747         case IDTB_SYNC:
748             DoSync(info);
749             break;
750         case IDTB_OPTIONS:
751             DisplayPopupMenu(info);
752             break;
753         case IDTB_NOTES:
754         case IDTB_CONTENTS:
755         case IDTB_INDEX:
756         case IDTB_SEARCH:
757         case IDTB_HISTORY:
758         case IDTB_FAVORITES:
759             /* These are officially unimplemented as of the Windows 7 SDK */
760             break;
761         case IDTB_BROWSE_FWD:
762         case IDTB_BROWSE_BACK:
763         case IDTB_JUMP1:
764         case IDTB_JUMP2:
765         case IDTB_CUSTOMIZE:
766         case IDTB_ZOOM:
767         case IDTB_TOC_NEXT:
768         case IDTB_TOC_PREV:
769             break;
770     }
771 }
772
773 static void TB_AddButton(TBBUTTON *pButtons, DWORD dwIndex, DWORD dwID, DWORD dwBitmap)
774 {
775     pButtons[dwIndex].iBitmap = dwBitmap;
776     pButtons[dwIndex].idCommand = dwID;
777     pButtons[dwIndex].fsState = TBSTATE_ENABLED;
778     pButtons[dwIndex].fsStyle = BTNS_BUTTON;
779     pButtons[dwIndex].dwData = 0;
780     pButtons[dwIndex].iString = 0;
781 }
782
783 static void TB_AddButtonsFromFlags(HHInfo *pHHInfo, TBBUTTON *pButtons, DWORD dwButtonFlags, LPDWORD pdwNumButtons)
784 {
785     int nHistBitmaps = 0, nStdBitmaps = 0, nHHBitmaps = 0;
786     HWND hToolbar = pHHInfo->WinType.hwndToolBar;
787     TBADDBITMAP tbAB;
788     DWORD unsupported;
789
790     /* Common bitmaps */
791     tbAB.hInst = HINST_COMMCTRL;
792     tbAB.nID = IDB_HIST_LARGE_COLOR;
793     nHistBitmaps = SendMessageW(hToolbar, TB_ADDBITMAP, 0, (LPARAM)&tbAB);
794     tbAB.nID = IDB_STD_LARGE_COLOR;
795     nStdBitmaps = SendMessageW(hToolbar, TB_ADDBITMAP, 0, (LPARAM)&tbAB);
796     /* hhctrl.ocx bitmaps */
797     tbAB.hInst = hhctrl_hinstance;
798     tbAB.nID = IDB_HHTOOLBAR;
799     nHHBitmaps = SendMessageW(hToolbar, TB_ADDBITMAP, 0, (LPARAM)&tbAB);
800
801     *pdwNumButtons = 0;
802
803     unsupported = dwButtonFlags & (HHWIN_BUTTON_BROWSE_FWD |
804         HHWIN_BUTTON_BROWSE_BCK | HHWIN_BUTTON_NOTES | HHWIN_BUTTON_CONTENTS |
805         HHWIN_BUTTON_INDEX | HHWIN_BUTTON_SEARCH | HHWIN_BUTTON_HISTORY |
806         HHWIN_BUTTON_FAVORITES | HHWIN_BUTTON_JUMP1 | HHWIN_BUTTON_JUMP2 |
807         HHWIN_BUTTON_ZOOM | HHWIN_BUTTON_TOC_NEXT | HHWIN_BUTTON_TOC_PREV);
808     if (unsupported)
809         FIXME("got asked for unsupported buttons: %06x\n", unsupported);
810
811     if (dwButtonFlags & HHWIN_BUTTON_EXPAND)
812     {
813         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_EXPAND, nHistBitmaps + HIST_VIEWTREE);
814         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_CONTRACT, nHistBitmaps + HIST_VIEWTREE);
815
816         if (pHHInfo->WinType.fNotExpanded)
817             pButtons[1].fsState |= TBSTATE_HIDDEN;
818         else
819             pButtons[0].fsState |= TBSTATE_HIDDEN;
820     }
821
822     if (dwButtonFlags & HHWIN_BUTTON_BACK)
823         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_BACK, nHistBitmaps + HIST_BACK);
824
825     if (dwButtonFlags & HHWIN_BUTTON_FORWARD)
826         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_FORWARD, nHistBitmaps + HIST_FORWARD);
827
828     if (dwButtonFlags & HHWIN_BUTTON_STOP)
829         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_STOP, nHHBitmaps + HH_STOP);
830
831     if (dwButtonFlags & HHWIN_BUTTON_REFRESH)
832         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_REFRESH, nHHBitmaps + HH_REFRESH);
833
834     if (dwButtonFlags & HHWIN_BUTTON_HOME)
835         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_HOME, nHHBitmaps + HH_HOME);
836
837     /* FIXME: Load the correct button bitmaps */
838     if (dwButtonFlags & HHWIN_BUTTON_SYNC)
839         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_SYNC, nStdBitmaps + STD_PRINT);
840
841     if (dwButtonFlags & HHWIN_BUTTON_OPTIONS)
842         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_OPTIONS, nStdBitmaps + STD_PRINT);
843
844     if (dwButtonFlags & HHWIN_BUTTON_PRINT)
845         TB_AddButton(pButtons, (*pdwNumButtons)++, IDTB_PRINT, nStdBitmaps + STD_PRINT);
846 }
847
848 static BOOL HH_AddToolbar(HHInfo *pHHInfo)
849 {
850     HWND hToolbar;
851     HWND hwndParent = pHHInfo->WinType.hwndHelp;
852     DWORD toolbarFlags;
853     TBBUTTON buttons[IDTB_TOC_PREV - IDTB_EXPAND];
854     DWORD dwStyles, dwExStyles;
855     DWORD dwNumButtons, dwIndex;
856
857     if (pHHInfo->WinType.fsWinProperties & HHWIN_PARAM_TB_FLAGS)
858         toolbarFlags = pHHInfo->WinType.fsToolBarFlags;
859     else
860         toolbarFlags = HHWIN_DEF_BUTTONS;
861
862     dwStyles = WS_CHILDWINDOW | WS_VISIBLE | TBSTYLE_FLAT |
863                TBSTYLE_WRAPABLE | TBSTYLE_TOOLTIPS | CCS_NODIVIDER;
864     dwExStyles = WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR;
865
866     hToolbar = CreateWindowExW(dwExStyles, TOOLBARCLASSNAMEW, NULL, dwStyles,
867                                0, 0, 0, 0, hwndParent, NULL,
868                                hhctrl_hinstance, NULL);
869     if (!hToolbar)
870         return FALSE;
871     pHHInfo->WinType.hwndToolBar = hToolbar;
872
873     SendMessageW(hToolbar, TB_SETBITMAPSIZE, 0, MAKELONG(ICON_SIZE, ICON_SIZE));
874     SendMessageW(hToolbar, TB_BUTTONSTRUCTSIZE, sizeof(TBBUTTON), 0);
875     SendMessageW(hToolbar, WM_SETFONT, (WPARAM)pHHInfo->hFont, TRUE);
876
877     TB_AddButtonsFromFlags(pHHInfo, buttons, toolbarFlags, &dwNumButtons);
878
879     for (dwIndex = 0; dwIndex < dwNumButtons; dwIndex++)
880     {
881         LPWSTR szBuf = HH_LoadString(buttons[dwIndex].idCommand);
882         DWORD dwLen = strlenW(szBuf);
883         szBuf[dwLen + 1] = 0; /* Double-null terminate */
884
885         buttons[dwIndex].iString = (DWORD)SendMessageW(hToolbar, TB_ADDSTRINGW, 0, (LPARAM)szBuf);
886         heap_free(szBuf);
887     }
888
889     SendMessageW(hToolbar, TB_ADDBUTTONSW, dwNumButtons, (LPARAM)buttons);
890     SendMessageW(hToolbar, TB_AUTOSIZE, 0, 0);
891     ShowWindow(hToolbar, SW_SHOW);
892
893     return TRUE;
894 }
895
896 /* Navigation Pane */
897
898 static void NP_GetNavigationRect(HHInfo *pHHInfo, RECT *rc)
899 {
900     HWND hwndParent = pHHInfo->WinType.hwndHelp;
901     HWND hwndToolbar = pHHInfo->WinType.hwndToolBar;
902     RECT rectWND, rectTB;
903
904     GetClientRect(hwndParent, &rectWND);
905     GetClientRect(hwndToolbar, &rectTB);
906
907     rc->left = 0;
908     rc->top = rectTB.bottom;
909     rc->bottom = rectWND.bottom - rectTB.bottom;
910
911     if (!(pHHInfo->WinType.fsValidMembers & HHWIN_PARAM_NAV_WIDTH) &&
912           pHHInfo->WinType.iNavWidth == 0)
913     {
914         pHHInfo->WinType.iNavWidth = WINTYPE_DEFAULT_NAVWIDTH;
915     }
916
917     rc->right = pHHInfo->WinType.iNavWidth;
918 }
919
920 static DWORD NP_CreateTab(HINSTANCE hInstance, HWND hwndTabCtrl, DWORD index)
921 {
922     TCITEMW tie;
923     LPWSTR tabText = HH_LoadString(index);
924     DWORD ret;
925
926     tie.mask = TCIF_TEXT;
927     tie.pszText = tabText;
928
929     ret = SendMessageW( hwndTabCtrl, TCM_INSERTITEMW, index, (LPARAM)&tie );
930
931     heap_free(tabText);
932     return ret;
933 }
934
935 static BOOL HH_AddNavigationPane(HHInfo *info)
936 {
937     HWND hWnd, hwndTabCtrl;
938     HWND hwndParent = info->WinType.hwndHelp;
939     DWORD dwStyles = WS_CHILDWINDOW;
940     DWORD dwExStyles = WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR;
941     RECT rc;
942
943     if (!info->WinType.fNotExpanded)
944         dwStyles |= WS_VISIBLE;
945
946     NP_GetNavigationRect(info, &rc);
947
948     hWnd = CreateWindowExW(dwExStyles, szChildClass, szEmpty, dwStyles,
949                            rc.left, rc.top, rc.right, rc.bottom,
950                            hwndParent, NULL, hhctrl_hinstance, NULL);
951     if (!hWnd)
952         return FALSE;
953
954     SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LONG_PTR)info);
955
956     hwndTabCtrl = CreateWindowExW(dwExStyles, WC_TABCONTROLW, szEmpty, dwStyles | WS_VISIBLE,
957                                   0, TAB_TOP_PADDING,
958                                   rc.right - TAB_RIGHT_PADDING,
959                                   rc.bottom - TAB_TOP_PADDING,
960                                   hWnd, NULL, hhctrl_hinstance, NULL);
961     if (!hwndTabCtrl)
962         return FALSE;
963
964     if (*info->WinType.pszToc)
965         info->tabs[TAB_CONTENTS].id = NP_CreateTab(hhctrl_hinstance, hwndTabCtrl, IDS_CONTENTS);
966
967     if (*info->WinType.pszIndex)
968         info->tabs[TAB_INDEX].id = NP_CreateTab(hhctrl_hinstance, hwndTabCtrl, IDS_INDEX);
969
970     if (info->WinType.fsWinProperties & HHWIN_PROP_TAB_SEARCH)
971         info->tabs[TAB_SEARCH].id = NP_CreateTab(hhctrl_hinstance, hwndTabCtrl, IDS_SEARCH);
972
973     if (info->WinType.fsWinProperties & HHWIN_PROP_TAB_FAVORITES)
974         info->tabs[TAB_FAVORITES].id = NP_CreateTab(hhctrl_hinstance, hwndTabCtrl, IDS_FAVORITES);
975
976     SendMessageW(hwndTabCtrl, WM_SETFONT, (WPARAM)info->hFont, TRUE);
977
978     info->hwndTabCtrl = hwndTabCtrl;
979     info->WinType.hwndNavigation = hWnd;
980     return TRUE;
981 }
982
983 /* HTML Pane */
984
985 static void HP_GetHTMLRect(HHInfo *info, RECT *rc)
986 {
987     RECT rectTB, rectWND, rectNP, rectSB;
988
989     GetClientRect(info->WinType.hwndHelp, &rectWND);
990     GetClientRect(info->WinType.hwndToolBar, &rectTB);
991     GetClientRect(info->hwndSizeBar, &rectSB);
992
993     if (info->WinType.fNotExpanded)
994         rc->left = 0;
995     else
996     {
997         GetClientRect(info->WinType.hwndNavigation, &rectNP);
998         rc->left = rectNP.right + rectSB.right;
999     }
1000
1001     rc->top = rectTB.bottom;
1002     rc->right = rectWND.right - rc->left;
1003     rc->bottom = rectWND.bottom - rectTB.bottom;
1004 }
1005
1006 static BOOL HH_AddHTMLPane(HHInfo *pHHInfo)
1007 {
1008     HWND hWnd;
1009     HWND hwndParent = pHHInfo->WinType.hwndHelp;
1010     DWORD dwStyles = WS_CHILDWINDOW | WS_VISIBLE | WS_CLIPCHILDREN;
1011     DWORD dwExStyles = WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR | WS_EX_CLIENTEDGE;
1012     RECT rc;
1013
1014     HP_GetHTMLRect(pHHInfo, &rc);
1015
1016     hWnd = CreateWindowExW(dwExStyles, szChildClass, szEmpty, dwStyles,
1017                            rc.left, rc.top, rc.right, rc.bottom,
1018                            hwndParent, NULL, hhctrl_hinstance, NULL);
1019     if (!hWnd)
1020         return FALSE;
1021
1022     if (!InitWebBrowser(pHHInfo, hWnd))
1023         return FALSE;
1024
1025     /* store the pointer to the HH info struct */
1026     SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LONG_PTR)pHHInfo);
1027
1028     ShowWindow(hWnd, SW_SHOW);
1029     UpdateWindow(hWnd);
1030
1031     pHHInfo->WinType.hwndHTML = hWnd;
1032     return TRUE;
1033 }
1034
1035 static BOOL AddContentTab(HHInfo *info)
1036 {
1037     if(info->tabs[TAB_CONTENTS].id == -1)
1038         return TRUE; /* No "Contents" tab */
1039     info->tabs[TAB_CONTENTS].hwnd = CreateWindowExW(WS_EX_CLIENTEDGE, WC_TREEVIEWW,
1040            szEmpty, WS_CHILD | WS_BORDER | 0x25, 50, 50, 100, 100,
1041            info->WinType.hwndNavigation, NULL, hhctrl_hinstance, NULL);
1042     if(!info->tabs[TAB_CONTENTS].hwnd) {
1043         ERR("Could not create treeview control\n");
1044         return FALSE;
1045     }
1046
1047     ResizeTabChild(info, TAB_CONTENTS);
1048     ShowWindow(info->tabs[TAB_CONTENTS].hwnd, SW_SHOW);
1049
1050     return TRUE;
1051 }
1052
1053 static BOOL AddIndexTab(HHInfo *info)
1054 {
1055     char hidden_column[] = "Column";
1056     LVCOLUMNA lvc;
1057
1058     if(info->tabs[TAB_INDEX].id == -1)
1059         return TRUE; /* No "Index" tab */
1060     info->tabs[TAB_INDEX].hwnd = CreateWindowExW(WS_EX_CLIENTEDGE, WC_LISTVIEWW,
1061            szEmpty, WS_CHILD | WS_BORDER | LVS_SINGLESEL | LVS_REPORT | LVS_NOCOLUMNHEADER, 50, 50, 100, 100,
1062            info->WinType.hwndNavigation, NULL, hhctrl_hinstance, NULL);
1063     if(!info->tabs[TAB_INDEX].hwnd) {
1064         ERR("Could not create ListView control\n");
1065         return FALSE;
1066     }
1067     memset(&lvc, 0, sizeof(lvc));
1068     lvc.mask = LVCF_TEXT;
1069     lvc.pszText = hidden_column;
1070     if(SendMessageW(info->tabs[TAB_INDEX].hwnd, LVM_INSERTCOLUMNA, 0, (LPARAM) &lvc) == -1)
1071     {
1072         ERR("Could not create ListView column\n");
1073         return FALSE;
1074     }
1075
1076     ResizeTabChild(info, TAB_INDEX);
1077     ShowWindow(info->tabs[TAB_INDEX].hwnd, SW_HIDE);
1078
1079     return TRUE;
1080 }
1081
1082 static BOOL AddSearchTab(HHInfo *info)
1083 {
1084     HWND hwndList, hwndEdit, hwndContainer;
1085     char hidden_column[] = "Column";
1086     WNDPROC editWndProc;
1087     LVCOLUMNA lvc;
1088
1089     if(info->tabs[TAB_SEARCH].id == -1)
1090         return TRUE; /* No "Search" tab */
1091     hwndContainer = CreateWindowExW(WS_EX_CONTROLPARENT, szChildClass, szEmpty,
1092                                     WS_CHILD, 0, 0, 0, 0, info->WinType.hwndNavigation,
1093                                     NULL, hhctrl_hinstance, NULL);
1094     if(!hwndContainer) {
1095         ERR("Could not create search window container control.\n");
1096         return FALSE;
1097     }
1098     hwndEdit = CreateWindowExW(WS_EX_CLIENTEDGE, WC_EDITW, szEmpty, WS_CHILD
1099                                 | WS_VISIBLE | ES_LEFT | SS_NOTIFY, 0, 0, 0, 0,
1100                                hwndContainer, NULL, hhctrl_hinstance, NULL);
1101     if(!hwndEdit) {
1102         ERR("Could not create search ListView control.\n");
1103         return FALSE;
1104     }
1105     if(SendMessageW(hwndEdit, WM_SETFONT, (WPARAM) info->hFont, (LPARAM) FALSE) == -1)
1106     {
1107         ERR("Could not set font for edit control.\n");
1108         return FALSE;
1109     }
1110     editWndProc = (WNDPROC) SetWindowLongPtrW(hwndEdit, GWLP_WNDPROC, (LONG_PTR)EditChild_WndProc);
1111     if(!editWndProc) {
1112         ERR("Could not redirect messages for edit control.\n");
1113         return FALSE;
1114     }
1115     SetWindowLongPtrW(hwndEdit, GWLP_USERDATA, (LONG_PTR)editWndProc);
1116     hwndList = CreateWindowExW(WS_EX_CLIENTEDGE, WC_LISTVIEWW, szEmpty,
1117                                WS_CHILD | WS_VISIBLE | WS_BORDER | LVS_SINGLESEL
1118                                 | LVS_REPORT | LVS_NOCOLUMNHEADER, 0, 0, 0, 0,
1119                                hwndContainer, NULL, hhctrl_hinstance, NULL);
1120     if(!hwndList) {
1121         ERR("Could not create search ListView control.\n");
1122         return FALSE;
1123     }
1124     memset(&lvc, 0, sizeof(lvc));
1125     lvc.mask = LVCF_TEXT;
1126     lvc.pszText = hidden_column;
1127     if(SendMessageW(hwndList, LVM_INSERTCOLUMNA, 0, (LPARAM) &lvc) == -1)
1128     {
1129         ERR("Could not create ListView column\n");
1130         return FALSE;
1131     }
1132
1133     info->search.hwndEdit = hwndEdit;
1134     info->search.hwndList = hwndList;
1135     info->search.hwndContainer = hwndContainer;
1136     info->tabs[TAB_SEARCH].hwnd = hwndContainer;
1137
1138     SetWindowLongPtrW(hwndContainer, GWLP_USERDATA, (LONG_PTR)info);
1139
1140     ResizeTabChild(info, TAB_SEARCH);
1141
1142     return TRUE;
1143 }
1144
1145 /* The Index tab's sub-topic popup */
1146
1147 static void ResizePopupChild(HHInfo *info)
1148 {
1149     int scroll_width = GetSystemMetrics(SM_CXVSCROLL);
1150     int border_width = GetSystemMetrics(SM_CXBORDER);
1151     int edge_width = GetSystemMetrics(SM_CXEDGE);
1152     INT width, height;
1153     RECT rect;
1154
1155     if(!info)
1156         return;
1157
1158     GetClientRect(info->popup.hwndPopup, &rect);
1159     SetWindowPos(info->popup.hwndCallback, HWND_TOP, 0, 0,
1160                  rect.right, rect.bottom, SWP_NOMOVE);
1161
1162     rect.left = TAB_MARGIN;
1163     rect.top = TAB_TOP_PADDING + TAB_MARGIN;
1164     rect.right -= TAB_RIGHT_PADDING + TAB_MARGIN;
1165     rect.bottom -= TAB_MARGIN;
1166     width = rect.right-rect.left;
1167     height = rect.bottom-rect.top;
1168
1169     SetWindowPos(info->popup.hwndList, NULL, rect.left, rect.top, width, height,
1170                  SWP_NOZORDER | SWP_NOACTIVATE);
1171
1172     SendMessageW(info->popup.hwndList, LVM_SETCOLUMNWIDTH, 0,
1173                  width-scroll_width-2*border_width-2*edge_width);
1174 }
1175
1176 static LRESULT CALLBACK HelpPopup_WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1177 {
1178     HHInfo *info = (HHInfo *)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
1179
1180     switch (message)
1181     {
1182     case WM_SIZE:
1183         ResizePopupChild(info);
1184         return 0;
1185     case WM_DESTROY:
1186         DestroyWindow(hWnd);
1187         return 0;
1188     case WM_CLOSE:
1189         ShowWindow(hWnd, SW_HIDE);
1190         return 0;
1191
1192     default:
1193         return DefWindowProcW(hWnd, message, wParam, lParam);
1194     }
1195
1196     return 0;
1197 }
1198
1199 static LRESULT CALLBACK PopupChild_WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1200 {
1201     switch (message)
1202     {
1203     case WM_NOTIFY: {
1204         NMHDR *nmhdr = (NMHDR*)lParam;
1205         switch(nmhdr->code)
1206         {
1207         case NM_DBLCLK: {
1208             HHInfo *info = (HHInfo*)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
1209             IndexSubItem *iter;
1210
1211             if(info == 0 || lParam == 0)
1212                 return 0;
1213             iter = (IndexSubItem*) ((NMITEMACTIVATE *)lParam)->lParam;
1214             if(iter == 0)
1215                 return 0;
1216             NavigateToChm(info, info->index->merge.chm_file, iter->local);
1217             ShowWindow(info->popup.hwndPopup, SW_HIDE);
1218             return 0;
1219         }
1220         case NM_RETURN: {
1221             HHInfo *info = (HHInfo*)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
1222             IndexSubItem *iter;
1223             LVITEMW lvItem;
1224
1225             if(info == 0)
1226                 return 0;
1227
1228             lvItem.iItem = (int) SendMessageW(info->popup.hwndList, LVM_GETSELECTIONMARK, 0, 0);
1229             lvItem.mask = TVIF_PARAM;
1230             SendMessageW(info->popup.hwndList, LVM_GETITEMW, 0, (LPARAM)&lvItem);
1231             iter = (IndexSubItem*) lvItem.lParam;
1232             NavigateToChm(info, info->index->merge.chm_file, iter->local);
1233             ShowWindow(info->popup.hwndPopup, SW_HIDE);
1234             return 0;
1235         }
1236         }
1237         break;
1238     }
1239     default:
1240         return DefWindowProcW(hWnd, message, wParam, lParam);
1241     }
1242
1243     return 0;
1244 }
1245
1246 static BOOL AddIndexPopup(HHInfo *info)
1247 {
1248     static const WCHAR szPopupChildClass[] = {'H','H',' ','P','o','p','u','p',' ','C','h','i','l','d',0};
1249     static const WCHAR windowCaptionW[] = {'S','e','l','e','c','t',' ','T','o','p','i','c',':',0};
1250     static const WCHAR windowClassW[] = {'H','H',' ','P','o','p','u','p',0};
1251     HWND hwndList, hwndPopup, hwndCallback;
1252     char hidden_column[] = "Column";
1253     WNDCLASSEXW wcex;
1254     LVCOLUMNA lvc;
1255
1256     if(info->tabs[TAB_INDEX].id == -1)
1257         return TRUE; /* No "Index" tab */
1258
1259     wcex.cbSize         = sizeof(WNDCLASSEXW);
1260     wcex.style          = CS_HREDRAW | CS_VREDRAW;
1261     wcex.lpfnWndProc    = HelpPopup_WndProc;
1262     wcex.cbClsExtra     = 0;
1263     wcex.cbWndExtra     = 0;
1264     wcex.hInstance      = hhctrl_hinstance;
1265     wcex.hIcon          = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
1266     wcex.hCursor        = LoadCursorW(NULL, (LPCWSTR)IDC_ARROW);
1267     wcex.hbrBackground  = (HBRUSH)(COLOR_MENU + 1);
1268     wcex.lpszMenuName   = NULL;
1269     wcex.lpszClassName  = windowClassW;
1270     wcex.hIconSm        = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
1271     RegisterClassExW(&wcex);
1272
1273     wcex.cbSize         = sizeof(WNDCLASSEXW);
1274     wcex.style          = 0;
1275     wcex.lpfnWndProc    = PopupChild_WndProc;
1276     wcex.cbClsExtra     = 0;
1277     wcex.cbWndExtra     = 0;
1278     wcex.hInstance      = hhctrl_hinstance;
1279     wcex.hIcon          = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
1280     wcex.hCursor        = LoadCursorW(NULL, (LPCWSTR)IDC_ARROW);
1281     wcex.hbrBackground  = (HBRUSH)(COLOR_BTNFACE + 1);
1282     wcex.lpszMenuName   = NULL;
1283     wcex.lpszClassName  = szPopupChildClass;
1284     wcex.hIconSm        = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
1285     RegisterClassExW(&wcex);
1286
1287     hwndPopup = CreateWindowExW(WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_APPWINDOW
1288                                  | WS_EX_WINDOWEDGE | WS_EX_RIGHTSCROLLBAR,
1289                                 windowClassW, windowCaptionW, WS_POPUPWINDOW
1290                                  | WS_OVERLAPPEDWINDOW | WS_VISIBLE
1291                                  | WS_CLIPSIBLINGS | WS_CLIPCHILDREN, CW_USEDEFAULT,
1292                                 CW_USEDEFAULT, 300, 200, info->WinType.hwndHelp,
1293                                 NULL, hhctrl_hinstance, NULL);
1294     if (!hwndPopup)
1295         return FALSE;
1296
1297     hwndCallback = CreateWindowExW(WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR,
1298                                    szPopupChildClass, szEmpty, WS_CHILDWINDOW | WS_VISIBLE,
1299                                    0, 0, 0, 0,
1300                                    hwndPopup, NULL, hhctrl_hinstance, NULL);
1301     if (!hwndCallback)
1302         return FALSE;
1303
1304     ShowWindow(hwndPopup, SW_HIDE);
1305     hwndList = CreateWindowExW(WS_EX_CLIENTEDGE, WC_LISTVIEWW, szEmpty,
1306                                WS_CHILD | WS_BORDER | LVS_SINGLESEL | LVS_REPORT
1307                                 | LVS_NOCOLUMNHEADER, 50, 50, 100, 100,
1308                                hwndCallback, NULL, hhctrl_hinstance, NULL);
1309     if(!hwndList) {
1310         ERR("Could not create popup ListView control\n");
1311         return FALSE;
1312     }
1313     memset(&lvc, 0, sizeof(lvc));
1314     lvc.mask = LVCF_TEXT;
1315     lvc.pszText = hidden_column;
1316     if(SendMessageW(hwndList, LVM_INSERTCOLUMNA, 0, (LPARAM) &lvc) == -1)
1317     {
1318         ERR("Could not create popup ListView column\n");
1319         return FALSE;
1320     }
1321
1322     info->popup.hwndCallback = hwndCallback;
1323     info->popup.hwndPopup = hwndPopup;
1324     info->popup.hwndList = hwndList;
1325     SetWindowLongPtrW(hwndPopup, GWLP_USERDATA, (LONG_PTR)info);
1326     SetWindowLongPtrW(hwndCallback, GWLP_USERDATA, (LONG_PTR)info);
1327
1328     ResizePopupChild(info);
1329     ShowWindow(hwndList, SW_SHOW);
1330
1331     return TRUE;
1332 }
1333
1334 /* Viewer Window */
1335
1336 static void ExpandContract(HHInfo *pHHInfo)
1337 {
1338     RECT r, nav;
1339
1340     pHHInfo->WinType.fNotExpanded = !pHHInfo->WinType.fNotExpanded;
1341     GetWindowRect(pHHInfo->WinType.hwndHelp, &r);
1342     NP_GetNavigationRect(pHHInfo, &nav);
1343
1344     /* hide/show both the nav bar and the size bar */
1345     if (pHHInfo->WinType.fNotExpanded)
1346     {
1347         ShowWindow(pHHInfo->WinType.hwndNavigation, SW_HIDE);
1348         ShowWindow(pHHInfo->hwndSizeBar, SW_HIDE);
1349         r.left = r.left + nav.right;
1350
1351         SendMessageW(pHHInfo->WinType.hwndToolBar, TB_HIDEBUTTON, IDTB_EXPAND, MAKELPARAM(FALSE, 0));
1352         SendMessageW(pHHInfo->WinType.hwndToolBar, TB_HIDEBUTTON, IDTB_CONTRACT, MAKELPARAM(TRUE, 0));
1353     }
1354     else
1355     {
1356         ShowWindow(pHHInfo->WinType.hwndNavigation, SW_SHOW);
1357         ShowWindow(pHHInfo->hwndSizeBar, SW_SHOW);
1358         r.left = r.left - nav.right;
1359
1360         SendMessageW(pHHInfo->WinType.hwndToolBar, TB_HIDEBUTTON, IDTB_EXPAND, MAKELPARAM(TRUE, 0));
1361         SendMessageW(pHHInfo->WinType.hwndToolBar, TB_HIDEBUTTON, IDTB_CONTRACT, MAKELPARAM(FALSE, 0));
1362     }
1363
1364     MoveWindow(pHHInfo->WinType.hwndHelp, r.left, r.top, r.right-r.left, r.bottom-r.top, TRUE);
1365 }
1366
1367 static LRESULT Help_OnSize(HWND hWnd)
1368 {
1369     HHInfo *pHHInfo = (HHInfo *)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
1370     DWORD dwSize;
1371     RECT rc;
1372
1373     if (!pHHInfo)
1374         return 0;
1375
1376     if (!pHHInfo->WinType.fNotExpanded)
1377     {
1378         NP_GetNavigationRect(pHHInfo, &rc);
1379         SetWindowPos(pHHInfo->WinType.hwndNavigation, HWND_TOP, 0, 0,
1380                      rc.right, rc.bottom, SWP_NOMOVE);
1381
1382         SB_GetSizeBarRect(pHHInfo, &rc);
1383         SetWindowPos(pHHInfo->hwndSizeBar, HWND_TOP, rc.left, rc.top,
1384                      rc.right, rc.bottom, SWP_SHOWWINDOW);
1385
1386     }
1387
1388     HP_GetHTMLRect(pHHInfo, &rc);
1389     SetWindowPos(pHHInfo->WinType.hwndHTML, HWND_TOP, rc.left, rc.top,
1390                  rc.right, rc.bottom, SWP_SHOWWINDOW);
1391
1392     /* Resize browser window taking the frame size into account */
1393     dwSize = GetSystemMetrics(SM_CXFRAME);
1394     ResizeWebBrowser(pHHInfo, rc.right - dwSize, rc.bottom - dwSize);
1395
1396     return 0;
1397 }
1398
1399 static LRESULT CALLBACK Help_WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1400 {
1401     switch (message)
1402     {
1403     case WM_COMMAND:
1404         if (HIWORD(wParam) == BN_CLICKED)
1405             TB_OnClick(hWnd, LOWORD(wParam));
1406         break;
1407     case WM_SIZE:
1408         return Help_OnSize(hWnd);
1409     case WM_CLOSE:
1410         ReleaseHelpViewer((HHInfo *)GetWindowLongPtrW(hWnd, GWLP_USERDATA));
1411         return 0;
1412     case WM_DESTROY:
1413         if(hh_process)
1414             PostQuitMessage(0);
1415         break;
1416
1417     default:
1418         return DefWindowProcW(hWnd, message, wParam, lParam);
1419     }
1420
1421     return 0;
1422 }
1423
1424 static BOOL HH_CreateHelpWindow(HHInfo *info)
1425 {
1426     HWND hWnd;
1427     RECT winPos = info->WinType.rcWindowPos;
1428     WNDCLASSEXW wcex;
1429     DWORD dwStyles, dwExStyles;
1430     DWORD x, y, width = 0, height = 0;
1431     LPCWSTR caption;
1432
1433     static const WCHAR windowClassW[] = {
1434         'H','H',' ', 'P','a','r','e','n','t',0
1435     };
1436
1437     wcex.cbSize         = sizeof(WNDCLASSEXW);
1438     wcex.style          = CS_HREDRAW | CS_VREDRAW;
1439     wcex.lpfnWndProc    = Help_WndProc;
1440     wcex.cbClsExtra     = 0;
1441     wcex.cbWndExtra     = 0;
1442     wcex.hInstance      = hhctrl_hinstance;
1443     wcex.hIcon          = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
1444     wcex.hCursor        = LoadCursorW(NULL, (LPCWSTR)IDC_ARROW);
1445     wcex.hbrBackground  = (HBRUSH)(COLOR_MENU + 1);
1446     wcex.lpszMenuName   = NULL;
1447     wcex.lpszClassName  = windowClassW;
1448     wcex.hIconSm        = LoadIconW(NULL, (LPCWSTR)IDI_APPLICATION);
1449
1450     RegisterClassExW(&wcex);
1451
1452     /* Read in window parameters if available */
1453     if (info->WinType.fsValidMembers & HHWIN_PARAM_STYLES)
1454         dwStyles = info->WinType.dwStyles | WS_OVERLAPPEDWINDOW;
1455     else
1456         dwStyles = WS_OVERLAPPEDWINDOW | WS_VISIBLE |
1457                    WS_CLIPSIBLINGS | WS_CLIPCHILDREN;
1458
1459     if (info->WinType.fsValidMembers & HHWIN_PARAM_EXSTYLES)
1460         dwExStyles = info->WinType.dwExStyles;
1461     else
1462         dwExStyles = WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_APPWINDOW |
1463                      WS_EX_WINDOWEDGE | WS_EX_RIGHTSCROLLBAR;
1464
1465     if (info->WinType.fsValidMembers & HHWIN_PARAM_RECT)
1466     {
1467         x = winPos.left;
1468         y = winPos.top;
1469         width = winPos.right - x;
1470         height = winPos.bottom - y;
1471     }
1472     if (!width || !height)
1473     {
1474         x = WINTYPE_DEFAULT_X;
1475         y = WINTYPE_DEFAULT_Y;
1476         width = WINTYPE_DEFAULT_WIDTH;
1477         height = WINTYPE_DEFAULT_HEIGHT;
1478     }
1479
1480     if (info->WinType.fNotExpanded)
1481     {
1482         if (!(info->WinType.fsValidMembers & HHWIN_PARAM_NAV_WIDTH) &&
1483               info->WinType.iNavWidth == 0)
1484         {
1485             info->WinType.iNavWidth = WINTYPE_DEFAULT_NAVWIDTH;
1486         }
1487
1488         x += info->WinType.iNavWidth;
1489         width -= info->WinType.iNavWidth;
1490     }
1491
1492
1493     caption = info->WinType.pszCaption;
1494     if (!*caption) caption = info->pCHMInfo->defTitle;
1495
1496     hWnd = CreateWindowExW(dwExStyles, windowClassW, caption,
1497                            dwStyles, x, y, width, height, NULL, NULL, hhctrl_hinstance, NULL);
1498     if (!hWnd)
1499         return FALSE;
1500
1501     ShowWindow(hWnd, SW_SHOW);
1502     UpdateWindow(hWnd);
1503
1504     /* store the pointer to the HH info struct */
1505     SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LONG_PTR)info);
1506
1507     info->WinType.hwndHelp = hWnd;
1508     return TRUE;
1509 }
1510
1511 static void HH_CreateFont(HHInfo *pHHInfo)
1512 {
1513     LOGFONTW lf;
1514
1515     GetObjectW(GetStockObject(DEFAULT_GUI_FONT), sizeof(LOGFONTW), &lf);
1516     lf.lfWeight = FW_NORMAL;
1517     lf.lfItalic = FALSE;
1518     lf.lfUnderline = FALSE;
1519
1520     pHHInfo->hFont = CreateFontIndirectW(&lf);
1521 }
1522
1523 static void HH_InitRequiredControls(DWORD dwControls)
1524 {
1525     INITCOMMONCONTROLSEX icex;
1526
1527     icex.dwSize = sizeof(INITCOMMONCONTROLSEX);
1528     icex.dwICC = dwControls;
1529     InitCommonControlsEx(&icex);
1530 }
1531
1532 /* Creates the whole package */
1533 static BOOL CreateViewer(HHInfo *pHHInfo)
1534 {
1535     HH_CreateFont(pHHInfo);
1536
1537     if (!HH_CreateHelpWindow(pHHInfo))
1538         return FALSE;
1539
1540     HH_InitRequiredControls(ICC_BAR_CLASSES);
1541
1542     if (!HH_AddToolbar(pHHInfo))
1543         return FALSE;
1544
1545     HH_RegisterChildWndClass(pHHInfo);
1546
1547     if (!HH_AddNavigationPane(pHHInfo))
1548         return FALSE;
1549
1550     HH_RegisterSizeBarClass(pHHInfo);
1551
1552     if (!HH_AddSizeBar(pHHInfo))
1553         return FALSE;
1554
1555     if (!HH_AddHTMLPane(pHHInfo))
1556         return FALSE;
1557
1558     if (!AddContentTab(pHHInfo))
1559         return FALSE;
1560
1561     if (!AddIndexTab(pHHInfo))
1562         return FALSE;
1563
1564     if (!AddIndexPopup(pHHInfo))
1565         return FALSE;
1566
1567     if (!AddSearchTab(pHHInfo))
1568         return FALSE;
1569
1570     InitContent(pHHInfo);
1571     InitIndex(pHHInfo);
1572
1573     return TRUE;
1574 }
1575
1576 void ReleaseHelpViewer(HHInfo *info)
1577 {
1578     TRACE("(%p)\n", info);
1579
1580     if (!info)
1581         return;
1582
1583     /* Free allocated strings */
1584     heap_free(info->pszType);
1585     heap_free(info->pszCaption);
1586     heap_free(info->pszToc);
1587     heap_free(info->pszIndex);
1588     heap_free(info->pszFile);
1589     heap_free(info->pszHome);
1590     heap_free(info->pszJump1);
1591     heap_free(info->pszJump2);
1592     heap_free(info->pszUrlJump1);
1593     heap_free(info->pszUrlJump2);
1594
1595     if (info->pCHMInfo)
1596         CloseCHM(info->pCHMInfo);
1597
1598     ReleaseWebBrowser(info);
1599     ReleaseContent(info);
1600     ReleaseIndex(info);
1601     ReleaseSearch(info);
1602
1603     if(info->WinType.hwndHelp)
1604         DestroyWindow(info->WinType.hwndHelp);
1605
1606     heap_free(info);
1607     OleUninitialize();
1608 }
1609
1610 HHInfo *CreateHelpViewer(LPCWSTR filename)
1611 {
1612     HHInfo *info = heap_alloc_zero(sizeof(HHInfo));
1613     int i;
1614
1615     /* Set the invalid tab ID (-1) as the default value for all
1616      * of the tabs, this matches a failed TCM_INSERTITEM call.
1617      */
1618     for(i=0;i<sizeof(info->tabs)/sizeof(HHTab);i++)
1619         info->tabs[i].id = -1;
1620
1621     OleInitialize(NULL);
1622
1623     info->pCHMInfo = OpenCHM(filename);
1624     if(!info->pCHMInfo) {
1625         ReleaseHelpViewer(info);
1626         return NULL;
1627     }
1628
1629     if (!LoadWinTypeFromCHM(info)) {
1630         ReleaseHelpViewer(info);
1631         return NULL;
1632     }
1633
1634     if(!CreateViewer(info)) {
1635         ReleaseHelpViewer(info);
1636         return NULL;
1637     }
1638
1639     return info;
1640 }