X-Git-Url: http://git.asbjorn.biz/?p=swftools.git;a=blobdiff_plain;f=installer%2Finstaller.c;h=d22efd56f115fa4f40001f2d1c1a3f63391e156b;hp=27691bff9c2e46ed5d1959b82582170246c0cd52;hb=4372ebe4a0e2197cf8f9e5f7af1decadf7ef44f6;hpb=756e8169c8f2d34aa2023920784c7e3502d8fba7 diff --git a/installer/installer.c b/installer/installer.c index 27691bf..d22efd5 100644 --- a/installer/installer.c +++ b/installer/installer.c @@ -1,8 +1,8 @@ /* installer.c - Part of the swftools installer (Main program). + Part of the rfx installer (Main program). - Copyright (c) 2004 Matthias Kramm + Copyright (c) 2004-2008 Matthias Kramm This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -20,419 +20,990 @@ #include #include +#include +#include +#include #include #include +#include "installer.h" +#ifndef DEINSTALL +#include "archive.h" +#endif +#include "utils.h" -#include "depack.h" +static int config_forAllUsers = 0; +static int config_createLinks = 0; +static int config_createStartmenu = 1; +static int config_createDesktop = 1; +static int config_deleteextra = 1; -#include "../config.h" //for swftools version +static char path_startmenu[MAX_PATH] = "\0"; +static char path_desktop[MAX_PATH] = "\0"; +static char path_programfiles[MAX_PATH] = "\0"; -extern char*crndata; +static char pathBuf[MAX_PATH]; +static int do_abort = 0; + +static char* pdf2swf_dir; +static char* pdf2swf_path; + +static char registry_path[1024]; + +static char elevated = 0; static char*install_path = "c:\\swftools\\"; +#define SOFTWARE_DOMAIN "quiss.org" +#define SOFTWARE_NAME "SWFTools" +#define INSTALLER_NAME "SWFTools Installer" -static HWND wnd_progress = 0; -static HWND wnd_params = 0; - -#define USER_SETMESSAGE 0x7fff0001 - -struct progress_data { - int width,height; - int bar_width; - int bar_height; - int bar_posx; - int bar_posy; - int pos,step,range; - char*text1; - char*text2; - char*text3; - HWND hwndButton; - HWND wnd_text3; -}; -struct params_data { - int width,height; - int ok; - HWND installButton; - HWND edit; -}; +static HBITMAP logo = 0; - -LRESULT CALLBACK WindowFunc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) -{ - printf("%08x, %d %08x %08x\n", hwnd, message, wParam, lParam); - - /* in order for the delegation below to also work for - WM_CREATE, we need to assign our window pointers *before* the - CreateWindow returns, because that's when the WM_CREATE event - is sent */ - if(message == WM_CREATE) { - CREATESTRUCT*cs = ((LPCREATESTRUCT)lParam); - if(cs->lpCreateParams && !strcmp((char*)cs->lpCreateParams, "params")) { - wnd_params = hwnd; - } - if(cs->lpCreateParams && !strcmp((char*)cs->lpCreateParams, "progress")) { - wnd_progress = hwnd; - } - } +static HINSTANCE me; - if(hwnd == 0) { - return DefWindowProc(hwnd, message, wParam, lParam); - } else if(hwnd == wnd_progress) { - static struct progress_data data; - - switch(message) - { - case USER_SETMESSAGE: - data.text3 = (char*)wParam; - SendMessage(data.wnd_text3, WM_SETTEXT, 0, data.text3); - return 0; - case WM_CREATE: { - memset(&data, 0, sizeof(data)); - data.text1 = "Installing SWFTools"; - data.text2 = (char*)malloc(strlen(install_path)+250); - sprintf(data.text2, "to %s", install_path); - data.pos = 0; - data.step = 1; - - CREATESTRUCT*cs = ((LPCREATESTRUCT)lParam); - RECT rc; - GetClientRect (hwnd, &rc); - data.width = rc.right - rc.left; - data.height = rc.bottom - rc.top; - data.bar_width = cs->cx - 17; - data.bar_height= 16; - data.bar_posx = (data.width -data.bar_width)/2; - data.bar_posy = 56; - data.range = 50; - data.hwndButton = CreateWindow ( - PROGRESS_CLASS, - "Progress", - WS_CHILD | WS_VISIBLE, - data.bar_posx, - data.bar_posy, - data.bar_width, - data.bar_height, - hwnd, /* Parent */ - (HMENU)1, - cs->hInstance, - NULL - ); - - data.wnd_text3 = CreateWindow ( - WC_EDIT, - "text3", - WS_CHILD | WS_VISIBLE | ES_READONLY | ES_CENTER, - data.bar_posx, - 72, - (rc.right - rc.left - data.bar_posx*2), - 20, - hwnd, /* Parent */ - (HMENU)1, - cs->hInstance, - NULL - ); - SendMessage(data.hwndButton, PBM_SETRANGE, 0, (LPARAM) MAKELONG(0,data.range)); - SendMessage(data.hwndButton, PBM_SETSTEP, (WPARAM) data.step, 0); - //ShowWindow(hwndButton, SW_SHOW); - return 0; - } - case PBM_STEPIT: { - if(data.pos+data.step < data.range) { - data.pos += data.step; - SendMessage(data.hwndButton, PBM_STEPIT, wParam, lParam); - } - } - case WM_PAINT: { - TEXTMETRIC tm; - HDC hdc; /* A device context used for drawing */ - PAINTSTRUCT ps; /* Also used during window drawing */ - RECT rc; /* A rectangle used during drawing */ - - hdc = GetDC(hwnd); - SelectObject(hdc, GetStockObject(SYSTEM_FIXED_FONT)); - GetTextMetrics(hdc, &tm); - ReleaseDC(hwnd, hdc); - - hdc = BeginPaint (hwnd, &ps); - - rc.top = 8; rc.left= 0; rc.right = data.width; rc.bottom = 24; - DrawText(hdc, data.text1, -1, &rc, DT_SINGLELINE | DT_CENTER | DT_VCENTER); - - /*if(data.text3) { - rc.top = 112; rc.left= 0; rc.right = data.width; rc.bottom = 128; - InvalidateRect(hwnd,&rc,1); - DrawText(hdc, data.text3, -1, &rc, DT_SINGLELINE | DT_CENTER | DT_VCENTER); - }*/ - - char buf[256]; - char*text = data.text2; - if(tm.tmAveCharWidth * strlen(text) > data.width) { - int chars = (data.width / tm.tmAveCharWidth)-8; - if(chars>240) chars=240; - strncpy(buf, text, chars); - strcpy(&buf[chars],"..."); - text = buf; - } +#define USER_SETMESSAGE 0x7f01 - rc.top = 32; rc.left= 0; rc.right = data.width; rc.bottom = 48; - DrawText(hdc, text, -1, &rc, DT_SINGLELINE | DT_CENTER | DT_VCENTER); +#ifndef DEINSTALL +extern char*crndata; +extern int crndata_len; +extern int crn_decompressed_size; +extern char*license_text; - EndPaint (hwnd, &ps); - return 0; - } - case WM_DESTROY: - wnd_progress = 0; - return DefWindowProc(hwnd, message, wParam, lParam); - default: - return DefWindowProc(hwnd, message, wParam, lParam); - } - } else if(hwnd == wnd_params) { - static struct params_data data; - switch(message) - { - case WM_CREATE: { - memset(&data, 0, sizeof(data)); - CREATESTRUCT*cs = ((LPCREATESTRUCT)lParam); - RECT rc; - GetClientRect (hwnd, &rc); - data.width = rc.right - rc.left; - data.height = rc.bottom - rc.top; - - //EDITTEXT IDD_EDIT,68,8,72,12, ES_LEFT | ES_AUTOHSCROLL | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP - HWND text = CreateWindow( - WC_STATIC, - "Select Installation Directory:", - WS_CHILD | WS_VISIBLE, - 32, - 0, - data.width-32*2, - 20, - hwnd, /* Parent */ - (HMENU)1, - cs->hInstance, - NULL - ); - - SendMessage(text, WM_SETTEXT, "test1", "test2"); - - data.edit = CreateWindow ( - WC_EDIT, - "EditPath", - WS_CHILD | WS_VISIBLE | WS_TABSTOP | WS_BORDER | ES_AUTOHSCROLL, - 32, - 32, - data.width-32*2, - 20, - hwnd, /* Parent */ - (HMENU)1, - cs->hInstance, - NULL - ); - - data.installButton = CreateWindow ( - WC_BUTTON, - "Install", - WS_CHILD | WS_VISIBLE | WS_TABSTOP, - (data.width - 80)/2, - data.height - 32*2, - 80, - 32, - hwnd, /* Parent */ - (HMENU)1, - cs->hInstance, - NULL - ); - return 0; - } - case WM_PAINT: { - return DefWindowProc(hwnd, message, wParam, lParam); - } - case WM_COMMAND: { - data.ok = 1; - DestroyWindow(wnd_params); - return; - } - case WM_KEYDOWN: { - if(wParam == 0x49) { - DestroyWindow(wnd_params); +#include "background.c" +#endif + +typedef struct _filelist +{ + const char*filename; + struct _filelist*next; + char type; +} filelist_t; + +static filelist_t* registerFile(filelist_t*next, const char*filename, char type) +{ + filelist_t*file = malloc(sizeof(filelist_t)); + file->filename = strdup(filename); + file->type = type; + file->next = next; + return file; +} + +static filelist_t* readFileList(char*filename) +{ + FILE*fi = fopen(filename, "rb"); + if(!fi) { + return 0; + } + fseek(fi, 0, SEEK_END); + int len = ftell(fi); + fseek(fi, 0, SEEK_SET); + char*data = malloc(len+1); + fread(data, len, 1, fi); + fclose(fi); + int t=0; + char*line = data; + filelist_t*list = 0,*lpos=0;; + while(ttype=line[0]; + f->filename=strdup(line+2); + f->next = 0; + if(!list) { + list = lpos = f; + } else { + lpos->next = f; + lpos = f; } - return 0; + } else { + // skip line- this usually only happens if somebody tampered + // with the file } - case WM_DESTROY: - if(!data.ok) - PostQuitMessage (0); - wnd_params = 0; - return DefWindowProc(hwnd, message, wParam, lParam); - default: - return DefWindowProc(hwnd, message, wParam, lParam); + while(ttype, file->filename); + file = file->next; } + fclose(fi); } -static char*lastmessage = 0; -void myarchivestatus(int type, char*text) +static filelist_t*installedFiles = 0; + +static void addFile(const char*filename) { - if(text && text[0]=='[') - return; - //printf("%s\n", text); - - SendMessage(wnd_progress, USER_SETMESSAGE, (WPARAM)strdup(text), 0); - SendMessage(wnd_progress, WM_PAINT, 0, 0); - int t; - for(t=0;t<9;t++) { - SendMessage(wnd_progress, PBM_STEPIT, 0, 0); - /* while we're here, we might also make ourselves useful */ - processMessages(); - /* we want the user to see what we're writing, right? */ - Sleep(20); - } - - if(type<0) { - while(1) { - int ret = MessageBox(0, text, "Error", MB_RETRYCANCEL|MB_ICONERROR); - - /* there is no MB_CANCEL, so, *sigh*, we have to display - the "retry" button. So pretend it's doing anything... */ - if(ret==IDRETRY) - continue; - else - break; - } + installedFiles = registerFile(installedFiles, filename, 'F'); +} +static void addDir(const char*filename) +{ + installedFiles = registerFile(installedFiles, filename, 'D'); +} + +static void handleTemplateFile(const char*filename) +{ + FILE*fi = fopen(filename, "rb"); + fseek(fi, 0, SEEK_END); + int len = ftell(fi); + fseek(fi, 0, SEEK_SET); + char*file = malloc(len+1); + fread(file, len, 1, fi); + fclose(fi); + int l = strlen(install_path); + fi = fopen(filename, "wb"); + char*pos = file; + char*lastpos = file; + while(1) { + pos = strstr(pos, "%%PATH%%"); + if(!pos) { + pos = &file[len]; + break; + } + if(pos!=lastpos) + fwrite(lastpos, pos-lastpos, 1, fi); + fwrite(install_path, l, 1, fi); + pos+=8; // length of "%%PATH%%" + lastpos = pos; } + fwrite(lastpos, pos-lastpos, 1, fi); + fclose(fi); + free(file); } -static int regEnter(char*key,char*value) +static int setRegistryEntry(char*key,char*value) { - HKEY hkey; - int ret = 0; - ret = RegCreateKey(HKEY_LOCAL_MACHINE, key, &hkey); - if(ret != ERROR_SUCCESS) { + HKEY hkey1; + HKEY hkey2; + int ret1 = -1, ret2= -1; + ret1 = RegCreateKey(HKEY_CURRENT_USER, key, &hkey1); + if(config_forAllUsers) { + ret2 = RegCreateKey(HKEY_LOCAL_MACHINE, key, &hkey2); + } + + if(ret1 && ret2) { fprintf(stderr, "registry: CreateKey %s failed\n", key); return 0; } - ret = RegSetValue(hkey, NULL, REG_SZ, value, strlen(value)+1); - if(ret != ERROR_SUCCESS) { + if(ret1) { + installedFiles = registerFile(installedFiles, key, 'k'); + } + if(ret2) { + installedFiles = registerFile(installedFiles, key, 'K'); + } + + if(!ret1) + ret1 = RegSetValue(hkey1, NULL, REG_SZ, value, strlen(value)+1); + if(!ret2) + ret2 = RegSetValue(hkey2, NULL, REG_SZ, value, strlen(value)+1); + if(ret1 && ret2) { fprintf(stderr, "registry: SetValue %s failed\n", key); return 0; } return 1; } + +static char* getRegistryEntry(char*path) +{ + int res = 0; + HKEY key; + long rc; + long size = 0; + DWORD type; + char*buf; + rc = RegOpenKeyEx(HKEY_LOCAL_MACHINE, path, 0, KEY_ALL_ACCESS/* KEY_READ*/, &key); + if (rc != ERROR_SUCCESS) { + fprintf(stderr, "RegOpenKeyEx failed\n"); + return 0; + } + rc = RegQueryValueEx(key, NULL, 0, 0, 0, (LPDWORD)&size) ; + if(rc != ERROR_SUCCESS) { + fprintf(stderr, "RegQueryValueEx(1) failed: %d\n", rc); + return 0; + } + buf = (char*)malloc(size+1); + rc = RegQueryValueEx(key, NULL, 0, &type, (BYTE*)buf, (LPDWORD)&size); + if(rc != ERROR_SUCCESS) { + fprintf(stderr, "RegQueryValueEx(2) failed: %d\n", rc); + return 0; + } + if(type == REG_SZ || type == REG_EXPAND_SZ) { + while(size && buf[size-1] == '\0') + --size; + buf[size] = 0; + /* TODO: convert */ + return buf; + } else if(type == REG_BINARY) { + return buf; + } +} + +static int has_full_access = 0; +static char hasFullAccess() +{ + /* find out whether we can write keys in HKEY_LOCAL_MACHINE */ + HKEY hKey; + int ret = RegOpenKeyEx(HKEY_LOCAL_MACHINE, "Software\\Microsoft\\Windows\\CurrentVersion\\Uninstall", 0, + KEY_CREATE_SUB_KEY, &hKey); + if(!ret) { + RegCloseKey(hKey); + return 1; + } else { + return 0; + } +} + +void processMessages() +{ + MSG msg; + while(PeekMessage(&msg,NULL,0,0,0)) + { + GetMessage(&msg, NULL, 0, 0); + TranslateMessage(&msg); + DispatchMessage(&msg); + } +} + int addRegistryEntries(char*install_dir) { int ret; - ret = regEnter("Software\\quiss.org\\swftools\\InstallPath", install_dir); + ret = setRegistryEntry(registry_path, install_dir); if(!ret) return 0; return 1; } -int WINAPI WinMain(HINSTANCE me,HINSTANCE hPrevInst,LPSTR lpszArgs, int nWinMode) +int CreateShortcut(char*path, char*description, char*filename, char*arguments, int iconindex, char*iconpath, char*workdir) { - WNDCLASSEX wcl; - char*install_dir = "C:\\swftools\\"; - - wcl.hInstance = me; - wcl.lpszClassName= "SWFTools-Installer"; - wcl.lpfnWndProc = WindowFunc; - wcl.style = CS_HREDRAW | CS_VREDRAW; - wcl.hIcon = LoadIcon(NULL, IDI_APPLICATION); - wcl.hIconSm = LoadIcon(NULL, IDI_APPLICATION); - wcl.hCursor = LoadCursor(NULL, IDC_ARROW); - wcl.lpszMenuName = NULL; //no menu - wcl.cbClsExtra = 0; - wcl.cbWndExtra = 0; - //wcl.hbrBackground= (HBRUSH) GetStockObject(DKGRAY_BRUSH); - wcl.hbrBackground= (HBRUSH) GetStockObject (WHITE_BRUSH); - wcl.cbSize = sizeof(WNDCLASSEX); - - if(!RegisterClassEx (&wcl)) { + printf("Creating %s -> %s\n", filename, path); + WCHAR wszFilename[MAX_PATH]; + IShellLink *ps1 = NULL; + IPersistFile *pPf = NULL; + HRESULT hr; + hr = CoCreateInstance(&CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER, &IID_IShellLink, (void*)&ps1); + if(FAILED(hr)) return 0; + hr = ps1->lpVtbl->QueryInterface(ps1, &IID_IPersistFile, (void **)&pPf); + if(FAILED(hr)) return 0; + hr = ps1->lpVtbl->SetPath(ps1, path); + if(FAILED(hr)) return 0; + hr = ps1->lpVtbl->SetDescription(ps1, description); + + if (arguments) { + hr = ps1->lpVtbl->SetArguments(ps1, arguments); + if(FAILED(hr)) return 0; + } + if (iconpath) { + hr = ps1->lpVtbl->SetIconLocation(ps1, iconpath, iconindex); + if (FAILED(hr)) return 0; + } + if (workdir) { + hr = ps1->lpVtbl->SetWorkingDirectory(ps1, workdir); + if (FAILED(hr)) return 0; + } + MultiByteToWideChar(CP_ACP, 0, filename, -1, wszFilename, MAX_PATH); + hr = pPf->lpVtbl->Save(pPf, wszFilename, TRUE); + if(FAILED(hr)) { return 0; } + pPf->lpVtbl->Release(pPf); + ps1->lpVtbl->Release(ps1); + addFile(filename); + return 1; +} - InitCommonControls(); - - CreateWindow ( - wcl.lpszClassName, /* Class name */ - "SWFTools Installer", /* Caption */ - WS_OVERLAPPEDWINDOW&(~WS_SIZEBOX), /* Style */ - CW_USEDEFAULT, /* Initial x (use default) */ - CW_USEDEFAULT, /* Initial y (use default) */ - 320, /* Initial x size */ - 200, /* Initial y size */ - NULL, /* No parent window */ - NULL, /* No menu */ - me, /* This program instance */ - (void*)"params" /* Creation parameters */ - ); - ShowWindow (wnd_params, nWinMode); - UpdateWindow (wnd_params); - - MSG msg; - while(wnd_params) - { - GetMessage(&msg,NULL,0,0); - TranslateMessage(&msg); - DispatchMessage(&msg); +static int CreateURL(const char*url, const char*path) +{ + FILE*fi = fopen(path, "wb"); + if(!fi) + return 0; + fprintf(fi, "[InternetShortcut]\r\n"); + fprintf(fi, "URL=http://localhost:8081/\r\n"); + fclose(fi); + addFile(path); + return 1; +} + + +BOOL CALLBACK PropertySheetFuncCommon(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam, int buttons) +{ + LPNMHDR lpnm; + + HWND dialog = GetParent(hwnd); + + if(message == WM_INITDIALOG) { + if(logo) + SendDlgItemMessage(hwnd, IDC_BITMAP, STM_SETIMAGE, IMAGE_BITMAP, (LPARAM)logo); + + RECT rc; + GetWindowRect(dialog, &rc); + int width = rc.right - rc.left; + int height = rc.bottom - rc.top; + MoveWindow(dialog, (GetSystemMetrics(SM_CXSCREEN) - width)/2, (GetSystemMetrics(SM_CYSCREEN) - height)/2, width, height, FALSE); + return FALSE; + } + + if(message == WM_NOTIFY && (((LPNMHDR)lParam)->code == PSN_SETACTIVE)) { + PropSheet_SetWizButtons(dialog, buttons); + return FALSE; } - - char buf[1024]; - sprintf(buf, "Do you want me to install SWFTools into the directory %s now?", install_dir); - int ret = MessageBox(0, buf, "SWFTools Install", MB_YESNO|MB_ICONQUESTION); + return FALSE; +} + +#ifndef DEINSTALL +BOOL CALLBACK PropertySheetFunc1(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) { + if(message == WM_INITDIALOG) { + SetDlgItemText(hwnd, IDC_LICENSE, license_text); + } + return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_NEXT); +} +BOOL CALLBACK PropertySheetFunc2(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) { + if(message == WM_INITDIALOG) { + SetDlgItemText(hwnd, IDC_INSTALL_PATH, install_path); + + SendDlgItemMessage(hwnd, IDC_ALLUSERS, BM_SETCHECK, config_forAllUsers, 0); + SendDlgItemMessage(hwnd, IDC_CURRENTUSER, BM_SETCHECK, config_forAllUsers^1, 0); + } + if(message == WM_COMMAND) { + if((wParam&0xffff) == IDC_BROWSE) { + BROWSEINFOA browse; + memset(&browse, 0, sizeof(browse)); + browse.ulFlags = BIF_EDITBOX | BIF_NEWDIALOGSTYLE | BIF_USENEWUI;// | BIF_RETURNONLYFSDIRS; //BIF_VALIDATE + browse.pszDisplayName = (CHAR*)malloc(MAX_PATH); + memset(browse.pszDisplayName, 0, MAX_PATH); + browse.lpszTitle = "Select installation directory"; + browse.pidlRoot = SHBrowseForFolder(&browse); + if(browse.pszDisplayName) { + if(SHGetPathFromIDList(browse.pidlRoot, browse.pszDisplayName)) { + install_path = browse.pszDisplayName; + int l = strlen(install_path); + while(l && install_path[l-1]=='\\') { + install_path[--l]=0; + } + } + } + SendDlgItemMessage(hwnd, IDC_INSTALL_PATH, WM_SETTEXT, 0, (LPARAM)install_path); + return 0; + + } + else if((wParam&0xffff) == IDC_ALLUSERS) { + config_forAllUsers = 1; + SendDlgItemMessage(hwnd, IDC_ALLUSERS, BM_SETCHECK, config_forAllUsers, 0); + SendDlgItemMessage(hwnd, IDC_CURRENTUSER, BM_SETCHECK, config_forAllUsers^1, 0); + } + else if((wParam&0xffff) == IDC_CURRENTUSER) { + config_forAllUsers = 0; + SendDlgItemMessage(hwnd, IDC_ALLUSERS, BM_SETCHECK, config_forAllUsers, 0); + SendDlgItemMessage(hwnd, IDC_CURRENTUSER, BM_SETCHECK, config_forAllUsers^1, 0); + } + else if((wParam&0xffff) == IDC_INSTALL_PATH) { + SendDlgItemMessage(hwnd, IDC_INSTALL_PATH, WM_GETTEXT, sizeof(pathBuf), (LPARAM)&(pathBuf[0])); + if(pathBuf[0]) { + install_path = pathBuf; + int l = strlen(install_path); + while(l && install_path[l-1]=='\\') { + install_path[--l]=0; + } + } + return 0; + } + } + if(message == WM_NOTIFY && (((LPNMHDR)lParam)->code == PSN_SETACTIVE)) { + if(!elevated && !has_full_access) { + OSVERSIONINFO winverinfo; + memset(&winverinfo, 0, sizeof(OSVERSIONINFO)); + winverinfo.dwOSVersionInfoSize = sizeof(winverinfo); + if (GetVersionEx(&winverinfo) && winverinfo.dwMajorVersion >= 5) { + /* we're on Vista, were asked to install for all users, but don't have + priviledges to do so. Ask to spawn the process elevated. */ + char exename[MAX_PATH]; + GetModuleFileName(NULL, exename, sizeof(exename)); + if((int)ShellExecute(0, "runas", exename, "elevated", NULL, SW_SHOWNORMAL)>32) { + /* that worked- the second process will do the work */ + exit(0); + } + } + } + } + return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_BACK|PSWIZB_NEXT); +} +HWND statuswnd; +static int progress_pos = 0; + +void PropertyArchiveError(char*text) +{ + while(1) { + int ret = MessageBox(0, text, "Error", MB_RETRYCANCEL|MB_ICONERROR); + if(ret==IDRETRY) continue; + else break; + } +} + +void PropertyArchive_NewFile(char*filename) +{ + addFile(filename); + processMessages(); +} +void PropertyArchive_NewDirectory(char*filename) +{ + addDir(filename); + processMessages(); +} - if(ret == IDNO) +static int lastlen = 0; +void PropertyArchiveStatus(int pos, int len) +{ + if(len!=lastlen) { + SendDlgItemMessage(statuswnd, IDC_PROGRESS, PBM_SETRANGE, 0, (LPARAM)MAKELONG(0,len)); + lastlen = len; + } + SendDlgItemMessage(statuswnd, IDC_PROGRESS, PBM_SETPOS, pos, 0); + processMessages(); + Sleep(30); +} +void PropertyArchiveMessage(char*text) +{ + if(text && text[0]=='[') { + return; + } + SetDlgItemText(statuswnd, IDC_INFO, strdup(text)); + processMessages(); +} + +void print_space(char*dest, char*msg, ULONGLONG size) +{ + if(size < 1024) + sprintf(dest, "%s%d Bytes", msg, size); + else if(size < 1048576l) + sprintf(dest, "%s%.2f Kb", msg, size/1024.0); + else if(size < 1073741824l) + sprintf(dest, "%s%.2f Mb", msg, size/1048576.0); + else if(size < 1099511627776ll) + sprintf(dest, "%s%.2f Gb", msg, size/1073741824.0); + else + sprintf(dest, "%s%.2f Tb", msg, size/1125899906842624.0); +} + +BOOL CALLBACK PropertySheetFunc3(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) { + HWND dialog = GetParent(hwnd); + if(message == WM_INITDIALOG) { + SetDlgItemText(hwnd, IDC_INFO, "Ready to install"); + + char buf[256]; + print_space(buf, "Space required: ", crn_decompressed_size); + SetDlgItemText(hwnd, IDC_SPACE1, buf); + ULARGE_INTEGER available,total,totalfree; + available.QuadPart=0; + total.QuadPart=0; + totalfree.QuadPart=0; + if(GetDiskFreeSpaceEx(install_path, &available, &total, &totalfree)) { + print_space(buf, "Space available: ", available.QuadPart); + } else { + sprintf(buf, "Space available: [Error %d]", GetLastError()); + if((GetLastError() == ERROR_FILE_NOT_FOUND || GetLastError() == ERROR_PATH_NOT_FOUND) + && install_path[0] && install_path[1]==':') { + /* installation directory does not yet exist */ + char path[3]={'c',':',0}; + path[0] = install_path[0]; + if(GetDiskFreeSpaceEx(path, &available, &total, &totalfree)) { + print_space(buf, "Space available: ", available.QuadPart); + } + } + } + SetDlgItemText(hwnd, IDC_SPACE2, buf); + } + if(message == WM_NOTIFY && (((LPNMHDR)lParam)->code == PSN_WIZNEXT)) { + SetDlgItemText(hwnd, IDC_SPACE1, ""); + SetDlgItemText(hwnd, IDC_SPACE2, ""); + PropSheet_SetWizButtons(dialog, 0); + SendMessage(dialog, PSM_CANCELTOCLOSE, 0, 0); //makes wine display a warning + SetDlgItemText(hwnd, IDC_TITLE, "Installing..."); + statuswnd = hwnd; + status_t status; + status.status = PropertyArchiveStatus; + status.message = PropertyArchiveMessage; + status.error = PropertyArchiveError; + status.new_file = PropertyArchive_NewFile; + status.new_directory = PropertyArchive_NewDirectory; + int success = unpack_archive(crndata, crndata_len, install_path, &status); + memset(&status, 0, sizeof(status_t)); + if(!success) { + MessageBox(0, "Couldn't extract all installation files", INSTALLER_NAME, MB_OK|MB_ICONERROR); + do_abort=1; + exit(1); + } return 0; - - CreateWindow ( - wcl.lpszClassName, /* Class name */ - "Installing...", /* Caption */ - WS_OVERLAPPEDWINDOW&(~WS_SIZEBOX), /* Style */ - CW_USEDEFAULT, /* Initial x (use default) */ - CW_USEDEFAULT, /* Initial y (use default) */ - 260, /* Initial x size */ - 128, /* Initial y size */ - NULL, /* No parent window */ - NULL, /* No menu */ - me, /* This program instance */ - (void*)"progress" /* Creation parameters */ - ); - ShowWindow (wnd_progress, nWinMode); - UpdateWindow (wnd_progress); - - int success = unpack_archive(crndata, "C:\\swftools\\", myarchivestatus); - - DestroyWindow(wnd_progress); + } + return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_BACK|PSWIZB_NEXT); +} - while(wnd_progress) - processMessages(); +static HRESULT (WINAPI *f_SHGetSpecialFolderPath)(HWND hwnd, LPTSTR lpszPath, int nFolder, BOOL fCreate); + +BOOL CALLBACK PropertySheetFunc4(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) { + if(message == WM_INITDIALOG) { + pdf2swf_dir = install_path; //concatPaths(install_path, "gpdf2swf"); + pdf2swf_path = concatPaths(pdf2swf_dir, "gpdf2swf.exe"); + FILE*fi = fopen(pdf2swf_path, "rb"); + if(fi) { + printf("a GUI program exists, creating desktop/startmenu links\n"); + config_createLinks = 1; + fclose(fi); + } else { + config_createLinks = 0; + config_createStartmenu = 0; + config_createDesktop = 0; + } + if(!config_createLinks) { + SendDlgItemMessage(hwnd, IDC_STARTMENU, BN_DISABLE, 0, 0); + SendDlgItemMessage(hwnd, IDC_DESKTOP, BN_DISABLE, 0, 0); + } - if(!addRegistryEntries(install_dir)) { - success = 0; - ret = MessageBox(0, "Couldn't create Registry Entries", "SWFTools Install", MB_OK|MB_ICONERROR); + SendDlgItemMessage(hwnd, IDC_STARTMENU, BM_SETCHECK, config_createStartmenu, 0); + SendDlgItemMessage(hwnd, IDC_DESKTOP, BM_SETCHECK, config_createDesktop, 0); + } + if(message == WM_COMMAND) { + if((wParam&0xffff) == IDC_STARTMENU) { + config_createStartmenu = SendDlgItemMessage(hwnd, IDC_STARTMENU, BM_GETCHECK, 0, 0); + if(config_createLinks) { + config_createStartmenu^=1; + } + SendDlgItemMessage(hwnd, IDC_STARTMENU, BM_SETCHECK, config_createStartmenu, 0); + return 0; + } + if((wParam&0xffff) == IDC_DESKTOP) { + config_createDesktop = SendDlgItemMessage(hwnd, IDC_DESKTOP, BM_GETCHECK, 0, 0); + if(config_createLinks) { + config_createDesktop^=1; + } + SendDlgItemMessage(hwnd, IDC_DESKTOP, BM_SETCHECK, config_createDesktop, 0); + return 0; + } } - if(success) { - sprintf(buf, "SWFTools Version %s has been installed into %s successfully", VERSION, install_dir); - ret = MessageBox(0, buf, "SWFTools Install", MB_OK|MB_ICONINFORMATION); - } else { - /* error will already have been notified by either myarchivestatus or some other - routine */ - /*sprintf(buf, "Installation failed\nLast message: %s", lastmessage); - ret = MessageBox(0, buf, "SWFTools Install", MB_OK|MB_ICONERROR);*/ + if(message == WM_NOTIFY && (((LPNMHDR)lParam)->code == PSN_WIZFINISH)) { + if(!addRegistryEntries(install_path)) { + MessageBox(0, "Couldn't create Registry Entries", INSTALLER_NAME, MB_OK|MB_ICONERROR); + return 1; + } + + char mypath[MAX_PATH]; + path_startmenu[0] = 0; + path_desktop[0] = 0; + if(config_forAllUsers) { + f_SHGetSpecialFolderPath(NULL, path_desktop, CSIDL_COMMON_DESKTOPDIRECTORY, 0); + f_SHGetSpecialFolderPath(NULL, path_startmenu, CSIDL_COMMON_PROGRAMS, 0); + } + /* get local program/desktop directory- this is both for forAllUsers=0 as well + as a fallback if the above didn't return any paths */ + if(!path_startmenu[0]) { + f_SHGetSpecialFolderPath(NULL, path_startmenu, CSIDL_PROGRAMS, 0); + } + if(!path_desktop[0]) { + f_SHGetSpecialFolderPath(NULL, path_desktop, CSIDL_DESKTOPDIRECTORY, 0); + } + + char*uninstall_path = concatPaths(install_path, "uninstall.exe"); + + if(config_createLinks) { + if(config_createDesktop && path_desktop[0]) { + char* linkName = concatPaths(path_desktop, "pdf2swf.lnk"); + printf("Creating desktop link %s -> %s\n", linkName, pdf2swf_path); + if(!CreateShortcut(pdf2swf_path, "pdf2swf", linkName, 0, 0, 0, pdf2swf_dir)) { + MessageBox(0, "Couldn't create desktop shortcut", INSTALLER_NAME, MB_OK); + return 1; + } + } + if(config_createStartmenu && path_startmenu[0]) { + char* group = concatPaths(path_startmenu, "pdf2swf"); + CreateDirectory(group, 0); + addDir(group); + char* linkName = concatPaths(group, "pdf2swf.lnk"); + if(!CreateShortcut(pdf2swf_path, "pdf2swf", concatPaths(group, "pdf2swf.lnk"), 0, 0, 0, pdf2swf_dir) || + !CreateShortcut(uninstall_path, "uninstall", concatPaths(group, "uninstall.lnk"), 0, 0, 0, install_path)) { + MessageBox(0, "Couldn't create start menu entry", INSTALLER_NAME, MB_OK); + return 1; + } + } + } else { + printf("not creating desktop/startmenu links\n"); + } + + char*uninstall_ini = concatPaths(install_path, "uninstall.ini"); + addFile(uninstall_ini); + writeFileList(installedFiles, uninstall_ini); } - exit(0); + return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_FINISH); } +#endif +#ifdef DEINSTALL +void findfiles(char*path, int*pos, char*data, int len, char del) +{ + WIN32_FIND_DATA findFileData; + HANDLE hFind = FindFirstFile(concatPaths(path, "*"), &findFileData); + if(hFind == INVALID_HANDLE_VALUE) + return; + do { + if(findFileData.cFileName[0] == '.' && + (findFileData.cFileName[0] == '.' || findFileData.cFileName == '\0')) + continue; + char*f = concatPaths(path, findFileData.cFileName); + if(findFileData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) { + findfiles(f, pos, data, len, del); + /* always try to remove directories- if they are empty, this + will work, and they won't prevent superdirectory deletion later */ + RemoveDirectory(f); + } else { + int l = strlen(f); + + /* don't list the uninstaller as file- it's going to be removed *after* + everything else is done */ + char*uninstaller="uninstall.exe"; + int ll = strlen(uninstaller); + if(l>=ll) { + if(!strcasecmp(&f[l-ll],uninstaller)) { + continue; + } + } + if(data) { + if(*pos+l <= len) { + memcpy(&data[*pos], f, l);(*pos)+=l; + data[(*pos)++] = '\r'; + data[(*pos)++] = '\n'; + data[(*pos)] = 0; + } + } else { + (*pos) += l+2; + } + if(del) { + DeleteFile(f); + } + } + } while(FindNextFile(hFind, &findFileData)); + FindClose(hFind); +} + +static char*extrafiles = 0; + +BOOL CALLBACK PropertySheetFunc5(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) { + HWND dialog = GetParent(hwnd); + if(message == WM_INITDIALOG) { + SetDlgItemText(hwnd, IDC_INFO, "Ready to uninstall"); + } + if(message == WM_NOTIFY && (((LPNMHDR)lParam)->code == PSN_WIZNEXT)) { + + filelist_t* list = readFileList("uninstall.ini"); + if(!list) { + list = readFileList(concatPaths(install_path, "uninstall.ini")); + if(!list) { + //Don't abort. If there's still something there, it'll be catched by the "extra files" + //functionality later + //MessageBox(0, "Couldn't determine installed files list- did you run uninstall twice?", INSTALLER_NAME, MB_OK); + //exit(-1); + } + } + filelist_t* l = list; + int num = 0; + while(l) {num++;l=l->next;} + + PropSheet_SetWizButtons(dialog, 0); + SendMessage(dialog, PSM_CANCELTOCLOSE, 0, 0); + SetDlgItemText(hwnd, IDC_TITLE, "Uninstalling files..."); + SendDlgItemMessage(hwnd, IDC_PROGRESS, PBM_SETRANGE, 0, (LPARAM)MAKELONG(0,num)); + num = 0; + l = list; + while(l) { + SendDlgItemMessage(hwnd, IDC_PROGRESS, PBM_SETPOS, num, 0); + if(l->type=='F') + DeleteFile(l->filename); + else if(l->type=='D') + RemoveDirectory(l->filename); + else if(l->type=='I') + /* skip- we will remove ourselves later */; + num++;l = l->next; + } + + int len = 0; + findfiles(install_path, &len, 0, 0, 0); + if(len) { + extrafiles = malloc(len); + int pos = 0; + findfiles(install_path, &pos, extrafiles, len, 0); + } else { + PropSheet_RemovePage(dialog, 1, 0); + } + return 0; + } + return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_BACK|PSWIZB_NEXT); +} + +BOOL CALLBACK PropertySheetFunc6(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) { + if(message == WM_INITDIALOG) { + SendDlgItemMessage(hwnd, IDC_DELETEEXTRA, BM_SETCHECK, config_deleteextra, 0); + if(extrafiles) { + SetDlgItemText(hwnd, IDC_FILELIST, extrafiles); + } + } + if(message == WM_COMMAND) { + if((wParam&0xffff) == IDC_DELETEEXTRA) { + config_deleteextra = SendDlgItemMessage(hwnd, IDC_DELETEEXTRA, BM_GETCHECK, 0, 0); + config_deleteextra ^=1; + SendDlgItemMessage(hwnd, IDC_DELETEEXTRA, BM_SETCHECK, config_deleteextra, 0); + return 0; + } + } + if(message == WM_NOTIFY && (((LPNMHDR)lParam)->code == PSN_WIZNEXT)) { + if(config_deleteextra) { + int pos = 0; + findfiles(install_path, &pos, 0, 0, 1); + } + } + return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_NEXT); +} + +BOOL CALLBACK PropertySheetFunc7(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) { + if(message == WM_INITDIALOG) { + // ... + } + return PropertySheetFuncCommon(hwnd, message, wParam, lParam, PSWIZB_FINISH); +} +#endif + +#ifndef PSP_HIDEHEADER +#define PSP_HIDEHEADER 2048 +#endif + +typedef struct _wizardpage { + DLGPROC function; + int resource; +} wizardpage_t; + +void runPropertySheet(HWND parent) +{ + PROPSHEETHEADER sheet; + + wizardpage_t wpage[5] = { +#ifndef DEINSTALL + {PropertySheetFunc1, IDD_LICENSE}, + {PropertySheetFunc2, IDD_INSTALLDIR}, + {PropertySheetFunc3, IDD_PROGRESS}, + {PropertySheetFunc4, IDD_FINISH}, +#else + {PropertySheetFunc5, IDD_SURE}, + {PropertySheetFunc6, IDD_EXTRAFILES}, + {PropertySheetFunc7, IDD_DEINSTALLED}, +#endif + }; + + int num = sizeof(wpage)/sizeof(wpage[0]); + +#ifndef DEINSTALL + if(elevated) { + /* remove license. + TODO: remove installdir querying, too (pass installdir + to second process) */ + int t; + for(t=1;t