mirror of
https://github.com/reactos/reactos.git
synced 2024-08-26 21:28:48 +00:00
161 lines
4.9 KiB
C
161 lines
4.9 KiB
C
#define WIN32_NO_STATUS
|
|
#define WIN32_LEAN_AND_MEAN
|
|
#include <windows.h>
|
|
#include <shellapi.h>
|
|
#include <shlobj.h>
|
|
#include <setupapi.h>
|
|
|
|
#define NT_PARAMS L"NT3.51 Intel Params"
|
|
#define MSSETUP_PATH L"~MSSETUP.T\\"
|
|
|
|
static UINT WINAPI ExtCabCallback(PVOID Context, UINT Notification, UINT_PTR Param1, UINT_PTR Param2)
|
|
{
|
|
FILE_IN_CABINET_INFO_W *pInfo;
|
|
FILEPATHS_W *pFilePaths;
|
|
|
|
DBG_UNREFERENCED_LOCAL_VARIABLE(pFilePaths);
|
|
|
|
switch(Notification)
|
|
{
|
|
case SPFILENOTIFY_FILEINCABINET:
|
|
pInfo = (FILE_IN_CABINET_INFO_W*)Param1;
|
|
wcscpy(pInfo->FullTargetName, (LPCWSTR)Context);
|
|
wcscat(pInfo->FullTargetName, pInfo->NameInCabinet);
|
|
return FILEOP_DOIT;
|
|
case SPFILENOTIFY_FILEEXTRACTED:
|
|
pFilePaths = (FILEPATHS_W*)Param1;
|
|
return NO_ERROR;
|
|
}
|
|
return NO_ERROR;
|
|
}
|
|
|
|
BOOL DeleteDirectory(LPWSTR lpszDir)
|
|
{
|
|
SHFILEOPSTRUCT fileop;
|
|
DWORD len = wcslen(lpszDir);
|
|
WCHAR *pszFrom = HeapAlloc(GetProcessHeap(), 0, (len + 2) * sizeof(WCHAR));
|
|
int ret;
|
|
|
|
wcscpy(pszFrom, lpszDir);
|
|
pszFrom[len] = 0;
|
|
pszFrom[len+1] = 0;
|
|
|
|
fileop.hwnd = NULL;
|
|
fileop.wFunc = FO_DELETE;
|
|
fileop.pFrom = pszFrom;
|
|
fileop.pTo = NULL;
|
|
fileop.fFlags = FOF_NOCONFIRMATION|FOF_SILENT;
|
|
fileop.fAnyOperationsAborted = FALSE;
|
|
fileop.lpszProgressTitle = NULL;
|
|
fileop.hNameMappings = NULL;
|
|
|
|
ret = SHFileOperation(&fileop);
|
|
HeapFree(GetProcessHeap(), 0, pszFrom);
|
|
return (ret == 0);
|
|
}
|
|
|
|
VOID GetSystemDrive(LPWSTR lpszDrive)
|
|
{
|
|
WCHAR szWindir[MAX_PATH];
|
|
GetWindowsDirectoryW(szWindir, MAX_PATH);
|
|
_wsplitpath(szWindir, lpszDrive, NULL, NULL, NULL);
|
|
wcscat(lpszDrive, L"\\");
|
|
}
|
|
|
|
int APIENTRY wWinMain(HINSTANCE hInstance,
|
|
HINSTANCE hPrevInstance,
|
|
LPWSTR lpCmdLine,
|
|
int nCmdShow)
|
|
{
|
|
WCHAR szSetupPath[MAX_PATH];
|
|
WCHAR szFileName[MAX_PATH];
|
|
WCHAR szCabFileName[MAX_PATH];
|
|
WCHAR szCabFilePath[MAX_PATH];
|
|
WCHAR szTempDirName[50];
|
|
WCHAR szCmdLine[MAX_PATH];
|
|
WCHAR szTempCmdLine[MAX_PATH];
|
|
WCHAR szTempPath[MAX_PATH];
|
|
WCHAR szFullTempPath[MAX_PATH];
|
|
WCHAR szDrive[4];
|
|
DWORD dwAttrib;
|
|
PROCESS_INFORMATION processInfo;
|
|
STARTUPINFO startupInfo;
|
|
UNREFERENCED_PARAMETER(hPrevInstance);
|
|
UNREFERENCED_PARAMETER(nCmdShow);
|
|
|
|
GetCurrentDirectory(MAX_PATH, szSetupPath);
|
|
wcscat(szSetupPath, L"\\");
|
|
wcscpy(szFileName, szSetupPath);
|
|
wcscat(szFileName, L"setup.lst");
|
|
|
|
if (GetFileAttributes(szFileName) == INVALID_FILE_ATTRIBUTES)
|
|
{
|
|
MessageBoxW(0, L"Cannot find Setup.lst file", L"Error", MB_OK | MB_ICONERROR);
|
|
return 1;
|
|
}
|
|
|
|
/* read information from setup.lst */
|
|
GetPrivateProfileStringW(NT_PARAMS, L"CabinetFile", NULL, szCabFileName, MAX_PATH, szFileName);
|
|
GetPrivateProfileStringW(NT_PARAMS, L"TmpDirName", NULL, szTempDirName, 50, szFileName);
|
|
GetPrivateProfileStringW(NT_PARAMS, L"CmdLine", NULL, szCmdLine, MAX_PATH, szFileName);
|
|
|
|
wcscpy(szCabFilePath, szSetupPath);
|
|
wcscat(szCabFilePath, szCabFileName);
|
|
|
|
/* ceate temp directory */
|
|
GetSystemDrive(szDrive);
|
|
wcscpy(szTempPath, szDrive);
|
|
wcscat(szTempPath, MSSETUP_PATH);
|
|
wcscpy(szFullTempPath, szTempPath);
|
|
wcscat(szFullTempPath, szTempDirName);
|
|
wcscat(szFullTempPath, L"\\");
|
|
|
|
if (SHCreateDirectoryEx(0, szFullTempPath, NULL) != ERROR_SUCCESS)
|
|
{
|
|
MessageBoxW(0, L"Could not create Temp Directory.", L"Error", MB_OK | MB_ICONERROR);
|
|
return 1;
|
|
}
|
|
|
|
dwAttrib = GetFileAttributes(szTempPath);
|
|
SetFileAttributes(szTempPath, dwAttrib | FILE_ATTRIBUTE_HIDDEN);
|
|
|
|
/* extract files */
|
|
if (!SetupIterateCabinetW(szCabFilePath, 0, ExtCabCallback, szFullTempPath))
|
|
{
|
|
MessageBoxW(0, L"Could not extract cab file", L"Error", MB_OK | MB_ICONERROR);
|
|
DeleteDirectory(szTempPath);
|
|
return 1;
|
|
}
|
|
|
|
/* prepare command line */
|
|
wsprintf(szTempCmdLine, szCmdLine, szFullTempPath, lpCmdLine);
|
|
wcscpy(szCmdLine, szFullTempPath);
|
|
wcscat(szCmdLine, szTempCmdLine);
|
|
|
|
/* execute the 32-Bit installer */
|
|
ZeroMemory(&processInfo, sizeof(processInfo));
|
|
ZeroMemory(&startupInfo, sizeof(startupInfo));
|
|
startupInfo.cb = sizeof(startupInfo);
|
|
if (CreateProcessW(NULL, szCmdLine, NULL, NULL, FALSE, NORMAL_PRIORITY_CLASS, NULL, szFullTempPath, &startupInfo, &processInfo))
|
|
{
|
|
WaitForSingleObject(processInfo.hProcess, INFINITE);
|
|
CloseHandle(processInfo.hProcess);
|
|
CloseHandle(processInfo.hThread);
|
|
}
|
|
else
|
|
{
|
|
WCHAR szMsg[MAX_PATH];
|
|
wsprintf(szMsg, L"Failed to load the installer. Error %lu", GetLastError());
|
|
MessageBoxW(0, szMsg, L"Error", MB_OK | MB_ICONERROR);
|
|
DeleteDirectory(szTempPath);
|
|
return 1;
|
|
}
|
|
|
|
/* cleanup */
|
|
DeleteDirectory(szTempPath);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* EOF */
|