Changes in crossover-wine-src-6.1.0 except for configure
[wine/hacks.git] / dlls / shell32 / shfldr_unixfs.c
blob2d06fcd6e1b84558ff4d0c947dbfe4450e291481
1 /*
2 * UNIXFS - Shell namespace extension for the unix filesystem
4 * Copyright (C) 2005 Michael Jung
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
22 * As you know, windows and unix do have a different philosophy with regard to
23 * the question of how a filesystem should be laid out. While we unix geeks
24 * learned to love the 'one-tree-rooted-at-/' approach, windows has in fact
25 * a whole forest of filesystem trees, each of which is typically identified by
26 * a drive letter.
28 * We would like wine to integrate as smoothly as possible (that is without
29 * sacrificing win32 compatibility) into the unix environment. For the
30 * filesystem question, this means we really would like those windows
31 * applications to work with unix path- and file-names. Unfortunately, this
32 * seems to be impossible in general. Therefore we have those symbolic links
33 * in wine's 'dosdevices' directory, which are used to simulate drives
34 * to keep windows applications happy. And as a consequence, we have those
35 * drive letters show up now and then in GUI applications running under wine,
36 * which gets the unix hardcore fans all angry, shouting at us @#!&$%* wine
37 * hackers that we are seducing the big companies not to port their applications
38 * to unix.
40 * DOS paths do appear at various places in GUI applications. Sometimes, they
41 * show up in the title bar of an application's window. They tend to accumulate
42 * in the most-recently-used section of the file-menu. And I've even seen some
43 * in a configuration dialog's edit control. In those examples, wine can't do a
44 * lot about this, since path-names can't be told appart from ordinary strings
45 * here. That's different in the file dialogs, though.
47 * With the introduction of the 'shell' in win32, Microsoft established an
48 * abstraction layer on top of the filesystem, called the shell namespace (I was
49 * told that Gnome's virtual filesystem is conceptually similar). In the shell
50 * namespace, one doesn't use ascii- or unicode-strings to uniquely identify
51 * objects. Instead Microsoft introduced item-identifier-lists (The c type is
52 * called ITEMIDLIST) as an abstraction of path-names. As you probably would
53 * have guessed, an item-identifier-list is a list of item-identifiers (whose
54 * c type's funny name is SHITEMID), which are opaque binary objects. This means
55 * that no application (apart from Microsoft Office) should make any assumptions
56 * on the internal structure of these SHITEMIDs.
58 * Since the user prefers to be presented the good-old DOS file-names instead of
59 * binary ITEMIDLISTs, a translation method between string-based file-names and
60 * ITEMIDLISTs was established. At the core of this are the COM-Interface
61 * IShellFolder and especially it's methods ParseDisplayName and
62 * GetDisplayNameOf. Basically, you give a DOS-path (let's say C:\windows) to
63 * ParseDisplayName and get a SHITEMID similar to <Desktop|My Computer|C:|windows|>.
64 * Since it's opaque, you can't see the 'C', the 'windows' and the other stuff.
65 * You can only figure out that the ITEMIDLIST is composed of four SHITEMIDS.
66 * The file dialog applies IShellFolder's BindToObject method to bind to each of
67 * those four objects (Desktop, My Computer, C: and windows. All of them have to
68 * implement the IShellFolder interface.) and asks them how they would like to be
69 * displayed (basically their icon and the string displayed). If the file dialog
70 * asks <Desktop|My Computer|C:|windows> which sub-objects it contains (via
71 * EnumObjects) it gets a list of opaque SHITEMIDs, which can be concatenated to
72 * <Desktop|...|windows> to build a new ITEMIDLIST and browse, for instance,
73 * into <system32>. This means the file dialog browses the shell namespace by
74 * identifying objects via ITEMIDLISTs. Once the user has selected a location to
75 * save his valuable file, the file dialog calls IShellFolder's GetDisplayNameOf
76 * method to translate the ITEMIDLIST back to a DOS filename.
78 * It seems that one intention of the shell namespace concept was to make it
79 * possible to have objects in the namespace, which don't have any counterpart
80 * in the filesystem. The 'My Computer' shell folder object is one instance
81 * which comes to mind (Go try to save a file into 'My Computer' on windows.)
82 * So, to make matters a little more complex, before the file dialog asks a
83 * shell namespace object for it's DOS path, it asks if it actually has one.
84 * This is done via the IShellFolder::GetAttributesOf method, which sets the
85 * SFGAO_FILESYSTEM if - and only if - it has.
87 * The two things, described in the previous two paragraphs, are what unixfs is
88 * based on. So basically, if UnixDosFolder's ParseDisplayName method is called
89 * with a 'c:\windows' path-name, it doesn't return an
90 * <Desktop|My Computer|C:|windows|> ITEMIDLIST. Instead, it uses
91 * shell32's wine_get_unix_path_name and the _posix_ (which means not the win32)
92 * fileio api's to figure out that c: is mapped to - let's say -
93 * /home/mjung/.wine/drive_c and then constructs a
94 * <Desktop|/|home|mjung|.wine|drive_c> ITEMIDLIST. Which is what the file
95 * dialog uses to display the folder and file objects, which is why you see a
96 * unix path. When the user has found a nice place for his file and hits the
97 * save button, the ITEMIDLIST of the selected folder object is passed to
98 * GetDisplayNameOf, which returns a _DOS_ path name
99 * (like H:\home_of_my_new_file out of <|Desktop|/|home|mjung|home_of_my_new_file|>).
100 * Unixfs basically mounts your dos devices together in order to construct
101 * a copy of your unix filesystem structure.
103 * But what if none of the symbolic links in 'dosdevices' points to '/', you
104 * might ask ("And I don't want wine have access to my complete hard drive, you
105 * *%&1#!"). No problem, as I stated above, unixfs uses the _posix_ apis to
106 * construct the ITEMIDLISTs. Folders, which aren't accessible via a drive letter,
107 * don't have the SFGAO_FILESYSTEM flag set. So the file dialogs should'nt allow
108 * the user to select such a folder for file storage (And if it does anyhow, it
109 * will not be able to return a valid path, since there is none). Think of those
110 * folders as a hierarchy of 'My Computer'-like folders, which happen to be a
111 * shadow of your unix filesystem tree. And since all of this stuff doesn't
112 * change anything at all in wine's fileio api's, windows applications will have
113 * no more access rights as they had before.
115 * To sum it all up, you can still savely run wine with you root account (Just
116 * kidding, don't do it.)
118 * If you are now standing in front of your computer, shouting hotly
119 * "I am not convinced, Mr. Rumsfeld^H^H^H^H^H^H^H^H^H^H^H^H", fire up regedit
120 * and delete HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\
121 * Explorer\Desktop\Namespace\{9D20AAE8-0625-44B0-9CA7-71889C2254D9} and you
122 * will be back in the pre-unixfs days.
125 #include "config.h"
126 #include "wine/port.h"
128 #include <stdio.h>
129 #include <stdarg.h>
130 #include <limits.h>
131 #include <dirent.h>
132 #include <stdlib.h>
133 #ifdef HAVE_UNISTD_H
134 # include <unistd.h>
135 #endif
136 #ifdef HAVE_SYS_STAT_H
137 # include <sys/stat.h>
138 #endif
139 #ifdef HAVE_PWD_H
140 # include <pwd.h>
141 #endif
142 #include <grp.h>
143 #include <limits.h>
145 #define COBJMACROS
146 #define NONAMELESSUNION
147 #define NONAMELESSSTRUCT
149 #include "windef.h"
150 #include "winbase.h"
151 #include "winuser.h"
152 #include "objbase.h"
153 #include "winreg.h"
154 #include "shlwapi.h"
155 #include "winternl.h"
156 #include "wine/debug.h"
158 #include "shell32_main.h"
159 #include "shellfolder.h"
160 #include "shfldr.h"
161 #include "shresdef.h"
162 #include "pidl.h"
164 WINE_DEFAULT_DEBUG_CHANNEL(shell);
166 #define ADJUST_THIS(c,m,p) ((c*)(((long)p)-(long)&(((c*)0)->lp##m##Vtbl)))
167 #define STATIC_CAST(i,p) ((i*)&p->lp##i##Vtbl)
169 #define LEN_SHITEMID_FIXED_PART ((USHORT) \
170 ( sizeof(USHORT) /* SHITEMID's cb field. */ \
171 + sizeof(PIDLTYPE) /* PIDLDATA's type field. */ \
172 + sizeof(FileStruct) /* Well, the FileStruct. */ \
173 - sizeof(char) /* One char too much in FileStruct. */ \
174 + sizeof(FileStructW) /* You name it. */ \
175 - sizeof(WCHAR) /* One WCHAR too much in FileStructW. */ \
176 + sizeof(WORD) )) /* Offset of FileStructW field in PIDL. */
178 #define PATHMODE_UNIX 0
179 #define PATHMODE_DOS 1
181 /* UnixFolder object layout and typedef.
183 typedef struct _UnixFolder {
184 const IShellFolder2Vtbl *lpIShellFolder2Vtbl;
185 const IPersistFolder3Vtbl *lpIPersistFolder3Vtbl;
186 const IPersistPropertyBagVtbl *lpIPersistPropertyBagVtbl;
187 const IDropTargetVtbl *lpIDropTargetVtbl;
188 const ISFHelperVtbl *lpISFHelperVtbl;
189 LONG m_cRef;
190 CHAR *m_pszPath; /* Target path of the shell folder (CP_UNIXCP) */
191 LPITEMIDLIST m_pidlLocation; /* Location in the shell namespace */
192 DWORD m_dwPathMode;
193 DWORD m_dwAttributes;
194 const CLSID *m_pCLSID;
195 DWORD m_dwDropEffectsMask;
196 } UnixFolder;
198 /* Will hold the registered clipboard format identifier for ITEMIDLISTS. */
199 static UINT cfShellIDList = 0;
201 /******************************************************************************
202 * UNIXFS_is_rooted_at_desktop [Internal]
204 * Checks if the unixfs namespace extension is rooted at desktop level.
206 * RETURNS
207 * TRUE, if unixfs is rooted at desktop level
208 * FALSE, if not.
210 BOOL UNIXFS_is_rooted_at_desktop(void) {
211 HKEY hKey;
212 WCHAR wszRootedAtDesktop[69 + CHARS_IN_GUID] = {
213 'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
214 'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
215 'E','x','p','l','o','r','e','r','\\','D','e','s','k','t','o','p','\\',
216 'N','a','m','e','S','p','a','c','e','\\',0 };
218 if (StringFromGUID2(&CLSID_UnixDosFolder, wszRootedAtDesktop + 69, CHARS_IN_GUID) &&
219 RegOpenKeyExW(HKEY_LOCAL_MACHINE, wszRootedAtDesktop, 0, KEY_READ, &hKey) == ERROR_SUCCESS)
221 RegCloseKey(hKey);
222 return TRUE;
224 return FALSE;
227 /******************************************************************************
228 * UNIXFS_filename_from_shitemid [Internal]
230 * Get CP_UNIXCP encoded filename corresponding to the first item of a pidl
232 * PARAMS
233 * pidl [I] A simple SHITEMID
234 * pszPathElement [O] Filename in CP_UNIXCP encoding will be stored here
236 * RETURNS
237 * Success: Number of bytes necessary to store the CP_UNIXCP encoded filename
238 * _without_ the terminating NUL.
239 * Failure: 0
241 * NOTES
242 * Size of the buffer at pszPathElement has to be FILENAME_MAX. pszPathElement
243 * may be NULL, if you are only interested in the return value.
245 static int UNIXFS_filename_from_shitemid(LPCITEMIDLIST pidl, char* pszPathElement) {
246 FileStructW *pFileStructW = _ILGetFileStructW(pidl);
247 int cLen = 0;
249 if (pFileStructW) {
250 cLen = WideCharToMultiByte(CP_UNIXCP, 0, pFileStructW->wszName, -1, pszPathElement,
251 pszPathElement ? FILENAME_MAX : 0, 0, 0);
252 } else {
253 /* There might be pidls slipping in from shfldr_fs.c, which don't contain the
254 * FileStructW field. In this case, we have to convert from CP_ACP to CP_UNIXCP. */
255 char *pszText = _ILGetTextPointer(pidl);
256 WCHAR *pwszPathElement = NULL;
257 int cWideChars;
259 cWideChars = MultiByteToWideChar(CP_ACP, 0, pszText, -1, NULL, 0);
260 if (!cWideChars) goto cleanup;
262 pwszPathElement = SHAlloc(cWideChars * sizeof(WCHAR));
263 if (!pwszPathElement) goto cleanup;
265 cWideChars = MultiByteToWideChar(CP_ACP, 0, pszText, -1, pwszPathElement, cWideChars);
266 if (!cWideChars) goto cleanup;
268 cLen = WideCharToMultiByte(CP_UNIXCP, 0, pwszPathElement, -1, pszPathElement,
269 pszPathElement ? FILENAME_MAX : 0, 0, 0);
271 cleanup:
272 SHFree(pwszPathElement);
275 if (cLen) cLen--; /* Don't count terminating NUL! */
276 return cLen;
279 /******************************************************************************
280 * UNIXFS_shitemid_len_from_filename [Internal]
282 * Computes the necessary length of a pidl to hold a path element
284 * PARAMS
285 * szPathElement [I] The path element string in CP_UNIXCP encoding.
286 * ppszPathElement [O] Path element string in CP_ACP encoding.
287 * ppwszPathElement [O] Path element string as WCHAR string.
289 * RETURNS
290 * Success: Length in bytes of a SHITEMID representing szPathElement
291 * Failure: 0
293 * NOTES
294 * Provide NULL values if not interested in pp(w)szPathElement. Otherwise
295 * caller is responsible to free ppszPathElement and ppwszPathElement with
296 * SHFree.
298 static USHORT UNIXFS_shitemid_len_from_filename(
299 const char *szPathElement, char **ppszPathElement, WCHAR **ppwszPathElement)
301 USHORT cbPidlLen = 0;
302 WCHAR *pwszPathElement = NULL;
303 char *pszPathElement = NULL;
304 int cWideChars, cChars;
306 /* There and Back Again: A Hobbit's Holiday. CP_UNIXCP might be some ANSI
307 * codepage or it might be a real multi-byte encoding like utf-8. There is no
308 * other way to figure out the length of the corresponding WCHAR and CP_ACP
309 * strings without actually doing the full CP_UNIXCP -> WCHAR -> CP_ACP cycle. */
311 cWideChars = MultiByteToWideChar(CP_UNIXCP, 0, szPathElement, -1, NULL, 0);
312 if (!cWideChars) goto cleanup;
314 pwszPathElement = SHAlloc(cWideChars * sizeof(WCHAR));
315 if (!pwszPathElement) goto cleanup;
317 cWideChars = MultiByteToWideChar(CP_UNIXCP, 0, szPathElement, -1, pwszPathElement, cWideChars);
318 if (!cWideChars) goto cleanup;
320 cChars = WideCharToMultiByte(CP_ACP, 0, pwszPathElement, -1, NULL, 0, 0, 0);
321 if (!cChars) goto cleanup;
323 pszPathElement = SHAlloc(cChars);
324 if (!pszPathElement) goto cleanup;
326 cChars = WideCharToMultiByte(CP_ACP, 0, pwszPathElement, -1, pszPathElement, cChars, 0, 0);
327 if (!cChars) goto cleanup;
329 /* (cChars & 0x1) is for the potential alignment byte */
330 cbPidlLen = LEN_SHITEMID_FIXED_PART + cChars + (cChars & 0x1) + cWideChars * sizeof(WCHAR);
332 cleanup:
333 if (cbPidlLen && ppszPathElement)
334 *ppszPathElement = pszPathElement;
335 else
336 SHFree(pszPathElement);
338 if (cbPidlLen && ppwszPathElement)
339 *ppwszPathElement = pwszPathElement;
340 else
341 SHFree(pwszPathElement);
343 return cbPidlLen;
346 /******************************************************************************
347 * UNIXFS_is_pidl_of_type [Internal]
349 * Checks for the first SHITEMID of an ITEMIDLIST if it passes a filter.
351 * PARAMS
352 * pIDL [I] The ITEMIDLIST to be checked.
353 * fFilter [I] Shell condition flags, which specify the filter.
355 * RETURNS
356 * TRUE, if pIDL is accepted by fFilter
357 * FALSE, otherwise
359 static inline BOOL UNIXFS_is_pidl_of_type(LPITEMIDLIST pIDL, SHCONTF fFilter) {
360 LPPIDLDATA pIDLData = _ILGetDataPointer(pIDL);
361 if (!(fFilter & SHCONTF_INCLUDEHIDDEN) && pIDLData &&
362 (pIDLData->u.file.uFileAttribs & FILE_ATTRIBUTE_HIDDEN))
364 return FALSE;
366 if (_ILIsFolder(pIDL) && (fFilter & SHCONTF_FOLDERS)) return TRUE;
367 if (_ILIsValue(pIDL) && (fFilter & SHCONTF_NONFOLDERS)) return TRUE;
368 return FALSE;
371 /******************************************************************************
372 * UNIXFS_is_dos_device [Internal]
374 * Determines if a unix directory corresponds to any dos device.
376 * PARAMS
377 * statPath [I] The stat struct of the directory, as returned by stat(2).
379 * RETURNS
380 * TRUE, if statPath corresponds to any dos drive letter
381 * FALSE, otherwise
383 static BOOL UNIXFS_is_dos_device(const struct stat *statPath) {
384 struct stat statDrive;
385 char *pszDrivePath;
386 DWORD dwDriveMap;
387 WCHAR wszDosDevice[4] = { 'A', ':', '\\', 0 };
389 for (dwDriveMap = GetLogicalDrives(); dwDriveMap; dwDriveMap >>= 1, wszDosDevice[0]++) {
390 if (!(dwDriveMap & 0x1)) continue;
391 pszDrivePath = wine_get_unix_file_name(wszDosDevice);
392 if (pszDrivePath && !stat(pszDrivePath, &statDrive)) {
393 HeapFree(GetProcessHeap(), 0, pszDrivePath);
394 if ((statPath->st_dev == statDrive.st_dev) && (statPath->st_ino == statDrive.st_ino))
395 return TRUE;
398 return FALSE;
401 /******************************************************************************
402 * UNIXFS_get_unix_path [Internal]
404 * Convert an absolute dos path to an absolute unix path.
405 * Evaluate "/.", "/.." and the symbolic links in $WINEPREFIX/dosdevices.
407 * PARAMS
408 * pszDosPath [I] An absolute dos path
409 * pszCanonicalPath [O] Buffer of length FILENAME_MAX. Will receive the canonical path.
411 * RETURNS
412 * Success, TRUE
413 * Failure, FALSE - Path not existent, too long, insufficient rights, to many symlinks
415 static BOOL UNIXFS_get_unix_path(LPCWSTR pszDosPath, char *pszCanonicalPath)
417 char *pPathTail, *pElement, *pCanonicalTail, szPath[FILENAME_MAX], *pszUnixPath;
418 WCHAR wszDrive[] = { '?', ':', '\\', 0 };
419 int cDriveSymlinkLen;
421 TRACE("(pszDosPath=%s, pszCanonicalPath=%p)\n", debugstr_w(pszDosPath), pszCanonicalPath);
423 if (!pszDosPath || pszDosPath[1] != ':')
424 return FALSE;
426 /* Get the canonicalized unix path corresponding to the drive letter. */
427 wszDrive[0] = pszDosPath[0];
428 pszUnixPath = wine_get_unix_file_name(wszDrive);
429 if (!pszUnixPath) return FALSE;
430 cDriveSymlinkLen = strlen(pszUnixPath);
431 pElement = realpath(pszUnixPath, szPath);
432 HeapFree(GetProcessHeap(), 0, pszUnixPath);
433 if (!pElement) return FALSE;
434 if (szPath[strlen(szPath)-1] != '/') strcat(szPath, "/");
436 /* Append the part relative to the drive symbolic link target. */
437 pszUnixPath = wine_get_unix_file_name(pszDosPath);
438 if (!pszUnixPath) return FALSE;
439 strcat(szPath, pszUnixPath + cDriveSymlinkLen);
440 HeapFree(GetProcessHeap(), 0, pszUnixPath);
442 /* pCanonicalTail always points to the end of the canonical path constructed
443 * thus far. pPathTail points to the still to be processed part of the input
444 * path. pElement points to the path element currently investigated.
446 *pszCanonicalPath = '\0';
447 pCanonicalTail = pszCanonicalPath;
448 pPathTail = szPath;
450 do {
451 char cTemp;
453 pElement = pPathTail;
454 pPathTail = strchr(pPathTail+1, '/');
455 if (!pPathTail) /* Last path element may not be terminated by '/'. */
456 pPathTail = pElement + strlen(pElement);
457 /* Temporarily terminate the current path element. Will be restored later. */
458 cTemp = *pPathTail;
459 *pPathTail = '\0';
461 /* Skip "/." path elements */
462 if (!strcmp("/.", pElement)) {
463 *pPathTail = cTemp;
464 } else if (!strcmp("/..", pElement)) {
465 /* Remove last element in canonical path for "/.." elements, then skip. */
466 char *pTemp = strrchr(pszCanonicalPath, '/');
467 if (pTemp)
468 pCanonicalTail = pTemp;
469 *pCanonicalTail = '\0';
470 *pPathTail = cTemp;
471 } else {
472 /* Directory or file. Copy to canonical path */
473 if (pCanonicalTail - pszCanonicalPath + pPathTail - pElement + 1 > FILENAME_MAX)
474 return FALSE;
476 memcpy(pCanonicalTail, pElement, pPathTail - pElement + 1);
477 pCanonicalTail += pPathTail - pElement;
478 *pPathTail = cTemp;
480 } while (pPathTail[0] == '/');
482 TRACE("--> %s\n", debugstr_a(pszCanonicalPath));
484 return TRUE;
487 /******************************************************************************
488 * UNIXFS_seconds_since_1970_to_dos_date_time [Internal]
490 * Convert unix time to FAT time
492 * PARAMS
493 * ss1970 [I] Unix time (seconds since 1970)
494 * pDate [O] Corresponding FAT date
495 * pTime [O] Corresponding FAT time
497 static inline void UNIXFS_seconds_since_1970_to_dos_date_time(
498 time_t ss1970, LPWORD pDate, LPWORD pTime)
500 LARGE_INTEGER time;
501 FILETIME fileTime;
503 RtlSecondsSince1970ToTime( ss1970, &time );
504 fileTime.dwLowDateTime = time.u.LowPart;
505 fileTime.dwHighDateTime = time.u.HighPart;
506 FileTimeToDosDateTime(&fileTime, pDate, pTime);
509 /******************************************************************************
510 * UNIXFS_build_shitemid [Internal]
512 * Constructs a new SHITEMID for the last component of path 'pszUnixPath' into
513 * buffer 'pIDL'.
515 * PARAMS
516 * pszUnixPath [I] An absolute path. The SHITEMID will be build for the last component.
517 * pIDL [O] SHITEMID will be constructed here.
519 * RETURNS
520 * Success: A pointer to the terminating '\0' character of path.
521 * Failure: NULL
523 * NOTES
524 * Minimum size of pIDL is SHITEMID_LEN_FROM_NAME_LEN(strlen(last_component_of_path)).
525 * If what you need is a PIDLLIST with a single SHITEMID, don't forget to append
526 * a 0 USHORT value.
528 static char* UNIXFS_build_shitemid(char *pszUnixPath, void *pIDL) {
529 LPPIDLDATA pIDLData;
530 struct stat fileStat;
531 char *pszComponentU, *pszComponentA;
532 WCHAR *pwszComponentW;
533 int cComponentULen, cComponentALen;
534 USHORT cbLen;
535 FileStructW *pFileStructW;
536 WORD uOffsetW, *pOffsetW;
538 TRACE("(pszUnixPath=%s, pIDL=%p)\n", debugstr_a(pszUnixPath), pIDL);
540 /* We are only interested in regular files and directories. */
541 if (stat(pszUnixPath, &fileStat)) return NULL;
542 if (!S_ISDIR(fileStat.st_mode) && !S_ISREG(fileStat.st_mode)) return NULL;
544 /* Compute the SHITEMID's length and wipe it. */
545 pszComponentU = strrchr(pszUnixPath, '/') + 1;
546 cComponentULen = strlen(pszComponentU);
547 cbLen = UNIXFS_shitemid_len_from_filename(pszComponentU, &pszComponentA, &pwszComponentW);
548 if (!cbLen) return NULL;
549 memset(pIDL, 0, cbLen);
550 ((LPSHITEMID)pIDL)->cb = cbLen;
552 /* Set shell32's standard SHITEMID data fields. */
553 pIDLData = _ILGetDataPointer((LPCITEMIDLIST)pIDL);
554 pIDLData->type = S_ISDIR(fileStat.st_mode) ? PT_FOLDER : PT_VALUE;
555 pIDLData->u.file.dwFileSize = (DWORD)fileStat.st_size;
556 UNIXFS_seconds_since_1970_to_dos_date_time(fileStat.st_mtime, &pIDLData->u.file.uFileDate,
557 &pIDLData->u.file.uFileTime);
558 pIDLData->u.file.uFileAttribs = 0;
559 if (S_ISDIR(fileStat.st_mode)) pIDLData->u.file.uFileAttribs |= FILE_ATTRIBUTE_DIRECTORY;
560 if (pszComponentU[0] == '.') pIDLData->u.file.uFileAttribs |= FILE_ATTRIBUTE_HIDDEN;
561 cComponentALen = lstrlenA(pszComponentA) + 1;
562 memcpy(pIDLData->u.file.szNames, pszComponentA, cComponentALen);
564 pFileStructW = (FileStructW*)(pIDLData->u.file.szNames + cComponentALen + (cComponentALen & 0x1));
565 uOffsetW = (WORD)(((LPBYTE)pFileStructW) - ((LPBYTE)pIDL));
566 pFileStructW->cbLen = cbLen - uOffsetW;
567 UNIXFS_seconds_since_1970_to_dos_date_time(fileStat.st_mtime, &pFileStructW->uCreationDate,
568 &pFileStructW->uCreationTime);
569 UNIXFS_seconds_since_1970_to_dos_date_time(fileStat.st_atime, &pFileStructW->uLastAccessDate,
570 &pFileStructW->uLastAccessTime);
571 lstrcpyW(pFileStructW->wszName, pwszComponentW);
573 pOffsetW = (WORD*)(((LPBYTE)pIDL) + cbLen - sizeof(WORD));
574 *pOffsetW = uOffsetW;
576 SHFree(pszComponentA);
577 SHFree(pwszComponentW);
579 return pszComponentU + cComponentULen;
582 /******************************************************************************
583 * UNIXFS_path_to_pidl [Internal]
585 * PARAMS
586 * pUnixFolder [I] If path is relative, pUnixFolder represents the base path
587 * path [I] An absolute unix or dos path or a path relativ to pUnixFolder
588 * ppidl [O] The corresponding ITEMIDLIST. Release with SHFree/ILFree
590 * RETURNS
591 * Success: TRUE
592 * Failure: FALSE, invalid params or out of memory
594 * NOTES
595 * pUnixFolder also carries the information if the path is expected to be unix or dos.
597 static BOOL UNIXFS_path_to_pidl(UnixFolder *pUnixFolder, const WCHAR *path, LPITEMIDLIST *ppidl) {
598 LPITEMIDLIST pidl;
599 int cPidlLen, cPathLen;
600 char *pSlash, *pNextSlash, szCompletePath[FILENAME_MAX], *pNextPathElement, *pszAPath;
601 WCHAR *pwszPath;
603 TRACE("pUnixFolder=%p, path=%s, ppidl=%p\n", pUnixFolder, debugstr_w(path), ppidl);
605 if (!ppidl || !path)
606 return FALSE;
608 /* Build an absolute path and let pNextPathElement point to the interesting
609 * relative sub-path. We need the absolute path to call 'stat', but the pidl
610 * will only contain the relative part.
612 if ((pUnixFolder->m_dwPathMode == PATHMODE_DOS) && (path[1] == ':'))
614 /* Absolute dos path. Convert to unix */
615 if (!UNIXFS_get_unix_path(path, szCompletePath))
616 return FALSE;
617 pNextPathElement = szCompletePath;
619 else if ((pUnixFolder->m_dwPathMode == PATHMODE_UNIX) && (path[0] == '/'))
621 /* Absolute unix path. Just convert to ANSI. */
622 WideCharToMultiByte(CP_UNIXCP, 0, path, -1, szCompletePath, FILENAME_MAX, NULL, NULL);
623 pNextPathElement = szCompletePath;
625 else
627 /* Relative dos or unix path. Concat with this folder's path */
628 int cBasePathLen = strlen(pUnixFolder->m_pszPath);
629 memcpy(szCompletePath, pUnixFolder->m_pszPath, cBasePathLen);
630 WideCharToMultiByte(CP_UNIXCP, 0, path, -1, szCompletePath + cBasePathLen,
631 FILENAME_MAX - cBasePathLen, NULL, NULL);
632 pNextPathElement = szCompletePath + cBasePathLen - 1;
634 /* If in dos mode, replace '\' with '/' */
635 if (pUnixFolder->m_dwPathMode == PATHMODE_DOS) {
636 char *pBackslash = strchr(pNextPathElement, '\\');
637 while (pBackslash) {
638 *pBackslash = '/';
639 pBackslash = strchr(pBackslash, '\\');
644 /* Special case for the root folder. */
645 if (!strcmp(szCompletePath, "/")) {
646 *ppidl = pidl = (LPITEMIDLIST)SHAlloc(sizeof(USHORT));
647 if (!pidl) return FALSE;
648 pidl->mkid.cb = 0; /* Terminate the ITEMIDLIST */
649 return TRUE;
652 /* Remove trailing slash, if present */
653 cPathLen = strlen(szCompletePath);
654 if (szCompletePath[cPathLen-1] == '/')
655 szCompletePath[cPathLen-1] = '\0';
657 if ((szCompletePath[0] != '/') || (pNextPathElement[0] != '/')) {
658 ERR("szCompletePath: %s, pNextPathElment: %s\n", szCompletePath, pNextPathElement);
659 return FALSE;
662 /* At this point, we have an absolute unix path in szCompletePath
663 * and the relative portion of it in pNextPathElement. Both starting with '/'
664 * and _not_ terminated by a '/'. */
665 TRACE("complete path: %s, relative path: %s\n", szCompletePath, pNextPathElement);
667 /* Convert to CP_ACP and WCHAR */
668 if (!UNIXFS_shitemid_len_from_filename(pNextPathElement, &pszAPath, &pwszPath))
669 return 0;
671 /* Compute the length of the complete ITEMIDLIST */
672 cPidlLen = 0;
673 pSlash = pszAPath;
674 while (pSlash) {
675 pNextSlash = strchr(pSlash+1, '/');
676 cPidlLen += LEN_SHITEMID_FIXED_PART + /* Fixed part length plus potential alignment byte. */
677 (pNextSlash ? (pNextSlash - pSlash) & 0x1 : lstrlenA(pSlash) & 0x1);
678 pSlash = pNextSlash;
681 /* The USHORT is for the ITEMIDLIST terminator. The NUL terminators for the sub-path-strings
682 * are accounted for by the '/' separators, which are not stored in the SHITEMIDs. Above we
683 * have ensured that the number of '/'s exactly matches the number of sub-path-strings. */
684 cPidlLen += lstrlenA(pszAPath) + lstrlenW(pwszPath) * sizeof(WCHAR) + sizeof(USHORT);
686 SHFree(pszAPath);
687 SHFree(pwszPath);
689 *ppidl = pidl = (LPITEMIDLIST)SHAlloc(cPidlLen);
690 if (!pidl) return FALSE;
692 /* Concatenate the SHITEMIDs of the sub-directories. */
693 while (*pNextPathElement) {
694 pSlash = strchr(pNextPathElement+1, '/');
695 if (pSlash) *pSlash = '\0';
696 pNextPathElement = UNIXFS_build_shitemid(szCompletePath, pidl);
697 if (pSlash) *pSlash = '/';
699 if (!pNextPathElement) {
700 SHFree(*ppidl);
701 *ppidl = NULL;
702 return FALSE;
704 pidl = ILGetNext(pidl);
706 pidl->mkid.cb = 0; /* Terminate the ITEMIDLIST */
708 if ((char *)pidl-(char *)*ppidl+sizeof(USHORT) != cPidlLen) /* We've corrupted the heap :( */
709 ERR("Computed length of pidl incorrect. Please report.\n");
711 return TRUE;
714 /******************************************************************************
715 * UNIXFS_initialize_target_folder [Internal]
717 * Initialize the m_pszPath member of an UnixFolder, given an absolute unix
718 * base path and a relative ITEMIDLIST. Leave the m_pidlLocation member, which
719 * specifies the location in the shell namespace alone.
721 * PARAMS
722 * This [IO] The UnixFolder, whose target path is to be initialized
723 * szBasePath [I] The absolute base path
724 * pidlSubFolder [I] Relative part of the path, given as an ITEMIDLIST
725 * dwAttributes [I] Attributes to add to the Folders m_dwAttributes member
726 * (Used to pass the SFGAO_FILESYSTEM flag down the path)
727 * RETURNS
728 * Success: S_OK,
729 * Failure: E_FAIL
731 static HRESULT UNIXFS_initialize_target_folder(UnixFolder *This, const char *szBasePath,
732 LPCITEMIDLIST pidlSubFolder, DWORD dwAttributes)
734 LPCITEMIDLIST current = pidlSubFolder;
735 DWORD dwPathLen = strlen(szBasePath)+1;
736 struct stat statPrefix;
737 char *pNextDir;
739 /* Determine the path's length bytes */
740 while (current && current->mkid.cb) {
741 dwPathLen += UNIXFS_filename_from_shitemid(current, NULL) + 1; /* For the '/' */
742 current = ILGetNext(current);
745 /* Build the path and compute the attributes*/
746 This->m_dwAttributes =
747 dwAttributes|SFGAO_FOLDER|SFGAO_HASSUBFOLDER|SFGAO_FILESYSANCESTOR|SFGAO_CANRENAME;
748 This->m_pszPath = pNextDir = SHAlloc(dwPathLen);
749 if (!This->m_pszPath) {
750 WARN("SHAlloc failed!\n");
751 return E_FAIL;
753 current = pidlSubFolder;
754 strcpy(pNextDir, szBasePath);
755 pNextDir += strlen(szBasePath);
756 if (This->m_dwPathMode == PATHMODE_UNIX || IsEqualCLSID(&CLSID_MyDocuments, This->m_pCLSID))
757 This->m_dwAttributes |= SFGAO_FILESYSTEM;
758 if (!(This->m_dwAttributes & SFGAO_FILESYSTEM)) {
759 *pNextDir = '\0';
760 if (!stat(This->m_pszPath, &statPrefix) && UNIXFS_is_dos_device(&statPrefix))
761 This->m_dwAttributes |= SFGAO_FILESYSTEM;
763 while (current && current->mkid.cb) {
764 pNextDir += UNIXFS_filename_from_shitemid(current, pNextDir);
765 if (!(This->m_dwAttributes & SFGAO_FILESYSTEM)) {
766 *pNextDir = '\0';
767 if (!stat(This->m_pszPath, &statPrefix) && UNIXFS_is_dos_device(&statPrefix))
768 This->m_dwAttributes |= SFGAO_FILESYSTEM;
770 *pNextDir++ = '/';
771 current = ILGetNext(current);
773 *pNextDir='\0';
775 return S_OK;
778 /******************************************************************************
779 * UnixFolder
781 * Class whose heap based instances represent unix filesystem directories.
784 static void UnixFolder_Destroy(UnixFolder *pUnixFolder) {
785 TRACE("(pUnixFolder=%p)\n", pUnixFolder);
787 SHFree(pUnixFolder->m_pszPath);
788 ILFree(pUnixFolder->m_pidlLocation);
789 SHFree(pUnixFolder);
792 static HRESULT WINAPI UnixFolder_IShellFolder2_QueryInterface(IShellFolder2 *iface, REFIID riid,
793 void **ppv)
795 UnixFolder *This = ADJUST_THIS(UnixFolder, IShellFolder2, iface);
797 TRACE("(iface=%p, riid=%p, ppv=%p)\n", iface, riid, ppv);
799 if (!ppv) return E_INVALIDARG;
801 if (IsEqualIID(&IID_IUnknown, riid) || IsEqualIID(&IID_IShellFolder, riid) ||
802 IsEqualIID(&IID_IShellFolder2, riid))
804 *ppv = STATIC_CAST(IShellFolder2, This);
805 } else if (IsEqualIID(&IID_IPersistFolder3, riid) || IsEqualIID(&IID_IPersistFolder2, riid) ||
806 IsEqualIID(&IID_IPersistFolder, riid) || IsEqualIID(&IID_IPersist, riid))
808 *ppv = STATIC_CAST(IPersistFolder3, This);
809 } else if (IsEqualIID(&IID_IPersistPropertyBag, riid)) {
810 *ppv = STATIC_CAST(IPersistPropertyBag, This);
811 } else if (IsEqualIID(&IID_ISFHelper, riid)) {
812 *ppv = STATIC_CAST(ISFHelper, This);
813 } else if (IsEqualIID(&IID_IDropTarget, riid)) {
814 *ppv = STATIC_CAST(IDropTarget, This);
815 if (!cfShellIDList)
816 cfShellIDList = RegisterClipboardFormatA(CFSTR_SHELLIDLIST);
817 } else {
818 *ppv = NULL;
819 return E_NOINTERFACE;
822 IUnknown_AddRef((IUnknown*)*ppv);
823 return S_OK;
826 static ULONG WINAPI UnixFolder_IShellFolder2_AddRef(IShellFolder2 *iface) {
827 UnixFolder *This = ADJUST_THIS(UnixFolder, IShellFolder2, iface);
829 TRACE("(iface=%p)\n", iface);
831 return InterlockedIncrement(&This->m_cRef);
834 static ULONG WINAPI UnixFolder_IShellFolder2_Release(IShellFolder2 *iface) {
835 UnixFolder *This = ADJUST_THIS(UnixFolder, IShellFolder2, iface);
836 ULONG cRef;
838 TRACE("(iface=%p)\n", iface);
840 cRef = InterlockedDecrement(&This->m_cRef);
842 if (!cRef)
843 UnixFolder_Destroy(This);
845 return cRef;
848 static HRESULT WINAPI UnixFolder_IShellFolder2_ParseDisplayName(IShellFolder2* iface, HWND hwndOwner,
849 LPBC pbcReserved, LPOLESTR lpszDisplayName, ULONG* pchEaten, LPITEMIDLIST* ppidl,
850 ULONG* pdwAttributes)
852 UnixFolder *This = ADJUST_THIS(UnixFolder, IShellFolder2, iface);
853 BOOL result;
855 TRACE("(iface=%p, hwndOwner=%p, pbcReserved=%p, lpszDisplayName=%s, pchEaten=%p, ppidl=%p, "
856 "pdwAttributes=%p) stub\n", iface, hwndOwner, pbcReserved, debugstr_w(lpszDisplayName),
857 pchEaten, ppidl, pdwAttributes);
859 result = UNIXFS_path_to_pidl(This, lpszDisplayName, ppidl);
860 if (result && pdwAttributes && *pdwAttributes)
862 IShellFolder *pParentSF;
863 LPCITEMIDLIST pidlLast;
864 LPITEMIDLIST pidlComplete = ILCombine(This->m_pidlLocation, *ppidl);
865 HRESULT hr;
867 hr = SHBindToParent(pidlComplete, &IID_IShellFolder, (LPVOID*)&pParentSF, &pidlLast);
868 if (FAILED(hr)) {
869 FIXME("SHBindToParent failed! hr = %08x\n", hr);
870 ILFree(pidlComplete);
871 return E_FAIL;
873 IShellFolder_GetAttributesOf(pParentSF, 1, &pidlLast, pdwAttributes);
874 IShellFolder_Release(pParentSF);
875 ILFree(pidlComplete);
878 if (!result) TRACE("FAILED!\n");
879 return result ? S_OK : E_FAIL;
882 static IUnknown *UnixSubFolderIterator_Constructor(UnixFolder *pUnixFolder, SHCONTF fFilter);
884 static HRESULT WINAPI UnixFolder_IShellFolder2_EnumObjects(IShellFolder2* iface, HWND hwndOwner,
885 SHCONTF grfFlags, IEnumIDList** ppEnumIDList)
887 UnixFolder *This = ADJUST_THIS(UnixFolder, IShellFolder2, iface);
888 IUnknown *newIterator;
889 HRESULT hr;
891 TRACE("(iface=%p, hwndOwner=%p, grfFlags=%08x, ppEnumIDList=%p)\n",
892 iface, hwndOwner, grfFlags, ppEnumIDList);
894 if (!This->m_pszPath) {
895 WARN("EnumObjects called on uninitialized UnixFolder-object!\n");
896 return E_UNEXPECTED;
899 newIterator = UnixSubFolderIterator_Constructor(This, grfFlags);
900 hr = IUnknown_QueryInterface(newIterator, &IID_IEnumIDList, (void**)ppEnumIDList);
901 IUnknown_Release(newIterator);
903 return hr;
906 static HRESULT CreateUnixFolder(IUnknown *pUnkOuter, REFIID riid, LPVOID *ppv, const CLSID *pCLSID);
908 static HRESULT WINAPI UnixFolder_IShellFolder2_BindToObject(IShellFolder2* iface, LPCITEMIDLIST pidl,
909 LPBC pbcReserved, REFIID riid, void** ppvOut)
911 UnixFolder *This = ADJUST_THIS(UnixFolder, IShellFolder2, iface);
912 IPersistFolder3 *persistFolder;
913 HRESULT hr;
914 const CLSID *clsidChild;
916 TRACE("(iface=%p, pidl=%p, pbcReserver=%p, riid=%p, ppvOut=%p)\n",
917 iface, pidl, pbcReserved, riid, ppvOut);
919 if (!pidl || !pidl->mkid.cb)
920 return E_INVALIDARG;
922 if (IsEqualCLSID(This->m_pCLSID, &CLSID_FolderShortcut)) {
923 /* Children of FolderShortcuts are ShellFSFolders on Windows.
924 * Unixfs' counterpart is UnixDosFolder. */
925 clsidChild = &CLSID_UnixDosFolder;
926 } else {
927 clsidChild = This->m_pCLSID;
930 hr = CreateUnixFolder(NULL, &IID_IPersistFolder3, (void**)&persistFolder, clsidChild);
931 if (!SUCCEEDED(hr)) return hr;
932 hr = IPersistFolder_QueryInterface(persistFolder, riid, (void**)ppvOut);
934 if (SUCCEEDED(hr)) {
935 UnixFolder *subfolder = ADJUST_THIS(UnixFolder, IPersistFolder3, persistFolder);
936 subfolder->m_pidlLocation = ILCombine(This->m_pidlLocation, pidl);
937 hr = UNIXFS_initialize_target_folder(subfolder, This->m_pszPath, pidl,
938 This->m_dwAttributes & SFGAO_FILESYSTEM);
941 IPersistFolder3_Release(persistFolder);
943 return hr;
946 static HRESULT WINAPI UnixFolder_IShellFolder2_BindToStorage(IShellFolder2* This, LPCITEMIDLIST pidl,
947 LPBC pbcReserved, REFIID riid, void** ppvObj)
949 FIXME("stub\n");
950 return E_NOTIMPL;
953 static HRESULT WINAPI UnixFolder_IShellFolder2_CompareIDs(IShellFolder2* iface, LPARAM lParam,
954 LPCITEMIDLIST pidl1, LPCITEMIDLIST pidl2)
956 BOOL isEmpty1, isEmpty2;
957 HRESULT hr = E_FAIL;
958 LPITEMIDLIST firstpidl;
959 IShellFolder2 *psf;
960 int compare;
962 TRACE("(iface=%p, lParam=%ld, pidl1=%p, pidl2=%p)\n", iface, lParam, pidl1, pidl2);
964 isEmpty1 = !pidl1 || !pidl1->mkid.cb;
965 isEmpty2 = !pidl2 || !pidl2->mkid.cb;
967 if (isEmpty1 && isEmpty2)
968 return MAKE_HRESULT(SEVERITY_SUCCESS, 0, 0);
969 else if (isEmpty1)
970 return MAKE_HRESULT(SEVERITY_SUCCESS, 0, (WORD)-1);
971 else if (isEmpty2)
972 return MAKE_HRESULT(SEVERITY_SUCCESS, 0, (WORD)1);
974 if (_ILIsFolder(pidl1) && !_ILIsFolder(pidl2))
975 return MAKE_HRESULT(SEVERITY_SUCCESS, 0, (WORD)-1);
976 if (!_ILIsFolder(pidl1) && _ILIsFolder(pidl2))
977 return MAKE_HRESULT(SEVERITY_SUCCESS, 0, (WORD)1);
979 compare = CompareStringA(LOCALE_USER_DEFAULT, NORM_IGNORECASE,
980 _ILGetTextPointer(pidl1), -1,
981 _ILGetTextPointer(pidl2), -1);
983 if ((compare == CSTR_LESS_THAN) || (compare == CSTR_GREATER_THAN))
984 return MAKE_HRESULT(SEVERITY_SUCCESS, 0, (WORD)((compare == CSTR_LESS_THAN)?-1:1));
986 if (pidl1->mkid.cb < pidl2->mkid.cb)
987 return MAKE_HRESULT(SEVERITY_SUCCESS, 0, (WORD)-1);
988 else if (pidl1->mkid.cb > pidl2->mkid.cb)
989 return MAKE_HRESULT(SEVERITY_SUCCESS, 0, (WORD)1);
991 firstpidl = ILCloneFirst(pidl1);
992 pidl1 = ILGetNext(pidl1);
993 pidl2 = ILGetNext(pidl2);
995 hr = IShellFolder2_BindToObject(iface, firstpidl, NULL, &IID_IShellFolder, (LPVOID*)&psf);
996 if (SUCCEEDED(hr)) {
997 hr = IShellFolder_CompareIDs(psf, lParam, pidl1, pidl2);
998 IShellFolder2_Release(psf);
1001 ILFree(firstpidl);
1002 return hr;
1005 static HRESULT WINAPI UnixFolder_IShellFolder2_CreateViewObject(IShellFolder2* iface, HWND hwndOwner,
1006 REFIID riid, void** ppv)
1008 HRESULT hr = E_INVALIDARG;
1010 TRACE("(iface=%p, hwndOwner=%p, riid=%p, ppv=%p) stub\n", iface, hwndOwner, riid, ppv);
1012 if (!ppv) return E_INVALIDARG;
1013 *ppv = NULL;
1015 if (IsEqualIID(&IID_IShellView, riid)) {
1016 LPSHELLVIEW pShellView;
1018 pShellView = IShellView_Constructor((IShellFolder*)iface);
1019 if (pShellView) {
1020 hr = IShellView_QueryInterface(pShellView, riid, ppv);
1021 IShellView_Release(pShellView);
1023 } else if (IsEqualIID(&IID_IDropTarget, riid)) {
1024 hr = IShellFolder2_QueryInterface(iface, &IID_IDropTarget, ppv);
1027 return hr;
1030 static HRESULT WINAPI UnixFolder_IShellFolder2_GetAttributesOf(IShellFolder2* iface, UINT cidl,
1031 LPCITEMIDLIST* apidl, SFGAOF* rgfInOut)
1033 UnixFolder *This = ADJUST_THIS(UnixFolder, IShellFolder2, iface);
1034 HRESULT hr = S_OK;
1036 TRACE("(iface=%p, cidl=%u, apidl=%p, rgfInOut=%p)\n", iface, cidl, apidl, rgfInOut);
1038 if (!rgfInOut || (cidl && !apidl))
1039 return E_INVALIDARG;
1041 if (cidl == 0) {
1042 *rgfInOut &= This->m_dwAttributes;
1043 } else {
1044 char szAbsolutePath[FILENAME_MAX], *pszRelativePath;
1045 UINT i;
1047 *rgfInOut = SFGAO_CANCOPY|SFGAO_CANMOVE|SFGAO_CANLINK|SFGAO_CANRENAME|SFGAO_CANDELETE|
1048 SFGAO_HASPROPSHEET|SFGAO_DROPTARGET|SFGAO_FILESYSTEM;
1049 lstrcpyA(szAbsolutePath, This->m_pszPath);
1050 pszRelativePath = szAbsolutePath + lstrlenA(szAbsolutePath);
1051 for (i=0; i<cidl; i++) {
1052 if (!(This->m_dwAttributes & SFGAO_FILESYSTEM)) {
1053 struct stat fileStat;
1054 if (!UNIXFS_filename_from_shitemid(apidl[i], pszRelativePath))
1055 return E_INVALIDARG;
1056 if (stat(szAbsolutePath, &fileStat) || !UNIXFS_is_dos_device(&fileStat))
1057 *rgfInOut &= ~SFGAO_FILESYSTEM;
1059 if (_ILIsFolder(apidl[i]))
1060 *rgfInOut |= SFGAO_FOLDER|SFGAO_HASSUBFOLDER|SFGAO_FILESYSANCESTOR;
1064 return hr;
1067 static HRESULT WINAPI UnixFolder_IShellFolder2_GetUIObjectOf(IShellFolder2* iface, HWND hwndOwner,
1068 UINT cidl, LPCITEMIDLIST* apidl, REFIID riid, UINT* prgfInOut, void** ppvOut)
1070 UnixFolder *This = ADJUST_THIS(UnixFolder, IShellFolder2, iface);
1071 UINT i;
1073 TRACE("(iface=%p, hwndOwner=%p, cidl=%d, apidl=%p, riid=%s, prgfInOut=%p, ppv=%p)\n",
1074 iface, hwndOwner, cidl, apidl, debugstr_guid(riid), prgfInOut, ppvOut);
1076 if (!cidl || !apidl || !riid || !ppvOut)
1077 return E_INVALIDARG;
1079 for (i=0; i<cidl; i++)
1080 if (!apidl[i])
1081 return E_INVALIDARG;
1083 if (IsEqualIID(&IID_IContextMenu, riid)) {
1084 *ppvOut = ISvItemCm_Constructor((IShellFolder*)iface, This->m_pidlLocation, apidl, cidl);
1085 return S_OK;
1086 } else if (IsEqualIID(&IID_IDataObject, riid)) {
1087 *ppvOut = IDataObject_Constructor(hwndOwner, This->m_pidlLocation, apidl, cidl);
1088 return S_OK;
1089 } else if (IsEqualIID(&IID_IExtractIconA, riid)) {
1090 LPITEMIDLIST pidl;
1091 if (cidl != 1) return E_INVALIDARG;
1092 pidl = ILCombine(This->m_pidlLocation, apidl[0]);
1093 *ppvOut = (LPVOID)IExtractIconA_Constructor(pidl);
1094 SHFree(pidl);
1095 return S_OK;
1096 } else if (IsEqualIID(&IID_IExtractIconW, riid)) {
1097 LPITEMIDLIST pidl;
1098 if (cidl != 1) return E_INVALIDARG;
1099 pidl = ILCombine(This->m_pidlLocation, apidl[0]);
1100 *ppvOut = (LPVOID)IExtractIconW_Constructor(pidl);
1101 SHFree(pidl);
1102 return S_OK;
1103 } else if (IsEqualIID(&IID_IDropTarget, riid)) {
1104 if (cidl != 1) return E_INVALIDARG;
1105 return IShellFolder2_BindToObject(iface, apidl[0], NULL, &IID_IDropTarget, ppvOut);
1106 } else if (IsEqualIID(&IID_IShellLinkW, riid)) {
1107 FIXME("IShellLinkW\n");
1108 return E_FAIL;
1109 } else if (IsEqualIID(&IID_IShellLinkA, riid)) {
1110 FIXME("IShellLinkA\n");
1111 return E_FAIL;
1112 } else {
1113 FIXME("Unknown interface %s in GetUIObjectOf\n", debugstr_guid(riid));
1114 return E_NOINTERFACE;
1118 static HRESULT WINAPI UnixFolder_IShellFolder2_GetDisplayNameOf(IShellFolder2* iface,
1119 LPCITEMIDLIST pidl, SHGDNF uFlags, STRRET* lpName)
1121 UnixFolder *This = ADJUST_THIS(UnixFolder, IShellFolder2, iface);
1122 HRESULT hr = S_OK;
1124 TRACE("(iface=%p, pidl=%p, uFlags=%x, lpName=%p)\n", iface, pidl, uFlags, lpName);
1126 if ((GET_SHGDN_FOR(uFlags) & SHGDN_FORPARSING) &&
1127 (GET_SHGDN_RELATION(uFlags) != SHGDN_INFOLDER))
1129 if (!pidl || !pidl->mkid.cb) {
1130 lpName->uType = STRRET_WSTR;
1131 if (This->m_dwPathMode == PATHMODE_UNIX) {
1132 UINT len = MultiByteToWideChar(CP_UNIXCP, 0, This->m_pszPath, -1, NULL, 0);
1133 lpName->u.pOleStr = SHAlloc(len * sizeof(WCHAR));
1134 if (!lpName->u.pOleStr) return HRESULT_FROM_WIN32(GetLastError());
1135 MultiByteToWideChar(CP_UNIXCP, 0, This->m_pszPath, -1, lpName->u.pOleStr, len);
1136 } else {
1137 LPWSTR pwszDosFileName = wine_get_dos_file_name(This->m_pszPath);
1138 if (!pwszDosFileName) return HRESULT_FROM_WIN32(GetLastError());
1139 lpName->u.pOleStr = SHAlloc((lstrlenW(pwszDosFileName) + 1) * sizeof(WCHAR));
1140 if (!lpName->u.pOleStr) return HRESULT_FROM_WIN32(GetLastError());
1141 lstrcpyW(lpName->u.pOleStr, pwszDosFileName);
1142 PathRemoveBackslashW(lpName->u.pOleStr);
1143 HeapFree(GetProcessHeap(), 0, pwszDosFileName);
1145 } else {
1146 IShellFolder *pSubFolder;
1147 SHITEMID emptyIDL = { 0, { 0 } };
1149 hr = IShellFolder_BindToObject(iface, pidl, NULL, &IID_IShellFolder, (void**)&pSubFolder);
1150 if (!SUCCEEDED(hr)) return hr;
1152 hr = IShellFolder_GetDisplayNameOf(pSubFolder, (LPITEMIDLIST)&emptyIDL, uFlags, lpName);
1153 IShellFolder_Release(pSubFolder);
1154 goto exit;
1156 } else {
1157 WCHAR wszFileName[MAX_PATH];
1158 if (!_ILSimpleGetTextW(pidl, wszFileName, MAX_PATH)) return E_INVALIDARG;
1159 lpName->uType = STRRET_WSTR;
1160 lpName->u.pOleStr = SHAlloc((lstrlenW(wszFileName)+1)*sizeof(WCHAR));
1161 if (!lpName->u.pOleStr) return HRESULT_FROM_WIN32(GetLastError());
1162 lstrcpyW(lpName->u.pOleStr, wszFileName);
1163 if (!(GET_SHGDN_FOR(uFlags) & SHGDN_FORPARSING) && This->m_dwPathMode == PATHMODE_DOS &&
1164 !_ILIsFolder(pidl) && wszFileName[0] != '.' && SHELL_FS_HideExtension(wszFileName))
1166 PathRemoveExtensionW(lpName->u.pOleStr);
1170 if (SUCCEEDED(hr) && (GetVersion() & 0x80000000))
1172 /* Win9x shell32 returns an ANSI string */
1173 WCHAR *strW = lpName->u.pOleStr;
1174 WideCharToMultiByte(CP_ACP, 0, strW, -1, lpName->u.cStr, MAX_PATH, NULL, NULL);
1175 lpName->uType = STRRET_CSTR;
1176 SHFree( strW );
1179 exit:
1180 TRACE("--> %s\n", lpName->uType == STRRET_CSTR ? lpName->u.cStr : debugstr_w(lpName->u.pOleStr));
1182 return hr;
1185 static HRESULT WINAPI UnixFolder_IShellFolder2_SetNameOf(IShellFolder2* iface, HWND hwnd,
1186 LPCITEMIDLIST pidl, LPCOLESTR lpcwszName, SHGDNF uFlags, LPITEMIDLIST* ppidlOut)
1188 UnixFolder *This = ADJUST_THIS(UnixFolder, IShellFolder2, iface);
1190 static const WCHAR awcInvalidChars[] = { '\\', '/', ':', '*', '?', '"', '<', '>', '|' };
1191 char szSrc[FILENAME_MAX], szDest[FILENAME_MAX];
1192 WCHAR wszSrcRelative[MAX_PATH];
1193 int cBasePathLen = lstrlenA(This->m_pszPath), i;
1194 struct stat statDest;
1195 LPITEMIDLIST pidlSrc, pidlDest, pidlRelativeDest;
1196 LPOLESTR lpwszName;
1197 HRESULT hr;
1199 TRACE("(iface=%p, hwnd=%p, pidl=%p, lpcwszName=%s, uFlags=0x%08x, ppidlOut=%p)\n",
1200 iface, hwnd, pidl, debugstr_w(lpcwszName), uFlags, ppidlOut);
1202 /* prepare to fail */
1203 if (ppidlOut)
1204 *ppidlOut = NULL;
1206 /* pidl has to contain a single non-empty SHITEMID */
1207 if (_ILIsDesktop(pidl) || !_ILIsPidlSimple(pidl) || !_ILGetTextPointer(pidl))
1208 return E_INVALIDARG;
1210 /* check for invalid characters in lpcwszName. */
1211 for (i=0; i < sizeof(awcInvalidChars)/sizeof(*awcInvalidChars); i++)
1212 if (StrChrW(lpcwszName, awcInvalidChars[i]))
1213 return HRESULT_FROM_WIN32(ERROR_CANCELLED);
1215 /* build source path */
1216 memcpy(szSrc, This->m_pszPath, cBasePathLen);
1217 UNIXFS_filename_from_shitemid(pidl, szSrc + cBasePathLen);
1219 /* build destination path */
1220 memcpy(szDest, This->m_pszPath, cBasePathLen);
1221 WideCharToMultiByte(CP_UNIXCP, 0, lpcwszName, -1, szDest+cBasePathLen,
1222 FILENAME_MAX-cBasePathLen, NULL, NULL);
1224 /* If the filename's extension is hidden to the user, we have to append it. */
1225 if (!(uFlags & SHGDN_FORPARSING) &&
1226 _ILSimpleGetTextW(pidl, wszSrcRelative, MAX_PATH) &&
1227 SHELL_FS_HideExtension(wszSrcRelative))
1229 WCHAR *pwszExt = PathFindExtensionW(wszSrcRelative);
1230 int cLenDest = strlen(szDest);
1231 WideCharToMultiByte(CP_UNIXCP, 0, pwszExt, -1, szDest + cLenDest,
1232 FILENAME_MAX - cLenDest, NULL, NULL);
1235 TRACE("src=%s dest=%s\n", szSrc, szDest);
1237 /* Fail, if destination does already exist */
1238 if (!stat(szDest, &statDest))
1239 return E_FAIL;
1241 /* Rename the file */
1242 if (rename(szSrc, szDest))
1243 return E_FAIL;
1245 /* Build a pidl for the path of the renamed file */
1246 lpwszName = SHAlloc((lstrlenW(lpcwszName)+1)*sizeof(WCHAR)); /* due to const correctness. */
1247 lstrcpyW(lpwszName, lpcwszName);
1248 hr = IShellFolder2_ParseDisplayName(iface, NULL, NULL, lpwszName, NULL, &pidlRelativeDest, NULL);
1249 SHFree(lpwszName);
1250 if (FAILED(hr)) {
1251 rename(szDest, szSrc); /* Undo the renaming */
1252 return E_FAIL;
1254 pidlDest = ILCombine(This->m_pidlLocation, pidlRelativeDest);
1255 ILFree(pidlRelativeDest);
1256 pidlSrc = ILCombine(This->m_pidlLocation, pidl);
1258 /* Inform the shell */
1259 if (_ILIsFolder(ILFindLastID(pidlDest)))
1260 SHChangeNotify(SHCNE_RENAMEFOLDER, SHCNF_IDLIST, pidlSrc, pidlDest);
1261 else
1262 SHChangeNotify(SHCNE_RENAMEITEM, SHCNF_IDLIST, pidlSrc, pidlDest);
1264 if (ppidlOut)
1265 *ppidlOut = ILClone(ILFindLastID(pidlDest));
1267 ILFree(pidlSrc);
1268 ILFree(pidlDest);
1270 return S_OK;
1273 static HRESULT WINAPI UnixFolder_IShellFolder2_EnumSearches(IShellFolder2* iface,
1274 IEnumExtraSearch **ppEnum)
1276 FIXME("stub\n");
1277 return E_NOTIMPL;
1280 static HRESULT WINAPI UnixFolder_IShellFolder2_GetDefaultColumn(IShellFolder2* iface,
1281 DWORD dwReserved, ULONG *pSort, ULONG *pDisplay)
1283 FIXME("stub\n");
1284 return E_NOTIMPL;
1287 static HRESULT WINAPI UnixFolder_IShellFolder2_GetDefaultColumnState(IShellFolder2* iface,
1288 UINT iColumn, SHCOLSTATEF *pcsFlags)
1290 FIXME("stub\n");
1291 return E_NOTIMPL;
1294 static HRESULT WINAPI UnixFolder_IShellFolder2_GetDefaultSearchGUID(IShellFolder2* iface,
1295 GUID *pguid)
1297 FIXME("stub\n");
1298 return E_NOTIMPL;
1301 static HRESULT WINAPI UnixFolder_IShellFolder2_GetDetailsEx(IShellFolder2* iface,
1302 LPCITEMIDLIST pidl, const SHCOLUMNID *pscid, VARIANT *pv)
1304 FIXME("stub\n");
1305 return E_NOTIMPL;
1308 #define SHELLVIEWCOLUMNS 7
1310 static HRESULT WINAPI UnixFolder_IShellFolder2_GetDetailsOf(IShellFolder2* iface,
1311 LPCITEMIDLIST pidl, UINT iColumn, SHELLDETAILS *psd)
1313 UnixFolder *This = ADJUST_THIS(UnixFolder, IShellFolder2, iface);
1314 HRESULT hr = E_FAIL;
1315 struct passwd *pPasswd;
1316 struct group *pGroup;
1317 static const shvheader SFHeader[SHELLVIEWCOLUMNS] = {
1318 {IDS_SHV_COLUMN1, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 15},
1319 {IDS_SHV_COLUMN2, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10},
1320 {IDS_SHV_COLUMN3, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 10},
1321 {IDS_SHV_COLUMN4, SHCOLSTATE_TYPE_DATE | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 12},
1322 {IDS_SHV_COLUMN5, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 9},
1323 {IDS_SHV_COLUMN10, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 7},
1324 {IDS_SHV_COLUMN11, SHCOLSTATE_TYPE_STR | SHCOLSTATE_ONBYDEFAULT, LVCFMT_RIGHT, 7}
1327 TRACE("(iface=%p, pidl=%p, iColumn=%d, psd=%p) stub\n", iface, pidl, iColumn, psd);
1329 if (!psd || iColumn >= SHELLVIEWCOLUMNS)
1330 return E_INVALIDARG;
1332 if (!pidl) {
1333 psd->fmt = SFHeader[iColumn].fmt;
1334 psd->cxChar = SFHeader[iColumn].cxChar;
1335 psd->str.uType = STRRET_CSTR;
1336 LoadStringA(shell32_hInstance, SFHeader[iColumn].colnameid, psd->str.u.cStr, MAX_PATH);
1337 return S_OK;
1338 } else {
1339 struct stat statItem;
1340 if (iColumn == 4 || iColumn == 5 || iColumn == 6) {
1341 char szPath[FILENAME_MAX];
1342 strcpy(szPath, This->m_pszPath);
1343 if (!UNIXFS_filename_from_shitemid(pidl, szPath + strlen(szPath)))
1344 return E_INVALIDARG;
1345 if (stat(szPath, &statItem))
1346 return E_INVALIDARG;
1348 psd->str.u.cStr[0] = '\0';
1349 psd->str.uType = STRRET_CSTR;
1350 switch (iColumn) {
1351 case 0:
1352 hr = IShellFolder2_GetDisplayNameOf(iface, pidl, SHGDN_NORMAL|SHGDN_INFOLDER, &psd->str);
1353 break;
1354 case 1:
1355 _ILGetFileSize(pidl, psd->str.u.cStr, MAX_PATH);
1356 break;
1357 case 2:
1358 _ILGetFileType (pidl, psd->str.u.cStr, MAX_PATH);
1359 break;
1360 case 3:
1361 _ILGetFileDate(pidl, psd->str.u.cStr, MAX_PATH);
1362 break;
1363 case 4:
1364 psd->str.u.cStr[0] = S_ISDIR(statItem.st_mode) ? 'd' : '-';
1365 psd->str.u.cStr[1] = (statItem.st_mode & S_IRUSR) ? 'r' : '-';
1366 psd->str.u.cStr[2] = (statItem.st_mode & S_IWUSR) ? 'w' : '-';
1367 psd->str.u.cStr[3] = (statItem.st_mode & S_IXUSR) ? 'x' : '-';
1368 psd->str.u.cStr[4] = (statItem.st_mode & S_IRGRP) ? 'r' : '-';
1369 psd->str.u.cStr[5] = (statItem.st_mode & S_IWGRP) ? 'w' : '-';
1370 psd->str.u.cStr[6] = (statItem.st_mode & S_IXGRP) ? 'x' : '-';
1371 psd->str.u.cStr[7] = (statItem.st_mode & S_IROTH) ? 'r' : '-';
1372 psd->str.u.cStr[8] = (statItem.st_mode & S_IWOTH) ? 'w' : '-';
1373 psd->str.u.cStr[9] = (statItem.st_mode & S_IXOTH) ? 'x' : '-';
1374 psd->str.u.cStr[10] = '\0';
1375 break;
1376 case 5:
1377 pPasswd = getpwuid(statItem.st_uid);
1378 if (pPasswd) strcpy(psd->str.u.cStr, pPasswd->pw_name);
1379 break;
1380 case 6:
1381 pGroup = getgrgid(statItem.st_gid);
1382 if (pGroup) strcpy(psd->str.u.cStr, pGroup->gr_name);
1383 break;
1387 return hr;
1390 static HRESULT WINAPI UnixFolder_IShellFolder2_MapColumnToSCID(IShellFolder2* iface, UINT iColumn,
1391 SHCOLUMNID *pscid)
1393 FIXME("stub\n");
1394 return E_NOTIMPL;
1397 /* VTable for UnixFolder's IShellFolder2 interface.
1399 static const IShellFolder2Vtbl UnixFolder_IShellFolder2_Vtbl = {
1400 UnixFolder_IShellFolder2_QueryInterface,
1401 UnixFolder_IShellFolder2_AddRef,
1402 UnixFolder_IShellFolder2_Release,
1403 UnixFolder_IShellFolder2_ParseDisplayName,
1404 UnixFolder_IShellFolder2_EnumObjects,
1405 UnixFolder_IShellFolder2_BindToObject,
1406 UnixFolder_IShellFolder2_BindToStorage,
1407 UnixFolder_IShellFolder2_CompareIDs,
1408 UnixFolder_IShellFolder2_CreateViewObject,
1409 UnixFolder_IShellFolder2_GetAttributesOf,
1410 UnixFolder_IShellFolder2_GetUIObjectOf,
1411 UnixFolder_IShellFolder2_GetDisplayNameOf,
1412 UnixFolder_IShellFolder2_SetNameOf,
1413 UnixFolder_IShellFolder2_GetDefaultSearchGUID,
1414 UnixFolder_IShellFolder2_EnumSearches,
1415 UnixFolder_IShellFolder2_GetDefaultColumn,
1416 UnixFolder_IShellFolder2_GetDefaultColumnState,
1417 UnixFolder_IShellFolder2_GetDetailsEx,
1418 UnixFolder_IShellFolder2_GetDetailsOf,
1419 UnixFolder_IShellFolder2_MapColumnToSCID
1422 static HRESULT WINAPI UnixFolder_IPersistFolder3_QueryInterface(IPersistFolder3* iface, REFIID riid,
1423 void** ppvObject)
1425 return UnixFolder_IShellFolder2_QueryInterface(
1426 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, IPersistFolder3, iface)), riid, ppvObject);
1429 static ULONG WINAPI UnixFolder_IPersistFolder3_AddRef(IPersistFolder3* iface)
1431 return UnixFolder_IShellFolder2_AddRef(
1432 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, IPersistFolder3, iface)));
1435 static ULONG WINAPI UnixFolder_IPersistFolder3_Release(IPersistFolder3* iface)
1437 return UnixFolder_IShellFolder2_Release(
1438 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, IPersistFolder3, iface)));
1441 static HRESULT WINAPI UnixFolder_IPersistFolder3_GetClassID(IPersistFolder3* iface, CLSID* pClassID)
1443 UnixFolder *This = ADJUST_THIS(UnixFolder, IPersistFolder3, iface);
1445 TRACE("(iface=%p, pClassId=%p)\n", iface, pClassID);
1447 if (!pClassID)
1448 return E_INVALIDARG;
1450 memcpy(pClassID, This->m_pCLSID, sizeof(CLSID));
1451 return S_OK;
1454 static HRESULT WINAPI UnixFolder_IPersistFolder3_Initialize(IPersistFolder3* iface, LPCITEMIDLIST pidl)
1456 UnixFolder *This = ADJUST_THIS(UnixFolder, IPersistFolder3, iface);
1457 LPCITEMIDLIST current = pidl;
1458 char szBasePath[FILENAME_MAX] = "/";
1460 TRACE("(iface=%p, pidl=%p)\n", iface, pidl);
1462 /* Find the UnixFolderClass root */
1463 while (current->mkid.cb) {
1464 if ((_ILIsDrive(current) && IsEqualCLSID(This->m_pCLSID, &CLSID_ShellFSFolder)) ||
1465 (_ILIsSpecialFolder(current) && IsEqualCLSID(This->m_pCLSID, _ILGetGUIDPointer(current))))
1467 break;
1469 current = ILGetNext(current);
1472 if (current && current->mkid.cb) {
1473 if (_ILIsDrive(current)) {
1474 WCHAR wszDrive[4] = { '?', ':', '\\', 0 };
1475 wszDrive[0] = (WCHAR)*_ILGetTextPointer(current);
1476 if (!UNIXFS_get_unix_path(wszDrive, szBasePath))
1477 return E_FAIL;
1478 } else if (IsEqualIID(&CLSID_MyDocuments, _ILGetGUIDPointer(current))) {
1479 WCHAR wszMyDocumentsPath[MAX_PATH];
1480 if (!SHGetSpecialFolderPathW(0, wszMyDocumentsPath, CSIDL_PERSONAL, FALSE))
1481 return E_FAIL;
1482 PathAddBackslashW(wszMyDocumentsPath);
1483 if (!UNIXFS_get_unix_path(wszMyDocumentsPath, szBasePath))
1484 return E_FAIL;
1486 current = ILGetNext(current);
1487 } else if (_ILIsDesktop(pidl) || _ILIsValue(pidl) || _ILIsFolder(pidl)) {
1488 /* Path rooted at Desktop */
1489 WCHAR wszDesktopPath[MAX_PATH];
1490 if (!SHGetSpecialFolderPathW(0, wszDesktopPath, CSIDL_DESKTOPDIRECTORY, FALSE))
1491 return E_FAIL;
1492 PathAddBackslashW(wszDesktopPath);
1493 if (!UNIXFS_get_unix_path(wszDesktopPath, szBasePath))
1494 return E_FAIL;
1495 current = pidl;
1496 } else if (IsEqualCLSID(This->m_pCLSID, &CLSID_FolderShortcut)) {
1497 /* FolderShortcuts' Initialize method only sets the ITEMIDLIST, which
1498 * specifies the location in the shell namespace, but leaves the
1499 * target folder (m_pszPath) alone. See unit tests in tests/shlfolder.c */
1500 This->m_pidlLocation = ILClone(pidl);
1501 return S_OK;
1502 } else {
1503 ERR("Unknown pidl type!\n");
1504 pdump(pidl);
1505 return E_INVALIDARG;
1508 This->m_pidlLocation = ILClone(pidl);
1509 return UNIXFS_initialize_target_folder(This, szBasePath, current, 0);
1512 static HRESULT WINAPI UnixFolder_IPersistFolder3_GetCurFolder(IPersistFolder3* iface, LPITEMIDLIST* ppidl)
1514 UnixFolder *This = ADJUST_THIS(UnixFolder, IPersistFolder3, iface);
1516 TRACE ("(iface=%p, ppidl=%p)\n", iface, ppidl);
1518 if (!ppidl)
1519 return E_POINTER;
1520 *ppidl = ILClone (This->m_pidlLocation);
1521 return S_OK;
1524 static HRESULT WINAPI UnixFolder_IPersistFolder3_InitializeEx(IPersistFolder3 *iface, IBindCtx *pbc,
1525 LPCITEMIDLIST pidlRoot, const PERSIST_FOLDER_TARGET_INFO *ppfti)
1527 UnixFolder *This = ADJUST_THIS(UnixFolder, IPersistFolder3, iface);
1528 WCHAR wszTargetDosPath[MAX_PATH];
1529 char szTargetPath[FILENAME_MAX] = "";
1531 TRACE("(iface=%p, pbc=%p, pidlRoot=%p, ppfti=%p)\n", iface, pbc, pidlRoot, ppfti);
1533 /* If no PERSIST_FOLDER_TARGET_INFO is given InitializeEx is equivalent to Initialize. */
1534 if (!ppfti)
1535 return IPersistFolder3_Initialize(iface, pidlRoot);
1537 if (ppfti->csidl != -1) {
1538 if (FAILED(SHGetFolderPathW(0, ppfti->csidl, NULL, 0, wszTargetDosPath)) ||
1539 !UNIXFS_get_unix_path(wszTargetDosPath, szTargetPath))
1541 return E_FAIL;
1543 } else if (*ppfti->szTargetParsingName) {
1544 lstrcpyW(wszTargetDosPath, ppfti->szTargetParsingName);
1545 PathAddBackslashW(wszTargetDosPath);
1546 if (!UNIXFS_get_unix_path(wszTargetDosPath, szTargetPath)) {
1547 return E_FAIL;
1549 } else if (ppfti->pidlTargetFolder) {
1550 if (!SHGetPathFromIDListW(ppfti->pidlTargetFolder, wszTargetDosPath) ||
1551 !UNIXFS_get_unix_path(wszTargetDosPath, szTargetPath))
1553 return E_FAIL;
1555 } else {
1556 return E_FAIL;
1559 This->m_pszPath = SHAlloc(lstrlenA(szTargetPath)+1);
1560 if (!This->m_pszPath)
1561 return E_FAIL;
1562 lstrcpyA(This->m_pszPath, szTargetPath);
1563 This->m_pidlLocation = ILClone(pidlRoot);
1564 This->m_dwAttributes = (ppfti->dwAttributes != -1) ? ppfti->dwAttributes :
1565 (SFGAO_FOLDER|SFGAO_HASSUBFOLDER|SFGAO_FILESYSANCESTOR|SFGAO_CANRENAME|SFGAO_FILESYSTEM);
1567 return S_OK;
1570 static HRESULT WINAPI UnixFolder_IPersistFolder3_GetFolderTargetInfo(IPersistFolder3 *iface,
1571 PERSIST_FOLDER_TARGET_INFO *ppfti)
1573 FIXME("(iface=%p, ppfti=%p) stub\n", iface, ppfti);
1574 return E_NOTIMPL;
1577 /* VTable for UnixFolder's IPersistFolder interface.
1579 static const IPersistFolder3Vtbl UnixFolder_IPersistFolder3_Vtbl = {
1580 UnixFolder_IPersistFolder3_QueryInterface,
1581 UnixFolder_IPersistFolder3_AddRef,
1582 UnixFolder_IPersistFolder3_Release,
1583 UnixFolder_IPersistFolder3_GetClassID,
1584 UnixFolder_IPersistFolder3_Initialize,
1585 UnixFolder_IPersistFolder3_GetCurFolder,
1586 UnixFolder_IPersistFolder3_InitializeEx,
1587 UnixFolder_IPersistFolder3_GetFolderTargetInfo
1590 static HRESULT WINAPI UnixFolder_IPersistPropertyBag_QueryInterface(IPersistPropertyBag* iface,
1591 REFIID riid, void** ppv)
1593 return UnixFolder_IShellFolder2_QueryInterface(
1594 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, IPersistPropertyBag, iface)), riid, ppv);
1597 static ULONG WINAPI UnixFolder_IPersistPropertyBag_AddRef(IPersistPropertyBag* iface)
1599 return UnixFolder_IShellFolder2_AddRef(
1600 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, IPersistPropertyBag, iface)));
1603 static ULONG WINAPI UnixFolder_IPersistPropertyBag_Release(IPersistPropertyBag* iface)
1605 return UnixFolder_IShellFolder2_Release(
1606 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, IPersistPropertyBag, iface)));
1609 static HRESULT WINAPI UnixFolder_IPersistPropertyBag_GetClassID(IPersistPropertyBag* iface,
1610 CLSID* pClassID)
1612 return UnixFolder_IPersistFolder3_GetClassID(
1613 STATIC_CAST(IPersistFolder3, ADJUST_THIS(UnixFolder, IPersistPropertyBag, iface)), pClassID);
1616 static HRESULT WINAPI UnixFolder_IPersistPropertyBag_InitNew(IPersistPropertyBag* iface)
1618 FIXME("() stub\n");
1619 return E_NOTIMPL;
1622 static HRESULT WINAPI UnixFolder_IPersistPropertyBag_Load(IPersistPropertyBag *iface,
1623 IPropertyBag *pPropertyBag, IErrorLog *pErrorLog)
1625 UnixFolder *This = ADJUST_THIS(UnixFolder, IPersistPropertyBag, iface);
1626 static const WCHAR wszTarget[] = { 'T','a','r','g','e','t', 0 }, wszNull[] = { 0 };
1627 PERSIST_FOLDER_TARGET_INFO pftiTarget;
1628 VARIANT var;
1629 HRESULT hr;
1631 TRACE("(iface=%p, pPropertyBag=%p, pErrorLog=%p)\n", iface, pPropertyBag, pErrorLog);
1633 if (!pPropertyBag)
1634 return E_POINTER;
1636 /* Get 'Target' property from the property bag. */
1637 V_VT(&var) = VT_BSTR;
1638 hr = IPropertyBag_Read(pPropertyBag, wszTarget, &var, NULL);
1639 if (FAILED(hr))
1640 return E_FAIL;
1641 lstrcpyW(pftiTarget.szTargetParsingName, V_BSTR(&var));
1642 SysFreeString(V_BSTR(&var));
1644 pftiTarget.pidlTargetFolder = NULL;
1645 lstrcpyW(pftiTarget.szNetworkProvider, wszNull);
1646 pftiTarget.dwAttributes = -1;
1647 pftiTarget.csidl = -1;
1649 return UnixFolder_IPersistFolder3_InitializeEx(
1650 STATIC_CAST(IPersistFolder3, This), NULL, NULL, &pftiTarget);
1653 static HRESULT WINAPI UnixFolder_IPersistPropertyBag_Save(IPersistPropertyBag *iface,
1654 IPropertyBag *pPropertyBag, BOOL fClearDirty, BOOL fSaveAllProperties)
1656 FIXME("() stub\n");
1657 return E_NOTIMPL;
1660 /* VTable for UnixFolder's IPersistPropertyBag interface.
1662 static const IPersistPropertyBagVtbl UnixFolder_IPersistPropertyBag_Vtbl = {
1663 UnixFolder_IPersistPropertyBag_QueryInterface,
1664 UnixFolder_IPersistPropertyBag_AddRef,
1665 UnixFolder_IPersistPropertyBag_Release,
1666 UnixFolder_IPersistPropertyBag_GetClassID,
1667 UnixFolder_IPersistPropertyBag_InitNew,
1668 UnixFolder_IPersistPropertyBag_Load,
1669 UnixFolder_IPersistPropertyBag_Save
1672 static HRESULT WINAPI UnixFolder_ISFHelper_QueryInterface(ISFHelper* iface, REFIID riid,
1673 void** ppvObject)
1675 return UnixFolder_IShellFolder2_QueryInterface(
1676 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, ISFHelper, iface)), riid, ppvObject);
1679 static ULONG WINAPI UnixFolder_ISFHelper_AddRef(ISFHelper* iface)
1681 return UnixFolder_IShellFolder2_AddRef(
1682 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, ISFHelper, iface)));
1685 static ULONG WINAPI UnixFolder_ISFHelper_Release(ISFHelper* iface)
1687 return UnixFolder_IShellFolder2_Release(
1688 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, ISFHelper, iface)));
1691 static HRESULT WINAPI UnixFolder_ISFHelper_GetUniqueName(ISFHelper* iface, LPWSTR pwszName, UINT uLen)
1693 UnixFolder *This = ADJUST_THIS(UnixFolder, ISFHelper, iface);
1694 IEnumIDList *pEnum;
1695 HRESULT hr;
1696 LPITEMIDLIST pidlElem;
1697 DWORD dwFetched;
1698 int i;
1699 static const WCHAR wszNewFolder[] = { 'N','e','w',' ','F','o','l','d','e','r', 0 };
1700 static const WCHAR wszFormat[] = { '%','s',' ','%','d',0 };
1702 TRACE("(iface=%p, pwszName=%p, uLen=%u)\n", iface, pwszName, uLen);
1704 if (uLen < sizeof(wszNewFolder)/sizeof(WCHAR)+3)
1705 return E_INVALIDARG;
1707 hr = IShellFolder2_EnumObjects(STATIC_CAST(IShellFolder2, This), 0,
1708 SHCONTF_FOLDERS|SHCONTF_NONFOLDERS|SHCONTF_INCLUDEHIDDEN, &pEnum);
1709 if (SUCCEEDED(hr)) {
1710 lstrcpynW(pwszName, wszNewFolder, uLen);
1711 IEnumIDList_Reset(pEnum);
1712 i = 2;
1713 while ((IEnumIDList_Next(pEnum, 1, &pidlElem, &dwFetched) == S_OK) && (dwFetched == 1)) {
1714 WCHAR wszTemp[MAX_PATH];
1715 _ILSimpleGetTextW(pidlElem, wszTemp, MAX_PATH);
1716 if (!lstrcmpiW(wszTemp, pwszName)) {
1717 IEnumIDList_Reset(pEnum);
1718 snprintfW(pwszName, uLen, wszFormat, wszNewFolder, i++);
1719 if (i > 99) {
1720 hr = E_FAIL;
1721 break;
1725 IEnumIDList_Release(pEnum);
1727 return hr;
1730 static HRESULT WINAPI UnixFolder_ISFHelper_AddFolder(ISFHelper* iface, HWND hwnd, LPCWSTR pwszName,
1731 LPITEMIDLIST* ppidlOut)
1733 UnixFolder *This = ADJUST_THIS(UnixFolder, ISFHelper, iface);
1734 char szNewDir[FILENAME_MAX];
1735 int cBaseLen;
1737 TRACE("(iface=%p, hwnd=%p, pwszName=%s, ppidlOut=%p)\n",
1738 iface, hwnd, debugstr_w(pwszName), ppidlOut);
1740 if (ppidlOut)
1741 *ppidlOut = NULL;
1743 if (!This->m_pszPath || !(This->m_dwAttributes & SFGAO_FILESYSTEM))
1744 return E_FAIL;
1746 lstrcpynA(szNewDir, This->m_pszPath, FILENAME_MAX);
1747 cBaseLen = lstrlenA(szNewDir);
1748 WideCharToMultiByte(CP_UNIXCP, 0, pwszName, -1, szNewDir+cBaseLen, FILENAME_MAX-cBaseLen, 0, 0);
1750 if (mkdir(szNewDir, 0755)) {
1751 char szMessage[256 + FILENAME_MAX];
1752 char szCaption[256];
1754 LoadStringA(shell32_hInstance, IDS_CREATEFOLDER_DENIED, szCaption, sizeof(szCaption));
1755 sprintf(szMessage, szCaption, szNewDir);
1756 LoadStringA(shell32_hInstance, IDS_CREATEFOLDER_CAPTION, szCaption, sizeof(szCaption));
1757 MessageBoxA(hwnd, szMessage, szCaption, MB_OK | MB_ICONEXCLAMATION);
1759 return E_FAIL;
1760 } else {
1761 LPITEMIDLIST pidlRelative;
1763 /* Inform the shell */
1764 if (UNIXFS_path_to_pidl(This, pwszName, &pidlRelative)) {
1765 LPITEMIDLIST pidlAbsolute = ILCombine(This->m_pidlLocation, pidlRelative);
1766 if (ppidlOut)
1767 *ppidlOut = pidlRelative;
1768 else
1769 ILFree(pidlRelative);
1770 SHChangeNotify(SHCNE_MKDIR, SHCNF_IDLIST, pidlAbsolute, NULL);
1771 ILFree(pidlAbsolute);
1772 } else return E_FAIL;
1773 return S_OK;
1778 * Delete specified files by converting the path to DOS paths and calling
1779 * SHFileOperationW. If an error occurs it returns an error code. If the paths can't
1780 * be converted, S_FALSE is returned. In such situation DeleteItems will try to delete
1781 * the files using syscalls
1783 static HRESULT UNIXFS_delete_with_shfileop(UnixFolder *This, UINT cidl, LPCITEMIDLIST *apidl)
1785 char szAbsolute[FILENAME_MAX], *pszRelative;
1786 LPWSTR wszPathsList, wszListPos;
1787 SHFILEOPSTRUCTW op;
1788 HRESULT ret;
1789 int i;
1791 lstrcpyA(szAbsolute, This->m_pszPath);
1792 pszRelative = szAbsolute + lstrlenA(szAbsolute);
1794 wszListPos = wszPathsList = HeapAlloc(GetProcessHeap(), 0, cidl*MAX_PATH*sizeof(WCHAR)+1);
1795 if (wszPathsList == NULL)
1796 return E_OUTOFMEMORY;
1797 for (i=0; i<cidl; i++) {
1798 LPWSTR wszDosPath;
1800 if (!_ILIsFolder(apidl[i]) && !_ILIsValue(apidl[i]))
1801 continue;
1802 if (!UNIXFS_filename_from_shitemid(apidl[i], pszRelative))
1804 HeapFree(GetProcessHeap(), 0, wszPathsList);
1805 return E_INVALIDARG;
1807 wszDosPath = wine_get_dos_file_name(szAbsolute);
1808 if (wszDosPath == NULL || lstrlenW(wszDosPath) >= MAX_PATH)
1810 HeapFree(GetProcessHeap(), 0, wszPathsList);
1811 HeapFree(GetProcessHeap(), 0, wszDosPath);
1812 return S_FALSE;
1814 lstrcpyW(wszListPos, wszDosPath);
1815 wszListPos += lstrlenW(wszListPos)+1;
1816 HeapFree(GetProcessHeap(), 0, wszDosPath);
1818 *wszListPos = 0;
1820 ZeroMemory(&op, sizeof(op));
1821 op.hwnd = GetActiveWindow();
1822 op.wFunc = FO_DELETE;
1823 op.pFrom = wszPathsList;
1824 op.fFlags = FOF_ALLOWUNDO;
1825 if (!SHFileOperationW(&op))
1827 WARN("SHFileOperationW failed\n");
1828 ret = E_FAIL;
1830 else
1831 ret = S_OK;
1833 HeapFree(GetProcessHeap(), 0, wszPathsList);
1834 return ret;
1837 static HRESULT UNIXFS_delete_with_syscalls(UnixFolder *This, UINT cidl, LPCITEMIDLIST *apidl)
1839 char szAbsolute[FILENAME_MAX], *pszRelative;
1840 static const WCHAR empty[] = {0};
1841 int i;
1843 if (!SHELL_ConfirmYesNoW(GetActiveWindow(), ASK_DELETE_SELECTED, empty))
1844 return S_OK;
1846 lstrcpyA(szAbsolute, This->m_pszPath);
1847 pszRelative = szAbsolute + lstrlenA(szAbsolute);
1849 for (i=0; i<cidl; i++) {
1850 if (!UNIXFS_filename_from_shitemid(apidl[i], pszRelative))
1851 return E_INVALIDARG;
1852 if (_ILIsFolder(apidl[i])) {
1853 if (rmdir(szAbsolute))
1854 return E_FAIL;
1855 } else if (_ILIsValue(apidl[i])) {
1856 if (unlink(szAbsolute))
1857 return E_FAIL;
1860 return S_OK;
1863 static HRESULT WINAPI UnixFolder_ISFHelper_DeleteItems(ISFHelper* iface, UINT cidl,
1864 LPCITEMIDLIST* apidl)
1866 UnixFolder *This = ADJUST_THIS(UnixFolder, ISFHelper, iface);
1867 char szAbsolute[FILENAME_MAX], *pszRelative;
1868 LPITEMIDLIST pidlAbsolute;
1869 HRESULT hr = S_OK;
1870 UINT i;
1871 struct stat st;
1873 TRACE("(iface=%p, cidl=%d, apidl=%p)\n", iface, cidl, apidl);
1875 hr = UNIXFS_delete_with_shfileop(This, cidl, apidl);
1876 if (hr == S_FALSE)
1877 hr = UNIXFS_delete_with_syscalls(This, cidl, apidl);
1879 lstrcpyA(szAbsolute, This->m_pszPath);
1880 pszRelative = szAbsolute + lstrlenA(szAbsolute);
1882 /* we need to manually send the notifies if the files doesn't exist */
1883 for (i=0; i<cidl; i++) {
1884 if (!UNIXFS_filename_from_shitemid(apidl[i], pszRelative))
1885 continue;
1886 pidlAbsolute = ILCombine(This->m_pidlLocation, apidl[i]);
1887 if (stat(szAbsolute, &st))
1889 if (_ILIsFolder(apidl[i])) {
1890 SHChangeNotify(SHCNE_RMDIR, SHCNF_IDLIST, pidlAbsolute, NULL);
1891 } else if (_ILIsValue(apidl[i])) {
1892 SHChangeNotify(SHCNE_DELETE, SHCNF_IDLIST, pidlAbsolute, NULL);
1895 ILFree(pidlAbsolute);
1898 return hr;
1901 static HRESULT WINAPI UnixFolder_ISFHelper_CopyItems(ISFHelper* iface, IShellFolder *psfFrom,
1902 UINT cidl, LPCITEMIDLIST *apidl)
1904 UnixFolder *This = ADJUST_THIS(UnixFolder, ISFHelper, iface);
1905 DWORD dwAttributes;
1906 UINT i;
1907 HRESULT hr;
1908 char szAbsoluteDst[FILENAME_MAX], *pszRelativeDst;
1910 TRACE("(iface=%p, psfFrom=%p, cidl=%d, apidl=%p): semi-stub\n", iface, psfFrom, cidl, apidl);
1912 if (!psfFrom || !cidl || !apidl)
1913 return E_INVALIDARG;
1915 /* All source items have to be filesystem items. */
1916 dwAttributes = SFGAO_FILESYSTEM;
1917 hr = IShellFolder_GetAttributesOf(psfFrom, cidl, apidl, &dwAttributes);
1918 if (FAILED(hr) || !(dwAttributes & SFGAO_FILESYSTEM))
1919 return E_INVALIDARG;
1921 lstrcpyA(szAbsoluteDst, This->m_pszPath);
1922 pszRelativeDst = szAbsoluteDst + strlen(szAbsoluteDst);
1924 for (i=0; i<cidl; i++) {
1925 WCHAR wszSrc[MAX_PATH];
1926 char szSrc[FILENAME_MAX];
1927 STRRET strret;
1929 /* Build the unix path of the current source item. */
1930 if (FAILED(IShellFolder_GetDisplayNameOf(psfFrom, apidl[i], SHGDN_FORPARSING, &strret)))
1931 return E_FAIL;
1932 if (FAILED(StrRetToBufW(&strret, apidl[i], wszSrc, MAX_PATH)))
1933 return E_FAIL;
1934 if (!UNIXFS_get_unix_path(wszSrc, szSrc))
1935 return E_FAIL;
1937 /* Build the unix path of the current destination item */
1938 UNIXFS_filename_from_shitemid(apidl[i], pszRelativeDst);
1940 FIXME("Would copy %s to %s. Not yet implemented.\n", szSrc, szAbsoluteDst);
1942 return S_OK;
1945 /* VTable for UnixFolder's ISFHelper interface
1947 static const ISFHelperVtbl UnixFolder_ISFHelper_Vtbl = {
1948 UnixFolder_ISFHelper_QueryInterface,
1949 UnixFolder_ISFHelper_AddRef,
1950 UnixFolder_ISFHelper_Release,
1951 UnixFolder_ISFHelper_GetUniqueName,
1952 UnixFolder_ISFHelper_AddFolder,
1953 UnixFolder_ISFHelper_DeleteItems,
1954 UnixFolder_ISFHelper_CopyItems
1957 static HRESULT WINAPI UnixFolder_IDropTarget_QueryInterface(IDropTarget* iface, REFIID riid,
1958 void** ppvObject)
1960 return UnixFolder_IShellFolder2_QueryInterface(
1961 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, IDropTarget, iface)), riid, ppvObject);
1964 static ULONG WINAPI UnixFolder_IDropTarget_AddRef(IDropTarget* iface)
1966 return UnixFolder_IShellFolder2_AddRef(
1967 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, IDropTarget, iface)));
1970 static ULONG WINAPI UnixFolder_IDropTarget_Release(IDropTarget* iface)
1972 return UnixFolder_IShellFolder2_Release(
1973 STATIC_CAST(IShellFolder2, ADJUST_THIS(UnixFolder, IDropTarget, iface)));
1976 #define HIDA_GetPIDLFolder(pida) (LPCITEMIDLIST)(((LPBYTE)pida)+(pida)->aoffset[0])
1977 #define HIDA_GetPIDLItem(pida, i) (LPCITEMIDLIST)(((LPBYTE)pida)+(pida)->aoffset[i+1])
1979 static HRESULT WINAPI UnixFolder_IDropTarget_DragEnter(IDropTarget *iface, IDataObject *pDataObject,
1980 DWORD dwKeyState, POINTL pt, DWORD *pdwEffect)
1982 UnixFolder *This = ADJUST_THIS(UnixFolder, IDropTarget, iface);
1983 FORMATETC format;
1984 STGMEDIUM medium;
1986 TRACE("(iface=%p, pDataObject=%p, dwKeyState=%08x, pt={.x=%d, .y=%d}, pdwEffect=%p)\n",
1987 iface, pDataObject, dwKeyState, pt.x, pt.y, pdwEffect);
1989 if (!pdwEffect || !pDataObject)
1990 return E_INVALIDARG;
1992 /* Compute a mask of supported drop-effects for this shellfolder object and the given data
1993 * object. Dropping is only supported on folders, which represent filesystem locations. One
1994 * can't drop on file objects. And the 'move' drop effect is only supported, if the source
1995 * folder is not identical to the target folder. */
1996 This->m_dwDropEffectsMask = DROPEFFECT_NONE;
1997 InitFormatEtc(format, cfShellIDList, TYMED_HGLOBAL);
1998 if ((This->m_dwAttributes & SFGAO_FILESYSTEM) && /* Only drop to filesystem folders */
1999 _ILIsFolder(ILFindLastID(This->m_pidlLocation)) && /* Only drop to folders, not to files */
2000 SUCCEEDED(IDataObject_GetData(pDataObject, &format, &medium))) /* Only ShellIDList format */
2002 LPIDA pidaShellIDList = GlobalLock(medium.u.hGlobal);
2003 This->m_dwDropEffectsMask |= DROPEFFECT_COPY|DROPEFFECT_LINK;
2005 if (pidaShellIDList) { /* Files can only be moved between two different folders */
2006 if (!ILIsEqual(HIDA_GetPIDLFolder(pidaShellIDList), This->m_pidlLocation))
2007 This->m_dwDropEffectsMask |= DROPEFFECT_MOVE;
2008 GlobalUnlock(medium.u.hGlobal);
2012 *pdwEffect = KeyStateToDropEffect(dwKeyState) & This->m_dwDropEffectsMask;
2014 return S_OK;
2017 static HRESULT WINAPI UnixFolder_IDropTarget_DragOver(IDropTarget *iface, DWORD dwKeyState,
2018 POINTL pt, DWORD *pdwEffect)
2020 UnixFolder *This = ADJUST_THIS(UnixFolder, IDropTarget, iface);
2022 TRACE("(iface=%p, dwKeyState=%08x, pt={.x=%d, .y=%d}, pdwEffect=%p)\n", iface, dwKeyState,
2023 pt.x, pt.y, pdwEffect);
2025 if (!pdwEffect)
2026 return E_INVALIDARG;
2028 *pdwEffect = KeyStateToDropEffect(dwKeyState) & This->m_dwDropEffectsMask;
2030 return S_OK;
2033 static HRESULT WINAPI UnixFolder_IDropTarget_DragLeave(IDropTarget *iface) {
2034 UnixFolder *This = ADJUST_THIS(UnixFolder, IDropTarget, iface);
2036 TRACE("(iface=%p)\n", iface);
2038 This->m_dwDropEffectsMask = DROPEFFECT_NONE;
2040 return S_OK;
2043 static HRESULT WINAPI UnixFolder_IDropTarget_Drop(IDropTarget *iface, IDataObject *pDataObject,
2044 DWORD dwKeyState, POINTL pt, DWORD *pdwEffect)
2046 UnixFolder *This = ADJUST_THIS(UnixFolder, IDropTarget, iface);
2047 FORMATETC format;
2048 STGMEDIUM medium;
2049 HRESULT hr;
2051 TRACE("(iface=%p, pDataObject=%p, dwKeyState=%d, pt={.x=%d, .y=%d}, pdwEffect=%p) semi-stub\n",
2052 iface, pDataObject, dwKeyState, pt.x, pt.y, pdwEffect);
2054 InitFormatEtc(format, cfShellIDList, TYMED_HGLOBAL);
2055 hr = IDataObject_GetData(pDataObject, &format, &medium);
2056 if (!SUCCEEDED(hr))
2057 return hr;
2059 if (medium.tymed == TYMED_HGLOBAL) {
2060 IShellFolder *psfSourceFolder, *psfDesktopFolder;
2061 LPIDA pidaShellIDList = GlobalLock(medium.u.hGlobal);
2062 STRRET strret;
2063 UINT i;
2065 if (!pidaShellIDList)
2066 return HRESULT_FROM_WIN32(GetLastError());
2068 hr = SHGetDesktopFolder(&psfDesktopFolder);
2069 if (FAILED(hr)) {
2070 GlobalUnlock(medium.u.hGlobal);
2071 return hr;
2074 hr = IShellFolder_BindToObject(psfDesktopFolder, HIDA_GetPIDLFolder(pidaShellIDList), NULL,
2075 &IID_IShellFolder, (LPVOID*)&psfSourceFolder);
2076 IShellFolder_Release(psfDesktopFolder);
2077 if (FAILED(hr)) {
2078 GlobalUnlock(medium.u.hGlobal);
2079 return hr;
2082 for (i = 0; i < pidaShellIDList->cidl; i++) {
2083 WCHAR wszSourcePath[MAX_PATH];
2085 hr = IShellFolder_GetDisplayNameOf(psfSourceFolder, HIDA_GetPIDLItem(pidaShellIDList, i),
2086 SHGDN_FORPARSING, &strret);
2087 if (FAILED(hr))
2088 break;
2090 hr = StrRetToBufW(&strret, NULL, wszSourcePath, MAX_PATH);
2091 if (FAILED(hr))
2092 break;
2094 switch (*pdwEffect) {
2095 case DROPEFFECT_MOVE:
2096 FIXME("Move %s to %s!\n", debugstr_w(wszSourcePath), This->m_pszPath);
2097 break;
2098 case DROPEFFECT_COPY:
2099 FIXME("Copy %s to %s!\n", debugstr_w(wszSourcePath), This->m_pszPath);
2100 break;
2101 case DROPEFFECT_LINK:
2102 FIXME("Link %s from %s!\n", debugstr_w(wszSourcePath), This->m_pszPath);
2103 break;
2107 IShellFolder_Release(psfSourceFolder);
2108 GlobalUnlock(medium.u.hGlobal);
2109 return hr;
2112 return E_NOTIMPL;
2115 /* VTable for UnixFolder's IDropTarget interface
2117 static const IDropTargetVtbl UnixFolder_IDropTarget_Vtbl = {
2118 UnixFolder_IDropTarget_QueryInterface,
2119 UnixFolder_IDropTarget_AddRef,
2120 UnixFolder_IDropTarget_Release,
2121 UnixFolder_IDropTarget_DragEnter,
2122 UnixFolder_IDropTarget_DragOver,
2123 UnixFolder_IDropTarget_DragLeave,
2124 UnixFolder_IDropTarget_Drop
2127 /******************************************************************************
2128 * Unix[Dos]Folder_Constructor [Internal]
2130 * PARAMS
2131 * pUnkOuter [I] Outer class for aggregation. Currently ignored.
2132 * riid [I] Interface asked for by the client.
2133 * ppv [O] Pointer to an riid interface to the UnixFolder object.
2135 * NOTES
2136 * Those are the only functions exported from shfldr_unixfs.c. They are called from
2137 * shellole.c's default class factory and thus have to exhibit a LPFNCREATEINSTANCE
2138 * compatible signature.
2140 * The UnixDosFolder_Constructor sets the dwPathMode member to PATHMODE_DOS. This
2141 * means that paths are converted from dos to unix and back at the interfaces.
2143 static HRESULT CreateUnixFolder(IUnknown *pUnkOuter, REFIID riid, LPVOID *ppv, const CLSID *pCLSID)
2145 HRESULT hr = E_FAIL;
2146 UnixFolder *pUnixFolder = SHAlloc((ULONG)sizeof(UnixFolder));
2148 if (pUnkOuter) {
2149 FIXME("Aggregation not yet implemented!\n");
2150 return CLASS_E_NOAGGREGATION;
2153 if(pUnixFolder) {
2154 pUnixFolder->lpIShellFolder2Vtbl = &UnixFolder_IShellFolder2_Vtbl;
2155 pUnixFolder->lpIPersistFolder3Vtbl = &UnixFolder_IPersistFolder3_Vtbl;
2156 pUnixFolder->lpIPersistPropertyBagVtbl = &UnixFolder_IPersistPropertyBag_Vtbl;
2157 pUnixFolder->lpISFHelperVtbl = &UnixFolder_ISFHelper_Vtbl;
2158 pUnixFolder->lpIDropTargetVtbl = &UnixFolder_IDropTarget_Vtbl;
2159 pUnixFolder->m_cRef = 0;
2160 pUnixFolder->m_pszPath = NULL;
2161 pUnixFolder->m_pidlLocation = NULL;
2162 pUnixFolder->m_dwPathMode = IsEqualCLSID(&CLSID_UnixFolder, pCLSID) ? PATHMODE_UNIX : PATHMODE_DOS;
2163 pUnixFolder->m_dwAttributes = 0;
2164 pUnixFolder->m_pCLSID = pCLSID;
2165 pUnixFolder->m_dwDropEffectsMask = DROPEFFECT_NONE;
2167 UnixFolder_IShellFolder2_AddRef(STATIC_CAST(IShellFolder2, pUnixFolder));
2168 hr = UnixFolder_IShellFolder2_QueryInterface(STATIC_CAST(IShellFolder2, pUnixFolder), riid, ppv);
2169 UnixFolder_IShellFolder2_Release(STATIC_CAST(IShellFolder2, pUnixFolder));
2171 return hr;
2174 HRESULT WINAPI UnixFolder_Constructor(IUnknown *pUnkOuter, REFIID riid, LPVOID *ppv) {
2175 TRACE("(pUnkOuter=%p, riid=%p, ppv=%p)\n", pUnkOuter, riid, ppv);
2176 return CreateUnixFolder(pUnkOuter, riid, ppv, &CLSID_UnixFolder);
2179 HRESULT WINAPI UnixDosFolder_Constructor(IUnknown *pUnkOuter, REFIID riid, LPVOID *ppv) {
2180 TRACE("(pUnkOuter=%p, riid=%p, ppv=%p)\n", pUnkOuter, riid, ppv);
2181 return CreateUnixFolder(pUnkOuter, riid, ppv, &CLSID_UnixDosFolder);
2184 HRESULT WINAPI FolderShortcut_Constructor(IUnknown *pUnkOuter, REFIID riid, LPVOID *ppv) {
2185 TRACE("(pUnkOuter=%p, riid=%p, ppv=%p)\n", pUnkOuter, riid, ppv);
2186 return CreateUnixFolder(pUnkOuter, riid, ppv, &CLSID_FolderShortcut);
2189 HRESULT WINAPI MyDocuments_Constructor(IUnknown *pUnkOuter, REFIID riid, LPVOID *ppv) {
2190 TRACE("(pUnkOuter=%p, riid=%p, ppv=%p)\n", pUnkOuter, riid, ppv);
2191 return CreateUnixFolder(pUnkOuter, riid, ppv, &CLSID_MyDocuments);
2194 HRESULT WINAPI ShellFSFolder_Constructor(IUnknown *pUnkOuter, REFIID riid, LPVOID *ppv) {
2195 TRACE("(pUnkOuter=%p, riid=%p, ppv=%p)\n", pUnkOuter, riid, ppv);
2196 return CreateUnixFolder(pUnkOuter, riid, ppv, &CLSID_ShellFSFolder);
2199 /******************************************************************************
2200 * UnixSubFolderIterator
2202 * Class whose heap based objects represent iterators over the sub-directories
2203 * of a given UnixFolder object.
2206 /* UnixSubFolderIterator object layout and typedef.
2208 typedef struct _UnixSubFolderIterator {
2209 const IEnumIDListVtbl *lpIEnumIDListVtbl;
2210 LONG m_cRef;
2211 SHCONTF m_fFilter;
2212 DIR *m_dirFolder;
2213 char m_szFolder[FILENAME_MAX];
2214 } UnixSubFolderIterator;
2216 static void UnixSubFolderIterator_Destroy(UnixSubFolderIterator *iterator) {
2217 TRACE("(iterator=%p)\n", iterator);
2219 if (iterator->m_dirFolder)
2220 closedir(iterator->m_dirFolder);
2221 SHFree(iterator);
2224 static HRESULT WINAPI UnixSubFolderIterator_IEnumIDList_QueryInterface(IEnumIDList* iface,
2225 REFIID riid, void** ppv)
2227 TRACE("(iface=%p, riid=%p, ppv=%p)\n", iface, riid, ppv);
2229 if (!ppv) return E_INVALIDARG;
2231 if (IsEqualIID(&IID_IUnknown, riid) || IsEqualIID(&IID_IEnumIDList, riid)) {
2232 *ppv = iface;
2233 } else {
2234 *ppv = NULL;
2235 return E_NOINTERFACE;
2238 IEnumIDList_AddRef(iface);
2239 return S_OK;
2242 static ULONG WINAPI UnixSubFolderIterator_IEnumIDList_AddRef(IEnumIDList* iface)
2244 UnixSubFolderIterator *This = ADJUST_THIS(UnixSubFolderIterator, IEnumIDList, iface);
2246 TRACE("(iface=%p)\n", iface);
2248 return InterlockedIncrement(&This->m_cRef);
2251 static ULONG WINAPI UnixSubFolderIterator_IEnumIDList_Release(IEnumIDList* iface)
2253 UnixSubFolderIterator *This = ADJUST_THIS(UnixSubFolderIterator, IEnumIDList, iface);
2254 ULONG cRef;
2256 TRACE("(iface=%p)\n", iface);
2258 cRef = InterlockedDecrement(&This->m_cRef);
2260 if (!cRef)
2261 UnixSubFolderIterator_Destroy(This);
2263 return cRef;
2266 static HRESULT WINAPI UnixSubFolderIterator_IEnumIDList_Next(IEnumIDList* iface, ULONG celt,
2267 LPITEMIDLIST* rgelt, ULONG* pceltFetched)
2269 UnixSubFolderIterator *This = ADJUST_THIS(UnixSubFolderIterator, IEnumIDList, iface);
2270 ULONG i = 0;
2272 /* This->m_dirFolder will be NULL if the user doesn't have access rights for the dir. */
2273 if (This->m_dirFolder) {
2274 char *pszRelativePath = This->m_szFolder + lstrlenA(This->m_szFolder);
2275 struct dirent *pDirEntry;
2277 while (i < celt) {
2278 pDirEntry = readdir(This->m_dirFolder);
2279 if (!pDirEntry) break; /* No more entries */
2280 if (!strcmp(pDirEntry->d_name, ".") || !strcmp(pDirEntry->d_name, "..")) continue;
2282 /* Temporarily build absolute path in This->m_szFolder. Then construct a pidl
2283 * and see if it passes the filter.
2285 lstrcpyA(pszRelativePath, pDirEntry->d_name);
2286 rgelt[i] = (LPITEMIDLIST)SHAlloc(
2287 UNIXFS_shitemid_len_from_filename(pszRelativePath, NULL, NULL)+sizeof(USHORT));
2288 if (!UNIXFS_build_shitemid(This->m_szFolder, rgelt[i]) ||
2289 !UNIXFS_is_pidl_of_type(rgelt[i], This->m_fFilter))
2291 SHFree(rgelt[i]);
2292 continue;
2294 memset(((PBYTE)rgelt[i])+rgelt[i]->mkid.cb, 0, sizeof(USHORT));
2295 i++;
2297 *pszRelativePath = '\0'; /* Restore the original path in This->m_szFolder. */
2300 if (pceltFetched)
2301 *pceltFetched = i;
2303 return (i == 0) ? S_FALSE : S_OK;
2306 static HRESULT WINAPI UnixSubFolderIterator_IEnumIDList_Skip(IEnumIDList* iface, ULONG celt)
2308 LPITEMIDLIST *apidl;
2309 ULONG cFetched;
2310 HRESULT hr;
2312 TRACE("(iface=%p, celt=%d)\n", iface, celt);
2314 /* Call IEnumIDList::Next and delete the resulting pidls. */
2315 apidl = (LPITEMIDLIST*)SHAlloc(celt * sizeof(LPITEMIDLIST));
2316 hr = IEnumIDList_Next(iface, celt, apidl, &cFetched);
2317 if (SUCCEEDED(hr))
2318 while (cFetched--)
2319 SHFree(apidl[cFetched]);
2320 SHFree(apidl);
2322 return hr;
2325 static HRESULT WINAPI UnixSubFolderIterator_IEnumIDList_Reset(IEnumIDList* iface)
2327 UnixSubFolderIterator *This = ADJUST_THIS(UnixSubFolderIterator, IEnumIDList, iface);
2329 TRACE("(iface=%p)\n", iface);
2331 if (This->m_dirFolder)
2332 rewinddir(This->m_dirFolder);
2334 return S_OK;
2337 static HRESULT WINAPI UnixSubFolderIterator_IEnumIDList_Clone(IEnumIDList* This,
2338 IEnumIDList** ppenum)
2340 FIXME("stub\n");
2341 return E_NOTIMPL;
2344 /* VTable for UnixSubFolderIterator's IEnumIDList interface.
2346 static const IEnumIDListVtbl UnixSubFolderIterator_IEnumIDList_Vtbl = {
2347 UnixSubFolderIterator_IEnumIDList_QueryInterface,
2348 UnixSubFolderIterator_IEnumIDList_AddRef,
2349 UnixSubFolderIterator_IEnumIDList_Release,
2350 UnixSubFolderIterator_IEnumIDList_Next,
2351 UnixSubFolderIterator_IEnumIDList_Skip,
2352 UnixSubFolderIterator_IEnumIDList_Reset,
2353 UnixSubFolderIterator_IEnumIDList_Clone
2356 static IUnknown *UnixSubFolderIterator_Constructor(UnixFolder *pUnixFolder, SHCONTF fFilter) {
2357 UnixSubFolderIterator *iterator;
2359 TRACE("(pUnixFolder=%p)\n", pUnixFolder);
2361 iterator = SHAlloc((ULONG)sizeof(UnixSubFolderIterator));
2362 iterator->lpIEnumIDListVtbl = &UnixSubFolderIterator_IEnumIDList_Vtbl;
2363 iterator->m_cRef = 0;
2364 iterator->m_fFilter = fFilter;
2365 iterator->m_dirFolder = opendir(pUnixFolder->m_pszPath);
2366 lstrcpyA(iterator->m_szFolder, pUnixFolder->m_pszPath);
2368 UnixSubFolderIterator_IEnumIDList_AddRef((IEnumIDList*)iterator);
2370 return (IUnknown*)iterator;