4 * Copyright 1998,1999 <juergen.schmied@debitel.net>
6 * This is the view visualizing the data provided by the shellfolder.
7 * No direct access to data from pidls should be done from here.
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.
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.
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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
23 * FIXME: The order by part of the background context menu should be
24 * built according to the columns shown.
26 * FIXME: Load/Save the view state from/into the stream provided by
29 * FIXME: CheckToolbar: handle the "new folder" and "folder up" button
31 * FIXME: ShellView_FillList: consider sort orders
33 * FIXME: implement the drag and drop in the old (msg-based) way
35 * FIXME: when the ShellView_WndProc gets a WM_NCDESTROY should we do a
40 #include "wine/port.h"
47 #define NONAMELESSUNION
48 #define NONAMELESSSTRUCT
61 #include "undocshell.h"
63 #include "wine/debug.h"
67 #include "shell32_main.h"
68 #include "shellfolder.h"
70 WINE_DEFAULT_DEBUG_CHANNEL(shell
);
72 static const WCHAR SV_CLASS_NAME
[] = {'S','H','E','L','L','D','L','L','_','D','e','f','V','i','e','w',0};
78 }LISTVIEW_SORT_INFO
, *LPLISTVIEW_SORT_INFO
;
82 IShellView2 IShellView2_iface
;
83 IOleCommandTarget IOleCommandTarget_iface
;
84 IDropTarget IDropTarget_iface
;
85 IDropSource IDropSource_iface
;
86 IViewObject IViewObject_iface
;
87 IFolderView IFolderView_iface
;
88 IShellFolderView IShellFolderView_iface
;
90 IShellFolder
* pSFParent
;
91 IShellFolder2
* pSF2Parent
;
92 IShellBrowser
* pShellBrowser
;
93 ICommDlgBrowser
* pCommDlgBrowser
;
94 HWND hWnd
; /* SHELLDLL_DefView */
95 HWND hWndList
; /* ListView control */
97 FOLDERSETTINGS FolderSettings
;
102 LISTVIEW_SORT_INFO ListViewSortInfo
;
103 ULONG hNotify
; /* change notification handle */
107 IAdviseSink
*pAdvSink
;
108 IDropTarget
* pCurDropTarget
; /* The sub-item, which is currently dragged over */
109 IDataObject
* pCurDataObject
; /* The dragged data-object */
110 LONG iDragOverItem
; /* Dragged over item's index, iff pCurDropTarget != NULL */
111 UINT cScrollDelay
; /* Send a WM_*SCROLL msg every 250 ms during drag-scroll */
112 POINT ptLastMousePos
; /* Mouse position at last DragOver call */
115 static const IShellView2Vtbl svvt
;
116 static const IOleCommandTargetVtbl ctvt
;
117 static const IDropTargetVtbl dtvt
;
118 static const IDropSourceVtbl dsvt
;
119 static const IViewObjectVtbl vovt
;
120 static const IFolderViewVtbl fviewvt
;
121 static const IShellFolderViewVtbl shellfolderviewvt
;
123 static inline IShellViewImpl
*impl_from_IShellView2(IShellView2
*iface
)
125 return CONTAINING_RECORD(iface
, IShellViewImpl
, IShellView2_iface
);
128 static inline IShellViewImpl
*impl_from_IOleCommandTarget(IOleCommandTarget
*iface
)
130 return CONTAINING_RECORD(iface
, IShellViewImpl
, IOleCommandTarget_iface
);
133 static inline IShellViewImpl
*impl_from_IDropTarget(IDropTarget
*iface
)
135 return CONTAINING_RECORD(iface
, IShellViewImpl
, IDropTarget_iface
);
138 static inline IShellViewImpl
*impl_from_IDropSource(IDropSource
*iface
)
140 return CONTAINING_RECORD(iface
, IShellViewImpl
, IDropSource_iface
);
143 static inline IShellViewImpl
*impl_from_IViewObject(IViewObject
*iface
)
145 return CONTAINING_RECORD(iface
, IShellViewImpl
, IViewObject_iface
);
148 static inline IShellViewImpl
*impl_from_IFolderView(IFolderView
*iface
)
150 return CONTAINING_RECORD(iface
, IShellViewImpl
, IFolderView_iface
);
153 static inline IShellViewImpl
*impl_from_IShellFolderView(IShellFolderView
*iface
)
155 return CONTAINING_RECORD(iface
, IShellViewImpl
, IShellFolderView_iface
);
158 /* ListView Header IDs */
159 #define LISTVIEW_COLUMN_NAME 0
160 #define LISTVIEW_COLUMN_SIZE 1
161 #define LISTVIEW_COLUMN_TYPE 2
162 #define LISTVIEW_COLUMN_TIME 3
163 #define LISTVIEW_COLUMN_ATTRIB 4
166 #define IDM_VIEW_FILES (FCIDM_SHVIEWFIRST + 0x500)
167 #define IDM_VIEW_IDW (FCIDM_SHVIEWFIRST + 0x501)
168 #define IDM_MYFILEITEM (FCIDM_SHVIEWFIRST + 0x502)
170 #define ID_LISTVIEW 1
172 #define SHV_CHANGE_NOTIFY WM_USER + 0x1111
175 #define GET_WM_COMMAND_ID(wp, lp) LOWORD(wp)
176 #define GET_WM_COMMAND_HWND(wp, lp) (HWND)(lp)
177 #define GET_WM_COMMAND_CMD(wp, lp) HIWORD(wp)
180 Items merged into the toolbar and the filemenu
189 } MYTOOLINFO
, *LPMYTOOLINFO
;
191 static const MYTOOLINFO Tools
[] =
193 { FCIDM_SHVIEW_BIGICON
, 0, 0, IDS_VIEW_LARGE
, TBSTATE_ENABLED
, BTNS_BUTTON
},
194 { FCIDM_SHVIEW_SMALLICON
, 0, 0, IDS_VIEW_SMALL
, TBSTATE_ENABLED
, BTNS_BUTTON
},
195 { FCIDM_SHVIEW_LISTVIEW
, 0, 0, IDS_VIEW_LIST
, TBSTATE_ENABLED
, BTNS_BUTTON
},
196 { FCIDM_SHVIEW_REPORTVIEW
, 0, 0, IDS_VIEW_DETAILS
, TBSTATE_ENABLED
, BTNS_BUTTON
},
200 typedef void (CALLBACK
*PFNSHGETSETTINGSPROC
)(LPSHELLFLAGSTATE lpsfs
, DWORD dwMask
);
202 /**********************************************************
203 * IShellView_Constructor
205 IShellView
* IShellView_Constructor( IShellFolder
* pFolder
)
206 { IShellViewImpl
* sv
;
207 sv
=HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(IShellViewImpl
));
209 sv
->IShellView2_iface
.lpVtbl
= &svvt
;
210 sv
->IOleCommandTarget_iface
.lpVtbl
= &ctvt
;
211 sv
->IDropTarget_iface
.lpVtbl
= &dtvt
;
212 sv
->IDropSource_iface
.lpVtbl
= &dsvt
;
213 sv
->IViewObject_iface
.lpVtbl
= &vovt
;
214 sv
->IFolderView_iface
.lpVtbl
= &fviewvt
;
215 sv
->IShellFolderView_iface
.lpVtbl
= &shellfolderviewvt
;
217 sv
->pSFParent
= pFolder
;
218 if(pFolder
) IShellFolder_AddRef(pFolder
);
219 IShellFolder_QueryInterface(sv
->pSFParent
, &IID_IShellFolder2
, (LPVOID
*)&sv
->pSF2Parent
);
221 sv
->pCurDropTarget
= NULL
;
222 sv
->pCurDataObject
= NULL
;
223 sv
->iDragOverItem
= 0;
224 sv
->cScrollDelay
= 0;
225 sv
->ptLastMousePos
.x
= 0;
226 sv
->ptLastMousePos
.y
= 0;
228 TRACE("(%p)->(%p)\n",sv
, pFolder
);
229 return (IShellView
*) sv
;
232 /**********************************************************
234 * ##### helperfunctions for communication with ICommDlgBrowser #####
236 static BOOL
IsInCommDlg(IShellViewImpl
* This
)
237 { return(This
->pCommDlgBrowser
!= NULL
);
240 static HRESULT
IncludeObject(IShellViewImpl
* This
, LPCITEMIDLIST pidl
)
244 if ( IsInCommDlg(This
) )
246 TRACE("ICommDlgBrowser::IncludeObject pidl=%p\n", pidl
);
247 ret
= ICommDlgBrowser_IncludeObject(This
->pCommDlgBrowser
, (IShellView
*)This
, pidl
);
248 TRACE("--0x%08x\n", ret
);
253 static HRESULT
OnDefaultCommand(IShellViewImpl
* This
)
255 HRESULT ret
= S_FALSE
;
257 if (IsInCommDlg(This
))
259 TRACE("ICommDlgBrowser::OnDefaultCommand\n");
260 ret
= ICommDlgBrowser_OnDefaultCommand(This
->pCommDlgBrowser
, (IShellView
*)This
);
261 TRACE("-- returns %08x\n", ret
);
266 static HRESULT
OnStateChange(IShellViewImpl
* This
, UINT uFlags
)
268 HRESULT ret
= S_FALSE
;
270 if (IsInCommDlg(This
))
272 TRACE("ICommDlgBrowser::OnStateChange flags=%x\n", uFlags
);
273 ret
= ICommDlgBrowser_OnStateChange(This
->pCommDlgBrowser
, (IShellView
*)This
, uFlags
);
278 /**********************************************************
279 * set the toolbar of the filedialog buttons
281 * - activates the buttons from the shellbrowser according to
284 static void CheckToolbar(IShellViewImpl
* This
)
290 if (IsInCommDlg(This
))
292 IShellBrowser_SendControlMsg(This
->pShellBrowser
, FCW_TOOLBAR
, TB_CHECKBUTTON
,
293 FCIDM_TB_SMALLICON
, (This
->FolderSettings
.ViewMode
==FVM_LIST
)? TRUE
: FALSE
, &result
);
294 IShellBrowser_SendControlMsg(This
->pShellBrowser
, FCW_TOOLBAR
, TB_CHECKBUTTON
,
295 FCIDM_TB_REPORTVIEW
, (This
->FolderSettings
.ViewMode
==FVM_DETAILS
)? TRUE
: FALSE
, &result
);
296 IShellBrowser_SendControlMsg(This
->pShellBrowser
, FCW_TOOLBAR
, TB_ENABLEBUTTON
,
297 FCIDM_TB_SMALLICON
, TRUE
, &result
);
298 IShellBrowser_SendControlMsg(This
->pShellBrowser
, FCW_TOOLBAR
, TB_ENABLEBUTTON
,
299 FCIDM_TB_REPORTVIEW
, TRUE
, &result
);
303 /**********************************************************
305 * ##### helperfunctions for initializing the view #####
307 /**********************************************************
308 * change the style of the listview control
310 static void SetStyle(IShellViewImpl
* This
, DWORD dwAdd
, DWORD dwRemove
)
314 TRACE("(%p)\n", This
);
316 tmpstyle
= GetWindowLongW(This
->hWndList
, GWL_STYLE
);
317 SetWindowLongW(This
->hWndList
, GWL_STYLE
, dwAdd
| (tmpstyle
& ~dwRemove
));
320 static DWORD
ViewModeToListStyle(UINT ViewMode
)
324 TRACE("%d\n", ViewMode
);
328 case FVM_ICON
: dwStyle
= LVS_ICON
; break;
329 case FVM_DETAILS
: dwStyle
= LVS_REPORT
; break;
330 case FVM_SMALLICON
: dwStyle
= LVS_SMALLICON
; break;
331 case FVM_LIST
: dwStyle
= LVS_LIST
; break;
334 FIXME("ViewMode %d not implemented\n", ViewMode
);
343 /**********************************************************
344 * ShellView_CreateList()
346 * - creates the list view window
348 static BOOL
ShellView_CreateList (IShellViewImpl
* This
)
349 { DWORD dwStyle
, dwExStyle
;
353 dwStyle
= WS_TABSTOP
| WS_VISIBLE
| WS_CHILDWINDOW
| WS_CLIPSIBLINGS
| WS_CLIPCHILDREN
|
354 LVS_SHAREIMAGELISTS
| LVS_EDITLABELS
| LVS_ALIGNLEFT
| LVS_AUTOARRANGE
;
355 dwExStyle
= WS_EX_CLIENTEDGE
;
357 dwStyle
|= ViewModeToListStyle(This
->FolderSettings
.ViewMode
);
359 if (This
->FolderSettings
.fFlags
& FWF_AUTOARRANGE
) dwStyle
|= LVS_AUTOARRANGE
;
360 if (This
->FolderSettings
.fFlags
& FWF_DESKTOP
)
361 This
->FolderSettings
.fFlags
|= FWF_NOCLIENTEDGE
| FWF_NOSCROLL
;
362 if (This
->FolderSettings
.fFlags
& FWF_SINGLESEL
) dwStyle
|= LVS_SINGLESEL
;
363 if (This
->FolderSettings
.fFlags
& FWF_NOCLIENTEDGE
)
364 dwExStyle
&= ~WS_EX_CLIENTEDGE
;
366 This
->hWndList
=CreateWindowExW( dwExStyle
,
379 This
->ListViewSortInfo
.bIsAscending
= TRUE
;
380 This
->ListViewSortInfo
.nHeaderID
= -1;
381 This
->ListViewSortInfo
.nLastHeaderID
= -1;
383 if (This
->FolderSettings
.fFlags
& FWF_DESKTOP
) {
385 * FIXME: look at the registry value
386 * HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ListviewShadow
387 * and activate drop shadows if necessary
390 SendMessageW(This
->hWndList
, LVM_SETTEXTBKCOLOR
, 0, CLR_NONE
);
392 SendMessageW(This
->hWndList
, LVM_SETTEXTBKCOLOR
, 0, GetSysColor(COLOR_DESKTOP
));
394 SendMessageW(This
->hWndList
, LVM_SETTEXTCOLOR
, 0, RGB(255,255,255));
397 /* UpdateShellSettings(); */
401 /**********************************************************
402 * ShellView_InitList()
404 * - adds all needed columns to the shellview
406 static void ShellView_InitList(IShellViewImpl
*This
)
408 IShellDetails
*details
= NULL
;
415 TRACE("(%p)\n", This
);
417 SendMessageW(This
->hWndList
, LVM_DELETEALLITEMS
, 0, 0);
418 SendMessageW(This
->hWndList
, LVM_SETIMAGELIST
, LVSIL_SMALL
, (LPARAM
)ShellSmallIconList
);
419 SendMessageW(This
->hWndList
, LVM_SETIMAGELIST
, LVSIL_NORMAL
, (LPARAM
)ShellBigIconList
);
421 lvColumn
.mask
= LVCF_FMT
| LVCF_WIDTH
| LVCF_TEXT
;
422 lvColumn
.pszText
= nameW
;
424 if (!This
->pSF2Parent
)
426 hr
= IShellFolder_QueryInterface(This
->pSFParent
, &IID_IShellDetails
, (void**)&details
);
429 WARN("IShellFolder2/IShellDetails not supported\n");
436 if (This
->pSF2Parent
)
437 hr
= IShellFolder2_GetDetailsOf(This
->pSF2Parent
, NULL
, i
, &sd
);
439 hr
= IShellDetails_GetDetailsOf(details
, NULL
, i
, &sd
);
440 if (FAILED(hr
)) break;
442 lvColumn
.fmt
= sd
.fmt
;
443 lvColumn
.cx
= sd
.cxChar
*8; /* chars->pixel */
444 StrRetToStrNW(nameW
, sizeof(nameW
)/sizeof(WCHAR
), &sd
.str
, NULL
);
445 SendMessageW(This
->hWndList
, LVM_INSERTCOLUMNW
, i
, (LPARAM
) &lvColumn
);
448 if (details
) IShellDetails_Release(details
);
451 /**********************************************************
452 * ShellView_CompareItems()
455 * internal, CALLBACK for DSA_Sort
457 static INT CALLBACK
ShellView_CompareItems(LPVOID lParam1
, LPVOID lParam2
, LPARAM lpData
)
460 TRACE("pidl1=%p pidl2=%p lpsf=%p\n", lParam1
, lParam2
, (LPVOID
) lpData
);
462 if(!lpData
) return 0;
464 ret
= (SHORT
) SCODE_CODE(IShellFolder_CompareIDs((LPSHELLFOLDER
)lpData
, 0, (LPITEMIDLIST
)lParam1
, (LPITEMIDLIST
)lParam2
));
465 TRACE("ret=%i\n",ret
);
469 /*************************************************************************
470 * ShellView_ListViewCompareItems
472 * Compare Function for the Listview (FileOpen Dialog)
475 * lParam1 [I] the first ItemIdList to compare with
476 * lParam2 [I] the second ItemIdList to compare with
477 * lpData [I] The column ID for the header Ctrl to process
480 * A negative value if the first item should precede the second,
481 * a positive value if the first item should follow the second,
482 * or zero if the two items are equivalent
485 * FIXME: function does what ShellView_CompareItems is supposed to do.
486 * unify it and figure out how to use the undocumented first parameter
487 * of IShellFolder_CompareIDs to do the job this function does and
488 * move this code to IShellFolder.
489 * make LISTVIEW_SORT_INFO obsolete
490 * the way this function works is only usable if we had only
491 * filesystemfolders (25/10/99 jsch)
493 static INT CALLBACK
ShellView_ListViewCompareItems(LPVOID lParam1
, LPVOID lParam2
, LPARAM lpData
)
497 char strName1
[MAX_PATH
], strName2
[MAX_PATH
];
498 BOOL bIsFolder1
, bIsFolder2
,bIsBothFolder
;
499 LPITEMIDLIST pItemIdList1
= lParam1
;
500 LPITEMIDLIST pItemIdList2
= lParam2
;
501 LISTVIEW_SORT_INFO
*pSortInfo
= (LPLISTVIEW_SORT_INFO
) lpData
;
504 bIsFolder1
= _ILIsFolder(pItemIdList1
);
505 bIsFolder2
= _ILIsFolder(pItemIdList2
);
506 bIsBothFolder
= bIsFolder1
&& bIsFolder2
;
508 /* When sorting between a File and a Folder, the Folder gets sorted first */
509 if( (bIsFolder1
|| bIsFolder2
) && !bIsBothFolder
)
511 nDiff
= bIsFolder1
? -1 : 1;
515 /* Sort by Time: Folders or Files can be sorted */
517 if(pSortInfo
->nHeaderID
== LISTVIEW_COLUMN_TIME
)
519 _ILGetFileDateTime(pItemIdList1
, &fd1
);
520 _ILGetFileDateTime(pItemIdList2
, &fd2
);
521 nDiff
= CompareFileTime(&fd2
, &fd1
);
523 /* Sort by Attribute: Folder or Files can be sorted */
524 else if(pSortInfo
->nHeaderID
== LISTVIEW_COLUMN_ATTRIB
)
526 _ILGetFileAttributes(pItemIdList1
, strName1
, MAX_PATH
);
527 _ILGetFileAttributes(pItemIdList2
, strName2
, MAX_PATH
);
528 nDiff
= lstrcmpiA(strName1
, strName2
);
530 /* Sort by FileName: Folder or Files can be sorted */
531 else if(pSortInfo
->nHeaderID
== LISTVIEW_COLUMN_NAME
|| bIsBothFolder
)
534 _ILSimpleGetText(pItemIdList1
, strName1
, MAX_PATH
);
535 _ILSimpleGetText(pItemIdList2
, strName2
, MAX_PATH
);
536 nDiff
= lstrcmpiA(strName1
, strName2
);
538 /* Sort by File Size, Only valid for Files */
539 else if(pSortInfo
->nHeaderID
== LISTVIEW_COLUMN_SIZE
)
541 nDiff
= (INT
)(_ILGetFileSize(pItemIdList1
, NULL
, 0) - _ILGetFileSize(pItemIdList2
, NULL
, 0));
543 /* Sort by File Type, Only valid for Files */
544 else if(pSortInfo
->nHeaderID
== LISTVIEW_COLUMN_TYPE
)
547 _ILGetFileType(pItemIdList1
, strName1
, MAX_PATH
);
548 _ILGetFileType(pItemIdList2
, strName2
, MAX_PATH
);
549 nDiff
= lstrcmpiA(strName1
, strName2
);
552 /* If the Date, FileSize, FileType, Attrib was the same, sort by FileName */
556 _ILSimpleGetText(pItemIdList1
, strName1
, MAX_PATH
);
557 _ILSimpleGetText(pItemIdList2
, strName2
, MAX_PATH
);
558 nDiff
= lstrcmpiA(strName1
, strName2
);
561 if(!pSortInfo
->bIsAscending
)
570 /**********************************************************
571 * LV_FindItemByPidl()
573 static int LV_FindItemByPidl(
574 IShellViewImpl
* This
,
579 lvItem
.mask
= LVIF_PARAM
;
580 for(lvItem
.iItem
= 0;
581 SendMessageW(This
->hWndList
, LVM_GETITEMW
, 0, (LPARAM
) &lvItem
);
584 LPITEMIDLIST currentpidl
= (LPITEMIDLIST
) lvItem
.lParam
;
585 HRESULT hr
= IShellFolder_CompareIDs(This
->pSFParent
, 0, pidl
, currentpidl
);
586 if(SUCCEEDED(hr
) && !HRESULT_CODE(hr
))
594 /**********************************************************
597 static BOOLEAN
LV_AddItem(IShellViewImpl
* This
, LPCITEMIDLIST pidl
)
601 TRACE("(%p)(pidl=%p)\n", This
, pidl
);
603 lvItem
.mask
= LVIF_TEXT
| LVIF_IMAGE
| LVIF_PARAM
; /*set the mask*/
604 lvItem
.iItem
= SendMessageW(This
->hWndList
, LVM_GETITEMCOUNT
, 0, 0); /*add the item to the end of the list*/
606 lvItem
.lParam
= (LPARAM
) ILClone(ILFindLastID(pidl
)); /*set the item's data*/
607 lvItem
.pszText
= LPSTR_TEXTCALLBACKW
; /*get text on a callback basis*/
608 lvItem
.iImage
= I_IMAGECALLBACK
; /*get the image on a callback basis*/
609 return (-1==ListView_InsertItemW(This
->hWndList
, &lvItem
))? FALSE
: TRUE
;
612 /**********************************************************
615 static BOOLEAN
LV_RenameItem(IShellViewImpl
* This
, LPCITEMIDLIST pidlOld
, LPCITEMIDLIST pidlNew
)
620 TRACE("(%p)(pidlold=%p pidlnew=%p)\n", This
, pidlOld
, pidlNew
);
622 nItem
= LV_FindItemByPidl(This
, ILFindLastID(pidlOld
));
625 lvItem
.mask
= LVIF_PARAM
; /* only the pidl */
626 lvItem
.iItem
= nItem
;
627 SendMessageW(This
->hWndList
, LVM_GETITEMW
, 0, (LPARAM
) &lvItem
);
629 SHFree((LPITEMIDLIST
)lvItem
.lParam
);
630 lvItem
.mask
= LVIF_PARAM
;
631 lvItem
.iItem
= nItem
;
632 lvItem
.lParam
= (LPARAM
) ILClone(ILFindLastID(pidlNew
)); /* set the item's data */
633 SendMessageW(This
->hWndList
, LVM_SETITEMW
, 0, (LPARAM
) &lvItem
);
634 SendMessageW(This
->hWndList
, LVM_UPDATE
, nItem
, 0);
635 return TRUE
; /* FIXME: better handling */
639 /**********************************************************
640 * ShellView_FillList()
642 * - gets the objectlist from the shellfolder
644 * - fills the list into the view
647 static INT CALLBACK
fill_list( LPVOID ptr
, LPVOID arg
)
649 LPITEMIDLIST pidl
= ptr
;
650 IShellViewImpl
*This
= arg
;
651 /* in a commdlg This works as a filemask*/
652 if ( IncludeObject(This
, pidl
)==S_OK
) LV_AddItem(This
, pidl
);
657 static HRESULT
ShellView_FillList(IShellViewImpl
*This
)
659 IShellFolderView
*folderview
= &This
->IShellFolderView_iface
;
660 LPENUMIDLIST pEnumIDList
;
666 TRACE("(%p)\n", This
);
668 /* get the itemlist from the shfolder*/
669 hr
= IShellFolder_EnumObjects(This
->pSFParent
, This
->hWnd
, SHCONTF_NONFOLDERS
| SHCONTF_FOLDERS
, &pEnumIDList
);
670 if (hr
!= S_OK
) return hr
;
672 /* create a pointer array */
673 hdpa
= DPA_Create(16);
676 IEnumIDList_Release(pEnumIDList
);
677 return E_OUTOFMEMORY
;
680 /* copy the items into the array*/
681 while((S_OK
== IEnumIDList_Next(pEnumIDList
, 1, &pidl
, &fetched
)) && fetched
)
683 if (DPA_InsertPtr(hdpa
, DPA_GetPtrCount(hdpa
), pidl
) == -1)
690 DPA_Sort(hdpa
, ShellView_CompareItems
, (LPARAM
)This
->pSFParent
);
692 IShellFolderView_SetRedraw(folderview
, FALSE
);
693 DPA_DestroyCallback(hdpa
, fill_list
, This
);
694 IShellFolderView_SetRedraw(folderview
, TRUE
);
696 IEnumIDList_Release(pEnumIDList
);
701 /**********************************************************
702 * ShellView_OnCreate()
704 static LRESULT
ShellView_OnCreate(IShellViewImpl
*This
)
706 IShellView2
*iface
= &This
->IShellView2_iface
;
707 static const WCHAR accel_nameW
[] = {'s','h','v','_','a','c','c','e','l',0};
708 IPersistFolder2
*ppf2
;
712 TRACE("(%p)\n", This
);
714 if (ShellView_CreateList(This
))
716 ShellView_InitList(This
);
717 ShellView_FillList(This
);
720 hr
= IShellView2_QueryInterface(iface
, &IID_IDropTarget
, (LPVOID
*)&pdt
);
723 RegisterDragDrop(This
->hWnd
, pdt
);
724 IDropTarget_Release(pdt
);
727 /* register for receiving notifications */
728 hr
= IShellFolder_QueryInterface(This
->pSFParent
, &IID_IPersistFolder2
, (LPVOID
*)&ppf2
);
731 LPITEMIDLIST raw_pidl
;
732 SHChangeNotifyEntry ntreg
;
734 hr
= IPersistFolder2_GetCurFolder(ppf2
, &raw_pidl
);
737 LPITEMIDLIST computer_pidl
;
738 SHGetFolderLocation(NULL
,CSIDL_DRIVES
,NULL
,0,&computer_pidl
);
739 if(ILIsParent(computer_pidl
,raw_pidl
,FALSE
))
741 /* Normalize the pidl to unixfs to workaround an issue with
742 * sending notifications on dos paths
744 WCHAR path
[MAX_PATH
];
745 SHGetPathFromIDListW(raw_pidl
,path
);
746 SHParseDisplayName(path
,NULL
,(LPITEMIDLIST
*)&ntreg
.pidl
,0,NULL
);
750 ntreg
.pidl
= raw_pidl
;
751 ntreg
.fRecursive
= TRUE
;
752 This
->hNotify
= SHChangeNotifyRegister(This
->hWnd
, SHCNRF_InterruptLevel
, SHCNE_ALLEVENTS
,
753 SHV_CHANGE_NOTIFY
, 1, &ntreg
);
754 SHFree((LPITEMIDLIST
)ntreg
.pidl
);
755 SHFree(computer_pidl
);
757 IPersistFolder2_Release(ppf2
);
760 This
->hAccel
= LoadAcceleratorsW(shell32_hInstance
, accel_nameW
);
765 /**********************************************************
766 * #### Handling of the menus ####
769 /**********************************************************
770 * ShellView_BuildFileMenu()
772 static HMENU
ShellView_BuildFileMenu(IShellViewImpl
* This
)
773 { WCHAR szText
[MAX_PATH
];
778 TRACE("(%p)\n",This
);
780 hSubMenu
= CreatePopupMenu();
782 { /*get the number of items in our global array*/
783 for(nTools
= 0; Tools
[nTools
].idCommand
!= -1; nTools
++){}
785 /*add the menu items*/
786 for(i
= 0; i
< nTools
; i
++)
788 LoadStringW(shell32_hInstance
, Tools
[i
].idMenuString
, szText
, MAX_PATH
);
790 ZeroMemory(&mii
, sizeof(mii
));
791 mii
.cbSize
= sizeof(mii
);
792 mii
.fMask
= MIIM_TYPE
| MIIM_ID
| MIIM_STATE
;
794 if(BTNS_SEP
!= Tools
[i
].bStyle
) /* no separator*/
796 mii
.fType
= MFT_STRING
;
797 mii
.fState
= MFS_ENABLED
;
798 mii
.dwTypeData
= szText
;
799 mii
.wID
= Tools
[i
].idCommand
;
803 mii
.fType
= MFT_SEPARATOR
;
805 /* tack This item onto the end of the menu */
806 InsertMenuItemW(hSubMenu
, (UINT
)-1, TRUE
, &mii
);
809 TRACE("-- return (menu=%p)\n",hSubMenu
);
812 /**********************************************************
813 * ShellView_MergeFileMenu()
815 static void ShellView_MergeFileMenu(IShellViewImpl
*This
, HMENU hSubMenu
)
817 TRACE("(%p)->(submenu=%p) stub\n",This
,hSubMenu
);
821 static const WCHAR dummyW
[] = {'d','u','m','m','y','4','5',0};
824 /* insert This item at the beginning of the menu */
826 mii
.cbSize
= sizeof(mii
);
827 mii
.fMask
= MIIM_ID
| MIIM_TYPE
;
829 mii
.fType
= MFT_SEPARATOR
;
830 InsertMenuItemW(hSubMenu
, 0, TRUE
, &mii
);
832 mii
.cbSize
= sizeof(mii
);
833 mii
.fMask
= MIIM_ID
| MIIM_TYPE
| MIIM_STATE
;
834 mii
.dwTypeData
= (LPWSTR
)dummyW
;
835 mii
.fState
= MFS_ENABLED
;
836 mii
.wID
= IDM_MYFILEITEM
;
837 mii
.fType
= MFT_STRING
;
838 InsertMenuItemW(hSubMenu
, 0, TRUE
, &mii
);
844 /**********************************************************
845 * ShellView_MergeViewMenu()
848 static void ShellView_MergeViewMenu(IShellViewImpl
*This
, HMENU hSubMenu
)
850 TRACE("(%p)->(submenu=%p)\n",This
,hSubMenu
);
852 /* add a separator at the correct position in the menu */
855 static const WCHAR menuW
[] = {'M','E','N','U','_','0','0','1',0};
856 static const WCHAR viewW
[] = {'V','i','e','w',0};
859 memset(&mii
, 0, sizeof(mii
));
860 mii
.cbSize
= sizeof(mii
);
861 mii
.fMask
= MIIM_ID
| MIIM_TYPE
;
863 mii
.fType
= MFT_SEPARATOR
;
864 InsertMenuItemW(hSubMenu
, FCIDM_MENU_VIEW_SEP_OPTIONS
, FALSE
, &mii
);
866 mii
.cbSize
= sizeof(mii
);
867 mii
.fMask
= MIIM_SUBMENU
| MIIM_TYPE
| MIIM_DATA
;
868 mii
.fType
= MFT_STRING
;
869 mii
.dwTypeData
= (LPWSTR
)viewW
;
870 mii
.hSubMenu
= LoadMenuW(shell32_hInstance
, menuW
);
871 InsertMenuItemW(hSubMenu
, FCIDM_MENU_VIEW_SEP_OPTIONS
, FALSE
, &mii
);
875 /**********************************************************
876 * ShellView_GetSelections()
878 * - fills the this->apidl list with the selected objects
881 * number of selected items
883 static UINT
ShellView_GetSelections(IShellViewImpl
* This
)
890 This
->cidl
= SendMessageW(This
->hWndList
, LVM_GETSELECTEDCOUNT
, 0, 0);
891 This
->apidl
= SHAlloc(This
->cidl
* sizeof(LPITEMIDLIST
));
893 TRACE("selected=%i\n", This
->cidl
);
897 TRACE("-- Items selected =%u\n", This
->cidl
);
899 lvItem
.mask
= LVIF_STATE
| LVIF_PARAM
;
900 lvItem
.stateMask
= LVIS_SELECTED
;
904 while(ListView_GetItemW(This
->hWndList
, &lvItem
) && (i
< This
->cidl
))
906 if(lvItem
.state
& LVIS_SELECTED
)
908 This
->apidl
[i
] = (LPITEMIDLIST
)lvItem
.lParam
;
910 TRACE("-- selected Item found\n");
919 /**********************************************************
920 * ShellView_OpenSelectedItems()
922 static HRESULT
ShellView_OpenSelectedItems(IShellViewImpl
* This
)
924 static UINT CF_IDLIST
= 0;
926 IDataObject
* selection
;
930 LPCITEMIDLIST parent_pidl
;
931 WCHAR parent_path
[MAX_PATH
];
932 LPCWSTR parent_dir
= NULL
;
936 if (0 == ShellView_GetSelections(This
))
940 hr
= IShellFolder_GetUIObjectOf(This
->pSFParent
, This
->hWnd
, This
->cidl
,
941 (LPCITEMIDLIST
*)This
->apidl
, &IID_IDataObject
,
942 0, (LPVOID
*)&selection
);
948 CF_IDLIST
= RegisterClipboardFormatW(CFSTR_SHELLIDLISTW
);
950 fetc
.cfFormat
= CF_IDLIST
;
952 fetc
.dwAspect
= DVASPECT_CONTENT
;
954 fetc
.tymed
= TYMED_HGLOBAL
;
956 hr
= IDataObject_QueryGetData(selection
, &fetc
);
960 hr
= IDataObject_GetData(selection
, &fetc
, &stgm
);
964 pIDList
= GlobalLock(stgm
.u
.hGlobal
);
966 parent_pidl
= (LPCITEMIDLIST
) ((LPBYTE
)pIDList
+pIDList
->aoffset
[0]);
967 hr
= IShellFolder_GetAttributesOf(This
->pSFParent
, 1, &parent_pidl
, &attribs
);
968 if (SUCCEEDED(hr
) && (attribs
& SFGAO_FILESYSTEM
) &&
969 SHGetPathFromIDListW(parent_pidl
, parent_path
))
971 parent_dir
= parent_path
;
974 for (i
= pIDList
->cidl
; i
> 0; --i
)
978 pidl
= (LPCITEMIDLIST
)((LPBYTE
)pIDList
+pIDList
->aoffset
[i
]);
980 attribs
= SFGAO_FOLDER
;
981 hr
= IShellFolder_GetAttributesOf(This
->pSFParent
, 1, &pidl
, &attribs
);
983 if (SUCCEEDED(hr
) && ! (attribs
& SFGAO_FOLDER
))
985 SHELLEXECUTEINFOW shexinfo
;
987 shexinfo
.cbSize
= sizeof(SHELLEXECUTEINFOW
);
988 shexinfo
.fMask
= SEE_MASK_INVOKEIDLIST
; /* SEE_MASK_IDLIST is also possible. */
989 shexinfo
.hwnd
= NULL
;
990 shexinfo
.lpVerb
= NULL
;
991 shexinfo
.lpFile
= NULL
;
992 shexinfo
.lpParameters
= NULL
;
993 shexinfo
.lpDirectory
= parent_dir
;
994 shexinfo
.nShow
= SW_NORMAL
;
995 shexinfo
.lpIDList
= ILCombine(parent_pidl
, pidl
);
997 ShellExecuteExW(&shexinfo
); /* Discard error/success info */
999 ILFree(shexinfo
.lpIDList
);
1003 GlobalUnlock(stgm
.u
.hGlobal
);
1004 ReleaseStgMedium(&stgm
);
1006 IDataObject_Release(selection
);
1011 /**********************************************************
1012 * ShellView_DoContextMenu()
1014 static void ShellView_DoContextMenu(IShellViewImpl
* This
, WORD x
, WORD y
, BOOL bDefault
)
1018 BOOL fExplore
= FALSE
;
1020 LPCONTEXTMENU pContextMenu
= NULL
;
1021 CMINVOKECOMMANDINFO cmi
;
1023 TRACE("(%p)->(0x%08x 0x%08x 0x%08x) stub\n",This
, x
, y
, bDefault
);
1025 /* look, what's selected and create a context menu object of it*/
1026 if( ShellView_GetSelections(This
) )
1028 IShellFolder_GetUIObjectOf( This
->pSFParent
, This
->hWndParent
, This
->cidl
, (LPCITEMIDLIST
*)This
->apidl
,
1029 &IID_IContextMenu
, NULL
, (LPVOID
*)&pContextMenu
);
1033 TRACE("-- pContextMenu\n");
1034 hMenu
= CreatePopupMenu();
1038 /* See if we are in Explore or Open mode. If the browser's tree is present, we are in Explore mode.*/
1039 if(SUCCEEDED(IShellBrowser_GetControlWindow(This
->pShellBrowser
,FCW_TREE
, &hwndTree
)) && hwndTree
)
1041 TRACE("-- explore mode\n");
1045 /* build the flags depending on what we can do with the selected item */
1046 wFlags
= CMF_NORMAL
| (This
->cidl
!= 1 ? 0 : CMF_CANRENAME
) | (fExplore
? CMF_EXPLORE
: 0);
1048 /* let the ContextMenu merge its items in */
1049 if (SUCCEEDED(IContextMenu_QueryContextMenu( pContextMenu
, hMenu
, 0, FCIDM_SHVIEWFIRST
, FCIDM_SHVIEWLAST
, wFlags
)))
1051 if (This
->FolderSettings
.fFlags
& FWF_DESKTOP
)
1052 SetMenuDefaultItem(hMenu
, FCIDM_SHVIEW_OPEN
, MF_BYCOMMAND
);
1056 TRACE("-- get menu default command\n");
1057 uCommand
= GetMenuDefaultItem(hMenu
, FALSE
, GMDI_GOINTOPOPUPS
);
1061 TRACE("-- track popup\n");
1062 uCommand
= TrackPopupMenu( hMenu
,TPM_LEFTALIGN
| TPM_RETURNCMD
,x
,y
,0,This
->hWnd
,NULL
);
1067 TRACE("-- uCommand=%u\n", uCommand
);
1068 if (uCommand
==FCIDM_SHVIEW_OPEN
&& IsInCommDlg(This
))
1070 TRACE("-- dlg: OnDefaultCommand\n");
1071 if (OnDefaultCommand(This
) != S_OK
)
1073 ShellView_OpenSelectedItems(This
);
1078 TRACE("-- explore -- invoke command\n");
1079 ZeroMemory(&cmi
, sizeof(cmi
));
1080 cmi
.cbSize
= sizeof(cmi
);
1081 cmi
.hwnd
= This
->hWndParent
; /* this window has to answer CWM_GETISHELLBROWSER */
1082 cmi
.lpVerb
= MAKEINTRESOURCEA(uCommand
);
1083 IContextMenu_InvokeCommand(pContextMenu
, &cmi
);
1090 IContextMenu_Release(pContextMenu
);
1093 else /* background context menu */
1097 hMenu
= CreatePopupMenu();
1099 BackgroundMenu_Constructor(This
->pSFParent
, FALSE
, &IID_IContextMenu2
, (void**)&pCM
);
1100 IContextMenu2_QueryContextMenu(pCM
, hMenu
, 0, FCIDM_SHVIEWFIRST
, FCIDM_SHVIEWLAST
, 0);
1102 uCommand
= TrackPopupMenu( hMenu
, TPM_LEFTALIGN
| TPM_RETURNCMD
,x
,y
,0,This
->hWnd
,NULL
);
1105 TRACE("-- (%p)->(uCommand=0x%08x )\n",This
, uCommand
);
1107 ZeroMemory(&cmi
, sizeof(cmi
));
1108 cmi
.cbSize
= sizeof(cmi
);
1109 cmi
.lpVerb
= MAKEINTRESOURCEA(uCommand
);
1110 cmi
.hwnd
= This
->hWndParent
;
1111 IContextMenu2_InvokeCommand(pCM
, &cmi
);
1113 IContextMenu2_Release(pCM
);
1117 /**********************************************************
1118 * ##### message handling #####
1121 /**********************************************************
1122 * ShellView_OnSize()
1124 static LRESULT
ShellView_OnSize(IShellViewImpl
* This
, WORD wWidth
, WORD wHeight
)
1126 TRACE("%p width=%u height=%u\n",This
, wWidth
,wHeight
);
1128 /*resize the ListView to fit our window*/
1131 MoveWindow(This
->hWndList
, 0, 0, wWidth
, wHeight
, TRUE
);
1136 /**********************************************************
1137 * ShellView_OnDeactivate()
1142 static void ShellView_OnDeactivate(IShellViewImpl
* This
)
1146 if(This
->uState
!= SVUIA_DEACTIVATE
)
1150 IShellBrowser_SetMenuSB(This
->pShellBrowser
,0, 0, 0);
1151 IShellBrowser_RemoveMenusSB(This
->pShellBrowser
,This
->hMenu
);
1152 DestroyMenu(This
->hMenu
);
1156 This
->uState
= SVUIA_DEACTIVATE
;
1160 /**********************************************************
1161 * ShellView_OnActivate()
1163 static LRESULT
ShellView_OnActivate(IShellViewImpl
*This
, UINT uState
)
1165 OLEMENUGROUPWIDTHS omw
= { {0, 0, 0, 0, 0, 0} };
1168 TRACE("(%p) uState=%x\n",This
,uState
);
1170 /* don't do anything if the state isn't really changing */
1171 if (This
->uState
== uState
) return S_OK
;
1173 ShellView_OnDeactivate(This
);
1175 /* only do This if we are active */
1176 if (uState
!= SVUIA_DEACTIVATE
)
1178 /* merge the menus */
1179 This
->hMenu
= CreateMenu();
1183 static const WCHAR dummyW
[] = {'d','u','m','m','y',' ','3','1',0};
1185 IShellBrowser_InsertMenusSB(This
->pShellBrowser
, This
->hMenu
, &omw
);
1186 TRACE("-- after fnInsertMenusSB\n");
1188 mii
.cbSize
= sizeof(mii
);
1189 mii
.fMask
= MIIM_SUBMENU
| MIIM_TYPE
| MIIM_STATE
;
1190 mii
.fType
= MFT_STRING
;
1191 mii
.fState
= MFS_ENABLED
;
1193 mii
.hSubMenu
= ShellView_BuildFileMenu(This
);
1194 mii
.hbmpChecked
= NULL
;
1195 mii
.hbmpUnchecked
= NULL
;
1197 /* build the top level menu get the menu item's text */
1198 mii
.dwTypeData
= (LPWSTR
)dummyW
;
1200 mii
.hbmpItem
= NULL
;
1202 /* insert our menu into the menu bar */
1204 InsertMenuItemW(This
->hMenu
, FCIDM_MENU_HELP
, FALSE
, &mii
);
1206 /* get the view menu so we can merge with it */
1207 memset(&mii
, 0, sizeof(mii
));
1208 mii
.cbSize
= sizeof(mii
);
1209 mii
.fMask
= MIIM_SUBMENU
;
1211 if (GetMenuItemInfoW(This
->hMenu
, FCIDM_MENU_VIEW
, FALSE
, &mii
))
1212 ShellView_MergeViewMenu(This
, mii
.hSubMenu
);
1214 /* add the items that should only be added if we have the focus */
1215 if (SVUIA_ACTIVATE_FOCUS
== uState
)
1217 /* get the file menu so we can merge with it */
1218 memset(&mii
, 0, sizeof(mii
));
1219 mii
.cbSize
= sizeof(mii
);
1220 mii
.fMask
= MIIM_SUBMENU
;
1222 if (GetMenuItemInfoW(This
->hMenu
, FCIDM_MENU_FILE
, FALSE
, &mii
))
1223 ShellView_MergeFileMenu(This
, mii
.hSubMenu
);
1226 TRACE("-- before fnSetMenuSB\n");
1227 IShellBrowser_SetMenuSB(This
->pShellBrowser
, This
->hMenu
, 0, This
->hWnd
);
1230 This
->uState
= uState
;
1235 /**********************************************************
1236 * ShellView_OnSetFocus()
1239 static LRESULT
ShellView_OnSetFocus(IShellViewImpl
* This
)
1243 /* Tell the browser one of our windows has received the focus. This
1244 should always be done before merging menus (OnActivate merges the
1245 menus) if one of our windows has the focus.*/
1247 IShellBrowser_OnViewWindowActive(This
->pShellBrowser
,(IShellView
*) This
);
1248 ShellView_OnActivate(This
, SVUIA_ACTIVATE_FOCUS
);
1250 /* Set the focus to the listview */
1251 SetFocus(This
->hWndList
);
1253 /* Notify the ICommDlgBrowser interface */
1254 OnStateChange(This
,CDBOSC_SETFOCUS
);
1259 /**********************************************************
1260 * ShellView_OnKillFocus()
1262 static LRESULT
ShellView_OnKillFocus(IShellViewImpl
* This
)
1264 TRACE("(%p) stub\n",This
);
1266 ShellView_OnActivate(This
, SVUIA_ACTIVATE_NOFOCUS
);
1267 /* Notify the ICommDlgBrowser */
1268 OnStateChange(This
,CDBOSC_KILLFOCUS
);
1273 /**********************************************************
1274 * ShellView_OnCommand()
1277 * the CmdIDs are the ones from the context menu
1279 static LRESULT
ShellView_OnCommand(IShellViewImpl
* This
,DWORD dwCmdID
, DWORD dwCmd
, HWND hwndCmd
)
1281 TRACE("(%p)->(0x%08x 0x%08x %p) stub\n",This
, dwCmdID
, dwCmd
, hwndCmd
);
1285 case FCIDM_SHVIEW_SMALLICON
:
1286 This
->FolderSettings
.ViewMode
= FVM_SMALLICON
;
1287 SetStyle (This
, LVS_SMALLICON
, LVS_TYPEMASK
);
1291 case FCIDM_SHVIEW_BIGICON
:
1292 This
->FolderSettings
.ViewMode
= FVM_ICON
;
1293 SetStyle (This
, LVS_ICON
, LVS_TYPEMASK
);
1297 case FCIDM_SHVIEW_LISTVIEW
:
1298 This
->FolderSettings
.ViewMode
= FVM_LIST
;
1299 SetStyle (This
, LVS_LIST
, LVS_TYPEMASK
);
1303 case FCIDM_SHVIEW_REPORTVIEW
:
1304 This
->FolderSettings
.ViewMode
= FVM_DETAILS
;
1305 SetStyle (This
, LVS_REPORT
, LVS_TYPEMASK
);
1309 /* the menu IDs for sorting are 0x30... see shell32.rc */
1314 This
->ListViewSortInfo
.nHeaderID
= dwCmdID
- 0x30;
1315 This
->ListViewSortInfo
.bIsAscending
= TRUE
;
1316 This
->ListViewSortInfo
.nLastHeaderID
= This
->ListViewSortInfo
.nHeaderID
;
1317 SendMessageW(This
->hWndList
, LVM_SORTITEMS
, (WPARAM
) &This
->ListViewSortInfo
, (LPARAM
)ShellView_ListViewCompareItems
);
1321 TRACE("-- COMMAND 0x%04x unhandled\n", dwCmdID
);
1326 /**********************************************************
1327 * ShellView_OnNotify()
1330 static LRESULT
ShellView_OnNotify(IShellViewImpl
* This
, UINT CtlID
, LPNMHDR lpnmh
)
1331 { LPNMLISTVIEW lpnmlv
= (LPNMLISTVIEW
)lpnmh
;
1332 NMLVDISPINFOW
*lpdi
= (NMLVDISPINFOW
*)lpnmh
;
1335 TRACE("%p CtlID=%u lpnmh->code=%x\n",This
,CtlID
,lpnmh
->code
);
1340 TRACE("-- NM_SETFOCUS %p\n",This
);
1341 ShellView_OnSetFocus(This
);
1345 TRACE("-- NM_KILLFOCUS %p\n",This
);
1346 ShellView_OnDeactivate(This
);
1347 /* Notify the ICommDlgBrowser interface */
1348 OnStateChange(This
,CDBOSC_KILLFOCUS
);
1352 TRACE("-- NM_CUSTOMDRAW %p\n",This
);
1353 return CDRF_DODEFAULT
;
1355 case NM_RELEASEDCAPTURE
:
1356 TRACE("-- NM_RELEASEDCAPTURE %p\n",This
);
1360 TRACE("-- NM_CLICK %p\n",This
);
1364 TRACE("-- NM_RCLICK %p\n",This
);
1368 TRACE("-- NM_DBLCLK %p\n",This
);
1369 if (OnDefaultCommand(This
) != S_OK
) ShellView_OpenSelectedItems(This
);
1373 TRACE("-- NM_RETURN %p\n",This
);
1374 if (OnDefaultCommand(This
) != S_OK
) ShellView_OpenSelectedItems(This
);
1378 TRACE("-- HDN_ENDTRACKW %p\n",This
);
1379 /*nColumn1 = ListView_GetColumnWidth(This->hWndList, 0);
1380 nColumn2 = ListView_GetColumnWidth(This->hWndList, 1);*/
1383 case LVN_DELETEITEM
:
1384 TRACE("-- LVN_DELETEITEM %p\n",This
);
1385 SHFree((LPITEMIDLIST
)lpnmlv
->lParam
); /*delete the pidl because we made a copy of it*/
1388 case LVN_DELETEALLITEMS
:
1389 TRACE("-- LVN_DELETEALLITEMS %p\n",This
);
1392 case LVN_INSERTITEM
:
1393 TRACE("-- LVN_INSERTITEM (STUB)%p\n",This
);
1396 case LVN_ITEMACTIVATE
:
1397 TRACE("-- LVN_ITEMACTIVATE %p\n",This
);
1398 OnStateChange(This
, CDBOSC_SELCHANGE
); /* the browser will get the IDataObject now */
1401 case LVN_COLUMNCLICK
:
1402 This
->ListViewSortInfo
.nHeaderID
= lpnmlv
->iSubItem
;
1403 if(This
->ListViewSortInfo
.nLastHeaderID
== This
->ListViewSortInfo
.nHeaderID
)
1405 This
->ListViewSortInfo
.bIsAscending
= !This
->ListViewSortInfo
.bIsAscending
;
1409 This
->ListViewSortInfo
.bIsAscending
= TRUE
;
1411 This
->ListViewSortInfo
.nLastHeaderID
= This
->ListViewSortInfo
.nHeaderID
;
1413 SendMessageW(lpnmlv
->hdr
.hwndFrom
, LVM_SORTITEMS
, (WPARAM
) &This
->ListViewSortInfo
, (LPARAM
)ShellView_ListViewCompareItems
);
1416 case LVN_GETDISPINFOA
:
1417 case LVN_GETDISPINFOW
:
1418 TRACE("-- LVN_GETDISPINFO %p\n",This
);
1419 pidl
= (LPITEMIDLIST
)lpdi
->item
.lParam
;
1421 if(lpdi
->item
.mask
& LVIF_TEXT
) /* text requested */
1423 static WCHAR emptyW
[] = { 0 };
1427 if (This
->pSF2Parent
)
1429 hr
= IShellFolder2_GetDetailsOf(This
->pSF2Parent
, pidl
, lpdi
->item
.iSubItem
, &sd
);
1433 IShellDetails
*details
;
1435 hr
= IShellFolder_QueryInterface(This
->pSFParent
, &IID_IShellDetails
, (void**)&details
);
1438 hr
= IShellDetails_GetDetailsOf(details
, pidl
, lpdi
->item
.iSubItem
, &sd
);
1439 IShellDetails_Release(details
);
1442 WARN("IShellFolder2/IShellDetails not supported\n");
1447 /* set to empty on failure */
1448 sd
.str
.uType
= STRRET_WSTR
;
1449 sd
.str
.u
.pOleStr
= emptyW
;
1452 if (lpnmh
->code
== LVN_GETDISPINFOW
)
1454 StrRetToStrNW( lpdi
->item
.pszText
, lpdi
->item
.cchTextMax
, &sd
.str
, NULL
);
1455 TRACE("-- text=%s\n", debugstr_w(lpdi
->item
.pszText
));
1459 /* LVN_GETDISPINFOA - shouldn't happen */
1460 NMLVDISPINFOA
*lpdiA
= (NMLVDISPINFOA
*)lpnmh
;
1461 StrRetToStrNA( lpdiA
->item
.pszText
, lpdiA
->item
.cchTextMax
, &sd
.str
, NULL
);
1462 TRACE("-- text=%s\n", lpdiA
->item
.pszText
);
1466 if(lpdi
->item
.mask
& LVIF_IMAGE
) /* image requested */
1468 lpdi
->item
.iImage
= SHMapPIDLToSystemImageListIndex(This
->pSFParent
, pidl
, 0);
1472 case LVN_ITEMCHANGED
:
1473 TRACE("-- LVN_ITEMCHANGED %p\n",This
);
1474 OnStateChange(This
, CDBOSC_SELCHANGE
); /* the browser will get the IDataObject now */
1478 case LVN_BEGINRDRAG
:
1479 TRACE("-- LVN_BEGINDRAG\n");
1481 if (ShellView_GetSelections(This
))
1484 DWORD dwAttributes
= SFGAO_CANLINK
;
1485 DWORD dwEffect
= DROPEFFECT_COPY
| DROPEFFECT_MOVE
;
1487 if (SUCCEEDED(IShellFolder_GetUIObjectOf(This
->pSFParent
, This
->hWnd
, This
->cidl
, (LPCITEMIDLIST
*)This
->apidl
, &IID_IDataObject
,0,(LPVOID
*)&pda
)))
1489 IDropSource
*pds
= &This
->IDropSource_iface
; /* own DropSource interface */
1491 if (SUCCEEDED(IShellFolder_GetAttributesOf(This
->pSFParent
, This
->cidl
, (LPCITEMIDLIST
*)This
->apidl
, &dwAttributes
)))
1493 if (dwAttributes
& SFGAO_CANLINK
)
1495 dwEffect
|= DROPEFFECT_LINK
;
1502 DoDragDrop(pda
, pds
, dwEffect
, &dwEffect2
);
1504 IDataObject_Release(pda
);
1509 case LVN_BEGINLABELEDITW
:
1511 DWORD dwAttr
= SFGAO_CANRENAME
;
1512 pidl
= (LPITEMIDLIST
)lpdi
->item
.lParam
;
1514 TRACE("-- LVN_BEGINLABELEDITW %p\n",This
);
1516 IShellFolder_GetAttributesOf(This
->pSFParent
, 1, (LPCITEMIDLIST
*)&pidl
, &dwAttr
);
1517 if (SFGAO_CANRENAME
& dwAttr
)
1524 case LVN_ENDLABELEDITW
:
1526 TRACE("-- LVN_ENDLABELEDITA %p\n",This
);
1527 if (lpdi
->item
.pszText
)
1532 lvItem
.iItem
= lpdi
->item
.iItem
;
1533 lvItem
.iSubItem
= 0;
1534 lvItem
.mask
= LVIF_PARAM
;
1535 SendMessageW(This
->hWndList
, LVM_GETITEMW
, 0, (LPARAM
) &lvItem
);
1537 pidl
= (LPITEMIDLIST
)lpdi
->item
.lParam
;
1538 hr
= IShellFolder_SetNameOf(This
->pSFParent
, 0, pidl
, lpdi
->item
.pszText
, SHGDN_INFOLDER
, &pidl
);
1540 if(SUCCEEDED(hr
) && pidl
)
1542 lvItem
.mask
= LVIF_PARAM
;
1543 lvItem
.lParam
= (LPARAM
)pidl
;
1544 SendMessageW(This
->hWndList
, LVM_SETITEMW
, 0, (LPARAM
) &lvItem
);
1553 LPNMLVKEYDOWN plvKeyDown
= (LPNMLVKEYDOWN
) lpnmh
;
1555 /* initiate a rename of the selected file or directory */
1556 switch (plvKeyDown
->wVKey
)
1560 INT i
= SendMessageW(This
->hWndList
, LVM_GETSELECTEDCOUNT
, 0, 0);
1564 /* get selected item */
1565 i
= SendMessageW(This
->hWndList
, LVM_GETNEXTITEM
, -1, MAKELPARAM (LVNI_SELECTED
, 0));
1567 SendMessageW(This
->hWndList
, LVM_ENSUREVISIBLE
, i
, 0);
1568 SendMessageW(This
->hWndList
, LVM_EDITLABELW
, i
, 0);
1577 LPITEMIDLIST
* pItems
;
1581 hr
= IShellFolder_QueryInterface(This
->pSFParent
, &IID_ISFHelper
, (void**)&psfhlp
);
1582 if (hr
!= S_OK
) return 0;
1584 if(!(count
= SendMessageW(This
->hWndList
, LVM_GETSELECTEDCOUNT
, 0, 0)))
1586 ISFHelper_Release(psfhlp
);
1590 /* allocate memory for the pidl array */
1591 pItems
= HeapAlloc(GetProcessHeap(), 0, sizeof(LPITEMIDLIST
) * count
);
1593 /* retrieve all selected items */
1599 /* get selected item */
1600 item_index
= SendMessageW(This
->hWndList
, LVM_GETNEXTITEM
, item_index
,
1601 MAKELPARAM (LVNI_SELECTED
, 0));
1602 item
.iItem
= item_index
;
1603 item
.mask
= LVIF_PARAM
;
1604 SendMessageW(This
->hWndList
, LVM_GETITEMW
, 0, (LPARAM
)&item
);
1607 pItems
[i
] = (LPITEMIDLIST
)item
.lParam
;
1612 /* perform the item deletion */
1613 ISFHelper_DeleteItems(psfhlp
, i
, (LPCITEMIDLIST
*)pItems
);
1614 ISFHelper_Release(psfhlp
);
1616 /* free pidl array memory */
1617 HeapFree(GetProcessHeap(), 0, pItems
);
1622 /* Initiate a refresh */
1623 IShellView_Refresh((IShellView
*)This
);
1628 LPSHELLBROWSER lpSb
;
1629 if((lpSb
= (LPSHELLBROWSER
)SendMessageW(This
->hWndParent
, CWM_GETISHELLBROWSER
, 0, 0)))
1631 IShellBrowser_BrowseObject(lpSb
, NULL
, SBSP_PARENT
);
1637 FIXME("LVN_KEYDOWN key=0x%08x\n", plvKeyDown
->wVKey
);
1643 TRACE("-- %p WM_COMMAND %x unhandled\n", This
, lpnmh
->code
);
1649 /**********************************************************
1650 * ShellView_OnChange()
1653 static LRESULT
ShellView_OnChange(IShellViewImpl
* This
, const LPCITEMIDLIST
*pidls
, LONG event
)
1657 TRACE("(%p)->(%p, %p, 0x%08x)\n", This
, pidls
[0], pidls
[1], event
);
1663 LV_AddItem(This
, pidls
[0]);
1668 INT i
= LV_FindItemByPidl(This
, ILFindLastID(pidls
[0]));
1669 ret
= SendMessageW(This
->hWndList
, LVM_DELETEITEM
, i
, 0);
1672 case SHCNE_RENAMEFOLDER
:
1673 case SHCNE_RENAMEITEM
:
1674 LV_RenameItem(This
, pidls
[0], pidls
[1]);
1676 case SHCNE_UPDATEITEM
:
1681 /**********************************************************
1685 static LRESULT CALLBACK
ShellView_WndProc(HWND hWnd
, UINT uMessage
, WPARAM wParam
, LPARAM lParam
)
1687 IShellViewImpl
* pThis
= (IShellViewImpl
*)GetWindowLongPtrW(hWnd
, GWLP_USERDATA
);
1688 LPCREATESTRUCTW lpcs
;
1690 TRACE("(hwnd=%p msg=%x wparm=%lx lparm=%lx)\n",hWnd
, uMessage
, wParam
, lParam
);
1695 lpcs
= (LPCREATESTRUCTW
)lParam
;
1696 pThis
= lpcs
->lpCreateParams
;
1697 SetWindowLongPtrW(hWnd
, GWLP_USERDATA
, (ULONG_PTR
)pThis
);
1698 pThis
->hWnd
= hWnd
; /*set the window handle*/
1701 case WM_SIZE
: return ShellView_OnSize(pThis
,LOWORD(lParam
), HIWORD(lParam
));
1702 case WM_SETFOCUS
: return ShellView_OnSetFocus(pThis
);
1703 case WM_KILLFOCUS
: return ShellView_OnKillFocus(pThis
);
1704 case WM_CREATE
: return ShellView_OnCreate(pThis
);
1705 case WM_ACTIVATE
: return ShellView_OnActivate(pThis
, SVUIA_ACTIVATE_FOCUS
);
1706 case WM_NOTIFY
: return ShellView_OnNotify(pThis
,(UINT
)wParam
, (LPNMHDR
)lParam
);
1707 case WM_COMMAND
: return ShellView_OnCommand(pThis
,
1708 GET_WM_COMMAND_ID(wParam
, lParam
),
1709 GET_WM_COMMAND_CMD(wParam
, lParam
),
1710 GET_WM_COMMAND_HWND(wParam
, lParam
));
1711 case SHV_CHANGE_NOTIFY
: return ShellView_OnChange(pThis
, (const LPCITEMIDLIST
*)wParam
, (LONG
)lParam
);
1713 case WM_CONTEXTMENU
: ShellView_DoContextMenu(pThis
, LOWORD(lParam
), HIWORD(lParam
), FALSE
);
1716 case WM_SHOWWINDOW
: UpdateWindow(pThis
->hWndList
);
1719 case WM_GETDLGCODE
: return SendMessageW(pThis
->hWndList
, uMessage
, 0, 0);
1722 RevokeDragDrop(pThis
->hWnd
);
1723 SHChangeNotifyDeregister(pThis
->hNotify
);
1727 if ((pThis
->FolderSettings
.fFlags
& FWF_DESKTOP
) ||
1728 (pThis
->FolderSettings
.fFlags
& FWF_TRANSPARENT
))
1733 return DefWindowProcW(hWnd
, uMessage
, wParam
, lParam
);
1735 /**********************************************************
1738 * The INTERFACE of the IShellView object
1741 **********************************************************
1742 * IShellView_QueryInterface
1744 static HRESULT WINAPI
IShellView_fnQueryInterface(IShellView2
*iface
, REFIID riid
, void **ppvObj
)
1746 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
1748 TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This
,debugstr_guid(riid
),ppvObj
);
1752 if(IsEqualIID(riid
, &IID_IUnknown
))
1756 else if(IsEqualIID(riid
, &IID_IShellView
))
1760 else if(IsEqualIID(riid
, &IID_IShellView2
))
1764 else if(IsEqualIID(riid
, &IID_IShellFolderView
))
1766 *ppvObj
= &This
->IShellFolderView_iface
;
1768 else if(IsEqualIID(riid
, &IID_IFolderView
))
1770 *ppvObj
= &This
->IFolderView_iface
;
1772 else if(IsEqualIID(riid
, &IID_IOleCommandTarget
))
1774 *ppvObj
= &This
->IOleCommandTarget_iface
;
1776 else if(IsEqualIID(riid
, &IID_IDropTarget
))
1778 *ppvObj
= &This
->IDropTarget_iface
;
1780 else if(IsEqualIID(riid
, &IID_IDropSource
))
1782 *ppvObj
= &This
->IDropSource_iface
;
1784 else if(IsEqualIID(riid
, &IID_IViewObject
))
1786 *ppvObj
= &This
->IViewObject_iface
;
1791 IUnknown_AddRef( (IUnknown
*)*ppvObj
);
1792 TRACE("-- Interface: (%p)->(%p)\n",ppvObj
,*ppvObj
);
1795 TRACE("-- Interface: E_NOINTERFACE\n");
1796 return E_NOINTERFACE
;
1799 /**********************************************************
1802 static ULONG WINAPI
IShellView_fnAddRef(IShellView2
*iface
)
1804 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
1805 ULONG refCount
= InterlockedIncrement(&This
->ref
);
1807 TRACE("(%p)->(count=%u)\n", This
, refCount
- 1);
1811 /**********************************************************
1812 * IShellView_Release
1814 static ULONG WINAPI
IShellView_fnRelease(IShellView2
*iface
)
1816 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
1817 ULONG refCount
= InterlockedDecrement(&This
->ref
);
1819 TRACE("(%p)->(count=%i)\n", This
, refCount
+ 1);
1823 TRACE(" destroying IShellView(%p)\n",This
);
1825 DestroyWindow(This
->hWndList
);
1828 IShellFolder_Release(This
->pSFParent
);
1830 if(This
->pSF2Parent
)
1831 IShellFolder2_Release(This
->pSF2Parent
);
1833 SHFree(This
->apidl
);
1836 IAdviseSink_Release(This
->pAdvSink
);
1838 HeapFree(GetProcessHeap(),0,This
);
1843 /**********************************************************
1844 * ShellView_GetWindow
1846 static HRESULT WINAPI
IShellView_fnGetWindow(IShellView2
*iface
, HWND
*phWnd
)
1848 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
1850 TRACE("(%p)\n",This
);
1852 *phWnd
= This
->hWnd
;
1857 static HRESULT WINAPI
IShellView_fnContextSensitiveHelp(IShellView2
*iface
, BOOL mode
)
1859 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
1860 TRACE("(%p)->(%d)\n", This
, mode
);
1864 /**********************************************************
1865 * IShellView_TranslateAccelerator
1868 * use the accel functions
1870 static HRESULT WINAPI
IShellView_fnTranslateAccelerator(IShellView2
* iface
,LPMSG lpmsg
)
1873 IShellViewImpl
*This
= (IShellViewImpl
*)iface
;
1875 FIXME("(%p)->(%p: hwnd=%x msg=%x lp=%x wp=%x) stub\n",This
,lpmsg
, lpmsg
->hwnd
, lpmsg
->message
, lpmsg
->lParam
, lpmsg
->wParam
);
1878 if ((lpmsg
->message
>=WM_KEYFIRST
) && (lpmsg
->message
>=WM_KEYLAST
))
1880 TRACE("-- key=0x04%lx\n",lpmsg
->wParam
) ;
1882 return S_FALSE
; /* not handled */
1885 static HRESULT WINAPI
IShellView_fnEnableModeless(IShellView2
*iface
, BOOL fEnable
)
1887 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
1889 FIXME("(%p) stub\n",This
);
1894 static HRESULT WINAPI
IShellView_fnUIActivate(IShellView2
*iface
, UINT uState
)
1896 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
1899 CHAR szName[MAX_PATH];
1902 int nPartArray
[1] = {-1};
1904 TRACE("(%p)->(state=%x) stub\n",This
, uState
);
1906 /*don't do anything if the state isn't really changing*/
1907 if(This
->uState
== uState
)
1912 /*OnActivate handles the menu merging and internal state*/
1913 ShellView_OnActivate(This
, uState
);
1915 /*only do This if we are active*/
1916 if(uState
!= SVUIA_DEACTIVATE
)
1920 GetFolderPath is not a method of IShellFolder
1921 IShellFolder_GetFolderPath( This->pSFParent, szName, sizeof(szName) );
1923 /* set the number of parts */
1924 IShellBrowser_SendControlMsg(This
->pShellBrowser
, FCW_STATUS
, SB_SETPARTS
, 1,
1925 (LPARAM
)nPartArray
, &lResult
);
1927 /* set the text for the parts */
1929 IShellBrowser_SendControlMsg(This->pShellBrowser, FCW_STATUS, SB_SETTEXTA,
1930 0, (LPARAM)szName, &lResult);
1937 static HRESULT WINAPI
IShellView_fnRefresh(IShellView2
*iface
)
1939 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
1941 TRACE("(%p)\n", This
);
1943 SendMessageW(This
->hWndList
, LVM_DELETEALLITEMS
, 0, 0);
1944 ShellView_FillList(This
);
1949 static HRESULT WINAPI
IShellView_fnCreateViewWindow(IShellView2
*iface
, IShellView
*lpPrevView
,
1950 LPCFOLDERSETTINGS lpfs
, IShellBrowser
*psb
, RECT
*prcView
, HWND
*phWnd
)
1953 SV2CVW2_PARAMS view_params
;
1954 view_params
.cbSize
= sizeof(view_params
);
1955 view_params
.psvPrev
= lpPrevView
;
1956 view_params
.pfs
= lpfs
;
1957 view_params
.psbOwner
= psb
;
1958 view_params
.prcView
= prcView
;
1959 view_params
.pvid
= NULL
;
1960 view_params
.hwndView
= 0;
1962 TRACE("(%p) Forwarding to CreateViewWindow2\n", iface
);
1964 hr
= IShellView2_CreateViewWindow2(iface
, &view_params
);
1965 *phWnd
= view_params
.hwndView
;
1970 static HRESULT WINAPI
IShellView_fnDestroyViewWindow(IShellView2
*iface
)
1972 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
1974 TRACE("(%p)\n",This
);
1976 /*Make absolutely sure all our UI is cleaned up.*/
1977 IShellView_UIActivate((IShellView
*)This
, SVUIA_DEACTIVATE
);
1981 DestroyMenu(This
->hMenu
);
1984 DestroyWindow(This
->hWnd
);
1985 if(This
->pShellBrowser
) IShellBrowser_Release(This
->pShellBrowser
);
1986 if(This
->pCommDlgBrowser
) ICommDlgBrowser_Release(This
->pCommDlgBrowser
);
1992 static HRESULT WINAPI
IShellView_fnGetCurrentInfo(IShellView2
*iface
, LPFOLDERSETTINGS lpfs
)
1994 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
1996 TRACE("(%p)->(%p) vmode=%x flags=%x\n",This
, lpfs
,
1997 This
->FolderSettings
.ViewMode
, This
->FolderSettings
.fFlags
);
1999 if (!lpfs
) return E_INVALIDARG
;
2001 *lpfs
= This
->FolderSettings
;
2005 static HRESULT WINAPI
IShellView_fnAddPropertySheetPages(IShellView2
*iface
, DWORD dwReserved
,
2006 LPFNADDPROPSHEETPAGE lpfn
, LPARAM lparam
)
2008 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
2010 FIXME("(%p) stub\n",This
);
2015 static HRESULT WINAPI
IShellView_fnSaveViewState(IShellView2
*iface
)
2017 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
2019 FIXME("(%p) stub\n",This
);
2024 static HRESULT WINAPI
IShellView_fnSelectItem(IShellView2
*iface
, LPCITEMIDLIST pidl
, UINT flags
)
2026 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
2027 IFolderView
*view
= &This
->IFolderView_iface
;
2030 TRACE("(%p)->(pidl=%p, 0x%08x)\n",This
, pidl
, flags
);
2032 i
= LV_FindItemByPidl(This
, pidl
);
2033 if (i
== -1) return S_OK
;
2035 return IFolderView_SelectItem(view
, i
, flags
);
2038 static HRESULT WINAPI
IShellView_fnGetItemObject(IShellView2
*iface
, UINT uItem
, REFIID riid
,
2041 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
2042 HRESULT hr
= E_NOINTERFACE
;
2044 TRACE("(%p)->(0x%08x, %s, %p)\n",This
, uItem
, debugstr_guid(riid
), ppvOut
);
2050 case SVGIO_BACKGROUND
:
2052 if (IsEqualIID(&IID_IContextMenu
, riid
))
2053 return BackgroundMenu_Constructor(This
->pSFParent
, FALSE
, riid
, ppvOut
);
2055 FIXME("unsupported interface requested %s\n", debugstr_guid(riid
));
2059 case SVGIO_SELECTION
:
2060 ShellView_GetSelections(This
);
2061 hr
= IShellFolder_GetUIObjectOf(This
->pSFParent
, This
->hWnd
, This
->cidl
, (LPCITEMIDLIST
*)This
->apidl
, riid
, 0, ppvOut
);
2065 FIXME("unimplemented for uItem = 0x%08x\n", uItem
);
2067 TRACE("-- (%p)->(interface=%p)\n",This
, *ppvOut
);
2072 static HRESULT WINAPI
IShellView2_fnGetView(IShellView2
* iface
, SHELLVIEWID
*view_guid
, ULONG view_type
)
2074 FIXME("(%p)->(view_guid %s, view_type %#x) stub!\n", iface
, debugstr_guid(view_guid
), view_type
);
2078 static HRESULT WINAPI
IShellView2_fnCreateViewWindow2(IShellView2
*iface
,
2079 LPSV2CVW2_PARAMS view_params
)
2081 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
2086 TRACE("(%p)->(view_params %p)\n", iface
, view_params
);
2088 if (view_params
->cbSize
!= sizeof(*view_params
))
2090 FIXME("Got unexpected cbSize %#x\n", view_params
->cbSize
);
2094 TRACE("-- psvPrev %p, pfs %p, psbOwner %p, prcView %p\n",
2095 view_params
->psvPrev
, view_params
->pfs
, view_params
->psbOwner
, view_params
->prcView
);
2096 TRACE("-- vmode %#x, flags %#x, view %s\n", view_params
->pfs
->ViewMode
, view_params
->pfs
->fFlags
, wine_dbgstr_rect(view_params
->prcView
));
2098 if (!view_params
->psbOwner
) return E_UNEXPECTED
;
2100 /* Set up the member variables */
2101 This
->pShellBrowser
= view_params
->psbOwner
;
2102 This
->FolderSettings
= *view_params
->pfs
;
2104 if (view_params
->pvid
)
2106 if (IsEqualGUID(view_params
->pvid
, &VID_LargeIcons
))
2107 This
->FolderSettings
.ViewMode
= FVM_ICON
;
2108 else if (IsEqualGUID(view_params
->pvid
, &VID_SmallIcons
))
2109 This
->FolderSettings
.ViewMode
= FVM_SMALLICON
;
2110 else if (IsEqualGUID(view_params
->pvid
, &VID_List
))
2111 This
->FolderSettings
.ViewMode
= FVM_LIST
;
2112 else if (IsEqualGUID(view_params
->pvid
, &VID_Details
))
2113 This
->FolderSettings
.ViewMode
= FVM_DETAILS
;
2114 else if (IsEqualGUID(view_params
->pvid
, &VID_Thumbnails
))
2115 This
->FolderSettings
.ViewMode
= FVM_THUMBNAIL
;
2116 else if (IsEqualGUID(view_params
->pvid
, &VID_Tile
))
2117 This
->FolderSettings
.ViewMode
= FVM_TILE
;
2118 else if (IsEqualGUID(view_params
->pvid
, &VID_ThumbStrip
))
2119 This
->FolderSettings
.ViewMode
= FVM_THUMBSTRIP
;
2121 FIXME("Ignoring unrecognized VID %s\n", debugstr_guid(view_params
->pvid
));
2124 /* Get our parent window */
2125 IShellBrowser_AddRef(This
->pShellBrowser
);
2126 IShellBrowser_GetWindow(This
->pShellBrowser
, &This
->hWndParent
);
2128 /* Try to get the ICommDlgBrowserInterface, adds a reference !!! */
2129 This
->pCommDlgBrowser
= NULL
;
2130 hr
= IShellBrowser_QueryInterface(This
->pShellBrowser
, &IID_ICommDlgBrowser
, (void **)&This
->pCommDlgBrowser
);
2132 TRACE("-- CommDlgBrowser %p\n", This
->pCommDlgBrowser
);
2134 /* If our window class has not been registered, then do so */
2135 if (!GetClassInfoW(shell32_hInstance
, SV_CLASS_NAME
, &wc
))
2137 wc
.style
= CS_HREDRAW
| CS_VREDRAW
;
2138 wc
.lpfnWndProc
= ShellView_WndProc
;
2141 wc
.hInstance
= shell32_hInstance
;
2143 wc
.hCursor
= LoadCursorW(0, (LPWSTR
)IDC_ARROW
);
2144 wc
.hbrBackground
= (HBRUSH
)(COLOR_WINDOW
+ 1);
2145 wc
.lpszMenuName
= NULL
;
2146 wc
.lpszClassName
= SV_CLASS_NAME
;
2148 if (!RegisterClassW(&wc
)) return E_FAIL
;
2151 wnd
= CreateWindowExW(0, SV_CLASS_NAME
, NULL
, WS_CHILD
| WS_TABSTOP
,
2152 view_params
->prcView
->left
, view_params
->prcView
->top
,
2153 view_params
->prcView
->right
- view_params
->prcView
->left
,
2154 view_params
->prcView
->bottom
- view_params
->prcView
->top
,
2155 This
->hWndParent
, 0, shell32_hInstance
, This
);
2161 IShellBrowser_Release(This
->pShellBrowser
);
2165 SetWindowPos(wnd
, HWND_TOP
, 0, 0, 0, 0, SWP_NOMOVE
| SWP_NOSIZE
| SWP_SHOWWINDOW
);
2168 view_params
->hwndView
= wnd
;
2173 static HRESULT WINAPI
IShellView2_fnHandleRename(IShellView2
* iface
, LPCITEMIDLIST new_pidl
)
2175 FIXME("(%p)->(new_pidl %p) stub!\n", iface
, new_pidl
);
2179 static HRESULT WINAPI
IShellView2_fnSelectAndPositionItem(IShellView2
*iface
, LPCITEMIDLIST item
,
2180 UINT flags
, POINT
*point
)
2182 IShellViewImpl
*This
= impl_from_IShellView2(iface
);
2186 TRACE("(%p)->(item %p, flags %#x, point %p)\n", This
, item
, flags
, point
);
2188 hr
= IShellView2_QueryInterface(iface
, &IID_IFolderView
, (void**)&view
);
2191 hr
= IFolderView_SelectAndPositionItems(view
, 1, &item
, point
, flags
);
2192 IFolderView_Release(view
);
2198 static const IShellView2Vtbl svvt
=
2200 IShellView_fnQueryInterface
,
2201 IShellView_fnAddRef
,
2202 IShellView_fnRelease
,
2203 IShellView_fnGetWindow
,
2204 IShellView_fnContextSensitiveHelp
,
2205 IShellView_fnTranslateAccelerator
,
2206 IShellView_fnEnableModeless
,
2207 IShellView_fnUIActivate
,
2208 IShellView_fnRefresh
,
2209 IShellView_fnCreateViewWindow
,
2210 IShellView_fnDestroyViewWindow
,
2211 IShellView_fnGetCurrentInfo
,
2212 IShellView_fnAddPropertySheetPages
,
2213 IShellView_fnSaveViewState
,
2214 IShellView_fnSelectItem
,
2215 IShellView_fnGetItemObject
,
2216 IShellView2_fnGetView
,
2217 IShellView2_fnCreateViewWindow2
,
2218 IShellView2_fnHandleRename
,
2219 IShellView2_fnSelectAndPositionItem
,
2223 /**********************************************************
2224 * ISVOleCmdTarget_QueryInterface (IUnknown)
2226 static HRESULT WINAPI
ISVOleCmdTarget_QueryInterface(
2227 IOleCommandTarget
* iface
,
2231 IShellViewImpl
*This
= impl_from_IOleCommandTarget(iface
);
2233 return IShellView2_QueryInterface(&This
->IShellView2_iface
, iid
, ppvObj
);
2236 /**********************************************************
2237 * ISVOleCmdTarget_AddRef (IUnknown)
2239 static ULONG WINAPI
ISVOleCmdTarget_AddRef(
2240 IOleCommandTarget
* iface
)
2242 IShellViewImpl
*This
= impl_from_IOleCommandTarget(iface
);
2244 return IShellView2_AddRef(&This
->IShellView2_iface
);
2247 /**********************************************************
2248 * ISVOleCmdTarget_Release (IUnknown)
2250 static ULONG WINAPI
ISVOleCmdTarget_Release(
2251 IOleCommandTarget
* iface
)
2253 IShellViewImpl
*This
= impl_from_IOleCommandTarget(iface
);
2255 return IShellView2_Release(&This
->IShellView2_iface
);
2258 /**********************************************************
2259 * ISVOleCmdTarget_QueryStatus (IOleCommandTarget)
2261 static HRESULT WINAPI
ISVOleCmdTarget_QueryStatus(
2262 IOleCommandTarget
*iface
,
2263 const GUID
*pguidCmdGroup
,
2266 OLECMDTEXT
*pCmdText
)
2268 IShellViewImpl
*This
= impl_from_IOleCommandTarget(iface
);
2271 FIXME("(%p)->(%s %d %p %p)\n",
2272 This
, debugstr_guid(pguidCmdGroup
), cCmds
, prgCmds
, pCmdText
);
2275 return E_INVALIDARG
;
2276 for (i
= 0; i
< cCmds
; i
++)
2278 FIXME("\tprgCmds[%d].cmdID = %d\n", i
, prgCmds
[i
].cmdID
);
2279 prgCmds
[i
].cmdf
= 0;
2281 return OLECMDERR_E_UNKNOWNGROUP
;
2284 /**********************************************************
2285 * ISVOleCmdTarget_Exec (IOleCommandTarget)
2287 * nCmdID is the OLECMDID_* enumeration
2289 static HRESULT WINAPI
ISVOleCmdTarget_Exec(
2290 IOleCommandTarget
*iface
,
2291 const GUID
* pguidCmdGroup
,
2297 IShellViewImpl
*This
= impl_from_IOleCommandTarget(iface
);
2299 FIXME("(%p)->(\n\tTarget GUID:%s Command:0x%08x Opt:0x%08x %p %p)\n",
2300 This
, debugstr_guid(pguidCmdGroup
), nCmdID
, nCmdexecopt
, pvaIn
, pvaOut
);
2303 return OLECMDERR_E_UNKNOWNGROUP
;
2304 if (IsEqualIID(pguidCmdGroup
, &CGID_Explorer
) &&
2306 (nCmdexecopt
== 4) && pvaOut
)
2308 if (IsEqualIID(pguidCmdGroup
, &CGID_ShellDocView
) &&
2313 return OLECMDERR_E_UNKNOWNGROUP
;
2316 static const IOleCommandTargetVtbl ctvt
=
2318 ISVOleCmdTarget_QueryInterface
,
2319 ISVOleCmdTarget_AddRef
,
2320 ISVOleCmdTarget_Release
,
2321 ISVOleCmdTarget_QueryStatus
,
2322 ISVOleCmdTarget_Exec
2325 /**********************************************************
2326 * ISVDropTarget implementation
2329 static HRESULT WINAPI
ISVDropTarget_QueryInterface(
2334 IShellViewImpl
*This
= impl_from_IDropTarget(iface
);
2336 TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This
,debugstr_guid(riid
),ppvObj
);
2338 return IShellView2_QueryInterface(&This
->IShellView2_iface
, riid
, ppvObj
);
2341 static ULONG WINAPI
ISVDropTarget_AddRef( IDropTarget
*iface
)
2343 IShellViewImpl
*This
= impl_from_IDropTarget(iface
);
2345 TRACE("(%p)->(count=%u)\n",This
,This
->ref
);
2347 return IShellView2_AddRef(&This
->IShellView2_iface
);
2350 static ULONG WINAPI
ISVDropTarget_Release( IDropTarget
*iface
)
2352 IShellViewImpl
*This
= impl_from_IDropTarget(iface
);
2354 TRACE("(%p)->(count=%u)\n",This
,This
->ref
);
2356 return IShellView2_Release(&This
->IShellView2_iface
);
2359 /******************************************************************************
2360 * drag_notify_subitem [Internal]
2362 * Figure out the shellfolder object, which is currently under the mouse cursor
2363 * and notify it via the IDropTarget interface.
2366 #define SCROLLAREAWIDTH 20
2368 static HRESULT
drag_notify_subitem(IShellViewImpl
*This
, DWORD grfKeyState
, POINTL pt
,
2371 LVHITTESTINFO htinfo
;
2377 /* Map from global to client coordinates and query the index of the listview-item, which is
2378 * currently under the mouse cursor. */
2381 htinfo
.flags
= LVHT_ONITEM
;
2382 ScreenToClient(This
->hWndList
, &htinfo
.pt
);
2383 lResult
= SendMessageW(This
->hWndList
, LVM_HITTEST
, 0, (LPARAM
)&htinfo
);
2385 /* Send WM_*SCROLL messages every 250 ms during drag-scrolling */
2386 GetClientRect(This
->hWndList
, &clientRect
);
2387 if (htinfo
.pt
.x
== This
->ptLastMousePos
.x
&& htinfo
.pt
.y
== This
->ptLastMousePos
.y
&&
2388 (htinfo
.pt
.x
< SCROLLAREAWIDTH
|| htinfo
.pt
.x
> clientRect
.right
- SCROLLAREAWIDTH
||
2389 htinfo
.pt
.y
< SCROLLAREAWIDTH
|| htinfo
.pt
.y
> clientRect
.bottom
- SCROLLAREAWIDTH
))
2391 This
->cScrollDelay
= (This
->cScrollDelay
+ 1) % 5; /* DragOver is called every 50 ms */
2392 if (This
->cScrollDelay
== 0) { /* Mouse did hover another 250 ms over the scroll-area */
2393 if (htinfo
.pt
.x
< SCROLLAREAWIDTH
)
2394 SendMessageW(This
->hWndList
, WM_HSCROLL
, SB_LINEUP
, 0);
2395 if (htinfo
.pt
.x
> clientRect
.right
- SCROLLAREAWIDTH
)
2396 SendMessageW(This
->hWndList
, WM_HSCROLL
, SB_LINEDOWN
, 0);
2397 if (htinfo
.pt
.y
< SCROLLAREAWIDTH
)
2398 SendMessageW(This
->hWndList
, WM_VSCROLL
, SB_LINEUP
, 0);
2399 if (htinfo
.pt
.y
> clientRect
.bottom
- SCROLLAREAWIDTH
)
2400 SendMessageW(This
->hWndList
, WM_VSCROLL
, SB_LINEDOWN
, 0);
2403 This
->cScrollDelay
= 0; /* Reset, if the cursor is not over the listview's scroll-area */
2405 This
->ptLastMousePos
= htinfo
.pt
;
2407 /* If we are still over the previous sub-item, notify it via DragOver and return. */
2408 if (This
->pCurDropTarget
&& lResult
== This
->iDragOverItem
)
2409 return IDropTarget_DragOver(This
->pCurDropTarget
, grfKeyState
, pt
, pdwEffect
);
2411 /* We've left the previous sub-item, notify it via DragLeave and Release it. */
2412 if (This
->pCurDropTarget
) {
2413 IDropTarget_DragLeave(This
->pCurDropTarget
);
2414 IDropTarget_Release(This
->pCurDropTarget
);
2415 This
->pCurDropTarget
= NULL
;
2418 This
->iDragOverItem
= lResult
;
2419 if (lResult
== -1) {
2420 /* We are not above one of the listview's subitems. Bind to the parent folder's
2421 * DropTarget interface. */
2422 hr
= IShellFolder_QueryInterface(This
->pSFParent
, &IID_IDropTarget
,
2423 (LPVOID
*)&This
->pCurDropTarget
);
2425 /* Query the relative PIDL of the shellfolder object represented by the currently
2426 * dragged over listview-item ... */
2427 lvItem
.mask
= LVIF_PARAM
;
2428 lvItem
.iItem
= lResult
;
2429 lvItem
.iSubItem
= 0;
2430 SendMessageW(This
->hWndList
, LVM_GETITEMW
, 0, (LPARAM
) &lvItem
);
2432 /* ... and bind pCurDropTarget to the IDropTarget interface of an UIObject of this object */
2433 hr
= IShellFolder_GetUIObjectOf(This
->pSFParent
, This
->hWndList
, 1,
2434 (LPCITEMIDLIST
*)&lvItem
.lParam
, &IID_IDropTarget
, NULL
, (LPVOID
*)&This
->pCurDropTarget
);
2437 /* If anything failed, pCurDropTarget should be NULL now, which ought to be a save state. */
2441 /* Notify the item just entered via DragEnter. */
2442 return IDropTarget_DragEnter(This
->pCurDropTarget
, This
->pCurDataObject
, grfKeyState
, pt
, pdwEffect
);
2445 static HRESULT WINAPI
ISVDropTarget_DragEnter(IDropTarget
*iface
, IDataObject
*pDataObject
,
2446 DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
)
2448 IShellViewImpl
*This
= impl_from_IDropTarget(iface
);
2450 /* Get a hold on the data object for later calls to DragEnter on the sub-folders */
2451 This
->pCurDataObject
= pDataObject
;
2452 IDataObject_AddRef(pDataObject
);
2454 return drag_notify_subitem(This
, grfKeyState
, pt
, pdwEffect
);
2457 static HRESULT WINAPI
ISVDropTarget_DragOver(IDropTarget
*iface
, DWORD grfKeyState
, POINTL pt
,
2460 IShellViewImpl
*This
= impl_from_IDropTarget(iface
);
2461 return drag_notify_subitem(This
, grfKeyState
, pt
, pdwEffect
);
2464 static HRESULT WINAPI
ISVDropTarget_DragLeave(IDropTarget
*iface
)
2466 IShellViewImpl
*This
= impl_from_IDropTarget(iface
);
2468 if (This
->pCurDropTarget
)
2470 IDropTarget_DragLeave(This
->pCurDropTarget
);
2471 IDropTarget_Release(This
->pCurDropTarget
);
2472 This
->pCurDropTarget
= NULL
;
2475 if (This
->pCurDataObject
)
2477 IDataObject_Release(This
->pCurDataObject
);
2478 This
->pCurDataObject
= NULL
;
2481 This
->iDragOverItem
= 0;
2486 static HRESULT WINAPI
ISVDropTarget_Drop(IDropTarget
*iface
, IDataObject
* pDataObject
,
2487 DWORD grfKeyState
, POINTL pt
, DWORD
*pdwEffect
)
2489 IShellViewImpl
*This
= impl_from_IDropTarget(iface
);
2491 IDropTarget_Drop(This
->pCurDropTarget
, pDataObject
, grfKeyState
, pt
, pdwEffect
);
2493 IDropTarget_Release(This
->pCurDropTarget
);
2494 IDataObject_Release(This
->pCurDataObject
);
2495 This
->pCurDataObject
= NULL
;
2496 This
->pCurDropTarget
= NULL
;
2497 This
->iDragOverItem
= 0;
2502 static const IDropTargetVtbl dtvt
=
2504 ISVDropTarget_QueryInterface
,
2505 ISVDropTarget_AddRef
,
2506 ISVDropTarget_Release
,
2507 ISVDropTarget_DragEnter
,
2508 ISVDropTarget_DragOver
,
2509 ISVDropTarget_DragLeave
,
2513 /**********************************************************
2514 * ISVDropSource implementation
2517 static HRESULT WINAPI
ISVDropSource_QueryInterface(
2522 IShellViewImpl
*This
= impl_from_IDropSource(iface
);
2524 TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This
,debugstr_guid(riid
),ppvObj
);
2526 return IShellView2_QueryInterface(&This
->IShellView2_iface
, riid
, ppvObj
);
2529 static ULONG WINAPI
ISVDropSource_AddRef( IDropSource
*iface
)
2531 IShellViewImpl
*This
= impl_from_IDropSource(iface
);
2533 TRACE("(%p)->(count=%u)\n",This
,This
->ref
);
2535 return IShellView2_AddRef(&This
->IShellView2_iface
);
2538 static ULONG WINAPI
ISVDropSource_Release( IDropSource
*iface
)
2540 IShellViewImpl
*This
= impl_from_IDropSource(iface
);
2542 TRACE("(%p)->(count=%u)\n",This
,This
->ref
);
2544 return IShellView2_Release(&This
->IShellView2_iface
);
2547 static HRESULT WINAPI
ISVDropSource_QueryContinueDrag(
2549 BOOL fEscapePressed
,
2552 IShellViewImpl
*This
= impl_from_IDropSource(iface
);
2553 TRACE("(%p)\n",This
);
2556 return DRAGDROP_S_CANCEL
;
2557 else if (!(grfKeyState
& MK_LBUTTON
) && !(grfKeyState
& MK_RBUTTON
))
2558 return DRAGDROP_S_DROP
;
2563 static HRESULT WINAPI
ISVDropSource_GiveFeedback(
2567 IShellViewImpl
*This
= impl_from_IDropSource(iface
);
2568 TRACE("(%p)\n",This
);
2570 return DRAGDROP_S_USEDEFAULTCURSORS
;
2573 static const IDropSourceVtbl dsvt
=
2575 ISVDropSource_QueryInterface
,
2576 ISVDropSource_AddRef
,
2577 ISVDropSource_Release
,
2578 ISVDropSource_QueryContinueDrag
,
2579 ISVDropSource_GiveFeedback
2581 /**********************************************************
2582 * ISVViewObject implementation
2585 static HRESULT WINAPI
ISVViewObject_QueryInterface(
2590 IShellViewImpl
*This
= impl_from_IViewObject(iface
);
2592 TRACE("(%p)->(\n\tIID:\t%s,%p)\n",This
,debugstr_guid(riid
),ppvObj
);
2594 return IShellView2_QueryInterface(&This
->IShellView2_iface
, riid
, ppvObj
);
2597 static ULONG WINAPI
ISVViewObject_AddRef( IViewObject
*iface
)
2599 IShellViewImpl
*This
= impl_from_IViewObject(iface
);
2601 TRACE("(%p)->(count=%u)\n",This
,This
->ref
);
2603 return IShellView2_AddRef(&This
->IShellView2_iface
);
2606 static ULONG WINAPI
ISVViewObject_Release( IViewObject
*iface
)
2608 IShellViewImpl
*This
= impl_from_IViewObject(iface
);
2610 TRACE("(%p)->(count=%u)\n",This
,This
->ref
);
2612 return IShellView2_Release(&This
->IShellView2_iface
);
2615 static HRESULT WINAPI
ISVViewObject_Draw(
2620 DVTARGETDEVICE
* ptd
,
2623 LPCRECTL lprcBounds
,
2624 LPCRECTL lprcWBounds
,
2625 BOOL (CALLBACK
*pfnContinue
)(ULONG_PTR dwContinue
),
2626 ULONG_PTR dwContinue
)
2629 IShellViewImpl
*This
= impl_from_IViewObject(iface
);
2631 FIXME("Stub: This=%p\n",This
);
2635 static HRESULT WINAPI
ISVViewObject_GetColorSet(
2640 DVTARGETDEVICE
* ptd
,
2641 HDC hicTargetDevice
,
2642 LOGPALETTE
** ppColorSet
)
2645 IShellViewImpl
*This
= impl_from_IViewObject(iface
);
2647 FIXME("Stub: This=%p\n",This
);
2651 static HRESULT WINAPI
ISVViewObject_Freeze(
2659 IShellViewImpl
*This
= impl_from_IViewObject(iface
);
2661 FIXME("Stub: This=%p\n",This
);
2665 static HRESULT WINAPI
ISVViewObject_Unfreeze(
2670 IShellViewImpl
*This
= impl_from_IViewObject(iface
);
2672 FIXME("Stub: This=%p\n",This
);
2676 static HRESULT WINAPI
ISVViewObject_SetAdvise(
2680 IAdviseSink
* pAdvSink
)
2683 IShellViewImpl
*This
= impl_from_IViewObject(iface
);
2685 FIXME("partial stub: %p %08x %08x %p\n",
2686 This
, aspects
, advf
, pAdvSink
);
2688 /* FIXME: we set the AdviseSink, but never use it to send any advice */
2689 This
->pAdvSink
= pAdvSink
;
2690 This
->dwAspects
= aspects
;
2691 This
->dwAdvf
= advf
;
2696 static HRESULT WINAPI
ISVViewObject_GetAdvise(
2700 IAdviseSink
** ppAdvSink
)
2703 IShellViewImpl
*This
= impl_from_IViewObject(iface
);
2705 TRACE("This=%p pAspects=%p pAdvf=%p ppAdvSink=%p\n",
2706 This
, pAspects
, pAdvf
, ppAdvSink
);
2710 IAdviseSink_AddRef( This
->pAdvSink
);
2711 *ppAdvSink
= This
->pAdvSink
;
2714 *pAspects
= This
->dwAspects
;
2716 *pAdvf
= This
->dwAdvf
;
2722 static const IViewObjectVtbl vovt
=
2724 ISVViewObject_QueryInterface
,
2725 ISVViewObject_AddRef
,
2726 ISVViewObject_Release
,
2728 ISVViewObject_GetColorSet
,
2729 ISVViewObject_Freeze
,
2730 ISVViewObject_Unfreeze
,
2731 ISVViewObject_SetAdvise
,
2732 ISVViewObject_GetAdvise
2736 static HRESULT WINAPI
IFView_QueryInterface(
2741 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2742 TRACE("(%p)->(IID:%s,%p)\n", This
, debugstr_guid(riid
), ppvObj
);
2743 return IShellView2_QueryInterface(&This
->IShellView2_iface
, riid
, ppvObj
);
2746 static ULONG WINAPI
IFView_AddRef( IFolderView
*iface
)
2748 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2749 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
2750 return IShellView2_AddRef(&This
->IShellView2_iface
);
2753 static ULONG WINAPI
IFView_Release( IFolderView
*iface
)
2755 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2756 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
2757 return IShellView2_Release(&This
->IShellView2_iface
);
2760 static HRESULT WINAPI
IFView_GetCurrentViewMode(IFolderView
*iface
, UINT
*mode
)
2762 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2763 TRACE("(%p)->(%p), stub\n", This
, mode
);
2766 return E_INVALIDARG
;
2768 *mode
= This
->FolderSettings
.ViewMode
;
2772 static HRESULT WINAPI
IFView_SetCurrentViewMode(IFolderView
*iface
, UINT mode
)
2774 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2776 TRACE("(%p)->(%u), stub\n", This
, mode
);
2778 if((mode
< FVM_FIRST
|| mode
> FVM_LAST
) &&
2780 return E_INVALIDARG
;
2782 /* Windows before Vista uses LVM_SETVIEW and possibly
2783 LVM_SETEXTENDEDLISTVIEWSTYLE to set the style of the listview,
2784 while later versions seem to accomplish this through other
2786 dwStyle
= ViewModeToListStyle(mode
);
2787 SetStyle(This
, dwStyle
, LVS_TYPEMASK
);
2789 /* This will not necessarily be the actual mode set above.
2790 This mimics the behavior of Windows XP. */
2791 This
->FolderSettings
.ViewMode
= mode
;
2796 static HRESULT WINAPI
IFView_GetFolder(IFolderView
*iface
, REFIID riid
, void **ppv
)
2798 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2800 TRACE("(%p)->(%s, %p)\n", This
, debugstr_guid(riid
), ppv
);
2802 if (!ppv
) return E_POINTER
;
2804 if (IsEqualIID(riid
, &IID_IShellFolder
))
2806 *ppv
= This
->pSFParent
;
2810 return E_NOINTERFACE
;
2813 static HRESULT WINAPI
IFView_Item(IFolderView
*iface
, int index
, PITEMID_CHILD
*ppidl
)
2815 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2818 TRACE("(%p)->(%d %p)\n", This
, index
, ppidl
);
2820 item
.mask
= LVIF_PARAM
;
2823 if (SendMessageW(This
->hWndList
, LVM_GETITEMW
, 0, (LPARAM
)&item
))
2825 *ppidl
= ILClone((PITEMID_CHILD
)item
.lParam
);
2831 return E_INVALIDARG
;
2835 static HRESULT WINAPI
IFView_ItemCount(IFolderView
*iface
, UINT flags
, int *items
)
2837 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2839 TRACE("(%p)->(%u %p)\n", This
, flags
, items
);
2841 if (flags
!= SVGIO_ALLVIEW
)
2842 FIXME("some flags unsupported, %x\n", flags
& ~SVGIO_ALLVIEW
);
2844 *items
= SendMessageW(This
->hWndList
, LVM_GETITEMCOUNT
, 0, 0);
2849 static HRESULT WINAPI
IFView_Items(IFolderView
*iface
, UINT flags
, REFIID riid
, void **ppv
)
2851 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2852 FIXME("(%p)->(%u %s %p), stub\n", This
, flags
, debugstr_guid(riid
), ppv
);
2856 static HRESULT WINAPI
IFView_GetSelectionMarkedItem(IFolderView
*iface
, int *item
)
2858 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2860 TRACE("(%p)->(%p)\n", This
, item
);
2862 *item
= SendMessageW(This
->hWndList
, LVM_GETSELECTIONMARK
, 0, 0);
2867 static HRESULT WINAPI
IFView_GetFocusedItem(IFolderView
*iface
, int *item
)
2869 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2871 TRACE("(%p)->(%p)\n", This
, item
);
2873 *item
= SendMessageW(This
->hWndList
, LVM_GETNEXTITEM
, -1, LVNI_FOCUSED
);
2878 static HRESULT WINAPI
IFView_GetItemPosition(IFolderView
*iface
, PCUITEMID_CHILD pidl
, POINT
*ppt
)
2880 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2881 FIXME("(%p)->(%p %p), stub\n", This
, pidl
, ppt
);
2885 static HRESULT WINAPI
IFView_GetSpacing(IFolderView
*iface
, POINT
*pt
)
2887 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2889 TRACE("(%p)->(%p)\n", This
, pt
);
2891 if (!This
->hWndList
) return S_FALSE
;
2896 ret
= SendMessageW(This
->hWndList
, LVM_GETITEMSPACING
, 0, 0);
2898 pt
->x
= LOWORD(ret
);
2899 pt
->y
= HIWORD(ret
);
2905 static HRESULT WINAPI
IFView_GetDefaultSpacing(IFolderView
*iface
, POINT
*pt
)
2907 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2908 FIXME("(%p)->(%p), stub\n", This
, pt
);
2912 static HRESULT WINAPI
IFView_GetAutoArrange(IFolderView
*iface
)
2914 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2915 FIXME("(%p), stub\n", This
);
2919 static HRESULT WINAPI
IFView_SelectItem(IFolderView
*iface
, int item
, DWORD flags
)
2921 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2924 TRACE("(%p)->(%d, %x)\n", This
, item
, flags
);
2927 lvItem
.stateMask
= LVIS_SELECTED
;
2929 if (flags
& SVSI_ENSUREVISIBLE
)
2930 SendMessageW(This
->hWndList
, LVM_ENSUREVISIBLE
, item
, 0);
2933 if (flags
& SVSI_DESELECTOTHERS
)
2934 SendMessageW(This
->hWndList
, LVM_SETITEMSTATE
, -1, (LPARAM
)&lvItem
);
2937 if (flags
& SVSI_SELECT
)
2938 lvItem
.state
|= LVIS_SELECTED
;
2940 if (flags
& SVSI_FOCUSED
)
2941 lvItem
.stateMask
|= LVIS_FOCUSED
;
2943 SendMessageW(This
->hWndList
, LVM_SETITEMSTATE
, item
, (LPARAM
)&lvItem
);
2945 if (flags
& SVSI_EDIT
)
2946 SendMessageW(This
->hWndList
, LVM_EDITLABELW
, item
, 0);
2951 static HRESULT WINAPI
IFView_SelectAndPositionItems(IFolderView
*iface
, UINT cidl
,
2952 PCUITEMID_CHILD_ARRAY apidl
, POINT
*apt
, DWORD flags
)
2954 IShellViewImpl
*This
= impl_from_IFolderView(iface
);
2955 FIXME("(%p)->(%u %p %p %x), stub\n", This
, cidl
, apidl
, apt
, flags
);
2959 static const IFolderViewVtbl fviewvt
=
2961 IFView_QueryInterface
,
2964 IFView_GetCurrentViewMode
,
2965 IFView_SetCurrentViewMode
,
2970 IFView_GetSelectionMarkedItem
,
2971 IFView_GetFocusedItem
,
2972 IFView_GetItemPosition
,
2974 IFView_GetDefaultSpacing
,
2975 IFView_GetAutoArrange
,
2977 IFView_SelectAndPositionItems
2980 /* IShellFolderView */
2981 static HRESULT WINAPI
IShellFolderView_fnQueryInterface(
2982 IShellFolderView
*iface
,
2986 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
2987 TRACE("(%p)->(IID:%s,%p)\n", This
, debugstr_guid(riid
), ppvObj
);
2988 return IShellView2_QueryInterface(&This
->IShellView2_iface
, riid
, ppvObj
);
2991 static ULONG WINAPI
IShellFolderView_fnAddRef(IShellFolderView
*iface
)
2993 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
2994 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
2995 return IShellView2_AddRef(&This
->IShellView2_iface
);
2998 static ULONG WINAPI
IShellFolderView_fnRelease(IShellFolderView
*iface
)
3000 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3001 TRACE("(%p)->(count=%u)\n", This
, This
->ref
);
3002 return IShellView2_Release(&This
->IShellView2_iface
);
3005 static HRESULT WINAPI
IShellFolderView_fnRearrange(IShellFolderView
*iface
, LPARAM sort
)
3007 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3008 FIXME("(%p)->(%ld) stub\n", This
, sort
);
3012 static HRESULT WINAPI
IShellFolderView_fnGetArrangeParam(IShellFolderView
*iface
, LPARAM
*sort
)
3014 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3015 FIXME("(%p)->(%p) stub\n", This
, sort
);
3019 static HRESULT WINAPI
IShellFolderView_fnArrangeGrid(IShellFolderView
*iface
)
3021 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3022 FIXME("(%p) stub\n", This
);
3026 static HRESULT WINAPI
IShellFolderView_fnAutoArrange(IShellFolderView
*iface
)
3028 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3029 FIXME("(%p) stub\n", This
);
3033 static HRESULT WINAPI
IShellFolderView_fnGetAutoArrange(IShellFolderView
*iface
)
3035 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3036 IFolderView
*view
= &This
->IFolderView_iface
;
3038 TRACE("(%p)\n", This
);
3039 return IFolderView_GetAutoArrange(view
);
3042 static HRESULT WINAPI
IShellFolderView_fnAddObject(
3043 IShellFolderView
*iface
,
3047 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3048 FIXME("(%p)->(%p %p) stub\n", This
, pidl
, item
);
3052 static HRESULT WINAPI
IShellFolderView_fnGetObject(
3053 IShellFolderView
*iface
,
3054 PITEMID_CHILD
*pidl
,
3057 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3058 IFolderView
*view
= &This
->IFolderView_iface
;
3060 TRACE("(%p)->(%p %d)\n", This
, pidl
, item
);
3061 return IFolderView_Item(view
, item
, pidl
);
3064 static HRESULT WINAPI
IShellFolderView_fnRemoveObject(
3065 IShellFolderView
*iface
,
3069 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3071 TRACE("(%p)->(%p %p)\n", This
, pidl
, item
);
3075 *item
= LV_FindItemByPidl(This
, ILFindLastID(pidl
));
3076 SendMessageW(This
->hWndList
, LVM_DELETEITEM
, *item
, 0);
3081 SendMessageW(This
->hWndList
, LVM_DELETEALLITEMS
, 0, 0);
3087 static HRESULT WINAPI
IShellFolderView_fnGetObjectCount(
3088 IShellFolderView
*iface
,
3091 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3092 IFolderView
*view
= &This
->IFolderView_iface
;
3094 TRACE("(%p)->(%p)\n", This
, count
);
3095 return IFolderView_ItemCount(view
, SVGIO_ALLVIEW
, (INT
*)count
);
3098 static HRESULT WINAPI
IShellFolderView_fnSetObjectCount(
3099 IShellFolderView
*iface
,
3103 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3104 FIXME("(%p)->(%d %x) stub\n", This
, count
, flags
);
3108 static HRESULT WINAPI
IShellFolderView_fnUpdateObject(
3109 IShellFolderView
*iface
,
3110 PITEMID_CHILD pidl_old
,
3111 PITEMID_CHILD pidl_new
,
3114 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3115 FIXME("(%p)->(%p %p %p) stub\n", This
, pidl_old
, pidl_new
, item
);
3119 static HRESULT WINAPI
IShellFolderView_fnRefreshObject(
3120 IShellFolderView
*iface
,
3124 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3125 FIXME("(%p)->(%p %p) stub\n", This
, pidl
, item
);
3129 static HRESULT WINAPI
IShellFolderView_fnSetRedraw(
3130 IShellFolderView
*iface
,
3133 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3134 TRACE("(%p)->(%d)\n", This
, redraw
);
3136 SendMessageW(This
->hWndList
, WM_SETREDRAW
, redraw
, 0);
3141 static HRESULT WINAPI
IShellFolderView_fnGetSelectedCount(
3142 IShellFolderView
*iface
,
3145 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3146 FIXME("(%p)->(%p) stub\n", This
, count
);
3150 static HRESULT WINAPI
IShellFolderView_fnGetSelectedObjects(
3151 IShellFolderView
*iface
,
3152 PCITEMID_CHILD
**pidl
,
3155 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3157 TRACE("(%p)->(%p %p)\n", This
, pidl
, items
);
3159 *items
= ShellView_GetSelections( This
);
3163 *pidl
= LocalAlloc(0, *items
*sizeof(LPITEMIDLIST
));
3164 if (!*pidl
) return E_OUTOFMEMORY
;
3166 /* it's documented that caller shouldn't free PIDLs, only array itself */
3167 memcpy((PITEMID_CHILD
*)*pidl
, This
->apidl
, *items
*sizeof(LPITEMIDLIST
));
3173 static HRESULT WINAPI
IShellFolderView_fnIsDropOnSource(
3174 IShellFolderView
*iface
,
3175 IDropTarget
*drop_target
)
3177 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3178 FIXME("(%p)->(%p) stub\n", This
, drop_target
);
3182 static HRESULT WINAPI
IShellFolderView_fnGetDragPoint(
3183 IShellFolderView
*iface
,
3186 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3187 FIXME("(%p)->(%p) stub\n", This
, pt
);
3191 static HRESULT WINAPI
IShellFolderView_fnGetDropPoint(
3192 IShellFolderView
*iface
,
3195 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3196 FIXME("(%p)->(%p) stub\n", This
, pt
);
3200 static HRESULT WINAPI
IShellFolderView_fnMoveIcons(
3201 IShellFolderView
*iface
,
3204 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3205 TRACE("(%p)->(%p)\n", This
, obj
);
3209 static HRESULT WINAPI
IShellFolderView_fnSetItemPos(
3210 IShellFolderView
*iface
,
3211 PCUITEMID_CHILD pidl
,
3214 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3215 FIXME("(%p)->(%p %p) stub\n", This
, pidl
, pt
);
3219 static HRESULT WINAPI
IShellFolderView_fnIsBkDropTarget(
3220 IShellFolderView
*iface
,
3221 IDropTarget
*drop_target
)
3223 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3224 FIXME("(%p)->(%p) stub\n", This
, drop_target
);
3228 static HRESULT WINAPI
IShellFolderView_fnSetClipboard(
3229 IShellFolderView
*iface
,
3232 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3233 FIXME("(%p)->(%d) stub\n", This
, move
);
3237 static HRESULT WINAPI
IShellFolderView_fnSetPoints(
3238 IShellFolderView
*iface
,
3241 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3242 FIXME("(%p)->(%p) stub\n", This
, obj
);
3246 static HRESULT WINAPI
IShellFolderView_fnGetItemSpacing(
3247 IShellFolderView
*iface
,
3248 ITEMSPACING
*spacing
)
3250 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3251 FIXME("(%p)->(%p) stub\n", This
, spacing
);
3255 static HRESULT WINAPI
IShellFolderView_fnSetCallback(
3256 IShellFolderView
*iface
,
3257 IShellFolderViewCB
*new_cb
,
3258 IShellFolderViewCB
**old_cb
)
3261 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3262 FIXME("(%p)->(%p %p) stub\n", This
, new_cb
, old_cb
);
3266 static HRESULT WINAPI
IShellFolderView_fnSelect(
3267 IShellFolderView
*iface
,
3270 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3271 FIXME("(%p)->(%d) stub\n", This
, flags
);
3275 static HRESULT WINAPI
IShellFolderView_fnQuerySupport(
3276 IShellFolderView
*iface
,
3279 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3280 TRACE("(%p)->(%p)\n", This
, support
);
3284 static HRESULT WINAPI
IShellFolderView_fnSetAutomationObject(
3285 IShellFolderView
*iface
,
3288 IShellViewImpl
*This
= impl_from_IShellFolderView(iface
);
3289 FIXME("(%p)->(%p) stub\n", This
, disp
);
3293 static const IShellFolderViewVtbl shellfolderviewvt
=
3295 IShellFolderView_fnQueryInterface
,
3296 IShellFolderView_fnAddRef
,
3297 IShellFolderView_fnRelease
,
3298 IShellFolderView_fnRearrange
,
3299 IShellFolderView_fnGetArrangeParam
,
3300 IShellFolderView_fnArrangeGrid
,
3301 IShellFolderView_fnAutoArrange
,
3302 IShellFolderView_fnGetAutoArrange
,
3303 IShellFolderView_fnAddObject
,
3304 IShellFolderView_fnGetObject
,
3305 IShellFolderView_fnRemoveObject
,
3306 IShellFolderView_fnGetObjectCount
,
3307 IShellFolderView_fnSetObjectCount
,
3308 IShellFolderView_fnUpdateObject
,
3309 IShellFolderView_fnRefreshObject
,
3310 IShellFolderView_fnSetRedraw
,
3311 IShellFolderView_fnGetSelectedCount
,
3312 IShellFolderView_fnGetSelectedObjects
,
3313 IShellFolderView_fnIsDropOnSource
,
3314 IShellFolderView_fnGetDragPoint
,
3315 IShellFolderView_fnGetDropPoint
,
3316 IShellFolderView_fnMoveIcons
,
3317 IShellFolderView_fnSetItemPos
,
3318 IShellFolderView_fnIsBkDropTarget
,
3319 IShellFolderView_fnSetClipboard
,
3320 IShellFolderView_fnSetPoints
,
3321 IShellFolderView_fnGetItemSpacing
,
3322 IShellFolderView_fnSetCallback
,
3323 IShellFolderView_fnSelect
,
3324 IShellFolderView_fnQuerySupport
,
3325 IShellFolderView_fnSetAutomationObject