4 * Copyright 1998, 1999, 2000 Juergen Schmied
5 * Copyright 2004 Juan Lang
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.
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.
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
23 * Many of these functions are in SHLWAPI.DLL also
29 WINE_DEFAULT_DEBUG_CHANNEL(shell
);
32 ########## Combining and Constructing paths ##########
35 /*************************************************************************
36 * PathAppend [SHELL32.36]
38 BOOL WINAPI
PathAppendAW(
42 if (SHELL_OsIsUnicode())
43 return PathAppendW((LPWSTR
)lpszPath1
, (LPCWSTR
)lpszPath2
);
44 return PathAppendA((LPSTR
)lpszPath1
, (LPCSTR
)lpszPath2
);
47 /*************************************************************************
48 * PathBuildRoot [SHELL32.30]
50 LPVOID WINAPI
PathBuildRootAW(LPVOID lpszPath
, int drive
)
52 if(SHELL_OsIsUnicode())
53 return PathBuildRootW((LPWSTR
)lpszPath
, drive
);
54 return PathBuildRootA((LPSTR
)lpszPath
, drive
);
57 /*************************************************************************
58 * PathGetExtensionA [internal]
62 * return value points to the first char after the dot
64 static LPSTR
PathGetExtensionA(LPCSTR lpszPath
)
66 TRACE("(%s)\n",lpszPath
);
68 lpszPath
= PathFindExtensionA(lpszPath
);
69 return (LPSTR
)(*lpszPath
?(lpszPath
+1):lpszPath
);
72 /*************************************************************************
73 * PathGetExtensionW [internal]
75 LPWSTR
PathGetExtensionW(LPCWSTR lpszPath
)
77 TRACE("(%s)\n",debugstr_w(lpszPath
));
79 lpszPath
= PathFindExtensionW(lpszPath
);
80 return (LPWSTR
)(*lpszPath
?(lpszPath
+1):lpszPath
);
83 /*************************************************************************
84 * SHPathGetExtension [SHELL32.158]
86 EXTERN_C LPVOID WINAPI
SHPathGetExtensionW(LPCWSTR lpszPath
, DWORD void1
, DWORD void2
)
88 return PathGetExtensionW(lpszPath
);
91 /*************************************************************************
92 * PathRemoveFileSpec [SHELL32.35]
94 BOOL WINAPI
PathRemoveFileSpecAW(LPVOID lpszPath
)
96 if (SHELL_OsIsUnicode())
97 return PathRemoveFileSpecW((LPWSTR
)lpszPath
);
98 return PathRemoveFileSpecA((LPSTR
)lpszPath
);
105 /*************************************************************************
106 * PathGetShortPathA [internal]
108 static void PathGetShortPathA(LPSTR pszPath
)
112 TRACE("%s\n", pszPath
);
114 if (GetShortPathNameA(pszPath
, path
, MAX_PATH
))
116 lstrcpyA(pszPath
, path
);
120 /*************************************************************************
121 * PathGetShortPathW [internal]
123 static void PathGetShortPathW(LPWSTR pszPath
)
125 WCHAR path
[MAX_PATH
];
127 TRACE("%s\n", debugstr_w(pszPath
));
129 if (GetShortPathNameW(pszPath
, path
, MAX_PATH
))
131 wcscpy(pszPath
, path
);
135 /*************************************************************************
136 * PathGetShortPath [SHELL32.92]
138 EXTERN_C VOID WINAPI
PathGetShortPathAW(LPVOID pszPath
)
140 if(SHELL_OsIsUnicode())
141 PathGetShortPathW((LPWSTR
)pszPath
);
142 PathGetShortPathA((LPSTR
)pszPath
);
146 ########## Path Testing ##########
149 /*************************************************************************
150 * PathIsRoot [SHELL32.29]
152 BOOL WINAPI
PathIsRootAW(LPCVOID lpszPath
)
154 if (SHELL_OsIsUnicode())
155 return PathIsRootW((LPWSTR
)lpszPath
);
156 return PathIsRootA((LPSTR
)lpszPath
);
159 /*************************************************************************
160 * PathIsExeA [internal]
162 static BOOL
PathIsExeA (LPCSTR lpszPath
)
164 LPCSTR lpszExtension
= PathGetExtensionA(lpszPath
);
166 static const char * const lpszExtensions
[] =
167 {"exe", "com", "pif", "cmd", "bat", "scf", "scr", NULL
};
169 TRACE("path=%s\n",lpszPath
);
171 for(i
=0; lpszExtensions
[i
]; i
++)
172 if (!lstrcmpiA(lpszExtension
,lpszExtensions
[i
])) return TRUE
;
177 /*************************************************************************
178 * PathIsExeW [internal]
180 static BOOL
PathIsExeW (LPCWSTR lpszPath
)
182 LPCWSTR lpszExtension
= PathGetExtensionW(lpszPath
);
184 static const WCHAR lpszExtensions
[][4] =
185 {{'e','x','e','\0'}, {'c','o','m','\0'}, {'p','i','f','\0'},
186 {'c','m','d','\0'}, {'b','a','t','\0'}, {'s','c','f','\0'},
187 {'s','c','r','\0'}, {'\0'} };
189 TRACE("path=%s\n",debugstr_w(lpszPath
));
191 for(i
=0; lpszExtensions
[i
][0]; i
++)
192 if (!strcmpiW(lpszExtension
,lpszExtensions
[i
])) return TRUE
;
197 /*************************************************************************
198 * PathIsExe [SHELL32.43]
200 BOOL WINAPI
PathIsExeAW (LPCVOID path
)
202 if (SHELL_OsIsUnicode())
203 return PathIsExeW ((LPWSTR
)path
);
204 return PathIsExeA((LPSTR
)path
);
207 /*************************************************************************
208 * PathFileExists [SHELL32.45]
210 BOOL WINAPI
PathFileExistsAW (LPCVOID lpszPath
)
212 if (SHELL_OsIsUnicode())
213 return PathFileExistsW ((LPWSTR
)lpszPath
);
214 return PathFileExistsA ((LPSTR
)lpszPath
);
217 /*************************************************************************
218 * PathIsSameRoot [SHELL32.650]
220 BOOL WINAPI
PathIsSameRootAW(LPCVOID lpszPath1
, LPCVOID lpszPath2
)
222 if (SHELL_OsIsUnicode())
223 return PathIsSameRootW((LPCWSTR
)lpszPath1
, (LPCWSTR
)lpszPath2
);
224 return PathIsSameRootA((LPCSTR
)lpszPath1
, (LPCSTR
)lpszPath2
);
227 /*************************************************************************
228 * IsLFNDriveA [SHELL32.41]
230 EXTERN_C BOOL WINAPI
IsLFNDriveA(LPCSTR lpszPath
)
234 if (!GetVolumeInformationA(lpszPath
, NULL
, 0, NULL
, &fnlen
, NULL
, NULL
, 0))
239 /*************************************************************************
240 * IsLFNDriveW [SHELL32.42]
242 EXTERN_C BOOL WINAPI
IsLFNDriveW(LPCWSTR lpszPath
)
246 if (!GetVolumeInformationW(lpszPath
, NULL
, 0, NULL
, &fnlen
, NULL
, NULL
, 0))
251 /*************************************************************************
252 * IsLFNDrive [SHELL32.119]
254 EXTERN_C BOOL WINAPI
IsLFNDriveAW(LPCVOID lpszPath
)
256 if (SHELL_OsIsUnicode())
257 return IsLFNDriveW((LPCWSTR
)lpszPath
);
258 return IsLFNDriveA((LPCSTR
)lpszPath
);
262 ########## Creating Something Unique ##########
264 /*************************************************************************
265 * PathMakeUniqueNameA [internal]
267 BOOL WINAPI
PathMakeUniqueNameA(
270 LPCSTR lpszShortName
,
274 FIXME("%p %u %s %s %s stub\n",
275 lpszBuffer
, dwBuffSize
, debugstr_a(lpszShortName
),
276 debugstr_a(lpszLongName
), debugstr_a(lpszPathName
));
280 /*************************************************************************
281 * PathMakeUniqueNameW [internal]
283 BOOL WINAPI
PathMakeUniqueNameW(
286 LPCWSTR lpszShortName
,
287 LPCWSTR lpszLongName
,
288 LPCWSTR lpszPathName
)
290 FIXME("%p %u %s %s %s stub\n",
291 lpszBuffer
, dwBuffSize
, debugstr_w(lpszShortName
),
292 debugstr_w(lpszLongName
), debugstr_w(lpszPathName
));
296 /*************************************************************************
297 * PathMakeUniqueName [SHELL32.47]
299 BOOL WINAPI
PathMakeUniqueNameAW(
302 LPCVOID lpszShortName
,
303 LPCVOID lpszLongName
,
304 LPCVOID lpszPathName
)
306 if (SHELL_OsIsUnicode())
307 return PathMakeUniqueNameW((LPWSTR
)lpszBuffer
, dwBuffSize
, (LPCWSTR
)lpszShortName
, (LPCWSTR
)lpszLongName
, (LPCWSTR
)lpszPathName
);
308 return PathMakeUniqueNameA((LPSTR
)lpszBuffer
, dwBuffSize
, (LPCSTR
)lpszShortName
, (LPCSTR
)lpszLongName
, (LPCSTR
)lpszPathName
);
311 /*************************************************************************
312 * PathYetAnotherMakeUniqueName [SHELL32.75]
315 * exported by ordinal
317 BOOL WINAPI
PathYetAnotherMakeUniqueName(
319 LPCWSTR lpszPathName
,
320 LPCWSTR lpszShortName
,
321 LPCWSTR lpszLongName
)
323 FIXME("(%p, %s, %s ,%s):stub.\n",
324 lpszBuffer
, debugstr_w(lpszPathName
), debugstr_w(lpszShortName
), debugstr_w(lpszLongName
));
330 ########## cleaning and resolving paths ##########
333 /*************************************************************************
334 * PathCleanupSpec [SHELL32.171]
336 * lpszFile is changed in place.
338 int WINAPI
PathCleanupSpec( LPCWSTR lpszPathW
, LPWSTR lpszFileW
)
344 if (SHELL_OsIsUnicode())
346 LPWSTR p
= lpszFileW
;
348 TRACE("Cleanup %s\n",debugstr_w(lpszFileW
));
351 length
= wcslen(lpszPathW
);
355 int gct
= PathGetCharTypeW(*p
);
356 if (gct
== GCT_INVALID
|| gct
== GCT_WILD
|| gct
== GCT_SEPARATOR
)
359 rc
|= PCS_REPLACEDCHAR
;
365 if (length
+ i
== MAX_PATH
)
367 rc
|= PCS_FATAL
| PCS_PATHTOOLONG
;
375 LPSTR lpszFileA
= (LPSTR
)lpszFileW
;
376 LPCSTR lpszPathA
= (LPCSTR
)lpszPathW
;
379 TRACE("Cleanup %s\n",debugstr_a(lpszFileA
));
382 length
= strlen(lpszPathA
);
386 int gct
= PathGetCharTypeA(*p
);
387 if (gct
== GCT_INVALID
|| gct
== GCT_WILD
|| gct
== GCT_SEPARATOR
)
390 rc
|= PCS_REPLACEDCHAR
;
396 if (length
+ i
== MAX_PATH
)
398 rc
|= PCS_FATAL
| PCS_PATHTOOLONG
;
407 /*************************************************************************
408 * PathQualifyA [SHELL32]
410 BOOL WINAPI
PathQualifyA(LPCSTR pszPath
)
412 FIXME("%s\n",pszPath
);
416 /*************************************************************************
417 * PathQualifyW [SHELL32]
419 BOOL WINAPI
PathQualifyW(LPCWSTR pszPath
)
421 FIXME("%s\n",debugstr_w(pszPath
));
425 /*************************************************************************
426 * PathQualify [SHELL32.49]
428 BOOL WINAPI
PathQualifyAW(LPCVOID pszPath
)
430 if (SHELL_OsIsUnicode())
431 return PathQualifyW((LPCWSTR
)pszPath
);
432 return PathQualifyA((LPCSTR
)pszPath
);
435 /*************************************************************************
436 * PathResolveA [SHELL32.51]
438 BOOL WINAPI
PathResolveA(
443 FIXME("(%s,%p,0x%08x),stub!\n",
444 lpszPath
, *alpszPaths
, dwFlags
);
448 /*************************************************************************
449 * PathResolveW [SHELL32]
451 BOOL WINAPI
PathResolveW(
456 FIXME("(%s,%p,0x%08x),stub!\n",
457 debugstr_w(lpszPath
), debugstr_w(*alpszPaths
), dwFlags
);
461 /*************************************************************************
462 * PathResolve [SHELL32.51]
464 BOOL WINAPI
PathResolveAW(
469 if (SHELL_OsIsUnicode())
470 return PathResolveW((LPWSTR
)lpszPath
, (LPCWSTR
*)alpszPaths
, dwFlags
);
471 return PathResolveA((LPSTR
)lpszPath
, (LPCSTR
*)alpszPaths
, dwFlags
);
474 /*************************************************************************
475 * PathProcessCommandA [SHELL32.653]
477 LONG WINAPI
PathProcessCommandA (
483 FIXME("%s %p 0x%04x 0x%04x stub\n",
484 lpszPath
, lpszBuff
, dwBuffSize
, dwFlags
);
485 if(!lpszPath
) return -1;
486 if(lpszBuff
) strcpy(lpszBuff
, lpszPath
);
487 return strlen(lpszPath
);
490 /*************************************************************************
491 * PathProcessCommandW
493 LONG WINAPI
PathProcessCommandW (
499 FIXME("(%s, %p, 0x%04x, 0x%04x) stub\n",
500 debugstr_w(lpszPath
), lpszBuff
, dwBuffSize
, dwFlags
);
501 if(!lpszPath
) return -1;
502 if(lpszBuff
) wcscpy(lpszBuff
, lpszPath
);
503 return wcslen(lpszPath
);
506 /*************************************************************************
507 * PathProcessCommand (SHELL32.653)
509 LONG WINAPI
PathProcessCommandAW (
515 if (SHELL_OsIsUnicode())
516 return PathProcessCommandW((LPCWSTR
)lpszPath
, (LPWSTR
)lpszBuff
, dwBuffSize
, dwFlags
);
517 return PathProcessCommandA((LPCSTR
)lpszPath
, (LPSTR
)lpszBuff
, dwBuffSize
, dwFlags
);
521 ########## special ##########
524 static const WCHAR szCurrentVersion
[] = {'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\0'};
525 static const WCHAR Administrative_ToolsW
[] = {'A','d','m','i','n','i','s','t','r','a','t','i','v','e',' ','T','o','o','l','s','\0'};
526 static const WCHAR AppDataW
[] = {'A','p','p','D','a','t','a','\0'};
527 static const WCHAR CacheW
[] = {'C','a','c','h','e','\0'};
528 static const WCHAR CD_BurningW
[] = {'C','D',' ','B','u','r','n','i','n','g','\0'};
529 static const WCHAR Common_Administrative_ToolsW
[] = {'C','o','m','m','o','n',' ','A','d','m','i','n','i','s','t','r','a','t','i','v','e',' ','T','o','o','l','s','\0'};
530 static const WCHAR Common_AppDataW
[] = {'C','o','m','m','o','n',' ','A','p','p','D','a','t','a','\0'};
531 static const WCHAR Common_DesktopW
[] = {'C','o','m','m','o','n',' ','D','e','s','k','t','o','p','\0'};
532 static const WCHAR Common_DocumentsW
[] = {'C','o','m','m','o','n',' ','D','o','c','u','m','e','n','t','s','\0'};
533 static const WCHAR CommonFilesDirW
[] = {'C','o','m','m','o','n','F','i','l','e','s','D','i','r','\0'};
534 static const WCHAR CommonMusicW
[] = {'C','o','m','m','o','n','M','u','s','i','c','\0'};
535 static const WCHAR CommonPicturesW
[] = {'C','o','m','m','o','n','P','i','c','t','u','r','e','s','\0'};
536 static const WCHAR Common_ProgramsW
[] = {'C','o','m','m','o','n',' ','P','r','o','g','r','a','m','s','\0'};
537 static const WCHAR Common_StartUpW
[] = {'C','o','m','m','o','n',' ','S','t','a','r','t','U','p','\0'};
538 static const WCHAR Common_Start_MenuW
[] = {'C','o','m','m','o','n',' ','S','t','a','r','t',' ','M','e','n','u','\0'};
539 static const WCHAR Common_TemplatesW
[] = {'C','o','m','m','o','n',' ','T','e','m','p','l','a','t','e','s','\0'};
540 static const WCHAR CommonVideoW
[] = {'C','o','m','m','o','n','V','i','d','e','o','\0'};
541 static const WCHAR CookiesW
[] = {'C','o','o','k','i','e','s','\0'};
542 static const WCHAR DesktopW
[] = {'D','e','s','k','t','o','p','\0'};
543 static const WCHAR FavoritesW
[] = {'F','a','v','o','r','i','t','e','s','\0'};
544 static const WCHAR FontsW
[] = {'F','o','n','t','s','\0'};
545 static const WCHAR HistoryW
[] = {'H','i','s','t','o','r','y','\0'};
546 static const WCHAR Local_AppDataW
[] = {'L','o','c','a','l',' ','A','p','p','D','a','t','a','\0'};
547 static const WCHAR My_MusicW
[] = {'M','y',' ','M','u','s','i','c','\0'};
548 static const WCHAR My_PicturesW
[] = {'M','y',' ','P','i','c','t','u','r','e','s','\0'};
549 static const WCHAR My_VideoW
[] = {'M','y',' ','V','i','d','e','o','\0'};
550 static const WCHAR NetHoodW
[] = {'N','e','t','H','o','o','d','\0'};
551 static const WCHAR PersonalW
[] = {'P','e','r','s','o','n','a','l','\0'};
552 static const WCHAR PrintHoodW
[] = {'P','r','i','n','t','H','o','o','d','\0'};
553 static const WCHAR ProgramFilesDirW
[] = {'P','r','o','g','r','a','m','F','i','l','e','s','D','i','r','\0'};
554 static const WCHAR ProgramsW
[] = {'P','r','o','g','r','a','m','s','\0'};
555 static const WCHAR RecentW
[] = {'R','e','c','e','n','t','\0'};
556 static const WCHAR ResourcesW
[] = {'R','e','s','o','u','r','c','e','s','\0'};
557 static const WCHAR SendToW
[] = {'S','e','n','d','T','o','\0'};
558 static const WCHAR StartUpW
[] = {'S','t','a','r','t','U','p','\0'};
559 static const WCHAR Start_MenuW
[] = {'S','t','a','r','t',' ','M','e','n','u','\0'};
560 static const WCHAR TemplatesW
[] = {'T','e','m','p','l','a','t','e','s','\0'};
561 static const WCHAR DefaultW
[] = {'.','D','e','f','a','u','l','t','\0'};
562 static const WCHAR AllUsersProfileW
[] = {'%','A','L','L','U','S','E','R','S','P','R','O','F','I','L','E','%','\0'};
563 static const WCHAR UserProfileW
[] = {'%','U','S','E','R','P','R','O','F','I','L','E','%','\0'};
564 static const WCHAR SystemDriveW
[] = {'%','S','y','s','t','e','m','D','r','i','v','e','%','\0'};
565 static const WCHAR ProfileListW
[] = {'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s',' ','N','T','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\','P','r','o','f','i','l','e','L','i','s','t',0};
566 static const WCHAR ProfilesDirectoryW
[] = {'P','r','o','f','i','l','e','s','D','i','r','e','c','t','o','r','y',0};
567 static const WCHAR AllUsersProfileValueW
[] = {'A','l','l','U','s','e','r','s','P','r','o','f','i','l','e','\0'};
568 static const WCHAR szSHFolders
[] = {'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\','E','x','p','l','o','r','e','r','\\','S','h','e','l','l',' ','F','o','l','d','e','r','s','\0'};
569 static const WCHAR szSHUserFolders
[] = {'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\','E','x','p','l','o','r','e','r','\\','U','s','e','r',' ','S','h','e','l','l',' ','F','o','l','d','e','r','s','\0'};
570 /* This defaults to L"Documents and Settings" on Windows 2000/XP, but we're
571 * acting more Windows 9x-like for now.
573 static const WCHAR szDefaultProfileDirW
[] = {'p','r','o','f','i','l','e','s','\0'};
574 static const WCHAR AllUsersW
[] = {'A','l','l',' ','U','s','e','r','s','\0'};
576 typedef enum _CSIDL_Type
{
580 CSIDL_Type_Disallowed
,
581 CSIDL_Type_NonExistent
,
582 CSIDL_Type_WindowsPath
,
583 CSIDL_Type_SystemPath
,
590 LPCWSTR szDefaultPath
; /* fallback string or resource ID */
593 static const CSIDL_DATA CSIDL_Data
[] =
595 { /* 0x00 - CSIDL_DESKTOP */
598 MAKEINTRESOURCEW(IDS_DESKTOPDIRECTORY
)
600 { /* 0x01 - CSIDL_INTERNET */
601 CSIDL_Type_Disallowed
,
605 { /* 0x02 - CSIDL_PROGRAMS */
608 MAKEINTRESOURCEW(IDS_PROGRAMS
)
610 { /* 0x03 - CSIDL_CONTROLS (.CPL files) */
611 CSIDL_Type_SystemPath
,
615 { /* 0x04 - CSIDL_PRINTERS */
616 CSIDL_Type_SystemPath
,
620 { /* 0x05 - CSIDL_PERSONAL */
623 MAKEINTRESOURCEW(IDS_PERSONAL
)
625 { /* 0x06 - CSIDL_FAVORITES */
628 MAKEINTRESOURCEW(IDS_FAVORITES
)
630 { /* 0x07 - CSIDL_STARTUP */
633 MAKEINTRESOURCEW(IDS_STARTUP
)
635 { /* 0x08 - CSIDL_RECENT */
638 MAKEINTRESOURCEW(IDS_RECENT
)
640 { /* 0x09 - CSIDL_SENDTO */
643 MAKEINTRESOURCEW(IDS_SENDTO
)
645 { /* 0x0a - CSIDL_BITBUCKET - Recycle Bin */
646 CSIDL_Type_Disallowed
,
650 { /* 0x0b - CSIDL_STARTMENU */
653 MAKEINTRESOURCEW(IDS_STARTMENU
)
655 { /* 0x0c - CSIDL_MYDOCUMENTS */
656 CSIDL_Type_Disallowed
, /* matches WinXP--can't get its path */
660 { /* 0x0d - CSIDL_MYMUSIC */
663 MAKEINTRESOURCEW(IDS_MYMUSIC
)
665 { /* 0x0e - CSIDL_MYVIDEO */
668 MAKEINTRESOURCEW(IDS_MYVIDEO
)
670 { /* 0x0f - unassigned */
671 CSIDL_Type_Disallowed
,
675 { /* 0x10 - CSIDL_DESKTOPDIRECTORY */
678 MAKEINTRESOURCEW(IDS_DESKTOPDIRECTORY
)
680 { /* 0x11 - CSIDL_DRIVES */
681 CSIDL_Type_Disallowed
,
685 { /* 0x12 - CSIDL_NETWORK */
686 CSIDL_Type_Disallowed
,
690 { /* 0x13 - CSIDL_NETHOOD */
693 MAKEINTRESOURCEW(IDS_NETHOOD
)
695 { /* 0x14 - CSIDL_FONTS */
696 CSIDL_Type_WindowsPath
,
700 { /* 0x15 - CSIDL_TEMPLATES */
703 MAKEINTRESOURCEW(IDS_TEMPLATES
)
705 { /* 0x16 - CSIDL_COMMON_STARTMENU */
708 MAKEINTRESOURCEW(IDS_STARTMENU
)
710 { /* 0x17 - CSIDL_COMMON_PROGRAMS */
713 MAKEINTRESOURCEW(IDS_PROGRAMS
)
715 { /* 0x18 - CSIDL_COMMON_STARTUP */
718 MAKEINTRESOURCEW(IDS_STARTUP
)
720 { /* 0x19 - CSIDL_COMMON_DESKTOPDIRECTORY */
723 MAKEINTRESOURCEW(IDS_DESKTOP
)
725 { /* 0x1a - CSIDL_APPDATA */
728 MAKEINTRESOURCEW(IDS_APPDATA
)
730 { /* 0x1b - CSIDL_PRINTHOOD */
733 MAKEINTRESOURCEW(IDS_PRINTHOOD
)
735 { /* 0x1c - CSIDL_LOCAL_APPDATA */
738 MAKEINTRESOURCEW(IDS_LOCAL_APPDATA
)
740 { /* 0x1d - CSIDL_ALTSTARTUP */
741 CSIDL_Type_NonExistent
,
745 { /* 0x1e - CSIDL_COMMON_ALTSTARTUP */
746 CSIDL_Type_NonExistent
,
750 { /* 0x1f - CSIDL_COMMON_FAVORITES */
753 MAKEINTRESOURCEW(IDS_FAVORITES
)
755 { /* 0x20 - CSIDL_INTERNET_CACHE */
758 MAKEINTRESOURCEW(IDS_INTERNET_CACHE
)
760 { /* 0x21 - CSIDL_COOKIES */
763 MAKEINTRESOURCEW(IDS_COOKIES
)
765 { /* 0x22 - CSIDL_HISTORY */
768 MAKEINTRESOURCEW(IDS_HISTORY
)
770 { /* 0x23 - CSIDL_COMMON_APPDATA */
773 MAKEINTRESOURCEW(IDS_APPDATA
)
775 { /* 0x24 - CSIDL_WINDOWS */
776 CSIDL_Type_WindowsPath
,
780 { /* 0x25 - CSIDL_SYSTEM */
781 CSIDL_Type_SystemPath
,
785 { /* 0x26 - CSIDL_PROGRAM_FILES */
788 MAKEINTRESOURCEW(IDS_PROGRAM_FILES
)
790 { /* 0x27 - CSIDL_MYPICTURES */
793 MAKEINTRESOURCEW(IDS_MYPICTURES
)
795 { /* 0x28 - CSIDL_PROFILE */
800 { /* 0x29 - CSIDL_SYSTEMX86 */
801 CSIDL_Type_NonExistent
,
805 { /* 0x2a - CSIDL_PROGRAM_FILESX86 */
806 CSIDL_Type_NonExistent
,
810 { /* 0x2b - CSIDL_PROGRAM_FILES_COMMON */
813 MAKEINTRESOURCEW(IDS_PROGRAM_FILES_COMMON
)
815 { /* 0x2c - CSIDL_PROGRAM_FILES_COMMONX86 */
816 CSIDL_Type_NonExistent
,
820 { /* 0x2d - CSIDL_COMMON_TEMPLATES */
823 MAKEINTRESOURCEW(IDS_TEMPLATES
)
825 { /* 0x2e - CSIDL_COMMON_DOCUMENTS */
828 MAKEINTRESOURCEW(IDS_COMMON_DOCUMENTS
)
830 { /* 0x2f - CSIDL_COMMON_ADMINTOOLS */
832 Common_Administrative_ToolsW
,
833 MAKEINTRESOURCEW(IDS_ADMINTOOLS
)
835 { /* 0x30 - CSIDL_ADMINTOOLS */
837 Administrative_ToolsW
,
838 MAKEINTRESOURCEW(IDS_ADMINTOOLS
)
840 { /* 0x31 - CSIDL_CONNECTIONS */
841 CSIDL_Type_Disallowed
,
845 { /* 0x32 - unassigned */
846 CSIDL_Type_Disallowed
,
850 { /* 0x33 - unassigned */
851 CSIDL_Type_Disallowed
,
855 { /* 0x34 - unassigned */
856 CSIDL_Type_Disallowed
,
860 { /* 0x35 - CSIDL_COMMON_MUSIC */
863 MAKEINTRESOURCEW(IDS_COMMON_MUSIC
)
865 { /* 0x36 - CSIDL_COMMON_PICTURES */
868 MAKEINTRESOURCEW(IDS_COMMON_PICTURES
)
870 { /* 0x37 - CSIDL_COMMON_VIDEO */
873 MAKEINTRESOURCEW(IDS_COMMON_VIDEO
)
875 { /* 0x38 - CSIDL_RESOURCES */
876 CSIDL_Type_WindowsPath
,
880 { /* 0x39 - CSIDL_RESOURCES_LOCALIZED */
881 CSIDL_Type_NonExistent
,
885 { /* 0x3a - CSIDL_COMMON_OEM_LINKS */
886 CSIDL_Type_NonExistent
,
890 { /* 0x3b - CSIDL_CDBURN_AREA */
893 MAKEINTRESOURCEW(IDS_CDBURN_AREA
)
895 { /* 0x3c unassigned */
896 CSIDL_Type_Disallowed
,
900 { /* 0x3d - CSIDL_COMPUTERSNEARME */
901 CSIDL_Type_Disallowed
, /* FIXME */
905 { /* 0x3e - CSIDL_PROFILES */
906 CSIDL_Type_Disallowed
, /* oddly, this matches WinXP */
912 /* Gets the value named value from the registry key
913 * rootKey\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders
914 * (or from rootKey\userPrefix\... if userPrefix is not NULL) into path, which
915 * is assumed to be MAX_PATH WCHARs in length.
916 * If it exists, expands the value and writes the expanded value to
917 * rootKey\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders
918 * Returns successful error code if the value was retrieved from the registry,
919 * and a failure otherwise.
921 static HRESULT
_SHGetUserShellFolderPath(HKEY rootKey
, LPCWSTR userPrefix
,
922 LPCWSTR value
, LPWSTR path
)
925 WCHAR shellFolderPath
[MAX_PATH
], userShellFolderPath
[MAX_PATH
];
926 LPCWSTR pShellFolderPath
, pUserShellFolderPath
;
927 DWORD dwDisp
, dwType
, dwPathLen
;
928 HKEY userShellFolderKey
, shellFolderKey
;
930 TRACE("%p,%s,%s,%p\n",rootKey
, debugstr_w(userPrefix
), debugstr_w(value
),
935 wcscpy(shellFolderPath
, userPrefix
);
936 PathAddBackslashW(shellFolderPath
);
937 wcscat(shellFolderPath
, szSHFolders
);
938 pShellFolderPath
= shellFolderPath
;
939 wcscpy(userShellFolderPath
, userPrefix
);
940 PathAddBackslashW(userShellFolderPath
);
941 wcscat(userShellFolderPath
, szSHUserFolders
);
942 pUserShellFolderPath
= userShellFolderPath
;
946 pUserShellFolderPath
= szSHUserFolders
;
947 pShellFolderPath
= szSHFolders
;
950 if (RegCreateKeyExW(rootKey
, pShellFolderPath
, 0, NULL
, 0, KEY_SET_VALUE
,
951 NULL
, &shellFolderKey
, &dwDisp
))
953 TRACE("Failed to create %s\n", debugstr_w(pShellFolderPath
));
956 if (RegCreateKeyExW(rootKey
, pUserShellFolderPath
, 0, NULL
, 0,
957 KEY_QUERY_VALUE
, NULL
, &userShellFolderKey
, &dwDisp
))
959 TRACE("Failed to create %s\n",
960 debugstr_w(pUserShellFolderPath
));
961 RegCloseKey(shellFolderKey
);
965 dwPathLen
= MAX_PATH
* sizeof(WCHAR
);
967 if (!RegQueryValueExW(userShellFolderKey
, value
, NULL
, &dwType
,
968 (LPBYTE
)path
, &dwPathLen
) && (dwType
== REG_EXPAND_SZ
|| dwType
== REG_SZ
))
972 dwPathLen
/= sizeof(WCHAR
);
974 path
[dwPathLen
] = '\0';
975 if (dwType
== REG_EXPAND_SZ
&& path
[0] == '%')
977 WCHAR szTemp
[MAX_PATH
];
979 dwPathLen
= ExpandEnvironmentStringsW(path
, szTemp
, MAX_PATH
);
980 lstrcpynW(path
, szTemp
, dwPathLen
);
983 ret
= RegSetValueExW(shellFolderKey
, value
, 0, REG_SZ
, (LPBYTE
)path
, dwPathLen
* sizeof(WCHAR
));
984 if (ret
!= ERROR_SUCCESS
)
985 hr
= HRESULT_FROM_WIN32(ret
);
992 RegCloseKey(shellFolderKey
);
993 RegCloseKey(userShellFolderKey
);
994 TRACE("returning 0x%08x\n", hr
);
998 /* Gets a 'semi-expanded' default value of the CSIDL with index folder into
999 * pszPath, based on the entries in CSIDL_Data. By semi-expanded, I mean:
1000 * - The entry's szDefaultPath may be either a string value or an integer
1001 * resource identifier. In the latter case, the string value of the resource
1003 * - Depending on the entry's type, the path may begin with an (unexpanded)
1004 * environment variable name. The caller is responsible for expanding
1005 * environment strings if so desired.
1006 * The types that are prepended with environment variables are:
1007 * CSIDL_Type_User: %USERPROFILE%
1008 * CSIDL_Type_AllUsers: %ALLUSERSPROFILE%
1009 * CSIDL_Type_CurrVer: %SystemDrive%
1010 * (Others might make sense too, but as yet are unneeded.)
1012 static HRESULT
_SHGetDefaultValue(BYTE folder
, LPWSTR pszPath
)
1017 WCHAR resourcePath
[MAX_PATH
];
1018 LPCWSTR pDefaultPath
= NULL
;
1020 TRACE("0x%02x,%p\n", folder
, pszPath
);
1022 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1023 return E_INVALIDARG
;
1025 return E_INVALIDARG
;
1028 if (RegOpenKeyExW(HKEY_CURRENT_USER
, L
"Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Shell Folders", 0, KEY_READ
, &hKey
) == ERROR_SUCCESS
)
1030 /* FIXME assume MAX_PATH size */
1031 dwSize
= MAX_PATH
* sizeof(WCHAR
);
1032 if (RegQueryValueExW(hKey
, CSIDL_Data
[folder
].szValueName
, NULL
, NULL
, (LPBYTE
)pszPath
, &dwSize
) == ERROR_SUCCESS
)
1040 if (CSIDL_Data
[folder
].szDefaultPath
&&
1041 IS_INTRESOURCE(CSIDL_Data
[folder
].szDefaultPath
))
1043 if (LoadStringW(shell32_hInstance
,
1044 LOWORD(CSIDL_Data
[folder
].szDefaultPath
), resourcePath
, MAX_PATH
))
1047 pDefaultPath
= resourcePath
;
1051 FIXME("(%d,%s), LoadString failed, missing translation?\n", folder
,
1052 debugstr_w(pszPath
));
1059 pDefaultPath
= CSIDL_Data
[folder
].szDefaultPath
;
1063 switch (CSIDL_Data
[folder
].type
)
1065 case CSIDL_Type_User
:
1066 wcscpy(pszPath
, UserProfileW
);
1068 case CSIDL_Type_AllUsers
:
1069 wcscpy(pszPath
, AllUsersProfileW
);
1071 case CSIDL_Type_CurrVer
:
1072 wcscpy(pszPath
, SystemDriveW
);
1075 ; /* no corresponding env. var, do nothing */
1079 PathAddBackslashW(pszPath
);
1080 wcscat(pszPath
, pDefaultPath
);
1083 TRACE("returning 0x%08x\n", hr
);
1087 /* Gets the (unexpanded) value of the folder with index folder into pszPath.
1088 * The folder's type is assumed to be CSIDL_Type_CurrVer. Its default value
1089 * can be overridden in the HKLM\\szCurrentVersion key.
1090 * If dwFlags has SHGFP_TYPE_DEFAULT set or if the value isn't overridden in
1091 * the registry, uses _SHGetDefaultValue to get the value.
1093 static HRESULT
_SHGetCurrentVersionPath(DWORD dwFlags
, BYTE folder
,
1098 TRACE("0x%08x,0x%02x,%p\n", dwFlags
, folder
, pszPath
);
1100 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1101 return E_INVALIDARG
;
1102 if (CSIDL_Data
[folder
].type
!= CSIDL_Type_CurrVer
)
1103 return E_INVALIDARG
;
1105 return E_INVALIDARG
;
1107 if (dwFlags
& SHGFP_TYPE_DEFAULT
)
1108 hr
= _SHGetDefaultValue(folder
, pszPath
);
1114 if (RegCreateKeyExW(HKEY_LOCAL_MACHINE
, szCurrentVersion
, 0,
1115 NULL
, 0, KEY_ALL_ACCESS
, NULL
, &hKey
, &dwDisp
))
1119 DWORD dwType
, dwPathLen
= MAX_PATH
* sizeof(WCHAR
);
1121 if (RegQueryValueExW(hKey
, CSIDL_Data
[folder
].szValueName
, NULL
,
1122 &dwType
, (LPBYTE
)pszPath
, &dwPathLen
) ||
1123 (dwType
!= REG_SZ
&& dwType
!= REG_EXPAND_SZ
))
1125 hr
= _SHGetDefaultValue(folder
, pszPath
);
1126 dwType
= REG_EXPAND_SZ
;
1127 RegSetValueExW(hKey
, CSIDL_Data
[folder
].szValueName
, 0, dwType
,
1128 (LPBYTE
)pszPath
, (wcslen(pszPath
)+1)*sizeof(WCHAR
));
1132 pszPath
[dwPathLen
/ sizeof(WCHAR
)] = '\0';
1138 TRACE("returning 0x%08x (output path is %s)\n", hr
, debugstr_w(pszPath
));
1142 /* Gets the user's path (unexpanded) for the CSIDL with index folder:
1143 * If SHGFP_TYPE_DEFAULT is set, calls _SHGetDefaultValue for it. Otherwise
1144 * calls _SHGetUserShellFolderPath for it. Where it looks depends on hToken:
1145 * - if hToken is -1, looks in HKEY_USERS\.Default
1146 * - otherwise looks first in HKEY_CURRENT_USER, followed by HKEY_LOCAL_MACHINE
1147 * if HKEY_CURRENT_USER doesn't contain any entries. If both fail, finally
1148 * calls _SHGetDefaultValue for it.
1150 static HRESULT
_SHGetUserProfilePath(HANDLE hToken
, DWORD dwFlags
, BYTE folder
,
1155 TRACE("%p,0x%08x,0x%02x,%p\n", hToken
, dwFlags
, folder
, pszPath
);
1157 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1158 return E_INVALIDARG
;
1160 if (CSIDL_Data
[folder
].type
!= CSIDL_Type_User
)
1161 return E_INVALIDARG
;
1164 return E_INVALIDARG
;
1166 if (dwFlags
& SHGFP_TYPE_DEFAULT
)
1168 hr
= _SHGetDefaultValue(folder
, pszPath
);
1175 if (hToken
== (HANDLE
)-1)
1177 /* Get the folder of the default user */
1178 hRootKey
= HKEY_USERS
;
1179 userPrefix
= (LPWSTR
)DefaultW
;
1183 /* Get the folder of the current user */
1184 hRootKey
= HKEY_CURRENT_USER
;
1189 /* Get the folder of the specified user */
1191 PTOKEN_USER UserInfo
;
1193 hRootKey
= HKEY_USERS
;
1195 GetTokenInformation(hToken
, TokenUser
, NULL
, 0, &InfoLength
);
1196 UserInfo
= (PTOKEN_USER
)HeapAlloc(GetProcessHeap(), 0, InfoLength
);
1198 if(!GetTokenInformation(hToken
, TokenUser
, UserInfo
, InfoLength
, &InfoLength
))
1200 WARN("GetTokenInformation failed for %x!\n", hToken
);
1201 HeapFree(GetProcessHeap(), 0, UserInfo
);
1205 if(!ConvertSidToStringSidW(UserInfo
->User
.Sid
, &userPrefix
))
1207 WARN("ConvertSidToStringSidW failed for %x!\n", hToken
);
1208 HeapFree(GetProcessHeap(), 0, UserInfo
);
1212 HeapFree(GetProcessHeap(), 0, UserInfo
);
1215 hr
= _SHGetUserShellFolderPath(hRootKey
, userPrefix
, CSIDL_Data
[folder
].szValueName
, pszPath
);
1217 /* Free the memory allocated by ConvertSidToStringSidW */
1218 if(hToken
&& hToken
!= (HANDLE
)-1)
1219 LocalFree(userPrefix
);
1221 if (FAILED(hr
) && hRootKey
!= HKEY_LOCAL_MACHINE
)
1222 hr
= _SHGetUserShellFolderPath(HKEY_LOCAL_MACHINE
, NULL
, CSIDL_Data
[folder
].szValueName
, pszPath
);
1225 hr
= _SHGetDefaultValue(folder
, pszPath
);
1228 TRACE("returning 0x%08x (output path is %s)\n", hr
, debugstr_w(pszPath
));
1232 /* Gets the (unexpanded) path for the CSIDL with index folder. If dwFlags has
1233 * SHGFP_TYPE_DEFAULT set, calls _SHGetDefaultValue. Otherwise calls
1234 * _SHGetUserShellFolderPath for it, looking only in HKEY_LOCAL_MACHINE.
1235 * If this fails, falls back to _SHGetDefaultValue.
1237 static HRESULT
_SHGetAllUsersProfilePath(DWORD dwFlags
, BYTE folder
,
1242 TRACE("0x%08x,0x%02x,%p\n", dwFlags
, folder
, pszPath
);
1244 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1245 return E_INVALIDARG
;
1246 if (CSIDL_Data
[folder
].type
!= CSIDL_Type_AllUsers
)
1247 return E_INVALIDARG
;
1249 return E_INVALIDARG
;
1251 if (dwFlags
& SHGFP_TYPE_DEFAULT
)
1252 hr
= _SHGetDefaultValue(folder
, pszPath
);
1255 hr
= _SHGetUserShellFolderPath(HKEY_LOCAL_MACHINE
, NULL
,
1256 CSIDL_Data
[folder
].szValueName
, pszPath
);
1258 hr
= _SHGetDefaultValue(folder
, pszPath
);
1260 TRACE("returning 0x%08x (output path is %s)\n", hr
, debugstr_w(pszPath
));
1264 /*************************************************************************
1265 * SHGetFolderPathW [SHELL32.@]
1267 * Convert nFolder to path.
1271 * Failure: standard HRESULT error codes.
1274 * Most values can be overridden in either
1275 * HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders
1276 * or in the same location in HKLM.
1277 * The "Shell Folders" registry key was used in NT4 and earlier systems.
1278 * Beginning with Windows 2000, the "User Shell Folders" key is used, so
1279 * changes made to it are made to the former key too. This synchronization is
1280 * done on-demand: not until someone requests the value of one of these paths
1281 * (by calling one of the SHGet functions) is the value synchronized.
1282 * Furthermore, the HKCU paths take precedence over the HKLM paths.
1284 HRESULT WINAPI
SHGetFolderPathW(
1285 HWND hwndOwner
, /* [I] owner window */
1286 int nFolder
, /* [I] CSIDL identifying the folder */
1287 HANDLE hToken
, /* [I] access token */
1288 DWORD dwFlags
, /* [I] which path to return */
1289 LPWSTR pszPath
) /* [O] converted path */
1291 HRESULT hr
= SHGetFolderPathAndSubDirW(hwndOwner
, nFolder
, hToken
, dwFlags
, NULL
, pszPath
);
1292 if(HRESULT_FROM_WIN32(ERROR_PATH_NOT_FOUND
) == hr
)
1293 hr
= HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND
);
1297 HRESULT WINAPI
SHGetFolderPathAndSubDirA(
1298 HWND hwndOwner
, /* [I] owner window */
1299 int nFolder
, /* [I] CSIDL identifying the folder */
1300 HANDLE hToken
, /* [I] access token */
1301 DWORD dwFlags
, /* [I] which path to return */
1302 LPCSTR pszSubPath
, /* [I] sub directory of the specified folder */
1303 LPSTR pszPath
) /* [O] converted path */
1307 LPWSTR pszSubPathW
= NULL
;
1308 LPWSTR pszPathW
= NULL
;
1309 TRACE("%08x,%08x,%s\n",nFolder
, dwFlags
, debugstr_w(pszSubPathW
));
1312 pszPathW
= (LPWSTR
)HeapAlloc(GetProcessHeap(), 0, MAX_PATH
* sizeof(WCHAR
));
1314 hr
= HRESULT_FROM_WIN32(ERROR_NOT_ENOUGH_MEMORY
);
1318 TRACE("%08x,%08x,%s\n",nFolder
, dwFlags
, debugstr_w(pszSubPathW
));
1320 /* SHGetFolderPathAndSubDirW does not distinguish if pszSubPath isn't
1321 * set (null), or an empty string.therefore call it without the parameter set
1322 * if pszSubPath is an empty string
1324 if (pszSubPath
&& pszSubPath
[0]) {
1325 length
= MultiByteToWideChar(CP_ACP
, 0, pszSubPath
, -1, NULL
, 0);
1326 pszSubPathW
= (LPWSTR
)HeapAlloc(GetProcessHeap(), 0, length
* sizeof(WCHAR
));
1328 hr
= HRESULT_FROM_WIN32(ERROR_NOT_ENOUGH_MEMORY
);
1331 MultiByteToWideChar(CP_ACP
, 0, pszSubPath
, -1, pszSubPathW
, length
);
1334 hr
= SHGetFolderPathAndSubDirW(hwndOwner
, nFolder
, hToken
, dwFlags
, pszSubPathW
, pszPathW
);
1336 if (SUCCEEDED(hr
) && pszPath
)
1337 WideCharToMultiByte(CP_ACP
, 0, pszPathW
, -1, pszPath
, MAX_PATH
, NULL
, NULL
);
1340 HeapFree(GetProcessHeap(), 0, pszPathW
);
1341 HeapFree(GetProcessHeap(), 0, pszSubPathW
);
1345 HRESULT WINAPI
SHGetFolderPathAndSubDirW(
1346 HWND hwndOwner
, /* [I] owner window */
1347 int nFolder
, /* [I] CSIDL identifying the folder */
1348 HANDLE hToken
, /* [I] access token */
1349 DWORD dwFlags
, /* [I] which path to return */
1350 LPCWSTR pszSubPath
,/* [I] sub directory of the specified folder */
1351 LPWSTR pszPath
) /* [O] converted path */
1354 WCHAR szBuildPath
[MAX_PATH
], szTemp
[MAX_PATH
];
1355 DWORD folder
= nFolder
& CSIDL_FOLDER_MASK
; //FIXME
1359 TRACE("%p,%p,nFolder=0x%04x,%s\n", hwndOwner
,pszPath
,nFolder
,debugstr_w(pszSubPath
));
1361 /* Windows always NULL-terminates the resulting path regardless of success
1362 * or failure, so do so first
1367 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1368 return E_INVALIDARG
;
1369 if ((SHGFP_TYPE_CURRENT
!= dwFlags
) && (SHGFP_TYPE_DEFAULT
!= dwFlags
))
1370 return E_INVALIDARG
;
1372 type
= CSIDL_Data
[folder
].type
;
1375 case CSIDL_Type_Disallowed
:
1378 case CSIDL_Type_NonExistent
:
1381 case CSIDL_Type_WindowsPath
:
1382 GetWindowsDirectoryW(szTemp
, MAX_PATH
);
1383 if (CSIDL_Data
[folder
].szDefaultPath
&&
1384 !IS_INTRESOURCE(CSIDL_Data
[folder
].szDefaultPath
) &&
1385 *CSIDL_Data
[folder
].szDefaultPath
)
1387 PathAddBackslashW(szTemp
);
1388 wcscat(szTemp
, CSIDL_Data
[folder
].szDefaultPath
);
1392 case CSIDL_Type_SystemPath
:
1393 GetSystemDirectoryW(szTemp
, MAX_PATH
);
1394 if (CSIDL_Data
[folder
].szDefaultPath
&&
1395 !IS_INTRESOURCE(CSIDL_Data
[folder
].szDefaultPath
) &&
1396 *CSIDL_Data
[folder
].szDefaultPath
)
1398 PathAddBackslashW(szTemp
);
1399 wcscat(szTemp
, CSIDL_Data
[folder
].szDefaultPath
);
1403 case CSIDL_Type_CurrVer
:
1404 hr
= _SHGetCurrentVersionPath(dwFlags
, folder
, szTemp
);
1406 case CSIDL_Type_User
:
1407 hr
= _SHGetUserProfilePath(hToken
, dwFlags
, folder
, szTemp
);
1409 case CSIDL_Type_AllUsers
:
1410 hr
= _SHGetAllUsersProfilePath(dwFlags
, folder
, szTemp
);
1413 FIXME("bogus type %d, please fix\n", type
);
1418 /* Expand environment strings if necessary */
1421 DWORD ExpandRet
= ExpandEnvironmentStringsW(szTemp
, szBuildPath
, MAX_PATH
);
1423 if (ExpandRet
> MAX_PATH
)
1424 hr
= HRESULT_FROM_WIN32(ERROR_INSUFFICIENT_BUFFER
);
1425 else if (ExpandRet
== 0)
1426 hr
= HRESULT_FROM_WIN32(GetLastError());
1432 wcscpy(szBuildPath
, szTemp
);
1435 if (FAILED(hr
)) goto end
;
1438 /* make sure the new path does not exceed th bufferlength
1439 * rememebr to backslash and the termination */
1440 if(MAX_PATH
< (wcslen(szBuildPath
) + wcslen(pszSubPath
) + 2)) {
1441 hr
= HRESULT_FROM_WIN32(ERROR_FILENAME_EXCED_RANGE
);
1444 PathAppendW(szBuildPath
, pszSubPath
);
1445 PathRemoveBackslashW(szBuildPath
);
1447 /* Copy the path if it's available before we might return */
1448 if (SUCCEEDED(hr
) && pszPath
)
1449 wcscpy(pszPath
, szBuildPath
);
1451 /* if we don't care about existing directories we are ready */
1452 if(nFolder
& CSIDL_FLAG_DONT_VERIFY
) goto end
;
1454 if (PathFileExistsW(szBuildPath
)) goto end
;
1456 /* not existing but we are not allowed to create it. The return value
1457 * is verified against shell32 version 6.0.
1459 if (!(nFolder
& CSIDL_FLAG_CREATE
))
1461 hr
= HRESULT_FROM_WIN32(ERROR_PATH_NOT_FOUND
);
1465 /* create directory/directories */
1466 ret
= SHCreateDirectoryExW(hwndOwner
, szBuildPath
, NULL
);
1467 if (ret
&& ret
!= ERROR_ALREADY_EXISTS
)
1469 ERR("Failed to create directory %s.\n", debugstr_w(szBuildPath
));
1474 TRACE("Created missing system directory %s\n", debugstr_w(szBuildPath
));
1476 TRACE("returning 0x%08x (final path is %s)\n", hr
, debugstr_w(szBuildPath
));
1480 /*************************************************************************
1481 * SHGetFolderPathA [SHELL32.@]
1483 * See SHGetFolderPathW.
1485 HRESULT WINAPI
SHGetFolderPathA(
1492 WCHAR szTemp
[MAX_PATH
];
1495 TRACE("%p,%p,nFolder=0x%04x\n",hwndOwner
,pszPath
,nFolder
);
1499 hr
= SHGetFolderPathW(hwndOwner
, nFolder
, hToken
, dwFlags
, szTemp
);
1500 if (SUCCEEDED(hr
) && pszPath
)
1501 WideCharToMultiByte(CP_ACP
, 0, szTemp
, -1, pszPath
, MAX_PATH
, NULL
,
1507 /* For each folder in folders, if its value has not been set in the registry,
1508 * calls _SHGetUserProfilePath or _SHGetAllUsersProfilePath (depending on the
1509 * folder's type) to get the unexpanded value first.
1510 * Writes the unexpanded value to User Shell Folders, and queries it with
1511 * SHGetFolderPathW to force the creation of the directory if it doesn't
1512 * already exist. SHGetFolderPathW also returns the expanded value, which
1513 * this then writes to Shell Folders.
1515 static HRESULT
_SHRegisterFolders(HKEY hRootKey
, HANDLE hToken
,
1516 LPCWSTR szUserShellFolderPath
, LPCWSTR szShellFolderPath
, const UINT folders
[],
1520 WCHAR path
[MAX_PATH
];
1522 HKEY hUserKey
= NULL
, hKey
= NULL
;
1523 DWORD dwDisp
, dwType
, dwPathLen
;
1526 TRACE("%p,%p,%s,%p,%u\n", hRootKey
, hToken
,
1527 debugstr_w(szUserShellFolderPath
), folders
, foldersLen
);
1529 ret
= RegCreateKeyExW(hRootKey
, szUserShellFolderPath
, 0, NULL
, 0,
1530 KEY_ALL_ACCESS
, NULL
, &hUserKey
, &dwDisp
);
1532 hr
= HRESULT_FROM_WIN32(ret
);
1535 ret
= RegCreateKeyExW(hRootKey
, szShellFolderPath
, 0, NULL
, 0,
1536 KEY_ALL_ACCESS
, NULL
, &hKey
, &dwDisp
);
1538 hr
= HRESULT_FROM_WIN32(ret
);
1540 for (i
= 0; SUCCEEDED(hr
) && i
< foldersLen
; i
++)
1542 dwPathLen
= MAX_PATH
* sizeof(WCHAR
);
1543 if (RegQueryValueExW(hUserKey
, CSIDL_Data
[folders
[i
]].szValueName
, NULL
,
1544 &dwType
, (LPBYTE
)path
, &dwPathLen
) || (dwType
!= REG_SZ
&&
1545 dwType
!= REG_EXPAND_SZ
))
1548 if (CSIDL_Data
[folders
[i
]].type
== CSIDL_Type_User
)
1549 _SHGetUserProfilePath(hToken
, SHGFP_TYPE_DEFAULT
, folders
[i
],
1551 else if (CSIDL_Data
[folders
[i
]].type
== CSIDL_Type_AllUsers
)
1552 _SHGetAllUsersProfilePath(SHGFP_TYPE_DEFAULT
, folders
[i
], path
);
1553 else if (CSIDL_Data
[folders
[i
]].type
== CSIDL_Type_WindowsPath
)
1554 GetWindowsDirectoryW(path
, MAX_PATH
);
1559 ret
= RegSetValueExW(hUserKey
,
1560 CSIDL_Data
[folders
[i
]].szValueName
, 0, REG_EXPAND_SZ
,
1561 (LPBYTE
)path
, (wcslen(path
) + 1) * sizeof(WCHAR
));
1563 hr
= HRESULT_FROM_WIN32(ret
);
1566 hr
= SHGetFolderPathW(NULL
, folders
[i
] | CSIDL_FLAG_CREATE
,
1567 hToken
, SHGFP_TYPE_DEFAULT
, path
);
1568 ret
= RegSetValueExW(hKey
,
1569 CSIDL_Data
[folders
[i
]].szValueName
, 0, REG_SZ
,
1570 (LPBYTE
)path
, (wcslen(path
) + 1) * sizeof(WCHAR
));
1572 hr
= HRESULT_FROM_WIN32(ret
);
1578 RegCloseKey(hUserKey
);
1582 TRACE("returning 0x%08x\n", hr
);
1586 static HRESULT
_SHRegisterUserShellFolders(BOOL bDefault
)
1588 static const UINT folders
[] = {
1599 CSIDL_DESKTOPDIRECTORY
,
1603 CSIDL_LOCAL_APPDATA
,
1604 CSIDL_INTERNET_CACHE
,
1610 WCHAR userShellFolderPath
[MAX_PATH
], shellFolderPath
[MAX_PATH
];
1611 LPCWSTR pUserShellFolderPath
, pShellFolderPath
;
1616 TRACE("%s\n", bDefault
? "TRUE" : "FALSE");
1619 hToken
= (HANDLE
)-1;
1620 hRootKey
= HKEY_USERS
;
1621 wcscpy(userShellFolderPath
, DefaultW
);
1622 PathAddBackslashW(userShellFolderPath
);
1623 wcscat(userShellFolderPath
, szSHUserFolders
);
1624 pUserShellFolderPath
= userShellFolderPath
;
1625 wcscpy(shellFolderPath
, DefaultW
);
1626 PathAddBackslashW(shellFolderPath
);
1627 wcscat(shellFolderPath
, szSHFolders
);
1628 pShellFolderPath
= shellFolderPath
;
1633 hRootKey
= HKEY_CURRENT_USER
;
1634 pUserShellFolderPath
= szSHUserFolders
;
1635 pShellFolderPath
= szSHFolders
;
1638 hr
= _SHRegisterFolders(hRootKey
, hToken
, pUserShellFolderPath
,
1639 pShellFolderPath
, folders
, sizeof(folders
) / sizeof(folders
[0]));
1640 TRACE("returning 0x%08x\n", hr
);
1644 static HRESULT
_SHRegisterCommonShellFolders(void)
1646 static const UINT folders
[] = {
1647 CSIDL_COMMON_STARTMENU
,
1648 CSIDL_COMMON_PROGRAMS
,
1649 CSIDL_COMMON_STARTUP
,
1650 CSIDL_COMMON_DESKTOPDIRECTORY
,
1651 CSIDL_COMMON_FAVORITES
,
1652 CSIDL_COMMON_APPDATA
,
1653 CSIDL_COMMON_TEMPLATES
,
1654 CSIDL_COMMON_DOCUMENTS
,
1659 hr
= _SHRegisterFolders(HKEY_LOCAL_MACHINE
, NULL
, szSHUserFolders
,
1660 szSHFolders
, folders
, sizeof(folders
) / sizeof(folders
[0]));
1661 TRACE("returning 0x%08x\n", hr
);
1665 /******************************************************************************
1666 * _SHAppendToUnixPath [Internal]
1668 * Helper function for _SHCreateSymbolicLinks. Appends pwszSubPath (or the
1669 * corresponding resource, if IS_INTRESOURCE) to the unix base path 'szBasePath'
1670 * and replaces backslashes with slashes.
1673 * szBasePath [IO] The unix base path, which will be appended to (CP_UNXICP).
1674 * pwszSubPath [I] Sub-path or resource id (use MAKEINTRESOURCEW).
1680 static BOOL __inline
_SHAppendToUnixPath(char *szBasePath
, LPCWSTR pwszSubPath
) {
1681 WCHAR wszSubPath
[MAX_PATH
];
1682 int cLen
= strlen(szBasePath
);
1685 if (IS_INTRESOURCE(pwszSubPath
)) {
1686 if (!LoadStringW(shell32_hInstance
, LOWORD(pwszSubPath
), wszSubPath
, MAX_PATH
)) {
1687 /* Fall back to hard coded defaults. */
1688 switch (LOWORD(pwszSubPath
)) {
1690 wcscpy(wszSubPath
, PersonalW
);
1693 wcscpy(wszSubPath
, My_MusicW
);
1695 case IDS_MYPICTURES
:
1696 wcscpy(wszSubPath
, My_PicturesW
);
1699 wcscpy(wszSubPath
, My_VideoW
);
1702 ERR("LoadString(%d) failed!\n", LOWORD(pwszSubPath
));
1707 wcscpy(wszSubPath
, pwszSubPath
);
1710 if (szBasePath
[cLen
-1] != '/') szBasePath
[cLen
++] = '/';
1712 if (!WideCharToMultiByte(CP_ACP
, 0, wszSubPath
, -1, szBasePath
+ cLen
,
1713 FILENAME_MAX
- cLen
, NULL
, NULL
))
1718 pBackslash
= szBasePath
+ cLen
;
1719 while ((pBackslash
= strchr(pBackslash
, '\\'))) *pBackslash
= '/';
1724 /******************************************************************************
1725 * _SHCreateSymbolicLinks [Internal]
1727 * Sets up symbol links for various shell folders to point into the users home
1728 * directory. We do an educated guess about what the user would probably want:
1729 * - If there is a 'My Documents' directory in $HOME, the user probably wants
1730 * wine's 'My Documents' to point there. Furthermore, we imply that the user
1731 * is a Windows lover and has no problem with wine creating 'My Pictures',
1732 * 'My Music' and 'My Video' subfolders under '$HOME/My Documents', if those
1733 * do not already exits. We put appropriate symbolic links in place for those,
1735 * - If there is no 'My Documents' directory in $HOME, we let 'My Documents'
1736 * point directly to $HOME. We assume the user to be a unix hacker who does not
1737 * want wine to create anything anywhere besides the .wine directory. So, if
1738 * there already is a 'My Music' directory in $HOME, we symlink the 'My Music'
1739 * shell folder to it. But if not, we symlink it to $HOME directly. The same
1740 * holds fo 'My Pictures' and 'My Video'.
1741 * - The Desktop shell folder is symlinked to '$HOME/Desktop', if that does
1742 * exists and left alone if not.
1743 * ('My Music',... above in fact means LoadString(IDS_MYMUSIC))
1745 static void _SHCreateSymbolicLinks(void)
1747 UINT aidsMyStuff
[] = { IDS_MYPICTURES
, IDS_MYVIDEO
, IDS_MYMUSIC
}, i
;
1748 int acsidlMyStuff
[] = { CSIDL_MYPICTURES
, CSIDL_MYVIDEO
, CSIDL_MYMUSIC
};
1749 WCHAR wszTempPath
[MAX_PATH
];
1750 char szPersonalTarget
[FILENAME_MAX
], *pszPersonal
;
1751 char szMyStuffTarget
[FILENAME_MAX
], *pszMyStuff
;
1752 char szDesktopTarget
[FILENAME_MAX
], *pszDesktop
;
1753 struct stat statFolder
;
1754 const char *pszHome
;
1757 /* Create all necessary profile sub-dirs up to 'My Documents' and get the unix path. */
1758 hr
= SHGetFolderPathW(NULL
, CSIDL_PERSONAL
|CSIDL_FLAG_CREATE
, NULL
,
1759 SHGFP_TYPE_DEFAULT
, wszTempPath
);
1760 if (FAILED(hr
)) return;
1761 pszPersonal
= wine_get_unix_file_name(wszTempPath
);
1762 if (!pszPersonal
) return;
1764 pszHome
= getenv("HOME");
1765 if (pszHome
&& !stat(pszHome
, &statFolder
) && S_ISDIR(statFolder
.st_mode
)) {
1766 strcpy(szPersonalTarget
, pszHome
);
1767 if (_SHAppendToUnixPath(szPersonalTarget
, MAKEINTRESOURCEW(IDS_PERSONAL
)) &&
1768 !stat(szPersonalTarget
, &statFolder
) && S_ISDIR(statFolder
.st_mode
))
1770 /* '$HOME/My Documents' exists. Create 'My Pictures', 'My Videos' and
1771 * 'My Music' subfolders or fail silently if they already exist. */
1772 for (i
= 0; i
< sizeof(aidsMyStuff
)/sizeof(aidsMyStuff
[0]); i
++) {
1773 strcpy(szMyStuffTarget
, szPersonalTarget
);
1774 if (_SHAppendToUnixPath(szMyStuffTarget
, MAKEINTRESOURCEW(aidsMyStuff
[i
])))
1775 mkdir(szMyStuffTarget
);
1780 /* '$HOME/My Documents' doesn't exists, but '$HOME' does. */
1781 strcpy(szPersonalTarget
, pszHome
);
1784 /* Replace 'My Documents' directory with a symlink of fail silently if not empty. */
1786 symlink(szPersonalTarget
, pszPersonal
);
1790 /* '$HOME' doesn't exist. Create 'My Pictures', 'My Videos' and 'My Music' subdirs
1791 * in '%USERPROFILE%\\My Documents' or fail silently if they already exist. */
1792 strcpy(szPersonalTarget
, pszPersonal
);
1793 for (i
= 0; i
< sizeof(aidsMyStuff
)/sizeof(aidsMyStuff
[0]); i
++) {
1794 strcpy(szMyStuffTarget
, szPersonalTarget
);
1795 if (_SHAppendToUnixPath(szMyStuffTarget
, MAKEINTRESOURCEW(aidsMyStuff
[i
])))
1796 mkdir(szMyStuffTarget
);
1800 /* Create symbolic links for 'My Pictures', 'My Video' and 'My Music'. */
1801 for (i
=0; i
< sizeof(aidsMyStuff
)/sizeof(aidsMyStuff
[0]); i
++) {
1802 /* Create the current 'My Whatever' folder and get it's unix path. */
1803 hr
= SHGetFolderPathW(NULL
, acsidlMyStuff
[i
]|CSIDL_FLAG_CREATE
, NULL
,
1804 SHGFP_TYPE_DEFAULT
, wszTempPath
);
1805 if (FAILED(hr
)) continue;
1806 pszMyStuff
= wine_get_unix_file_name(wszTempPath
);
1807 if (!pszMyStuff
) continue;
1809 strcpy(szMyStuffTarget
, szPersonalTarget
);
1810 if (_SHAppendToUnixPath(szMyStuffTarget
, MAKEINTRESOURCEW(aidsMyStuff
[i
])) &&
1811 !stat(szMyStuffTarget
, &statFolder
) && S_ISDIR(statFolder
.st_mode
))
1813 /* If there's a 'My Whatever' directory where 'My Documents' links to, link to it. */
1815 symlink(szMyStuffTarget
, pszMyStuff
);
1819 /* Else link to where 'My Documents' itself links to. */
1821 symlink(szPersonalTarget
, pszMyStuff
);
1823 HeapFree(GetProcessHeap(), 0, pszMyStuff
);
1826 /* Last but not least, the Desktop folder */
1828 strcpy(szDesktopTarget
, pszHome
);
1830 strcpy(szDesktopTarget
, pszPersonal
);
1831 HeapFree(GetProcessHeap(), 0, pszPersonal
);
1833 if (_SHAppendToUnixPath(szDesktopTarget
, DesktopW
) &&
1834 !stat(szDesktopTarget
, &statFolder
) && S_ISDIR(statFolder
.st_mode
))
1836 hr
= SHGetFolderPathW(NULL
, CSIDL_DESKTOPDIRECTORY
|CSIDL_FLAG_CREATE
, NULL
,
1837 SHGFP_TYPE_DEFAULT
, wszTempPath
);
1838 if (SUCCEEDED(hr
) && (pszDesktop
= wine_get_unix_file_name(wszTempPath
)))
1841 symlink(szDesktopTarget
, pszDesktop
);
1842 HeapFree(GetProcessHeap(), 0, pszDesktop
);
1848 /* Register the default values in the registry, as some apps seem to depend
1849 * on their presence. The set registered was taken from Windows XP.
1851 HRESULT
SHELL_RegisterShellFolders(void)
1855 /* Set up '$HOME' targeted symlinks for 'My Documents', 'My Pictures',
1856 * 'My Video', 'My Music' and 'Desktop' in advance, so that the
1857 * _SHRegister*ShellFolders() functions will find everything nice and clean
1858 * and thus will not attempt to create them in the profile directory. */
1860 _SHCreateSymbolicLinks();
1863 hr
= _SHRegisterUserShellFolders(TRUE
);
1865 hr
= _SHRegisterUserShellFolders(FALSE
);
1867 hr
= _SHRegisterCommonShellFolders();
1871 /*************************************************************************
1872 * SHGetSpecialFolderPathA [SHELL32.@]
1874 BOOL WINAPI
SHGetSpecialFolderPathA (
1880 return (SHGetFolderPathA(
1882 nFolder
+ (bCreate
? CSIDL_FLAG_CREATE
: 0),
1885 szPath
)) == S_OK
? TRUE
: FALSE
;
1888 /*************************************************************************
1889 * SHGetSpecialFolderPathW
1891 BOOL WINAPI
SHGetSpecialFolderPathW (
1897 return (SHGetFolderPathW(
1899 nFolder
+ (bCreate
? CSIDL_FLAG_CREATE
: 0),
1902 szPath
)) == S_OK
? TRUE
: FALSE
;
1905 /*************************************************************************
1906 * SHGetFolderLocation [SHELL32.@]
1908 * Gets the folder locations from the registry and creates a pidl.
1912 * nFolder [I] CSIDL_xxxxx
1913 * hToken [I] token representing user, or NULL for current user, or -1 for
1915 * dwReserved [I] must be zero
1916 * ppidl [O] PIDL of a special folder
1920 * Failure: Standard OLE-defined error result, S_FALSE or E_INVALIDARG
1923 * Creates missing reg keys and directories.
1924 * Mostly forwards to SHGetFolderPathW, but a few values of nFolder return
1925 * virtual folders that are handled here.
1927 HRESULT WINAPI
SHGetFolderLocation(
1932 LPITEMIDLIST
*ppidl
)
1934 HRESULT hr
= E_INVALIDARG
;
1936 TRACE("%p 0x%08x %p 0x%08x %p\n",
1937 hwndOwner
, nFolder
, hToken
, dwReserved
, ppidl
);
1940 return E_INVALIDARG
;
1942 return E_INVALIDARG
;
1944 /* The virtual folders' locations are not user-dependent */
1949 *ppidl
= _ILCreateDesktop();
1952 case CSIDL_PERSONAL
:
1953 *ppidl
= _ILCreateMyDocuments();
1956 case CSIDL_INTERNET
:
1957 *ppidl
= _ILCreateIExplore();
1960 case CSIDL_CONTROLS
:
1961 *ppidl
= _ILCreateControlPanel();
1964 case CSIDL_PRINTERS
:
1965 *ppidl
= _ILCreatePrinters();
1968 case CSIDL_BITBUCKET
:
1969 *ppidl
= _ILCreateBitBucket();
1973 *ppidl
= _ILCreateMyComputer();
1977 *ppidl
= _ILCreateNetwork();
1982 WCHAR szPath
[MAX_PATH
];
1984 hr
= SHGetFolderPathW(hwndOwner
, nFolder
, hToken
,
1985 SHGFP_TYPE_CURRENT
, szPath
);
1990 TRACE("Value=%s\n", debugstr_w(szPath
));
1991 hr
= SHILCreateFromPathW(szPath
, ppidl
, &attributes
);
1993 else if (hr
== HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND
))
1995 /* unlike SHGetFolderPath, SHGetFolderLocation in shell32
1996 * version 6.0 returns E_FAIL for nonexistent paths
2005 TRACE("-- (new pidl %p)\n",*ppidl
);
2009 /*************************************************************************
2010 * SHGetSpecialFolderLocation [SHELL32.@]
2013 * In NT5, SHGetSpecialFolderLocation needs the <winntdir>/Recent
2016 HRESULT WINAPI
SHGetSpecialFolderLocation(
2019 LPITEMIDLIST
* ppidl
)
2021 HRESULT hr
= E_INVALIDARG
;
2023 TRACE("(%p,0x%x,%p)\n", hwndOwner
,nFolder
,ppidl
);
2026 return E_INVALIDARG
;
2028 hr
= SHGetFolderLocation(hwndOwner
, nFolder
, NULL
, 0, ppidl
);