shell32: Replaced printer.ico with a Tango compliant icon.
[wine] / dlls / shell32 / shfldr_mycomp.c
1 /*
2  *    Virtual Workplace folder
3  *
4  *    Copyright 1997            Marcus Meissner
5  *    Copyright 1998, 1999, 2002    Juergen Schmied
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 #include "config.h"
23 #include "wine/port.h"
24
25 #include <stdlib.h>
26 #include <string.h>
27 #include <stdarg.h>
28 #include <stdio.h>
29
30 #define COBJMACROS
31 #define NONAMELESSUNION
32 #define NONAMELESSSTRUCT
33
34 #include "winerror.h"
35 #include "windef.h"
36 #include "winbase.h"
37 #include "winreg.h"
38
39 #include "wingdi.h"
40 #include "pidl.h"
41 #include "shlguid.h"
42 #include "enumidlist.h"
43 #include "undocshell.h"
44 #include "shell32_main.h"
45 #include "shresdef.h"
46 #include "shlwapi.h"
47 #include "wine/debug.h"
48 #include "debughlp.h"
49 #include "shfldr.h"
50
51 WINE_DEFAULT_DEBUG_CHANNEL (shell);
52
53 /***********************************************************************
54 *   IShellFolder implementation
55 */
56
57 typedef struct {
58     const IShellFolder2Vtbl   *lpVtbl;
59     LONG                ref;
60     const IPersistFolder2Vtbl *lpVtblPersistFolder2;
61
62     /* both paths are parsible from the desktop */
63     LPITEMIDLIST pidlRoot;    /* absolute pidl */
64 } IMyComputerFolderImpl;
65
66 static const IShellFolder2Vtbl vt_ShellFolder2;
67 static const IPersistFolder2Vtbl vt_PersistFolder2;
68
69 static inline IMyComputerFolderImpl *impl_from_IPersistFolder2( IPersistFolder2 *iface )
70 {
71     return (IMyComputerFolderImpl *)((char*)iface - FIELD_OFFSET(IMyComputerFolderImpl, lpVtblPersistFolder2));
72 }
73
74
75 /*
76   converts This to an interface pointer
77 */
78 #define _IShellFolder_(This)    ((IShellFolder*)&(This)->lpVtbl)
79 #define _IShellFolder2_(This)   (&(This)->lpVtbl)
80
81 #define _IPersist_(This)        (&(This)->lpVtblPersistFolder2)
82 #define _IPersistFolder_(This)  (&(This)->lpVtblPersistFolder2)
83 #define _IPersistFolder2_(This) (&(This)->lpVtblPersistFolder2)
84
85 /***********************************************************************
86 *   IShellFolder [MyComputer] implementation
87 */
88
89 static const shvheader MyComputerSFHeader[] = {
90     {IDS_SHV_COLUMN1, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 15},
91     {IDS_SHV_COLUMN3, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10},
92     {IDS_SHV_COLUMN6, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10},
93     {IDS_SHV_COLUMN7, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10},
94 };
95
96 #define MYCOMPUTERSHELLVIEWCOLUMNS 4
97
98 /**************************************************************************
99 *    ISF_MyComputer_Constructor
100 */
101 HRESULT WINAPI ISF_MyComputer_Constructor (IUnknown * pUnkOuter, REFIID riid, LPVOID * ppv)
102 {
103     IMyComputerFolderImpl *sf;
104
105     TRACE ("unkOut=%p %s\n", pUnkOuter, shdebugstr_guid (riid));
106
107     if (!ppv)
108         return E_POINTER;
109     if (pUnkOuter)
110         return CLASS_E_NOAGGREGATION;
111
112     sf = LocalAlloc (LMEM_ZEROINIT, sizeof (IMyComputerFolderImpl));
113     if (!sf)
114         return E_OUTOFMEMORY;
115
116     sf->ref = 0;
117     sf->lpVtbl = &vt_ShellFolder2;
118     sf->lpVtblPersistFolder2 = &vt_PersistFolder2;
119     sf->pidlRoot = _ILCreateMyComputer ();    /* my qualified pidl */
120
121     if (FAILED (IUnknown_QueryInterface ((IShellFolder2 *)sf, riid, ppv)))
122     {
123         IUnknown_Release ((IShellFolder2 *) sf);
124         return E_NOINTERFACE;
125     }
126
127     TRACE ("--(%p)\n", sf);
128     return S_OK;
129 }
130
131 /**************************************************************************
132  *    ISF_MyComputer_fnQueryInterface
133  *
134  * NOTES supports not IPersist/IPersistFolder
135  */
136 static HRESULT WINAPI ISF_MyComputer_fnQueryInterface (IShellFolder2 *iface,
137                REFIID riid, LPVOID *ppvObj)
138 {
139     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
140
141     TRACE ("(%p)->(%s,%p)\n", This, shdebugstr_guid (riid), ppvObj);
142
143     *ppvObj = NULL;
144
145     if (IsEqualIID (riid, &IID_IUnknown) ||
146         IsEqualIID (riid, &IID_IShellFolder) ||
147         IsEqualIID (riid, &IID_IShellFolder2))
148     {
149         *ppvObj = This;
150     }
151     else if (IsEqualIID (riid, &IID_IPersist) ||
152              IsEqualIID (riid, &IID_IPersistFolder) ||
153              IsEqualIID (riid, &IID_IPersistFolder2))
154     {
155         *ppvObj = _IPersistFolder2_ (This);
156     }
157
158     if (*ppvObj)
159     {
160         IUnknown_AddRef ((IUnknown *) (*ppvObj));
161         TRACE ("-- Interface: (%p)->(%p)\n", ppvObj, *ppvObj);
162         return S_OK;
163     }
164     TRACE ("-- Interface: E_NOINTERFACE\n");
165     return E_NOINTERFACE;
166 }
167
168 static ULONG WINAPI ISF_MyComputer_fnAddRef (IShellFolder2 * iface)
169 {
170     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
171     ULONG refCount = InterlockedIncrement(&This->ref);
172
173     TRACE ("(%p)->(count=%u)\n", This, refCount - 1);
174
175     return refCount;
176 }
177
178 static ULONG WINAPI ISF_MyComputer_fnRelease (IShellFolder2 * iface)
179 {
180     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
181     ULONG refCount = InterlockedDecrement(&This->ref);
182
183     TRACE ("(%p)->(count=%u)\n", This, refCount + 1);
184
185     if (!refCount)
186     {
187         TRACE ("-- destroying IShellFolder(%p)\n", This);
188         SHFree (This->pidlRoot);
189         LocalFree (This);
190     }
191     return refCount;
192 }
193
194 /**************************************************************************
195 *    ISF_MyComputer_fnParseDisplayName
196 */
197 static HRESULT WINAPI ISF_MyComputer_fnParseDisplayName (IShellFolder2 *iface,
198                HWND hwndOwner, LPBC pbc, LPOLESTR lpszDisplayName,
199                DWORD * pchEaten, LPITEMIDLIST * ppidl, DWORD * pdwAttributes)
200 {
201     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
202     HRESULT hr = E_INVALIDARG;
203     LPCWSTR szNext = NULL;
204     WCHAR szElement[MAX_PATH];
205     LPITEMIDLIST pidlTemp = NULL;
206     CLSID clsid;
207
208     TRACE("(%p)->(HWND=%p,%p,%p=%s,%p,pidl=%p,%p)\n", This,
209           hwndOwner, pbc, lpszDisplayName, debugstr_w (lpszDisplayName),
210           pchEaten, ppidl, pdwAttributes);
211
212     *ppidl = 0;
213     if (pchEaten)
214         *pchEaten = 0;        /* strange but like the original */
215
216     /* handle CLSID paths */
217     if (lpszDisplayName[0] == ':' && lpszDisplayName[1] == ':')
218     {
219         szNext = GetNextElementW (lpszDisplayName, szElement, MAX_PATH);
220         TRACE ("-- element: %s\n", debugstr_w (szElement));
221         SHCLSIDFromStringW (szElement + 2, &clsid);
222         pidlTemp = _ILCreateGuid (PT_GUID, &clsid);
223     }
224     /* do we have an absolute path name ? */
225     else if (PathGetDriveNumberW (lpszDisplayName) >= 0 &&
226               lpszDisplayName[2] == (WCHAR) '\\')
227     {
228         szNext = GetNextElementW (lpszDisplayName, szElement, MAX_PATH);
229         /* make drive letter uppercase to enable PIDL comparison */
230         szElement[0] = toupper(szElement[0]);
231         pidlTemp = _ILCreateDrive (szElement);
232     }
233
234     if (szNext && *szNext)
235     {
236         hr = SHELL32_ParseNextElement (iface, hwndOwner, pbc, &pidlTemp,
237                               (LPOLESTR) szNext, pchEaten, pdwAttributes);
238     }
239     else
240     {
241         if (pdwAttributes && *pdwAttributes)
242             SHELL32_GetItemAttributes (_IShellFolder_ (This),
243                                        pidlTemp, pdwAttributes);
244         hr = S_OK;
245     }
246
247     *ppidl = pidlTemp;
248
249     TRACE ("(%p)->(-- ret=0x%08x)\n", This, hr);
250
251     return hr;
252 }
253
254 /* retrieve a map of drives that should be displayed */
255 static DWORD get_drive_map(void)
256 {
257     static const WCHAR policiesW[] = {'S','o','f','t','w','a','r','e','\\',
258                                       'M','i','c','r','o','s','o','f','t','\\',
259                                       'W','i','n','d','o','w','s','\\',
260                                       'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
261                                       'P','o','l','i','c','i','e','s','\\',
262                                       'E','x','p','l','o','r','e','r',0};
263     static const WCHAR nodrivesW[] = {'N','o','D','r','i','v','e','s',0};
264     static DWORD drive_mask, init_done;
265
266     if (!init_done)
267     {
268         DWORD type, size, data, mask = 0;
269         HKEY hkey;
270
271         if (!RegOpenKeyW( HKEY_LOCAL_MACHINE, policiesW, &hkey ))
272         {
273             size = sizeof(data);
274             if (!RegQueryValueExW( hkey, nodrivesW, NULL, &type, (LPBYTE)&data, &size ) && type == REG_DWORD)
275                 mask |= data;
276             RegCloseKey( hkey );
277         }
278         if (!RegOpenKeyW( HKEY_CURRENT_USER, policiesW, &hkey ))
279         {
280             size = sizeof(data);
281             if (!RegQueryValueExW( hkey, nodrivesW, NULL, &type, (LPBYTE)&data, &size ) && type == REG_DWORD)
282                 mask |= data;
283             RegCloseKey( hkey );
284         }
285         drive_mask = mask;
286         init_done = 1;
287     }
288
289     return GetLogicalDrives() & ~drive_mask;
290 }
291
292 /**************************************************************************
293  *  CreateMyCompEnumList()
294  */
295 static const WCHAR MyComputer_NameSpaceW[] = { 'S','O','F','T','W','A','R','E',
296  '\\','M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\',
297  'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\','E','x','p','l',
298  'o','r','e','r','\\','M','y','C','o','m','p','u','t','e','r','\\','N','a','m',
299  'e','s','p','a','c','e','\0' };
300
301 static BOOL CreateMyCompEnumList(IEnumIDList *list, DWORD dwFlags)
302 {
303     BOOL ret = TRUE;
304
305     TRACE("(%p)->(flags=0x%08x)\n", list, dwFlags);
306
307     /* enumerate the folders */
308     if (dwFlags & SHCONTF_FOLDERS)
309     {
310         WCHAR wszDriveName[] = {'A', ':', '\\', '\0'};
311         DWORD dwDrivemap = get_drive_map();
312         HKEY hkey;
313         UINT i;
314
315         while (ret && wszDriveName[0]<='Z')
316         {
317             if(dwDrivemap & 0x00000001L)
318                 ret = AddToEnumList(list, _ILCreateDrive(wszDriveName));
319             wszDriveName[0]++;
320             dwDrivemap = dwDrivemap >> 1;
321         }
322
323         TRACE("-- (%p)-> enumerate (mycomputer shell extensions)\n",list);
324         for (i=0; i<2; i++) {
325             if (ret && !RegOpenKeyExW(i == 0 ? HKEY_LOCAL_MACHINE : HKEY_CURRENT_USER,
326                                       MyComputer_NameSpaceW, 0, KEY_READ, &hkey))
327             {
328                 WCHAR iid[50];
329                 int i=0;
330
331                 while (ret)
332                 {
333                     DWORD size;
334                     LONG r;
335
336                     size = sizeof(iid) / sizeof(iid[0]);
337                     r = RegEnumKeyExW(hkey, i, iid, &size, 0, NULL, NULL, NULL);
338                     if (ERROR_SUCCESS == r)
339                     {
340                         /* FIXME: shell extensions, shouldn't the type be
341                          * PT_SHELLEXT? */
342                         ret = AddToEnumList(list, _ILCreateGuidFromStrW(iid));
343                         i++;
344                     }
345                     else if (ERROR_NO_MORE_ITEMS == r)
346                         break;
347                     else
348                         ret = FALSE;
349                 }
350                 RegCloseKey(hkey);
351             }
352         }
353     }
354     return ret;
355 }
356
357 /**************************************************************************
358 *        ISF_MyComputer_fnEnumObjects
359 */
360 static HRESULT WINAPI ISF_MyComputer_fnEnumObjects (IShellFolder2 *iface,
361                HWND hwndOwner, DWORD dwFlags, LPENUMIDLIST *ppEnumIDList)
362 {
363     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
364
365     TRACE("(%p)->(HWND=%p flags=0x%08x pplist=%p)\n", This,
366           hwndOwner, dwFlags, ppEnumIDList);
367
368     *ppEnumIDList = IEnumIDList_Constructor();
369     if (*ppEnumIDList)
370         CreateMyCompEnumList(*ppEnumIDList, dwFlags);
371
372     TRACE ("-- (%p)->(new ID List: %p)\n", This, *ppEnumIDList);
373
374     return (*ppEnumIDList) ? S_OK : E_OUTOFMEMORY;
375 }
376
377 /**************************************************************************
378 *        ISF_MyComputer_fnBindToObject
379 */
380 static HRESULT WINAPI ISF_MyComputer_fnBindToObject (IShellFolder2 *iface,
381                LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID *ppvOut)
382 {
383     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
384
385     TRACE("(%p)->(pidl=%p,%p,%s,%p)\n", This,
386           pidl, pbcReserved, shdebugstr_guid (riid), ppvOut);
387
388     return SHELL32_BindToChild (This->pidlRoot, NULL, pidl, riid, ppvOut);
389 }
390
391 /**************************************************************************
392 *    ISF_MyComputer_fnBindToStorage
393 */
394 static HRESULT WINAPI ISF_MyComputer_fnBindToStorage (IShellFolder2 * iface,
395                LPCITEMIDLIST pidl, LPBC pbcReserved, REFIID riid, LPVOID *ppvOut)
396 {
397     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
398
399     FIXME("(%p)->(pidl=%p,%p,%s,%p) stub\n", This,
400           pidl, pbcReserved, shdebugstr_guid (riid), ppvOut);
401
402     *ppvOut = NULL;
403     return E_NOTIMPL;
404 }
405
406 /**************************************************************************
407 *     ISF_MyComputer_fnCompareIDs
408 */
409
410 static HRESULT WINAPI ISF_MyComputer_fnCompareIDs (IShellFolder2 *iface,
411                LPARAM lParam, LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2)
412 {
413     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
414     HRESULT hr;
415
416     TRACE ("(%p)->(0x%08lx,pidl1=%p,pidl2=%p)\n", This, lParam, pidl1, pidl2);
417     hr = SHELL32_CompareIDs (_IShellFolder_ (This), lParam, pidl1, pidl2);
418     TRACE ("-- 0x%08x\n", hr);
419     return hr;
420 }
421
422 /**************************************************************************
423 *    ISF_MyComputer_fnCreateViewObject
424 */
425 static HRESULT WINAPI ISF_MyComputer_fnCreateViewObject (IShellFolder2 *iface,
426                HWND hwndOwner, REFIID riid, LPVOID * ppvOut)
427 {
428     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
429     LPSHELLVIEW pShellView;
430     HRESULT hr = E_INVALIDARG;
431
432     TRACE("(%p)->(hwnd=%p,%s,%p)\n", This,
433           hwndOwner, shdebugstr_guid (riid), ppvOut);
434
435     if (!ppvOut)
436         return hr;
437
438     *ppvOut = NULL;
439
440     if (IsEqualIID (riid, &IID_IDropTarget))
441     {
442         WARN ("IDropTarget not implemented\n");
443         hr = E_NOTIMPL;
444     }
445     else if (IsEqualIID (riid, &IID_IContextMenu))
446     {
447         WARN ("IContextMenu not implemented\n");
448         hr = E_NOTIMPL;
449     }
450     else if (IsEqualIID (riid, &IID_IShellView))
451     {
452         pShellView = IShellView_Constructor ((IShellFolder *) iface);
453         if (pShellView)
454         {
455             hr = IShellView_QueryInterface (pShellView, riid, ppvOut);
456             IShellView_Release (pShellView);
457         }
458     }
459     TRACE ("-- (%p)->(interface=%p)\n", This, ppvOut);
460     return hr;
461 }
462
463 /**************************************************************************
464 *  ISF_MyComputer_fnGetAttributesOf
465 */
466 static HRESULT WINAPI ISF_MyComputer_fnGetAttributesOf (IShellFolder2 * iface,
467                 UINT cidl, LPCITEMIDLIST * apidl, DWORD * rgfInOut)
468 {
469     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
470     HRESULT hr = S_OK;
471
472     TRACE ("(%p)->(cidl=%d apidl=%p mask=%p (0x%08x))\n",
473            This, cidl, apidl, rgfInOut, rgfInOut ? *rgfInOut : 0);
474
475     if (!rgfInOut)
476         return E_INVALIDARG;
477     if (cidl && !apidl)
478         return E_INVALIDARG;
479
480     if (*rgfInOut == 0)
481         *rgfInOut = ~0;
482     
483     if(cidl == 0){
484         IShellFolder *psfParent = NULL;
485         LPCITEMIDLIST rpidl = NULL;
486
487         hr = SHBindToParent(This->pidlRoot, &IID_IShellFolder, (LPVOID*)&psfParent, &rpidl);
488         if(SUCCEEDED(hr)) {
489             SHELL32_GetItemAttributes (psfParent, rpidl, rgfInOut);
490             IShellFolder_Release(psfParent);
491         }
492     } else {
493         while (cidl > 0 && *apidl) {
494             pdump (*apidl);
495             SHELL32_GetItemAttributes (_IShellFolder_ (This), *apidl, rgfInOut);
496             apidl++;
497             cidl--;
498         }
499     }
500     /* make sure SFGAO_VALIDATE is cleared, some apps depend on that */
501     *rgfInOut &= ~SFGAO_VALIDATE;
502
503     TRACE ("-- result=0x%08x\n", *rgfInOut);
504     return hr;
505 }
506
507 /**************************************************************************
508 *    ISF_MyComputer_fnGetUIObjectOf
509 *
510 * PARAMETERS
511 *  hwndOwner [in]  Parent window for any output
512 *  cidl      [in]  array size
513 *  apidl     [in]  simple pidl array
514 *  riid      [in]  Requested Interface
515 *  prgfInOut [   ] reserved
516 *  ppvObject [out] Resulting Interface
517 *
518 */
519 static HRESULT WINAPI ISF_MyComputer_fnGetUIObjectOf (IShellFolder2 * iface,
520                 HWND hwndOwner, UINT cidl, LPCITEMIDLIST * apidl, REFIID riid,
521                 UINT * prgfInOut, LPVOID * ppvOut)
522 {
523     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
524
525     LPITEMIDLIST pidl;
526     IUnknown *pObj = NULL;
527     HRESULT hr = E_INVALIDARG;
528
529     TRACE("(%p)->(%p,%u,apidl=%p,%s,%p,%p)\n", This,
530           hwndOwner, cidl, apidl, shdebugstr_guid (riid), prgfInOut, ppvOut);
531
532     if (!ppvOut)
533         return hr;
534
535     *ppvOut = NULL;
536
537     if (IsEqualIID (riid, &IID_IContextMenu) && (cidl >= 1))
538     {
539         pObj = (LPUNKNOWN) ISvItemCm_Constructor ((IShellFolder *) iface,
540                                               This->pidlRoot, apidl, cidl);
541         hr = S_OK;
542     }
543     else if (IsEqualIID (riid, &IID_IDataObject) && (cidl >= 1))
544     {
545         pObj = (LPUNKNOWN) IDataObject_Constructor (hwndOwner,
546                                               This->pidlRoot, apidl, cidl);
547         hr = S_OK;
548     }
549     else if (IsEqualIID (riid, &IID_IExtractIconA) && (cidl == 1))
550     {
551         pidl = ILCombine (This->pidlRoot, apidl[0]);
552         pObj = (LPUNKNOWN) IExtractIconA_Constructor (pidl);
553         SHFree (pidl);
554         hr = S_OK;
555     }
556     else if (IsEqualIID (riid, &IID_IExtractIconW) && (cidl == 1))
557     {
558         pidl = ILCombine (This->pidlRoot, apidl[0]);
559         pObj = (LPUNKNOWN) IExtractIconW_Constructor (pidl);
560         SHFree (pidl);
561         hr = S_OK;
562     }
563     else if (IsEqualIID (riid, &IID_IDropTarget) && (cidl >= 1))
564     {
565         hr = IShellFolder_QueryInterface (iface, &IID_IDropTarget,
566                                           (LPVOID *) &pObj);
567     }
568     else if ((IsEqualIID(riid,&IID_IShellLinkW) ||
569               IsEqualIID(riid,&IID_IShellLinkA)) && (cidl == 1))
570     {
571         pidl = ILCombine (This->pidlRoot, apidl[0]);
572         hr = IShellLink_ConstructFromFile(NULL, riid, pidl, (LPVOID*) &pObj);
573         SHFree (pidl);
574     }
575     else 
576         hr = E_NOINTERFACE;
577
578     if (SUCCEEDED(hr) && !pObj)
579         hr = E_OUTOFMEMORY;
580
581     *ppvOut = pObj;
582     TRACE ("(%p)->hr=0x%08x\n", This, hr);
583     return hr;
584 }
585
586 /**************************************************************************
587 *    ISF_MyComputer_fnGetDisplayNameOf
588 */
589 static HRESULT WINAPI ISF_MyComputer_fnGetDisplayNameOf (IShellFolder2 *iface,
590                LPCITEMIDLIST pidl, DWORD dwFlags, LPSTRRET strRet)
591 {
592     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
593
594     LPWSTR pszPath;
595     HRESULT hr = S_OK;
596
597     TRACE ("(%p)->(pidl=%p,0x%08x,%p)\n", This, pidl, dwFlags, strRet);
598     pdump (pidl);
599
600     if (!strRet)
601         return E_INVALIDARG;
602
603     pszPath = CoTaskMemAlloc((MAX_PATH +1) * sizeof(WCHAR));
604     if (!pszPath)
605         return E_OUTOFMEMORY;
606
607     pszPath[0] = 0;
608
609     if (!pidl->mkid.cb)
610     {
611         /* parsing name like ::{...} */
612         pszPath[0] = ':';
613         pszPath[1] = ':';
614         SHELL32_GUIDToStringW(&CLSID_MyComputer, &pszPath[2]);
615     }
616     else if (_ILIsPidlSimple(pidl))    
617     {
618         /* take names of special folders only if its only this folder */
619         if (_ILIsSpecialFolder(pidl))
620         {
621             GUID const *clsid;
622
623             clsid = _ILGetGUIDPointer (pidl);
624             if (clsid)
625             {
626                 if (GET_SHGDN_FOR (dwFlags) & SHGDN_FORPARSING)
627                 {
628                     static const WCHAR clsidW[] =
629                      { 'C','L','S','I','D','\\',0 };
630                     static const WCHAR shellfolderW[] =
631                      { '\\','s','h','e','l','l','f','o','l','d','e','r',0 };
632                     static const WCHAR wantsForParsingW[] =
633                      { 'W','a','n','t','s','F','o','r','P','a','r','s','i','n',
634                      'g',0 };
635                     int bWantsForParsing = FALSE;
636                     WCHAR szRegPath[100];
637                     LONG r;
638
639                     /*
640                      * We can only get a filesystem path from a shellfolder
641                      * if the value WantsFORPARSING exists in
642                      *      CLSID\\{...}\\shellfolder 
643                      * exception: the MyComputer folder has this keys not
644                      *            but like any filesystem backed
645                      *            folder it needs these behaviour
646                      *
647                      * Get the "WantsFORPARSING" flag from the registry
648                      */
649
650                     lstrcpyW (szRegPath, clsidW);
651                     SHELL32_GUIDToStringW (clsid, &szRegPath[6]);
652                     lstrcatW (szRegPath, shellfolderW);
653                     r = SHGetValueW (HKEY_CLASSES_ROOT, szRegPath, 
654                                      wantsForParsingW, NULL, NULL, NULL);
655                     if (r == ERROR_SUCCESS)
656                         bWantsForParsing = TRUE;
657
658                     if ((GET_SHGDN_RELATION (dwFlags) == SHGDN_NORMAL) &&
659                         bWantsForParsing)
660                     {
661                         /*
662                          * We need the filesystem path to the destination folder
663                          * Only the folder itself can know it
664                          */
665                         hr = SHELL32_GetDisplayNameOfChild (iface, pidl,
666                                                 dwFlags, pszPath, MAX_PATH);
667                     }
668                     else
669                     {
670                         LPWSTR p = pszPath;
671
672                         /* parsing name like ::{...} */
673                         p[0] = ':';
674                         p[1] = ':';
675                         p += 2;
676                         p += SHELL32_GUIDToStringW(&CLSID_MyComputer, p);
677
678                         /* \:: */
679                         p[0] = '\\';
680                         p[1] = ':';
681                         p[2] = ':';
682                         p += 3;
683                         SHELL32_GUIDToStringW(clsid, p);
684                     }
685                 }
686                 else
687                 {
688                     /* user friendly name */
689                     HCR_GetClassNameW (clsid, pszPath, MAX_PATH);
690                 }
691             }
692             else
693             {
694                 /* append my own path */
695                 _ILSimpleGetTextW (pidl, pszPath, MAX_PATH);
696             }
697         }
698         else if (_ILIsDrive(pidl))
699         {        
700             _ILSimpleGetTextW (pidl, pszPath, MAX_PATH);    /* append my own path */
701
702             /* long view "lw_name (C:)" */
703             if (!(dwFlags & SHGDN_FORPARSING))
704             {
705                 DWORD dwVolumeSerialNumber, dwMaximumComponetLength, dwFileSystemFlags;
706                 WCHAR wszDrive[18] = {0};
707                 static const WCHAR wszOpenBracket[] = {' ','(',0};
708                 static const WCHAR wszCloseBracket[] = {')',0};
709
710                 GetVolumeInformationW (pszPath, wszDrive,
711                            sizeof(wszDrive)/sizeof(wszDrive[0]) - 6,
712                            &dwVolumeSerialNumber,
713                            &dwMaximumComponetLength, &dwFileSystemFlags, NULL, 0);
714                 strcatW (wszDrive, wszOpenBracket);
715                 lstrcpynW (wszDrive + strlenW(wszDrive), pszPath, 3);
716                 strcatW (wszDrive, wszCloseBracket);
717                 strcpyW (pszPath, wszDrive);
718             }
719         }
720         else 
721         {
722             /* Neither a shell namespace extension nor a drive letter. */
723             ERR("Wrong pidl type\n");
724             CoTaskMemFree(pszPath);
725             return E_INVALIDARG;
726         }
727     }
728     else
729     {
730         /* Complex pidl. Let the child folder do the work */
731         hr = SHELL32_GetDisplayNameOfChild(iface, pidl, dwFlags, pszPath, MAX_PATH);
732     }
733
734     if (SUCCEEDED (hr))
735     {
736         /* Win9x always returns ANSI strings, NT always returns Unicode strings */
737         if (GetVersion() & 0x80000000)
738         {
739             strRet->uType = STRRET_CSTR;
740             if (!WideCharToMultiByte(CP_ACP, 0, pszPath, -1, strRet->u.cStr, MAX_PATH,
741                     NULL, NULL))
742                 strRet->u.cStr[0] = '\0';
743             CoTaskMemFree(pszPath);
744         }
745         else
746         {
747             strRet->uType = STRRET_WSTR;
748             strRet->u.pOleStr = pszPath;
749         }
750     }
751     else
752         CoTaskMemFree(pszPath);
753
754     TRACE ("-- (%p)->(%s)\n", This, strRet->uType == STRRET_CSTR ? strRet->u.cStr : debugstr_w(strRet->u.pOleStr));
755     return hr;
756 }
757
758 /**************************************************************************
759 *  ISF_MyComputer_fnSetNameOf
760 *  Changes the name of a file object or subfolder, possibly changing its item
761 *  identifier in the process.
762 *
763 * PARAMETERS
764 *  hwndOwner  [in]   Owner window for output
765 *  pidl       [in]   simple pidl of item to change
766 *  lpszName   [in]   the items new display name
767 *  dwFlags    [in]   SHGNO formatting flags
768 *  ppidlOut   [out]  simple pidl returned
769 */
770 static HRESULT WINAPI ISF_MyComputer_fnSetNameOf (
771                IShellFolder2 * iface, HWND hwndOwner, LPCITEMIDLIST pidl,
772                LPCOLESTR lpName, DWORD dwFlags, LPITEMIDLIST * pPidlOut)
773 {
774     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
775     FIXME ("(%p)->(%p,pidl=%p,%s,%u,%p)\n", This,
776            hwndOwner, pidl, debugstr_w (lpName), dwFlags, pPidlOut);
777     return E_FAIL;
778 }
779
780 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultSearchGUID (
781                IShellFolder2 * iface, GUID * pguid)
782 {
783     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
784     FIXME ("(%p)\n", This);
785     return E_NOTIMPL;
786 }
787 static HRESULT WINAPI ISF_MyComputer_fnEnumSearches (
788                IShellFolder2 * iface, IEnumExtraSearch ** ppenum)
789 {
790     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
791     FIXME ("(%p)\n", This);
792     return E_NOTIMPL;
793 }
794 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumn (
795                IShellFolder2 *iface, DWORD dwRes, ULONG *pSort, ULONG *pDisplay)
796 {
797     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
798
799     TRACE ("(%p)\n", This);
800
801     if (pSort)
802          *pSort = 0;
803     if (pDisplay)
804         *pDisplay = 0;
805     return S_OK;
806 }
807 static HRESULT WINAPI ISF_MyComputer_fnGetDefaultColumnState (
808                IShellFolder2 * iface, UINT iColumn, DWORD * pcsFlags)
809 {
810     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
811
812     TRACE ("(%p)\n", This);
813
814     if (!pcsFlags || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS)
815         return E_INVALIDARG;
816     *pcsFlags = MyComputerSFHeader[iColumn].pcsFlags;
817     return S_OK;
818 }
819
820 static HRESULT WINAPI ISF_MyComputer_fnGetDetailsEx (IShellFolder2 * iface,
821                LPCITEMIDLIST pidl, const SHCOLUMNID * pscid, VARIANT * pv)
822 {
823     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
824     FIXME ("(%p)\n", This);
825     return E_NOTIMPL;
826 }
827
828 /* FIXME: drive size >4GB is rolling over */
829 static HRESULT WINAPI ISF_MyComputer_fnGetDetailsOf (IShellFolder2 * iface,
830                LPCITEMIDLIST pidl, UINT iColumn, SHELLDETAILS * psd)
831 {
832     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
833     HRESULT hr;
834
835     TRACE ("(%p)->(%p %i %p)\n", This, pidl, iColumn, psd);
836
837     if (!psd || iColumn >= MYCOMPUTERSHELLVIEWCOLUMNS)
838         return E_INVALIDARG;
839
840     if (!pidl)
841     {
842         psd->fmt = MyComputerSFHeader[iColumn].fmt;
843         psd->cxChar = MyComputerSFHeader[iColumn].cxChar;
844         psd->str.uType = STRRET_CSTR;
845         LoadStringA (shell32_hInstance, MyComputerSFHeader[iColumn].colnameid,
846                      psd->str.u.cStr, MAX_PATH);
847         return S_OK;
848     }
849     else
850     {
851         char szPath[MAX_PATH];
852         ULARGE_INTEGER ulBytes;
853
854         psd->str.u.cStr[0] = 0x00;
855         psd->str.uType = STRRET_CSTR;
856         switch (iColumn)
857         {
858         case 0:        /* name */
859             hr = IShellFolder_GetDisplayNameOf (iface, pidl,
860                        SHGDN_NORMAL | SHGDN_INFOLDER, &psd->str);
861             break;
862         case 1:        /* type */
863             _ILGetFileType (pidl, psd->str.u.cStr, MAX_PATH);
864             break;
865         case 2:        /* total size */
866             if (_ILIsDrive (pidl))
867             {
868                 _ILSimpleGetText (pidl, szPath, MAX_PATH);
869                 GetDiskFreeSpaceExA (szPath, NULL, &ulBytes, NULL);
870                 StrFormatByteSizeA (ulBytes.u.LowPart, psd->str.u.cStr, MAX_PATH);
871             }
872             break;
873         case 3:        /* free size */
874             if (_ILIsDrive (pidl))
875             {
876                 _ILSimpleGetText (pidl, szPath, MAX_PATH);
877                 GetDiskFreeSpaceExA (szPath, &ulBytes, NULL, NULL);
878                 StrFormatByteSizeA (ulBytes.u.LowPart, psd->str.u.cStr, MAX_PATH);
879             }
880             break;
881         }
882         hr = S_OK;
883     }
884
885     return hr;
886 }
887
888 static HRESULT WINAPI ISF_MyComputer_fnMapColumnToSCID (
889                IShellFolder2 * iface, UINT column, SHCOLUMNID * pscid)
890 {
891     IMyComputerFolderImpl *This = (IMyComputerFolderImpl *)iface;
892     FIXME ("(%p)\n", This);
893     return E_NOTIMPL;
894 }
895
896 static const IShellFolder2Vtbl vt_ShellFolder2 =
897 {
898     ISF_MyComputer_fnQueryInterface,
899     ISF_MyComputer_fnAddRef,
900     ISF_MyComputer_fnRelease,
901     ISF_MyComputer_fnParseDisplayName,
902     ISF_MyComputer_fnEnumObjects,
903     ISF_MyComputer_fnBindToObject,
904     ISF_MyComputer_fnBindToStorage,
905     ISF_MyComputer_fnCompareIDs,
906     ISF_MyComputer_fnCreateViewObject,
907     ISF_MyComputer_fnGetAttributesOf,
908     ISF_MyComputer_fnGetUIObjectOf,
909     ISF_MyComputer_fnGetDisplayNameOf,
910     ISF_MyComputer_fnSetNameOf,
911     /* ShellFolder2 */
912     ISF_MyComputer_fnGetDefaultSearchGUID,
913     ISF_MyComputer_fnEnumSearches,
914     ISF_MyComputer_fnGetDefaultColumn,
915     ISF_MyComputer_fnGetDefaultColumnState,
916     ISF_MyComputer_fnGetDetailsEx,
917     ISF_MyComputer_fnGetDetailsOf,
918     ISF_MyComputer_fnMapColumnToSCID
919 };
920
921 /************************************************************************
922  *    IMCFldr_PersistFolder2_QueryInterface
923  */
924 static HRESULT WINAPI IMCFldr_PersistFolder2_QueryInterface (
925                IPersistFolder2 * iface, REFIID iid, LPVOID * ppvObj)
926 {
927     IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
928     TRACE ("(%p)\n", This);
929     return IUnknown_QueryInterface ((IShellFolder2 *)This, iid, ppvObj);
930 }
931
932 /************************************************************************
933  *    IMCFldr_PersistFolder2_AddRef
934  */
935 static ULONG WINAPI IMCFldr_PersistFolder2_AddRef (IPersistFolder2 * iface)
936 {
937     IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
938     TRACE ("(%p)->(count=%u)\n", This, This->ref);
939     return IUnknown_AddRef ((IShellFolder2 *)This);
940 }
941
942 /************************************************************************
943  *    ISFPersistFolder_Release
944  */
945 static ULONG WINAPI IMCFldr_PersistFolder2_Release (IPersistFolder2 * iface)
946 {
947     IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
948     TRACE ("(%p)->(count=%u)\n", This, This->ref);
949     return IUnknown_Release ((IShellFolder2 *)This);
950 }
951
952 /************************************************************************
953  *    IMCFldr_PersistFolder2_GetClassID
954  */
955 static HRESULT WINAPI IMCFldr_PersistFolder2_GetClassID (
956                IPersistFolder2 * iface, CLSID * lpClassId)
957 {
958     IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
959
960     TRACE ("(%p)\n", This);
961
962     if (!lpClassId)
963     return E_POINTER;
964     *lpClassId = CLSID_MyComputer;
965
966     return S_OK;
967 }
968
969 /************************************************************************
970  *    IMCFldr_PersistFolder2_Initialize
971  *
972  * NOTES: it makes no sense to change the pidl
973  */
974 static HRESULT WINAPI IMCFldr_PersistFolder2_Initialize (
975                IPersistFolder2 * iface, LPCITEMIDLIST pidl)
976 {
977     IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
978     TRACE ("(%p)->(%p)\n", This, pidl);
979     return E_NOTIMPL;
980 }
981
982 /**************************************************************************
983  *    IPersistFolder2_fnGetCurFolder
984  */
985 static HRESULT WINAPI IMCFldr_PersistFolder2_GetCurFolder (
986                IPersistFolder2 * iface, LPITEMIDLIST * pidl)
987 {
988     IMyComputerFolderImpl *This = impl_from_IPersistFolder2(iface);
989
990     TRACE ("(%p)->(%p)\n", This, pidl);
991
992     if (!pidl)
993         return E_POINTER;
994     *pidl = ILClone (This->pidlRoot);
995     return S_OK;
996 }
997
998 static const IPersistFolder2Vtbl vt_PersistFolder2 =
999 {
1000     IMCFldr_PersistFolder2_QueryInterface,
1001     IMCFldr_PersistFolder2_AddRef,
1002     IMCFldr_PersistFolder2_Release,
1003     IMCFldr_PersistFolder2_GetClassID,
1004     IMCFldr_PersistFolder2_Initialize,
1005     IMCFldr_PersistFolder2_GetCurFolder
1006 };