[RAPPS]
[reactos.git] / reactos / dll / win32 / syssetup / install.c
1 /*
2 * ReactOS kernel
3 * Copyright (C) 2003 ReactOS Team
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License along
16 * with this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18 */
19 /*
20 * COPYRIGHT: See COPYING in the top level directory
21 * PROJECT: ReactOS system libraries
22 * PURPOSE: System setup
23 * FILE: dll/win32/syssetup/install.c
24 * PROGRAMER: Eric Kohl
25 */
26
27 /* INCLUDES *****************************************************************/
28
29 #include "precomp.h"
30
31 #include <rpcproxy.h>
32
33 #define NDEBUG
34 #include <debug.h>
35
36 DWORD WINAPI
37 CMP_WaitNoPendingInstallEvents(DWORD dwTimeout);
38
39 /* GLOBALS ******************************************************************/
40
41 HINF hSysSetupInf = INVALID_HANDLE_VALUE;
42
43 /* FUNCTIONS ****************************************************************/
44
45 static VOID
46 FatalError(char *pszFmt,...)
47 {
48 char szBuffer[512];
49 va_list ap;
50
51 va_start(ap, pszFmt);
52 vsprintf(szBuffer, pszFmt, ap);
53 va_end(ap);
54
55 LogItem(SYSSETUP_SEVERITY_FATAL_ERROR, L"Failed");
56
57 strcat(szBuffer, "\nRebooting now!");
58 MessageBoxA(NULL,
59 szBuffer,
60 "ReactOS Setup",
61 MB_OK);
62 }
63
64 static HRESULT
65 CreateShellLink(
66 LPCTSTR pszLinkPath,
67 LPCTSTR pszCmd,
68 LPCTSTR pszArg,
69 LPCTSTR pszDir,
70 LPCTSTR pszIconPath,
71 int iIconNr,
72 LPCTSTR pszComment)
73 {
74 IShellLink *psl;
75 IPersistFile *ppf;
76 #ifndef _UNICODE
77 WCHAR wszBuf[MAX_PATH];
78 #endif /* _UNICODE */
79
80 HRESULT hr = CoCreateInstance(&CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER, &IID_IShellLink, (LPVOID*)&psl);
81
82 if (SUCCEEDED(hr))
83 {
84 hr = psl->lpVtbl->SetPath(psl, pszCmd);
85
86 if (pszArg)
87 {
88 hr = psl->lpVtbl->SetArguments(psl, pszArg);
89 }
90
91 if (pszDir)
92 {
93 hr = psl->lpVtbl->SetWorkingDirectory(psl, pszDir);
94 }
95
96 if (pszIconPath)
97 {
98 hr = psl->lpVtbl->SetIconLocation(psl, pszIconPath, iIconNr);
99 }
100
101 if (pszComment)
102 {
103 hr = psl->lpVtbl->SetDescription(psl, pszComment);
104 }
105
106 hr = psl->lpVtbl->QueryInterface(psl, &IID_IPersistFile, (LPVOID*)&ppf);
107
108 if (SUCCEEDED(hr))
109 {
110 #ifdef _UNICODE
111 hr = ppf->lpVtbl->Save(ppf, pszLinkPath, TRUE);
112 #else /* _UNICODE */
113 MultiByteToWideChar(CP_ACP, 0, pszLinkPath, -1, wszBuf, MAX_PATH);
114
115 hr = ppf->lpVtbl->Save(ppf, wszBuf, TRUE);
116 #endif /* _UNICODE */
117
118 ppf->lpVtbl->Release(ppf);
119 }
120
121 psl->lpVtbl->Release(psl);
122 }
123
124 return hr;
125 }
126
127
128 static BOOL
129 CreateShortcut(
130 LPCTSTR pszFolder,
131 LPCTSTR pszName,
132 LPCTSTR pszCommand,
133 LPCTSTR pszDescription,
134 INT iIconNr)
135 {
136 TCHAR szPath[MAX_PATH];
137 TCHAR szExeName[MAX_PATH];
138 LPTSTR Ptr;
139 TCHAR szWorkingDirBuf[MAX_PATH];
140 LPTSTR pszWorkingDir = NULL;
141 LPTSTR lpFilePart;
142 DWORD dwLen;
143
144 if (ExpandEnvironmentStrings(pszCommand,
145 szPath,
146 sizeof(szPath) / sizeof(szPath[0])) == 0)
147 {
148 _tcscpy(szPath, pszCommand);
149 }
150
151 if ((_taccess(szPath, 0 )) == -1)
152 /* Expected error, don't return FALSE */
153 return TRUE;
154
155 dwLen = GetFullPathName(szPath,
156 sizeof(szWorkingDirBuf) / sizeof(szWorkingDirBuf[0]),
157 szWorkingDirBuf,
158 &lpFilePart);
159 if (dwLen != 0 && dwLen <= sizeof(szWorkingDirBuf) / sizeof(szWorkingDirBuf[0]))
160 {
161 /* Since those should only be called with (.exe) files,
162 lpFilePart has not to be NULL */
163 ASSERT(lpFilePart != NULL);
164
165 /* Save the file name */
166 _tcscpy(szExeName, lpFilePart);
167
168 /* We're only interested in the path. Cut the file name off.
169 Also remove the trailing backslash unless the working directory
170 is only going to be a drive, ie. C:\ */
171 *(lpFilePart--) = _T('\0');
172 if (!(lpFilePart - szWorkingDirBuf == 2 && szWorkingDirBuf[1] == _T(':') &&
173 szWorkingDirBuf[2] == _T('\\')))
174 {
175 *lpFilePart = _T('\0');
176 }
177
178 pszWorkingDir = szWorkingDirBuf;
179 }
180
181 _tcscpy(szPath, pszFolder);
182
183 Ptr = PathAddBackslash(szPath);
184
185 _tcscpy(Ptr, pszName);
186
187 // FIXME: we should pass 'command' straight in here, but shell32 doesn't expand it
188 return SUCCEEDED(CreateShellLink(szPath, szExeName, _T(""), pszWorkingDir, szExeName, iIconNr, pszDescription));
189 }
190
191
192 static BOOL CreateShortcutsFromSection(HINF hinf, LPWSTR pszSection, LPCWSTR pszFolder)
193 {
194 INFCONTEXT Context;
195 WCHAR szCommand[MAX_PATH];
196 WCHAR szName[MAX_PATH];
197 WCHAR szDescription[MAX_PATH];
198 INT iIconNr;
199
200 if (!SetupFindFirstLine(hinf, pszSection, NULL, &Context))
201 return FALSE;
202
203 do
204 {
205 if (SetupGetFieldCount(&Context) < 4)
206 continue;
207
208 if (!SetupGetStringFieldW(&Context, 1, szCommand, MAX_PATH, NULL))
209 continue;
210
211 if (!SetupGetStringFieldW(&Context, 2, szName, MAX_PATH, NULL))
212 continue;
213
214 if (!SetupGetStringFieldW(&Context, 3, szDescription, MAX_PATH, NULL))
215 continue;
216
217 if (!SetupGetIntField(&Context, 4, &iIconNr))
218 continue;
219
220 _tcscat(szName, L".lnk");
221
222 CreateShortcut(pszFolder, szName, szCommand, szDescription, iIconNr);
223
224 }while (SetupFindNextLine(&Context, &Context));
225
226 return TRUE;
227 }
228
229 static BOOL CreateShortcuts(HINF hinf, LPCWSTR szSection)
230 {
231 INFCONTEXT Context;
232 WCHAR szPath[MAX_PATH];
233 WCHAR szFolder[MAX_PATH];
234 WCHAR szFolderSection[MAX_PATH];
235 INT csidl;
236 LPWSTR p;
237
238 CoInitialize(NULL);
239
240 if (!SetupFindFirstLine(hinf, szSection, NULL, &Context))
241 return FALSE;
242
243 do
244 {
245 if (SetupGetFieldCount(&Context) < 2)
246 continue;
247
248 if (!SetupGetStringFieldW(&Context, 0, szFolderSection, MAX_PATH, NULL))
249 continue;
250
251 if (!SetupGetIntField(&Context, 1, &csidl))
252 continue;
253
254 if (!SetupGetStringFieldW(&Context, 2, szFolder, MAX_PATH, NULL))
255 continue;
256
257 if (!SHGetSpecialFolderPathW(0, szPath, csidl, TRUE))
258 continue;
259
260 p = PathAddBackslash(szPath);
261 _tcscpy(p, szFolder);
262
263 if (!CreateDirectory(szPath, NULL))
264 {
265 if (GetLastError() != ERROR_ALREADY_EXISTS)
266 {
267 continue;
268 }
269 }
270
271 CreateShortcutsFromSection(hinf, szFolderSection, szPath);
272
273 }while (SetupFindNextLine(&Context, &Context));
274
275 CoUninitialize();
276
277 return TRUE;
278 }
279
280 static VOID
281 CreateTempDir(
282 IN LPCWSTR VarName)
283 {
284 WCHAR szTempDir[MAX_PATH];
285 WCHAR szBuffer[MAX_PATH];
286 DWORD dwLength;
287 HKEY hKey;
288
289 if (RegOpenKeyExW(HKEY_LOCAL_MACHINE,
290 L"SYSTEM\\CurrentControlSet\\Control\\Session Manager\\Environment",
291 0,
292 KEY_QUERY_VALUE,
293 &hKey) != ERROR_SUCCESS)
294 {
295 FatalError("Error: %lu\n", GetLastError());
296 return;
297 }
298
299 /* Get temp dir */
300 dwLength = MAX_PATH * sizeof(WCHAR);
301 if (RegQueryValueExW(hKey,
302 VarName,
303 NULL,
304 NULL,
305 (LPBYTE)szBuffer,
306 &dwLength) != ERROR_SUCCESS)
307 {
308 FatalError("Error: %lu\n", GetLastError());
309 goto cleanup;
310 }
311
312 /* Expand it */
313 if (!ExpandEnvironmentStringsW(szBuffer,
314 szTempDir,
315 MAX_PATH))
316 {
317 FatalError("Error: %lu\n", GetLastError());
318 goto cleanup;
319 }
320
321 /* Create profiles directory */
322 if (!CreateDirectoryW(szTempDir, NULL))
323 {
324 if (GetLastError() != ERROR_ALREADY_EXISTS)
325 {
326 FatalError("Error: %lu\n", GetLastError());
327 goto cleanup;
328 }
329 }
330
331 cleanup:
332 RegCloseKey(hKey);
333 }
334
335 static BOOL
336 InstallSysSetupInfDevices(VOID)
337 {
338 INFCONTEXT InfContext;
339 WCHAR szLineBuffer[256];
340 DWORD dwLineLength;
341
342 if (!SetupFindFirstLineW(hSysSetupInf,
343 L"DeviceInfsToInstall",
344 NULL,
345 &InfContext))
346 {
347 return FALSE;
348 }
349
350 do
351 {
352 if (!SetupGetStringFieldW(&InfContext,
353 0,
354 szLineBuffer,
355 sizeof(szLineBuffer)/sizeof(szLineBuffer[0]),
356 &dwLineLength))
357 {
358 return FALSE;
359 }
360
361 if (!SetupDiInstallClassW(NULL, szLineBuffer, DI_QUIETINSTALL, NULL))
362 {
363 return FALSE;
364 }
365 }
366 while (SetupFindNextLine(&InfContext, &InfContext));
367
368 return TRUE;
369 }
370
371 static BOOL
372 InstallSysSetupInfComponents(VOID)
373 {
374 INFCONTEXT InfContext;
375 WCHAR szNameBuffer[256];
376 WCHAR szSectionBuffer[256];
377 HINF hComponentInf = INVALID_HANDLE_VALUE;
378
379 if (!SetupFindFirstLineW(hSysSetupInf,
380 L"Infs.Always",
381 NULL,
382 &InfContext))
383 {
384 DPRINT("No Inf.Always section found\n");
385 }
386 else
387 {
388 do
389 {
390 if (!SetupGetStringFieldW(&InfContext,
391 1, // Get the component name
392 szNameBuffer,
393 sizeof(szNameBuffer)/sizeof(szNameBuffer[0]),
394 NULL))
395 {
396 FatalError("Error while trying to get component name \n");
397 return FALSE;
398 }
399
400 if (!SetupGetStringFieldW(&InfContext,
401 2, // Get the component install section
402 szSectionBuffer,
403 sizeof(szSectionBuffer)/sizeof(szSectionBuffer[0]),
404 NULL))
405 {
406 FatalError("Error while trying to get component install section \n");
407 return FALSE;
408 }
409
410 DPRINT("Trying to execute install section '%S' from '%S' \n", szSectionBuffer, szNameBuffer);
411
412 hComponentInf = SetupOpenInfFileW(szNameBuffer,
413 NULL,
414 INF_STYLE_WIN4,
415 NULL);
416
417 if (hComponentInf == INVALID_HANDLE_VALUE)
418 {
419 FatalError("SetupOpenInfFileW() failed to open '%S' (Error: %lu)\n", szNameBuffer, GetLastError());
420 return FALSE;
421 }
422
423 if (!SetupInstallFromInfSectionW(NULL,
424 hComponentInf,
425 szSectionBuffer,
426 SPINST_ALL,
427 NULL,
428 NULL,
429 SP_COPY_NEWER,
430 SetupDefaultQueueCallbackW,
431 NULL,
432 NULL,
433 NULL))
434 {
435 FatalError("Error while trying to install : %S (Error: %lu)\n", szNameBuffer, GetLastError());
436 SetupCloseInfFile(hComponentInf);
437 return FALSE;
438 }
439
440 SetupCloseInfFile(hComponentInf);
441 }
442 while (SetupFindNextLine(&InfContext, &InfContext));
443 }
444
445 return TRUE;
446 }
447
448
449
450
451 BOOL
452 RegisterTypeLibraries (HINF hinf, LPCWSTR szSection)
453 {
454 INFCONTEXT InfContext;
455 BOOL res;
456 WCHAR szName[MAX_PATH];
457 WCHAR szPath[MAX_PATH];
458 INT csidl;
459 LPWSTR p;
460 HMODULE hmod;
461 HRESULT hret;
462
463 /* Begin iterating the entries in the inf section */
464 res = SetupFindFirstLine(hinf, szSection, NULL, &InfContext);
465 if (!res) return FALSE;
466
467 do
468 {
469 /* Get the name of the current type library */
470 if (!SetupGetStringFieldW(&InfContext, 1, szName, MAX_PATH, NULL))
471 {
472 FatalError("SetupGetStringFieldW failed\n");
473 continue;
474 }
475
476 if (!SetupGetIntField(&InfContext, 2, &csidl))
477 csidl = CSIDL_SYSTEM;
478
479 hret = SHGetFolderPathW(NULL, csidl, NULL, 0, szPath);
480 if (FAILED(hret))
481 {
482 FatalError("SHGetSpecialFolderPathW failed hret=0x%d\n", hret);
483 continue;
484 }
485
486 p = PathAddBackslash(szPath);
487 _tcscpy(p, szName);
488
489 hmod = LoadLibraryW(szName);
490 if (hmod == NULL)
491 {
492 FatalError("LoadLibraryW failed\n");
493 continue;
494 }
495
496 __wine_register_resources(hmod);
497
498 }while (SetupFindNextLine(&InfContext, &InfContext));
499
500 return TRUE;
501 }
502
503 static BOOL
504 EnableUserModePnpManager(VOID)
505 {
506 SC_HANDLE hSCManager = NULL;
507 SC_HANDLE hService = NULL;
508 BOOL bRet = FALSE;
509
510 hSCManager = OpenSCManagerW(NULL, NULL, SC_MANAGER_ENUMERATE_SERVICE);
511 if (hSCManager == NULL)
512 {
513 DPRINT1("Unable to open the service control manager.\n");
514 DPRINT1("Last Error %d\n", GetLastError());
515 goto cleanup;
516 }
517
518 hService = OpenServiceW(hSCManager,
519 L"PlugPlay",
520 SERVICE_CHANGE_CONFIG | SERVICE_START);
521 if (hService == NULL)
522 {
523 DPRINT1("Unable to open PlugPlay service\n");
524 goto cleanup;
525 }
526
527 bRet = ChangeServiceConfigW(hService,
528 SERVICE_NO_CHANGE,
529 SERVICE_AUTO_START,
530 SERVICE_NO_CHANGE,
531 NULL, NULL, NULL,
532 NULL, NULL, NULL, NULL);
533 if (!bRet)
534 {
535 DPRINT1("Unable to change the service configuration\n");
536 goto cleanup;
537 }
538
539 bRet = StartServiceW(hService, 0, NULL);
540 if (!bRet && (GetLastError() != ERROR_SERVICE_ALREADY_RUNNING))
541 {
542 DPRINT1("Unable to start service\n");
543 goto cleanup;
544 }
545
546 bRet = TRUE;
547
548 cleanup:
549 if (hService != NULL)
550 CloseServiceHandle(hService);
551 if (hSCManager != NULL)
552 CloseServiceHandle(hSCManager);
553 return bRet;
554 }
555
556 static INT_PTR CALLBACK
557 StatusMessageWindowProc(
558 IN HWND hwndDlg,
559 IN UINT uMsg,
560 IN WPARAM wParam,
561 IN LPARAM lParam)
562 {
563 UNREFERENCED_PARAMETER(wParam);
564
565 switch (uMsg)
566 {
567 case WM_INITDIALOG:
568 {
569 WCHAR szMsg[256];
570
571 if (!LoadStringW(hDllInstance, IDS_STATUS_INSTALL_DEV, szMsg, sizeof(szMsg)/sizeof(szMsg[0])))
572 return FALSE;
573 SetDlgItemTextW(hwndDlg, IDC_STATUSLABEL, szMsg);
574 return TRUE;
575 }
576 }
577 return FALSE;
578 }
579
580 static DWORD WINAPI
581 ShowStatusMessageThread(
582 IN LPVOID lpParameter)
583 {
584 HWND *phWnd = (HWND *)lpParameter;
585 HWND hWnd;
586 MSG Msg;
587
588 hWnd = CreateDialogParam(
589 hDllInstance,
590 MAKEINTRESOURCE(IDD_STATUSWINDOW_DLG),
591 GetDesktopWindow(),
592 StatusMessageWindowProc,
593 (LPARAM)NULL);
594 if (!hWnd)
595 return 0;
596 *phWnd = hWnd;
597
598 ShowWindow(hWnd, SW_SHOW);
599
600 /* Message loop for the Status window */
601 while (GetMessage(&Msg, NULL, 0, 0))
602 {
603 TranslateMessage(&Msg);
604 DispatchMessage(&Msg);
605 }
606
607 return 0;
608 }
609
610 static LONG
611 ReadRegSzKey(
612 IN HKEY hKey,
613 IN LPCWSTR pszKey,
614 OUT LPWSTR* pValue)
615 {
616 LONG rc;
617 DWORD dwType;
618 DWORD cbData = 0;
619 LPWSTR pwszValue;
620
621 if (!pValue)
622 return ERROR_INVALID_PARAMETER;
623
624 *pValue = NULL;
625 rc = RegQueryValueExW(hKey, pszKey, NULL, &dwType, NULL, &cbData);
626 if (rc != ERROR_SUCCESS)
627 return rc;
628 if (dwType != REG_SZ)
629 return ERROR_FILE_NOT_FOUND;
630 pwszValue = HeapAlloc(GetProcessHeap(), 0, cbData + sizeof(WCHAR));
631 if (!pwszValue)
632 return ERROR_NOT_ENOUGH_MEMORY;
633 rc = RegQueryValueExW(hKey, pszKey, NULL, NULL, (LPBYTE)pwszValue, &cbData);
634 if (rc != ERROR_SUCCESS)
635 {
636 HeapFree(GetProcessHeap(), 0, pwszValue);
637 return rc;
638 }
639 /* NULL-terminate the string */
640 pwszValue[cbData / sizeof(WCHAR)] = '\0';
641
642 *pValue = pwszValue;
643 return ERROR_SUCCESS;
644 }
645
646 static BOOL
647 IsConsoleBoot(VOID)
648 {
649 HKEY hControlKey = NULL;
650 LPWSTR pwszSystemStartOptions = NULL;
651 LPWSTR pwszCurrentOption, pwszNextOption; /* Pointers into SystemStartOptions */
652 BOOL bConsoleBoot = FALSE;
653 LONG rc;
654
655 rc = RegOpenKeyExW(
656 HKEY_LOCAL_MACHINE,
657 L"SYSTEM\\CurrentControlSet\\Control",
658 0,
659 KEY_QUERY_VALUE,
660 &hControlKey);
661 if (rc != ERROR_SUCCESS)
662 goto cleanup;
663
664 rc = ReadRegSzKey(hControlKey, L"SystemStartOptions", &pwszSystemStartOptions);
665 if (rc != ERROR_SUCCESS)
666 goto cleanup;
667
668 /* Check for CONSOLE switch in SystemStartOptions */
669 pwszCurrentOption = pwszSystemStartOptions;
670 while (pwszCurrentOption)
671 {
672 pwszNextOption = wcschr(pwszCurrentOption, L' ');
673 if (pwszNextOption)
674 *pwszNextOption = L'\0';
675 if (wcsicmp(pwszCurrentOption, L"CONSOLE") == 0)
676 {
677 DPRINT("Found %S. Switching to console boot\n", pwszCurrentOption);
678 bConsoleBoot = TRUE;
679 goto cleanup;
680 }
681 pwszCurrentOption = pwszNextOption ? pwszNextOption + 1 : NULL;
682 }
683
684 cleanup:
685 if (hControlKey != NULL)
686 RegCloseKey(hControlKey);
687 if (pwszSystemStartOptions)
688 HeapFree(GetProcessHeap(), 0, pwszSystemStartOptions);
689 return bConsoleBoot;
690 }
691
692 static BOOL
693 CommonInstall(VOID)
694 {
695 HWND hWnd = NULL;
696
697 hSysSetupInf = SetupOpenInfFileW(
698 L"syssetup.inf",
699 NULL,
700 INF_STYLE_WIN4,
701 NULL);
702 if (hSysSetupInf == INVALID_HANDLE_VALUE)
703 {
704 FatalError("SetupOpenInfFileW() failed to open 'syssetup.inf' (Error: %lu)\n", GetLastError());
705 return FALSE;
706 }
707
708 if (!InstallSysSetupInfDevices())
709 {
710 FatalError("InstallSysSetupInfDevices() failed!\n");
711 goto error;
712 }
713
714 if(!InstallSysSetupInfComponents())
715 {
716 FatalError("InstallSysSetupInfComponents() failed!\n");
717 goto error;
718 }
719
720 if (!IsConsoleBoot())
721 {
722 HANDLE hThread;
723
724 hThread = CreateThread(
725 NULL,
726 0,
727 ShowStatusMessageThread,
728 (LPVOID)&hWnd,
729 0,
730 NULL);
731
732 if (hThread)
733 CloseHandle(hThread);
734 }
735
736 if (!EnableUserModePnpManager())
737 {
738 FatalError("EnableUserModePnpManager() failed!\n");
739 goto error;
740 }
741
742 if (CMP_WaitNoPendingInstallEvents(INFINITE) != WAIT_OBJECT_0)
743 {
744 FatalError("CMP_WaitNoPendingInstallEvents() failed!\n");
745 goto error;
746 }
747
748 EndDialog(hWnd, 0);
749 return TRUE;
750
751 error:
752 if (hWnd)
753 EndDialog(hWnd, 0);
754 SetupCloseInfFile(hSysSetupInf);
755 return FALSE;
756 }
757
758 DWORD WINAPI
759 InstallLiveCD(IN HINSTANCE hInstance)
760 {
761 STARTUPINFOW StartupInfo;
762 PROCESS_INFORMATION ProcessInformation;
763 BOOL bRes;
764
765 if (!CommonInstall())
766 goto error;
767
768 /* Register components */
769 _SEH2_TRY
770 {
771 if (!SetupInstallFromInfSectionW(NULL,
772 hSysSetupInf, L"RegistrationPhase2",
773 SPINST_ALL,
774 0, NULL, 0, NULL, NULL, NULL, NULL))
775 {
776 DPRINT1("SetupInstallFromInfSectionW failed!\n");
777 }
778
779 RegisterTypeLibraries(hSysSetupInf, L"TypeLibraries");
780 }
781 _SEH2_EXCEPT(EXCEPTION_EXECUTE_HANDLER)
782 {
783 DPRINT1("Catching exception\n");
784 }
785 _SEH2_END;
786
787 SetupCloseInfFile(hSysSetupInf);
788
789 /* Run the shell */
790 ZeroMemory(&StartupInfo, sizeof(StartupInfo));
791 StartupInfo.cb = sizeof(StartupInfo);
792 bRes = CreateProcessW(
793 L"userinit.exe",
794 NULL,
795 NULL,
796 NULL,
797 FALSE,
798 0,
799 NULL,
800 NULL,
801 &StartupInfo,
802 &ProcessInformation);
803 if (!bRes)
804 goto error;
805
806 CloseHandle(ProcessInformation.hThread);
807 CloseHandle(ProcessInformation.hProcess);
808
809 return 0;
810
811 error:
812 MessageBoxW(
813 NULL,
814 L"Failed to load LiveCD! You can shutdown your computer, or press ENTER to reboot.",
815 L"ReactOS LiveCD",
816 MB_OK);
817 return 0;
818 }
819
820
821 static BOOL
822 SetSetupType(DWORD dwSetupType)
823 {
824 DWORD dwError;
825 HKEY hKey;
826
827 dwError = RegOpenKeyExW(
828 HKEY_LOCAL_MACHINE,
829 L"SYSTEM\\Setup",
830 0,
831 KEY_SET_VALUE,
832 &hKey);
833 if (dwError != ERROR_SUCCESS)
834 return FALSE;
835
836 dwError = RegSetValueExW(
837 hKey,
838 L"SetupType",
839 0,
840 REG_DWORD,
841 (LPBYTE)&dwSetupType,
842 sizeof(DWORD));
843 RegCloseKey(hKey);
844 if (dwError != ERROR_SUCCESS)
845 return FALSE;
846
847 return TRUE;
848 }
849
850 DWORD WINAPI
851 InstallReactOS(HINSTANCE hInstance)
852 {
853 TCHAR szBuffer[MAX_PATH];
854 HANDLE token;
855 TOKEN_PRIVILEGES privs;
856 HKEY hKey;
857 HINF hShortcutsInf;
858
859 InitializeSetupActionLog(FALSE);
860 LogItem(SYSSETUP_SEVERITY_INFORMATION, L"Installing ReactOS");
861
862 if (!InitializeProfiles())
863 {
864 FatalError("InitializeProfiles() failed");
865 return 0;
866 }
867
868 CreateTempDir(L"TEMP");
869 CreateTempDir(L"TMP");
870
871 if (GetWindowsDirectory(szBuffer, sizeof(szBuffer) / sizeof(TCHAR)))
872 {
873 if (RegOpenKeyExW(HKEY_LOCAL_MACHINE,
874 L"SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion",
875 0,
876 KEY_WRITE,
877 &hKey) == ERROR_SUCCESS)
878 {
879 RegSetValueExW(hKey,
880 L"PathName",
881 0,
882 REG_SZ,
883 (LPBYTE)szBuffer,
884 (wcslen(szBuffer) + 1) * sizeof(WCHAR));
885
886 RegSetValueExW(hKey,
887 L"SystemRoot",
888 0,
889 REG_SZ,
890 (LPBYTE)szBuffer,
891 (wcslen(szBuffer) + 1) * sizeof(WCHAR));
892
893 RegCloseKey(hKey);
894 }
895
896 PathAddBackslash(szBuffer);
897 _tcscat(szBuffer, _T("system"));
898 CreateDirectory(szBuffer, NULL);
899 }
900
901 if (!CommonInstall())
902 return 0;
903
904 InstallWizard();
905
906 InstallSecurity();
907
908 hShortcutsInf = SetupOpenInfFileW(L"shortcuts.inf",
909 NULL,
910 INF_STYLE_WIN4,
911 NULL);
912 if (hShortcutsInf == INVALID_HANDLE_VALUE)
913 {
914 FatalError("Failed to open shortcuts.inf");
915 return 0;
916 }
917
918 if (!CreateShortcuts(hShortcutsInf, L"ShortcutFolders"))
919 {
920 FatalError("CreateShortcuts() failed");
921 return 0;
922 }
923
924 SetupCloseInfFile(hShortcutsInf);
925
926 /* ROS HACK, as long as NtUnloadKey is not implemented */
927 {
928 NTSTATUS Status = NtUnloadKey(NULL);
929 if (Status == STATUS_NOT_IMPLEMENTED)
930 {
931 /* Create the Administrator profile */
932 PROFILEINFOW ProfileInfo;
933 HANDLE hToken;
934 BOOL ret;
935
936 ret = LogonUserW(L"Administrator", L"", L"", LOGON32_LOGON_INTERACTIVE, LOGON32_PROVIDER_DEFAULT, &hToken);
937 if (!ret)
938 {
939 FatalError("LogonUserW() failed!");
940 return 0;
941 }
942 ZeroMemory(&ProfileInfo, sizeof(PROFILEINFOW));
943 ProfileInfo.dwSize = sizeof(PROFILEINFOW);
944 ProfileInfo.lpUserName = L"Administrator";
945 ProfileInfo.dwFlags = PI_NOUI;
946 LoadUserProfileW(hToken, &ProfileInfo);
947 CloseHandle(hToken);
948 }
949 else
950 {
951 DPRINT1("ROS HACK not needed anymore. Please remove it\n");
952 }
953 }
954 /* END OF ROS HACK */
955
956 SetupCloseInfFile(hSysSetupInf);
957 SetSetupType(0);
958
959 LogItem(SYSSETUP_SEVERITY_INFORMATION, L"Installing ReactOS done");
960 TerminateSetupActionLog();
961
962 /* Get shutdown privilege */
963 if (!OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES, &token))
964 {
965 FatalError("OpenProcessToken() failed!");
966 return 0;
967 }
968 if (!LookupPrivilegeValue(
969 NULL,
970 SE_SHUTDOWN_NAME,
971 &privs.Privileges[0].Luid))
972 {
973 FatalError("LookupPrivilegeValue() failed!");
974 return 0;
975 }
976 privs.PrivilegeCount = 1;
977 privs.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
978 if (AdjustTokenPrivileges(
979 token,
980 FALSE,
981 &privs,
982 0,
983 (PTOKEN_PRIVILEGES)NULL,
984 NULL) == 0)
985 {
986 FatalError("AdjustTokenPrivileges() failed!");
987 return 0;
988 }
989
990 ExitWindowsEx(EWX_REBOOT, 0);
991 return 0;
992 }
993
994
995 /*
996 * @unimplemented
997 */
998 DWORD WINAPI
999 SetupChangeFontSize(
1000 IN HANDLE hWnd,
1001 IN LPCWSTR lpszFontSize)
1002 {
1003 SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
1004 return FALSE;
1005 }
1006
1007 /*
1008 * @unimplemented
1009 */
1010 DWORD WINAPI
1011 SetupChangeLocaleEx(HWND hWnd,
1012 LCID Lcid,
1013 LPCWSTR lpSrcRootPath,
1014 char Unknown,
1015 DWORD dwUnused1,
1016 DWORD dwUnused2)
1017 {
1018 SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
1019 return FALSE;
1020 }
1021
1022 /*
1023 * @implemented
1024 */
1025 DWORD WINAPI
1026 SetupChangeLocale(HWND hWnd, LCID Lcid)
1027 {
1028 return SetupChangeLocaleEx(hWnd, Lcid, NULL, 0, 0, 0);
1029 }