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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 * Many of these functions are in SHLWAPI.DLL also
28 #include "wine/port.h"
33 #include "wine/debug.h"
43 #include "shell32_main.h"
44 #include "undocshell.h"
46 #include "wine/unicode.h"
49 WINE_DEFAULT_DEBUG_CHANNEL(shell
);
52 ########## Combining and Constructing paths ##########
55 /*************************************************************************
56 * PathAppend [SHELL32.36]
58 BOOL WINAPI
PathAppendAW(
62 if (SHELL_OsIsUnicode())
63 return PathAppendW(lpszPath1
, lpszPath2
);
64 return PathAppendA(lpszPath1
, lpszPath2
);
67 /*************************************************************************
68 * PathCombine [SHELL32.37]
70 LPVOID WINAPI
PathCombineAW(
75 if (SHELL_OsIsUnicode())
76 return PathCombineW( szDest
, lpszDir
, lpszFile
);
77 return PathCombineA( szDest
, lpszDir
, lpszFile
);
80 /*************************************************************************
81 * PathAddBackslash [SHELL32.32]
83 LPVOID WINAPI
PathAddBackslashAW(LPVOID lpszPath
)
85 if(SHELL_OsIsUnicode())
86 return PathAddBackslashW(lpszPath
);
87 return PathAddBackslashA(lpszPath
);
90 /*************************************************************************
91 * PathBuildRoot [SHELL32.30]
93 LPVOID WINAPI
PathBuildRootAW(LPVOID lpszPath
, int drive
)
95 if(SHELL_OsIsUnicode())
96 return PathBuildRootW(lpszPath
, drive
);
97 return PathBuildRootA(lpszPath
, drive
);
101 Extracting Component Parts
104 /*************************************************************************
105 * PathFindFileName [SHELL32.34]
107 LPVOID WINAPI
PathFindFileNameAW(LPCVOID lpszPath
)
109 if(SHELL_OsIsUnicode())
110 return PathFindFileNameW(lpszPath
);
111 return PathFindFileNameA(lpszPath
);
114 /*************************************************************************
115 * PathFindExtension [SHELL32.31]
117 LPVOID WINAPI
PathFindExtensionAW(LPCVOID lpszPath
)
119 if (SHELL_OsIsUnicode())
120 return PathFindExtensionW(lpszPath
);
121 return PathFindExtensionA(lpszPath
);
125 /*************************************************************************
126 * PathGetExtensionA [internal]
129 * exported by ordinal
130 * return value points to the first char after the dot
132 static LPSTR
PathGetExtensionA(LPCSTR lpszPath
)
134 TRACE("(%s)\n",lpszPath
);
136 lpszPath
= PathFindExtensionA(lpszPath
);
137 return (LPSTR
)(*lpszPath
?(lpszPath
+1):lpszPath
);
140 /*************************************************************************
141 * PathGetExtensionW [internal]
143 static LPWSTR
PathGetExtensionW(LPCWSTR lpszPath
)
145 TRACE("(%s)\n",debugstr_w(lpszPath
));
147 lpszPath
= PathFindExtensionW(lpszPath
);
148 return (LPWSTR
)(*lpszPath
?(lpszPath
+1):lpszPath
);
151 /*************************************************************************
152 * PathGetExtension [SHELL32.158]
154 LPVOID WINAPI
PathGetExtensionAW(LPCVOID lpszPath
,DWORD void1
, DWORD void2
)
156 if (SHELL_OsIsUnicode())
157 return PathGetExtensionW(lpszPath
);
158 return PathGetExtensionA(lpszPath
);
161 /*************************************************************************
162 * PathGetArgs [SHELL32.52]
164 LPVOID WINAPI
PathGetArgsAW(LPVOID lpszPath
)
166 if (SHELL_OsIsUnicode())
167 return PathGetArgsW(lpszPath
);
168 return PathGetArgsA(lpszPath
);
171 /*************************************************************************
172 * PathGetDriveNumber [SHELL32.57]
174 int WINAPI
PathGetDriveNumberAW(LPVOID lpszPath
)
176 if (SHELL_OsIsUnicode())
177 return PathGetDriveNumberW(lpszPath
);
178 return PathGetDriveNumberA(lpszPath
);
181 /*************************************************************************
182 * PathRemoveFileSpec [SHELL32.35]
184 BOOL WINAPI
PathRemoveFileSpecAW(LPVOID lpszPath
)
186 if (SHELL_OsIsUnicode())
187 return PathRemoveFileSpecW(lpszPath
);
188 return PathRemoveFileSpecA(lpszPath
);
191 /*************************************************************************
192 * PathStripPath [SHELL32.38]
194 void WINAPI
PathStripPathAW(LPVOID lpszPath
)
196 if (SHELL_OsIsUnicode())
197 PathStripPathW(lpszPath
);
199 PathStripPathA(lpszPath
);
202 /*************************************************************************
203 * PathStripToRoot [SHELL32.50]
205 BOOL WINAPI
PathStripToRootAW(LPVOID lpszPath
)
207 if (SHELL_OsIsUnicode())
208 return PathStripToRootW(lpszPath
);
209 return PathStripToRootA(lpszPath
);
212 /*************************************************************************
213 * PathRemoveArgs [SHELL32.251]
215 void WINAPI
PathRemoveArgsAW(LPVOID lpszPath
)
217 if (SHELL_OsIsUnicode())
218 PathRemoveArgsW(lpszPath
);
220 PathRemoveArgsA(lpszPath
);
223 /*************************************************************************
224 * PathRemoveExtension [SHELL32.250]
226 void WINAPI
PathRemoveExtensionAW(LPVOID lpszPath
)
228 if (SHELL_OsIsUnicode())
229 PathRemoveExtensionW(lpszPath
);
231 PathRemoveExtensionA(lpszPath
);
239 /*************************************************************************
240 * PathGetShortPathA [internal]
242 static void PathGetShortPathA(LPSTR pszPath
)
246 TRACE("%s\n", pszPath
);
248 if (GetShortPathNameA(pszPath
, path
, MAX_PATH
))
250 lstrcpyA(pszPath
, path
);
254 /*************************************************************************
255 * PathGetShortPathW [internal]
257 static void PathGetShortPathW(LPWSTR pszPath
)
259 WCHAR path
[MAX_PATH
];
261 TRACE("%s\n", debugstr_w(pszPath
));
263 if (GetShortPathNameW(pszPath
, path
, MAX_PATH
))
265 lstrcpyW(pszPath
, path
);
269 /*************************************************************************
270 * PathGetShortPath [SHELL32.92]
272 VOID WINAPI
PathGetShortPathAW(LPVOID pszPath
)
274 if(SHELL_OsIsUnicode())
275 PathGetShortPathW(pszPath
);
276 PathGetShortPathA(pszPath
);
279 /*************************************************************************
280 * PathRemoveBlanks [SHELL32.33]
282 void WINAPI
PathRemoveBlanksAW(LPVOID str
)
284 if(SHELL_OsIsUnicode())
285 PathRemoveBlanksW(str
);
287 PathRemoveBlanksA(str
);
290 /*************************************************************************
291 * PathQuoteSpaces [SHELL32.55]
293 VOID WINAPI
PathQuoteSpacesAW (LPVOID lpszPath
)
295 if(SHELL_OsIsUnicode())
296 PathQuoteSpacesW(lpszPath
);
298 PathQuoteSpacesA(lpszPath
);
301 /*************************************************************************
302 * PathUnquoteSpaces [SHELL32.56]
304 VOID WINAPI
PathUnquoteSpacesAW(LPVOID str
)
306 if(SHELL_OsIsUnicode())
307 PathUnquoteSpacesW(str
);
309 PathUnquoteSpacesA(str
);
312 /*************************************************************************
313 * PathParseIconLocation [SHELL32.249]
315 int WINAPI
PathParseIconLocationAW (LPVOID lpszPath
)
317 if(SHELL_OsIsUnicode())
318 return PathParseIconLocationW(lpszPath
);
319 return PathParseIconLocationA(lpszPath
);
323 ########## Path Testing ##########
325 /*************************************************************************
326 * PathIsUNC [SHELL32.39]
328 BOOL WINAPI
PathIsUNCAW (LPCVOID lpszPath
)
330 if (SHELL_OsIsUnicode())
331 return PathIsUNCW( lpszPath
);
332 return PathIsUNCA( lpszPath
);
335 /*************************************************************************
336 * PathIsRelative [SHELL32.40]
338 BOOL WINAPI
PathIsRelativeAW (LPCVOID lpszPath
)
340 if (SHELL_OsIsUnicode())
341 return PathIsRelativeW( lpszPath
);
342 return PathIsRelativeA( lpszPath
);
345 /*************************************************************************
346 * PathIsRoot [SHELL32.29]
348 BOOL WINAPI
PathIsRootAW(LPCVOID lpszPath
)
350 if (SHELL_OsIsUnicode())
351 return PathIsRootW(lpszPath
);
352 return PathIsRootA(lpszPath
);
355 /*************************************************************************
356 * PathIsExeA [internal]
358 static BOOL
PathIsExeA (LPCSTR lpszPath
)
360 LPCSTR lpszExtension
= PathGetExtensionA(lpszPath
);
362 static const char * const lpszExtensions
[] =
363 {"exe", "com", "pif", "cmd", "bat", "scf", "scr", NULL
};
365 TRACE("path=%s\n",lpszPath
);
367 for(i
=0; lpszExtensions
[i
]; i
++)
368 if (!lstrcmpiA(lpszExtension
,lpszExtensions
[i
])) return TRUE
;
373 /*************************************************************************
374 * PathIsExeW [internal]
376 static BOOL
PathIsExeW (LPCWSTR lpszPath
)
378 LPCWSTR lpszExtension
= PathGetExtensionW(lpszPath
);
380 static const WCHAR lpszExtensions
[][4] =
381 {{'e','x','e','\0'}, {'c','o','m','\0'}, {'p','i','f','\0'},
382 {'c','m','d','\0'}, {'b','a','t','\0'}, {'s','c','f','\0'},
383 {'s','c','r','\0'}, {'\0'} };
385 TRACE("path=%s\n",debugstr_w(lpszPath
));
387 for(i
=0; lpszExtensions
[i
][0]; i
++)
388 if (!strcmpiW(lpszExtension
,lpszExtensions
[i
])) return TRUE
;
393 /*************************************************************************
394 * PathIsExe [SHELL32.43]
396 BOOL WINAPI
PathIsExeAW (LPCVOID path
)
398 if (SHELL_OsIsUnicode())
399 return PathIsExeW (path
);
400 return PathIsExeA(path
);
403 /*************************************************************************
404 * PathIsDirectory [SHELL32.159]
406 BOOL WINAPI
PathIsDirectoryAW (LPCVOID lpszPath
)
408 if (SHELL_OsIsUnicode())
409 return PathIsDirectoryW (lpszPath
);
410 return PathIsDirectoryA (lpszPath
);
413 /*************************************************************************
414 * PathFileExists [SHELL32.45]
416 BOOL WINAPI
PathFileExistsAW (LPCVOID lpszPath
)
418 if (SHELL_OsIsUnicode())
419 return PathFileExistsW (lpszPath
);
420 return PathFileExistsA (lpszPath
);
423 /*************************************************************************
424 * PathMatchSpec [SHELL32.46]
426 BOOL WINAPI
PathMatchSpecAW(LPVOID name
, LPVOID mask
)
428 if (SHELL_OsIsUnicode())
429 return PathMatchSpecW( name
, mask
);
430 return PathMatchSpecA( name
, mask
);
433 /*************************************************************************
434 * PathIsSameRoot [SHELL32.650]
436 BOOL WINAPI
PathIsSameRootAW(LPCVOID lpszPath1
, LPCVOID lpszPath2
)
438 if (SHELL_OsIsUnicode())
439 return PathIsSameRootW(lpszPath1
, lpszPath2
);
440 return PathIsSameRootA(lpszPath1
, lpszPath2
);
443 /*************************************************************************
444 * IsLFNDriveA [SHELL32.41]
446 BOOL WINAPI
IsLFNDriveA(LPCSTR lpszPath
)
450 if (!GetVolumeInformationA(lpszPath
, NULL
, 0, NULL
, &fnlen
, NULL
, NULL
, 0))
455 /*************************************************************************
456 * IsLFNDriveW [SHELL32.42]
458 BOOL WINAPI
IsLFNDriveW(LPCWSTR lpszPath
)
462 if (!GetVolumeInformationW(lpszPath
, NULL
, 0, NULL
, &fnlen
, NULL
, NULL
, 0))
467 /*************************************************************************
468 * IsLFNDrive [SHELL32.119]
470 BOOL WINAPI
IsLFNDriveAW(LPCVOID lpszPath
)
472 if (SHELL_OsIsUnicode())
473 return IsLFNDriveW(lpszPath
);
474 return IsLFNDriveA(lpszPath
);
478 ########## Creating Something Unique ##########
480 /*************************************************************************
481 * PathMakeUniqueNameA [internal]
483 BOOL WINAPI
PathMakeUniqueNameA(
486 LPCSTR lpszShortName
,
490 FIXME("%p %lu %s %s %s stub\n",
491 lpszBuffer
, dwBuffSize
, debugstr_a(lpszShortName
),
492 debugstr_a(lpszLongName
), debugstr_a(lpszPathName
));
496 /*************************************************************************
497 * PathMakeUniqueNameW [internal]
499 BOOL WINAPI
PathMakeUniqueNameW(
502 LPCWSTR lpszShortName
,
503 LPCWSTR lpszLongName
,
504 LPCWSTR lpszPathName
)
506 FIXME("%p %lu %s %s %s stub\n",
507 lpszBuffer
, dwBuffSize
, debugstr_w(lpszShortName
),
508 debugstr_w(lpszLongName
), debugstr_w(lpszPathName
));
512 /*************************************************************************
513 * PathMakeUniqueName [SHELL32.47]
515 BOOL WINAPI
PathMakeUniqueNameAW(
518 LPCVOID lpszShortName
,
519 LPCVOID lpszLongName
,
520 LPCVOID lpszPathName
)
522 if (SHELL_OsIsUnicode())
523 return PathMakeUniqueNameW(lpszBuffer
,dwBuffSize
, lpszShortName
,lpszLongName
,lpszPathName
);
524 return PathMakeUniqueNameA(lpszBuffer
,dwBuffSize
, lpszShortName
,lpszLongName
,lpszPathName
);
527 /*************************************************************************
528 * PathYetAnotherMakeUniqueName [SHELL32.75]
531 * exported by ordinal
533 BOOL WINAPI
PathYetAnotherMakeUniqueName(
535 LPCWSTR lpszPathName
,
536 LPCWSTR lpszShortName
,
537 LPCWSTR lpszLongName
)
539 FIXME("(%p, %s, %s ,%s):stub.\n",
540 lpszBuffer
, debugstr_w(lpszPathName
), debugstr_w(lpszShortName
), debugstr_w(lpszLongName
));
546 ########## cleaning and resolving paths ##########
549 /*************************************************************************
550 * PathFindOnPath [SHELL32.145]
552 BOOL WINAPI
PathFindOnPathAW(LPVOID sFile
, LPCVOID sOtherDirs
)
554 if (SHELL_OsIsUnicode())
555 return PathFindOnPathW(sFile
, (LPCWSTR
*)sOtherDirs
);
556 return PathFindOnPathA(sFile
, (LPCSTR
*)sOtherDirs
);
559 /*************************************************************************
560 * PathCleanupSpec [SHELL32.171]
562 * lpszFile is changed in place.
564 int WINAPI
PathCleanupSpec( LPCWSTR lpszPathW
, LPWSTR lpszFileW
)
570 if (SHELL_OsIsUnicode())
572 LPWSTR p
= lpszFileW
;
574 TRACE("Cleanup %s\n",debugstr_w(lpszFileW
));
577 length
= strlenW(lpszPathW
);
581 int gct
= PathGetCharTypeW(*p
);
582 if (gct
== GCT_INVALID
|| gct
== GCT_WILD
|| gct
== GCT_SEPARATOR
)
585 rc
|= PCS_REPLACEDCHAR
;
591 if (length
+ i
== MAX_PATH
)
593 rc
|= PCS_FATAL
| PCS_PATHTOOLONG
;
601 LPSTR lpszFileA
= (LPSTR
)lpszFileW
;
602 LPCSTR lpszPathA
= (LPSTR
)lpszPathW
;
605 TRACE("Cleanup %s\n",debugstr_a(lpszFileA
));
608 length
= strlen(lpszPathA
);
612 int gct
= PathGetCharTypeA(*p
);
613 if (gct
== GCT_INVALID
|| gct
== GCT_WILD
|| gct
== GCT_SEPARATOR
)
616 rc
|= PCS_REPLACEDCHAR
;
622 if (length
+ i
== MAX_PATH
)
624 rc
|= PCS_FATAL
| PCS_PATHTOOLONG
;
633 /*************************************************************************
634 * PathQualifyA [SHELL32]
636 BOOL WINAPI
PathQualifyA(LPCSTR pszPath
)
638 FIXME("%s\n",pszPath
);
642 /*************************************************************************
643 * PathQualifyW [SHELL32]
645 BOOL WINAPI
PathQualifyW(LPCWSTR pszPath
)
647 FIXME("%s\n",debugstr_w(pszPath
));
651 /*************************************************************************
652 * PathQualify [SHELL32.49]
654 BOOL WINAPI
PathQualifyAW(LPCVOID pszPath
)
656 if (SHELL_OsIsUnicode())
657 return PathQualifyW(pszPath
);
658 return PathQualifyA(pszPath
);
661 /*************************************************************************
662 * PathResolveA [SHELL32.51]
664 BOOL WINAPI
PathResolveA(
669 FIXME("(%s,%p,0x%08lx),stub!\n",
670 lpszPath
, *alpszPaths
, dwFlags
);
674 /*************************************************************************
675 * PathResolveW [SHELL32]
677 BOOL WINAPI
PathResolveW(
682 FIXME("(%s,%p,0x%08lx),stub!\n",
683 debugstr_w(lpszPath
), debugstr_w(*alpszPaths
), dwFlags
);
687 /*************************************************************************
688 * PathResolve [SHELL32.51]
690 BOOL WINAPI
PathResolveAW(
695 if (SHELL_OsIsUnicode())
696 return PathResolveW(lpszPath
, (LPCWSTR
*)alpszPaths
, dwFlags
);
697 return PathResolveA(lpszPath
, (LPCSTR
*)alpszPaths
, dwFlags
);
700 /*************************************************************************
701 * PathProcessCommandA [SHELL32.653]
703 LONG WINAPI
PathProcessCommandA (
709 FIXME("%s %p 0x%04lx 0x%04lx stub\n",
710 lpszPath
, lpszBuff
, dwBuffSize
, dwFlags
);
711 if(!lpszPath
) return -1;
712 if(lpszBuff
) strcpy(lpszBuff
, lpszPath
);
713 return strlen(lpszPath
);
716 /*************************************************************************
717 * PathProcessCommandW
719 LONG WINAPI
PathProcessCommandW (
725 FIXME("(%s, %p, 0x%04lx, 0x%04lx) stub\n",
726 debugstr_w(lpszPath
), lpszBuff
, dwBuffSize
, dwFlags
);
727 if(!lpszPath
) return -1;
728 if(lpszBuff
) strcpyW(lpszBuff
, lpszPath
);
729 return strlenW(lpszPath
);
732 /*************************************************************************
733 * PathProcessCommand (SHELL32.653)
735 LONG WINAPI
PathProcessCommandAW (
741 if (SHELL_OsIsUnicode())
742 return PathProcessCommandW(lpszPath
, lpszBuff
, dwBuffSize
, dwFlags
);
743 return PathProcessCommandA(lpszPath
, lpszBuff
, dwBuffSize
, dwFlags
);
747 ########## special ##########
750 /*************************************************************************
751 * PathSetDlgItemPath (SHELL32.48)
753 VOID WINAPI
PathSetDlgItemPathAW(HWND hDlg
, int id
, LPCVOID pszPath
)
755 if (SHELL_OsIsUnicode())
756 PathSetDlgItemPathW(hDlg
, id
, pszPath
);
758 PathSetDlgItemPathA(hDlg
, id
, pszPath
);
761 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'};
762 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'};
763 static const WCHAR AppDataW
[] = {'A','p','p','D','a','t','a','\0'};
764 static const WCHAR CacheW
[] = {'C','a','c','h','e','\0'};
765 static const WCHAR CD_BurningW
[] = {'C','D',' ','B','u','r','n','i','n','g','\0'};
766 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'};
767 static const WCHAR Common_AppDataW
[] = {'C','o','m','m','o','n',' ','A','p','p','D','a','t','a','\0'};
768 static const WCHAR Common_DesktopW
[] = {'C','o','m','m','o','n',' ','D','e','s','k','t','o','p','\0'};
769 static const WCHAR Common_DocumentsW
[] = {'C','o','m','m','o','n',' ','D','o','c','u','m','e','n','t','s','\0'};
770 static const WCHAR CommonFilesDirW
[] = {'C','o','m','m','o','n','F','i','l','e','s','D','i','r','\0'};
771 static const WCHAR CommonMusicW
[] = {'C','o','m','m','o','n','M','u','s','i','c','\0'};
772 static const WCHAR CommonPicturesW
[] = {'C','o','m','m','o','n','P','i','c','t','u','r','e','s','\0'};
773 static const WCHAR Common_ProgramsW
[] = {'C','o','m','m','o','n',' ','P','r','o','g','r','a','m','s','\0'};
774 static const WCHAR Common_StartUpW
[] = {'C','o','m','m','o','n',' ','S','t','a','r','t','U','p','\0'};
775 static const WCHAR Common_Start_MenuW
[] = {'C','o','m','m','o','n',' ','S','t','a','r','t',' ','M','e','n','u','\0'};
776 static const WCHAR Common_TemplatesW
[] = {'C','o','m','m','o','n',' ','T','e','m','p','l','a','t','e','s','\0'};
777 static const WCHAR CommonVideoW
[] = {'C','o','m','m','o','n','V','i','d','e','o','\0'};
778 static const WCHAR CookiesW
[] = {'C','o','o','k','i','e','s','\0'};
779 static const WCHAR DesktopW
[] = {'D','e','s','k','t','o','p','\0'};
780 static const WCHAR FavoritesW
[] = {'F','a','v','o','r','i','t','e','s','\0'};
781 static const WCHAR FontsW
[] = {'F','o','n','t','s','\0'};
782 static const WCHAR HistoryW
[] = {'H','i','s','t','o','r','y','\0'};
783 static const WCHAR Local_AppDataW
[] = {'L','o','c','a','l',' ','A','p','p','D','a','t','a','\0'};
784 static const WCHAR My_MusicW
[] = {'M','y',' ','M','u','s','i','c','\0'};
785 static const WCHAR My_PicturesW
[] = {'M','y',' ','P','i','c','t','u','r','e','s','\0'};
786 static const WCHAR My_VideoW
[] = {'M','y',' ','V','i','d','e','o','\0'};
787 static const WCHAR NetHoodW
[] = {'N','e','t','H','o','o','d','\0'};
788 static const WCHAR PersonalW
[] = {'P','e','r','s','o','n','a','l','\0'};
789 static const WCHAR PrintHoodW
[] = {'P','r','i','n','t','H','o','o','d','\0'};
790 static const WCHAR ProgramFilesDirW
[] = {'P','r','o','g','r','a','m','F','i','l','e','s','D','i','r','\0'};
791 static const WCHAR ProgramsW
[] = {'P','r','o','g','r','a','m','s','\0'};
792 static const WCHAR RecentW
[] = {'R','e','c','e','n','t','\0'};
793 static const WCHAR ResourcesW
[] = {'R','e','s','o','u','r','c','e','s','\0'};
794 static const WCHAR SendToW
[] = {'S','e','n','d','T','o','\0'};
795 static const WCHAR StartUpW
[] = {'S','t','a','r','t','U','p','\0'};
796 static const WCHAR Start_MenuW
[] = {'S','t','a','r','t',' ','M','e','n','u','\0'};
797 static const WCHAR TemplatesW
[] = {'T','e','m','p','l','a','t','e','s','\0'};
798 static const WCHAR DefaultW
[] = {'.','D','e','f','a','u','l','t','\0'};
799 static const WCHAR AllUsersProfileW
[] = {'%','A','L','L','U','S','E','R','S','P','R','O','F','I','L','E','%','\0'};
800 static const WCHAR UserProfileW
[] = {'%','U','S','E','R','P','R','O','F','I','L','E','%','\0'};
801 static const WCHAR SystemDriveW
[] = {'%','S','y','s','t','e','m','D','r','i','v','e','%','\0'};
802 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};
803 static const WCHAR ProfilesDirectoryW
[] = {'P','r','o','f','i','l','e','s','D','i','r','e','c','t','o','r','y',0};
804 static const WCHAR AllUsersProfileValueW
[] = {'A','l','l','U','s','e','r','s','P','r','o','f','i','l','e','\0'};
805 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'};
806 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'};
807 static const WCHAR szSHSetupFolders
[] = {'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'};
808 /* This defaults to L"Documents and Settings" on Windows 2000/XP, but we're
809 * acting more Windows 9x-like for now.
811 static const WCHAR szDefaultProfileDirW
[] = {'p','r','o','f','i','l','e','s','\0'};
812 static const WCHAR AllUsersW
[] = {'A','l','l',' ','U','s','e','r','s','\0'};
814 typedef enum _CSIDL_Type
{
818 CSIDL_Type_Disallowed
,
819 CSIDL_Type_NonExistent
,
820 CSIDL_Type_WindowsPath
,
821 CSIDL_Type_SystemPath
,
828 LPCWSTR szDefaultPath
; /* fallback string or resource ID */
831 static const CSIDL_DATA CSIDL_Data
[] =
833 { /* 0x00 - CSIDL_DESKTOP */
836 MAKEINTRESOURCEW(IDS_DESKTOPDIRECTORY
)
838 { /* 0x01 - CSIDL_INTERNET */
839 CSIDL_Type_Disallowed
,
843 { /* 0x02 - CSIDL_PROGRAMS */
846 MAKEINTRESOURCEW(IDS_PROGRAMS
)
848 { /* 0x03 - CSIDL_CONTROLS (.CPL files) */
849 CSIDL_Type_SystemPath
,
853 { /* 0x04 - CSIDL_PRINTERS */
854 CSIDL_Type_SystemPath
,
858 { /* 0x05 - CSIDL_PERSONAL */
861 MAKEINTRESOURCEW(IDS_PERSONAL
)
863 { /* 0x06 - CSIDL_FAVORITES */
866 MAKEINTRESOURCEW(IDS_FAVORITES
)
868 { /* 0x07 - CSIDL_STARTUP */
871 MAKEINTRESOURCEW(IDS_STARTUP
)
873 { /* 0x08 - CSIDL_RECENT */
876 MAKEINTRESOURCEW(IDS_RECENT
)
878 { /* 0x09 - CSIDL_SENDTO */
881 MAKEINTRESOURCEW(IDS_SENDTO
)
883 { /* 0x0a - CSIDL_BITBUCKET - Recycle Bin */
884 CSIDL_Type_Disallowed
,
888 { /* 0x0b - CSIDL_STARTMENU */
891 MAKEINTRESOURCEW(IDS_STARTMENU
)
893 { /* 0x0c - CSIDL_MYDOCUMENTS */
894 CSIDL_Type_Disallowed
, /* matches WinXP--can't get its path */
898 { /* 0x0d - CSIDL_MYMUSIC */
901 MAKEINTRESOURCEW(IDS_MYMUSIC
)
903 { /* 0x0e - CSIDL_MYVIDEO */
906 MAKEINTRESOURCEW(IDS_MYVIDEO
)
908 { /* 0x0f - unassigned */
909 CSIDL_Type_Disallowed
,
913 { /* 0x10 - CSIDL_DESKTOPDIRECTORY */
916 MAKEINTRESOURCEW(IDS_DESKTOPDIRECTORY
)
918 { /* 0x11 - CSIDL_DRIVES */
919 CSIDL_Type_Disallowed
,
923 { /* 0x12 - CSIDL_NETWORK */
924 CSIDL_Type_Disallowed
,
928 { /* 0x13 - CSIDL_NETHOOD */
931 MAKEINTRESOURCEW(IDS_NETHOOD
)
933 { /* 0x14 - CSIDL_FONTS */
934 CSIDL_Type_WindowsPath
,
938 { /* 0x15 - CSIDL_TEMPLATES */
941 MAKEINTRESOURCEW(IDS_TEMPLATES
)
943 { /* 0x16 - CSIDL_COMMON_STARTMENU */
946 MAKEINTRESOURCEW(IDS_STARTMENU
)
948 { /* 0x17 - CSIDL_COMMON_PROGRAMS */
951 MAKEINTRESOURCEW(IDS_PROGRAMS
)
953 { /* 0x18 - CSIDL_COMMON_STARTUP */
956 MAKEINTRESOURCEW(IDS_STARTUP
)
958 { /* 0x19 - CSIDL_COMMON_DESKTOPDIRECTORY */
961 MAKEINTRESOURCEW(IDS_DESKTOP
)
963 { /* 0x1a - CSIDL_APPDATA */
966 MAKEINTRESOURCEW(IDS_APPDATA
)
968 { /* 0x1b - CSIDL_PRINTHOOD */
971 MAKEINTRESOURCEW(IDS_PRINTHOOD
)
973 { /* 0x1c - CSIDL_LOCAL_APPDATA */
976 MAKEINTRESOURCEW(IDS_LOCAL_APPDATA
)
978 { /* 0x1d - CSIDL_ALTSTARTUP */
979 CSIDL_Type_NonExistent
,
983 { /* 0x1e - CSIDL_COMMON_ALTSTARTUP */
984 CSIDL_Type_NonExistent
,
988 { /* 0x1f - CSIDL_COMMON_FAVORITES */
991 MAKEINTRESOURCEW(IDS_FAVORITES
)
993 { /* 0x20 - CSIDL_INTERNET_CACHE */
996 MAKEINTRESOURCEW(IDS_INTERNET_CACHE
)
998 { /* 0x21 - CSIDL_COOKIES */
1001 MAKEINTRESOURCEW(IDS_COOKIES
)
1003 { /* 0x22 - CSIDL_HISTORY */
1006 MAKEINTRESOURCEW(IDS_HISTORY
)
1008 { /* 0x23 - CSIDL_COMMON_APPDATA */
1009 CSIDL_Type_AllUsers
,
1011 MAKEINTRESOURCEW(IDS_APPDATA
)
1013 { /* 0x24 - CSIDL_WINDOWS */
1014 CSIDL_Type_WindowsPath
,
1018 { /* 0x25 - CSIDL_SYSTEM */
1019 CSIDL_Type_SystemPath
,
1023 { /* 0x26 - CSIDL_PROGRAM_FILES */
1026 MAKEINTRESOURCEW(IDS_PROGRAM_FILES
)
1028 { /* 0x27 - CSIDL_MYPICTURES */
1031 MAKEINTRESOURCEW(IDS_MYPICTURES
)
1033 { /* 0x28 - CSIDL_PROFILE */
1038 { /* 0x29 - CSIDL_SYSTEMX86 */
1039 CSIDL_Type_NonExistent
,
1043 { /* 0x2a - CSIDL_PROGRAM_FILESX86 */
1044 CSIDL_Type_NonExistent
,
1048 { /* 0x2b - CSIDL_PROGRAM_FILES_COMMON */
1051 MAKEINTRESOURCEW(IDS_PROGRAM_FILES_COMMON
)
1053 { /* 0x2c - CSIDL_PROGRAM_FILES_COMMONX86 */
1054 CSIDL_Type_NonExistent
,
1058 { /* 0x2d - CSIDL_COMMON_TEMPLATES */
1059 CSIDL_Type_AllUsers
,
1061 MAKEINTRESOURCEW(IDS_TEMPLATES
)
1063 { /* 0x2e - CSIDL_COMMON_DOCUMENTS */
1064 CSIDL_Type_AllUsers
,
1066 MAKEINTRESOURCEW(IDS_COMMON_DOCUMENTS
)
1068 { /* 0x2f - CSIDL_COMMON_ADMINTOOLS */
1069 CSIDL_Type_AllUsers
,
1070 Common_Administrative_ToolsW
,
1071 MAKEINTRESOURCEW(IDS_ADMINTOOLS
)
1073 { /* 0x30 - CSIDL_ADMINTOOLS */
1075 Administrative_ToolsW
,
1076 MAKEINTRESOURCEW(IDS_ADMINTOOLS
)
1078 { /* 0x31 - CSIDL_CONNECTIONS */
1079 CSIDL_Type_Disallowed
,
1083 { /* 0x32 - unassigned */
1084 CSIDL_Type_Disallowed
,
1088 { /* 0x33 - unassigned */
1089 CSIDL_Type_Disallowed
,
1093 { /* 0x34 - unassigned */
1094 CSIDL_Type_Disallowed
,
1098 { /* 0x35 - CSIDL_COMMON_MUSIC */
1099 CSIDL_Type_AllUsers
,
1101 MAKEINTRESOURCEW(IDS_COMMON_MUSIC
)
1103 { /* 0x36 - CSIDL_COMMON_PICTURES */
1104 CSIDL_Type_AllUsers
,
1106 MAKEINTRESOURCEW(IDS_COMMON_PICTURES
)
1108 { /* 0x37 - CSIDL_COMMON_VIDEO */
1109 CSIDL_Type_AllUsers
,
1111 MAKEINTRESOURCEW(IDS_COMMON_VIDEO
)
1113 { /* 0x38 - CSIDL_RESOURCES */
1114 CSIDL_Type_WindowsPath
,
1118 { /* 0x39 - CSIDL_RESOURCES_LOCALIZED */
1119 CSIDL_Type_NonExistent
,
1123 { /* 0x3a - CSIDL_COMMON_OEM_LINKS */
1124 CSIDL_Type_NonExistent
,
1128 { /* 0x3b - CSIDL_CDBURN_AREA */
1131 MAKEINTRESOURCEW(IDS_CDBURN_AREA
)
1133 { /* 0x3c unassigned */
1134 CSIDL_Type_Disallowed
,
1138 { /* 0x3d - CSIDL_COMPUTERSNEARME */
1139 CSIDL_Type_Disallowed
, /* FIXME */
1143 { /* 0x3e - CSIDL_PROFILES */
1144 CSIDL_Type_Disallowed
, /* oddly, this matches WinXP */
1150 static HRESULT
_SHExpandEnvironmentStrings(LPCWSTR szSrc
, LPWSTR szDest
);
1152 /* Gets the value named value from the registry key
1153 * rootKey\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders
1154 * (or from rootKey\userPrefix\... if userPrefix is not NULL) into path, which
1155 * is assumed to be MAX_PATH WCHARs in length.
1156 * If it exists, expands the value and writes the expanded value to
1157 * rootKey\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders
1158 * Returns successful error code if the value was retrieved from the registry,
1159 * and a failure otherwise.
1161 static HRESULT
_SHGetUserShellFolderPath(HKEY rootKey
, LPCWSTR userPrefix
,
1162 LPCWSTR value
, LPWSTR path
)
1165 WCHAR shellFolderPath
[MAX_PATH
], userShellFolderPath
[MAX_PATH
];
1166 LPCWSTR pShellFolderPath
, pUserShellFolderPath
;
1167 DWORD dwDisp
, dwType
, dwPathLen
= MAX_PATH
;
1168 HKEY userShellFolderKey
, shellFolderKey
;
1170 TRACE("%p,%s,%s,%p\n",rootKey
, debugstr_w(userPrefix
), debugstr_w(value
),
1175 strcpyW(shellFolderPath
, userPrefix
);
1176 PathAddBackslashW(shellFolderPath
);
1177 strcatW(shellFolderPath
, szSHFolders
);
1178 pShellFolderPath
= shellFolderPath
;
1179 strcpyW(userShellFolderPath
, userPrefix
);
1180 PathAddBackslashW(userShellFolderPath
);
1181 strcatW(userShellFolderPath
, szSHUserFolders
);
1182 pUserShellFolderPath
= userShellFolderPath
;
1186 pUserShellFolderPath
= szSHUserFolders
;
1187 pShellFolderPath
= szSHFolders
;
1190 if (RegCreateKeyExW(rootKey
, pShellFolderPath
, 0, NULL
, 0, KEY_ALL_ACCESS
,
1191 NULL
, &shellFolderKey
, &dwDisp
))
1193 TRACE("Failed to create %s\n", debugstr_w(pShellFolderPath
));
1196 if (RegCreateKeyExW(rootKey
, pUserShellFolderPath
, 0, NULL
, 0,
1197 KEY_ALL_ACCESS
, NULL
, &userShellFolderKey
, &dwDisp
))
1199 TRACE("Failed to create %s\n",
1200 debugstr_w(pUserShellFolderPath
));
1201 RegCloseKey(shellFolderKey
);
1205 if (!RegQueryValueExW(userShellFolderKey
, value
, NULL
, &dwType
,
1206 (LPBYTE
)path
, &dwPathLen
) && (dwType
== REG_EXPAND_SZ
|| dwType
== REG_SZ
))
1210 path
[dwPathLen
/ sizeof(WCHAR
)] = '\0';
1211 if (dwType
== REG_EXPAND_SZ
&& path
[0] == '%')
1213 WCHAR szTemp
[MAX_PATH
];
1215 _SHExpandEnvironmentStrings(path
, szTemp
);
1216 lstrcpynW(path
, szTemp
, MAX_PATH
);
1218 ret
= RegSetValueExW(shellFolderKey
, value
, 0, REG_SZ
, (LPBYTE
)path
,
1219 (strlenW(path
) + 1) * sizeof(WCHAR
));
1220 if (ret
!= ERROR_SUCCESS
)
1221 hr
= HRESULT_FROM_WIN32(ret
);
1227 RegCloseKey(shellFolderKey
);
1228 RegCloseKey(userShellFolderKey
);
1229 TRACE("returning 0x%08lx\n", hr
);
1233 /* Gets a 'semi-expanded' default value of the CSIDL with index folder into
1234 * pszPath, based on the entries in CSIDL_Data. By semi-expanded, I mean:
1235 * - The entry's szDefaultPath may be either a string value or an integer
1236 * resource identifier. In the latter case, the string value of the resource
1238 * - Depending on the entry's type, the path may begin with an (unexpanded)
1239 * environment variable name. The caller is responsible for expanding
1240 * environment strings if so desired.
1241 * The types that are prepended with environment variables are:
1242 * CSIDL_Type_User: %USERPROFILE%
1243 * CSIDL_Type_AllUsers: %ALLUSERSPROFILE%
1244 * CSIDL_Type_CurrVer: %SystemDrive%
1245 * (Others might make sense too, but as yet are unneeded.)
1247 static HRESULT
_SHGetDefaultValue(BYTE folder
, LPWSTR pszPath
)
1250 WCHAR resourcePath
[MAX_PATH
];
1251 LPCWSTR pDefaultPath
= NULL
;
1253 TRACE("0x%02x,%p\n", folder
, pszPath
);
1255 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1256 return E_INVALIDARG
;
1258 return E_INVALIDARG
;
1260 /* Try special cases first */
1264 case CSIDL_PERSONAL
:
1266 case CSIDL_MYPICTURES
:
1269 const char *home
= getenv("HOME");
1271 /* special case for "My Documents", map to $HOME */
1274 WCHAR homeW
[MAX_PATH
];
1276 MultiByteToWideChar(CP_ACP
, 0, home
, -1, homeW
, MAX_PATH
);
1277 if (GetFullPathNameW(homeW
, MAX_PATH
, pszPath
, NULL
) != 0 &&
1278 PathIsDirectoryW(pszPath
))
1284 case CSIDL_DESKTOPDIRECTORY
:
1286 const char *home
= getenv("HOME");
1288 /* special case for Desktop, map to $HOME/Desktop if it exists */
1291 WCHAR desktopW
[MAX_PATH
];
1293 MultiByteToWideChar(CP_ACP
, 0, home
, -1, desktopW
, MAX_PATH
);
1294 PathAppendW(desktopW
, DesktopW
);
1295 if (GetFullPathNameW(desktopW
, MAX_PATH
, pszPath
, NULL
) != 0 &&
1296 PathIsDirectoryW(pszPath
))
1305 /* Either the folder was unhandled, or a suitable default wasn't found,
1306 * so use one of the resource-based defaults
1308 if (CSIDL_Data
[folder
].szDefaultPath
&&
1309 IS_INTRESOURCE(CSIDL_Data
[folder
].szDefaultPath
))
1311 if (LoadStringW(shell32_hInstance
,
1312 LOWORD(CSIDL_Data
[folder
].szDefaultPath
), resourcePath
, MAX_PATH
))
1315 pDefaultPath
= resourcePath
;
1319 FIXME("(%d,%s), LoadString failed, missing translation?\n", folder
,
1320 debugstr_w(pszPath
));
1327 pDefaultPath
= CSIDL_Data
[folder
].szDefaultPath
;
1331 switch (CSIDL_Data
[folder
].type
)
1333 case CSIDL_Type_User
:
1334 strcpyW(pszPath
, UserProfileW
);
1336 case CSIDL_Type_AllUsers
:
1337 strcpyW(pszPath
, AllUsersProfileW
);
1339 case CSIDL_Type_CurrVer
:
1340 strcpyW(pszPath
, SystemDriveW
);
1343 ; /* no corresponding env. var, do nothing */
1347 PathAddBackslashW(pszPath
);
1348 strcatW(pszPath
, pDefaultPath
);
1351 TRACE("returning 0x%08lx\n", hr
);
1355 /* Gets the (unexpanded) value of the folder with index folder into pszPath.
1356 * The folder's type is assumed to be CSIDL_Type_CurrVer. Its default value
1357 * can be overridden in the HKLM\\szCurrentVersion key.
1358 * If dwFlags has SHGFP_TYPE_DEFAULT set or if the value isn't overridden in
1359 * the registry, uses _SHGetDefaultValue to get the value.
1361 static HRESULT
_SHGetCurrentVersionPath(DWORD dwFlags
, BYTE folder
,
1366 TRACE("0x%08lx,0x%02x,%p\n", dwFlags
, folder
, pszPath
);
1368 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1369 return E_INVALIDARG
;
1370 if (CSIDL_Data
[folder
].type
!= CSIDL_Type_CurrVer
)
1371 return E_INVALIDARG
;
1373 return E_INVALIDARG
;
1375 if (dwFlags
& SHGFP_TYPE_DEFAULT
)
1376 hr
= _SHGetDefaultValue(folder
, pszPath
);
1382 if (RegCreateKeyExW(HKEY_LOCAL_MACHINE
, szCurrentVersion
, 0,
1383 NULL
, 0, KEY_ALL_ACCESS
, NULL
, &hKey
, &dwDisp
))
1387 DWORD dwType
, dwPathLen
= MAX_PATH
* sizeof(WCHAR
);
1389 if (RegQueryValueExW(hKey
, CSIDL_Data
[folder
].szValueName
, NULL
,
1390 &dwType
, (LPBYTE
)pszPath
, &dwPathLen
) ||
1391 (dwType
!= REG_SZ
&& dwType
!= REG_EXPAND_SZ
))
1393 hr
= _SHGetDefaultValue(folder
, pszPath
);
1394 dwType
= REG_EXPAND_SZ
;
1395 RegSetValueExW(hKey
, CSIDL_Data
[folder
].szValueName
, 0, dwType
,
1396 (LPBYTE
)pszPath
, (strlenW(pszPath
)+1)*sizeof(WCHAR
));
1400 pszPath
[dwPathLen
/ sizeof(WCHAR
)] = '\0';
1406 TRACE("returning 0x%08lx (output path is %s)\n", hr
, debugstr_w(pszPath
));
1410 /* Gets the user's path (unexpanded) for the CSIDL with index folder:
1411 * If SHGFP_TYPE_DEFAULT is set, calls _SHGetDefaultValue for it. Otherwise
1412 * calls _SHGetUserShellFolderPath for it. Where it looks depends on hToken:
1413 * - if hToken is -1, looks in HKEY_USERS\.Default
1414 * - otherwise looks first in HKEY_CURRENT_USER, followed by HKEY_LOCAL_MACHINE
1415 * if HKEY_CURRENT_USER doesn't contain any entries. If both fail, finally
1416 * calls _SHGetDefaultValue for it.
1418 static HRESULT
_SHGetUserProfilePath(HANDLE hToken
, DWORD dwFlags
, BYTE folder
,
1423 TRACE("%p,0x%08lx,0x%02x,%p\n", hToken
, dwFlags
, folder
, pszPath
);
1425 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1426 return E_INVALIDARG
;
1427 if (CSIDL_Data
[folder
].type
!= CSIDL_Type_User
)
1428 return E_INVALIDARG
;
1430 return E_INVALIDARG
;
1432 /* Only the current user and the default user are supported right now
1434 * FIXME: should be able to call GetTokenInformation on the token,
1435 * then call ConvertSidToStringSidW on it to get the user prefix.
1436 * But Wine's registry doesn't store user info by sid, it stores it
1437 * by user name (and I don't know how to convert from a token to a
1440 if (hToken
!= NULL
&& hToken
!= (HANDLE
)-1)
1442 FIXME("unsupported for user other than current or default\n");
1446 if (dwFlags
& SHGFP_TYPE_DEFAULT
)
1447 hr
= _SHGetDefaultValue(folder
, pszPath
);
1450 LPCWSTR userPrefix
= NULL
;
1453 if (hToken
== (HANDLE
)-1)
1455 hRootKey
= HKEY_USERS
;
1456 userPrefix
= DefaultW
;
1458 else /* hToken == NULL, other values disallowed above */
1459 hRootKey
= HKEY_CURRENT_USER
;
1460 hr
= _SHGetUserShellFolderPath(hRootKey
, userPrefix
,
1461 CSIDL_Data
[folder
].szValueName
, pszPath
);
1462 if (FAILED(hr
) && hRootKey
!= HKEY_LOCAL_MACHINE
)
1463 hr
= _SHGetUserShellFolderPath(HKEY_LOCAL_MACHINE
, NULL
,
1464 CSIDL_Data
[folder
].szValueName
, pszPath
);
1466 hr
= _SHGetDefaultValue(folder
, pszPath
);
1468 TRACE("returning 0x%08lx (output path is %s)\n", hr
, debugstr_w(pszPath
));
1472 /* Gets the (unexpanded) path for the CSIDL with index folder. If dwFlags has
1473 * SHGFP_TYPE_DEFAULT set, calls _SHGetDefaultValue. Otherwise calls
1474 * _SHGetUserShellFolderPath for it, looking only in HKEY_LOCAL_MACHINE.
1475 * If this fails, falls back to _SHGetDefaultValue.
1477 static HRESULT
_SHGetAllUsersProfilePath(DWORD dwFlags
, BYTE folder
,
1482 TRACE("0x%08lx,0x%02x,%p\n", dwFlags
, folder
, pszPath
);
1484 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1485 return E_INVALIDARG
;
1486 if (CSIDL_Data
[folder
].type
!= CSIDL_Type_AllUsers
)
1487 return E_INVALIDARG
;
1489 return E_INVALIDARG
;
1491 if (dwFlags
& SHGFP_TYPE_DEFAULT
)
1492 hr
= _SHGetDefaultValue(folder
, pszPath
);
1495 hr
= _SHGetUserShellFolderPath(HKEY_LOCAL_MACHINE
, NULL
,
1496 CSIDL_Data
[folder
].szValueName
, pszPath
);
1498 hr
= _SHGetDefaultValue(folder
, pszPath
);
1500 TRACE("returning 0x%08lx (output path is %s)\n", hr
, debugstr_w(pszPath
));
1504 /* From the original Wine source:
1506 * Attempts to expand environment variables from szSrc into szDest, which is
1507 * assumed to be MAX_PATH characters in length. Before referring to the
1508 * environment, handles a few variables directly, because the environment
1509 * variables may not be set when this is called (as during Wine's installation
1510 * when default values are being written to the registry).
1511 * The directly handled environment variables, and their source, are:
1512 * - ALLUSERSPROFILE, USERPROFILE: reads from the registry
1513 * - SystemDrive: uses GetSystemDirectoryW and uses the drive portion of its
1515 * If one of the directly handled environment variables is expanded, only
1516 * expands a single variable, and only in the beginning of szSrc.
1518 * That's fine for Wine, but it breaks in ReactOS where we have profile paths
1519 * like "c:\documents and settings\Administrator.REACTOS". Anyway, we have the
1520 * environment variables handy so we'll just use them instead of hacking around
1522 static HRESULT
_SHExpandEnvironmentStrings(LPCWSTR szSrc
, LPWSTR szDest
)
1525 WCHAR szTemp
[MAX_PATH
];
1527 TRACE("%s, %p\n", debugstr_w(szSrc
), szDest
);
1529 if (!szSrc
|| !szDest
) return E_INVALIDARG
;
1531 /* short-circuit if there's nothing to expand */
1532 if (szSrc
[0] != '%')
1534 strcpyW(szDest
, szSrc
);
1540 strcpyW(szTemp
, szSrc
);
1541 while (SUCCEEDED(hr
) && szTemp
[0] == '%')
1543 DWORD ret
= ExpandEnvironmentStringsW(szSrc
, szDest
, MAX_PATH
);
1546 hr
= HRESULT_FROM_WIN32(ERROR_INSUFFICIENT_BUFFER
);
1548 hr
= HRESULT_FROM_WIN32(GetLastError());
1551 /* By default, terminate loop */
1553 if (SUCCEEDED(hr
) && strcmpW(szSrc
, szDest
) != 0)
1555 /* Continue the loop */
1556 strcpyW(szTemp
, szDest
);
1560 TRACE("returning 0x%08lx (input was %s, output is %s)\n", hr
,
1561 debugstr_w(szSrc
), debugstr_w(szDest
));
1565 /*************************************************************************
1566 * SHGetFolderPathW [SHELL32.@]
1568 * Convert nFolder to path.
1572 * Failure: standard HRESULT error codes.
1575 * Most values can be overridden in either
1576 * HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders
1577 * or in the same location in HKLM.
1578 * The registry usage is explained by the following tech note:
1579 * http://www.microsoft.com/windows2000/techinfo/reskit/en-us/default.asp?url=/windows2000/techinfo/reskit/en-us/regentry/36173.asp
1580 * The "Shell Folders" registry key was used in NT4 and earlier systems.
1581 * Beginning with Windows 2000, the "User Shell Folders" key is used, so
1582 * changes made to it are made to the former key too. This synchronization is
1583 * done on-demand: not until someone requests the value of one of these paths
1584 * (by calling one of the SHGet functions) is the value synchronized.
1585 * Furthermore, as explained here:
1586 * http://www.microsoft.com/windows2000/techinfo/reskit/en-us/default.asp?url=/windows2000/techinfo/reskit/en-us/regentry/36276.asp
1587 * the HKCU paths take precedence over the HKLM paths.
1590 HRESULT WINAPI
SHGetFolderPathW(
1591 HWND hwndOwner
, /* [I] owner window */
1592 int nFolder
, /* [I] CSIDL identifying the folder */
1593 HANDLE hToken
, /* [I] access token */
1594 DWORD dwFlags
, /* [I] which path to return */
1595 LPWSTR pszPath
) /* [O] converted path */
1598 WCHAR szBuildPath
[MAX_PATH
], szTemp
[MAX_PATH
];
1599 DWORD folder
= nFolder
& CSIDL_FOLDER_MASK
;
1603 TRACE("%p,%p,nFolder=0x%04x\n", hwndOwner
,pszPath
,nFolder
);
1605 /* Windows always NULL-terminates the resulting path regardless of success
1606 * or failure, so do so first
1610 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1611 return E_INVALIDARG
;
1613 type
= CSIDL_Data
[folder
].type
;
1616 case CSIDL_Type_Disallowed
:
1619 case CSIDL_Type_NonExistent
:
1622 case CSIDL_Type_WindowsPath
:
1623 GetWindowsDirectoryW(szTemp
, MAX_PATH
);
1624 if (CSIDL_Data
[folder
].szDefaultPath
&&
1625 !IS_INTRESOURCE(CSIDL_Data
[folder
].szDefaultPath
) &&
1626 *CSIDL_Data
[folder
].szDefaultPath
)
1628 PathAddBackslashW(szTemp
);
1629 strcatW(szTemp
, CSIDL_Data
[folder
].szDefaultPath
);
1633 case CSIDL_Type_SystemPath
:
1634 GetSystemDirectoryW(szTemp
, MAX_PATH
);
1635 if (CSIDL_Data
[folder
].szDefaultPath
&&
1636 !IS_INTRESOURCE(CSIDL_Data
[folder
].szDefaultPath
) &&
1637 *CSIDL_Data
[folder
].szDefaultPath
)
1639 PathAddBackslashW(szTemp
);
1640 strcatW(szTemp
, CSIDL_Data
[folder
].szDefaultPath
);
1644 case CSIDL_Type_CurrVer
:
1645 hr
= _SHGetCurrentVersionPath(dwFlags
, folder
, szTemp
);
1647 case CSIDL_Type_User
:
1648 hr
= _SHGetUserProfilePath(hToken
, dwFlags
, folder
, szTemp
);
1650 case CSIDL_Type_AllUsers
:
1651 hr
= _SHGetAllUsersProfilePath(dwFlags
, folder
, szTemp
);
1654 FIXME("bogus type %d, please fix\n", type
);
1659 /* Expand environment strings if necessary */
1661 hr
= _SHExpandEnvironmentStrings(szTemp
, szBuildPath
);
1663 strcpyW(szBuildPath
, szTemp
);
1664 /* Copy the path if it's available before we might return */
1665 if (SUCCEEDED(hr
) && pszPath
)
1666 strcpyW(pszPath
, szBuildPath
);
1668 if (FAILED(hr
)) goto end
;
1670 /* if we don't care about existing directories we are ready */
1671 if(nFolder
& CSIDL_FLAG_DONT_VERIFY
) goto end
;
1673 if (PathFileExistsW(szBuildPath
)) goto end
;
1675 /* not existing but we are not allowed to create it. The return value
1676 * is verified against shell32 version 6.0.
1678 if (!(nFolder
& CSIDL_FLAG_CREATE
))
1680 hr
= HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND
);
1684 /* create directory/directories */
1685 ret
= SHCreateDirectoryExW(hwndOwner
, szBuildPath
, NULL
);
1686 if (ret
&& ret
!= ERROR_ALREADY_EXISTS
)
1688 ERR("Failed to create directory '%s'.\n", debugstr_w(szBuildPath
));
1693 TRACE("Created missing system directory '%s'\n", debugstr_w(szBuildPath
));
1695 TRACE("returning 0x%08lx (final path is %s)\n", hr
, debugstr_w(szBuildPath
));
1699 /*************************************************************************
1700 * SHGetFolderPathA [SHELL32.@]
1702 * See SHGetFolderPathW.
1704 HRESULT WINAPI
SHGetFolderPathA(
1711 WCHAR szTemp
[MAX_PATH
];
1714 TRACE("%p,%p,nFolder=0x%04x\n",hwndOwner
,pszPath
,nFolder
);
1718 hr
= SHGetFolderPathW(hwndOwner
, nFolder
, hToken
, dwFlags
, szTemp
);
1719 if (SUCCEEDED(hr
) && pszPath
)
1720 WideCharToMultiByte(CP_ACP
, 0, szTemp
, -1, pszPath
, MAX_PATH
, NULL
,
1726 /* For each folder in folders, if its value has not been set in the registry,
1727 * calls _SHGetUserProfilePath or _SHGetAllUsersProfilePath (depending on the
1728 * folder's type) to get the unexpanded value first.
1729 * Writes the unexpanded value to User Shell Folders, and queries it with
1730 * SHGetFolderPathW to force the creation of the directory if it doesn't
1731 * already exist. SHGetFolderPathW also returns the expanded value, which
1732 * this then writes to Shell Folders.
1734 static HRESULT
_SHRegisterFolders(HKEY hRootKey
, HANDLE hToken
,
1735 LPCWSTR szUserShellFolderPath
, LPCWSTR szShellFolderPath
, const UINT folders
[],
1739 WCHAR path
[MAX_PATH
];
1741 HKEY hUserKey
= NULL
, hKey
= NULL
;
1742 DWORD dwDisp
, dwType
, dwPathLen
;
1745 TRACE("%p,%p,%s,%p,%u\n", hRootKey
, hToken
,
1746 debugstr_w(szUserShellFolderPath
), folders
, foldersLen
);
1748 ret
= RegCreateKeyExW(hRootKey
, szUserShellFolderPath
, 0, NULL
, 0,
1749 KEY_ALL_ACCESS
, NULL
, &hUserKey
, &dwDisp
);
1751 hr
= HRESULT_FROM_WIN32(ret
);
1754 ret
= RegCreateKeyExW(hRootKey
, szShellFolderPath
, 0, NULL
, 0,
1755 KEY_ALL_ACCESS
, NULL
, &hKey
, &dwDisp
);
1757 hr
= HRESULT_FROM_WIN32(ret
);
1759 for (i
= 0; SUCCEEDED(hr
) && i
< foldersLen
; i
++)
1761 dwPathLen
= MAX_PATH
* sizeof(WCHAR
);
1762 if (RegQueryValueExW(hUserKey
, CSIDL_Data
[folders
[i
]].szValueName
, NULL
,
1763 &dwType
, (LPBYTE
)path
, &dwPathLen
) || (dwType
!= REG_SZ
&&
1764 dwType
!= REG_EXPAND_SZ
))
1767 if (CSIDL_Data
[folders
[i
]].type
== CSIDL_Type_User
)
1768 _SHGetUserProfilePath(hToken
, SHGFP_TYPE_DEFAULT
, folders
[i
],
1770 else if (CSIDL_Data
[folders
[i
]].type
== CSIDL_Type_AllUsers
)
1771 _SHGetAllUsersProfilePath(SHGFP_TYPE_DEFAULT
, folders
[i
], path
);
1772 else if (CSIDL_Data
[folders
[i
]].type
== CSIDL_Type_CurrVer
)
1773 _SHGetDefaultValue(folders
[i
], path
);
1778 ret
= RegSetValueExW(hUserKey
,
1779 CSIDL_Data
[folders
[i
]].szValueName
, 0, REG_EXPAND_SZ
,
1780 (LPBYTE
)path
, (strlenW(path
) + 1) * sizeof(WCHAR
));
1782 hr
= HRESULT_FROM_WIN32(ret
);
1785 hr
= SHGetFolderPathW(NULL
, folders
[i
] | CSIDL_FLAG_CREATE
,
1786 hToken
, SHGFP_TYPE_DEFAULT
, path
);
1787 ret
= RegSetValueExW(hKey
,
1788 CSIDL_Data
[folders
[i
]].szValueName
, 0, REG_SZ
,
1789 (LPBYTE
)path
, (strlenW(path
) + 1) * sizeof(WCHAR
));
1791 hr
= HRESULT_FROM_WIN32(ret
);
1797 RegCloseKey(hUserKey
);
1801 TRACE("returning 0x%08lx\n", hr
);
1805 static HRESULT
_SHRegisterUserShellFolders(BOOL bDefault
)
1807 static const UINT folders
[] = {
1818 CSIDL_DESKTOPDIRECTORY
,
1822 CSIDL_LOCAL_APPDATA
,
1823 CSIDL_INTERNET_CACHE
,
1829 WCHAR userShellFolderPath
[MAX_PATH
], shellFolderPath
[MAX_PATH
];
1830 LPCWSTR pUserShellFolderPath
, pShellFolderPath
;
1835 TRACE("%s\n", bDefault
? "TRUE" : "FALSE");
1838 hToken
= (HANDLE
)-1;
1839 hRootKey
= HKEY_USERS
;
1840 strcpyW(userShellFolderPath
, DefaultW
);
1841 PathAddBackslashW(userShellFolderPath
);
1842 strcatW(userShellFolderPath
, szSHUserFolders
);
1843 pUserShellFolderPath
= userShellFolderPath
;
1844 strcpyW(shellFolderPath
, DefaultW
);
1845 PathAddBackslashW(shellFolderPath
);
1846 strcatW(shellFolderPath
, szSHFolders
);
1847 pShellFolderPath
= shellFolderPath
;
1852 hRootKey
= HKEY_CURRENT_USER
;
1853 pUserShellFolderPath
= szSHUserFolders
;
1854 pShellFolderPath
= szSHFolders
;
1857 hr
= _SHRegisterFolders(hRootKey
, hToken
, pUserShellFolderPath
,
1858 pShellFolderPath
, folders
, sizeof(folders
) / sizeof(folders
[0]));
1859 TRACE("returning 0x%08lx\n", hr
);
1863 static HRESULT
_SHRegisterCommonShellFolders(void)
1865 static const UINT folders
[] = {
1866 CSIDL_COMMON_STARTMENU
,
1867 CSIDL_COMMON_PROGRAMS
,
1868 CSIDL_COMMON_STARTUP
,
1869 CSIDL_COMMON_DESKTOPDIRECTORY
,
1870 CSIDL_COMMON_FAVORITES
,
1871 CSIDL_COMMON_APPDATA
,
1872 CSIDL_COMMON_TEMPLATES
,
1873 CSIDL_COMMON_DOCUMENTS
,
1878 hr
= _SHRegisterFolders(HKEY_LOCAL_MACHINE
, NULL
, szSHUserFolders
,
1879 szSHFolders
, folders
, sizeof(folders
) / sizeof(folders
[0]));
1880 TRACE("returning 0x%08lx\n", hr
);
1884 static HRESULT
_SHRegisterSetupShellFolders(void)
1886 static const UINT folders
[] = {
1887 CSIDL_PROGRAM_FILES_COMMON
,
1888 CSIDL_PROGRAM_FILES
,
1893 hr
= _SHRegisterFolders(HKEY_LOCAL_MACHINE
, NULL
, szSHSetupFolders
,
1894 szSHSetupFolders
, folders
, sizeof(folders
) / sizeof(folders
[0]));
1895 TRACE("returning 0x%08lx\n", hr
);
1899 /* Register the default values in the registry, as some apps seem to depend
1900 * on their presence. The set registered was taken from Windows XP.
1902 HRESULT
SHELL_RegisterShellFolders(void)
1904 HRESULT hr
= _SHRegisterUserShellFolders(TRUE
);
1907 hr
= _SHRegisterUserShellFolders(FALSE
);
1909 hr
= _SHRegisterCommonShellFolders();
1911 hr
= _SHRegisterSetupShellFolders();
1915 /*************************************************************************
1916 * SHGetSpecialFolderPathA [SHELL32.@]
1918 BOOL WINAPI
SHGetSpecialFolderPathA (
1924 return (SHGetFolderPathA(
1926 nFolder
+ (bCreate
? CSIDL_FLAG_CREATE
: 0),
1929 szPath
)) == S_OK
? TRUE
: FALSE
;
1932 /*************************************************************************
1933 * SHGetSpecialFolderPathW
1935 BOOL WINAPI
SHGetSpecialFolderPathW (
1941 return (SHGetFolderPathW(
1943 nFolder
+ (bCreate
? CSIDL_FLAG_CREATE
: 0),
1946 szPath
)) == S_OK
? TRUE
: FALSE
;
1949 /*************************************************************************
1950 * SHGetSpecialFolderPath (SHELL32.175)
1952 BOOL WINAPI
SHGetSpecialFolderPathAW (
1959 if (SHELL_OsIsUnicode())
1960 return SHGetSpecialFolderPathW (hwndOwner
, szPath
, nFolder
, bCreate
);
1961 return SHGetSpecialFolderPathA (hwndOwner
, szPath
, nFolder
, bCreate
);
1964 /*************************************************************************
1965 * SHGetFolderLocation [SHELL32.@]
1967 * Gets the folder locations from the registry and creates a pidl.
1971 * nFolder [I] CSIDL_xxxxx
1972 * hToken [I] token representing user, or NULL for current user, or -1 for
1974 * dwReserved [I] must be zero
1975 * ppidl [O] PIDL of a special folder
1979 * Failure: Standard OLE-defined error result, S_FALSE or E_INVALIDARG
1982 * Creates missing reg keys and directories.
1983 * Mostly forwards to SHGetFolderPathW, but a few values of nFolder return
1984 * virtual folders that are handled here.
1986 HRESULT WINAPI
SHGetFolderLocation(
1991 LPITEMIDLIST
*ppidl
)
1993 HRESULT hr
= E_INVALIDARG
;
1995 TRACE("%p 0x%08x %p 0x%08lx %p\n",
1996 hwndOwner
, nFolder
, hToken
, dwReserved
, ppidl
);
1999 return E_INVALIDARG
;
2001 return E_INVALIDARG
;
2003 /* The virtual folders' locations are not user-dependent */
2008 *ppidl
= _ILCreateDesktop();
2011 case CSIDL_INTERNET
:
2012 *ppidl
= _ILCreateIExplore();
2015 case CSIDL_CONTROLS
:
2016 *ppidl
= _ILCreateControlPanel();
2019 case CSIDL_PRINTERS
:
2020 *ppidl
= _ILCreatePrinters();
2024 FIXME("virtual font folder");
2027 case CSIDL_BITBUCKET
:
2028 *ppidl
= _ILCreateBitBucket();
2032 *ppidl
= _ILCreateMyComputer();
2036 *ppidl
= _ILCreateNetwork();
2041 WCHAR szPath
[MAX_PATH
];
2043 hr
= SHGetFolderPathW(hwndOwner
, nFolder
, hToken
,
2044 SHGFP_TYPE_CURRENT
, szPath
);
2049 TRACE("Value=%s\n", debugstr_w(szPath
));
2050 hr
= SHILCreateFromPathW(szPath
, ppidl
, &attributes
);
2052 else if (hr
== HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND
))
2054 /* unlike SHGetFolderPath, SHGetFolderLocation in shell32
2055 * version 6.0 returns E_FAIL for nonexistent paths
2064 TRACE("-- (new pidl %p)\n",*ppidl
);
2068 /*************************************************************************
2069 * SHGetSpecialFolderLocation [SHELL32.@]
2072 * In NT5, SHGetSpecialFolderLocation needs the <winntdir>/Recent
2075 HRESULT WINAPI
SHGetSpecialFolderLocation(
2078 LPITEMIDLIST
* ppidl
)
2080 HRESULT hr
= E_INVALIDARG
;
2082 TRACE("(%p,0x%x,%p)\n", hwndOwner
,nFolder
,ppidl
);
2085 return E_INVALIDARG
;
2087 hr
= SHGetFolderLocation(hwndOwner
, nFolder
, NULL
, 0, ppidl
);