--- /dev/null
+/*
+ * instsup.c (c) 1999,2000 Brian Smith
+ */
+
+#include "wx/wxprec.h"
+
+#ifndef WX_PRECOMP
+#include "wx/wx.h"
+#endif
+
+#include <stdio.h>
+#include <stddef.h>
+#include <stdlib.h>
+#include <stdarg.h>
+#include <string.h>
+#include <fcntl.h>
+#if defined(__OS2__) || defined(__EMX__) || defined(WIN32) || defined(WINNT)
+#include <process.h>
+#endif
+#include <sys/types.h>
+#ifdef WIN32
+#include <shlobj.h>
+#endif
+#include "install.h"
+#include "instsup.h"
+
+extern char *INSTALLER_TITLE;
+extern char *INSTALLER_PROGRAM;
+extern char *INSTALLER_FOLDER;
+extern char *INSTALLER_SHADOW;
+extern char *INSTALLER_OBJECT;
+extern char tempPath[], installdir[], csfile[], bufile[], bootdrive[], instlog[], installdir2[];
+extern int installstate, success;
+
+extern FILE *self;
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+char *replaceem(char *orig);
+
+int sendmessage(int destination, int messid)
+{
+#if 0
+ /* Update percentage bar */
+ if(messid == 1)
+ {
+ wxMutexGuiEnter();
+
+ updatepercent();
+
+ wxMutexGuiLeave();
+ }
+ if(messid == 2)
+ {
+ extern wxCondition *InstCond;
+
+ InstCond->Broadcast();
+ }
+
+#endif
+ return 0;
+}
+
+void DoGUI(void)
+{
+ updatepercent();
+ wxYield();
+}
+/* This should return the current color depth */
+unsigned long color_depth(void)
+{
+#if __OS2__
+ HDC hdc = WinOpenWindowDC(HWND_DESKTOP);
+ LONG colors;
+
+ DevQueryCaps(hdc, CAPS_COLORS, 1, &colors);
+ DevCloseDC(hdc);
+ return colors;
+#endif
+ return 0;
+}
+
+/*
+ * Call the reboot vector.
+ */
+void sysreboot(void)
+{
+#if __OS2__
+#define SYSFUNC 0xD5
+#define REBOOT 0xAB
+#define REBOOTDEV "\\DEV\\DOS$"
+
+ APIRET rc;
+ HFILE hREBOOT;
+ ULONG ulAction;
+
+ rc = DosOpen(REBOOTDEV,
+ &hREBOOT,
+ &ulAction,
+ 0L,
+ FILE_NORMAL,
+ FILE_OPEN,
+ OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE,
+ 0L);
+ if (rc == 0)
+ {
+ DosDevIOCtl(hREBOOT,
+ SYSFUNC,
+ REBOOT,
+ NULL,
+ 0L,
+ NULL,
+ NULL,
+ 0L,
+ NULL);
+ DosClose(hREBOOT);
+ }
+#endif
+}
+
+/*
+ * Display an informational dialog box to the user with the given text.
+ */
+int mesg(char *format, ...) {
+ va_list args;
+ char outbuf[4096];
+
+ va_start(args, format);
+ vsprintf(outbuf, format, args);
+ va_end(args);
+
+ wxMessageBox(outbuf, INSTALLER_TITLE,
+ wxOK | wxICON_EXCLAMATION, NULL);
+
+ return strlen(outbuf);
+}
+
+int checktext(char *text, char *buffer, int buflen)
+{
+ int z, len = strlen(text);
+
+ for(z=0;z<(buflen-len);z++)
+ {
+ if(memcmp(text, &buffer[z], len) == 0)
+ return z;
+ }
+ return -1;
+
+}
+
+/*
+ * Returns the offset withing the executable to the specified text.
+ */
+long findtext(char *text)
+{
+ char buffer[512];
+ int offset;
+ unsigned long curpos = 0;
+
+ fseek(self, 0, SEEK_SET);
+ fread(buffer, 1, 512, self);
+ if((offset = checktext(text, buffer, 512)) > -1)
+ return offset;
+ while(!feof(self))
+ {
+ memcpy(buffer, &buffer[256], 256);
+ fread(&buffer[256], 1, 256, self);
+ curpos += 256;
+ if((offset = checktext(text, buffer, 512)) > -1)
+ return offset+curpos;
+
+ }
+ return -1;
+}
+
+/* We encode archive search text so we don't get confused
+ * by the string table - I was using LXLite to take care
+ * of this problem on OS/2 but in portable code this may
+ * not be an option. */
+char *decode(char *input)
+{
+ char *result;
+ int i = 0;
+
+ result = (char *)malloc(strlen(input) / 2 + 1);
+
+ while (input[0] && input[1])
+ {
+ result[i] = ((input[0] - 0x41) << 4) | (input[1] - 0x41);
+ input += 2;
+ i++;
+ }
+ result[i] = '\0';
+
+ return result;
+}
+
+/*
+ * Removes any carriage returns or line feeds from the buffer.
+ */
+void stripcrlf(char *buffer)
+{
+ int z, len = strlen(buffer);
+
+ for(z=0;z<len;z++)
+ {
+ if(buffer[z] == '\r' || buffer[z] == '\n')
+ {
+ buffer[z] = 0;
+ return;
+ }
+ }
+}
+
+/*
+ * Returns the space free on a given drive... where 0 is A: in MB
+ */
+unsigned long drivefree(int drive)
+{
+#if __OS2__
+ ULONG aulFSInfoBuf[40] = {0};
+ APIRET rc = NO_ERROR;
+ double bytesFree;
+
+ DosError(FERR_DISABLEHARDERR);
+ rc = DosQueryFSInfo(drive,
+ FSIL_ALLOC,
+ (PVOID)aulFSInfoBuf,
+ sizeof(aulFSInfoBuf));
+
+ DosError(FERR_ENABLEHARDERR);
+ if (rc != NO_ERROR)
+ return 0;
+
+ bytesFree = (double)aulFSInfoBuf[3] * (double)aulFSInfoBuf[1] * (USHORT)aulFSInfoBuf[4];
+ return (unsigned long)(bytesFree / (1024.0 * 1024.0));
+#endif
+ return 0;
+}
+
+
+/*
+ * Display a fatal error message and set the abort flag in case we are in a secondary thread.
+ */
+void error(char *format, ...) {
+ va_list args;
+ char errstring[1024];
+
+ va_start(args, format);
+ vsprintf(errstring, format, args);
+ va_end(args);
+
+ if(installstate != ABORTED)
+ {
+ success=1;
+ installstate=ABORTED;
+ }
+ wxMessageBox(errstring, INSTALLER_TITLE,
+ wxOK | wxICON_EXCLAMATION, NULL);
+}
+
+void setdrivedir(char *drivedir)
+{
+ wxSetWorkingDirectory(drivedir);
+}
+
+/*
+ * Make the TEMP directory the current directory, or the root directory of the boot drive.
+ */
+void settempdir(void)
+{
+#if defined(__EMX__) || defined(__OS2__) || defined(WIN32) || defined(WINNT)
+ /* Windows or OS/2 */
+ char *envdir = getenv("TMP");
+ int len;
+
+ if (!envdir)
+ envdir = getenv("TEMP");
+ if (!envdir)
+ envdir = replaceem("%BOOTDRIVE%:\\");
+ strcpy(tempPath,envdir);
+ len = strlen(tempPath);
+ if (len > 3 && tempPath[len-1] == '\\')
+ tempPath[len-1] = 0;
+ strupr(tempPath);
+ setdrivedir(tempPath);
+#else
+ /* Unix */
+ setdrivedir("/tmp");
+#endif
+}
+
+void getbootdrive(void)
+{
+ /* On windows I don't think you can boot from anything
+ except C: drive. So I am not going to do anything here. */
+}
+
+void PM_backslash(char *s)
+{
+ unsigned int pos = strlen(s);
+ if (s[pos-1] != '\\') {
+ s[pos] = '\\';
+ s[pos+1] = '\0';
+ }
+}
+
+/*
+ * Makes a folder on the desktop.
+ */
+void MakeFolder(char Title[], char Icon[], char dest[], char id[], char setup[])
+{
+#ifdef __OS2__
+ char szArg[200];
+
+ memset(szArg,0,sizeof(szArg));
+
+ if ((Icon != NULL) && (strlen(Icon) != 0))
+ {
+ strcat(szArg,"ICONFILE=");
+ strcat(szArg,Icon);
+ }
+
+ if ((id != NULL) && (strlen(id) != 0))
+ {
+ strcat(szArg,";OBJECTID=");
+ strcat(szArg,id);
+ }
+
+ if ((setup != NULL) && (strlen(setup) != 0))
+ {
+ strcat(szArg,";");
+ strcat(szArg,setup);
+ }
+
+ WinCreateObject("WPFolder",Title,szArg,dest,CO_REPLACEIFEXISTS);
+#elif defined(WIN32)
+ char startpath[MAX_PATH];
+ LPITEMIDLIST pidl;
+
+ if(!SHGetSpecialFolderLocation(NULL, CSIDL_PROGRAMS, &pidl))
+ {
+ SHGetPathFromIDList(pidl, startpath);
+
+ if(startpath[strlen(startpath)-1] != '\\')
+ strcat(startpath, "\\");
+ strcat(startpath, Title);
+ CreateDirectory(startpath, NULL);
+ }
+#else
+ /* Unix? */
+#endif
+}
+
+#ifdef WIN32
+HRESULT CreateLink(LPCSTR lpszPathObj,
+ LPSTR lpszPathLink, LPSTR lpszDesc)
+{
+ HRESULT hres;
+ IShellLink* psl;
+
+ // Get a pointer to the IShellLink interface.
+ hres = CoCreateInstance(CLSID_ShellLink, NULL,
+ CLSCTX_INPROC_SERVER, IID_IShellLink, (void **)&psl);
+ if (SUCCEEDED(hres)) {
+ IPersistFile* ppf;
+
+ // Set the path to the shortcut target, and add the
+ // description.
+ psl->SetPath(lpszPathObj);
+
+ psl->SetDescription(lpszDesc);
+
+ // Query IShellLink for the IPersistFile interface for saving the
+ // shortcut in persistent storage.
+ hres = psl->QueryInterface(IID_IPersistFile,
+ (void **)&ppf);
+
+ if (SUCCEEDED(hres)) {
+ WCHAR wsz[MAX_PATH];
+
+ // Ensure that the string is ANSI.
+ MultiByteToWideChar(CP_ACP, 0, lpszPathLink, -1,
+ wsz, MAX_PATH);
+
+
+ // Save the link by calling IPersistFile::Save.
+ hres = ppf->Save(wsz, TRUE);
+ ppf->Release();
+ }
+ psl->Release();
+ }
+ return hres;
+}
+#endif
+
+/*
+ * Makes a Program object on the desktop.
+ */
+void MakeProgram(char Title[], char Program[], char Icon[], char dest[], char id[], char setup[])
+{
+#ifdef __OS2__
+ char szArg[200];
+
+ memset(szArg,0,sizeof(szArg));
+
+ strcat(szArg,"EXENAME=");
+ strcat(szArg,Program);
+
+ if ((Icon != NULL) && (strlen(Icon) != 0))
+ {
+ strcat(szArg,";ICONFILE=");
+ strcat(szArg,Icon);
+ }
+
+ if ((id != NULL) && (strlen(id) != 0))
+ {
+ strcat(szArg,";OBJECTID=");
+ strcat(szArg,id);
+ }
+
+ if ((setup != NULL) && (strlen(setup) != 0))
+ {
+ strcat(szArg,";");
+ strcat(szArg,setup);
+ }
+
+ WinCreateObject("WPProgram",Title,szArg,dest,CO_REPLACEIFEXISTS);
+#elif defined(WIN32)
+ char startpath[MAX_PATH];
+ LPITEMIDLIST pidl;
+
+ if(!SHGetSpecialFolderLocation(NULL, CSIDL_PROGRAMS, &pidl))
+ {
+ SHGetPathFromIDList(pidl, startpath);
+
+ if(startpath[strlen(startpath)-1] != '\\')
+ strcat(startpath, "\\");
+ strcat(startpath, dest);
+ strcat(startpath, "\\");
+ strcat(startpath, Title);
+ strcat(startpath, ".lnk");
+
+ CoInitialize(NULL);
+ CreateLink(Program, startpath, Title);
+ CoUninitialize();
+ }
+
+
+#else
+ /* Unix? */
+#endif
+}
+/*
+ * Makes a user defined object on the desktop.
+ */
+void MakeObject(char Title[], char oclass[], char dest[], char id[], char setup[])
+{
+#ifdef __OS2__
+ char szArg[200];
+
+ memset(szArg,0,sizeof(szArg));
+
+ if ((oclass == NULL) || (strlen(oclass) == 0))
+ return;
+
+ if ((id != NULL) && (strlen(id) != 0))
+ {
+ strcat(szArg,"OBJECTID=");
+ strcat(szArg,id);
+ }
+
+ if ((setup != NULL) && (strlen(setup) != 0))
+ {
+ if ((id != NULL) && (strlen(id) != 0))
+ strcat(szArg,";");
+ strcat(szArg,setup);
+ }
+
+ WinCreateObject(oclass,Title,szArg,dest,CO_REPLACEIFEXISTS);
+#elif defined(WIN32)
+ /* Not sure if there is an equivilent on Windows */
+#else
+ /* Unix? */
+#endif
+}
+/*
+ * Makes a shadow on the desktop.
+ */
+void MakeShadow(char Title[], char reference[], char dest[], char id[])
+{
+#ifdef __OS2__
+ char szArg[400];
+
+ memset(szArg,0,sizeof(szArg));
+
+ strcpy(szArg,"SHADOWID=");
+ strcat(szArg,reference);
+ if ((id != NULL) && (strlen(id) != 0))
+ {
+ strcat(szArg,";OBJECTID=");
+ strcat(szArg,id);
+ }
+ strcat(szArg,";");
+ WinCreateObject("WPShadow",Title,szArg,dest,CO_REPLACEIFEXISTS);
+#elif defined(WIN32)
+ /* Nothing like this on Windows9x anyway */
+#else
+ /* Unix? */
+#endif
+}
+
+/* This creates program objects on the desktop, it was originally designed
+ * for the OS/2 Workplace Shell so it may be somewhat different in use on
+ * other platforms.
+ */
+void create_wps_objects(void)
+{
+ char *arg1, *arg2, *arg3, *arg4, *arg5, *arg6;
+ char temp[5000];
+ char zerotext[2] = "";
+ int z, argn, len;
+
+ /* No distinction for the moment... this may change.. */
+ strcpy(installdir2, installdir);
+
+ /* Create Folder Objects */
+ if(strlen(INSTALLER_FOLDER)>0)
+ {
+ strcpy(temp, replaceem(INSTALLER_FOLDER));
+ argn=0;
+ arg1=&temp[0];
+ arg2=arg3=arg4=arg5=&zerotext[0];
+ len = strlen(temp);
+ for(z=0;z<len;z++)
+ {
+ if(temp[z]==',')
+ {
+ argn++;
+ temp[z]=0;
+ switch(argn)
+ {
+ case 1:
+ arg2=&temp[z+1];
+ break;
+ case 2:
+ arg3=&temp[z+1];
+ break;
+ case 3:
+ arg4=&temp[z+1];
+ break;
+ case 4:
+ arg5=&temp[z+1];
+ break;
+ case 5:
+ argn=0;
+ MakeFolder(arg1, arg2, arg3, arg4, arg5);
+#ifdef ENABLE_LOGGING
+ fprintf(logfile, "<WPSFolderAdd>,%s,%s,%s,%s,%s\r\n", arg1, arg2,arg3,arg4,arg5);
+#endif
+ arg1=&temp[z+1];
+ arg2=arg3=arg4=arg5=&zerotext[0];
+ break;
+ }
+ }
+ }
+ MakeFolder(arg1, arg2, arg3, arg4, arg5);
+#ifdef ENABLE_LOGGING
+ fprintf(logfile, "<WPSFolderAdd>,%s,%s,%s,%s,%s\r\n", arg1, arg2,arg3,arg4,arg5);
+#endif
+ }
+
+ /* Create Program Objects */
+ if(strlen(INSTALLER_PROGRAM)>0)
+ {
+ strcpy(temp, replaceem(INSTALLER_PROGRAM));
+ argn=0;
+ arg1=&temp[0];
+ arg2=arg3=arg4=arg5=arg6=&zerotext[0];
+ len = strlen(temp);
+ for(z=0;z<len;z++)
+ {
+ if(temp[z]==',')
+ {
+ argn++;
+ temp[z]=0;
+ switch(argn)
+ {
+ case 1:
+ arg2=&temp[z+1];
+ break;
+ case 2:
+ arg3=&temp[z+1];
+ break;
+ case 3:
+ arg4=&temp[z+1];
+ break;
+ case 4:
+ arg5=&temp[z+1];
+ break;
+ case 5:
+ arg6=&temp[z+1];
+ break;
+ case 6:
+ argn=0;
+ MakeProgram(arg1, arg2, arg3, arg4, arg5, arg6);
+#ifdef ENABLE_LOGGING
+ fprintf(logfile, "<WPSProgramAdd>,%s,%s,%s,%s,%s,%s\r\n", arg1,arg2,arg3,arg4,arg5,arg6);
+#endif
+ arg1=&temp[z+1];
+ arg2=arg3=arg4=arg5=arg6=&zerotext[0];
+ break;
+ }
+ }
+ }
+ MakeProgram(arg1, arg2, arg3, arg4, arg5, arg6);
+#ifdef ENABLE_LOGGING
+ fprintf(logfile, "<WPSProgramAdd>,%s,%s,%s,%s,%s,%s\r\n", arg1, arg2,arg3,arg4,arg5,arg6);
+#endif
+ }
+
+ /* Create Shadow Objects */
+ if(strlen(INSTALLER_SHADOW)>0)
+ {
+ strcpy(temp, replaceem(INSTALLER_SHADOW));
+ argn=0;
+ arg1=&temp[0];
+ arg2=arg3=arg4=&zerotext[0];
+ len = strlen(temp);
+ for(z=0;z<len;z++)
+ {
+ if(temp[z]==',')
+ {
+ argn++;
+ temp[z]=0;
+ switch(argn)
+ {
+ case 1:
+ arg2=&temp[z+1];
+ break;
+ case 2:
+ arg3=&temp[z+1];
+ break;
+ case 3:
+ arg4=&temp[z+1];
+ break;
+ case 4:
+ argn=0;
+ MakeShadow(arg1, arg2, arg3, arg4);
+#ifdef ENABLE_LOGGING
+ fprintf(logfile, "<WPSShadowAdd>,%s,%s,%s,%s\r\n", arg1,arg2,arg3,arg4);
+#endif
+ arg1=&temp[z+1];
+ arg2=arg3=arg4=&zerotext[0];
+ break;
+ }
+ }
+ }
+ MakeShadow(arg1, arg2, arg3, arg4);
+#ifdef ENABLE_LOGGING
+ fprintf(logfile, "<WPSShadowAdd>,%s,%s,%s,%s\r\n", arg1,arg2,arg3,arg4);
+#endif
+ }
+
+ /* Create Generic Objects */
+ if(strlen(INSTALLER_OBJECT)>0)
+ {
+ strcpy(temp, replaceem(INSTALLER_OBJECT));
+ argn=0;
+ arg1=&temp[0];
+ arg2=arg3=arg4=arg5=&zerotext[0];
+ len = strlen(temp);
+ for(z=0;z<len;z++)
+ {
+ if(temp[z]==',')
+ {
+ argn++;
+ temp[z]=0;
+ switch(argn)
+ {
+ case 1:
+ arg2=&temp[z+1];
+ break;
+ case 2:
+ arg3=&temp[z+1];
+ break;
+ case 3:
+ arg4=&temp[z+1];
+ break;
+ case 4:
+ arg5=&temp[z+1];
+ break;
+ case 5:
+ argn=0;
+ MakeObject(arg1, arg2, arg3, arg4, arg5);
+#ifdef ENABLE_LOGGING
+ fprintf(logfile, "<WPSObjectAdd>,%s,%s,%s,%s,%s\r\n", arg1,arg2,arg3,arg4,arg5);
+#endif
+ arg1=&temp[z+1];
+ arg2=arg3=arg4=arg5=&zerotext[0];
+ break;
+ }
+ }
+ }
+ MakeObject(arg1, arg2, arg3, arg4, arg5);
+#ifdef ENABLE_LOGGING
+ fprintf(logfile, "<WPSObjectAdd>,%s,%s,%s,%s,%s\r\n", arg1, arg2,arg3,arg4,arg5);
+#endif
+ }
+}
+
+
+#ifdef __cplusplus
+}
+#endif
\ No newline at end of file
projects / wxWidgets.git / blobdiff