3 Part of the swftools installer (Main program).
5 Copyright (c) 2004 Matthias Kramm <kramm@quiss.org>
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program 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
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
28 #include "installer.h"
34 #include "../config.h" //for swftools version
36 static int config_forAllUsers = 0;
37 static int config_createLinks = 0;
38 static int config_createStartmenu = 1;
39 static int config_createDesktop = 1;
40 static int config_deleteextra = 1;
42 static char path_startmenu[MAX_PATH] = "\0";
43 static char path_desktop[MAX_PATH] = "\0";
44 static char path_programfiles[MAX_PATH] = "\0";
46 static char pathBuf[MAX_PATH];
47 static int do_abort = 0;
49 static char* pdf2swf_path;
51 static char registry_path[1024];
53 static char*install_path = "c:\\swftools\\";
54 #define SOFTWARE_DOMAIN "quiss.org"
55 #define SOFTWARE_NAME "SWFTools"
56 #define INSTALLER_NAME "SWFTools Installer"
58 static HBITMAP logo = 0;
62 #define USER_SETMESSAGE 0x7f01
66 extern int crndata_len;
67 extern int crn_decompressed_size;
68 extern char*license_text;
70 #include "background.c"
73 typedef struct _filelist
76 struct _filelist*next;
80 static filelist_t* registerFile(filelist_t*next, const char*filename, char type)
82 filelist_t*file = malloc(sizeof(filelist_t));
83 file->filename = strdup(filename);
89 static filelist_t* readFileList(char*filename)
91 FILE*fi = fopen(filename, "rb");
95 fseek(fi, 0, SEEK_END);
97 fseek(fi, 0, SEEK_SET);
98 char*data = malloc(len);
99 fread(data, len, 1, fi);
103 filelist_t*list = 0,*lpos=0;;
105 if(data[t]=='\r' || data[t]=='\n') {
107 if(strchr("DFI", line[0]) && line[1]==' ' && line[2]!=' ') {
108 filelist_t*f = malloc(sizeof(filelist_t));
110 f->filename=strdup(line+2);
119 // skip line- this usually only happens if somebody tampered
122 while(t<len && (data[t]=='\0' || data[t]=='\r' || data[t]=='\n'))
132 static void writeFileList(filelist_t*file, const char*filename)
134 FILE*fi = fopen(filename, "wb");
135 fprintf(fi, "[%s installed files]\r\n", SOFTWARE_NAME);
138 sprintf(buf, "Couldn't write file %s", filename);
139 MessageBox(0, buf, INSTALLER_NAME, MB_OK|MB_ICONERROR);
144 fprintf(fi, "%c %s\r\n", file->type, file->filename);
150 static filelist_t*installedFiles = 0;
152 static void addFile(const char*filename)
154 installedFiles = registerFile(installedFiles, filename, 'F');
156 static void addDir(const char*filename)
158 installedFiles = registerFile(installedFiles, filename, 'D');
161 static void handleTemplateFile(const char*filename)
163 FILE*fi = fopen(filename, "rb");
164 fseek(fi, 0, SEEK_END);
166 fseek(fi, 0, SEEK_SET);
167 char*file = malloc(len);
168 fread(file, len, 1, fi);
170 int l = strlen(install_path);
171 fi = fopen(filename, "wb");
175 pos = strstr(pos, "%%PATH%%");
181 fwrite(lastpos, pos-lastpos, 1, fi);
182 fwrite(install_path, l, 1, fi);
183 pos+=8; // length of "%%PATH%%"
186 fwrite(lastpos, pos-lastpos, 1, fi);
191 static int setRegistryEntry(char*key,char*value)
195 int ret1 = -1, ret2= -1;
196 ret1 = RegCreateKey(HKEY_CURRENT_USER, key, &hkey1);
197 if(config_forAllUsers) {
198 ret2 = RegCreateKey(HKEY_LOCAL_MACHINE, key, &hkey2);
202 fprintf(stderr, "registry: CreateKey %s failed\n", key);
206 installedFiles = registerFile(installedFiles, key, 'k');
209 installedFiles = registerFile(installedFiles, key, 'K');
213 ret1 = RegSetValue(hkey1, NULL, REG_SZ, value, strlen(value)+1);
215 ret2 = RegSetValue(hkey2, NULL, REG_SZ, value, strlen(value)+1);
217 fprintf(stderr, "registry: SetValue %s failed\n", key);
224 static char* getRegistryEntry(char*path)
232 rc = RegOpenKeyEx(HKEY_LOCAL_MACHINE, path, 0, KEY_ALL_ACCESS/* KEY_READ*/, &key);
233 if (rc != ERROR_SUCCESS) {
234 fprintf(stderr, "RegOpenKeyEx failed\n");
237 rc = RegQueryValueEx(key, NULL, 0, 0, 0, (LPDWORD)&size) ;
238 if(rc != ERROR_SUCCESS) {
239 fprintf(stderr, "RegQueryValueEx(1) failed: %d\n", rc);
242 buf = (char*)malloc(size+1);
243 rc = RegQueryValueEx(key, NULL, 0, &type, (BYTE*)buf, (LPDWORD)&size);
244 if(rc != ERROR_SUCCESS) {
245 fprintf(stderr, "RegQueryValueEx(2) failed: %d\n", rc);
248 if(type == REG_SZ || type == REG_EXPAND_SZ) {
249 while(size && buf[size-1] == '\0')
254 } else if(type == REG_BINARY) {
259 void processMessages()
262 while(PeekMessage(&msg,NULL,0,0,0))
264 GetMessage(&msg, NULL, 0, 0);
265 TranslateMessage(&msg);
266 DispatchMessage(&msg);
270 int addRegistryEntries(char*install_dir)
273 ret = setRegistryEntry(registry_path, install_dir);
278 int CreateShortcut(char*path, char*description, char*filename, char*arguments, int iconindex, char*iconpath, char*workdir)
280 printf("Creating %s -> %s\n", filename, path);
281 WCHAR wszFilename[MAX_PATH];
282 IShellLink *ps1 = NULL;
283 IPersistFile *pPf = NULL;
285 hr = CoCreateInstance(&CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER, &IID_IShellLink, (void*)&ps1);
286 if(FAILED(hr)) return 0;
287 hr = ps1->lpVtbl->QueryInterface(ps1, &IID_IPersistFile, (void **)&pPf);
288 if(FAILED(hr)) return 0;
289 hr = ps1->lpVtbl->SetPath(ps1, path);
290 if(FAILED(hr)) return 0;
291 hr = ps1->lpVtbl->SetDescription(ps1, description);
294 hr = ps1->lpVtbl->SetArguments(ps1, arguments);
295 if(FAILED(hr)) return 0;
298 hr = ps1->lpVtbl->SetIconLocation(ps1, iconpath, iconindex);
299 if (FAILED(hr)) return 0;
302 hr = ps1->lpVtbl->SetWorkingDirectory(ps1, workdir);
303 if (FAILED(hr)) return 0;
305 MultiByteToWideChar(CP_ACP, 0, filename, -1, wszFilename, MAX_PATH);
306 hr = pPf->lpVtbl->Save(pPf, wszFilename, TRUE);
310 pPf->lpVtbl->Release(pPf);
311 ps1->lpVtbl->Release(ps1);
316 static int CreateURL(const char*url, const char*path)
318 FILE*fi = fopen(path, "wb");
321 fprintf(fi, "[InternetShortcut]\r\n");
322 fprintf(fi, "URL=http://localhost:8081/\r\n");
329 BOOL CALLBACK PropertySheetFuncCommon(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam, int buttons)
333 HWND dialog = GetParent(hwnd);
335 if(message == WM_INITDIALOG) {
337 SendDlgItemMessage(hwnd, IDC_BITMAP, STM_SETIMAGE, IMAGE_BITMAP, (LPARAM)logo);
340 GetWindowRect(dialog, &rc);
341 int width = rc.right - rc.left;
342 int height = rc.bottom - rc.top;
343 MoveWindow(dialog, (GetSystemMetrics(SM_CXSCREEN) - width)/2, (GetSystemMetrics(SM_CYSCREEN) - height)/2, width, height, FALSE);
347 if(message == WM_NOTIFY && (((LPNMHDR)lParam)->code == PSN_SETACTIVE)) {
348 PropSheet_SetWizButtons(dialog, buttons);
355 BOOL CALLBACK PropertySheetFunc1(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) {
356 if(message == WM_INITDIALOG) {
357 SetDlgItemText(hwnd, IDC_LICENSE, license_text);
359 return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_NEXT);
361 BOOL CALLBACK PropertySheetFunc2(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) {
362 if(message == WM_INITDIALOG) {
363 SetDlgItemText(hwnd, IDC_INSTALL_PATH, install_path);
365 config_forAllUsers = 0;
366 SendDlgItemMessage(hwnd, IDC_ALLUSERS, BM_SETCHECK, config_forAllUsers, 0);
367 SendDlgItemMessage(hwnd, IDC_CURRENTUSER, BM_SETCHECK, config_forAllUsers^1, 0);
369 if(message == WM_COMMAND) {
370 if((wParam&0xffff) == IDC_BROWSE) {
372 memset(&browse, 0, sizeof(browse));
373 browse.ulFlags = BIF_EDITBOX | BIF_NEWDIALOGSTYLE | BIF_USENEWUI;// | BIF_RETURNONLYFSDIRS; //BIF_VALIDATE
374 browse.pszDisplayName = (CHAR*)malloc(MAX_PATH);
375 memset(browse.pszDisplayName, 0, MAX_PATH);
376 browse.lpszTitle = "Select installation directory";
377 browse.pidlRoot = SHBrowseForFolder(&browse);
378 if(browse.pszDisplayName) {
379 if(SHGetPathFromIDList(browse.pidlRoot, browse.pszDisplayName)) {
380 install_path = browse.pszDisplayName;
381 int l = strlen(install_path);
382 while(l && install_path[l-1]=='\\') {
387 SendDlgItemMessage(hwnd, IDC_INSTALL_PATH, WM_SETTEXT, 0, (LPARAM)install_path);
391 else if((wParam&0xffff) == IDC_ALLUSERS) {
392 config_forAllUsers = 1;
393 SendDlgItemMessage(hwnd, IDC_ALLUSERS, BM_SETCHECK, config_forAllUsers, 0);
394 SendDlgItemMessage(hwnd, IDC_CURRENTUSER, BM_SETCHECK, config_forAllUsers^1, 0);
396 else if((wParam&0xffff) == IDC_CURRENTUSER) {
397 config_forAllUsers = 0;
398 SendDlgItemMessage(hwnd, IDC_ALLUSERS, BM_SETCHECK, config_forAllUsers, 0);
399 SendDlgItemMessage(hwnd, IDC_CURRENTUSER, BM_SETCHECK, config_forAllUsers^1, 0);
401 else if((wParam&0xffff) == IDC_INSTALL_PATH) {
402 SendDlgItemMessage(hwnd, IDC_INSTALL_PATH, WM_GETTEXT, sizeof(pathBuf), (LPARAM)&(pathBuf[0]));
404 install_path = pathBuf;
405 int l = strlen(install_path);
406 while(l && install_path[l-1]=='\\') {
413 return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_BACK|PSWIZB_NEXT);
416 static int progress_pos = 0;
418 void PropertyArchiveError(char*text)
421 int ret = MessageBox(0, text, "Error", MB_RETRYCANCEL|MB_ICONERROR);
422 if(ret==IDRETRY) continue;
427 void PropertyArchive_NewFile(char*filename)
432 void PropertyArchive_NewDirectory(char*filename)
438 static int lastlen = 0;
439 void PropertyArchiveStatus(int pos, int len)
442 SendDlgItemMessage(statuswnd, IDC_PROGRESS, PBM_SETRANGE, 0, (LPARAM)MAKELONG(0,len));
445 SendDlgItemMessage(statuswnd, IDC_PROGRESS, PBM_SETPOS, pos, 0);
449 void PropertyArchiveMessage(char*text)
451 if(text && text[0]=='[') {
454 SetDlgItemText(statuswnd, IDC_INFO, strdup(text));
458 void print_space(char*dest, char*msg, ULONGLONG size)
461 sprintf(dest, "%s%d Bytes", msg, size);
462 else if(size < 1048576l)
463 sprintf(dest, "%s%.2f Kb", msg, size/1024.0);
464 else if(size < 1073741824l)
465 sprintf(dest, "%s%.2f Mb", msg, size/1048576.0);
466 else if(size < 1099511627776ll)
467 sprintf(dest, "%s%.2f Gb", msg, size/1073741824.0);
469 sprintf(dest, "%s%.2f Tb", msg, size/1125899906842624.0);
472 BOOL CALLBACK PropertySheetFunc3(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) {
473 HWND dialog = GetParent(hwnd);
474 if(message == WM_INITDIALOG) {
475 SetDlgItemText(hwnd, IDC_INFO, "Ready to install");
478 print_space(buf, "Space required: ", crn_decompressed_size);
479 SetDlgItemText(hwnd, IDC_SPACE1, buf);
480 ULARGE_INTEGER available,total,totalfree;
481 available.QuadPart=0;
483 totalfree.QuadPart=0;
484 if(GetDiskFreeSpaceEx(install_path, &available, &total, &totalfree)) {
485 print_space(buf, "Space available: ", available.QuadPart);
487 sprintf(buf, "Space available: [Error %d]", GetLastError());
488 if(GetLastError() == ERROR_FILE_NOT_FOUND && install_path[0] && install_path[1]==':') {
489 /* installation directory does not yet exist */
490 char path[3]={'c',':',0};
491 path[0] = install_path[0];
492 if(GetDiskFreeSpaceEx(path, &available, &total, &totalfree)) {
493 print_space(buf, "Space available: ", available.QuadPart);
497 SetDlgItemText(hwnd, IDC_SPACE2, buf);
499 if(message == WM_NOTIFY && (((LPNMHDR)lParam)->code == PSN_WIZNEXT)) {
500 SetDlgItemText(hwnd, IDC_SPACE1, "");
501 SetDlgItemText(hwnd, IDC_SPACE2, "");
502 PropSheet_SetWizButtons(dialog, 0);
503 SendMessage(dialog, PSM_CANCELTOCLOSE, 0, 0); //makes wine display a warning
504 SetDlgItemText(hwnd, IDC_TITLE, "Installing files...");
507 status.status = PropertyArchiveStatus;
508 status.message = PropertyArchiveMessage;
509 status.error = PropertyArchiveError;
510 status.new_file = PropertyArchive_NewFile;
511 status.new_directory = PropertyArchive_NewDirectory;
512 int success = unpack_archive(crndata, crndata_len, install_path, &status);
513 memset(&status, 0, sizeof(status_t));
515 MessageBox(0, "Couldn't extract all installation files", INSTALLER_NAME, MB_OK|MB_ICONERROR);
521 return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_BACK|PSWIZB_NEXT);
524 static HRESULT (WINAPI *f_SHGetSpecialFolderPath)(HWND hwnd, LPTSTR lpszPath, int nFolder, BOOL fCreate);
526 BOOL CALLBACK PropertySheetFunc4(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) {
527 if(message == WM_INITDIALOG) {
528 pdf2swf_path = concatPaths(install_path, "pdf2swf_gui.exe");
529 FILE*fi = fopen(pdf2swf_path, "rb");
531 printf("a GUI program exists, creating desktop/startmenu links\n");
532 config_createLinks = 1;
535 if(!config_createLinks) {
536 SendDlgItemMessage(hwnd, IDC_STARTMENU, SW_HIDE, 0, 0);
537 SendDlgItemMessage(hwnd, IDC_DESKTOP, SW_HIDE, 0, 0);
540 SendDlgItemMessage(hwnd, IDC_STARTMENU, BM_SETCHECK, config_createStartmenu, 0);
541 SendDlgItemMessage(hwnd, IDC_DESKTOP, BM_SETCHECK, config_createDesktop, 0);
543 if(message == WM_COMMAND) {
544 if((wParam&0xffff) == IDC_STARTMENU) {
545 config_createStartmenu = SendDlgItemMessage(hwnd, IDC_STARTMENU, BM_GETCHECK, 0, 0);
546 config_createStartmenu^=1;
547 SendDlgItemMessage(hwnd, IDC_STARTMENU, BM_SETCHECK, config_createStartmenu, 0);
550 if((wParam&0xffff) == IDC_DESKTOP) {
551 config_createDesktop = SendDlgItemMessage(hwnd, IDC_DESKTOP, BM_GETCHECK, 0, 0);
552 config_createDesktop^=1;
553 SendDlgItemMessage(hwnd, IDC_DESKTOP, BM_SETCHECK, config_createDesktop, 0);
558 if(message == WM_NOTIFY && (((LPNMHDR)lParam)->code == PSN_WIZFINISH)) {
559 if(!addRegistryEntries(install_path)) {
560 MessageBox(0, "Couldn't create Registry Entries", INSTALLER_NAME, MB_OK|MB_ICONERROR);
564 char mypath[MAX_PATH];
565 path_startmenu[0] = 0;
567 if(config_forAllUsers) {
568 f_SHGetSpecialFolderPath(NULL, path_desktop, CSIDL_COMMON_DESKTOPDIRECTORY, 0);
569 f_SHGetSpecialFolderPath(NULL, path_startmenu, CSIDL_COMMON_PROGRAMS, 0);
571 /* get local program/desktop directory- this is both for forAllUsers=0 as well
572 as a fallback if the above didn't return any paths */
573 if(!path_startmenu[0]) {
574 f_SHGetSpecialFolderPath(NULL, path_startmenu, CSIDL_PROGRAMS, 0);
576 if(!path_desktop[0]) {
577 f_SHGetSpecialFolderPath(NULL, path_desktop, CSIDL_DESKTOPDIRECTORY, 0);
580 char*uninstall_path = concatPaths(install_path, "uninstall.exe");
582 if(config_createLinks) {
583 if(config_createDesktop && path_desktop[0]) {
584 char* linkName = concatPaths(path_desktop, "pdf2swf.lnk");
585 printf("Creating desktop link %s -> %s\n", linkName, pdf2swf_path);
586 if(!CreateShortcut(pdf2swf_path, "pdf2swf", linkName, 0, 0, 0, install_path)) {
587 MessageBox(0, "Couldn't create desktop shortcut", INSTALLER_NAME, MB_OK);
591 if(config_createStartmenu && path_startmenu[0]) {
592 char* group = concatPaths(path_startmenu, "pdf2swf");
593 CreateDirectory(group, 0);
594 char* linkName = concatPaths(group, "pdf2swf.lnk");
595 if(!CreateShortcut(pdf2swf_path, "pdf2swf", concatPaths(group, "pdf2swf.lnk"), 0, 0, 0, install_path) ||
596 !CreateShortcut(uninstall_path, "uninstall", concatPaths(group, "uninstall.lnk"), 0, 0, 0, install_path)) {
597 MessageBox(0, "Couldn't create start menu entry", INSTALLER_NAME, MB_OK);
602 printf("not creating desktop/startmenu links\n");
605 char*uninstall_ini = concatPaths(install_path, "uninstall.ini");
606 addFile(uninstall_ini);
607 writeFileList(installedFiles, uninstall_ini);
609 return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_FINISH);
615 void findfiles(char*path, int*pos, char*data, int len, char del)
617 WIN32_FIND_DATA findFileData;
618 HANDLE hFind = FindFirstFile(concatPaths(path, "*"), &findFileData);
619 if(hFind == INVALID_HANDLE_VALUE)
622 if(findFileData.cFileName[0] == '.' &&
623 (findFileData.cFileName[0] == '.' || findFileData.cFileName == '\0'))
625 char*f = concatPaths(path, findFileData.cFileName);
626 if(findFileData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) {
627 findfiles(f, pos, data, len, del);
634 /* don't list the uninstaller as file- it's going to be removed *after*
635 everything else is done */
636 char*uninstaller="uninstall.exe";
637 int ll = strlen(uninstaller);
639 if(!strcasecmp(&f[l-ll],uninstaller)) {
646 memcpy(&data[*pos], f, l);(*pos)+=l;
647 data[(*pos)++] = '\r';
648 data[(*pos)++] = '\n';
658 } while(FindNextFile(hFind, &findFileData));
662 static char*extrafiles = 0;
664 BOOL CALLBACK PropertySheetFunc5(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) {
665 HWND dialog = GetParent(hwnd);
666 if(message == WM_INITDIALOG) {
667 SetDlgItemText(hwnd, IDC_INFO, "Ready to deinstall");
669 if(message == WM_NOTIFY && (((LPNMHDR)lParam)->code == PSN_WIZNEXT)) {
671 filelist_t* list = readFileList("uninstall.ini");
673 list = readFileList(concatPaths(install_path, "uninstall.ini"));
675 //Don't abort. If there's still something there, it'll be catched by the "extra files"
676 //functionality later
677 //MessageBox(0, "Couldn't determine installed files list- did you run uninstall twice?", INSTALLER_NAME, MB_OK);
681 filelist_t* l = list;
683 while(l) {num++;l=l->next;}
685 PropSheet_SetWizButtons(dialog, 0);
686 SendMessage(dialog, PSM_CANCELTOCLOSE, 0, 0);
687 SetDlgItemText(hwnd, IDC_TITLE, "Uninstalling files...");
688 SendDlgItemMessage(hwnd, IDC_PROGRESS, PBM_SETRANGE, 0, (LPARAM)MAKELONG(0,num));
692 SendDlgItemMessage(hwnd, IDC_PROGRESS, PBM_SETPOS, num, 0);
694 DeleteFile(l->filename);
695 else if(l->type=='D')
696 RemoveDirectory(l->filename);
697 else if(l->type=='I')
698 /* skip- we will remove ourselves later */;
703 findfiles(install_path, &len, 0, 0, 0);
705 extrafiles = malloc(len);
707 findfiles(install_path, &pos, extrafiles, len, 0);
709 PropSheet_RemovePage(dialog, 1, 0);
713 return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_BACK|PSWIZB_NEXT);
716 BOOL CALLBACK PropertySheetFunc6(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) {
717 if(message == WM_INITDIALOG) {
718 SendDlgItemMessage(hwnd, IDC_DELETEEXTRA, BM_SETCHECK, config_deleteextra, 0);
720 SetDlgItemText(hwnd, IDC_FILELIST, extrafiles);
723 if(message == WM_COMMAND) {
724 if((wParam&0xffff) == IDC_DELETEEXTRA) {
725 config_deleteextra = SendDlgItemMessage(hwnd, IDC_DELETEEXTRA, BM_GETCHECK, 0, 0);
726 config_deleteextra ^=1;
727 SendDlgItemMessage(hwnd, IDC_DELETEEXTRA, BM_SETCHECK, config_deleteextra, 0);
731 if(message == WM_NOTIFY && (((LPNMHDR)lParam)->code == PSN_WIZNEXT)) {
732 if(config_deleteextra) {
734 findfiles(install_path, &pos, 0, 0, 1);
737 return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_NEXT);
740 BOOL CALLBACK PropertySheetFunc7(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) {
741 if(message == WM_INITDIALOG) {
744 return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_FINISH);
748 #ifndef PSP_HIDEHEADER
749 #define PSP_HIDEHEADER 2048
752 typedef struct _wizardpage {
757 void runPropertySheet(HWND parent)
759 PROPSHEETHEADER sheet;
761 wizardpage_t wpage[5] = {
763 {PropertySheetFunc1, IDD_LICENSE},
764 {PropertySheetFunc2, IDD_INSTALLDIR},
765 {PropertySheetFunc3, IDD_PROGRESS},
766 {PropertySheetFunc4, IDD_FINISH},
768 {PropertySheetFunc5, IDD_SURE},
769 {PropertySheetFunc6, IDD_EXTRAFILES},
770 {PropertySheetFunc7, IDD_DEINSTALLED},
773 int num = sizeof(wpage)/sizeof(wpage[0]);
774 HPROPSHEETPAGE pages[num];
778 memset(&page, 0, sizeof(PROPSHEETPAGE));
779 page.dwSize = sizeof(PROPSHEETPAGE);
780 page.dwFlags = PSP_DEFAULT|PSP_HIDEHEADER;
782 page.pfnDlgProc = wpage[t].function;
783 page.pszTemplate = MAKEINTRESOURCE(wpage[t].resource);
784 pages[t] = CreatePropertySheetPage(&page);
787 memset(&sheet, 0, sizeof(PROPSHEETHEADER));
788 sheet.dwSize = sizeof(PROPSHEETHEADER);
789 sheet.hInstance = me;
790 sheet.hwndParent = parent;
791 sheet.phpage = pages;
792 sheet.dwFlags = PSH_WIZARD;
794 PropertySheet(&sheet);
799 static void remove_self()
801 char exename[MAX_PATH];
802 char batname[MAX_PATH];
805 GetModuleFileName(NULL, exename, sizeof(exename));
806 sprintf(batname, "%s.bat", exename);
807 fp = fopen(batname, "w");
808 fprintf(fp, ":Repeat\n");
809 fprintf(fp, "del \"%s\"\n", exename);
810 fprintf(fp, "if exist \"%s\" goto Repeat\n", exename);
811 fprintf(fp, "del \"%s\"\n", batname);
815 PROCESS_INFORMATION pi;
816 memset(&si, 0, sizeof(si));
817 si.dwFlags = STARTF_USESHOWWINDOW;
818 si.wShowWindow = SW_HIDE;
820 if (CreateProcess(NULL, batname, NULL, NULL, FALSE,
821 CREATE_SUSPENDED | IDLE_PRIORITY_CLASS,
822 NULL, "\\", &si, &pi)) {
823 SetThreadPriority(pi.hThread, THREAD_PRIORITY_IDLE);
824 SetThreadPriority(GetCurrentThread(), THREAD_PRIORITY_TIME_CRITICAL);
825 SetPriorityClass(GetCurrentProcess(), HIGH_PRIORITY_CLASS);
826 CloseHandle(pi.hProcess);
827 ResumeThread(pi.hThread);
828 CloseHandle(pi.hThread);
833 int WINAPI WinMain(HINSTANCE _me,HINSTANCE hPrevInst,LPSTR lpszArgs, int nWinMode)
836 sprintf(registry_path, "Software\\%s\\%s\\InstallPath", SOFTWARE_DOMAIN, SOFTWARE_NAME);
839 logo = LoadBitmap(me, "LOGO");
841 install_path = getRegistryEntry(registry_path);
842 if(!install_path || !install_path[0]) {
843 MessageBox(0, "Couldn't find software installation directory- did you run the deinstallation twice?", INSTALLER_NAME, MB_OK);
848 InitCommonControls();
850 runPropertySheet(background);
856 int WINAPI WinMain(HINSTANCE _me,HINSTANCE hPrevInst,LPSTR lpszArgs, int nWinMode)
859 WNDCLASSEX wcl_background;
860 wcl_background.hInstance = me;
861 wcl_background.lpfnWndProc = WindowFunc;
862 wcl_background.lpszClassName= INSTALLER_NAME;
863 wcl_background.style = CS_HREDRAW | CS_VREDRAW;
864 wcl_background.hIcon = LoadIcon(NULL, IDI_APPLICATION);
865 wcl_background.hIconSm = LoadIcon(NULL, IDI_APPLICATION);
866 wcl_background.hCursor = LoadCursor(NULL, IDC_ARROW);
867 wcl_background.lpszMenuName = NULL; //no menu
868 wcl_background.cbClsExtra = 0;
869 wcl_background.cbWndExtra = 0;
870 wcl_background.hbrBackground= CreateSolidBrush(RGB(0, 0, 128));
871 wcl_background.cbSize = sizeof(WNDCLASSEX);
873 sprintf(registry_path, "Software\\%s\\%s\\InstallPath", SOFTWARE_DOMAIN, SOFTWARE_NAME);
875 HINSTANCE shell32 = LoadLibrary("shell32.dll");
877 MessageBox(0, "Could not load shell32.dll", INSTALLER_NAME, MB_OK);
880 f_SHGetSpecialFolderPath = (HRESULT (WINAPI*)(HWND,LPTSTR,int,BOOL))GetProcAddress(shell32, "SHGetSpecialFolderPathA");
881 if(!f_SHGetSpecialFolderPath) {
882 MessageBox(0, "Could not load shell32.dll", INSTALLER_NAME, MB_OK);
886 HRESULT coret = CoInitialize(NULL);
888 MessageBox(0, "Could not initialize COM interface", INSTALLER_NAME, MB_OK);
892 path_programfiles[0] = 0;
893 f_SHGetSpecialFolderPath(NULL, path_programfiles, CSIDL_PROGRAM_FILES, 0);
895 if(!RegisterClassEx(&wcl_background)) {
896 MessageBox(0, "Could not register window background class", INSTALLER_NAME, MB_OK);
900 HWND background = CreateWindow(wcl_background.lpszClassName, INSTALLER_NAME,
902 GetSystemMetrics(SM_CXFULLSCREEN),
903 GetSystemMetrics(SM_CYFULLSCREEN),
905 (void*)"background");
908 MessageBox(0, "Could not create installation background window", INSTALLER_NAME, MB_OK);
912 ShowWindow(background, SW_SHOWMAXIMIZED);
913 SetForegroundWindow(background);
914 UpdateWindow(background);
916 logo = LoadBitmap(me, "LOGO");
918 install_path = getRegistryEntry(registry_path);
919 if(!install_path || !install_path[0]) {
920 if(path_programfiles[0]) {
921 install_path = concatPaths(path_programfiles, SOFTWARE_NAME);
923 install_path = concatPaths("c:\\", SOFTWARE_NAME);
927 InitCommonControls();
929 runPropertySheet(background);