/*

Legal Notice: Some portions of the source code contained in this file were

governed by the TrueCrypt License 3.0, also from the source code of

Encryption for the Masses 2.02a, which is Copyright (c) 1998-2000 Paul Le Roux

and all other portions of this file are Copyright (c) 2013-2016 IDRIX

and are governed by the Apache License 2.0 the full text of which is

contained in the file License.txt included in VeraCrypt binary and source

{

LSTATUS status = 0;

DWORD dwIndex = 0, dwMaxNameLen = 0, dwNameLen = 0, numberSubKeys = 0;

if ( (ERROR_SUCCESS == status) && (ERROR_SUCCESS == RegQueryInfoKey(hKey, NULL, NULL, NULL, &numberSubKeys, &dwMaxNameLen, NULL, NULL, NULL, NULL, NULL, NULL))

&& (numberSubKeys >= 1)

HKEY hSubKey;

DWORD dwIndex = 0, dwMaxNameLen = 0, dwNameLen = 0, numberSubKeys = 0;

LSTATUS status = RegOpenKeyExW(hKey, SubKeyName, 0, WRITE_DAC | KEY_READ /*| ACCESS_SYSTEM_SECURITY*/, &hSubKey);

{

status = RegSetKeySecurity (hSubKey, DACL_SECURITY_INFORMATION, pSD);

if (status == ERROR_SUCCESS)

std::string sNewSD;

RegResult = RegOpenKeyExW(Key, SubKeyName, 0, WRITE_OWNER | KEY_READ, &SvcKey);

{

{

{

{

pTokenUser = (PTOKEN_USER) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, dwLength);

{

if (GetTokenInformation(Token, TokenUser, pTokenUser, dwLength, &dwLength))

{

RecursiveSetOwner(SvcKey, &SecDesc);

}

}

}

}

}

RegCloseKey(SvcKey);

}

{

PSID pSid = pTokenUser->User.Sid;

DWORD dwAclSize = sizeof(ACL) + sizeof(ACCESS_ALLOWED_ACE) + ::GetLengthSid(pSid) - sizeof(DWORD);

}

for (std::list<std::wstring>::iterator ItSubKey = subKeysList.begin(); ItSubKey != subKeysList.end(); ItSubKey++)

// if the string to search for is empty, delete the sub key, otherwise, look for matching value and delete them

if (subStringLength == 0)

{

foundEntries.push_back(szNameValue);

}

}

// we are sure to use the correct sizes

// delete the entries

if (!foundEntries.empty())

{

It != foundEntries.end(); It++)

{

RegDeleteValueW (hSubKey, It->c_str());

}

/* Set the given privilege of the current process */

{

TOKEN_PRIVILEGES tp;

LUID luid;

BOOL bStatus = FALSE;

if ( OpenProcessToken(GetCurrentProcess(),

TOKEN_ADJUST_PRIVILEGES | TOKEN_QUERY,

&hProcessToken) )

{

NULL,

szPrivilegeName,

&luid ) )

// Enable the privilege

bStatus = AdjustTokenPrivileges(

(PDWORD) NULL);

}

wchar_t szRegPath[MAX_PATH];

GetRestorePointRegKeyName (szRegPath, sizeof (szRegPath));

if (RegOpenKeyEx (HKEY_LOCAL_MACHINE, szRegPath, 0, KEY_READ | KEY_WOW64_64KEY, &hKey) == ERROR_SUCCESS)

if (IsOSAtLeast (WIN_VISTA))

{

if ( (ERROR_SUCCESS == RegQueryValueEx (hKey, L"RPSessionInterval", NULL, NULL, (LPBYTE) &dwValue, &cbValue))

}

}

RegCloseKey (hKey);

}

SendMessageW (GetDlgItem (hwndDlg, IDC_LOG_WINDOW), LB_ADDSTRING, 0, (LPARAM) GetString (stringId));

SendDlgItemMessage (hwndDlg, IDC_LOG_WINDOW, LB_GETCOUNT, 0, 0) - 1, 0);

}

StringCbPrintfW (szTmp, sizeof(szTmp), L"%s %s", GetString (stringId), param);

SendMessageW (GetDlgItem (hwndDlg, IDC_LOG_WINDOW), LB_ADDSTRING, 0, (LPARAM) szTmp);

SendDlgItemMessage (hwndDlg, IDC_LOG_WINDOW, LB_GETCOUNT, 0, 0) - 1, 0);

}

// Find the correct decompressed file in memory

for (fileNo = 0; fileNo < NBR_COMPRESSED_FILES; fileNo++)

{

// (there will be no temporary files).

if (wmemcmp (

min (wcslen (curFileName), (size_t) Decompressed_Files[fileNo].fileNameLength)) == 0)

{

// Dump filter driver cannot be installed to SysWOW64 directory

bResult = SaveBufferToFile (

(char *) Decompressed_Files[fileNo].fileContent,

szTmp,

FALSE,

TRUE);

bResult = CopyFile (szTmp, servicePath.c_str(), FALSE);

}

&& !FileExists (favoritesFile.c_str()))

{

// copy the favorites XML file to the native system directory

{

WIN32_FIND_DATA f;

HANDLE h;

SetCurrentDirectory (SetupFilesDir);

h = FindFirstFile (L"Language.*.xml", &f);

StringCbCopyW (szTmp, sizeof(szTmp), L"VeraCryptVolume");

if (RegSetValueEx (hkey, L"", 0, REG_SZ, (BYTE *) szTmp, (wcslen (szTmp) + 1) * sizeof (wchar_t)) != ERROR_SUCCESS)

goto error;

RegCloseKey (hkey);

hkey = 0;

0, NULL, REG_OPTION_NON_VOLATILE, KEY_WRITE | KEY_WOW64_32KEY, NULL, &hkey, &dw) != ERROR_SUCCESS)

goto error;

StringCbPrintfW (szTmp, sizeof(szTmp), L"\"%sVeraCrypt Setup.exe\" /u", szDir);

if (RegSetValueEx (hkey, L"UninstallString", 0, REG_SZ, (BYTE *) szTmp, (wcslen (szTmp) + 1) * sizeof (wchar_t)) != ERROR_SUCCESS)

goto error;

StringCbCopyW (szTmp, sizeof(szTmp), _T(VERSION_STRING));

if (RegSetValueEx (hkey, L"DisplayVersion", 0, REG_SZ, (BYTE *) szTmp, (wcslen (szTmp) + 1) * sizeof (wchar_t)) != ERROR_SUCCESS)

goto error;

StringCbCopyW (szTmp, sizeof(szTmp), L"VeraCrypt");

if (RegSetValueEx (hkey, L"DisplayName", 0, REG_SZ, (BYTE *) szTmp, (wcslen (szTmp) + 1) * sizeof (wchar_t)) != ERROR_SUCCESS)

goto error;

handleWin32Error (hwndDlg, SRC_POS);

Error ("REG_INSTALL_FAILED", hwndDlg);

}

// Register COM servers for UAC

if (IsOSAtLeast (WIN_VISTA))

{

StringCbPrintfW (path2, sizeof(path2), L"%s%s", path, TC_APPD_FILENAME_HISTORY);

RemoveMessage (hwndDlg, path2);

StatDeleteFile (path2, FALSE);

// Delete configuration file

StringCbPrintfW (path2, sizeof(path2), L"%s%s", path, TC_APPD_FILENAME_CONFIGURATION);

RemoveMessage (hwndDlg, path2);

RegDeleteKey (HKEY_LOCAL_MACHINE, L"Software\\Classes\\VeraCryptVolume\\Shell");

RegDeleteKey (HKEY_LOCAL_MACHINE, L"Software\\Classes\\VeraCryptVolume\\DefaultIcon");

RegDeleteKey (HKEY_LOCAL_MACHINE, L"Software\\Classes\\VeraCryptVolume");

if (!bRemoveDeprecated)

{

HKEY hKey;

SearchAndDeleteRegistrySubString (HKEY_USERS, L"Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\FileExts\\.hc", NULL, TRUE, NULL);

SearchAndDeleteRegistrySubString (HKEY_USERS, L"Software\\Microsoft\\Windows NT\\CurrentVersion\\AppCompatFlags\\Compatibility Assistant\\Persisted", L"VeraCrypt", TRUE, NULL);

SearchAndDeleteRegistrySubString (HKEY_USERS, L"Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\StartPage\\NewShortcuts", L"VeraCrypt", TRUE, NULL);

if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, L"SYSTEM", 0, KEY_ALL_ACCESS | WRITE_DAC | WRITE_OWNER, &hKey) == ERROR_SUCCESS)

{

SearchAndDeleteRegistrySubString (hKey, L"Enum\\Root\\LEGACY_VERACRYPT", NULL, TRUE, L"ControlSet");

SHChangeNotify (SHCNE_ASSOCCHANGED, SHCNF_IDLIST, NULL, NULL);

}

if (hAdvapiDll)

FreeLibrary (hAdvapiDll);

EnumWindows (CloseTCWindowsEnum, (LPARAM) &TCWindowClosed);

Sleep (2000);

}

}

else

{

// guaranteed that the user is installing VeraCrypt for the first time now (we also cannot know if the user has already

// installed and used VeraCrypt on another system before).

bPossiblyFirstTimeInstall = TRUE;

RemoveMessage (hwndDlg, szTmp2);

if (StatDeleteFile (szTmp2, FALSE) == FALSE)

goto error;

StringCbPrintfW (szTmp2, sizeof(szTmp2), L"%s%s", szLinkDir, L"\\VeraCrypt User's Guide.lnk");

StatDeleteFile (szTmp2, FALSE);

static STATEMGRSTATUS SMgrStatus;

static BOOL failed = FALSE;

static BOOL (__stdcall *_SRSetRestorePoint)(PRESTOREPOINTINFO, PSTATEMGRSTATUS);

if (!SystemRestoreDll) return;

_SRSetRestorePoint = (BOOL (__stdcall *)(PRESTOREPOINTINFO, PSTATEMGRSTATUS))GetProcAddress (SystemRestoreDll,"SRSetRestorePointW");

RestPtInfo.llSequenceNumber = 0;

StringCbCopyW (RestPtInfo.szDescription, sizeof(RestPtInfo.szDescription), bUninstall ? L"VeraCrypt uninstallation" : L"VeraCrypt installation");

{

StatusMessage (hwndDlg, "FAILED_SYS_RESTORE");

failed = TRUE;

RestPtInfo.dwEventType = END_SYSTEM_CHANGE;

RestPtInfo.llSequenceNumber = SMgrStatus.llSequenceNumber;

{

StatusMessage (hwndDlg, "FAILED_SYS_RESTORE");

}

}

UpdateProgressBarProc(12);

if (bSystemRestore)

SetSystemRestorePoint (hwndDlg, FALSE);

UpdateProgressBarProc(48);

if (bDisableSwapFiles

&& IsPagingFileActive (FALSE))

{

// Remove deprecated

DoServiceUninstall (hwndDlg, L"VeraCryptService");

UpdateProgressBarProc(55);

if (!SystemEncryptionUpdate)

{

/* VeraCrypt is not installed or it wasn't possible to determine where it is installed. */

SHGetSpecialFolderLocation (hwndDlg, CSIDL_PROGRAM_FILES, &itemList);

SHGetPathFromIDList (itemList, path);

{

if (!VerifyPackageIntegrity())

{

exit (1);

}

bDevm = FALSE;

{

/* Create the main dialog for install */

(LPARAM)lpszCommandLine);

}

else