/* * DOS directories functions * * Copyright 1995 Alexandre Julliard * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #include "config.h" #include #include #include #include #include #include #include #ifdef HAVE_UNISTD_H # include #endif #include #ifdef HAVE_SYS_ERRNO_H #include #endif #include "ntstatus.h" #include "windef.h" #include "winbase.h" #include "wine/winbase16.h" #include "wingdi.h" #include "wine/winuser16.h" #include "winerror.h" #include "winreg.h" #include "winternl.h" #include "thread.h" #include "wine/unicode.h" #include "wine/debug.h" WINE_DEFAULT_DEBUG_CHANNEL(dosfs); WINE_DECLARE_DEBUG_CHANNEL(file); #define MAX_PATHNAME_LEN 1024 static WCHAR *DIR_Windows; static WCHAR *DIR_System; /*********************************************************************** * DIR_GetPath * * Get a path name from the wine.ini file and make sure it is valid. */ static WCHAR *DIR_GetPath( HKEY hkey, LPCWSTR keyname, LPCWSTR defval, BOOL warn ) { UNICODE_STRING nameW; DWORD dummy; WCHAR tmp[MAX_PATHNAME_LEN]; const WCHAR *path; const char *mess; WCHAR *ret; DWORD attr; RtlInitUnicodeString( &nameW, keyname ); if (hkey && !NtQueryValueKey( hkey, &nameW, KeyValuePartialInformation, tmp, sizeof(tmp), &dummy )) path = (WCHAR *)((KEY_VALUE_PARTIAL_INFORMATION *)tmp)->Data; else path = defval; attr = GetFileAttributesW( path ); if (attr == INVALID_FILE_ATTRIBUTES) mess = "does not exist"; else if (!(attr & FILE_ATTRIBUTE_DIRECTORY)) mess = "not a directory"; else { DWORD len = GetFullPathNameW( path, 0, NULL, NULL ); ret = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) ); if (ret) GetFullPathNameW( path, len, ret, NULL ); return ret; } if (warn) { MESSAGE("Invalid path %s for %s directory: %s.\n", debugstr_w(path), debugstr_w(keyname), mess); MESSAGE("Perhaps you have not properly edited your Wine configuration file (%s/config)\n", wine_get_config_dir()); } return NULL; } /*********************************************************************** * DIR_Init */ int DIR_Init(void) { OBJECT_ATTRIBUTES attr; UNICODE_STRING nameW; HKEY hkey; char path[MAX_PATHNAME_LEN]; WCHAR longpath[MAX_PATHNAME_LEN]; WCHAR *tmp_dir, *profile_dir; static const WCHAR wineW[] = {'M','a','c','h','i','n','e','\\', 'S','o','f','t','w','a','r','e','\\', 'W','i','n','e','\\','W','i','n','e','\\', 'C','o','n','f','i','g','\\','W','i','n','e',0}; static const WCHAR windowsW[] = {'w','i','n','d','o','w','s',0}; static const WCHAR systemW[] = {'s','y','s','t','e','m',0}; static const WCHAR tempW[] = {'t','e','m','p',0}; static const WCHAR profileW[] = {'p','r','o','f','i','l','e',0}; static const WCHAR windows_dirW[] = {'c',':','\\','w','i','n','d','o','w','s',0}; static const WCHAR system_dirW[] = {'c',':','\\','w','i','n','d','o','w','s','\\','s','y','s','t','e','m',0}; static const WCHAR temp_dirW[] = {'c',':','\\','w','i','n','d','o','w','s','\\','t','e','m','p',0}; static const WCHAR pathW[] = {'p','a','t','h',0}; static const WCHAR path_dirW[] = {'c',':','\\','w','i','n','d','o','w','s',';', 'c',':','\\','w','i','n','d','o','w','s','\\','s','y','s','t','e','m',0}; static const WCHAR path_capsW[] = {'P','A','T','H',0}; static const WCHAR temp_capsW[] = {'T','E','M','P',0}; static const WCHAR tmp_capsW[] = {'T','M','P',0}; static const WCHAR windirW[] = {'w','i','n','d','i','r',0}; static const WCHAR winsysdirW[] = {'w','i','n','s','y','s','d','i','r',0}; static const WCHAR userprofileW[] = {'U','S','E','R','P','R','O','F','I','L','E',0}; static const WCHAR systemrootW[] = {'S','Y','S','T','E','M','R','O','O','T',0}; static const WCHAR wcmdW[] = {'\\','w','c','m','d','.','e','x','e',0}; static const WCHAR comspecW[] = {'C','O','M','S','P','E','C',0}; static const WCHAR empty_strW[] = { 0 }; attr.Length = sizeof(attr); attr.RootDirectory = 0; attr.ObjectName = &nameW; attr.Attributes = 0; attr.SecurityDescriptor = NULL; attr.SecurityQualityOfService = NULL; RtlInitUnicodeString( &nameW, wineW ); if (NtCreateKey( &hkey, KEY_ALL_ACCESS, &attr, 0, NULL, 0, NULL )) hkey = 0; if (!(DIR_Windows = DIR_GetPath( hkey, windowsW, windows_dirW, TRUE )) || !(DIR_System = DIR_GetPath( hkey, systemW, system_dirW, TRUE )) || !(tmp_dir = DIR_GetPath( hkey, tempW, temp_dirW, TRUE ))) { if (hkey) NtClose( hkey ); return 0; } if (!getcwd( path, MAX_PATHNAME_LEN )) { MESSAGE("Warning: could not get current Unix working directory, " "starting in the Windows directory.\n" ); SetCurrentDirectoryW( DIR_Windows ); } else { MultiByteToWideChar( CP_UNIXCP, 0, path, -1, longpath, MAX_PATHNAME_LEN); GetFullPathNameW( longpath, MAX_PATHNAME_LEN, longpath, NULL ); if (!SetCurrentDirectoryW( longpath )) { MESSAGE("Warning: could not find DOS drive for current working directory '%s', " "starting in the Windows directory.\n", path ); SetCurrentDirectoryW( DIR_Windows ); } else if (!NtCurrentTeb()->Peb->ProcessParameters->CurrentDirectory.Handle) chdir("/"); /* change to root directory so as not to lock cdroms */ } /* Set the environment variables */ /* set COMSPEC only if it doesn't exist already */ if (!GetEnvironmentVariableW( comspecW, NULL, 0 )) { strcpyW( longpath, DIR_System ); strcatW( longpath, wcmdW ); SetEnvironmentVariableW( comspecW, longpath ); } /* set PATH only if not set already */ if (!GetEnvironmentVariableW( path_capsW, NULL, 0 )) { WCHAR tmp[MAX_PATHNAME_LEN]; DWORD dummy; const WCHAR *path = path_dirW; RtlInitUnicodeString( &nameW, pathW ); if (hkey && !NtQueryValueKey( hkey, &nameW, KeyValuePartialInformation, tmp, sizeof(tmp), &dummy )) { path = (WCHAR *)((KEY_VALUE_PARTIAL_INFORMATION *)tmp)->Data; } if (strchrW(path, '/')) { MESSAGE("Fix your wine config (%s/config) to use DOS drive syntax in [wine] 'Path=' statement! (no '/' allowed)\n", wine_get_config_dir() ); ExitProcess(1); } SetEnvironmentVariableW( path_capsW, path ); TRACE("Path = %s\n", debugstr_w(path) ); } if (!GetEnvironmentVariableW( temp_capsW, NULL, 0 )) SetEnvironmentVariableW( temp_capsW, tmp_dir ); if (!GetEnvironmentVariableW( tmp_capsW, NULL, 0 )) SetEnvironmentVariableW( tmp_capsW, tmp_dir ); SetEnvironmentVariableW( windirW, DIR_Windows ); SetEnvironmentVariableW( systemrootW, DIR_Windows ); SetEnvironmentVariableW( winsysdirW, DIR_System ); TRACE("WindowsDir = %s\n", debugstr_w(DIR_Windows) ); TRACE("SystemDir = %s\n", debugstr_w(DIR_System) ); TRACE("TempDir = %s\n", debugstr_w(tmp_dir) ); TRACE("SYSTEMROOT = %s\n", debugstr_w(DIR_Windows) ); HeapFree( GetProcessHeap(), 0, tmp_dir ); if ((profile_dir = DIR_GetPath( hkey, profileW, empty_strW, FALSE ))) { TRACE("USERPROFILE= %s\n", debugstr_w(profile_dir) ); SetEnvironmentVariableW( userprofileW, profile_dir ); HeapFree( GetProcessHeap(), 0, profile_dir ); } if (hkey) NtClose( hkey ); return 1; } /*********************************************************************** * GetWindowsDirectoryW (KERNEL32.@) * * See comment for GetWindowsDirectoryA. */ UINT WINAPI GetWindowsDirectoryW( LPWSTR path, UINT count ) { UINT len = strlenW( DIR_Windows ) + 1; if (path && count >= len) { strcpyW( path, DIR_Windows ); len--; } return len; } /*********************************************************************** * GetWindowsDirectoryA (KERNEL32.@) * * Return value: * If buffer is large enough to hold full path and terminating '\0' character * function copies path to buffer and returns length of the path without '\0'. * Otherwise function returns required size including '\0' character and * does not touch the buffer. */ UINT WINAPI GetWindowsDirectoryA( LPSTR path, UINT count ) { UINT len = WideCharToMultiByte( CP_ACP, 0, DIR_Windows, -1, NULL, 0, NULL, NULL ); if (path && count >= len) { WideCharToMultiByte( CP_ACP, 0, DIR_Windows, -1, path, count, NULL, NULL ); len--; } return len; } /*********************************************************************** * GetSystemWindowsDirectoryA (KERNEL32.@) W2K, TS4.0SP4 */ UINT WINAPI GetSystemWindowsDirectoryA( LPSTR path, UINT count ) { return GetWindowsDirectoryA( path, count ); } /*********************************************************************** * GetSystemWindowsDirectoryW (KERNEL32.@) W2K, TS4.0SP4 */ UINT WINAPI GetSystemWindowsDirectoryW( LPWSTR path, UINT count ) { return GetWindowsDirectoryW( path, count ); } /*********************************************************************** * GetSystemDirectoryW (KERNEL32.@) * * See comment for GetWindowsDirectoryA. */ UINT WINAPI GetSystemDirectoryW( LPWSTR path, UINT count ) { UINT len = strlenW( DIR_System ) + 1; if (path && count >= len) { strcpyW( path, DIR_System ); len--; } return len; } /*********************************************************************** * GetSystemDirectoryA (KERNEL32.@) * * See comment for GetWindowsDirectoryA. */ UINT WINAPI GetSystemDirectoryA( LPSTR path, UINT count ) { UINT len = WideCharToMultiByte( CP_ACP, 0, DIR_System, -1, NULL, 0, NULL, NULL ); if (path && count >= len) { WideCharToMultiByte( CP_ACP, 0, DIR_System, -1, path, count, NULL, NULL ); len--; } return len; }