git.oblomov.eu Git - wine/blob - dlls/shell32/shlview.c

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