?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
user32/tests: Fix monitor test failures on some systems.
[wine.git] / dlls / shell32 / ebrowser.c
blob637104c58dcec639d6d3f57a1fe6f34997f9dbf0
1 /*
2 * ExplorerBrowser Control implementation.
3 *
4 * Copyright 2010 David Hedberg
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 */
20
21 #include <stdarg.h>
22
23 #define COBJMACROS
24 #define NONAMELESSUNION
25
26 #include "winerror.h"
27 #include "windef.h"
28 #include "winbase.h"
29
30 #include "wine/list.h"
31 #include "wine/debug.h"
32 #include "debughlp.h"
33
34 #include "shell32_main.h"
35 #include "pidl.h"
36
37 WINE_DEFAULT_DEBUG_CHANNEL(shell);
38
39 #define SPLITTER_WIDTH 2
40 #define NP_MIN_WIDTH 60
41 #define NP_DEFAULT_WIDTH 150
42 #define SV_MIN_WIDTH 150
43
44 typedef struct _event_client {
45 struct list entry;
46 IExplorerBrowserEvents *pebe;
47 DWORD cookie;
48 } event_client;
49
50 typedef struct _travellog_entry {
51 struct list entry;
52 LPITEMIDLIST pidl;
53 } travellog_entry;
54
55 typedef struct _ExplorerBrowserImpl {
56 IExplorerBrowser IExplorerBrowser_iface;
57 IShellBrowser IShellBrowser_iface;
58 ICommDlgBrowser3 ICommDlgBrowser3_iface;
59 IObjectWithSite IObjectWithSite_iface;
60 INameSpaceTreeControlEvents INameSpaceTreeControlEvents_iface;
61 IInputObject IInputObject_iface;
62 LONG ref;
63 BOOL destroyed;
64
65 HWND hwnd_main;
66 HWND hwnd_sv;
67
68 RECT splitter_rc;
69 struct {
70 INameSpaceTreeControl2 *pnstc2;
71 HWND hwnd_splitter, hwnd_nstc;
72 DWORD nstc_cookie;
73 UINT width;
74 BOOL show;
75 RECT rc;
76 } navpane;
77
78 EXPLORER_BROWSER_OPTIONS eb_options;
79 FOLDERSETTINGS fs;
80
81 struct list event_clients;
82 DWORD events_next_cookie;
83 struct list travellog;
84 travellog_entry *travellog_cursor;
85 int travellog_count;
86
87 int dpix;
88
89 IShellView *psv;
90 RECT sv_rc;
91 LPITEMIDLIST current_pidl;
92
93 IUnknown *punk_site;
94 ICommDlgBrowser *pcdb_site;
95 ICommDlgBrowser2 *pcdb2_site;
96 ICommDlgBrowser3 *pcdb3_site;
97 IExplorerPaneVisibility *pepv_site;
98 } ExplorerBrowserImpl;
99
100 static void initialize_navpane(ExplorerBrowserImpl *This, HWND hwnd_parent, RECT *rc);
101
102 /**************************************************************************
103 * Event functions.
104 */
105 static void events_unadvise_all(ExplorerBrowserImpl *This)
106 {
107 event_client *client, *curs;
108 TRACE("%p\n", This);
109
110 LIST_FOR_EACH_ENTRY_SAFE(client, curs, &This->event_clients, event_client, entry)
111 {
112 TRACE("Removing %p\n", client);
113 list_remove(&client->entry);
114 IExplorerBrowserEvents_Release(client->pebe);
115 heap_free(client);
116 }
117 }
118
119 static HRESULT events_NavigationPending(ExplorerBrowserImpl *This, PCIDLIST_ABSOLUTE pidl)
120 {
121 event_client *cursor;
122 HRESULT hres = S_OK;
123
124 TRACE("%p\n", This);
125
126 LIST_FOR_EACH_ENTRY(cursor, &This->event_clients, event_client, entry)
127 {
128 TRACE("Notifying %p\n", cursor);
129 hres = IExplorerBrowserEvents_OnNavigationPending(cursor->pebe, pidl);
130
131 /* If this failed for any reason, the browsing is supposed to be aborted. */
132 if(FAILED(hres))
133 break;
134 }
135
136 return hres;
137 }
138
139 static void events_NavigationComplete(ExplorerBrowserImpl *This, PCIDLIST_ABSOLUTE pidl)
140 {
141 event_client *cursor;
142
143 TRACE("%p\n", This);
144
145 LIST_FOR_EACH_ENTRY(cursor, &This->event_clients, event_client, entry)
146 {
147 TRACE("Notifying %p\n", cursor);
148 IExplorerBrowserEvents_OnNavigationComplete(cursor->pebe, pidl);
149 }
150 }
151
152 static void events_NavigationFailed(ExplorerBrowserImpl *This, PCIDLIST_ABSOLUTE pidl)
153 {
154 event_client *cursor;
155
156 TRACE("%p\n", This);
157
158 LIST_FOR_EACH_ENTRY(cursor, &This->event_clients, event_client, entry)
159 {
160 TRACE("Notifying %p\n", cursor);
161 IExplorerBrowserEvents_OnNavigationFailed(cursor->pebe, pidl);
162 }
163 }
164
165 static void events_ViewCreated(ExplorerBrowserImpl *This, IShellView *psv)
166 {
167 event_client *cursor;
168
169 TRACE("%p\n", This);
170
171 LIST_FOR_EACH_ENTRY(cursor, &This->event_clients, event_client, entry)
172 {
173 TRACE("Notifying %p\n", cursor);
174 IExplorerBrowserEvents_OnViewCreated(cursor->pebe, psv);
175 }
176 }
177
178 /**************************************************************************
179 * Travellog functions.
180 */
181 static void travellog_remove_entry(ExplorerBrowserImpl *This, travellog_entry *entry)
182 {
183 TRACE("Removing %p\n", entry);
184
185 list_remove(&entry->entry);
186 ILFree(entry->pidl);
187 heap_free(entry);
188 This->travellog_count--;
189 }
190
191 static void travellog_remove_all_entries(ExplorerBrowserImpl *This)
192 {
193 travellog_entry *cursor, *cursor2;
194 TRACE("%p\n", This);
195
196 LIST_FOR_EACH_ENTRY_SAFE(cursor, cursor2, &This->travellog, travellog_entry, entry)
197 travellog_remove_entry(This, cursor);
198
199 This->travellog_cursor = NULL;
200 }
201
202 static void travellog_add_entry(ExplorerBrowserImpl *This, LPITEMIDLIST pidl)
203 {
204 travellog_entry *new, *cursor, *cursor2;
205 TRACE("%p (old count %d)\n", pidl, This->travellog_count);
206
207 /* Replace the old tail, if any, with the new entry */
208 if(This->travellog_cursor)
209 {
210 LIST_FOR_EACH_ENTRY_SAFE_REV(cursor, cursor2, &This->travellog, travellog_entry, entry)
211 {
212 if(cursor == This->travellog_cursor)
213 break;
214 travellog_remove_entry(This, cursor);
215 }
216 }
217
218 /* Create and add the new entry */
219 new = heap_alloc(sizeof(*new));
220 new->pidl = ILClone(pidl);
221 list_add_tail(&This->travellog, &new->entry);
222 This->travellog_cursor = new;
223 This->travellog_count++;
224
225 /* Remove the first few entries if the size limit is reached. */
226 if(This->travellog_count > 200)
227 {
228 UINT i = 0;
229 LIST_FOR_EACH_ENTRY_SAFE(cursor, cursor2, &This->travellog, travellog_entry, entry)
230 {
231 if(i++ > 10)
232 break;
233 travellog_remove_entry(This, cursor);
234 }
235 }
236 }
237
238 static LPCITEMIDLIST travellog_go_back(ExplorerBrowserImpl *This)
239 {
240 travellog_entry *prev;
241 TRACE("%p, %p\n", This, This->travellog_cursor);
242
243 if(!This->travellog_cursor)
244 return NULL;
245
246 prev = LIST_ENTRY(list_prev(&This->travellog, &This->travellog_cursor->entry),
247 travellog_entry, entry);
248 if(!prev)
249 return NULL;
250
251 This->travellog_cursor = prev;
252 return prev->pidl;
253 }
254
255 static LPCITEMIDLIST travellog_go_forward(ExplorerBrowserImpl *This)
256 {
257 travellog_entry *next;
258 TRACE("%p, %p\n", This, This->travellog_cursor);
259
260 if(!This->travellog_cursor)
261 return NULL;
262
263 next = LIST_ENTRY(list_next(&This->travellog, &This->travellog_cursor->entry),
264 travellog_entry, entry);
265 if(!next)
266 return NULL;
267
268 This->travellog_cursor = next;
269 return next->pidl;
270 }
271
272 /**************************************************************************
273 * Helper functions
274 */
275 static void update_layout(ExplorerBrowserImpl *This)
276 {
277 RECT rc;
278 INT navpane_width_actual;
279 INT shellview_width_actual;
280 int np_min_width = MulDiv(NP_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
281 int sv_min_width = MulDiv(SV_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
282 TRACE("%p (navpane: %d, EBO_SHOWFRAMES: %d)\n",
283 This, This->navpane.show, This->eb_options & EBO_SHOWFRAMES);
284
285 GetClientRect(This->hwnd_main, &rc);
286
287 if((This->eb_options & EBO_SHOWFRAMES) && This->navpane.show)
288 navpane_width_actual = This->navpane.width;
289 else
290 navpane_width_actual = 0;
291
292 shellview_width_actual = rc.right - navpane_width_actual;
293 if(shellview_width_actual < sv_min_width && navpane_width_actual)
294 {
295 INT missing_width = sv_min_width - shellview_width_actual;
296 if(missing_width < (navpane_width_actual - np_min_width))
297 {
298 /* Shrink the navpane */
299 navpane_width_actual -= missing_width;
300 shellview_width_actual += missing_width;
301 }
302 else
303 {
304 /* Hide the navpane */
305 shellview_width_actual += navpane_width_actual;
306 navpane_width_actual = 0;
307 }
308 }
309
310 /**************************************************************
311 * Calculate rectangles for the panes. All rectangles contain
312 * the position of the panes relative to hwnd_main.
313 */
314
315 if(navpane_width_actual)
316 {
317 SetRect(&This->navpane.rc, 0, 0, navpane_width_actual, rc.bottom);
318
319 if(!This->navpane.hwnd_splitter)
320 initialize_navpane(This, This->hwnd_main, &This->navpane.rc);
321 }
322 else
323 ZeroMemory(&This->navpane.rc, sizeof(RECT));
324
325 SetRect(&This->sv_rc, navpane_width_actual, 0, navpane_width_actual + shellview_width_actual,
326 rc.bottom);
327 }
328
329 static void size_panes(ExplorerBrowserImpl *This)
330 {
331 int splitter_width = MulDiv(SPLITTER_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
332 MoveWindow(This->navpane.hwnd_splitter,
333 This->navpane.rc.right - splitter_width, This->navpane.rc.top,
334 splitter_width, This->navpane.rc.bottom - This->navpane.rc.top,
335 TRUE);
336
337 MoveWindow(This->hwnd_sv,
338 This->sv_rc.left, This->sv_rc.top,
339 This->sv_rc.right - This->sv_rc.left, This->sv_rc.bottom - This->sv_rc.top,
340 TRUE);
341 }
342
343 static HRESULT change_viewmode(ExplorerBrowserImpl *This, UINT viewmode)
344 {
345 IFolderView *pfv;
346 HRESULT hr;
347
348 if(!This->psv)
349 return E_FAIL;
350
351 hr = IShellView_QueryInterface(This->psv, &IID_IFolderView, (void*)&pfv);
352 if(SUCCEEDED(hr))
353 {
354 hr = IFolderView_SetCurrentViewMode(pfv, This->fs.ViewMode);
355 IFolderView_Release(pfv);
356 }
357
358 return hr;
359 }
360
361 static HRESULT create_new_shellview(ExplorerBrowserImpl *This, IShellItem *psi)
362 {
363 IShellBrowser *psb = &This->IShellBrowser_iface;
364 IShellFolder *psf;
365 IShellView *psv;
366 HWND hwnd_new;
367 HRESULT hr;
368
369 TRACE("%p, %p\n", This, psi);
370
371 hr = IShellItem_BindToHandler(psi, NULL, &BHID_SFObject, &IID_IShellFolder, (void**)&psf);
372 if(SUCCEEDED(hr))
373 {
374 hr = IShellFolder_CreateViewObject(psf, This->hwnd_main, &IID_IShellView, (void**)&psv);
375 if(SUCCEEDED(hr))
376 {
377 if(This->hwnd_sv)
378 {
379 IShellView_DestroyViewWindow(This->psv);
380 This->hwnd_sv = NULL;
381 }
382
383 hr = IShellView_CreateViewWindow(psv, This->psv, &This->fs, psb, &This->sv_rc, &hwnd_new);
384 if(SUCCEEDED(hr))
385 {
386 /* Replace the old shellview */
387 if(This->psv) IShellView_Release(This->psv);
388
389 This->psv = psv;
390 This->hwnd_sv = hwnd_new;
391 events_ViewCreated(This, psv);
392 }
393 else
394 {
395 ERR("CreateViewWindow failed (0x%x)\n", hr);
396 IShellView_Release(psv);
397 }
398 }
399 else
400 ERR("CreateViewObject failed (0x%x)\n", hr);
401
402 IShellFolder_Release(psf);
403 }
404 else
405 ERR("SI::BindToHandler failed (0x%x)\n", hr);
406
407 return hr;
408 }
409
410 static void get_interfaces_from_site(ExplorerBrowserImpl *This)
411 {
412 IServiceProvider *psp;
413 HRESULT hr;
414
415 /* Calling this with This->punk_site set to NULL should properly
416 * release any previously fetched interfaces.
417 */
418
419 if(This->pcdb_site)
420 {
421 ICommDlgBrowser_Release(This->pcdb_site);
422 if(This->pcdb2_site) ICommDlgBrowser2_Release(This->pcdb2_site);
423 if(This->pcdb3_site) ICommDlgBrowser3_Release(This->pcdb3_site);
424
425 This->pcdb_site = NULL;
426 This->pcdb2_site = NULL;
427 This->pcdb3_site = NULL;
428 }
429
430 if(This->pepv_site)
431 {
432 IExplorerPaneVisibility_Release(This->pepv_site);
433 This->pepv_site = NULL;
434 }
435
436 if(!This->punk_site)
437 return;
438
439 hr = IUnknown_QueryInterface(This->punk_site, &IID_IServiceProvider, (void**)&psp);
440 if(FAILED(hr))
441 {
442 ERR("Failed to get IServiceProvider from site.\n");
443 return;
444 }
445
446 /* ICommDlgBrowser */
447 IServiceProvider_QueryService(psp, &SID_SExplorerBrowserFrame, &IID_ICommDlgBrowser,
448 (void**)&This->pcdb_site);
449 IServiceProvider_QueryService(psp, &SID_SExplorerBrowserFrame, &IID_ICommDlgBrowser2,
450 (void**)&This->pcdb2_site);
451 IServiceProvider_QueryService(psp, &SID_SExplorerBrowserFrame, &IID_ICommDlgBrowser3,
452 (void**)&This->pcdb3_site);
453
454 /* IExplorerPaneVisibility */
455 IServiceProvider_QueryService(psp, &SID_ExplorerPaneVisibility, &IID_IExplorerPaneVisibility,
456 (void**)&This->pepv_site);
457
458 IServiceProvider_Release(psp);
459 }
460
461 /**************************************************************************
462 * General pane functionality.
463 */
464 static void update_panestate(ExplorerBrowserImpl *This)
465 {
466 EXPLORERPANESTATE eps = EPS_DONTCARE;
467 BOOL show_navpane;
468 TRACE("%p\n", This);
469
470 if(!This->pepv_site) return;
471
472 IExplorerPaneVisibility_GetPaneState(This->pepv_site, (REFEXPLORERPANE) &EP_NavPane, &eps);
473 if( !(eps & EPS_DEFAULT_OFF) )
474 show_navpane = TRUE;
475 else
476 show_navpane = FALSE;
477
478 if(This->navpane.show != show_navpane)
479 {
480 update_layout(This);
481 size_panes(This);
482 }
483
484 This->navpane.show = show_navpane;
485 }
486
487 static void splitter_draw(HWND hwnd, RECT *rc)
488 {
489 HDC hdc = GetDC(hwnd);
490 InvertRect(hdc, rc);
491 ReleaseDC(hwnd, hdc);
492 }
493
494 /**************************************************************************
495 * The Navigation Pane.
496 */
497 static LRESULT navpane_splitter_beginresize(ExplorerBrowserImpl *This, HWND hwnd, LPARAM lParam)
498 {
499 int splitter_width = MulDiv(SPLITTER_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
500
501 TRACE("\n");
502
503 SetCapture(hwnd);
504
505 This->splitter_rc = This->navpane.rc;
506 This->splitter_rc.left = This->splitter_rc.right - splitter_width;
507
508 splitter_draw(GetParent(hwnd), &This->splitter_rc);
509
510 return TRUE;
511 }
512
513 static LRESULT navpane_splitter_resizing(ExplorerBrowserImpl *This, HWND hwnd, LPARAM lParam)
514 {
515 int new_width, dx;
516 RECT rc;
517 int splitter_width = MulDiv(SPLITTER_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
518 int np_min_width = MulDiv(NP_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
519 int sv_min_width = MulDiv(SV_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
520
521 if(GetCapture() != hwnd) return FALSE;
522
523 dx = (SHORT)LOWORD(lParam);
524 TRACE("%d.\n", dx);
525
526 rc = This->navpane.rc;
527 new_width = This->navpane.width + dx;
528 if(new_width > np_min_width && This->sv_rc.right - new_width > sv_min_width)
529 {
530 rc.right = new_width;
531 rc.left = rc.right - splitter_width;
532 splitter_draw(GetParent(hwnd), &This->splitter_rc);
533 splitter_draw(GetParent(hwnd), &rc);
534 This->splitter_rc = rc;
535 }
536
537 return TRUE;
538 }
539
540 static LRESULT navpane_splitter_endresize(ExplorerBrowserImpl *This, HWND hwnd, LPARAM lParam)
541 {
542 int new_width, dx;
543 int np_min_width = MulDiv(NP_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
544 int sv_min_width = MulDiv(SV_MIN_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
545
546 if(GetCapture() != hwnd) return FALSE;
547
548 dx = (SHORT)LOWORD(lParam);
549 TRACE("%d.\n", dx);
550
551 splitter_draw(GetParent(hwnd), &This->splitter_rc);
552
553 new_width = This->navpane.width + dx;
554 if(new_width < np_min_width)
555 new_width = np_min_width;
556 else if(This->sv_rc.right - new_width < sv_min_width)
557 new_width = This->sv_rc.right - sv_min_width;
558
559 This->navpane.width = new_width;
560
561 update_layout(This);
562 size_panes(This);
563
564 ReleaseCapture();
565
566 return TRUE;
567 }
568
569 static LRESULT navpane_on_wm_create(HWND hwnd, CREATESTRUCTW *crs)
570 {
571 ExplorerBrowserImpl *This = crs->lpCreateParams;
572 INameSpaceTreeControl2 *pnstc2;
573 DWORD style;
574 HRESULT hr;
575
576 TRACE("%p\n", This);
577 SetWindowLongPtrW(hwnd, GWLP_USERDATA, (LPARAM)This);
578 This->navpane.hwnd_splitter = hwnd;
579
580 hr = CoCreateInstance(&CLSID_NamespaceTreeControl, NULL, CLSCTX_INPROC_SERVER,
581 &IID_INameSpaceTreeControl2, (void**)&pnstc2);
582
583 if(SUCCEEDED(hr))
584 {
585 style = NSTCS_HASEXPANDOS | NSTCS_ROOTHASEXPANDO | NSTCS_SHOWSELECTIONALWAYS;
586 hr = INameSpaceTreeControl2_Initialize(pnstc2, GetParent(hwnd), NULL, style);
587 if(SUCCEEDED(hr))
588 {
589 INameSpaceTreeControlEvents *pnstce;
590 IShellFolder *psfdesktop;
591 IShellItem *psi;
592 IOleWindow *pow;
593 LPITEMIDLIST pidl;
594 DWORD cookie, style2 = NSTCS2_DISPLAYPADDING;
595
596 hr = INameSpaceTreeControl2_SetControlStyle2(pnstc2, 0xFF, style2);
597 if(FAILED(hr))
598 ERR("SetControlStyle2 failed (0x%08x)\n", hr);
599
600 hr = INameSpaceTreeControl2_QueryInterface(pnstc2, &IID_IOleWindow, (void**)&pow);
601 if(SUCCEEDED(hr))
602 {
603 IOleWindow_GetWindow(pow, &This->navpane.hwnd_nstc);
604 IOleWindow_Release(pow);
605 }
606 else
607 ERR("QueryInterface(IOleWindow) failed (0x%08x)\n", hr);
608
609 pnstce = &This->INameSpaceTreeControlEvents_iface;
610 hr = INameSpaceTreeControl2_TreeAdvise(pnstc2, (IUnknown*)pnstce, &cookie);
611 if(FAILED(hr))
612 ERR("TreeAdvise failed. (0x%08x).\n", hr);
613
614 /*
615 * Add the default roots
616 */
617
618 /* TODO: This should be FOLDERID_Links */
619 hr = SHGetSpecialFolderLocation(NULL, CSIDL_FAVORITES, &pidl);
620 if(SUCCEEDED(hr))
621 {
622 hr = SHCreateShellItem(NULL, NULL, pidl, &psi);
623 if(SUCCEEDED(hr))
624 {
625 hr = INameSpaceTreeControl2_AppendRoot(pnstc2, psi, SHCONTF_NONFOLDERS, NSTCRS_VISIBLE, NULL);
626 IShellItem_Release(psi);
627 }
628 ILFree(pidl);
629 }
630
631 SHGetDesktopFolder(&psfdesktop);
632 hr = SHGetItemFromObject((IUnknown*)psfdesktop, &IID_IShellItem, (void**)&psi);
633 IShellFolder_Release(psfdesktop);
634 if(SUCCEEDED(hr))
635 {
636 hr = INameSpaceTreeControl2_AppendRoot(pnstc2, psi, SHCONTF_FOLDERS, NSTCRS_EXPANDED, NULL);
637 IShellItem_Release(psi);
638 }
639
640 /* TODO:
641 * We should advertise IID_INameSpaceTreeControl to the site of the
642 * host through its IProfferService interface, if any.
643 */
644
645 This->navpane.pnstc2 = pnstc2;
646 This->navpane.nstc_cookie = cookie;
647
648 return TRUE;
649 }
650 }
651
652 This->navpane.pnstc2 = NULL;
653 ERR("Failed (0x%08x)\n", hr);
654
655 return FALSE;
656 }
657
658 static LRESULT navpane_on_wm_size_move(ExplorerBrowserImpl *This)
659 {
660 UINT height, width;
661 int splitter_width = MulDiv(SPLITTER_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
662
663 TRACE("%p\n", This);
664
665 width = This->navpane.rc.right - This->navpane.rc.left - splitter_width;
666 height = This->navpane.rc.bottom - This->navpane.rc.top;
667
668 MoveWindow(This->navpane.hwnd_nstc,
669 This->navpane.rc.left, This->navpane.rc.top,
670 width, height,
671 TRUE);
672
673 return FALSE;
674 }
675
676 static LRESULT navpane_on_wm_destroy(ExplorerBrowserImpl *This)
677 {
678 INameSpaceTreeControl2_TreeUnadvise(This->navpane.pnstc2, This->navpane.nstc_cookie);
679 INameSpaceTreeControl2_Release(This->navpane.pnstc2);
680 This->navpane.pnstc2 = NULL;
681 return TRUE;
682 }
683
684 static LRESULT CALLBACK navpane_wndproc(HWND hWnd, UINT uMessage, WPARAM wParam, LPARAM lParam)
685 {
686 ExplorerBrowserImpl *This = (ExplorerBrowserImpl*)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
687
688 switch(uMessage) {
689 case WM_CREATE: return navpane_on_wm_create(hWnd, (CREATESTRUCTW*)lParam);
690 case WM_MOVE: /* Fall through */
691 case WM_SIZE: return navpane_on_wm_size_move(This);
692 case WM_DESTROY: return navpane_on_wm_destroy(This);
693 case WM_LBUTTONDOWN: return navpane_splitter_beginresize(This, hWnd, lParam);
694 case WM_MOUSEMOVE: return navpane_splitter_resizing(This, hWnd, lParam);
695 case WM_LBUTTONUP: return navpane_splitter_endresize(This, hWnd, lParam);
696 default:
697 return DefWindowProcW(hWnd, uMessage, wParam, lParam);
698 }
699 return 0;
700 }
701
702 static void initialize_navpane(ExplorerBrowserImpl *This, HWND hwnd_parent, RECT *rc)
703 {
704 WNDCLASSW wc;
705 HWND splitter;
706 int splitter_width = MulDiv(SPLITTER_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
707 static const WCHAR navpane_classname[] = {'e','b','_','n','a','v','p','a','n','e',0};
708
709 if( !GetClassInfoW(shell32_hInstance, navpane_classname, &wc) )
710 {
711 wc.style = CS_HREDRAW | CS_VREDRAW;
712 wc.lpfnWndProc = navpane_wndproc;
713 wc.cbClsExtra = 0;
714 wc.cbWndExtra = 0;
715 wc.hInstance = shell32_hInstance;
716 wc.hIcon = 0;
717 wc.hCursor = LoadCursorW(0, (LPWSTR)IDC_SIZEWE);
718 wc.hbrBackground = (HBRUSH)(COLOR_3DFACE + 1);
719 wc.lpszMenuName = NULL;
720 wc.lpszClassName = navpane_classname;
721
722 if (!RegisterClassW(&wc)) return;
723 }
724
725 splitter = CreateWindowExW(0, navpane_classname, NULL,
726 WS_CHILD | WS_TABSTOP | WS_VISIBLE,
727 rc->right - splitter_width, rc->top,
728 splitter_width, rc->bottom - rc->top,
729 hwnd_parent, 0, shell32_hInstance, This);
730 if(!splitter)
731 ERR("Failed to create navpane : %d.\n", GetLastError());
732 }
733
734 /**************************************************************************
735 * Main window related functions.
736 */
737 static LRESULT main_on_wm_create(HWND hWnd, CREATESTRUCTW *crs)
738 {
739 ExplorerBrowserImpl *This = crs->lpCreateParams;
740 TRACE("%p\n", This);
741
742 SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LPARAM)This);
743 This->hwnd_main = hWnd;
744
745 return TRUE;
746 }
747
748 static LRESULT main_on_wm_size(ExplorerBrowserImpl *This)
749 {
750 update_layout(This);
751 size_panes(This);
752
753 return TRUE;
754 }
755
756 static LRESULT main_on_cwm_getishellbrowser(ExplorerBrowserImpl *This)
757 {
758 return (LRESULT)&This->IShellBrowser_iface;
759 }
760
761 static LRESULT CALLBACK main_wndproc(HWND hWnd, UINT uMessage, WPARAM wParam, LPARAM lParam)
762 {
763 ExplorerBrowserImpl *This = (ExplorerBrowserImpl*)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
764
765 switch(uMessage)
766 {
767 case WM_CREATE: return main_on_wm_create(hWnd, (CREATESTRUCTW*)lParam);
768 case WM_SIZE: return main_on_wm_size(This);
769 case CWM_GETISHELLBROWSER: return main_on_cwm_getishellbrowser(This);
770 default: return DefWindowProcW(hWnd, uMessage, wParam, lParam);
771 }
772
773 return 0;
774 }
775
776 /**************************************************************************
777 * IExplorerBrowser Implementation
778 */
779
780 static inline ExplorerBrowserImpl *impl_from_IExplorerBrowser(IExplorerBrowser *iface)
781 {
782 return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IExplorerBrowser_iface);
783 }
784
785 static HRESULT WINAPI IExplorerBrowser_fnQueryInterface(IExplorerBrowser *iface,
786 REFIID riid, void **ppvObject)
787 {
788 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
789 TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppvObject);
790
791 *ppvObject = NULL;
792 if(IsEqualIID(riid, &IID_IExplorerBrowser) ||
793 IsEqualIID(riid, &IID_IUnknown))
794 {
795 *ppvObject = &This->IExplorerBrowser_iface;
796 }
797 else if(IsEqualIID(riid, &IID_IShellBrowser) ||
798 IsEqualIID(riid, &IID_IOleWindow))
799 {
800 *ppvObject = &This->IShellBrowser_iface;
801 }
802 else if(IsEqualIID(riid, &IID_ICommDlgBrowser) ||
803 IsEqualIID(riid, &IID_ICommDlgBrowser2) ||
804 IsEqualIID(riid, &IID_ICommDlgBrowser3))
805 {
806 *ppvObject = &This->ICommDlgBrowser3_iface;
807 }
808 else if(IsEqualIID(riid, &IID_IObjectWithSite))
809 {
810 *ppvObject = &This->IObjectWithSite_iface;
811 }
812 else if(IsEqualIID(riid, &IID_IInputObject))
813 {
814 *ppvObject = &This->IInputObject_iface;
815 }
816
817 if(*ppvObject)
818 {
819 IUnknown_AddRef((IUnknown*)*ppvObject);
820 return S_OK;
821 }
822
823 return E_NOINTERFACE;
824 }
825
826 static ULONG WINAPI IExplorerBrowser_fnAddRef(IExplorerBrowser *iface)
827 {
828 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
829 LONG ref = InterlockedIncrement(&This->ref);
830 TRACE("%p - ref %d\n", This, ref);
831
832 return ref;
833 }
834
835 static ULONG WINAPI IExplorerBrowser_fnRelease(IExplorerBrowser *iface)
836 {
837 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
838 LONG ref = InterlockedDecrement(&This->ref);
839 TRACE("%p - ref %d\n", This, ref);
840
841 if(!ref)
842 {
843 TRACE("Freeing.\n");
844
845 if(!This->destroyed)
846 IExplorerBrowser_Destroy(iface);
847
848 IObjectWithSite_SetSite(&This->IObjectWithSite_iface, NULL);
849
850 heap_free(This);
851 }
852
853 return ref;
854 }
855
856 static HRESULT WINAPI IExplorerBrowser_fnInitialize(IExplorerBrowser *iface,
857 HWND hwndParent, const RECT *prc,
858 const FOLDERSETTINGS *pfs)
859 {
860 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
861 WNDCLASSW wc;
862 LONG style;
863 HDC parent_dc;
864 static const WCHAR EB_CLASS_NAME[] =
865 {'E','x','p','l','o','r','e','r','B','r','o','w','s','e','r','C','o','n','t','r','o','l',0};
866
867 TRACE("%p (%p, %p, %p)\n", This, hwndParent, prc, pfs);
868
869 if(This->hwnd_main)
870 return E_UNEXPECTED;
871
872 if(!hwndParent)
873 return E_INVALIDARG;
874
875 if( !GetClassInfoW(shell32_hInstance, EB_CLASS_NAME, &wc) )
876 {
877 wc.style = CS_HREDRAW | CS_VREDRAW;
878 wc.lpfnWndProc = main_wndproc;
879 wc.cbClsExtra = 0;
880 wc.cbWndExtra = 0;
881 wc.hInstance = shell32_hInstance;
882 wc.hIcon = 0;
883 wc.hCursor = LoadCursorW(0, (LPWSTR)IDC_ARROW);
884 wc.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
885 wc.lpszMenuName = NULL;
886 wc.lpszClassName = EB_CLASS_NAME;
887
888 if (!RegisterClassW(&wc)) return E_FAIL;
889 }
890
891 parent_dc = GetDC(hwndParent);
892 This->dpix = GetDeviceCaps(parent_dc, LOGPIXELSX);
893 ReleaseDC(hwndParent, parent_dc);
894
895 This->navpane.width = MulDiv(NP_DEFAULT_WIDTH, This->dpix, USER_DEFAULT_SCREEN_DPI);
896
897 style = WS_CHILD | WS_VISIBLE | WS_CLIPSIBLINGS;
898 if (!(This->eb_options & EBO_NOBORDER))
899 style |= WS_BORDER;
900 This->hwnd_main = CreateWindowExW(WS_EX_CONTROLPARENT, EB_CLASS_NAME, NULL, style,
901 prc->left, prc->top,
902 prc->right - prc->left, prc->bottom - prc->top,
903 hwndParent, 0, shell32_hInstance, This);
904
905 if(!This->hwnd_main)
906 {
907 ERR("Failed to create the window.\n");
908 return E_FAIL;
909 }
910
911 This->fs.ViewMode = pfs ? pfs->ViewMode : FVM_DETAILS;
912 This->fs.fFlags = pfs ? (pfs->fFlags | FWF_NOCLIENTEDGE) : FWF_NOCLIENTEDGE;
913
914 return S_OK;
915 }
916
917 static HRESULT WINAPI IExplorerBrowser_fnDestroy(IExplorerBrowser *iface)
918 {
919 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
920 TRACE("%p\n", This);
921
922 if(This->psv)
923 {
924 IShellView_DestroyViewWindow(This->psv);
925 IShellView_Release(This->psv);
926 This->psv = NULL;
927 This->hwnd_sv = NULL;
928 }
929
930 events_unadvise_all(This);
931 travellog_remove_all_entries(This);
932
933 ILFree(This->current_pidl);
934 This->current_pidl = NULL;
935
936 DestroyWindow(This->hwnd_main);
937 This->destroyed = TRUE;
938
939 return S_OK;
940 }
941
942 static HRESULT WINAPI IExplorerBrowser_fnSetRect(IExplorerBrowser *iface,
943 HDWP *phdwp, RECT rcBrowser)
944 {
945 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
946 TRACE("%p (%p, %s)\n", This, phdwp, wine_dbgstr_rect(&rcBrowser));
947
948 if(phdwp && *phdwp)
949 {
950 *phdwp = DeferWindowPos(*phdwp, This->hwnd_main, NULL, rcBrowser.left, rcBrowser.top,
951 rcBrowser.right - rcBrowser.left, rcBrowser.bottom - rcBrowser.top,
952 SWP_NOZORDER | SWP_NOACTIVATE);
953 if(!*phdwp)
954 return E_FAIL;
955 }
956 else
957 {
958 MoveWindow(This->hwnd_main, rcBrowser.left, rcBrowser.top,
959 rcBrowser.right - rcBrowser.left, rcBrowser.bottom - rcBrowser.top, TRUE);
960 }
961
962 return S_OK;
963 }
964
965 static HRESULT WINAPI IExplorerBrowser_fnSetPropertyBag(IExplorerBrowser *iface,
966 LPCWSTR pszPropertyBag)
967 {
968 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
969 FIXME("stub, %p (%s)\n", This, debugstr_w(pszPropertyBag));
970
971 if(!pszPropertyBag)
972 return E_INVALIDARG;
973
974 /* FIXME: This method is currently useless as we don't save any
975 * settings anywhere, but at least one application breaks if we
976 * return E_NOTIMPL.
977 */
978
979 return S_OK;
980 }
981
982 static HRESULT WINAPI IExplorerBrowser_fnSetEmptyText(IExplorerBrowser *iface,
983 LPCWSTR pszEmptyText)
984 {
985 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
986 FIXME("stub, %p (%s)\n", This, debugstr_w(pszEmptyText));
987
988 return E_NOTIMPL;
989 }
990
991 static HRESULT WINAPI IExplorerBrowser_fnSetFolderSettings(IExplorerBrowser *iface,
992 const FOLDERSETTINGS *pfs)
993 {
994 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
995 TRACE("%p (%p)\n", This, pfs);
996
997 if(!pfs)
998 return E_INVALIDARG;
999
1000 This->fs.ViewMode = pfs->ViewMode;
1001 This->fs.fFlags = pfs->fFlags | FWF_NOCLIENTEDGE;
1002
1003 /* Change the settings of the current view, if any. */
1004 return change_viewmode(This, This->fs.ViewMode);
1005 }
1006
1007 static HRESULT WINAPI IExplorerBrowser_fnAdvise(IExplorerBrowser *iface,
1008 IExplorerBrowserEvents *psbe,
1009 DWORD *pdwCookie)
1010 {
1011 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1012 event_client *client;
1013 TRACE("%p (%p, %p)\n", This, psbe, pdwCookie);
1014
1015 client = heap_alloc(sizeof(*client));
1016 client->pebe = psbe;
1017 client->cookie = ++This->events_next_cookie;
1018
1019 IExplorerBrowserEvents_AddRef(psbe);
1020 *pdwCookie = client->cookie;
1021
1022 list_add_tail(&This->event_clients, &client->entry);
1023
1024 return S_OK;
1025 }
1026
1027 static HRESULT WINAPI IExplorerBrowser_fnUnadvise(IExplorerBrowser *iface,
1028 DWORD dwCookie)
1029 {
1030 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1031 event_client *client;
1032 TRACE("%p (0x%x)\n", This, dwCookie);
1033
1034 LIST_FOR_EACH_ENTRY(client, &This->event_clients, event_client, entry)
1035 {
1036 if(client->cookie == dwCookie)
1037 {
1038 list_remove(&client->entry);
1039 IExplorerBrowserEvents_Release(client->pebe);
1040 heap_free(client);
1041 return S_OK;
1042 }
1043 }
1044
1045 return E_INVALIDARG;
1046 }
1047
1048 static HRESULT WINAPI IExplorerBrowser_fnSetOptions(IExplorerBrowser *iface,
1049 EXPLORER_BROWSER_OPTIONS dwFlag)
1050 {
1051 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1052 static const EXPLORER_BROWSER_OPTIONS unsupported_options =
1053 EBO_ALWAYSNAVIGATE | EBO_NOWRAPPERWINDOW | EBO_HTMLSHAREPOINTVIEW | EBO_NOPERSISTVIEWSTATE;
1054
1055 TRACE("%p (0x%x)\n", This, dwFlag);
1056
1057 if(dwFlag & unsupported_options)
1058 FIXME("Flags 0x%08x contains unsupported options.\n", dwFlag);
1059
1060 This->eb_options = dwFlag;
1061
1062 return S_OK;
1063 }
1064
1065 static HRESULT WINAPI IExplorerBrowser_fnGetOptions(IExplorerBrowser *iface,
1066 EXPLORER_BROWSER_OPTIONS *pdwFlag)
1067 {
1068 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1069 TRACE("%p (%p)\n", This, pdwFlag);
1070
1071 *pdwFlag = This->eb_options;
1072
1073 return S_OK;
1074 }
1075
1076 static HRESULT WINAPI IExplorerBrowser_fnBrowseToIDList(IExplorerBrowser *iface,
1077 PCUIDLIST_RELATIVE pidl,
1078 UINT uFlags)
1079 {
1080 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1081 LPITEMIDLIST absolute_pidl = NULL;
1082 HRESULT hr;
1083 static const UINT unsupported_browse_flags =
1084 SBSP_NEWBROWSER | EBF_SELECTFROMDATAOBJECT | EBF_NODROPTARGET;
1085 TRACE("%p (%p, 0x%x)\n", This, pidl, uFlags);
1086
1087 if(!This->hwnd_main)
1088 return E_FAIL;
1089
1090 if(This->destroyed)
1091 return HRESULT_FROM_WIN32(ERROR_BUSY);
1092
1093 if(This->current_pidl && (This->eb_options & EBO_NAVIGATEONCE))
1094 return E_FAIL;
1095
1096 if(uFlags & SBSP_EXPLOREMODE)
1097 return E_INVALIDARG;
1098
1099 if(uFlags & unsupported_browse_flags)
1100 FIXME("Argument 0x%x contains unsupported flags.\n", uFlags);
1101
1102 if(uFlags & SBSP_NAVIGATEBACK)
1103 {
1104 TRACE("SBSP_NAVIGATEBACK\n");
1105 absolute_pidl = ILClone(travellog_go_back(This));
1106 if(!absolute_pidl && !This->current_pidl)
1107 return E_FAIL;
1108 else if(!absolute_pidl)
1109 return S_OK;
1110
1111 }
1112 else if(uFlags & SBSP_NAVIGATEFORWARD)
1113 {
1114 TRACE("SBSP_NAVIGATEFORWARD\n");
1115 absolute_pidl = ILClone(travellog_go_forward(This));
1116 if(!absolute_pidl && !This->current_pidl)
1117 return E_FAIL;
1118 else if(!absolute_pidl)
1119 return S_OK;
1120
1121 }
1122 else if(uFlags & SBSP_PARENT)
1123 {
1124 if(This->current_pidl)
1125 {
1126 if(_ILIsPidlSimple(This->current_pidl))
1127 {
1128 absolute_pidl = _ILCreateDesktop();
1129 }
1130 else
1131 {
1132 absolute_pidl = ILClone(This->current_pidl);
1133 ILRemoveLastID(absolute_pidl);
1134 }
1135 }
1136 if(!absolute_pidl)
1137 {
1138 ERR("Failed to get parent pidl.\n");
1139 return E_FAIL;
1140 }
1141
1142 }
1143 else if(uFlags & SBSP_RELATIVE)
1144 {
1145 /* SBSP_RELATIVE has precedence over SBSP_ABSOLUTE */
1146 TRACE("SBSP_RELATIVE\n");
1147 if(This->current_pidl)
1148 {
1149 absolute_pidl = ILCombine(This->current_pidl, pidl);
1150 }
1151 if(!absolute_pidl)
1152 {
1153 ERR("Failed to get absolute pidl.\n");
1154 return E_FAIL;
1155 }
1156 }
1157 else
1158 {
1159 TRACE("SBSP_ABSOLUTE\n");
1160 absolute_pidl = ILClone(pidl);
1161 if(!absolute_pidl && !This->current_pidl)
1162 return E_INVALIDARG;
1163 else if(!absolute_pidl)
1164 return S_OK;
1165 }
1166
1167 /* TODO: Asynchronous browsing. Return S_OK here and finish in
1168 * another thread. */
1169
1170 hr = events_NavigationPending(This, absolute_pidl);
1171 if(FAILED(hr))
1172 {
1173 TRACE("Browsing aborted.\n");
1174 ILFree(absolute_pidl);
1175 return E_FAIL;
1176 }
1177
1178 get_interfaces_from_site(This);
1179 update_panestate(This);
1180
1181 /* Only browse if the new pidl differs from the old */
1182 if(!ILIsEqual(This->current_pidl, absolute_pidl))
1183 {
1184 IShellItem *psi;
1185 hr = SHCreateItemFromIDList(absolute_pidl, &IID_IShellItem, (void**)&psi);
1186 if(SUCCEEDED(hr))
1187 {
1188 hr = create_new_shellview(This, psi);
1189 if(FAILED(hr))
1190 {
1191 events_NavigationFailed(This, absolute_pidl);
1192 ILFree(absolute_pidl);
1193 IShellItem_Release(psi);
1194 return E_FAIL;
1195 }
1196
1197 /* Add to travellog */
1198 if( !(This->eb_options & EBO_NOTRAVELLOG) &&
1199 !(uFlags & (SBSP_NAVIGATEFORWARD|SBSP_NAVIGATEBACK)) )
1200 {
1201 travellog_add_entry(This, absolute_pidl);
1202 }
1203
1204 IShellItem_Release(psi);
1205 }
1206 }
1207
1208 events_NavigationComplete(This, absolute_pidl);
1209 ILFree(This->current_pidl);
1210 This->current_pidl = absolute_pidl;
1211
1212 /* Expand the NameSpaceTree to the current location. */
1213 if(This->navpane.show && This->navpane.pnstc2)
1214 {
1215 IShellItem *psi;
1216 hr = SHCreateItemFromIDList(This->current_pidl, &IID_IShellItem, (void**)&psi);
1217 if(SUCCEEDED(hr))
1218 {
1219 INameSpaceTreeControl2_EnsureItemVisible(This->navpane.pnstc2, psi);
1220 IShellItem_Release(psi);
1221 }
1222 }
1223
1224 return S_OK;
1225 }
1226
1227 static HRESULT WINAPI IExplorerBrowser_fnBrowseToObject(IExplorerBrowser *iface,
1228 IUnknown *punk, UINT uFlags)
1229 {
1230 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1231 LPITEMIDLIST pidl;
1232 HRESULT hr;
1233 TRACE("%p (%p, 0x%x)\n", This, punk, uFlags);
1234
1235 if(!punk)
1236 return IExplorerBrowser_BrowseToIDList(iface, NULL, uFlags);
1237
1238 hr = SHGetIDListFromObject(punk, &pidl);
1239 if(SUCCEEDED(hr))
1240 {
1241 hr = IExplorerBrowser_BrowseToIDList(iface, pidl, uFlags);
1242 ILFree(pidl);
1243 }
1244
1245 return hr;
1246 }
1247
1248 static HRESULT WINAPI IExplorerBrowser_fnFillFromObject(IExplorerBrowser *iface,
1249 IUnknown *punk,
1250 EXPLORER_BROWSER_FILL_FLAGS dwFlags)
1251 {
1252 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1253 FIXME("stub, %p (%p, 0x%x)\n", This, punk, dwFlags);
1254
1255 return E_NOTIMPL;
1256 }
1257
1258 static HRESULT WINAPI IExplorerBrowser_fnRemoveAll(IExplorerBrowser *iface)
1259 {
1260 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1261 FIXME("stub, %p\n", This);
1262
1263 return E_NOTIMPL;
1264 }
1265
1266 static HRESULT WINAPI IExplorerBrowser_fnGetCurrentView(IExplorerBrowser *iface,
1267 REFIID riid, void **ppv)
1268 {
1269 ExplorerBrowserImpl *This = impl_from_IExplorerBrowser(iface);
1270 TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppv);
1271
1272 if(!This->psv)
1273 return E_FAIL;
1274
1275 return IShellView_QueryInterface(This->psv, riid, ppv);
1276 }
1277
1278 static const IExplorerBrowserVtbl vt_IExplorerBrowser =
1279 {
1280 IExplorerBrowser_fnQueryInterface,
1281 IExplorerBrowser_fnAddRef,
1282 IExplorerBrowser_fnRelease,
1283 IExplorerBrowser_fnInitialize,
1284 IExplorerBrowser_fnDestroy,
1285 IExplorerBrowser_fnSetRect,
1286 IExplorerBrowser_fnSetPropertyBag,
1287 IExplorerBrowser_fnSetEmptyText,
1288 IExplorerBrowser_fnSetFolderSettings,
1289 IExplorerBrowser_fnAdvise,
1290 IExplorerBrowser_fnUnadvise,
1291 IExplorerBrowser_fnSetOptions,
1292 IExplorerBrowser_fnGetOptions,
1293 IExplorerBrowser_fnBrowseToIDList,
1294 IExplorerBrowser_fnBrowseToObject,
1295 IExplorerBrowser_fnFillFromObject,
1296 IExplorerBrowser_fnRemoveAll,
1297 IExplorerBrowser_fnGetCurrentView
1298 };
1299
1300 /**************************************************************************
1301 * IShellBrowser Implementation
1302 */
1303
1304 static inline ExplorerBrowserImpl *impl_from_IShellBrowser(IShellBrowser *iface)
1305 {
1306 return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IShellBrowser_iface);
1307 }
1308
1309 static HRESULT WINAPI IShellBrowser_fnQueryInterface(IShellBrowser *iface,
1310 REFIID riid, void **ppvObject)
1311 {
1312 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1313 TRACE("%p\n", This);
1314 return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
1315 }
1316
1317 static ULONG WINAPI IShellBrowser_fnAddRef(IShellBrowser *iface)
1318 {
1319 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1320 TRACE("%p\n", This);
1321 return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1322 }
1323
1324 static ULONG WINAPI IShellBrowser_fnRelease(IShellBrowser *iface)
1325 {
1326 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1327 TRACE("%p\n", This);
1328 return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1329 }
1330
1331 static HRESULT WINAPI IShellBrowser_fnGetWindow(IShellBrowser *iface, HWND *phwnd)
1332 {
1333 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1334 TRACE("%p (%p)\n", This, phwnd);
1335
1336 if(!This->hwnd_main)
1337 return E_FAIL;
1338
1339 *phwnd = This->hwnd_main;
1340 return S_OK;
1341 }
1342
1343 static HRESULT WINAPI IShellBrowser_fnContextSensitiveHelp(IShellBrowser *iface,
1344 BOOL fEnterMode)
1345 {
1346 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1347 FIXME("stub, %p (%d)\n", This, fEnterMode);
1348
1349 return E_NOTIMPL;
1350 }
1351
1352 static HRESULT WINAPI IShellBrowser_fnInsertMenusSB(IShellBrowser *iface,
1353 HMENU hmenuShared,
1354 LPOLEMENUGROUPWIDTHS lpMenuWidths)
1355 {
1356 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1357 TRACE("%p (%p, %p)\n", This, hmenuShared, lpMenuWidths);
1358
1359 /* Not implemented. */
1360 return E_NOTIMPL;
1361 }
1362
1363 static HRESULT WINAPI IShellBrowser_fnSetMenuSB(IShellBrowser *iface,
1364 HMENU hmenuShared,
1365 HOLEMENU holemenuReserved,
1366 HWND hwndActiveObject)
1367 {
1368 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1369 TRACE("%p (%p, %p, %p)\n", This, hmenuShared, holemenuReserved, hwndActiveObject);
1370
1371 /* Not implemented. */
1372 return E_NOTIMPL;
1373 }
1374
1375 static HRESULT WINAPI IShellBrowser_fnRemoveMenusSB(IShellBrowser *iface,
1376 HMENU hmenuShared)
1377 {
1378 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1379 TRACE("%p (%p)\n", This, hmenuShared);
1380
1381 /* Not implemented. */
1382 return E_NOTIMPL;
1383 }
1384
1385 static HRESULT WINAPI IShellBrowser_fnSetStatusTextSB(IShellBrowser *iface,
1386 LPCOLESTR pszStatusText)
1387 {
1388 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1389 FIXME("stub, %p (%s)\n", This, debugstr_w(pszStatusText));
1390
1391 return E_NOTIMPL;
1392 }
1393
1394 static HRESULT WINAPI IShellBrowser_fnEnableModelessSB(IShellBrowser *iface,
1395 BOOL fEnable)
1396 {
1397 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1398 FIXME("stub, %p (%d)\n", This, fEnable);
1399
1400 return E_NOTIMPL;
1401 }
1402
1403 static HRESULT WINAPI IShellBrowser_fnTranslateAcceleratorSB(IShellBrowser *iface,
1404 MSG *pmsg, WORD wID)
1405 {
1406 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1407 FIXME("stub, %p (%p, 0x%x)\n", This, pmsg, wID);
1408
1409 return E_NOTIMPL;
1410 }
1411
1412 static HRESULT WINAPI IShellBrowser_fnBrowseObject(IShellBrowser *iface,
1413 LPCITEMIDLIST pidl, UINT wFlags)
1414 {
1415 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1416 TRACE("%p (%p, %x)\n", This, pidl, wFlags);
1417
1418 return IExplorerBrowser_BrowseToIDList(&This->IExplorerBrowser_iface, pidl, wFlags);
1419 }
1420
1421 static HRESULT WINAPI IShellBrowser_fnGetViewStateStream(IShellBrowser *iface,
1422 DWORD grfMode,
1423 IStream **ppStrm)
1424 {
1425 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1426 FIXME("stub, %p (0x%x, %p)\n", This, grfMode, ppStrm);
1427
1428 *ppStrm = NULL;
1429 return E_FAIL;
1430 }
1431
1432 static HRESULT WINAPI IShellBrowser_fnGetControlWindow(IShellBrowser *iface,
1433 UINT id, HWND *phwnd)
1434 {
1435 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1436 TRACE("(%p)->(%d, %p)\n", This, id, phwnd);
1437 if (phwnd) *phwnd = NULL;
1438 return E_NOTIMPL;
1439 }
1440
1441 static HRESULT WINAPI IShellBrowser_fnSendControlMsg(IShellBrowser *iface,
1442 UINT id, UINT uMsg,
1443 WPARAM wParam, LPARAM lParam,
1444 LRESULT *pret)
1445 {
1446 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1447 FIXME("stub, %p (%d, %d, %lx, %lx, %p)\n", This, id, uMsg, wParam, lParam, pret);
1448
1449 return E_NOTIMPL;
1450 }
1451
1452 static HRESULT WINAPI IShellBrowser_fnQueryActiveShellView(IShellBrowser *iface,
1453 IShellView **ppshv)
1454 {
1455 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1456 TRACE("%p (%p)\n", This, ppshv);
1457
1458 if(!This->psv)
1459 return E_FAIL;
1460
1461 *ppshv = This->psv;
1462 IShellView_AddRef(This->psv);
1463
1464 return S_OK;
1465 }
1466
1467 static HRESULT WINAPI IShellBrowser_fnOnViewWindowActive(IShellBrowser *iface,
1468 IShellView *pshv)
1469 {
1470 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1471 FIXME("stub, %p (%p)\n", This, pshv);
1472
1473 return E_NOTIMPL;
1474 }
1475
1476 static HRESULT WINAPI IShellBrowser_fnSetToolbarItems(IShellBrowser *iface,
1477 LPTBBUTTONSB lpButtons,
1478 UINT nButtons, UINT uFlags)
1479 {
1480 ExplorerBrowserImpl *This = impl_from_IShellBrowser(iface);
1481 FIXME("stub, %p (%p, %d, 0x%x)\n", This, lpButtons, nButtons, uFlags);
1482
1483 return E_NOTIMPL;
1484 }
1485
1486 static const IShellBrowserVtbl vt_IShellBrowser = {
1487 IShellBrowser_fnQueryInterface,
1488 IShellBrowser_fnAddRef,
1489 IShellBrowser_fnRelease,
1490 IShellBrowser_fnGetWindow,
1491 IShellBrowser_fnContextSensitiveHelp,
1492 IShellBrowser_fnInsertMenusSB,
1493 IShellBrowser_fnSetMenuSB,
1494 IShellBrowser_fnRemoveMenusSB,
1495 IShellBrowser_fnSetStatusTextSB,
1496 IShellBrowser_fnEnableModelessSB,
1497 IShellBrowser_fnTranslateAcceleratorSB,
1498 IShellBrowser_fnBrowseObject,
1499 IShellBrowser_fnGetViewStateStream,
1500 IShellBrowser_fnGetControlWindow,
1501 IShellBrowser_fnSendControlMsg,
1502 IShellBrowser_fnQueryActiveShellView,
1503 IShellBrowser_fnOnViewWindowActive,
1504 IShellBrowser_fnSetToolbarItems
1505 };
1506
1507 /**************************************************************************
1508 * ICommDlgBrowser3 Implementation
1509 */
1510
1511 static inline ExplorerBrowserImpl *impl_from_ICommDlgBrowser3(ICommDlgBrowser3 *iface)
1512 {
1513 return CONTAINING_RECORD(iface, ExplorerBrowserImpl, ICommDlgBrowser3_iface);
1514 }
1515
1516 static HRESULT WINAPI ICommDlgBrowser3_fnQueryInterface(ICommDlgBrowser3 *iface,
1517 REFIID riid,
1518 void **ppvObject)
1519 {
1520 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1521 TRACE("%p\n", This);
1522 return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
1523 }
1524
1525 static ULONG WINAPI ICommDlgBrowser3_fnAddRef(ICommDlgBrowser3 *iface)
1526 {
1527 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1528 TRACE("%p\n", This);
1529 return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1530 }
1531
1532 static ULONG WINAPI ICommDlgBrowser3_fnRelease(ICommDlgBrowser3 *iface)
1533 {
1534 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1535 TRACE("%p\n", This);
1536 return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1537 }
1538
1539 static HRESULT WINAPI ICommDlgBrowser3_fnOnDefaultCommand(ICommDlgBrowser3 *iface,
1540 IShellView *shv)
1541 {
1542 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1543 IDataObject *pdo;
1544 HRESULT hr;
1545 HRESULT ret = S_FALSE;
1546
1547 TRACE("%p (%p)\n", This, shv);
1548
1549 hr = IShellView_GetItemObject(shv, SVGIO_SELECTION, &IID_IDataObject, (void**)&pdo);
1550 if(SUCCEEDED(hr))
1551 {
1552 FORMATETC fmt;
1553 STGMEDIUM medium;
1554
1555 fmt.cfFormat = RegisterClipboardFormatW(CFSTR_SHELLIDLISTW);
1556 fmt.ptd = NULL;
1557 fmt.dwAspect = DVASPECT_CONTENT;
1558 fmt.lindex = -1;
1559 fmt.tymed = TYMED_HGLOBAL;
1560
1561 hr = IDataObject_GetData(pdo, &fmt ,&medium);
1562 IDataObject_Release(pdo);
1563 if(SUCCEEDED(hr))
1564 {
1565 LPIDA pida = GlobalLock(medium.u.hGlobal);
1566 LPCITEMIDLIST pidl_child = (LPCITEMIDLIST) ((LPBYTE)pida+pida->aoffset[1]);
1567
1568 /* Handle folders by browsing to them. */
1569 if(_ILIsFolder(pidl_child) || _ILIsDrive(pidl_child) || _ILIsSpecialFolder(pidl_child))
1570 {
1571 IExplorerBrowser_BrowseToIDList(&This->IExplorerBrowser_iface, pidl_child, SBSP_RELATIVE);
1572 ret = S_OK;
1573 }
1574 GlobalUnlock(medium.u.hGlobal);
1575 GlobalFree(medium.u.hGlobal);
1576 }
1577 else
1578 ERR("Failed to get data from IDataObject.\n");
1579 } else
1580 ERR("Failed to get IDataObject.\n");
1581
1582 /* If we didn't handle the default command, check if we have a
1583 * client that does */
1584 if(ret == S_FALSE && This->pcdb_site)
1585 return ICommDlgBrowser_OnDefaultCommand(This->pcdb_site, shv);
1586
1587 return ret;
1588 }
1589 static HRESULT WINAPI ICommDlgBrowser3_fnOnStateChange(ICommDlgBrowser3 *iface,
1590 IShellView *shv, ULONG uChange)
1591 {
1592 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1593 TRACE("%p (%p, %d)\n", This, shv, uChange);
1594
1595 if(This->pcdb_site)
1596 return ICommDlgBrowser_OnStateChange(This->pcdb_site, shv, uChange);
1597
1598 return E_NOTIMPL;
1599 }
1600 static HRESULT WINAPI ICommDlgBrowser3_fnIncludeObject(ICommDlgBrowser3 *iface,
1601 IShellView *pshv, LPCITEMIDLIST pidl)
1602 {
1603 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1604 TRACE("%p (%p, %p)\n", This, pshv, pidl);
1605
1606 if(This->pcdb_site)
1607 return ICommDlgBrowser_IncludeObject(This->pcdb_site, pshv, pidl);
1608
1609 return S_OK;
1610 }
1611
1612 static HRESULT WINAPI ICommDlgBrowser3_fnNotify(ICommDlgBrowser3 *iface,
1613 IShellView *pshv,
1614 DWORD dwNotifyType)
1615 {
1616 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1617 TRACE("%p (%p, 0x%x)\n", This, pshv, dwNotifyType);
1618
1619 if(This->pcdb2_site)
1620 return ICommDlgBrowser2_Notify(This->pcdb2_site, pshv, dwNotifyType);
1621
1622 return S_OK;
1623 }
1624
1625 static HRESULT WINAPI ICommDlgBrowser3_fnGetDefaultMenuText(ICommDlgBrowser3 *iface,
1626 IShellView *pshv,
1627 LPWSTR pszText, int cchMax)
1628 {
1629 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1630 TRACE("%p (%p, %s, %d)\n", This, pshv, debugstr_w(pszText), cchMax);
1631
1632 if(This->pcdb2_site)
1633 return ICommDlgBrowser2_GetDefaultMenuText(This->pcdb2_site, pshv, pszText, cchMax);
1634
1635 return S_OK;
1636 }
1637
1638 static HRESULT WINAPI ICommDlgBrowser3_fnGetViewFlags(ICommDlgBrowser3 *iface,
1639 DWORD *pdwFlags)
1640 {
1641 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1642 TRACE("%p (%p)\n", This, pdwFlags);
1643
1644 if(This->pcdb2_site)
1645 return ICommDlgBrowser2_GetViewFlags(This->pcdb2_site, pdwFlags);
1646
1647 return S_OK;
1648 }
1649
1650 static HRESULT WINAPI ICommDlgBrowser3_fnOnColumnClicked(ICommDlgBrowser3 *iface,
1651 IShellView *pshv, int iColumn)
1652 {
1653 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1654 TRACE("%p (%p, %d)\n", This, pshv, iColumn);
1655
1656 if(This->pcdb3_site)
1657 return ICommDlgBrowser3_OnColumnClicked(This->pcdb3_site, pshv, iColumn);
1658
1659 return S_OK;
1660 }
1661
1662 static HRESULT WINAPI ICommDlgBrowser3_fnGetCurrentFilter(ICommDlgBrowser3 *iface,
1663 LPWSTR pszFileSpec,
1664 int cchFileSpec)
1665 {
1666 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1667 TRACE("%p (%s, %d)\n", This, debugstr_w(pszFileSpec), cchFileSpec);
1668
1669 if(This->pcdb3_site)
1670 return ICommDlgBrowser3_GetCurrentFilter(This->pcdb3_site, pszFileSpec, cchFileSpec);
1671
1672 return S_OK;
1673 }
1674
1675 static HRESULT WINAPI ICommDlgBrowser3_fnOnPreViewCreated(ICommDlgBrowser3 *iface,
1676 IShellView *pshv)
1677 {
1678 ExplorerBrowserImpl *This = impl_from_ICommDlgBrowser3(iface);
1679 TRACE("%p (%p)\n", This, pshv);
1680
1681 if(This->pcdb3_site)
1682 return ICommDlgBrowser3_OnPreViewCreated(This->pcdb3_site, pshv);
1683
1684 return S_OK;
1685 }
1686
1687 static const ICommDlgBrowser3Vtbl vt_ICommDlgBrowser3 = {
1688 ICommDlgBrowser3_fnQueryInterface,
1689 ICommDlgBrowser3_fnAddRef,
1690 ICommDlgBrowser3_fnRelease,
1691 ICommDlgBrowser3_fnOnDefaultCommand,
1692 ICommDlgBrowser3_fnOnStateChange,
1693 ICommDlgBrowser3_fnIncludeObject,
1694 ICommDlgBrowser3_fnNotify,
1695 ICommDlgBrowser3_fnGetDefaultMenuText,
1696 ICommDlgBrowser3_fnGetViewFlags,
1697 ICommDlgBrowser3_fnOnColumnClicked,
1698 ICommDlgBrowser3_fnGetCurrentFilter,
1699 ICommDlgBrowser3_fnOnPreViewCreated
1700 };
1701
1702 /**************************************************************************
1703 * IObjectWithSite Implementation
1704 */
1705
1706 static inline ExplorerBrowserImpl *impl_from_IObjectWithSite(IObjectWithSite *iface)
1707 {
1708 return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IObjectWithSite_iface);
1709 }
1710
1711 static HRESULT WINAPI IObjectWithSite_fnQueryInterface(IObjectWithSite *iface,
1712 REFIID riid, void **ppvObject)
1713 {
1714 ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1715 TRACE("%p\n", This);
1716 return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
1717 }
1718
1719 static ULONG WINAPI IObjectWithSite_fnAddRef(IObjectWithSite *iface)
1720 {
1721 ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1722 TRACE("%p\n", This);
1723 return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1724 }
1725
1726 static ULONG WINAPI IObjectWithSite_fnRelease(IObjectWithSite *iface)
1727 {
1728 ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1729 TRACE("%p\n", This);
1730 return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1731 }
1732
1733 static HRESULT WINAPI IObjectWithSite_fnSetSite(IObjectWithSite *iface, IUnknown *punk_site)
1734 {
1735 ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1736 TRACE("%p (%p)\n", This, punk_site);
1737
1738 if(This->punk_site)
1739 {
1740 IUnknown_Release(This->punk_site);
1741 This->punk_site = NULL;
1742 get_interfaces_from_site(This);
1743 }
1744
1745 This->punk_site = punk_site;
1746
1747 if(This->punk_site)
1748 IUnknown_AddRef(This->punk_site);
1749
1750 return S_OK;
1751 }
1752
1753 static HRESULT WINAPI IObjectWithSite_fnGetSite(IObjectWithSite *iface, REFIID riid, void **ppvSite)
1754 {
1755 ExplorerBrowserImpl *This = impl_from_IObjectWithSite(iface);
1756 TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppvSite);
1757
1758 if(!This->punk_site)
1759 return E_FAIL;
1760
1761 return IUnknown_QueryInterface(This->punk_site, riid, ppvSite);
1762 }
1763
1764 static const IObjectWithSiteVtbl vt_IObjectWithSite = {
1765 IObjectWithSite_fnQueryInterface,
1766 IObjectWithSite_fnAddRef,
1767 IObjectWithSite_fnRelease,
1768 IObjectWithSite_fnSetSite,
1769 IObjectWithSite_fnGetSite
1770 };
1771
1772 /**************************************************************************
1773 * INameSpaceTreeControlEvents Implementation
1774 */
1775 static inline ExplorerBrowserImpl *impl_from_INameSpaceTreeControlEvents(INameSpaceTreeControlEvents *iface)
1776 {
1777 return CONTAINING_RECORD(iface, ExplorerBrowserImpl, INameSpaceTreeControlEvents_iface);
1778 }
1779
1780 static HRESULT WINAPI NSTCEvents_fnQueryInterface(INameSpaceTreeControlEvents *iface,
1781 REFIID riid, void **ppvObject)
1782 {
1783 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1784 TRACE("%p (%s, %p)\n", This, shdebugstr_guid(riid), ppvObject);
1785
1786 *ppvObject = NULL;
1787 if(IsEqualIID(riid, &IID_INameSpaceTreeControlEvents) ||
1788 IsEqualIID(riid, &IID_IUnknown))
1789 {
1790 *ppvObject = iface;
1791 }
1792
1793 if(*ppvObject)
1794 {
1795 IUnknown_AddRef((IUnknown*)*ppvObject);
1796 return S_OK;
1797 }
1798
1799 return E_NOINTERFACE;
1800 }
1801
1802 static ULONG WINAPI NSTCEvents_fnAddRef(INameSpaceTreeControlEvents *iface)
1803 {
1804 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1805 TRACE("%p\n", This);
1806 return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
1807 }
1808
1809 static ULONG WINAPI NSTCEvents_fnRelease(INameSpaceTreeControlEvents *iface)
1810 {
1811 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1812 TRACE("%p\n", This);
1813 return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
1814 }
1815
1816 static HRESULT WINAPI NSTCEvents_fnOnItemClick(INameSpaceTreeControlEvents *iface,
1817 IShellItem *psi,
1818 NSTCEHITTEST nstceHitTest,
1819 NSTCECLICKTYPE nstceClickType)
1820 {
1821 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1822 TRACE("%p (%p, 0x%x, 0x%x)\n", This, psi, nstceHitTest, nstceClickType);
1823 return S_OK;
1824 }
1825
1826 static HRESULT WINAPI NSTCEvents_fnOnPropertyItemCommit(INameSpaceTreeControlEvents *iface,
1827 IShellItem *psi)
1828 {
1829 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1830 TRACE("%p (%p)\n", This, psi);
1831 return E_NOTIMPL;
1832 }
1833
1834 static HRESULT WINAPI NSTCEvents_fnOnItemStateChanging(INameSpaceTreeControlEvents *iface,
1835 IShellItem *psi,
1836 NSTCITEMSTATE nstcisMask,
1837 NSTCITEMSTATE nstcisState)
1838 {
1839 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1840 TRACE("%p (%p, 0x%x, 0x%x)\n", This, psi, nstcisMask, nstcisState);
1841 return E_NOTIMPL;
1842 }
1843
1844 static HRESULT WINAPI NSTCEvents_fnOnItemStateChanged(INameSpaceTreeControlEvents *iface,
1845 IShellItem *psi,
1846 NSTCITEMSTATE nstcisMask,
1847 NSTCITEMSTATE nstcisState)
1848 {
1849 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1850 TRACE("%p (%p, 0x%x, 0x%x)\n", This, psi, nstcisMask, nstcisState);
1851 return E_NOTIMPL;
1852 }
1853
1854 static HRESULT WINAPI NSTCEvents_fnOnSelectionChanged(INameSpaceTreeControlEvents *iface,
1855 IShellItemArray *psiaSelection)
1856 {
1857 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1858 IShellItem *psi;
1859 HRESULT hr;
1860 TRACE("%p (%p)\n", This, psiaSelection);
1861
1862 hr = IShellItemArray_GetItemAt(psiaSelection, 0, &psi);
1863 if(SUCCEEDED(hr))
1864 {
1865 hr = IExplorerBrowser_BrowseToObject(&This->IExplorerBrowser_iface,
1866 (IUnknown*)psi, SBSP_DEFBROWSER);
1867 IShellItem_Release(psi);
1868 }
1869
1870 return hr;
1871 }
1872
1873 static HRESULT WINAPI NSTCEvents_fnOnKeyboardInput(INameSpaceTreeControlEvents *iface,
1874 UINT uMsg, WPARAM wParam, LPARAM lParam)
1875 {
1876 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1877 TRACE("%p (%d, 0x%lx, 0x%lx)\n", This, uMsg, wParam, lParam);
1878 return S_OK;
1879 }
1880
1881 static HRESULT WINAPI NSTCEvents_fnOnBeforeExpand(INameSpaceTreeControlEvents *iface,
1882 IShellItem *psi)
1883 {
1884 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1885 TRACE("%p (%p)\n", This, psi);
1886 return E_NOTIMPL;
1887 }
1888
1889 static HRESULT WINAPI NSTCEvents_fnOnAfterExpand(INameSpaceTreeControlEvents *iface,
1890 IShellItem *psi)
1891 {
1892 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1893 TRACE("%p (%p)\n", This, psi);
1894 return E_NOTIMPL;
1895 }
1896
1897 static HRESULT WINAPI NSTCEvents_fnOnBeginLabelEdit(INameSpaceTreeControlEvents *iface,
1898 IShellItem *psi)
1899 {
1900 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1901 TRACE("%p (%p)\n", This, psi);
1902 return E_NOTIMPL;
1903 }
1904
1905 static HRESULT WINAPI NSTCEvents_fnOnEndLabelEdit(INameSpaceTreeControlEvents *iface,
1906 IShellItem *psi)
1907 {
1908 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1909 TRACE("%p (%p)\n", This, psi);
1910 return E_NOTIMPL;
1911 }
1912
1913 static HRESULT WINAPI NSTCEvents_fnOnGetToolTip(INameSpaceTreeControlEvents *iface,
1914 IShellItem *psi, LPWSTR pszTip, int cchTip)
1915 {
1916 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1917 TRACE("%p (%p, %p, %d)\n", This, psi, pszTip, cchTip);
1918 return E_NOTIMPL;
1919 }
1920
1921 static HRESULT WINAPI NSTCEvents_fnOnBeforeItemDelete(INameSpaceTreeControlEvents *iface,
1922 IShellItem *psi)
1923 {
1924 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1925 TRACE("%p (%p)\n", This, psi);
1926 return E_NOTIMPL;
1927 }
1928
1929 static HRESULT WINAPI NSTCEvents_fnOnItemAdded(INameSpaceTreeControlEvents *iface,
1930 IShellItem *psi, BOOL fIsRoot)
1931 {
1932 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1933 TRACE("%p (%p, %d)\n", This, psi, fIsRoot);
1934 return E_NOTIMPL;
1935 }
1936
1937 static HRESULT WINAPI NSTCEvents_fnOnItemDeleted(INameSpaceTreeControlEvents *iface,
1938 IShellItem *psi, BOOL fIsRoot)
1939 {
1940 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1941 TRACE("%p (%p, %d)\n", This, psi, fIsRoot);
1942 return E_NOTIMPL;
1943 }
1944
1945 static HRESULT WINAPI NSTCEvents_fnOnBeforeContextMenu(INameSpaceTreeControlEvents *iface,
1946 IShellItem *psi, REFIID riid, void **ppv)
1947 {
1948 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1949 TRACE("%p (%p, %s, %p)\n", This, psi, shdebugstr_guid(riid), ppv);
1950 return E_NOTIMPL;
1951 }
1952
1953 static HRESULT WINAPI NSTCEvents_fnOnAfterContextMenu(INameSpaceTreeControlEvents *iface,
1954 IShellItem *psi, IContextMenu *pcmIn,
1955 REFIID riid, void **ppv)
1956 {
1957 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1958 TRACE("%p (%p, %p, %s, %p)\n", This, psi, pcmIn, shdebugstr_guid(riid), ppv);
1959 return E_NOTIMPL;
1960 }
1961
1962 static HRESULT WINAPI NSTCEvents_fnOnBeforeStateImageChange(INameSpaceTreeControlEvents *iface,
1963 IShellItem *psi)
1964 {
1965 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1966 TRACE("%p (%p)\n", This, psi);
1967 return E_NOTIMPL;
1968 }
1969
1970 static HRESULT WINAPI NSTCEvents_fnOnGetDefaultIconIndex(INameSpaceTreeControlEvents* iface,
1971 IShellItem *psi,
1972 int *piDefaultIcon, int *piOpenIcon)
1973 {
1974 ExplorerBrowserImpl *This = impl_from_INameSpaceTreeControlEvents(iface);
1975 TRACE("%p (%p, %p, %p)\n", This, psi, piDefaultIcon, piOpenIcon);
1976 return E_NOTIMPL;
1977 }
1978
1979
1980 static const INameSpaceTreeControlEventsVtbl vt_INameSpaceTreeControlEvents = {
1981 NSTCEvents_fnQueryInterface,
1982 NSTCEvents_fnAddRef,
1983 NSTCEvents_fnRelease,
1984 NSTCEvents_fnOnItemClick,
1985 NSTCEvents_fnOnPropertyItemCommit,
1986 NSTCEvents_fnOnItemStateChanging,
1987 NSTCEvents_fnOnItemStateChanged,
1988 NSTCEvents_fnOnSelectionChanged,
1989 NSTCEvents_fnOnKeyboardInput,
1990 NSTCEvents_fnOnBeforeExpand,
1991 NSTCEvents_fnOnAfterExpand,
1992 NSTCEvents_fnOnBeginLabelEdit,
1993 NSTCEvents_fnOnEndLabelEdit,
1994 NSTCEvents_fnOnGetToolTip,
1995 NSTCEvents_fnOnBeforeItemDelete,
1996 NSTCEvents_fnOnItemAdded,
1997 NSTCEvents_fnOnItemDeleted,
1998 NSTCEvents_fnOnBeforeContextMenu,
1999 NSTCEvents_fnOnAfterContextMenu,
2000 NSTCEvents_fnOnBeforeStateImageChange,
2001 NSTCEvents_fnOnGetDefaultIconIndex
2002 };
2003
2004 /**************************************************************************
2005 * IInputObject Implementation
2006 */
2007
2008 static inline ExplorerBrowserImpl *impl_from_IInputObject(IInputObject *iface)
2009 {
2010 return CONTAINING_RECORD(iface, ExplorerBrowserImpl, IInputObject_iface);
2011 }
2012
2013 static HRESULT WINAPI IInputObject_fnQueryInterface(IInputObject *iface,
2014 REFIID riid, void **ppvObject)
2015 {
2016 ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2017 TRACE("%p\n", This);
2018 return IExplorerBrowser_QueryInterface(&This->IExplorerBrowser_iface, riid, ppvObject);
2019 }
2020
2021 static ULONG WINAPI IInputObject_fnAddRef(IInputObject *iface)
2022 {
2023 ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2024 TRACE("%p\n", This);
2025 return IExplorerBrowser_AddRef(&This->IExplorerBrowser_iface);
2026 }
2027
2028 static ULONG WINAPI IInputObject_fnRelease(IInputObject *iface)
2029 {
2030 ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2031 TRACE("%p\n", This);
2032 return IExplorerBrowser_Release(&This->IExplorerBrowser_iface);
2033 }
2034
2035 static HRESULT WINAPI IInputObject_fnUIActivateIO(IInputObject *iface, BOOL fActivate, MSG *pMsg)
2036 {
2037 ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2038 FIXME("stub, %p (%d, %p)\n", This, fActivate, pMsg);
2039 return E_NOTIMPL;
2040 }
2041
2042 static HRESULT WINAPI IInputObject_fnHasFocusIO(IInputObject *iface)
2043 {
2044 ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2045 FIXME("stub, %p\n", This);
2046 return E_NOTIMPL;
2047 }
2048
2049 static HRESULT WINAPI IInputObject_fnTranslateAcceleratorIO(IInputObject *iface, MSG *pMsg)
2050 {
2051 ExplorerBrowserImpl *This = impl_from_IInputObject(iface);
2052 FIXME("stub, %p (%p)\n", This, pMsg);
2053 return E_NOTIMPL;
2054 }
2055
2056 static IInputObjectVtbl vt_IInputObject = {
2057 IInputObject_fnQueryInterface,
2058 IInputObject_fnAddRef,
2059 IInputObject_fnRelease,
2060 IInputObject_fnUIActivateIO,
2061 IInputObject_fnHasFocusIO,
2062 IInputObject_fnTranslateAcceleratorIO
2063 };
2064
2065 HRESULT WINAPI ExplorerBrowser_Constructor(IUnknown *pUnkOuter, REFIID riid, void **ppv)
2066 {
2067 ExplorerBrowserImpl *eb;
2068 HRESULT ret;
2069
2070 TRACE("%p %s %p\n", pUnkOuter, shdebugstr_guid (riid), ppv);
2071
2072 if(!ppv)
2073 return E_POINTER;
2074 if(pUnkOuter)
2075 return CLASS_E_NOAGGREGATION;
2076
2077 eb = heap_alloc_zero(sizeof(*eb));
2078 eb->ref = 1;
2079 eb->IExplorerBrowser_iface.lpVtbl = &vt_IExplorerBrowser;
2080 eb->IShellBrowser_iface.lpVtbl = &vt_IShellBrowser;
2081 eb->ICommDlgBrowser3_iface.lpVtbl = &vt_ICommDlgBrowser3;
2082 eb->IObjectWithSite_iface.lpVtbl = &vt_IObjectWithSite;
2083 eb->INameSpaceTreeControlEvents_iface.lpVtbl = &vt_INameSpaceTreeControlEvents;
2084 eb->IInputObject_iface.lpVtbl = &vt_IInputObject;
2085
2086 /* Default settings */
2087 eb->navpane.show = TRUE;
2088
2089 list_init(&eb->event_clients);
2090 list_init(&eb->travellog);
2091
2092 ret = IExplorerBrowser_QueryInterface(&eb->IExplorerBrowser_iface, riid, ppv);
2093 IExplorerBrowser_Release(&eb->IExplorerBrowser_iface);
2094
2095 TRACE("--(%p)\n", ppv);
2096 return ret;
2097 }
Windows API implementation