?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
shell32: IShellView list's control id should be 1, not 2000.
[wine/wine64.git] / dlls / shell32 / shlview.c
blob2cce8eb9c0d1ac6294ad4c2d31bc3ae4497d6626
1 /*
2 * ShellView
3 *
4 * Copyright 1998,1999 <juergen.schmied@debitel.net>
5 *
6 * This is the view visualizing the data provied by the shellfolder.
7 * No direct access to data from pidls should be done from here.
8 *
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
13 *
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
18 *
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 *
23 * FIXME: The order by part of the background context menu should be
24 * buily according to the columns shown.
25 *
26 * FIXME: Load/Save the view state from/into the stream provied by
27 * the ShellBrowser
28 *
29 * FIXME: CheckToolbar: handle the "new folder" and "folder up" button
30 *
31 * FIXME: ShellView_FillList: consider sort orders
32 *
33 * FIXME: implement the drag and drop in the old (msg-based) way
34 *
35 * FIXME: when the ShellView_WndProc gets a WM_NCDESTROY should we do a
36 * Release() ???
37 */
38
39 #include "config.h"
40 #include "wine/port.h"
41
42 #include <stdarg.h>
43 #include <stdlib.h>
44 #include <string.h>
45
46 #define COBJMACROS
47 #define NONAMELESSUNION
48 #define NONAMELESSSTRUCT
49
50 #include "windef.h"
51 #include "winerror.h"
52 #include "winbase.h"
53 #include "winnls.h"
54 #include "objbase.h"
55 #include "servprov.h"
56 #include "shlguid.h"
57 #include "wingdi.h"
58 #include "winuser.h"
59 #include "shlobj.h"
60 #include "undocshell.h"
61 #include "shresdef.h"
62 #include "wine/debug.h"
63
64 #include "docobj.h"
65 #include "pidl.h"
66 #include "shell32_main.h"
67 #include "shellfolder.h"
68
69 WINE_DEFAULT_DEBUG_CHANNEL(shell);
70
71 typedef struct
72 { BOOL bIsAscending;
73 INT nHeaderID;
74 INT nLastHeaderID;
75 }LISTVIEW_SORT_INFO, *LPLISTVIEW_SORT_INFO;
76
77 typedef struct
78 {
79 const IShellViewVtbl* lpVtbl;
80 LONG ref;
81 const IOleCommandTargetVtbl* lpvtblOleCommandTarget;
82 const IDropTargetVtbl* lpvtblDropTarget;
83 const IDropSourceVtbl* lpvtblDropSource;
84 const IViewObjectVtbl* lpvtblViewObject;
85 IShellFolder* pSFParent;
86 IShellFolder2* pSF2Parent;
87 IShellBrowser* pShellBrowser;
88 ICommDlgBrowser* pCommDlgBrowser;
89 HWND hWnd; /* SHELLDLL_DefView */
90 HWND hWndList; /* ListView control */
91 HWND hWndParent;
92 FOLDERSETTINGS FolderSettings;
93 HMENU hMenu;
94 UINT uState;
95 UINT cidl;
96 LPITEMIDLIST *apidl;
97 LISTVIEW_SORT_INFO ListViewSortInfo;
98 ULONG hNotify; /* change notification handle */
99 HANDLE hAccel;
100 DWORD dwAspects;
101 DWORD dwAdvf;
102 IAdviseSink *pAdvSink;
103 IDropTarget* pCurDropTarget; /* The sub-item, which is currently dragged over */
104 IDataObject* pCurDataObject; /* The dragged data-object */
105 LONG iDragOverItem; /* Dragged over item's index, iff pCurDropTarget != NULL */
106 UINT cScrollDelay; /* Send a WM_*SCROLL msg every 250 ms during drag-scroll */
107 POINT ptLastMousePos; /* Mouse position at last DragOver call */
108 } IShellViewImpl;
109
110 static const IShellViewVtbl svvt;
111 static const IOleCommandTargetVtbl ctvt;
112 static const IDropTargetVtbl dtvt;
113 static const IDropSourceVtbl dsvt;
114 static const IViewObjectVtbl vovt;
115
116
117 static inline IShellViewImpl *impl_from_IOleCommandTarget( IOleCommandTarget *iface )
118 {
119 return (IShellViewImpl *)((char*)iface - FIELD_OFFSET(IShellViewImpl, lpvtblOleCommandTarget));
120 }
121
122 static inline IShellViewImpl *impl_from_IDropTarget( IDropTarget *iface )
123 {
124 return (IShellViewImpl *)((char*)iface - FIELD_OFFSET(IShellViewImpl, lpvtblDropTarget));
125 }
126
127 static inline IShellViewImpl *impl_from_IDropSource( IDropSource *iface )
128 {
129 return (IShellViewImpl *)((char*)iface - FIELD_OFFSET(IShellViewImpl, lpvtblDropSource));
130 }
131
132 static inline IShellViewImpl *impl_from_IViewObject( IViewObject *iface )
133 {
134 return (IShellViewImpl *)((char*)iface - FIELD_OFFSET(IShellViewImpl, lpvtblViewObject));
135 }
136
137 /* ListView Header ID's */
138 #define LISTVIEW_COLUMN_NAME 0
139 #define LISTVIEW_COLUMN_SIZE 1
140 #define LISTVIEW_COLUMN_TYPE 2
141 #define LISTVIEW_COLUMN_TIME 3
142 #define LISTVIEW_COLUMN_ATTRIB 4
143
144 /*menu items */
145 #define IDM_VIEW_FILES (FCIDM_SHVIEWFIRST + 0x500)
146 #define IDM_VIEW_IDW (FCIDM_SHVIEWFIRST + 0x501)
147 #define IDM_MYFILEITEM (FCIDM_SHVIEWFIRST + 0x502)
148
149 #define ID_LISTVIEW 1
150
151 #define SHV_CHANGE_NOTIFY WM_USER + 0x1111
152
153 /*windowsx.h */
154 #define GET_WM_COMMAND_ID(wp, lp) LOWORD(wp)
155 #define GET_WM_COMMAND_HWND(wp, lp) (HWND)(lp)
156 #define GET_WM_COMMAND_CMD(wp, lp) HIWORD(wp)
157
158 /*
159 Items merged into the toolbar and and the filemenu
160 */
161 typedef struct
162 { int idCommand;
163 int iImage;
164 int idButtonString;
165 int idMenuString;
166 BYTE bState;
167 BYTE bStyle;
168 } MYTOOLINFO, *LPMYTOOLINFO;
169
170 MYTOOLINFO Tools[] =
171 {
172 { FCIDM_SHVIEW_BIGICON, 0, 0, IDS_VIEW_LARGE, TBSTATE_ENABLED, BTNS_BUTTON },
173 { FCIDM_SHVIEW_SMALLICON, 0, 0, IDS_VIEW_SMALL, TBSTATE_ENABLED, BTNS_BUTTON },
174 { FCIDM_SHVIEW_LISTVIEW, 0, 0, IDS_VIEW_LIST, TBSTATE_ENABLED, BTNS_BUTTON },
175 { FCIDM_SHVIEW_REPORTVIEW, 0, 0, IDS_VIEW_DETAILS, TBSTATE_ENABLED, BTNS_BUTTON },
176 { -1, 0, 0, 0, 0, 0}
177 };
178
179 typedef void (CALLBACK *PFNSHGETSETTINGSPROC)(LPSHELLFLAGSTATE lpsfs, DWORD dwMask);
180
181 /**********************************************************
182 * IShellView_Constructor
183 */
184 IShellView * IShellView_Constructor( IShellFolder * pFolder)
185 { IShellViewImpl * sv;
186 sv=HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(IShellViewImpl));
187 sv->ref=1;
188 sv->lpVtbl=&svvt;
189 sv->lpvtblOleCommandTarget=&ctvt;
190 sv->lpvtblDropTarget=&dtvt;
191 sv->lpvtblDropSource=&dsvt;
192 sv->lpvtblViewObject=&vovt;
193
194 sv->pSFParent = pFolder;
195 if(pFolder) IShellFolder_AddRef(pFolder);
196 IShellFolder_QueryInterface(sv->pSFParent, &IID_IShellFolder2, (LPVOID*)&sv->pSF2Parent);
197
198 sv->pCurDropTarget = NULL;
199 sv->pCurDataObject = NULL;
200 sv->iDragOverItem = 0;
201 sv->cScrollDelay = 0;
202 sv->ptLastMousePos.x = 0;
203 sv->ptLastMousePos.y = 0;
204
205 TRACE("(%p)->(%p)\n",sv, pFolder);
206 return (IShellView *) sv;
207 }
208
209 /**********************************************************
210 *
211 * ##### helperfunctions for communication with ICommDlgBrowser #####
212 */
213 static BOOL IsInCommDlg(IShellViewImpl * This)
214 { return(This->pCommDlgBrowser != NULL);
215 }
216
217 static HRESULT IncludeObject(IShellViewImpl * This, LPCITEMIDLIST pidl)
218 {
219 HRESULT ret = S_OK;
220
221 if ( IsInCommDlg(This) )
222 {
223 TRACE("ICommDlgBrowser::IncludeObject pidl=%p\n", pidl);
224 ret = ICommDlgBrowser_IncludeObject(This->pCommDlgBrowser, (IShellView*)This, pidl);
225 TRACE("--0x%08lx\n", ret);
226 }
227 return ret;
228 }
229
230 static HRESULT OnDefaultCommand(IShellViewImpl * This)
231 {
232 HRESULT ret = S_FALSE;
233
234 if (IsInCommDlg(This))
235 {
236 TRACE("ICommDlgBrowser::OnDefaultCommand\n");
237 ret = ICommDlgBrowser_OnDefaultCommand(This->pCommDlgBrowser, (IShellView*)This);
238 TRACE("-- returns %08lx\n", ret);
239 }
240 return ret;
241 }
242
243 static HRESULT OnStateChange(IShellViewImpl * This, UINT uFlags)
244 {
245 HRESULT ret = S_FALSE;
246
247 if (IsInCommDlg(This))
248 {
249 TRACE("ICommDlgBrowser::OnStateChange flags=%x\n", uFlags);
250 ret = ICommDlgBrowser_OnStateChange(This->pCommDlgBrowser, (IShellView*)This, uFlags);
251 TRACE("--\n");
252 }
253 return ret;
254 }
255 /**********************************************************
256 * set the toolbar of the filedialog buttons
257 *
258 * - activates the buttons from the shellbrowser according to
259 * the view state
260 */
261 static void CheckToolbar(IShellViewImpl * This)
262 {
263 LRESULT result;
264
265 TRACE("\n");
266
267 if (IsInCommDlg(This))
268 {
269 IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_TOOLBAR, TB_CHECKBUTTON,
270 FCIDM_TB_SMALLICON, (This->FolderSettings.ViewMode==FVM_LIST)? TRUE : FALSE, &result);
271 IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_TOOLBAR, TB_CHECKBUTTON,
272 FCIDM_TB_REPORTVIEW, (This->FolderSettings.ViewMode==FVM_DETAILS)? TRUE : FALSE, &result);
273 IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_TOOLBAR, TB_ENABLEBUTTON,
274 FCIDM_TB_SMALLICON, TRUE, &result);
275 IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_TOOLBAR, TB_ENABLEBUTTON,
276 FCIDM_TB_REPORTVIEW, TRUE, &result);
277 }
278 }
279
280 /**********************************************************
281 *
282 * ##### helperfunctions for initializing the view #####
283 */
284 /**********************************************************
285 * change the style of the listview control
286 */
287 static void SetStyle(IShellViewImpl * This, DWORD dwAdd, DWORD dwRemove)
288 {
289 DWORD tmpstyle;
290
291 TRACE("(%p)\n", This);
292
293 tmpstyle = GetWindowLongA(This->hWndList, GWL_STYLE);
294 SetWindowLongA(This->hWndList, GWL_STYLE, dwAdd | (tmpstyle & ~dwRemove));
295 }
296
297 /**********************************************************
298 * ShellView_CreateList()
299 *
300 * - creates the list view window
301 */
302 static BOOL ShellView_CreateList (IShellViewImpl * This)
303 { DWORD dwStyle, dwExStyle;
304
305 TRACE("%p\n",This);
306
307 dwStyle = WS_TABSTOP | WS_VISIBLE | WS_CHILDWINDOW | WS_CLIPSIBLINGS | WS_CLIPCHILDREN |
308 LVS_SHAREIMAGELISTS | LVS_EDITLABELS | LVS_ALIGNLEFT | LVS_AUTOARRANGE;
309 dwExStyle = WS_EX_CLIENTEDGE;
310
311 switch (This->FolderSettings.ViewMode)
312 {
313 case FVM_ICON: dwStyle |= LVS_ICON; break;
314 case FVM_DETAILS: dwStyle |= LVS_REPORT; break;
315 case FVM_SMALLICON: dwStyle |= LVS_SMALLICON; break;
316 case FVM_LIST: dwStyle |= LVS_LIST; break;
317 default: dwStyle |= LVS_LIST; break;
318 }
319
320 if (This->FolderSettings.fFlags & FWF_AUTOARRANGE) dwStyle |= LVS_AUTOARRANGE;
321 if (This->FolderSettings.fFlags & FWF_DESKTOP)
322 This->FolderSettings.fFlags |= FWF_NOCLIENTEDGE | FWF_NOSCROLL;
323 if (This->FolderSettings.fFlags & FWF_SINGLESEL) dwStyle |= LVS_SINGLESEL;
324 if (This->FolderSettings.fFlags & FWF_NOCLIENTEDGE)
325 dwExStyle &= ~WS_EX_CLIENTEDGE;
326
327 This->hWndList=CreateWindowExA( dwExStyle,
328 WC_LISTVIEWA,
329 NULL,
330 dwStyle,
331 0,0,0,0,
332 This->hWnd,
333 (HMENU)ID_LISTVIEW,
334 shell32_hInstance,
335 NULL);
336
337 if(!This->hWndList)
338 return FALSE;
339
340 This->ListViewSortInfo.bIsAscending = TRUE;
341 This->ListViewSortInfo.nHeaderID = -1;
342 This->ListViewSortInfo.nLastHeaderID = -1;
343
344 if (This->FolderSettings.fFlags & FWF_DESKTOP) {
345 if (0) /* FIXME: look into registry vale HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ListviewShadow and activate drop shadows */
346 ListView_SetTextBkColor(This->hWndList, CLR_NONE);
347 else
348 ListView_SetTextBkColor(This->hWndList, GetSysColor(COLOR_DESKTOP));
349
350 ListView_SetTextColor(This->hWndList, RGB(255,255,255));
351 }
352
353 /* UpdateShellSettings(); */
354 return TRUE;
355 }
356
357 /**********************************************************
358 * ShellView_InitList()
359 *
360 * - adds all needed columns to the shellview
361 */
362 static BOOL ShellView_InitList(IShellViewImpl * This)
363 {
364 LVCOLUMNA lvColumn;
365 SHELLDETAILS sd;
366 int i;
367 char szTemp[50];
368
369 TRACE("%p\n",This);
370
371 ListView_DeleteAllItems(This->hWndList);
372
373 lvColumn.mask = LVCF_FMT | LVCF_WIDTH | LVCF_TEXT;
374 lvColumn.pszText = szTemp;
375
376 if (This->pSF2Parent)
377 {
378 for (i=0; 1; i++)
379 {
380 if (!SUCCEEDED(IShellFolder2_GetDetailsOf(This->pSF2Parent, NULL, i, &sd)))
381 break;
382 lvColumn.fmt = sd.fmt;
383 lvColumn.cx = sd.cxChar*8; /* chars->pixel */
384 StrRetToStrNA( szTemp, 50, &sd.str, NULL);
385 ListView_InsertColumnA(This->hWndList, i, &lvColumn);
386 }
387 }
388 else
389 {
390 FIXME("no SF2\n");
391 }
392
393 ListView_SetImageList(This->hWndList, ShellSmallIconList, LVSIL_SMALL);
394 ListView_SetImageList(This->hWndList, ShellBigIconList, LVSIL_NORMAL);
395
396 return TRUE;
397 }
398 /**********************************************************
399 * ShellView_CompareItems()
400 *
401 * NOTES
402 * internal, CALLBACK for DSA_Sort
403 */
404 static INT CALLBACK ShellView_CompareItems(LPVOID lParam1, LPVOID lParam2, LPARAM lpData)
405 {
406 int ret;
407 TRACE("pidl1=%p pidl2=%p lpsf=%p\n", lParam1, lParam2, (LPVOID) lpData);
408
409 if(!lpData) return 0;
410
411 ret = (SHORT) SCODE_CODE(IShellFolder_CompareIDs((LPSHELLFOLDER)lpData, 0, (LPITEMIDLIST)lParam1, (LPITEMIDLIST)lParam2));
412 TRACE("ret=%i\n",ret);
413 return ret;
414 }
415
416 /*************************************************************************
417 * ShellView_ListViewCompareItems
418 *
419 * Compare Function for the Listview (FileOpen Dialog)
420 *
421 * PARAMS
422 * lParam1 [I] the first ItemIdList to compare with
423 * lParam2 [I] the second ItemIdList to compare with
424 * lpData [I] The column ID for the header Ctrl to process
425 *
426 * RETURNS
427 * A negative value if the first item should precede the second,
428 * a positive value if the first item should follow the second,
429 * or zero if the two items are equivalent
430 *
431 * NOTES
432 * FIXME: function does what ShellView_CompareItems is supposed to do.
433 * unify it and figure out how to use the undocumented first parameter
434 * of IShellFolder_CompareIDs to do the job this function does and
435 * move this code to IShellFolder.
436 * make LISTVIEW_SORT_INFO obsolete
437 * the way this function works is only usable if we had only
438 * filesystemfolders (25/10/99 jsch)
439 */
440 static INT CALLBACK ShellView_ListViewCompareItems(LPVOID lParam1, LPVOID lParam2, LPARAM lpData)
441 {
442 INT nDiff=0;
443 FILETIME fd1, fd2;
444 char strName1[MAX_PATH], strName2[MAX_PATH];
445 BOOL bIsFolder1, bIsFolder2,bIsBothFolder;
446 LPITEMIDLIST pItemIdList1 = (LPITEMIDLIST) lParam1;
447 LPITEMIDLIST pItemIdList2 = (LPITEMIDLIST) lParam2;
448 LISTVIEW_SORT_INFO *pSortInfo = (LPLISTVIEW_SORT_INFO) lpData;
449
450
451 bIsFolder1 = _ILIsFolder(pItemIdList1);
452 bIsFolder2 = _ILIsFolder(pItemIdList2);
453 bIsBothFolder = bIsFolder1 && bIsFolder2;
454
455 /* When sorting between a File and a Folder, the Folder gets sorted first */
456 if( (bIsFolder1 || bIsFolder2) && !bIsBothFolder)
457 {
458 nDiff = bIsFolder1 ? -1 : 1;
459 }
460 else
461 {
462 /* Sort by Time: Folders or Files can be sorted */
463
464 if(pSortInfo->nHeaderID == LISTVIEW_COLUMN_TIME)
465 {
466 _ILGetFileDateTime(pItemIdList1, &fd1);
467 _ILGetFileDateTime(pItemIdList2, &fd2);
468 nDiff = CompareFileTime(&fd2, &fd1);
469 }
470 /* Sort by Attribute: Folder or Files can be sorted */
471 else if(pSortInfo->nHeaderID == LISTVIEW_COLUMN_ATTRIB)
472 {
473 _ILGetFileAttributes(pItemIdList1, strName1, MAX_PATH);
474 _ILGetFileAttributes(pItemIdList2, strName2, MAX_PATH);
475 nDiff = lstrcmpiA(strName1, strName2);
476 }
477 /* Sort by FileName: Folder or Files can be sorted */
478 else if(pSortInfo->nHeaderID == LISTVIEW_COLUMN_NAME || bIsBothFolder)
479 {
480 /* Sort by Text */
481 _ILSimpleGetText(pItemIdList1, strName1, MAX_PATH);
482 _ILSimpleGetText(pItemIdList2, strName2, MAX_PATH);
483 nDiff = lstrcmpiA(strName1, strName2);
484 }
485 /* Sort by File Size, Only valid for Files */
486 else if(pSortInfo->nHeaderID == LISTVIEW_COLUMN_SIZE)
487 {
488 nDiff = (INT)(_ILGetFileSize(pItemIdList1, NULL, 0) - _ILGetFileSize(pItemIdList2, NULL, 0));
489 }
490 /* Sort by File Type, Only valid for Files */
491 else if(pSortInfo->nHeaderID == LISTVIEW_COLUMN_TYPE)
492 {
493 /* Sort by Type */
494 _ILGetFileType(pItemIdList1, strName1, MAX_PATH);
495 _ILGetFileType(pItemIdList2, strName2, MAX_PATH);
496 nDiff = lstrcmpiA(strName1, strName2);
497 }
498 }
499 /* If the Date, FileSize, FileType, Attrib was the same, sort by FileName */
500
501 if(nDiff == 0)
502 {
503 _ILSimpleGetText(pItemIdList1, strName1, MAX_PATH);
504 _ILSimpleGetText(pItemIdList2, strName2, MAX_PATH);
505 nDiff = lstrcmpiA(strName1, strName2);
506 }
507
508 if(!pSortInfo->bIsAscending)
509 {
510 nDiff = -nDiff;
511 }
512
513 return nDiff;
514
515 }
516
517 /**********************************************************
518 * LV_FindItemByPidl()
519 */
520 static int LV_FindItemByPidl(
521 IShellViewImpl * This,
522 LPCITEMIDLIST pidl)
523 {
524 LVITEMA lvItem;
525 ZeroMemory(&lvItem, sizeof(LVITEMA));
526 lvItem.mask = LVIF_PARAM;
527 for(lvItem.iItem = 0; ListView_GetItemA(This->hWndList, &lvItem); lvItem.iItem++)
528 {
529 LPITEMIDLIST currentpidl = (LPITEMIDLIST) lvItem.lParam;
530 HRESULT hr = IShellFolder_CompareIDs(This->pSFParent, 0, pidl, currentpidl);
531 if(SUCCEEDED(hr) && !HRESULT_CODE(hr))
532 {
533 return lvItem.iItem;
534 }
535 }
536 return -1;
537 }
538
539 /**********************************************************
540 * LV_AddItem()
541 */
542 static BOOLEAN LV_AddItem(IShellViewImpl * This, LPCITEMIDLIST pidl)
543 {
544 LVITEMA lvItem;
545
546 TRACE("(%p)(pidl=%p)\n", This, pidl);
547
548 ZeroMemory(&lvItem, sizeof(lvItem)); /* create the listview item*/
549 lvItem.mask = LVIF_TEXT | LVIF_IMAGE | LVIF_PARAM; /*set the mask*/
550 lvItem.iItem = ListView_GetItemCount(This->hWndList); /*add the item to the end of the list*/
551 lvItem.lParam = (LPARAM) ILClone(ILFindLastID(pidl)); /*set the item's data*/
552 lvItem.pszText = LPSTR_TEXTCALLBACKA; /*get text on a callback basis*/
553 lvItem.iImage = I_IMAGECALLBACK; /*get the image on a callback basis*/
554 return (-1==ListView_InsertItemA(This->hWndList, &lvItem))? FALSE: TRUE;
555 }
556
557 /**********************************************************
558 * LV_DeleteItem()
559 */
560 static BOOLEAN LV_DeleteItem(IShellViewImpl * This, LPCITEMIDLIST pidl)
561 {
562 int nIndex;
563
564 TRACE("(%p)(pidl=%p)\n", This, pidl);
565
566 nIndex = LV_FindItemByPidl(This, ILFindLastID(pidl));
567 return (-1==ListView_DeleteItem(This->hWndList, nIndex))? FALSE: TRUE;
568 }
569
570 /**********************************************************
571 * LV_RenameItem()
572 */
573 static BOOLEAN LV_RenameItem(IShellViewImpl * This, LPCITEMIDLIST pidlOld, LPCITEMIDLIST pidlNew )
574 {
575 int nItem;
576 LVITEMA lvItem;
577
578 TRACE("(%p)(pidlold=%p pidlnew=%p)\n", This, pidlOld, pidlNew);
579
580 nItem = LV_FindItemByPidl(This, ILFindLastID(pidlOld));
581 if ( -1 != nItem )
582 {
583 ZeroMemory(&lvItem, sizeof(lvItem)); /* create the listview item*/
584 lvItem.mask = LVIF_PARAM; /* only the pidl */
585 lvItem.iItem = nItem;
586 ListView_GetItemA(This->hWndList, &lvItem);
587
588 SHFree((LPITEMIDLIST)lvItem.lParam);
589 lvItem.mask = LVIF_PARAM;
590 lvItem.iItem = nItem;
591 lvItem.lParam = (LPARAM) ILClone(ILFindLastID(pidlNew)); /* set the item's data */
592 ListView_SetItemA(This->hWndList, &lvItem);
593 ListView_Update(This->hWndList, nItem);
594 return TRUE; /* FIXME: better handling */
595 }
596 return FALSE;
597 }
598 /**********************************************************
599 * ShellView_FillList()
600 *
601 * - gets the objectlist from the shellfolder
602 * - sorts the list
603 * - fills the list into the view
604 */
605
606 static INT CALLBACK fill_list( LPVOID ptr, LPVOID arg )
607 {
608 LPITEMIDLIST pidl = ptr;
609 IShellViewImpl *This = arg;
610 /* in a commdlg This works as a filemask*/
611 if ( IncludeObject(This, pidl)==S_OK ) LV_AddItem(This, pidl);
612 SHFree(pidl);
613 return TRUE;
614 }
615
616 static HRESULT ShellView_FillList(IShellViewImpl * This)
617 {
618 LPENUMIDLIST pEnumIDList;
619 LPITEMIDLIST pidl;
620 DWORD dwFetched;
621 HRESULT hRes;
622 HDPA hdpa;
623
624 TRACE("%p\n",This);
625
626 /* get the itemlist from the shfolder*/
627 hRes = IShellFolder_EnumObjects(This->pSFParent,This->hWnd, SHCONTF_NONFOLDERS | SHCONTF_FOLDERS, &pEnumIDList);
628 if (hRes != S_OK)
629 {
630 if (hRes==S_FALSE)
631 return(NOERROR);
632 return(hRes);
633 }
634
635 /* create a pointer array */
636 hdpa = DPA_Create(16);
637 if (!hdpa)
638 {
639 return(E_OUTOFMEMORY);
640 }
641
642 /* copy the items into the array*/
643 while((S_OK == IEnumIDList_Next(pEnumIDList,1, &pidl, &dwFetched)) && dwFetched)
644 {
645 if (DPA_InsertPtr(hdpa, 0x7fff, pidl) == -1)
646 {
647 SHFree(pidl);
648 }
649 }
650
651 /* sort the array */
652 DPA_Sort(hdpa, ShellView_CompareItems, (LPARAM)This->pSFParent);
653
654 /*turn the listview's redrawing off*/
655 SendMessageA(This->hWndList, WM_SETREDRAW, FALSE, 0);
656
657 DPA_DestroyCallback( hdpa, fill_list, This );
658
659 /*turn the listview's redrawing back on and force it to draw*/
660 SendMessageA(This->hWndList, WM_SETREDRAW, TRUE, 0);
661
662 IEnumIDList_Release(pEnumIDList); /* destroy the list*/
663
664 return S_OK;
665 }
666
667 /**********************************************************
668 * ShellView_OnCreate()
669 */
670 static LRESULT ShellView_OnCreate(IShellViewImpl * This)
671 {
672 IDropTarget* pdt;
673 SHChangeNotifyEntry ntreg;
674 IPersistFolder2 * ppf2 = NULL;
675
676 TRACE("%p\n",This);
677
678 if(ShellView_CreateList(This))
679 {
680 if(ShellView_InitList(This))
681 {
682 ShellView_FillList(This);
683 }
684 }
685
686 if (SUCCEEDED(IUnknown_QueryInterface((IUnknown*)&This->lpVtbl, &IID_IDropTarget, (LPVOID*)&pdt)))
687 {
688 RegisterDragDrop(This->hWnd, pdt);
689 IDropTarget_Release(pdt);
690 }
691
692 /* register for receiving notifications */
693 IShellFolder_QueryInterface(This->pSFParent, &IID_IPersistFolder2, (LPVOID*)&ppf2);
694 if (ppf2)
695 {
696 IPersistFolder2_GetCurFolder(ppf2, (LPITEMIDLIST*)&ntreg.pidl);
697 ntreg.fRecursive = TRUE;
698 This->hNotify = SHChangeNotifyRegister(This->hWnd, SHCNF_IDLIST, SHCNE_ALLEVENTS, SHV_CHANGE_NOTIFY, 1, &ntreg);
699 SHFree((LPITEMIDLIST)ntreg.pidl);
700 IPersistFolder2_Release(ppf2);
701 }
702
703 This->hAccel = LoadAcceleratorsA(shell32_hInstance, "shv_accel");
704
705 return S_OK;
706 }
707
708 /**********************************************************
709 * #### Handling of the menus ####
710 */
711
712 /**********************************************************
713 * ShellView_BuildFileMenu()
714 */
715 static HMENU ShellView_BuildFileMenu(IShellViewImpl * This)
716 { CHAR szText[MAX_PATH];
717 MENUITEMINFOA mii;
718 int nTools,i;
719 HMENU hSubMenu;
720
721 TRACE("(%p)\n",This);
722
723 hSubMenu = CreatePopupMenu();
724 if(hSubMenu)
725 { /*get the number of items in our global array*/
726 for(nTools = 0; Tools[nTools].idCommand != -1; nTools++){}
727
728 /*add the menu items*/
729 for(i = 0; i < nTools; i++)
730 {
731 LoadStringA(shell32_hInstance, Tools[i].idMenuString, szText, MAX_PATH);
732
733 ZeroMemory(&mii, sizeof(mii));
734 mii.cbSize = sizeof(mii);
735 mii.fMask = MIIM_TYPE | MIIM_ID | MIIM_STATE;
736
737 if(BTNS_SEP != Tools[i].bStyle) /* no separator*/
738 {
739 mii.fType = MFT_STRING;
740 mii.fState = MFS_ENABLED;
741 mii.dwTypeData = szText;
742 mii.wID = Tools[i].idCommand;
743 }
744 else
745 {
746 mii.fType = MFT_SEPARATOR;
747 }
748 /* tack This item onto the end of the menu */
749 InsertMenuItemA(hSubMenu, (UINT)-1, TRUE, &mii);
750 }
751 }
752 TRACE("-- return (menu=%p)\n",hSubMenu);
753 return hSubMenu;
754 }
755 /**********************************************************
756 * ShellView_MergeFileMenu()
757 */
758 static void ShellView_MergeFileMenu(IShellViewImpl * This, HMENU hSubMenu)
759 { TRACE("(%p)->(submenu=%p) stub\n",This,hSubMenu);
760
761 if(hSubMenu)
762 { /*insert This item at the beginning of the menu */
763 _InsertMenuItem(hSubMenu, 0, TRUE, 0, MFT_SEPARATOR, NULL, MFS_ENABLED);
764 _InsertMenuItem(hSubMenu, 0, TRUE, IDM_MYFILEITEM, MFT_STRING, "dummy45", MFS_ENABLED);
765
766 }
767 TRACE("--\n");
768 }
769
770 /**********************************************************
771 * ShellView_MergeViewMenu()
772 */
773
774 static void ShellView_MergeViewMenu(IShellViewImpl * This, HMENU hSubMenu)
775 { MENUITEMINFOA mii;
776
777 TRACE("(%p)->(submenu=%p)\n",This,hSubMenu);
778
779 if(hSubMenu)
780 { /*add a separator at the correct position in the menu*/
781 _InsertMenuItem(hSubMenu, FCIDM_MENU_VIEW_SEP_OPTIONS, FALSE, 0, MFT_SEPARATOR, NULL, MFS_ENABLED);
782
783 ZeroMemory(&mii, sizeof(mii));
784 mii.cbSize = sizeof(mii);
785 mii.fMask = MIIM_SUBMENU | MIIM_TYPE | MIIM_DATA;
786 mii.fType = MFT_STRING;
787 mii.dwTypeData = "View";
788 mii.hSubMenu = LoadMenuA(shell32_hInstance, "MENU_001");
789 InsertMenuItemA(hSubMenu, FCIDM_MENU_VIEW_SEP_OPTIONS, FALSE, &mii);
790 }
791 }
792
793 /**********************************************************
794 * ShellView_GetSelections()
795 *
796 * - fills the this->apidl list with the selected objects
797 *
798 * RETURNS
799 * number of selected items
800 */
801 static UINT ShellView_GetSelections(IShellViewImpl * This)
802 {
803 LVITEMA lvItem;
804 UINT i = 0;
805
806 if (This->apidl)
807 {
808 SHFree(This->apidl);
809 }
810
811 This->cidl = ListView_GetSelectedCount(This->hWndList);
812 This->apidl = (LPITEMIDLIST*)SHAlloc(This->cidl * sizeof(LPITEMIDLIST));
813
814 TRACE("selected=%i\n", This->cidl);
815
816 if(This->apidl)
817 {
818 TRACE("-- Items selected =%u\n", This->cidl);
819
820 ZeroMemory(&lvItem, sizeof(lvItem));
821 lvItem.mask = LVIF_STATE | LVIF_PARAM;
822 lvItem.stateMask = LVIS_SELECTED;
823
824 while(ListView_GetItemA(This->hWndList, &lvItem) && (i < This->cidl))
825 {
826 if(lvItem.state & LVIS_SELECTED)
827 {
828 This->apidl[i] = (LPITEMIDLIST)lvItem.lParam;
829 i++;
830 TRACE("-- selected Item found\n");
831 }
832 lvItem.iItem++;
833 }
834 }
835 return This->cidl;
836
837 }
838
839 /**********************************************************
840 * ShellView_OpenSelectedItems()
841 */
842 static HRESULT ShellView_OpenSelectedItems(IShellViewImpl * This)
843 {
844 static UINT CF_IDLIST = 0;
845 HRESULT hr;
846 IDataObject* selection;
847 FORMATETC fetc;
848 STGMEDIUM stgm;
849 LPIDA pIDList;
850 LPCITEMIDLIST parent_pidl;
851 int i;
852
853 if (0 == ShellView_GetSelections(This))
854 {
855 return S_OK;
856 }
857 hr = IShellFolder_GetUIObjectOf(This->pSFParent, This->hWnd, This->cidl,
858 (LPCITEMIDLIST*)This->apidl, &IID_IDataObject,
859 0, (LPVOID *)&selection);
860 if (FAILED(hr))
861 return hr;
862
863 if (0 == CF_IDLIST)
864 {
865 CF_IDLIST = RegisterClipboardFormatA(CFSTR_SHELLIDLIST);
866 }
867 fetc.cfFormat = CF_IDLIST;
868 fetc.ptd = NULL;
869 fetc.dwAspect = DVASPECT_CONTENT;
870 fetc.lindex = -1;
871 fetc.tymed = TYMED_HGLOBAL;
872
873 hr = IDataObject_QueryGetData(selection, &fetc);
874 if (FAILED(hr))
875 return hr;
876
877 hr = IDataObject_GetData(selection, &fetc, &stgm);
878 if (FAILED(hr))
879 return hr;
880
881 pIDList = GlobalLock(stgm.u.hGlobal);
882
883 parent_pidl = (LPCITEMIDLIST) ((LPBYTE)pIDList+pIDList->aoffset[0]);
884 for (i = pIDList->cidl; i > 0; --i)
885 {
886 LPCITEMIDLIST pidl;
887 SFGAOF attribs;
888
889 pidl = (LPCITEMIDLIST)((LPBYTE)pIDList+pIDList->aoffset[i]);
890
891 attribs = SFGAO_FOLDER;
892 hr = IShellFolder_GetAttributesOf(This->pSFParent, 1, &pidl, &attribs);
893
894 if (SUCCEEDED(hr) && ! (attribs & SFGAO_FOLDER))
895 {
896 SHELLEXECUTEINFOA shexinfo;
897
898 shexinfo.cbSize = sizeof(SHELLEXECUTEINFOA);
899 shexinfo.fMask = SEE_MASK_INVOKEIDLIST; /* SEE_MASK_IDLIST is also possible. */
900 shexinfo.hwnd = NULL;
901 shexinfo.lpVerb = NULL;
902 shexinfo.lpFile = NULL;
903 shexinfo.lpParameters = NULL;
904 shexinfo.lpDirectory = NULL;
905 shexinfo.nShow = SW_NORMAL;
906 shexinfo.lpIDList = ILCombine(parent_pidl, pidl);
907
908 ShellExecuteExA(&shexinfo); /* Discard error/success info */
909
910 ILFree((LPITEMIDLIST)shexinfo.lpIDList);
911 }
912 }
913
914 GlobalUnlock(stgm.u.hGlobal);
915 ReleaseStgMedium(&stgm);
916
917 IDataObject_Release(selection);
918
919 return S_OK;
920 }
921
922 /**********************************************************
923 * ShellView_DoContextMenu()
924 */
925 static void ShellView_DoContextMenu(IShellViewImpl * This, WORD x, WORD y, BOOL bDefault)
926 { UINT uCommand;
927 DWORD wFlags;
928 HMENU hMenu;
929 BOOL fExplore = FALSE;
930 HWND hwndTree = 0;
931 LPCONTEXTMENU pContextMenu = NULL;
932 IContextMenu2 *pCM = NULL;
933 CMINVOKECOMMANDINFO cmi;
934
935 TRACE("(%p)->(0x%08x 0x%08x 0x%08x) stub\n",This, x, y, bDefault);
936
937 /* look, what's selected and create a context menu object of it*/
938 if( ShellView_GetSelections(This) )
939 {
940 IShellFolder_GetUIObjectOf( This->pSFParent, This->hWndParent, This->cidl, (LPCITEMIDLIST*)This->apidl,
941 (REFIID)&IID_IContextMenu, NULL, (LPVOID *)&pContextMenu);
942
943 if(pContextMenu)
944 {
945 TRACE("-- pContextMenu\n");
946 hMenu = CreatePopupMenu();
947
948 if( hMenu )
949 {
950 /* See if we are in Explore or Open mode. If the browser's tree is present, we are in Explore mode.*/
951 if(SUCCEEDED(IShellBrowser_GetControlWindow(This->pShellBrowser,FCW_TREE, &hwndTree)) && hwndTree)
952 {
953 TRACE("-- explore mode\n");
954 fExplore = TRUE;
955 }
956
957 /* build the flags depending on what we can do with the selected item */
958 wFlags = CMF_NORMAL | (This->cidl != 1 ? 0 : CMF_CANRENAME) | (fExplore ? CMF_EXPLORE : 0);
959
960 /* let the ContextMenu merge its items in */
961 if (SUCCEEDED(IContextMenu_QueryContextMenu( pContextMenu, hMenu, 0, FCIDM_SHVIEWFIRST, FCIDM_SHVIEWLAST, wFlags )))
962 {
963 if (This->FolderSettings.fFlags & FWF_DESKTOP)
964 SetMenuDefaultItem(hMenu, FCIDM_SHVIEW_OPEN, MF_BYCOMMAND);
965
966 if( bDefault )
967 {
968 TRACE("-- get menu default command\n");
969 uCommand = GetMenuDefaultItem(hMenu, FALSE, GMDI_GOINTOPOPUPS);
970 }
971 else
972 {
973 TRACE("-- track popup\n");
974 uCommand = TrackPopupMenu( hMenu,TPM_LEFTALIGN | TPM_RETURNCMD,x,y,0,This->hWnd,NULL);
975 }
976
977 if(uCommand > 0)
978 {
979 TRACE("-- uCommand=%u\n", uCommand);
980 if (uCommand==FCIDM_SHVIEW_OPEN && IsInCommDlg(This))
981 {
982 TRACE("-- dlg: OnDefaultCommand\n");
983 if (OnDefaultCommand(This) != S_OK)
984 {
985 ShellView_OpenSelectedItems(This);
986 }
987 }
988 else
989 {
990 TRACE("-- explore -- invoke command\n");
991 ZeroMemory(&cmi, sizeof(cmi));
992 cmi.cbSize = sizeof(cmi);
993 cmi.hwnd = This->hWndParent; /* this window has to answer CWM_GETISHELLBROWSER */
994 cmi.lpVerb = (LPCSTR)MAKEINTRESOURCEA(uCommand);
995 IContextMenu_InvokeCommand(pContextMenu, &cmi);
996 }
997 }
998 DestroyMenu(hMenu);
999 }
1000 }
1001 if (pContextMenu)
1002 IContextMenu_Release(pContextMenu);
1003 }
1004 }
1005 else /* background context menu */
1006 {
1007 hMenu = CreatePopupMenu();
1008
1009 pCM = ISvBgCm_Constructor(This->pSFParent, FALSE);
1010 IContextMenu2_QueryContextMenu(pCM, hMenu, 0, FCIDM_SHVIEWFIRST, FCIDM_SHVIEWLAST, 0);
1011
1012 uCommand = TrackPopupMenu( hMenu, TPM_LEFTALIGN | TPM_RETURNCMD,x,y,0,This->hWnd,NULL);
1013 DestroyMenu(hMenu);
1014
1015 TRACE("-- (%p)->(uCommand=0x%08x )\n",This, uCommand);
1016
1017 ZeroMemory(&cmi, sizeof(cmi));
1018 cmi.cbSize = sizeof(cmi);
1019 cmi.lpVerb = (LPCSTR)MAKEINTRESOURCEA(uCommand);
1020 cmi.hwnd = This->hWndParent;
1021 IContextMenu2_InvokeCommand(pCM, &cmi);
1022
1023 IContextMenu2_Release(pCM);
1024 }
1025 }
1026
1027 /**********************************************************
1028 * ##### message handling #####
1029 */
1030
1031 /**********************************************************
1032 * ShellView_OnSize()
1033 */
1034 static LRESULT ShellView_OnSize(IShellViewImpl * This, WORD wWidth, WORD wHeight)
1035 {
1036 TRACE("%p width=%u height=%u\n",This, wWidth,wHeight);
1037
1038 /*resize the ListView to fit our window*/
1039 if(This->hWndList)
1040 {
1041 MoveWindow(This->hWndList, 0, 0, wWidth, wHeight, TRUE);
1042 }
1043
1044 return S_OK;
1045 }
1046 /**********************************************************
1047 * ShellView_OnDeactivate()
1048 *
1049 * NOTES
1050 * internal
1051 */
1052 static void ShellView_OnDeactivate(IShellViewImpl * This)
1053 {
1054 TRACE("%p\n",This);
1055
1056 if(This->uState != SVUIA_DEACTIVATE)
1057 {
1058 if(This->hMenu)
1059 {
1060 IShellBrowser_SetMenuSB(This->pShellBrowser,0, 0, 0);
1061 IShellBrowser_RemoveMenusSB(This->pShellBrowser,This->hMenu);
1062 DestroyMenu(This->hMenu);
1063 This->hMenu = 0;
1064 }
1065
1066 This->uState = SVUIA_DEACTIVATE;
1067 }
1068 }
1069
1070 /**********************************************************
1071 * ShellView_OnActivate()
1072 */
1073 static LRESULT ShellView_OnActivate(IShellViewImpl * This, UINT uState)
1074 { OLEMENUGROUPWIDTHS omw = { {0, 0, 0, 0, 0, 0} };
1075 MENUITEMINFOA mii;
1076 CHAR szText[MAX_PATH];
1077
1078 TRACE("%p uState=%x\n",This,uState);
1079
1080 /*don't do anything if the state isn't really changing */
1081 if(This->uState == uState)
1082 {
1083 return S_OK;
1084 }
1085
1086 ShellView_OnDeactivate(This);
1087
1088 /*only do This if we are active */
1089 if(uState != SVUIA_DEACTIVATE)
1090 {
1091 /*merge the menus */
1092 This->hMenu = CreateMenu();
1093
1094 if(This->hMenu)
1095 {
1096 IShellBrowser_InsertMenusSB(This->pShellBrowser, This->hMenu, &omw);
1097 TRACE("-- after fnInsertMenusSB\n");
1098
1099 /*build the top level menu get the menu item's text*/
1100 strcpy(szText,"dummy 31");
1101
1102 ZeroMemory(&mii, sizeof(mii));
1103 mii.cbSize = sizeof(mii);
1104 mii.fMask = MIIM_SUBMENU | MIIM_TYPE | MIIM_STATE;
1105 mii.fType = MFT_STRING;
1106 mii.fState = MFS_ENABLED;
1107 mii.dwTypeData = szText;
1108 mii.hSubMenu = ShellView_BuildFileMenu(This);
1109
1110 /*insert our menu into the menu bar*/
1111 if(mii.hSubMenu)
1112 {
1113 InsertMenuItemA(This->hMenu, FCIDM_MENU_HELP, FALSE, &mii);
1114 }
1115
1116 /*get the view menu so we can merge with it*/
1117 ZeroMemory(&mii, sizeof(mii));
1118 mii.cbSize = sizeof(mii);
1119 mii.fMask = MIIM_SUBMENU;
1120
1121 if(GetMenuItemInfoA(This->hMenu, FCIDM_MENU_VIEW, FALSE, &mii))
1122 {
1123 ShellView_MergeViewMenu(This, mii.hSubMenu);
1124 }
1125
1126 /*add the items that should only be added if we have the focus*/
1127 if(SVUIA_ACTIVATE_FOCUS == uState)
1128 {
1129 /*get the file menu so we can merge with it */
1130 ZeroMemory(&mii, sizeof(mii));
1131 mii.cbSize = sizeof(mii);
1132 mii.fMask = MIIM_SUBMENU;
1133
1134 if(GetMenuItemInfoA(This->hMenu, FCIDM_MENU_FILE, FALSE, &mii))
1135 {
1136 ShellView_MergeFileMenu(This, mii.hSubMenu);
1137 }
1138 }
1139 TRACE("-- before fnSetMenuSB\n");
1140 IShellBrowser_SetMenuSB(This->pShellBrowser, This->hMenu, 0, This->hWnd);
1141 }
1142 }
1143 This->uState = uState;
1144 TRACE("--\n");
1145 return S_OK;
1146 }
1147
1148 /**********************************************************
1149 * ShellView_OnSetFocus()
1150 *
1151 */
1152 static LRESULT ShellView_OnSetFocus(IShellViewImpl * This)
1153 {
1154 TRACE("%p\n",This);
1155
1156 /* Tell the browser one of our windows has received the focus. This
1157 should always be done before merging menus (OnActivate merges the
1158 menus) if one of our windows has the focus.*/
1159
1160 IShellBrowser_OnViewWindowActive(This->pShellBrowser,(IShellView*) This);
1161 ShellView_OnActivate(This, SVUIA_ACTIVATE_FOCUS);
1162
1163 /* Set the focus to the listview */
1164 SetFocus(This->hWndList);
1165
1166 /* Notify the ICommDlgBrowser interface */
1167 OnStateChange(This,CDBOSC_SETFOCUS);
1168
1169 return 0;
1170 }
1171
1172 /**********************************************************
1173 * ShellView_OnKillFocus()
1174 */
1175 static LRESULT ShellView_OnKillFocus(IShellViewImpl * This)
1176 {
1177 TRACE("(%p) stub\n",This);
1178
1179 ShellView_OnActivate(This, SVUIA_ACTIVATE_NOFOCUS);
1180 /* Notify the ICommDlgBrowser */
1181 OnStateChange(This,CDBOSC_KILLFOCUS);
1182
1183 return 0;
1184 }
1185
1186 /**********************************************************
1187 * ShellView_OnCommand()
1188 *
1189 * NOTES
1190 * the CmdID's are the ones from the context menu
1191 */
1192 static LRESULT ShellView_OnCommand(IShellViewImpl * This,DWORD dwCmdID, DWORD dwCmd, HWND hwndCmd)
1193 {
1194 TRACE("(%p)->(0x%08lx 0x%08lx %p) stub\n",This, dwCmdID, dwCmd, hwndCmd);
1195
1196 switch(dwCmdID)
1197 {
1198 case FCIDM_SHVIEW_SMALLICON:
1199 This->FolderSettings.ViewMode = FVM_SMALLICON;
1200 SetStyle (This, LVS_SMALLICON, LVS_TYPEMASK);
1201 CheckToolbar(This);
1202 break;
1203
1204 case FCIDM_SHVIEW_BIGICON:
1205 This->FolderSettings.ViewMode = FVM_ICON;
1206 SetStyle (This, LVS_ICON, LVS_TYPEMASK);
1207 CheckToolbar(This);
1208 break;
1209
1210 case FCIDM_SHVIEW_LISTVIEW:
1211 This->FolderSettings.ViewMode = FVM_LIST;
1212 SetStyle (This, LVS_LIST, LVS_TYPEMASK);
1213 CheckToolbar(This);
1214 break;
1215
1216 case FCIDM_SHVIEW_REPORTVIEW:
1217 This->FolderSettings.ViewMode = FVM_DETAILS;
1218 SetStyle (This, LVS_REPORT, LVS_TYPEMASK);
1219 CheckToolbar(This);
1220 break;
1221
1222 /* the menu-ID's for sorting are 0x30... see shrec.rc */
1223 case 0x30:
1224 case 0x31:
1225 case 0x32:
1226 case 0x33:
1227 This->ListViewSortInfo.nHeaderID = (LPARAM) (dwCmdID - 0x30);
1228 This->ListViewSortInfo.bIsAscending = TRUE;
1229 This->ListViewSortInfo.nLastHeaderID = This->ListViewSortInfo.nHeaderID;
1230 ListView_SortItems(This->hWndList, ShellView_ListViewCompareItems, (LPARAM) (&(This->ListViewSortInfo)));
1231 break;
1232
1233 default:
1234 TRACE("-- COMMAND 0x%04lx unhandled\n", dwCmdID);
1235 }
1236 return 0;
1237 }
1238
1239 /**********************************************************
1240 * ShellView_OnNotify()
1241 */
1242
1243 static LRESULT ShellView_OnNotify(IShellViewImpl * This, UINT CtlID, LPNMHDR lpnmh)
1244 { LPNMLISTVIEW lpnmlv = (LPNMLISTVIEW)lpnmh;
1245 NMLVDISPINFOA *lpdi = (NMLVDISPINFOA *)lpnmh;
1246 LPITEMIDLIST pidl;
1247
1248 TRACE("%p CtlID=%u lpnmh->code=%x\n",This,CtlID,lpnmh->code);
1249
1250 switch(lpnmh->code)
1251 {
1252 case NM_SETFOCUS:
1253 TRACE("-- NM_SETFOCUS %p\n",This);
1254 ShellView_OnSetFocus(This);
1255 break;
1256
1257 case NM_KILLFOCUS:
1258 TRACE("-- NM_KILLFOCUS %p\n",This);
1259 ShellView_OnDeactivate(This);
1260 /* Notify the ICommDlgBrowser interface */
1261 OnStateChange(This,CDBOSC_KILLFOCUS);
1262 break;
1263
1264 case NM_CUSTOMDRAW:
1265 TRACE("-- NM_CUSTOMDRAW %p\n",This);
1266 return CDRF_DODEFAULT;
1267
1268 case NM_RELEASEDCAPTURE:
1269 TRACE("-- NM_RELEASEDCAPTURE %p\n",This);
1270 break;
1271
1272 case NM_CLICK:
1273 TRACE("-- NM_CLICK %p\n",This);
1274 break;
1275
1276 case NM_RCLICK:
1277 TRACE("-- NM_RCLICK %p\n",This);
1278 break;
1279
1280 case NM_DBLCLK:
1281 TRACE("-- NM_DBLCLK %p\n",This);
1282 if (OnDefaultCommand(This) != S_OK) ShellView_OpenSelectedItems(This);
1283 break;
1284
1285 case NM_RETURN:
1286 TRACE("-- NM_DBLCLK %p\n",This);
1287 if (OnDefaultCommand(This) != S_OK) ShellView_OpenSelectedItems(This);
1288 break;
1289
1290 case HDN_ENDTRACKA:
1291 TRACE("-- HDN_ENDTRACKA %p\n",This);
1292 /*nColumn1 = ListView_GetColumnWidth(This->hWndList, 0);
1293 nColumn2 = ListView_GetColumnWidth(This->hWndList, 1);*/
1294 break;
1295
1296 case LVN_DELETEITEM:
1297 TRACE("-- LVN_DELETEITEM %p\n",This);
1298 SHFree((LPITEMIDLIST)lpnmlv->lParam); /*delete the pidl because we made a copy of it*/
1299 break;
1300
1301 case LVN_DELETEALLITEMS:
1302 TRACE("-- LVN_DELETEALLITEMS %p\n",This);
1303 return FALSE;
1304
1305 case LVN_INSERTITEM:
1306 TRACE("-- LVN_INSERTITEM (STUB)%p\n",This);
1307 break;
1308
1309 case LVN_ITEMACTIVATE:
1310 TRACE("-- LVN_ITEMACTIVATE %p\n",This);
1311 OnStateChange(This, CDBOSC_SELCHANGE); /* the browser will get the IDataObject now */
1312 break;
1313
1314 case LVN_COLUMNCLICK:
1315 This->ListViewSortInfo.nHeaderID = lpnmlv->iSubItem;
1316 if(This->ListViewSortInfo.nLastHeaderID == This->ListViewSortInfo.nHeaderID)
1317 {
1318 This->ListViewSortInfo.bIsAscending = !This->ListViewSortInfo.bIsAscending;
1319 }
1320 else
1321 {
1322 This->ListViewSortInfo.bIsAscending = TRUE;
1323 }
1324 This->ListViewSortInfo.nLastHeaderID = This->ListViewSortInfo.nHeaderID;
1325
1326 ListView_SortItems(lpnmlv->hdr.hwndFrom, ShellView_ListViewCompareItems, (LPARAM) (&(This->ListViewSortInfo)));
1327 break;
1328
1329 case LVN_GETDISPINFOA:
1330 case LVN_GETDISPINFOW:
1331 TRACE("-- LVN_GETDISPINFO %p\n",This);
1332 pidl = (LPITEMIDLIST)lpdi->item.lParam;
1333
1334 if(lpdi->item.mask & LVIF_TEXT) /* text requested */
1335 {
1336 if (This->pSF2Parent)
1337 {
1338 SHELLDETAILS sd;
1339 IShellFolder2_GetDetailsOf(This->pSF2Parent, pidl, lpdi->item.iSubItem, &sd);
1340 if (lpnmh->code == LVN_GETDISPINFOA)
1341 {
1342 StrRetToStrNA( lpdi->item.pszText, lpdi->item.cchTextMax, &sd.str, NULL);
1343 TRACE("-- text=%s\n",lpdi->item.pszText);
1344 }
1345 else /* LVN_GETDISPINFOW */
1346 {
1347 StrRetToStrNW( ((NMLVDISPINFOW *)lpdi)->item.pszText, lpdi->item.cchTextMax, &sd.str, NULL);
1348 TRACE("-- text=%s\n",debugstr_w((WCHAR*)(lpdi->item.pszText)));
1349 }
1350 }
1351 else
1352 {
1353 FIXME("no SF2\n");
1354 }
1355 }
1356 if(lpdi->item.mask & LVIF_IMAGE) /* image requested */
1357 {
1358 lpdi->item.iImage = SHMapPIDLToSystemImageListIndex(This->pSFParent, pidl, 0);
1359 }
1360 break;
1361
1362 case LVN_ITEMCHANGED:
1363 TRACE("-- LVN_ITEMCHANGED %p\n",This);
1364 OnStateChange(This, CDBOSC_SELCHANGE); /* the browser will get the IDataObject now */
1365 break;
1366
1367 case LVN_BEGINDRAG:
1368 case LVN_BEGINRDRAG:
1369 TRACE("-- LVN_BEGINDRAG\n");
1370
1371 if (ShellView_GetSelections(This))
1372 {
1373 IDataObject * pda;
1374 DWORD dwAttributes = SFGAO_CANLINK;
1375 DWORD dwEffect = DROPEFFECT_COPY | DROPEFFECT_MOVE;
1376
1377 if (SUCCEEDED(IShellFolder_GetUIObjectOf(This->pSFParent, This->hWnd, This->cidl, (LPCITEMIDLIST*)This->apidl, &IID_IDataObject,0,(LPVOID *)&pda)))
1378 {
1379 IDropSource * pds = (IDropSource*)&(This->lpvtblDropSource); /* own DropSource interface */
1380
1381 if (SUCCEEDED(IShellFolder_GetAttributesOf(This->pSFParent, This->cidl, (LPCITEMIDLIST*)This->apidl, &dwAttributes)))
1382 {
1383 if (dwAttributes & SFGAO_CANLINK)
1384 {
1385 dwEffect |= DROPEFFECT_LINK;
1386 }
1387 }
1388
1389 if (pds)
1390 {
1391 DWORD dwEffect;
1392 DoDragDrop(pda, pds, dwEffect, &dwEffect);
1393 }
1394 IDataObject_Release(pda);
1395 }
1396 }
1397 break;
1398
1399 case LVN_BEGINLABELEDITA:
1400 {
1401 DWORD dwAttr = SFGAO_CANRENAME;
1402 pidl = (LPITEMIDLIST)lpdi->item.lParam;
1403
1404 TRACE("-- LVN_BEGINLABELEDITA %p\n",This);
1405
1406 IShellFolder_GetAttributesOf(This->pSFParent, 1, (LPCITEMIDLIST*)&pidl, &dwAttr);
1407 if (SFGAO_CANRENAME & dwAttr)
1408 {
1409 return FALSE;
1410 }
1411 return TRUE;
1412 }
1413
1414 case LVN_ENDLABELEDITA:
1415 {
1416 TRACE("-- LVN_ENDLABELEDITA %p\n",This);
1417 if (lpdi->item.pszText)
1418 {
1419 HRESULT hr;
1420 WCHAR wszNewName[MAX_PATH];
1421 LVITEMA lvItem;
1422
1423 ZeroMemory(&lvItem, sizeof(LVITEMA));
1424 lvItem.iItem = lpdi->item.iItem;
1425 lvItem.mask = LVIF_PARAM;
1426 ListView_GetItemA(This->hWndList, &lvItem);
1427
1428 pidl = (LPITEMIDLIST)lpdi->item.lParam;
1429 if (!MultiByteToWideChar( CP_ACP, 0, lpdi->item.pszText, -1, wszNewName, MAX_PATH ))
1430 wszNewName[MAX_PATH-1] = 0;
1431 hr = IShellFolder_SetNameOf(This->pSFParent, 0, pidl, wszNewName, SHGDN_INFOLDER, &pidl);
1432
1433 if(SUCCEEDED(hr) && pidl)
1434 {
1435 lvItem.mask = LVIF_PARAM;
1436 lvItem.lParam = (LPARAM)pidl;
1437 ListView_SetItemA(This->hWndList, &lvItem);
1438 return TRUE;
1439 }
1440 }
1441 return FALSE;
1442 }
1443
1444 case LVN_KEYDOWN:
1445 {
1446 /* MSG msg;
1447 msg.hwnd = This->hWnd;
1448 msg.message = WM_KEYDOWN;
1449 msg.wParam = plvKeyDown->wVKey;
1450 msg.lParam = 0;
1451 msg.time = 0;
1452 msg.pt = 0;*/
1453
1454 LPNMLVKEYDOWN plvKeyDown = (LPNMLVKEYDOWN) lpnmh;
1455
1456 /* initiate a rename of the selected file or directory */
1457 if(plvKeyDown->wVKey == VK_F2)
1458 {
1459 /* see how many files are selected */
1460 int i = ListView_GetSelectedCount(This->hWndList);
1461
1462 /* get selected item */
1463 if(i == 1)
1464 {
1465 /* get selected item */
1466 i = ListView_GetNextItem(This->hWndList, -1,
1467 LVNI_SELECTED);
1468
1469 ListView_EnsureVisible(This->hWndList, i, 0);
1470 ListView_EditLabelA(This->hWndList, i);
1471 }
1472 }
1473 #if 0
1474 TranslateAccelerator(This->hWnd, This->hAccel, &msg)
1475 #endif
1476 else if(plvKeyDown->wVKey == VK_DELETE)
1477 {
1478 UINT i;
1479 int item_index;
1480 LVITEMA item;
1481 LPITEMIDLIST* pItems;
1482 ISFHelper *psfhlp;
1483
1484 IShellFolder_QueryInterface(This->pSFParent, &IID_ISFHelper,
1485 (LPVOID*)&psfhlp);
1486
1487 if (psfhlp == NULL)
1488 break;
1489
1490 if(!(i = ListView_GetSelectedCount(This->hWndList)))
1491 break;
1492
1493 /* allocate memory for the pidl array */
1494 pItems = HeapAlloc(GetProcessHeap(), 0,
1495 sizeof(LPITEMIDLIST) * i);
1496
1497 /* retrieve all selected items */
1498 i = 0;
1499 item_index = -1;
1500 while(ListView_GetSelectedCount(This->hWndList) > i)
1501 {
1502 /* get selected item */
1503 item_index = ListView_GetNextItem(This->hWndList,
1504 item_index, LVNI_SELECTED);
1505 item.iItem = item_index;
1506 item.mask |= LVIF_PARAM;
1507 ListView_GetItemA(This->hWndList, &item);
1508
1509 /* get item pidl */
1510 pItems[i] = (LPITEMIDLIST)item.lParam;
1511
1512 i++;
1513 }
1514
1515 /* perform the item deletion */
1516 ISFHelper_DeleteItems(psfhlp, i, (LPCITEMIDLIST*)pItems);
1517
1518 /* free pidl array memory */
1519 HeapFree(GetProcessHeap(), 0, pItems);
1520 }
1521
1522 /* Initiate a refresh */
1523 else if(plvKeyDown->wVKey == VK_F5)
1524 {
1525 IShellView_Refresh((IShellView*)This);
1526 }
1527
1528 else
1529 FIXME("LVN_KEYDOWN key=0x%08x\n",plvKeyDown->wVKey);
1530 }
1531 break;
1532
1533 default:
1534 TRACE("-- %p WM_COMMAND %x unhandled\n", This, lpnmh->code);
1535 break;
1536 }
1537 return 0;
1538 }
1539
1540 /**********************************************************
1541 * ShellView_OnChange()
1542 */
1543
1544 static LRESULT ShellView_OnChange(IShellViewImpl * This, LPITEMIDLIST * Pidls, LONG wEventId)
1545 {
1546
1547 TRACE("(%p)(%p,%p,0x%08lx)\n", This, Pidls[0], Pidls[1], wEventId);
1548 switch(wEventId)
1549 {
1550 case SHCNE_MKDIR:
1551 case SHCNE_CREATE:
1552 LV_AddItem(This, Pidls[0]);
1553 break;
1554 case SHCNE_RMDIR:
1555 case SHCNE_DELETE:
1556 LV_DeleteItem(This, Pidls[0]);
1557 break;
1558 case SHCNE_RENAMEFOLDER:
1559 case SHCNE_RENAMEITEM:
1560 LV_RenameItem(This, Pidls[0], Pidls[1]);
1561 break;
1562 case SHCNE_UPDATEITEM:
1563 break;
1564 }
1565 return TRUE;
1566 }
1567 /**********************************************************
1568 * ShellView_WndProc
1569 */
1570
1571 static LRESULT CALLBACK ShellView_WndProc(HWND hWnd, UINT uMessage, WPARAM wParam, LPARAM lParam)
1572 {
1573 IShellViewImpl * pThis = (IShellViewImpl*)GetWindowLongPtrW(hWnd, GWLP_USERDATA);
1574 LPCREATESTRUCTA lpcs;
1575
1576 TRACE("(hwnd=%p msg=%x wparm=%x lparm=%lx)\n",hWnd, uMessage, wParam, lParam);
1577
1578 switch (uMessage)
1579 {
1580 case WM_NCCREATE:
1581 lpcs = (LPCREATESTRUCTA)lParam;
1582 pThis = (IShellViewImpl*)(lpcs->lpCreateParams);
1583 SetWindowLongPtrW(hWnd, GWLP_USERDATA, (ULONG_PTR)pThis);
1584 pThis->hWnd = hWnd; /*set the window handle*/
1585 break;
1586
1587 case WM_SIZE: return ShellView_OnSize(pThis,LOWORD(lParam), HIWORD(lParam));
1588 case WM_SETFOCUS: return ShellView_OnSetFocus(pThis);
1589 case WM_KILLFOCUS: return ShellView_OnKillFocus(pThis);
1590 case WM_CREATE: return ShellView_OnCreate(pThis);
1591 case WM_ACTIVATE: return ShellView_OnActivate(pThis, SVUIA_ACTIVATE_FOCUS);
1592 case WM_NOTIFY: return ShellView_OnNotify(pThis,(UINT)wParam, (LPNMHDR)lParam);
1593 case WM_COMMAND: return ShellView_OnCommand(pThis,
1594 GET_WM_COMMAND_ID(wParam, lParam),
1595 GET_WM_COMMAND_CMD(wParam, lParam),
1596 GET_WM_COMMAND_HWND(wParam, lParam));
1597 case SHV_CHANGE_NOTIFY: return ShellView_OnChange(pThis, (LPITEMIDLIST*)wParam, (LONG)lParam);
1598
1599 case WM_CONTEXTMENU: ShellView_DoContextMenu(pThis, LOWORD(lParam), HIWORD(lParam), FALSE);
1600 return 0;
1601
1602 case WM_SHOWWINDOW: UpdateWindow(pThis->hWndList);
1603 break;
1604
1605 case WM_GETDLGCODE: return SendMessageA(pThis->hWndList,uMessage,0,0);
1606
1607 case WM_DESTROY:
1608 RevokeDragDrop(pThis->hWnd);
1609 SHChangeNotifyDeregister(pThis->hNotify);
1610 break;
1611
1612 case WM_ERASEBKGND:
1613 if ((pThis->FolderSettings.fFlags & FWF_DESKTOP) ||
1614 (pThis->FolderSettings.fFlags & FWF_TRANSPARENT))
1615 return 1;
1616 break;
1617 }
1618
1619 return DefWindowProcA (hWnd, uMessage, wParam, lParam);
1620 }
1621 /**********************************************************
1622 *
1623 *
1624 * The INTERFACE of the IShellView object
1625 *
1626 *
1627 **********************************************************
1628 * IShellView_QueryInterface
1629 */
1630 static HRESULT WINAPI IShellView_fnQueryInterface(IShellView * iface,REFIID riid, LPVOID *ppvObj)
1631 {
1632 IShellViewImpl *This = (IShellViewImpl *)iface;
1633
1634 TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj);
1635
1636 *ppvObj = NULL;
1637
1638 if(IsEqualIID(riid, &IID_IUnknown))
1639 {
1640 *ppvObj = This;
1641 }
1642 else if(IsEqualIID(riid, &IID_IShellView))
1643 {
1644 *ppvObj = (IShellView*)This;
1645 }
1646 else if(IsEqualIID(riid, &IID_IOleCommandTarget))
1647 {
1648 *ppvObj = (IOleCommandTarget*)&(This->lpvtblOleCommandTarget);
1649 }
1650 else if(IsEqualIID(riid, &IID_IDropTarget))
1651 {
1652 *ppvObj = (IDropTarget*)&(This->lpvtblDropTarget);
1653 }
1654 else if(IsEqualIID(riid, &IID_IDropSource))
1655 {
1656 *ppvObj = (IDropSource*)&(This->lpvtblDropSource);
1657 }
1658 else if(IsEqualIID(riid, &IID_IViewObject))
1659 {
1660 *ppvObj = (IViewObject*)&(This->lpvtblViewObject);
1661 }
1662
1663 if(*ppvObj)
1664 {
1665 IUnknown_AddRef( (IUnknown*)*ppvObj );
1666 TRACE("-- Interface: (%p)->(%p)\n",ppvObj,*ppvObj);
1667 return S_OK;
1668 }
1669 TRACE("-- Interface: E_NOINTERFACE\n");
1670 return E_NOINTERFACE;
1671 }
1672
1673 /**********************************************************
1674 * IShellView_AddRef
1675 */
1676 static ULONG WINAPI IShellView_fnAddRef(IShellView * iface)
1677 {
1678 IShellViewImpl *This = (IShellViewImpl *)iface;
1679 ULONG refCount = InterlockedIncrement(&This->ref);
1680
1681 TRACE("(%p)->(count=%lu)\n", This, refCount - 1);
1682
1683 return refCount;
1684 }
1685 /**********************************************************
1686 * IShellView_Release
1687 */
1688 static ULONG WINAPI IShellView_fnRelease(IShellView * iface)
1689 {
1690 IShellViewImpl *This = (IShellViewImpl *)iface;
1691 ULONG refCount = InterlockedDecrement(&This->ref);
1692
1693 TRACE("(%p)->(count=%li)\n", This, refCount + 1);
1694
1695 if (!refCount)
1696 {
1697 TRACE(" destroying IShellView(%p)\n",This);
1698
1699 DestroyWindow(This->hWndList);
1700
1701 if(This->pSFParent)
1702 IShellFolder_Release(This->pSFParent);
1703
1704 if(This->pSF2Parent)
1705 IShellFolder2_Release(This->pSF2Parent);
1706
1707 if(This->apidl)
1708 SHFree(This->apidl);
1709
1710 if(This->pAdvSink)
1711 IAdviseSink_Release(This->pAdvSink);
1712
1713 HeapFree(GetProcessHeap(),0,This);
1714 }
1715 return refCount;
1716 }
1717
1718 /**********************************************************
1719 * ShellView_GetWindow
1720 */
1721 static HRESULT WINAPI IShellView_fnGetWindow(IShellView * iface,HWND * phWnd)
1722 {
1723 IShellViewImpl *This = (IShellViewImpl *)iface;
1724
1725 TRACE("(%p)\n",This);
1726
1727 *phWnd = This->hWnd;
1728
1729 return S_OK;
1730 }
1731
1732 static HRESULT WINAPI IShellView_fnContextSensitiveHelp(IShellView * iface,BOOL fEnterMode)
1733 {
1734 IShellViewImpl *This = (IShellViewImpl *)iface;
1735
1736 FIXME("(%p) stub\n",This);
1737
1738 return E_NOTIMPL;
1739 }
1740
1741 /**********************************************************
1742 * IShellView_TranslateAccelerator
1743 *
1744 * FIXME:
1745 * use the accel functions
1746 */
1747 static HRESULT WINAPI IShellView_fnTranslateAccelerator(IShellView * iface,LPMSG lpmsg)
1748 {
1749 #if 0
1750 IShellViewImpl *This = (IShellViewImpl *)iface;
1751
1752 FIXME("(%p)->(%p: hwnd=%x msg=%x lp=%lx wp=%x) stub\n",This,lpmsg, lpmsg->hwnd, lpmsg->message, lpmsg->lParam, lpmsg->wParam);
1753 #endif
1754
1755 if ((lpmsg->message>=WM_KEYFIRST) && (lpmsg->message>=WM_KEYLAST))
1756 {
1757 TRACE("-- key=0x04%x\n",lpmsg->wParam) ;
1758 }
1759 return S_FALSE; /* not handled */
1760 }
1761
1762 static HRESULT WINAPI IShellView_fnEnableModeless(IShellView * iface,BOOL fEnable)
1763 {
1764 IShellViewImpl *This = (IShellViewImpl *)iface;
1765
1766 FIXME("(%p) stub\n",This);
1767
1768 return E_NOTIMPL;
1769 }
1770
1771 static HRESULT WINAPI IShellView_fnUIActivate(IShellView * iface,UINT uState)
1772 {
1773 IShellViewImpl *This = (IShellViewImpl *)iface;
1774
1775 /*
1776 CHAR szName[MAX_PATH];
1777 */
1778 LRESULT lResult;
1779 int nPartArray[1] = {-1};
1780
1781 TRACE("(%p)->(state=%x) stub\n",This, uState);
1782
1783 /*don't do anything if the state isn't really changing*/
1784 if(This->uState == uState)
1785 {
1786 return S_OK;
1787 }
1788
1789 /*OnActivate handles the menu merging and internal state*/
1790 ShellView_OnActivate(This, uState);
1791
1792 /*only do This if we are active*/
1793 if(uState != SVUIA_DEACTIVATE)
1794 {
1795
1796 /*
1797 GetFolderPath is not a method of IShellFolder
1798 IShellFolder_GetFolderPath( This->pSFParent, szName, sizeof(szName) );
1799 */
1800 /* set the number of parts */
1801 IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_STATUS, SB_SETPARTS, 1,
1802 (LPARAM)nPartArray, &lResult);
1803
1804 /* set the text for the parts */
1805 /*
1806 IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_STATUS, SB_SETTEXTA,
1807 0, (LPARAM)szName, &lResult);
1808 */
1809 }
1810
1811 return S_OK;
1812 }
1813
1814 static HRESULT WINAPI IShellView_fnRefresh(IShellView * iface)
1815 {
1816 IShellViewImpl *This = (IShellViewImpl *)iface;
1817
1818 TRACE("(%p)\n",This);
1819
1820 ListView_DeleteAllItems(This->hWndList);
1821 ShellView_FillList(This);
1822
1823 return S_OK;
1824 }
1825
1826 static HRESULT WINAPI IShellView_fnCreateViewWindow(
1827 IShellView * iface,
1828 IShellView *lpPrevView,
1829 LPCFOLDERSETTINGS lpfs,
1830 IShellBrowser * psb,
1831 RECT * prcView,
1832 HWND *phWnd)
1833 {
1834 IShellViewImpl *This = (IShellViewImpl *)iface;
1835
1836 WNDCLASSA wc;
1837 *phWnd = 0;
1838
1839
1840 TRACE("(%p)->(shlview=%p set=%p shlbrs=%p rec=%p hwnd=%p) incomplete\n",This, lpPrevView,lpfs, psb, prcView, phWnd);
1841 TRACE("-- vmode=%x flags=%x left=%li top=%li right=%li bottom=%li\n",lpfs->ViewMode, lpfs->fFlags ,prcView->left,prcView->top, prcView->right, prcView->bottom);
1842
1843 /*set up the member variables*/
1844 This->pShellBrowser = psb;
1845 This->FolderSettings = *lpfs;
1846
1847 /*get our parent window*/
1848 IShellBrowser_AddRef(This->pShellBrowser);
1849 IShellBrowser_GetWindow(This->pShellBrowser, &(This->hWndParent));
1850
1851 /* try to get the ICommDlgBrowserInterface, adds a reference !!! */
1852 This->pCommDlgBrowser=NULL;
1853 if ( SUCCEEDED (IShellBrowser_QueryInterface( This->pShellBrowser,
1854 (REFIID)&IID_ICommDlgBrowser, (LPVOID*) &This->pCommDlgBrowser)))
1855 {
1856 TRACE("-- CommDlgBrowser\n");
1857 }
1858
1859 /*if our window class has not been registered, then do so*/
1860 if(!GetClassInfoA(shell32_hInstance, SV_CLASS_NAME, &wc))
1861 {
1862 ZeroMemory(&wc, sizeof(wc));
1863 wc.style = CS_HREDRAW | CS_VREDRAW;
1864 wc.lpfnWndProc = ShellView_WndProc;
1865 wc.cbClsExtra = 0;
1866 wc.cbWndExtra = 0;
1867 wc.hInstance = shell32_hInstance;
1868 wc.hIcon = 0;
1869 wc.hCursor = LoadCursorA (0, (LPSTR)IDC_ARROW);
1870 wc.hbrBackground = (HBRUSH) (COLOR_WINDOW + 1);
1871 wc.lpszMenuName = NULL;
1872 wc.lpszClassName = SV_CLASS_NAME;
1873
1874 if(!RegisterClassA(&wc))
1875 return E_FAIL;
1876 }
1877
1878 *phWnd = CreateWindowExA(0,
1879 SV_CLASS_NAME,
1880 NULL,
1881 WS_CHILD | WS_TABSTOP,
1882 prcView->left,
1883 prcView->top,
1884 prcView->right - prcView->left,
1885 prcView->bottom - prcView->top,
1886 This->hWndParent,
1887 0,
1888 shell32_hInstance,
1889 (LPVOID)This);
1890
1891 CheckToolbar(This);
1892
1893 if(!*phWnd) return E_FAIL;
1894
1895 SetWindowPos(*phWnd, HWND_TOP, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE | SWP_SHOWWINDOW);
1896 UpdateWindow(*phWnd);
1897
1898 return S_OK;
1899 }
1900
1901 static HRESULT WINAPI IShellView_fnDestroyViewWindow(IShellView * iface)
1902 {
1903 IShellViewImpl *This = (IShellViewImpl *)iface;
1904
1905 TRACE("(%p)\n",This);
1906
1907 /*Make absolutely sure all our UI is cleaned up.*/
1908 IShellView_UIActivate((IShellView*)This, SVUIA_DEACTIVATE);
1909
1910 if(This->hMenu)
1911 {
1912 DestroyMenu(This->hMenu);
1913 }
1914
1915 DestroyWindow(This->hWnd);
1916 if(This->pShellBrowser) IShellBrowser_Release(This->pShellBrowser);
1917 if(This->pCommDlgBrowser) ICommDlgBrowser_Release(This->pCommDlgBrowser);
1918
1919
1920 return S_OK;
1921 }
1922
1923 static HRESULT WINAPI IShellView_fnGetCurrentInfo(IShellView * iface, LPFOLDERSETTINGS lpfs)
1924 {
1925 IShellViewImpl *This = (IShellViewImpl *)iface;
1926
1927 TRACE("(%p)->(%p) vmode=%x flags=%x\n",This, lpfs,
1928 This->FolderSettings.ViewMode, This->FolderSettings.fFlags);
1929
1930 if (!lpfs) return E_INVALIDARG;
1931
1932 *lpfs = This->FolderSettings;
1933 return NOERROR;
1934 }
1935
1936 static HRESULT WINAPI IShellView_fnAddPropertySheetPages(IShellView * iface, DWORD dwReserved,LPFNADDPROPSHEETPAGE lpfn, LPARAM lparam)
1937 {
1938 IShellViewImpl *This = (IShellViewImpl *)iface;
1939
1940 FIXME("(%p) stub\n",This);
1941
1942 return E_NOTIMPL;
1943 }
1944
1945 static HRESULT WINAPI IShellView_fnSaveViewState(IShellView * iface)
1946 {
1947 IShellViewImpl *This = (IShellViewImpl *)iface;
1948
1949 FIXME("(%p) stub\n",This);
1950
1951 return S_OK;
1952 }
1953
1954 static HRESULT WINAPI IShellView_fnSelectItem(
1955 IShellView * iface,
1956 LPCITEMIDLIST pidl,
1957 UINT uFlags)
1958 {
1959 IShellViewImpl *This = (IShellViewImpl *)iface;
1960 int i;
1961
1962 TRACE("(%p)->(pidl=%p, 0x%08x) stub\n",This, pidl, uFlags);
1963
1964 i = LV_FindItemByPidl(This, pidl);
1965
1966 if (i != -1)
1967 {
1968 LVITEMA lvItem;
1969
1970 if(uFlags & SVSI_ENSUREVISIBLE)
1971 ListView_EnsureVisible(This->hWndList, i, 0);
1972
1973 ZeroMemory(&lvItem, sizeof(LVITEMA));
1974 lvItem.mask = LVIF_STATE;
1975 lvItem.iItem = 0;
1976
1977 while(ListView_GetItemA(This->hWndList, &lvItem))
1978 {
1979 if (lvItem.iItem == i)
1980 {
1981 if (uFlags & SVSI_SELECT)
1982 lvItem.state |= LVIS_SELECTED;
1983 else
1984 lvItem.state &= ~LVIS_SELECTED;
1985
1986 if(uFlags & SVSI_FOCUSED)
1987 lvItem.state &= ~LVIS_FOCUSED;
1988 }
1989 else
1990 {
1991 if (uFlags & SVSI_DESELECTOTHERS)
1992 lvItem.state &= ~LVIS_SELECTED;
1993 }
1994 ListView_SetItemA(This->hWndList, &lvItem);
1995 lvItem.iItem++;
1996 }
1997
1998
1999 if(uFlags & SVSI_EDIT)
2000 ListView_EditLabelA(This->hWndList, i);
2001
2002 }
2003 return S_OK;
2004 }
2005
2006 static HRESULT WINAPI IShellView_fnGetItemObject(IShellView * iface, UINT uItem, REFIID riid, LPVOID *ppvOut)
2007 {
2008 IShellViewImpl *This = (IShellViewImpl *)iface;
2009
2010 TRACE("(%p)->(uItem=0x%08x,\n\tIID=%s, ppv=%p)\n",This, uItem, debugstr_guid(riid), ppvOut);
2011
2012 *ppvOut = NULL;
2013
2014 switch(uItem)
2015 {
2016 case SVGIO_BACKGROUND:
2017 *ppvOut = ISvBgCm_Constructor(This->pSFParent, FALSE);
2018 break;
2019
2020 case SVGIO_SELECTION:
2021 ShellView_GetSelections(This);
2022 IShellFolder_GetUIObjectOf(This->pSFParent, This->hWnd, This->cidl, (LPCITEMIDLIST*)This->apidl, riid, 0, ppvOut);
2023 break;
2024 }
2025 TRACE("-- (%p)->(interface=%p)\n",This, *ppvOut);
2026
2027 if(!*ppvOut) return E_OUTOFMEMORY;
2028
2029 return S_OK;
2030 }
2031
2032 static const IShellViewVtbl svvt =
2033 {
2034 IShellView_fnQueryInterface,
2035 IShellView_fnAddRef,
2036 IShellView_fnRelease,
2037 IShellView_fnGetWindow,
2038 IShellView_fnContextSensitiveHelp,
2039 IShellView_fnTranslateAccelerator,
2040 IShellView_fnEnableModeless,
2041 IShellView_fnUIActivate,
2042 IShellView_fnRefresh,
2043 IShellView_fnCreateViewWindow,
2044 IShellView_fnDestroyViewWindow,
2045 IShellView_fnGetCurrentInfo,
2046 IShellView_fnAddPropertySheetPages,
2047 IShellView_fnSaveViewState,
2048 IShellView_fnSelectItem,
2049 IShellView_fnGetItemObject
2050 };
2051
2052
2053 /**********************************************************
2054 * ISVOleCmdTarget_QueryInterface (IUnknown)
2055 */
2056 static HRESULT WINAPI ISVOleCmdTarget_QueryInterface(
2057 IOleCommandTarget * iface,
2058 REFIID iid,
2059 LPVOID* ppvObj)
2060 {
2061 IShellViewImpl *This = impl_from_IOleCommandTarget(iface);
2062
2063 return IShellFolder_QueryInterface((IShellFolder*)This, iid, ppvObj);
2064 }
2065
2066 /**********************************************************
2067 * ISVOleCmdTarget_AddRef (IUnknown)
2068 */
2069 static ULONG WINAPI ISVOleCmdTarget_AddRef(
2070 IOleCommandTarget * iface)
2071 {
2072 IShellViewImpl *This = impl_from_IOleCommandTarget(iface);
2073
2074 return IShellFolder_AddRef((IShellFolder*)This);
2075 }
2076
2077 /**********************************************************
2078 * ISVOleCmdTarget_Release (IUnknown)
2079 */
2080 static ULONG WINAPI ISVOleCmdTarget_Release(
2081 IOleCommandTarget * iface)
2082 {
2083 IShellViewImpl *This = impl_from_IOleCommandTarget(iface);
2084
2085 return IShellFolder_Release((IShellFolder*)This);
2086 }
2087
2088 /**********************************************************
2089 * ISVOleCmdTarget_QueryStatus (IOleCommandTarget)
2090 */
2091 static HRESULT WINAPI ISVOleCmdTarget_QueryStatus(
2092 IOleCommandTarget *iface,
2093 const GUID* pguidCmdGroup,
2094 ULONG cCmds,
2095 OLECMD * prgCmds,
2096 OLECMDTEXT* pCmdText)
2097 {
2098 UINT i;
2099 IShellViewImpl *This = impl_from_IOleCommandTarget(iface);
2100
2101 FIXME("(%p)->(%p(%s) 0x%08lx %p %p\n",
2102 This, pguidCmdGroup, debugstr_guid(pguidCmdGroup), cCmds, prgCmds, pCmdText);
2103
2104 if (!prgCmds)
2105 return E_POINTER;
2106 for (i = 0; i < cCmds; i++)
2107 {
2108 FIXME("\tprgCmds[%d].cmdID = %ld\n", i, prgCmds[i].cmdID);
2109 prgCmds[i].cmdf = 0;
2110 }
2111 return OLECMDERR_E_UNKNOWNGROUP;
2112 }
2113
2114 /**********************************************************
2115 * ISVOleCmdTarget_Exec (IOleCommandTarget)
2116 *
2117 * nCmdID is the OLECMDID_* enumeration
2118 */
2119 static HRESULT WINAPI ISVOleCmdTarget_Exec(
2120 IOleCommandTarget *iface,
2121 const GUID* pguidCmdGroup,
2122 DWORD nCmdID,
2123 DWORD nCmdexecopt,
2124 VARIANT* pvaIn,
2125 VARIANT* pvaOut)
2126 {
2127 IShellViewImpl *This = impl_from_IOleCommandTarget(iface);
2128
2129 FIXME("(%p)->(\n\tTarget GUID:%s Command:0x%08lx Opt:0x%08lx %p %p)\n",
2130 This, debugstr_guid(pguidCmdGroup), nCmdID, nCmdexecopt, pvaIn, pvaOut);
2131
2132 if (IsEqualIID(pguidCmdGroup, &CGID_Explorer) &&
2133 (nCmdID == 0x29) &&
2134 (nCmdexecopt == 4) && pvaOut)
2135 return S_OK;
2136 if (IsEqualIID(pguidCmdGroup, &CGID_ShellDocView) &&
2137 (nCmdID == 9) &&
2138 (nCmdexecopt == 0))
2139 return 1;
2140
2141 return OLECMDERR_E_UNKNOWNGROUP;
2142 }
2143
2144 static const IOleCommandTargetVtbl ctvt =
2145 {
2146 ISVOleCmdTarget_QueryInterface,
2147 ISVOleCmdTarget_AddRef,
2148 ISVOleCmdTarget_Release,
2149 ISVOleCmdTarget_QueryStatus,
2150 ISVOleCmdTarget_Exec
2151 };
2152
2153 /**********************************************************
2154 * ISVDropTarget implementation
2155 */
2156
2157 static HRESULT WINAPI ISVDropTarget_QueryInterface(
2158 IDropTarget *iface,
2159 REFIID riid,
2160 LPVOID *ppvObj)
2161 {
2162 IShellViewImpl *This = impl_from_IDropTarget(iface);
2163
2164 TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj);
2165
2166 return IShellFolder_QueryInterface((IShellFolder*)This, riid, ppvObj);
2167 }
2168
2169 static ULONG WINAPI ISVDropTarget_AddRef( IDropTarget *iface)
2170 {
2171 IShellViewImpl *This = impl_from_IDropTarget(iface);
2172
2173 TRACE("(%p)->(count=%lu)\n",This,This->ref);
2174
2175 return IShellFolder_AddRef((IShellFolder*)This);
2176 }
2177
2178 static ULONG WINAPI ISVDropTarget_Release( IDropTarget *iface)
2179 {
2180 IShellViewImpl *This = impl_from_IDropTarget(iface);
2181
2182 TRACE("(%p)->(count=%lu)\n",This,This->ref);
2183
2184 return IShellFolder_Release((IShellFolder*)This);
2185 }
2186
2187 /******************************************************************************
2188 * drag_notify_subitem [Internal]
2189 *
2190 * Figure out the shellfolder object, which is currently under the mouse cursor
2191 * and notify it via the IDropTarget interface.
2192 */
2193
2194 #define SCROLLAREAWIDTH 20
2195
2196 static HRESULT drag_notify_subitem(IShellViewImpl *This, DWORD grfKeyState, POINTL pt,
2197 DWORD *pdwEffect)
2198 {
2199 LVHITTESTINFO htinfo;
2200 LVITEMA lvItem;
2201 LONG lResult;
2202 HRESULT hr;
2203 RECT clientRect;
2204
2205 /* Map from global to client coordinates and query the index of the listview-item, which is
2206 * currently under the mouse cursor. */
2207 htinfo.pt.x = pt.x;
2208 htinfo.pt.y = pt.y;
2209 htinfo.flags = LVHT_ONITEM;
2210 ScreenToClient(This->hWndList, &htinfo.pt);
2211 lResult = SendMessageW(This->hWndList, LVM_HITTEST, 0, (LPARAM)&htinfo);
2212
2213 /* Send WM_*SCROLL messages every 250 ms during drag-scrolling */
2214 GetClientRect(This->hWndList, &clientRect);
2215 if (htinfo.pt.x == This->ptLastMousePos.x && htinfo.pt.y == This->ptLastMousePos.y &&
2216 (htinfo.pt.x < SCROLLAREAWIDTH || htinfo.pt.x > clientRect.right - SCROLLAREAWIDTH ||
2217 htinfo.pt.y < SCROLLAREAWIDTH || htinfo.pt.y > clientRect.bottom - SCROLLAREAWIDTH ))
2218 {
2219 This->cScrollDelay = (This->cScrollDelay + 1) % 5; /* DragOver is called every 50 ms */
2220 if (This->cScrollDelay == 0) { /* Mouse did hover another 250 ms over the scroll-area */
2221 if (htinfo.pt.x < SCROLLAREAWIDTH)
2222 SendMessageW(This->hWndList, WM_HSCROLL, SB_LINEUP, 0);
2223 if (htinfo.pt.x > clientRect.right - SCROLLAREAWIDTH)
2224 SendMessageW(This->hWndList, WM_HSCROLL, SB_LINEDOWN, 0);
2225 if (htinfo.pt.y < SCROLLAREAWIDTH)
2226 SendMessageW(This->hWndList, WM_VSCROLL, SB_LINEUP, 0);
2227 if (htinfo.pt.y > clientRect.bottom - SCROLLAREAWIDTH)
2228 SendMessageW(This->hWndList, WM_VSCROLL, SB_LINEDOWN, 0);
2229 }
2230 } else {
2231 This->cScrollDelay = 0; /* Reset, if the cursor is not over the listview's scroll-area */
2232 }
2233 This->ptLastMousePos = htinfo.pt;
2234
2235 /* If we are still over the previous sub-item, notify it via DragOver and return. */
2236 if (This->pCurDropTarget && lResult == This->iDragOverItem)
2237 return IDropTarget_DragOver(This->pCurDropTarget, grfKeyState, pt, pdwEffect);
2238
2239 /* We've left the previous sub-item, notify it via DragLeave and Release it. */
2240 if (This->pCurDropTarget) {
2241 IDropTarget_DragLeave(This->pCurDropTarget);
2242 IDropTarget_Release(This->pCurDropTarget);
2243 This->pCurDropTarget = NULL;
2244 }
2245
2246 This->iDragOverItem = lResult;
2247 if (lResult == -1) {
2248 /* We are not above one of the listview's subitems. Bind to the parent folder's
2249 * DropTarget interface. */
2250 hr = IShellFolder_QueryInterface(This->pSFParent, &IID_IDropTarget,
2251 (LPVOID*)&This->pCurDropTarget);
2252 } else {
2253 /* Query the relative PIDL of the shellfolder object represented by the currently
2254 * dragged over listview-item ... */
2255 ZeroMemory(&lvItem, sizeof(lvItem));
2256 lvItem.mask = LVIF_PARAM;
2257 lvItem.iItem = lResult;
2258 ListView_GetItemA(This->hWndList, &lvItem);
2259
2260 /* ... and bind pCurDropTarget to the IDropTarget interface of an UIObject of this object */
2261 hr = IShellFolder_GetUIObjectOf(This->pSFParent, This->hWndList, 1,
2262 (LPCITEMIDLIST*)&lvItem.lParam, &IID_IDropTarget, NULL, (LPVOID*)&This->pCurDropTarget);
2263 }
2264
2265 /* If anything failed, pCurDropTarget should be NULL now, which ought to be a save state. */
2266 if (FAILED(hr))
2267 return hr;
2268
2269 /* Notify the item just entered via DragEnter. */
2270 return IDropTarget_DragEnter(This->pCurDropTarget, This->pCurDataObject, grfKeyState, pt, pdwEffect);
2271 }
2272
2273 static HRESULT WINAPI ISVDropTarget_DragEnter(IDropTarget *iface, IDataObject *pDataObject,
2274 DWORD grfKeyState, POINTL pt, DWORD *pdwEffect)
2275 {
2276 IShellViewImpl *This = impl_from_IDropTarget(iface);
2277
2278 /* Get a hold on the data object for later calls to DragEnter on the sub-folders */
2279 This->pCurDataObject = pDataObject;
2280 IDataObject_AddRef(pDataObject);
2281
2282 return drag_notify_subitem(This, grfKeyState, pt, pdwEffect);
2283 }
2284
2285 static HRESULT WINAPI ISVDropTarget_DragOver(IDropTarget *iface, DWORD grfKeyState, POINTL pt,
2286 DWORD *pdwEffect)
2287 {
2288 IShellViewImpl *This = impl_from_IDropTarget(iface);
2289 return drag_notify_subitem(This, grfKeyState, pt, pdwEffect);
2290 }
2291
2292 static HRESULT WINAPI ISVDropTarget_DragLeave(IDropTarget *iface) {
2293 IShellViewImpl *This = impl_from_IDropTarget(iface);
2294
2295 IDropTarget_DragLeave(This->pCurDropTarget);
2296
2297 IDropTarget_Release(This->pCurDropTarget);
2298 IDataObject_Release(This->pCurDataObject);
2299 This->pCurDataObject = NULL;
2300 This->pCurDropTarget = NULL;
2301 This->iDragOverItem = 0;
2302
2303 return S_OK;
2304 }
2305
2306 static HRESULT WINAPI ISVDropTarget_Drop(IDropTarget *iface, IDataObject* pDataObject,
2307 DWORD grfKeyState, POINTL pt, DWORD *pdwEffect)
2308 {
2309 IShellViewImpl *This = impl_from_IDropTarget(iface);
2310
2311 IDropTarget_Drop(This->pCurDropTarget, pDataObject, grfKeyState, pt, pdwEffect);
2312
2313 IDropTarget_Release(This->pCurDropTarget);
2314 IDataObject_Release(This->pCurDataObject);
2315 This->pCurDataObject = NULL;
2316 This->pCurDropTarget = NULL;
2317 This->iDragOverItem = 0;
2318
2319 return S_OK;
2320 }
2321
2322 static const IDropTargetVtbl dtvt =
2323 {
2324 ISVDropTarget_QueryInterface,
2325 ISVDropTarget_AddRef,
2326 ISVDropTarget_Release,
2327 ISVDropTarget_DragEnter,
2328 ISVDropTarget_DragOver,
2329 ISVDropTarget_DragLeave,
2330 ISVDropTarget_Drop
2331 };
2332
2333 /**********************************************************
2334 * ISVDropSource implementation
2335 */
2336
2337 static HRESULT WINAPI ISVDropSource_QueryInterface(
2338 IDropSource *iface,
2339 REFIID riid,
2340 LPVOID *ppvObj)
2341 {
2342 IShellViewImpl *This = impl_from_IDropSource(iface);
2343
2344 TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj);
2345
2346 return IShellFolder_QueryInterface((IShellFolder*)This, riid, ppvObj);
2347 }
2348
2349 static ULONG WINAPI ISVDropSource_AddRef( IDropSource *iface)
2350 {
2351 IShellViewImpl *This = impl_from_IDropSource(iface);
2352
2353 TRACE("(%p)->(count=%lu)\n",This,This->ref);
2354
2355 return IShellFolder_AddRef((IShellFolder*)This);
2356 }
2357
2358 static ULONG WINAPI ISVDropSource_Release( IDropSource *iface)
2359 {
2360 IShellViewImpl *This = impl_from_IDropSource(iface);
2361
2362 TRACE("(%p)->(count=%lu)\n",This,This->ref);
2363
2364 return IShellFolder_Release((IShellFolder*)This);
2365 }
2366 static HRESULT WINAPI ISVDropSource_QueryContinueDrag(
2367 IDropSource *iface,
2368 BOOL fEscapePressed,
2369 DWORD grfKeyState)
2370 {
2371 IShellViewImpl *This = impl_from_IDropSource(iface);
2372 TRACE("(%p)\n",This);
2373
2374 if (fEscapePressed)
2375 return DRAGDROP_S_CANCEL;
2376 else if (!(grfKeyState & MK_LBUTTON) && !(grfKeyState & MK_RBUTTON))
2377 return DRAGDROP_S_DROP;
2378 else
2379 return NOERROR;
2380 }
2381
2382 static HRESULT WINAPI ISVDropSource_GiveFeedback(
2383 IDropSource *iface,
2384 DWORD dwEffect)
2385 {
2386 IShellViewImpl *This = impl_from_IDropSource(iface);
2387 TRACE("(%p)\n",This);
2388
2389 return DRAGDROP_S_USEDEFAULTCURSORS;
2390 }
2391
2392 static const IDropSourceVtbl dsvt =
2393 {
2394 ISVDropSource_QueryInterface,
2395 ISVDropSource_AddRef,
2396 ISVDropSource_Release,
2397 ISVDropSource_QueryContinueDrag,
2398 ISVDropSource_GiveFeedback
2399 };
2400 /**********************************************************
2401 * ISVViewObject implementation
2402 */
2403
2404 static HRESULT WINAPI ISVViewObject_QueryInterface(
2405 IViewObject *iface,
2406 REFIID riid,
2407 LPVOID *ppvObj)
2408 {
2409 IShellViewImpl *This = impl_from_IViewObject(iface);
2410
2411 TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This,debugstr_guid(riid),ppvObj);
2412
2413 return IShellFolder_QueryInterface((IShellFolder*)This, riid, ppvObj);
2414 }
2415
2416 static ULONG WINAPI ISVViewObject_AddRef( IViewObject *iface)
2417 {
2418 IShellViewImpl *This = impl_from_IViewObject(iface);
2419
2420 TRACE("(%p)->(count=%lu)\n",This,This->ref);
2421
2422 return IShellFolder_AddRef((IShellFolder*)This);
2423 }
2424
2425 static ULONG WINAPI ISVViewObject_Release( IViewObject *iface)
2426 {
2427 IShellViewImpl *This = impl_from_IViewObject(iface);
2428
2429 TRACE("(%p)->(count=%lu)\n",This,This->ref);
2430
2431 return IShellFolder_Release((IShellFolder*)This);
2432 }
2433
2434 static HRESULT WINAPI ISVViewObject_Draw(
2435 IViewObject *iface,
2436 DWORD dwDrawAspect,
2437 LONG lindex,
2438 void* pvAspect,
2439 DVTARGETDEVICE* ptd,
2440 HDC hdcTargetDev,
2441 HDC hdcDraw,
2442 LPCRECTL lprcBounds,
2443 LPCRECTL lprcWBounds,
2444 BOOL (CALLBACK *pfnContinue)(ULONG_PTR dwContinue),
2445 ULONG_PTR dwContinue)
2446 {
2447
2448 IShellViewImpl *This = impl_from_IViewObject(iface);
2449
2450 FIXME("Stub: This=%p\n",This);
2451
2452 return E_NOTIMPL;
2453 }
2454 static HRESULT WINAPI ISVViewObject_GetColorSet(
2455 IViewObject *iface,
2456 DWORD dwDrawAspect,
2457 LONG lindex,
2458 void *pvAspect,
2459 DVTARGETDEVICE* ptd,
2460 HDC hicTargetDevice,
2461 LOGPALETTE** ppColorSet)
2462 {
2463
2464 IShellViewImpl *This = impl_from_IViewObject(iface);
2465
2466 FIXME("Stub: This=%p\n",This);
2467
2468 return E_NOTIMPL;
2469 }
2470 static HRESULT WINAPI ISVViewObject_Freeze(
2471 IViewObject *iface,
2472 DWORD dwDrawAspect,
2473 LONG lindex,
2474 void* pvAspect,
2475 DWORD* pdwFreeze)
2476 {
2477
2478 IShellViewImpl *This = impl_from_IViewObject(iface);
2479
2480 FIXME("Stub: This=%p\n",This);
2481
2482 return E_NOTIMPL;
2483 }
2484 static HRESULT WINAPI ISVViewObject_Unfreeze(
2485 IViewObject *iface,
2486 DWORD dwFreeze)
2487 {
2488
2489 IShellViewImpl *This = impl_from_IViewObject(iface);
2490
2491 FIXME("Stub: This=%p\n",This);
2492
2493 return E_NOTIMPL;
2494 }
2495 static HRESULT WINAPI ISVViewObject_SetAdvise(
2496 IViewObject *iface,
2497 DWORD aspects,
2498 DWORD advf,
2499 IAdviseSink* pAdvSink)
2500 {
2501
2502 IShellViewImpl *This = impl_from_IViewObject(iface);
2503
2504 FIXME("partial stub: %p %08lx %08lx %p\n",
2505 This, aspects, advf, pAdvSink);
2506
2507 /* FIXME: we set the AdviseSink, but never use it to send any advice */
2508 This->pAdvSink = pAdvSink;
2509 This->dwAspects = aspects;
2510 This->dwAdvf = advf;
2511
2512 return S_OK;
2513 }
2514
2515 static HRESULT WINAPI ISVViewObject_GetAdvise(
2516 IViewObject *iface,
2517 DWORD* pAspects,
2518 DWORD* pAdvf,
2519 IAdviseSink** ppAdvSink)
2520 {
2521
2522 IShellViewImpl *This = impl_from_IViewObject(iface);
2523
2524 TRACE("This=%p pAspects=%p pAdvf=%p ppAdvSink=%p\n",
2525 This, pAspects, pAdvf, ppAdvSink);
2526
2527 if( ppAdvSink )
2528 {
2529 IAdviseSink_AddRef( This->pAdvSink );
2530 *ppAdvSink = This->pAdvSink;
2531 }
2532 if( pAspects )
2533 *pAspects = This->dwAspects;
2534 if( pAdvf )
2535 *pAdvf = This->dwAdvf;
2536
2537 return S_OK;
2538 }
2539
2540
2541 static const IViewObjectVtbl vovt =
2542 {
2543 ISVViewObject_QueryInterface,
2544 ISVViewObject_AddRef,
2545 ISVViewObject_Release,
2546 ISVViewObject_Draw,
2547 ISVViewObject_GetColorSet,
2548 ISVViewObject_Freeze,
2549 ISVViewObject_Unfreeze,
2550 ISVViewObject_SetAdvise,
2551 ISVViewObject_GetAdvise
2552 };