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