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 HRESULT WINAPI
PathProcessCommandA (
709 FIXME("%s %p 0x%04lx 0x%04lx stub\n",
710 lpszPath
, lpszBuff
, dwBuffSize
, dwFlags
);
711 strcpy(lpszBuff
, lpszPath
);
715 /*************************************************************************
716 * PathProcessCommandW
718 HRESULT WINAPI
PathProcessCommandW (
724 FIXME("(%s, %p, 0x%04lx, 0x%04lx) stub\n",
725 debugstr_w(lpszPath
), lpszBuff
, dwBuffSize
, dwFlags
);
726 strcpyW(lpszBuff
, lpszPath
);
730 /*************************************************************************
731 * PathProcessCommand (SHELL32.653)
733 HRESULT WINAPI
PathProcessCommandAW (
739 if (SHELL_OsIsUnicode())
740 return PathProcessCommandW(lpszPath
, lpszBuff
, dwBuffSize
, dwFlags
);
741 return PathProcessCommandA(lpszPath
, lpszBuff
, dwBuffSize
, dwFlags
);
745 ########## special ##########
748 /*************************************************************************
749 * PathSetDlgItemPath (SHELL32.48)
751 VOID WINAPI
PathSetDlgItemPathAW(HWND hDlg
, int id
, LPCVOID pszPath
)
753 if (SHELL_OsIsUnicode())
754 PathSetDlgItemPathW(hDlg
, id
, pszPath
);
756 PathSetDlgItemPathA(hDlg
, id
, pszPath
);
759 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'};
760 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'};
761 static const WCHAR AppDataW
[] = {'A','p','p','D','a','t','a','\0'};
762 static const WCHAR CacheW
[] = {'C','a','c','h','e','\0'};
763 static const WCHAR CD_BurningW
[] = {'C','D',' ','B','u','r','n','i','n','g','\0'};
764 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'};
765 static const WCHAR Common_AppDataW
[] = {'C','o','m','m','o','n',' ','A','p','p','D','a','t','a','\0'};
766 static const WCHAR Common_DesktopW
[] = {'C','o','m','m','o','n',' ','D','e','s','k','t','o','p','\0'};
767 static const WCHAR Common_DocumentsW
[] = {'C','o','m','m','o','n',' ','D','o','c','u','m','e','n','t','s','\0'};
768 static const WCHAR CommonFilesDirW
[] = {'C','o','m','m','o','n','F','i','l','e','s','D','i','r','\0'};
769 static const WCHAR CommonMusicW
[] = {'C','o','m','m','o','n','M','u','s','i','c','\0'};
770 static const WCHAR CommonPicturesW
[] = {'C','o','m','m','o','n','P','i','c','t','u','r','e','s','\0'};
771 static const WCHAR Common_ProgramsW
[] = {'C','o','m','m','o','n',' ','P','r','o','g','r','a','m','s','\0'};
772 static const WCHAR Common_StartUpW
[] = {'C','o','m','m','o','n',' ','S','t','a','r','t','U','p','\0'};
773 static const WCHAR Common_Start_MenuW
[] = {'C','o','m','m','o','n',' ','S','t','a','r','t',' ','M','e','n','u','\0'};
774 static const WCHAR Common_TemplatesW
[] = {'C','o','m','m','o','n',' ','T','e','m','p','l','a','t','e','s','\0'};
775 static const WCHAR CommonVideoW
[] = {'C','o','m','m','o','n','V','i','d','e','o','\0'};
776 static const WCHAR CookiesW
[] = {'C','o','o','k','i','e','s','\0'};
777 static const WCHAR DesktopW
[] = {'D','e','s','k','t','o','p','\0'};
778 static const WCHAR FavoritesW
[] = {'F','a','v','o','r','i','t','e','s','\0'};
779 static const WCHAR FontsW
[] = {'F','o','n','t','s','\0'};
780 static const WCHAR HistoryW
[] = {'H','i','s','t','o','r','y','\0'};
781 static const WCHAR Local_AppDataW
[] = {'L','o','c','a','l',' ','A','p','p','D','a','t','a','\0'};
782 static const WCHAR My_MusicW
[] = {'M','y',' ','M','u','s','i','c','\0'};
783 static const WCHAR My_PicturesW
[] = {'M','y',' ','P','i','c','t','u','r','e','s','\0'};
784 static const WCHAR My_VideoW
[] = {'M','y',' ','V','i','d','e','o','\0'};
785 static const WCHAR NetHoodW
[] = {'N','e','t','H','o','o','d','\0'};
786 static const WCHAR PersonalW
[] = {'P','e','r','s','o','n','a','l','\0'};
787 static const WCHAR PrintHoodW
[] = {'P','r','i','n','t','H','o','o','d','\0'};
788 static const WCHAR ProgramFilesDirW
[] = {'P','r','o','g','r','a','m','F','i','l','e','s','D','i','r','\0'};
789 static const WCHAR ProgramsW
[] = {'P','r','o','g','r','a','m','s','\0'};
790 static const WCHAR RecentW
[] = {'R','e','c','e','n','t','\0'};
791 static const WCHAR ResourcesW
[] = {'R','e','s','o','u','r','c','e','s','\0'};
792 static const WCHAR SendToW
[] = {'S','e','n','d','T','o','\0'};
793 static const WCHAR StartUpW
[] = {'S','t','a','r','t','U','p','\0'};
794 static const WCHAR Start_MenuW
[] = {'S','t','a','r','t',' ','M','e','n','u','\0'};
795 static const WCHAR TemplatesW
[] = {'T','e','m','p','l','a','t','e','s','\0'};
796 static const WCHAR DefaultW
[] = {'.','D','e','f','a','u','l','t','\0'};
797 static const WCHAR AllUsersProfileW
[] = {'%','A','L','L','U','S','E','R','S','P','R','O','F','I','L','E','%','\0'};
798 static const WCHAR UserProfileW
[] = {'%','U','S','E','R','P','R','O','F','I','L','E','%','\0'};
799 static const WCHAR SystemDriveW
[] = {'%','S','y','s','t','e','m','D','r','i','v','e','%','\0'};
800 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};
801 static const WCHAR ProfilesDirectoryW
[] = {'P','r','o','f','i','l','e','s','D','i','r','e','c','t','o','r','y',0};
802 static const WCHAR AllUsersProfileValueW
[] = {'A','l','l','U','s','e','r','s','P','r','o','f','i','l','e','\0'};
803 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'};
804 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'};
805 /* This defaults to L"Documents and Settings" on Windows 2000/XP, but we're
806 * acting more Windows 9x-like for now.
808 static const WCHAR szDefaultProfileDirW
[] = {'p','r','o','f','i','l','e','s','\0'};
809 static const WCHAR AllUsersW
[] = {'A','l','l',' ','U','s','e','r','s','\0'};
811 typedef enum _CSIDL_Type
{
815 CSIDL_Type_Disallowed
,
816 CSIDL_Type_NonExistent
,
817 CSIDL_Type_WindowsPath
,
818 CSIDL_Type_SystemPath
,
825 LPCWSTR szDefaultPath
; /* fallback string or resource ID */
828 static const CSIDL_DATA CSIDL_Data
[] =
830 { /* 0x00 - CSIDL_DESKTOP */
833 MAKEINTRESOURCEW(IDS_DESKTOPDIRECTORY
)
835 { /* 0x01 - CSIDL_INTERNET */
836 CSIDL_Type_Disallowed
,
840 { /* 0x02 - CSIDL_PROGRAMS */
843 MAKEINTRESOURCEW(IDS_PROGRAMS
)
845 { /* 0x03 - CSIDL_CONTROLS (.CPL files) */
846 CSIDL_Type_SystemPath
,
850 { /* 0x04 - CSIDL_PRINTERS */
851 CSIDL_Type_SystemPath
,
855 { /* 0x05 - CSIDL_PERSONAL */
858 MAKEINTRESOURCEW(IDS_PERSONAL
)
860 { /* 0x06 - CSIDL_FAVORITES */
863 MAKEINTRESOURCEW(IDS_FAVORITES
)
865 { /* 0x07 - CSIDL_STARTUP */
868 MAKEINTRESOURCEW(IDS_STARTUP
)
870 { /* 0x08 - CSIDL_RECENT */
873 MAKEINTRESOURCEW(IDS_RECENT
)
875 { /* 0x09 - CSIDL_SENDTO */
878 MAKEINTRESOURCEW(IDS_SENDTO
)
880 { /* 0x0a - CSIDL_BITBUCKET - Recycle Bin */
881 CSIDL_Type_Disallowed
,
885 { /* 0x0b - CSIDL_STARTMENU */
888 MAKEINTRESOURCEW(IDS_STARTMENU
)
890 { /* 0x0c - CSIDL_MYDOCUMENTS */
891 CSIDL_Type_Disallowed
, /* matches WinXP--can't get its path */
895 { /* 0x0d - CSIDL_MYMUSIC */
898 MAKEINTRESOURCEW(IDS_MYMUSIC
)
900 { /* 0x0e - CSIDL_MYVIDEO */
903 MAKEINTRESOURCEW(IDS_MYVIDEO
)
905 { /* 0x0f - unassigned */
906 CSIDL_Type_Disallowed
,
910 { /* 0x10 - CSIDL_DESKTOPDIRECTORY */
913 MAKEINTRESOURCEW(IDS_DESKTOPDIRECTORY
)
915 { /* 0x11 - CSIDL_DRIVES */
916 CSIDL_Type_Disallowed
,
920 { /* 0x12 - CSIDL_NETWORK */
921 CSIDL_Type_Disallowed
,
925 { /* 0x13 - CSIDL_NETHOOD */
928 MAKEINTRESOURCEW(IDS_NETHOOD
)
930 { /* 0x14 - CSIDL_FONTS */
931 CSIDL_Type_WindowsPath
,
935 { /* 0x15 - CSIDL_TEMPLATES */
938 MAKEINTRESOURCEW(IDS_TEMPLATES
)
940 { /* 0x16 - CSIDL_COMMON_STARTMENU */
943 MAKEINTRESOURCEW(IDS_STARTMENU
)
945 { /* 0x17 - CSIDL_COMMON_PROGRAMS */
948 MAKEINTRESOURCEW(IDS_PROGRAMS
)
950 { /* 0x18 - CSIDL_COMMON_STARTUP */
953 MAKEINTRESOURCEW(IDS_STARTUP
)
955 { /* 0x19 - CSIDL_COMMON_DESKTOPDIRECTORY */
958 MAKEINTRESOURCEW(IDS_DESKTOP
)
960 { /* 0x1a - CSIDL_APPDATA */
963 MAKEINTRESOURCEW(IDS_APPDATA
)
965 { /* 0x1b - CSIDL_PRINTHOOD */
968 MAKEINTRESOURCEW(IDS_PRINTHOOD
)
970 { /* 0x1c - CSIDL_LOCAL_APPDATA */
973 MAKEINTRESOURCEW(IDS_LOCAL_APPDATA
)
975 { /* 0x1d - CSIDL_ALTSTARTUP */
976 CSIDL_Type_NonExistent
,
980 { /* 0x1e - CSIDL_COMMON_ALTSTARTUP */
981 CSIDL_Type_NonExistent
,
985 { /* 0x1f - CSIDL_COMMON_FAVORITES */
988 MAKEINTRESOURCEW(IDS_FAVORITES
)
990 { /* 0x20 - CSIDL_INTERNET_CACHE */
993 MAKEINTRESOURCEW(IDS_INTERNET_CACHE
)
995 { /* 0x21 - CSIDL_COOKIES */
998 MAKEINTRESOURCEW(IDS_COOKIES
)
1000 { /* 0x22 - CSIDL_HISTORY */
1003 MAKEINTRESOURCEW(IDS_HISTORY
)
1005 { /* 0x23 - CSIDL_COMMON_APPDATA */
1006 CSIDL_Type_AllUsers
,
1008 MAKEINTRESOURCEW(IDS_APPDATA
)
1010 { /* 0x24 - CSIDL_WINDOWS */
1011 CSIDL_Type_WindowsPath
,
1015 { /* 0x25 - CSIDL_SYSTEM */
1016 CSIDL_Type_SystemPath
,
1020 { /* 0x26 - CSIDL_PROGRAM_FILES */
1023 MAKEINTRESOURCEW(IDS_PROGRAM_FILES
)
1025 { /* 0x27 - CSIDL_MYPICTURES */
1028 MAKEINTRESOURCEW(IDS_MYPICTURES
)
1030 { /* 0x28 - CSIDL_PROFILE */
1035 { /* 0x29 - CSIDL_SYSTEMX86 */
1036 CSIDL_Type_NonExistent
,
1040 { /* 0x2a - CSIDL_PROGRAM_FILESX86 */
1041 CSIDL_Type_NonExistent
,
1045 { /* 0x2b - CSIDL_PROGRAM_FILES_COMMON */
1048 MAKEINTRESOURCEW(IDS_PROGRAM_FILES_COMMON
)
1050 { /* 0x2c - CSIDL_PROGRAM_FILES_COMMONX86 */
1051 CSIDL_Type_NonExistent
,
1055 { /* 0x2d - CSIDL_COMMON_TEMPLATES */
1056 CSIDL_Type_AllUsers
,
1058 MAKEINTRESOURCEW(IDS_TEMPLATES
)
1060 { /* 0x2e - CSIDL_COMMON_DOCUMENTS */
1061 CSIDL_Type_AllUsers
,
1063 MAKEINTRESOURCEW(IDS_COMMON_DOCUMENTS
)
1065 { /* 0x2f - CSIDL_COMMON_ADMINTOOLS */
1066 CSIDL_Type_AllUsers
,
1067 Common_Administrative_ToolsW
,
1068 MAKEINTRESOURCEW(IDS_ADMINTOOLS
)
1070 { /* 0x30 - CSIDL_ADMINTOOLS */
1072 Administrative_ToolsW
,
1073 MAKEINTRESOURCEW(IDS_ADMINTOOLS
)
1075 { /* 0x31 - CSIDL_CONNECTIONS */
1076 CSIDL_Type_Disallowed
,
1080 { /* 0x32 - unassigned */
1081 CSIDL_Type_Disallowed
,
1085 { /* 0x33 - unassigned */
1086 CSIDL_Type_Disallowed
,
1090 { /* 0x34 - unassigned */
1091 CSIDL_Type_Disallowed
,
1095 { /* 0x35 - CSIDL_COMMON_MUSIC */
1096 CSIDL_Type_AllUsers
,
1098 MAKEINTRESOURCEW(IDS_COMMON_MUSIC
)
1100 { /* 0x36 - CSIDL_COMMON_PICTURES */
1101 CSIDL_Type_AllUsers
,
1103 MAKEINTRESOURCEW(IDS_COMMON_PICTURES
)
1105 { /* 0x37 - CSIDL_COMMON_VIDEO */
1106 CSIDL_Type_AllUsers
,
1108 MAKEINTRESOURCEW(IDS_COMMON_VIDEO
)
1110 { /* 0x38 - CSIDL_RESOURCES */
1111 CSIDL_Type_WindowsPath
,
1115 { /* 0x39 - CSIDL_RESOURCES_LOCALIZED */
1116 CSIDL_Type_NonExistent
,
1120 { /* 0x3a - CSIDL_COMMON_OEM_LINKS */
1121 CSIDL_Type_NonExistent
,
1125 { /* 0x3b - CSIDL_CDBURN_AREA */
1128 MAKEINTRESOURCEW(IDS_CDBURN_AREA
)
1130 { /* 0x3c unassigned */
1131 CSIDL_Type_Disallowed
,
1135 { /* 0x3d - CSIDL_COMPUTERSNEARME */
1136 CSIDL_Type_Disallowed
, /* FIXME */
1140 { /* 0x3e - CSIDL_PROFILES */
1141 CSIDL_Type_Disallowed
, /* oddly, this matches WinXP */
1147 static HRESULT
_SHExpandEnvironmentStrings(LPCWSTR szSrc
, LPWSTR szDest
);
1149 /* Gets the value named value from the registry key
1150 * rootKey\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders
1151 * (or from rootKey\userPrefix\... if userPrefix is not NULL) into path, which
1152 * is assumed to be MAX_PATH WCHARs in length.
1153 * If it exists, expands the value and writes the expanded value to
1154 * rootKey\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders
1155 * Returns successful error code if the value was retrieved from the registry,
1156 * and a failure otherwise.
1158 static HRESULT
_SHGetUserShellFolderPath(HKEY rootKey
, LPCWSTR userPrefix
,
1159 LPCWSTR value
, LPWSTR path
)
1162 WCHAR shellFolderPath
[MAX_PATH
], userShellFolderPath
[MAX_PATH
];
1163 LPCWSTR pShellFolderPath
, pUserShellFolderPath
;
1164 DWORD dwDisp
, dwType
, dwPathLen
= MAX_PATH
;
1165 HKEY userShellFolderKey
, shellFolderKey
;
1167 TRACE("%p,%s,%s,%p\n",rootKey
, debugstr_w(userPrefix
), debugstr_w(value
),
1172 strcpyW(shellFolderPath
, userPrefix
);
1173 PathAddBackslashW(shellFolderPath
);
1174 strcatW(shellFolderPath
, szSHFolders
);
1175 pShellFolderPath
= shellFolderPath
;
1176 strcpyW(userShellFolderPath
, userPrefix
);
1177 PathAddBackslashW(userShellFolderPath
);
1178 strcatW(userShellFolderPath
, szSHUserFolders
);
1179 pUserShellFolderPath
= userShellFolderPath
;
1183 pUserShellFolderPath
= szSHUserFolders
;
1184 pShellFolderPath
= szSHFolders
;
1187 if (RegCreateKeyExW(rootKey
, pShellFolderPath
, 0, NULL
, 0, KEY_ALL_ACCESS
,
1188 NULL
, &shellFolderKey
, &dwDisp
))
1190 TRACE("Failed to create %s\n", debugstr_w(pShellFolderPath
));
1193 if (RegCreateKeyExW(rootKey
, pUserShellFolderPath
, 0, NULL
, 0,
1194 KEY_ALL_ACCESS
, NULL
, &userShellFolderKey
, &dwDisp
))
1196 TRACE("Failed to create %s\n",
1197 debugstr_w(pUserShellFolderPath
));
1198 RegCloseKey(shellFolderKey
);
1202 if (!RegQueryValueExW(userShellFolderKey
, value
, NULL
, &dwType
,
1203 (LPBYTE
)path
, &dwPathLen
) && (dwType
== REG_EXPAND_SZ
|| dwType
== REG_SZ
))
1207 path
[dwPathLen
/ sizeof(WCHAR
)] = '\0';
1208 if (dwType
== REG_EXPAND_SZ
&& path
[0] == '%')
1210 WCHAR szTemp
[MAX_PATH
];
1212 _SHExpandEnvironmentStrings(path
, szTemp
);
1213 lstrcpynW(path
, szTemp
, MAX_PATH
);
1215 ret
= RegSetValueExW(shellFolderKey
, value
, 0, REG_SZ
, (LPBYTE
)path
,
1216 (strlenW(path
) + 1) * sizeof(WCHAR
));
1217 if (ret
!= ERROR_SUCCESS
)
1218 hr
= HRESULT_FROM_WIN32(ret
);
1224 RegCloseKey(shellFolderKey
);
1225 RegCloseKey(userShellFolderKey
);
1226 TRACE("returning 0x%08lx\n", hr
);
1230 /* Gets a 'semi-expanded' default value of the CSIDL with index folder into
1231 * pszPath, based on the entries in CSIDL_Data. By semi-expanded, I mean:
1232 * - The entry's szDefaultPath may be either a string value or an integer
1233 * resource identifier. In the latter case, the string value of the resource
1235 * - Depending on the entry's type, the path may begin with an (unexpanded)
1236 * environment variable name. The caller is responsible for expanding
1237 * environment strings if so desired.
1238 * The types that are prepended with environment variables are:
1239 * CSIDL_Type_User: %USERPROFILE%
1240 * CSIDL_Type_AllUsers: %ALLUSERSPROFILE%
1241 * CSIDL_Type_CurrVer: %SystemDrive%
1242 * (Others might make sense too, but as yet are unneeded.)
1244 static HRESULT
_SHGetDefaultValue(BYTE folder
, LPWSTR pszPath
)
1247 WCHAR resourcePath
[MAX_PATH
];
1248 LPCWSTR pDefaultPath
= NULL
;
1250 TRACE("0x%02x,%p\n", folder
, pszPath
);
1252 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1253 return E_INVALIDARG
;
1255 return E_INVALIDARG
;
1257 /* Try special cases first */
1261 case CSIDL_PERSONAL
:
1263 case CSIDL_MYPICTURES
:
1266 const char *home
= getenv("HOME");
1268 /* special case for "My Documents", map to $HOME */
1271 WCHAR homeW
[MAX_PATH
];
1273 MultiByteToWideChar(CP_ACP
, 0, home
, -1, homeW
, MAX_PATH
);
1274 if (GetFullPathNameW(homeW
, MAX_PATH
, pszPath
, NULL
) != 0 &&
1275 PathIsDirectoryW(pszPath
))
1281 case CSIDL_DESKTOPDIRECTORY
:
1283 const char *home
= getenv("HOME");
1285 /* special case for Desktop, map to $HOME/Desktop if it exists */
1288 WCHAR desktopW
[MAX_PATH
];
1290 MultiByteToWideChar(CP_ACP
, 0, home
, -1, desktopW
, MAX_PATH
);
1291 PathAppendW(desktopW
, DesktopW
);
1292 if (GetFullPathNameW(desktopW
, MAX_PATH
, pszPath
, NULL
) != 0 &&
1293 PathIsDirectoryW(pszPath
))
1302 /* Either the folder was unhandled, or a suitable default wasn't found,
1303 * so use one of the resource-based defaults
1305 if (CSIDL_Data
[folder
].szDefaultPath
&&
1306 IS_INTRESOURCE(CSIDL_Data
[folder
].szDefaultPath
))
1308 if (LoadStringW(shell32_hInstance
,
1309 LOWORD(CSIDL_Data
[folder
].szDefaultPath
), resourcePath
, MAX_PATH
))
1312 pDefaultPath
= resourcePath
;
1316 FIXME("(%d,%s), LoadString failed, missing translation?\n", folder
,
1317 debugstr_w(pszPath
));
1324 pDefaultPath
= CSIDL_Data
[folder
].szDefaultPath
;
1328 switch (CSIDL_Data
[folder
].type
)
1330 case CSIDL_Type_User
:
1331 strcpyW(pszPath
, UserProfileW
);
1333 case CSIDL_Type_AllUsers
:
1334 strcpyW(pszPath
, AllUsersProfileW
);
1336 case CSIDL_Type_CurrVer
:
1337 strcpyW(pszPath
, SystemDriveW
);
1340 ; /* no corresponding env. var, do nothing */
1344 PathAddBackslashW(pszPath
);
1345 strcatW(pszPath
, pDefaultPath
);
1348 TRACE("returning 0x%08lx\n", hr
);
1352 /* Gets the (unexpanded) value of the folder with index folder into pszPath.
1353 * The folder's type is assumed to be CSIDL_Type_CurrVer. Its default value
1354 * can be overridden in the HKLM\\szCurrentVersion key.
1355 * If dwFlags has SHGFP_TYPE_DEFAULT set or if the value isn't overridden in
1356 * the registry, uses _SHGetDefaultValue to get the value.
1358 static HRESULT
_SHGetCurrentVersionPath(DWORD dwFlags
, BYTE folder
,
1363 TRACE("0x%08lx,0x%02x,%p\n", dwFlags
, folder
, pszPath
);
1365 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1366 return E_INVALIDARG
;
1367 if (CSIDL_Data
[folder
].type
!= CSIDL_Type_CurrVer
)
1368 return E_INVALIDARG
;
1370 return E_INVALIDARG
;
1372 if (dwFlags
& SHGFP_TYPE_DEFAULT
)
1373 hr
= _SHGetDefaultValue(folder
, pszPath
);
1379 if (RegCreateKeyExW(HKEY_LOCAL_MACHINE
, szCurrentVersion
, 0,
1380 NULL
, 0, KEY_ALL_ACCESS
, NULL
, &hKey
, &dwDisp
))
1384 DWORD dwType
, dwPathLen
= MAX_PATH
* sizeof(WCHAR
);
1386 if (RegQueryValueExW(hKey
, CSIDL_Data
[folder
].szValueName
, NULL
,
1387 &dwType
, (LPBYTE
)pszPath
, &dwPathLen
) ||
1388 (dwType
!= REG_SZ
&& dwType
!= REG_EXPAND_SZ
))
1390 hr
= _SHGetDefaultValue(folder
, pszPath
);
1391 dwType
= REG_EXPAND_SZ
;
1392 RegSetValueExW(hKey
, CSIDL_Data
[folder
].szValueName
, 0, dwType
,
1393 (LPBYTE
)pszPath
, (strlenW(pszPath
)+1)*sizeof(WCHAR
));
1397 pszPath
[dwPathLen
/ sizeof(WCHAR
)] = '\0';
1403 TRACE("returning 0x%08lx (output path is %s)\n", hr
, debugstr_w(pszPath
));
1407 /* Gets the user's path (unexpanded) for the CSIDL with index folder:
1408 * If SHGFP_TYPE_DEFAULT is set, calls _SHGetDefaultValue for it. Otherwise
1409 * calls _SHGetUserShellFolderPath for it. Where it looks depends on hToken:
1410 * - if hToken is -1, looks in HKEY_USERS\.Default
1411 * - otherwise looks first in HKEY_CURRENT_USER, followed by HKEY_LOCAL_MACHINE
1412 * if HKEY_CURRENT_USER doesn't contain any entries. If both fail, finally
1413 * calls _SHGetDefaultValue for it.
1415 static HRESULT
_SHGetUserProfilePath(HANDLE hToken
, DWORD dwFlags
, BYTE folder
,
1420 TRACE("%p,0x%08lx,0x%02x,%p\n", hToken
, dwFlags
, folder
, pszPath
);
1422 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1423 return E_INVALIDARG
;
1424 if (CSIDL_Data
[folder
].type
!= CSIDL_Type_User
)
1425 return E_INVALIDARG
;
1427 return E_INVALIDARG
;
1429 /* Only the current user and the default user are supported right now
1431 * FIXME: should be able to call GetTokenInformation on the token,
1432 * then call ConvertSidToStringSidW on it to get the user prefix.
1433 * But Wine's registry doesn't store user info by sid, it stores it
1434 * by user name (and I don't know how to convert from a token to a
1437 if (hToken
!= NULL
&& hToken
!= (HANDLE
)-1)
1439 FIXME("unsupported for user other than current or default\n");
1443 if (dwFlags
& SHGFP_TYPE_DEFAULT
)
1444 hr
= _SHGetDefaultValue(folder
, pszPath
);
1447 LPCWSTR userPrefix
= NULL
;
1450 if (hToken
== (HANDLE
)-1)
1452 hRootKey
= HKEY_USERS
;
1453 userPrefix
= DefaultW
;
1455 else /* hToken == NULL, other values disallowed above */
1456 hRootKey
= HKEY_CURRENT_USER
;
1457 hr
= _SHGetUserShellFolderPath(hRootKey
, userPrefix
,
1458 CSIDL_Data
[folder
].szValueName
, pszPath
);
1459 if (FAILED(hr
) && hRootKey
!= HKEY_LOCAL_MACHINE
)
1460 hr
= _SHGetUserShellFolderPath(HKEY_LOCAL_MACHINE
, NULL
,
1461 CSIDL_Data
[folder
].szValueName
, pszPath
);
1463 hr
= _SHGetDefaultValue(folder
, pszPath
);
1465 TRACE("returning 0x%08lx (output path is %s)\n", hr
, debugstr_w(pszPath
));
1469 /* Gets the (unexpanded) path for the CSIDL with index folder. If dwFlags has
1470 * SHGFP_TYPE_DEFAULT set, calls _SHGetDefaultValue. Otherwise calls
1471 * _SHGetUserShellFolderPath for it, looking only in HKEY_LOCAL_MACHINE.
1472 * If this fails, falls back to _SHGetDefaultValue.
1474 static HRESULT
_SHGetAllUsersProfilePath(DWORD dwFlags
, BYTE folder
,
1479 TRACE("0x%08lx,0x%02x,%p\n", dwFlags
, folder
, pszPath
);
1481 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1482 return E_INVALIDARG
;
1483 if (CSIDL_Data
[folder
].type
!= CSIDL_Type_AllUsers
)
1484 return E_INVALIDARG
;
1486 return E_INVALIDARG
;
1488 if (dwFlags
& SHGFP_TYPE_DEFAULT
)
1489 hr
= _SHGetDefaultValue(folder
, pszPath
);
1492 hr
= _SHGetUserShellFolderPath(HKEY_LOCAL_MACHINE
, NULL
,
1493 CSIDL_Data
[folder
].szValueName
, pszPath
);
1495 hr
= _SHGetDefaultValue(folder
, pszPath
);
1497 TRACE("returning 0x%08lx (output path is %s)\n", hr
, debugstr_w(pszPath
));
1501 /* From the original Wine source:
1503 * Attempts to expand environment variables from szSrc into szDest, which is
1504 * assumed to be MAX_PATH characters in length. Before referring to the
1505 * environment, handles a few variables directly, because the environment
1506 * variables may not be set when this is called (as during Wine's installation
1507 * when default values are being written to the registry).
1508 * The directly handled environment variables, and their source, are:
1509 * - ALLUSERSPROFILE, USERPROFILE: reads from the registry
1510 * - SystemDrive: uses GetSystemDirectoryW and uses the drive portion of its
1512 * If one of the directly handled environment variables is expanded, only
1513 * expands a single variable, and only in the beginning of szSrc.
1515 * That's fine for Wine, but it breaks in ReactOS where we have profile paths
1516 * like "c:\documents and settings\Administrator.REACTOS". Anyway, we have the
1517 * environment variables handy so we'll just use them instead of hacking around
1519 static HRESULT
_SHExpandEnvironmentStrings(LPCWSTR szSrc
, LPWSTR szDest
)
1522 WCHAR szTemp
[MAX_PATH
];
1524 TRACE("%s, %p\n", debugstr_w(szSrc
), szDest
);
1526 if (!szSrc
|| !szDest
) return E_INVALIDARG
;
1528 /* short-circuit if there's nothing to expand */
1529 if (szSrc
[0] != '%')
1531 strcpyW(szDest
, szSrc
);
1537 strcpyW(szTemp
, szSrc
);
1538 while (SUCCEEDED(hr
) && szTemp
[0] == '%')
1540 DWORD ret
= ExpandEnvironmentStringsW(szSrc
, szDest
, MAX_PATH
);
1543 hr
= HRESULT_FROM_WIN32(ERROR_INSUFFICIENT_BUFFER
);
1545 hr
= HRESULT_FROM_WIN32(GetLastError());
1548 if (SUCCEEDED(hr
) && szDest
[0] == '%')
1549 strcpyW(szTemp
, szDest
);
1552 /* terminate loop */
1557 TRACE("returning 0x%08lx (input was %s, output is %s)\n", hr
,
1558 debugstr_w(szSrc
), debugstr_w(szDest
));
1562 /*************************************************************************
1563 * SHGetFolderPathW [SHELL32.@]
1566 * Converts nFolder to path. Most values can be overridden in either
1567 * HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders
1568 * or in the same location in HKLM.
1569 * The registry usage is explained by the following tech note:
1570 * http://www.microsoft.com/windows2000/techinfo/reskit/en-us/default.asp?url=/windows2000/techinfo/reskit/en-us/regentry/36173.asp
1571 * The "Shell Folders" registry key was used in NT4 and earlier systems.
1572 * Beginning with Windows 2000, the "User Shell Folders" key is used, so
1573 * changes made to it are made to the former key too. This synchronization is
1574 * done on-demand: not until someone requests the value of one of these paths
1575 * (by calling one of the SHGet functions) is the value synchronized.
1576 * Furthermore, as explained here:
1577 * http://www.microsoft.com/windows2000/techinfo/reskit/en-us/default.asp?url=/windows2000/techinfo/reskit/en-us/regentry/36276.asp
1578 * the HKCU paths take precedence over the HKLM paths.
1580 **********************************************************************/
1581 HRESULT WINAPI
SHGetFolderPathW(
1589 WCHAR szBuildPath
[MAX_PATH
], szTemp
[MAX_PATH
];
1590 DWORD folder
= nFolder
& CSIDL_FOLDER_MASK
;
1594 TRACE("%p,%p,nFolder=0x%04x\n", hwndOwner
,pszPath
,nFolder
);
1596 /* Windows always NULL-terminates the resulting path regardless of success
1597 * or failure, so do so first
1601 if (folder
>= sizeof(CSIDL_Data
) / sizeof(CSIDL_Data
[0]))
1602 return E_INVALIDARG
;
1604 type
= CSIDL_Data
[folder
].type
;
1607 case CSIDL_Type_Disallowed
:
1610 case CSIDL_Type_NonExistent
:
1613 case CSIDL_Type_WindowsPath
:
1614 GetWindowsDirectoryW(szTemp
, MAX_PATH
);
1615 if (CSIDL_Data
[folder
].szDefaultPath
&&
1616 !IS_INTRESOURCE(CSIDL_Data
[folder
].szDefaultPath
) &&
1617 *CSIDL_Data
[folder
].szDefaultPath
)
1619 PathAddBackslashW(szTemp
);
1620 strcatW(szTemp
, CSIDL_Data
[folder
].szDefaultPath
);
1624 case CSIDL_Type_SystemPath
:
1625 GetSystemDirectoryW(szTemp
, MAX_PATH
);
1626 if (CSIDL_Data
[folder
].szDefaultPath
&&
1627 !IS_INTRESOURCE(CSIDL_Data
[folder
].szDefaultPath
) &&
1628 *CSIDL_Data
[folder
].szDefaultPath
)
1630 PathAddBackslashW(szTemp
);
1631 strcatW(szTemp
, CSIDL_Data
[folder
].szDefaultPath
);
1635 case CSIDL_Type_CurrVer
:
1636 hr
= _SHGetCurrentVersionPath(dwFlags
, folder
, szTemp
);
1638 case CSIDL_Type_User
:
1639 hr
= _SHGetUserProfilePath(hToken
, dwFlags
, folder
, szTemp
);
1641 case CSIDL_Type_AllUsers
:
1642 hr
= _SHGetAllUsersProfilePath(dwFlags
, folder
, szTemp
);
1645 FIXME("bogus type %d, please fix\n", type
);
1650 /* Expand environment strings if necessary */
1652 hr
= _SHExpandEnvironmentStrings(szTemp
, szBuildPath
);
1654 strcpyW(szBuildPath
, szTemp
);
1655 /* Copy the path if it's available before we might return */
1656 if (SUCCEEDED(hr
) && pszPath
)
1657 strcpyW(pszPath
, szBuildPath
);
1659 if (FAILED(hr
)) goto end
;
1661 /* if we don't care about existing directories we are ready */
1662 if(nFolder
& CSIDL_FLAG_DONT_VERIFY
) goto end
;
1664 if (PathFileExistsW(szBuildPath
)) goto end
;
1666 /* not existing but we are not allowed to create it. The return value
1667 * is verified against shell32 version 6.0.
1669 if (!(nFolder
& CSIDL_FLAG_CREATE
))
1671 hr
= HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND
);
1675 /* create directory/directories */
1676 ret
= SHCreateDirectoryExW(hwndOwner
, szBuildPath
, NULL
);
1677 if (ret
&& ret
!= ERROR_ALREADY_EXISTS
)
1679 ERR("Failed to create directory '%s'.\n", debugstr_w(szBuildPath
));
1684 TRACE("Created missing system directory '%s'\n", debugstr_w(szBuildPath
));
1686 TRACE("returning 0x%08lx (final path is %s)\n", hr
, debugstr_w(szBuildPath
));
1690 /*************************************************************************
1691 * SHGetFolderPathA [SHELL32.@]
1693 HRESULT WINAPI
SHGetFolderPathA(
1700 WCHAR szTemp
[MAX_PATH
];
1703 TRACE("%p,%p,nFolder=0x%04x\n",hwndOwner
,pszPath
,nFolder
);
1707 hr
= SHGetFolderPathW(hwndOwner
, nFolder
, hToken
, dwFlags
, szTemp
);
1708 if (SUCCEEDED(hr
) && pszPath
)
1709 WideCharToMultiByte(CP_ACP
, 0, szTemp
, -1, pszPath
, MAX_PATH
, NULL
,
1715 /* For each folder in folders, if its value has not been set in the registry,
1716 * calls _SHGetUserProfilePath or _SHGetAllUsersProfilePath (depending on the
1717 * folder's type) to get the unexpanded value first.
1718 * Writes the unexpanded value to User Shell Folders, and queries it with
1719 * SHGetFolderPathW to force the creation of the directory if it doesn't
1720 * already exist. SHGetFolderPathW also returns the expanded value, which
1721 * this then writes to Shell Folders.
1723 static HRESULT
_SHRegisterFolders(HKEY hRootKey
, HANDLE hToken
,
1724 LPCWSTR szUserShellFolderPath
, LPCWSTR szShellFolderPath
, const UINT folders
[],
1728 WCHAR path
[MAX_PATH
];
1730 HKEY hUserKey
= NULL
, hKey
= NULL
;
1731 DWORD dwDisp
, dwType
, dwPathLen
;
1734 TRACE("%p,%p,%s,%p,%u\n", hRootKey
, hToken
,
1735 debugstr_w(szUserShellFolderPath
), folders
, foldersLen
);
1737 ret
= RegCreateKeyExW(hRootKey
, szUserShellFolderPath
, 0, NULL
, 0,
1738 KEY_ALL_ACCESS
, NULL
, &hUserKey
, &dwDisp
);
1740 hr
= HRESULT_FROM_WIN32(ret
);
1743 ret
= RegCreateKeyExW(hRootKey
, szShellFolderPath
, 0, NULL
, 0,
1744 KEY_ALL_ACCESS
, NULL
, &hKey
, &dwDisp
);
1746 hr
= HRESULT_FROM_WIN32(ret
);
1748 for (i
= 0; SUCCEEDED(hr
) && i
< foldersLen
; i
++)
1750 dwPathLen
= MAX_PATH
* sizeof(WCHAR
);
1751 if (RegQueryValueExW(hUserKey
, CSIDL_Data
[folders
[i
]].szValueName
, NULL
,
1752 &dwType
, (LPBYTE
)path
, &dwPathLen
) || (dwType
!= REG_SZ
&&
1753 dwType
!= REG_EXPAND_SZ
))
1756 if (CSIDL_Data
[folders
[i
]].type
== CSIDL_Type_User
)
1757 _SHGetUserProfilePath(hToken
, SHGFP_TYPE_DEFAULT
, folders
[i
],
1759 else if (CSIDL_Data
[folders
[i
]].type
== CSIDL_Type_AllUsers
)
1760 _SHGetAllUsersProfilePath(SHGFP_TYPE_DEFAULT
, folders
[i
], path
);
1765 ret
= RegSetValueExW(hUserKey
,
1766 CSIDL_Data
[folders
[i
]].szValueName
, 0, REG_EXPAND_SZ
,
1767 (LPBYTE
)path
, (strlenW(path
) + 1) * sizeof(WCHAR
));
1769 hr
= HRESULT_FROM_WIN32(ret
);
1772 hr
= SHGetFolderPathW(NULL
, folders
[i
] | CSIDL_FLAG_CREATE
,
1773 hToken
, SHGFP_TYPE_DEFAULT
, path
);
1774 ret
= RegSetValueExW(hKey
,
1775 CSIDL_Data
[folders
[i
]].szValueName
, 0, REG_SZ
,
1776 (LPBYTE
)path
, (strlenW(path
) + 1) * sizeof(WCHAR
));
1778 hr
= HRESULT_FROM_WIN32(ret
);
1784 RegCloseKey(hUserKey
);
1788 TRACE("returning 0x%08lx\n", hr
);
1792 static HRESULT
_SHRegisterUserShellFolders(BOOL bDefault
)
1794 static const UINT folders
[] = {
1803 CSIDL_DESKTOPDIRECTORY
,
1810 WCHAR userShellFolderPath
[MAX_PATH
], shellFolderPath
[MAX_PATH
];
1811 LPCWSTR pUserShellFolderPath
, pShellFolderPath
;
1816 TRACE("%s\n", bDefault
? "TRUE" : "FALSE");
1819 hToken
= (HANDLE
)-1;
1820 hRootKey
= HKEY_USERS
;
1821 strcpyW(userShellFolderPath
, DefaultW
);
1822 PathAddBackslashW(userShellFolderPath
);
1823 strcatW(userShellFolderPath
, szSHUserFolders
);
1824 pUserShellFolderPath
= userShellFolderPath
;
1825 strcpyW(shellFolderPath
, DefaultW
);
1826 PathAddBackslashW(shellFolderPath
);
1827 strcatW(shellFolderPath
, szSHFolders
);
1828 pShellFolderPath
= shellFolderPath
;
1833 hRootKey
= HKEY_CURRENT_USER
;
1834 pUserShellFolderPath
= szSHUserFolders
;
1835 pShellFolderPath
= szSHFolders
;
1838 hr
= _SHRegisterFolders(hRootKey
, hToken
, pUserShellFolderPath
,
1839 pShellFolderPath
, folders
, sizeof(folders
) / sizeof(folders
[0]));
1840 TRACE("returning 0x%08lx\n", hr
);
1844 static HRESULT
_SHRegisterCommonShellFolders(void)
1846 static const UINT folders
[] = {
1847 CSIDL_COMMON_STARTMENU
,
1848 CSIDL_COMMON_PROGRAMS
,
1849 CSIDL_COMMON_STARTUP
,
1850 CSIDL_COMMON_DESKTOPDIRECTORY
,
1851 CSIDL_COMMON_FAVORITES
,
1852 CSIDL_COMMON_APPDATA
,
1853 CSIDL_COMMON_TEMPLATES
,
1854 CSIDL_COMMON_DOCUMENTS
,
1859 hr
= _SHRegisterFolders(HKEY_LOCAL_MACHINE
, NULL
, szSHUserFolders
,
1860 szSHFolders
, folders
, sizeof(folders
) / sizeof(folders
[0]));
1861 TRACE("returning 0x%08lx\n", hr
);
1865 /* Register the default values in the registry, as some apps seem to depend
1866 * on their presence. The set registered was taken from Windows XP.
1868 HRESULT
SHELL_RegisterShellFolders(void)
1870 HRESULT hr
= _SHRegisterUserShellFolders(TRUE
);
1873 hr
= _SHRegisterUserShellFolders(FALSE
);
1875 hr
= _SHRegisterCommonShellFolders();
1879 /*************************************************************************
1880 * SHGetSpecialFolderPathA [SHELL32.@]
1882 BOOL WINAPI
SHGetSpecialFolderPathA (
1888 return (SHGetFolderPathA(
1890 nFolder
+ (bCreate
? CSIDL_FLAG_CREATE
: 0),
1893 szPath
)) == S_OK
? TRUE
: FALSE
;
1896 /*************************************************************************
1897 * SHGetSpecialFolderPathW
1899 BOOL WINAPI
SHGetSpecialFolderPathW (
1905 return (SHGetFolderPathW(
1907 nFolder
+ (bCreate
? CSIDL_FLAG_CREATE
: 0),
1910 szPath
)) == S_OK
? TRUE
: FALSE
;
1913 /*************************************************************************
1914 * SHGetSpecialFolderPath (SHELL32.175)
1916 BOOL WINAPI
SHGetSpecialFolderPathAW (
1923 if (SHELL_OsIsUnicode())
1924 return SHGetSpecialFolderPathW (hwndOwner
, szPath
, nFolder
, bCreate
);
1925 return SHGetSpecialFolderPathA (hwndOwner
, szPath
, nFolder
, bCreate
);
1928 /*************************************************************************
1929 * SHGetFolderLocation [SHELL32.@]
1932 * Gets the folder locations from the registry and creates a pidl.
1933 * Creates missing reg keys and directories.
1934 * Mostly forwards to SHGetFolderPathW, but a few values of nFolder return
1935 * virtual folders that are handled here.
1939 * nFolder [I] CSIDL_xxxxx
1940 * hToken [I] token representing user, or NULL for current user, or -1 for
1942 * dwReserved [I] must be zero
1943 * ppidl [O] PIDL of a special folder
1947 HRESULT WINAPI
SHGetFolderLocation(
1952 LPITEMIDLIST
*ppidl
)
1954 HRESULT hr
= E_INVALIDARG
;
1956 TRACE("%p 0x%08x %p 0x%08lx %p\n",
1957 hwndOwner
, nFolder
, hToken
, dwReserved
, ppidl
);
1960 return E_INVALIDARG
;
1962 return E_INVALIDARG
;
1964 /* The virtual folders' locations are not user-dependent */
1969 *ppidl
= _ILCreateDesktop();
1972 case CSIDL_INTERNET
:
1973 *ppidl
= _ILCreateIExplore();
1976 case CSIDL_CONTROLS
:
1977 *ppidl
= _ILCreateControlPanel();
1980 case CSIDL_PRINTERS
:
1981 *ppidl
= _ILCreatePrinters();
1985 FIXME("virtual font folder");
1988 case CSIDL_BITBUCKET
:
1989 *ppidl
= _ILCreateBitBucket();
1993 *ppidl
= _ILCreateMyComputer();
1997 *ppidl
= _ILCreateNetwork();
2002 WCHAR szPath
[MAX_PATH
];
2004 hr
= SHGetFolderPathW(hwndOwner
, nFolder
, hToken
,
2005 SHGFP_TYPE_CURRENT
, szPath
);
2010 TRACE("Value=%s\n", debugstr_w(szPath
));
2011 hr
= SHILCreateFromPathW(szPath
, ppidl
, &attributes
);
2013 else if (hr
== HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND
))
2015 /* unlike SHGetFolderPath, SHGetFolderLocation in shell32
2016 * version 6.0 returns E_FAIL for nonexistent paths
2025 TRACE("-- (new pidl %p)\n",*ppidl
);
2029 /*************************************************************************
2030 * SHGetSpecialFolderLocation [SHELL32.@]
2033 * In NT5, SHGetSpecialFolderLocation needs the <winntdir>/Recent
2036 HRESULT WINAPI
SHGetSpecialFolderLocation(
2039 LPITEMIDLIST
* ppidl
)
2041 HRESULT hr
= E_INVALIDARG
;
2043 TRACE("(%p,0x%x,%p)\n", hwndOwner
,nFolder
,ppidl
);
2046 return E_INVALIDARG
;
2048 hr
= SHGetFolderLocation(hwndOwner
, nFolder
, NULL
, 0, ppidl
);