summaryrefslogtreecommitdiffabout
path: root/install/install.cpp
Unidiff
Diffstat (limited to 'install/install.cpp') (more/less context) (ignore whitespace changes)
-rw-r--r--install/install.cpp70
1 files changed, 70 insertions, 0 deletions
diff --git a/install/install.cpp b/install/install.cpp
new file mode 100644
index 0000000..212ad40
--- a/dev/null
+++ b/install/install.cpp
@@ -0,0 +1,70 @@
1#include "resource.h"
2#include "../shared-code/install.h"
3
4 #define KINAME"KLog 1.00 Beta 2"
5 #define SKINAME"KLog"
6
7BOOL Install(void)
8{
9STRING dPath = strFETCH_REG_KEY(HKEY_LOCAL_MACHINE,"Software\\Klever Group, Inc.", SKINAME "Path");
10STRING kPath = strFETCH_REG_KEY(HKEY_LOCAL_MACHINE,"Software\\Klever Group, Inc.","KINPath");
11LPCSTR qPath = ((LPCSTR)dPath)?(LPCSTR)dPath:(((LPCSTR)kPath)?(LPSTR)kPath:"C:\\Program Files\\Klever\\Nothings");
12STRING path = REQUESTPATH(" " KINAME,"\nEnter destination path:",qPath);
13 if(!path)
14 return NULL;
15 #ifdefK_ANNED
16STRING sysDir(_MAX_PATH);
17 GetSystemDirectory(sysDir,_MAX_PATH);
18 INSTALLFILE("mfc42.dl_",sysDir,"mfc42.dll");
19#endif
20
21 MAKE_PATH(path);
22STRING shortPath = GET_SHORT_PATH(path);
23 if(!shortPath){
24 MessageBox(NULL,"Failed to install " KINAME " in specified directory",NULL,MB_ICONERROR|MB_OK);
25 return FALSE;
26 }
27
28 if(!(
29 INSTALLFILE(SKINAME ".ex_",path, SKINAME ".exe") &&
30 INSTALLFILE(SKINAME ".hl_",path, SKINAME ".hlp") &&
31 INSTALLFILE(SKINAME ".cn_",path, SKINAME ".cnt")
32 )){
33 MessageBox(NULL,"Failed to install " KINAME "in specified directory",NULL,MB_ICONERROR|MB_OK);
34 return FALSE;
35 }
36
37 ADDMENU("Accessories\\Klever Co.",SKINAME,path,SKINAME ".exe");
38 strSET_REG_KEY(HKEY_LOCAL_MACHINE,"Software\\Klever Group, Inc.",SKINAME "Path",path);
39 strSET_REG_KEY(HKEY_LOCAL_MACHINE,"Software\\Klever Group, Inc.","KINPath",path);
40
41FILE* inf=CREATE_INF_FILE(path,SKINAME ".INF");
42 if(!inf){
43 MessageBox(NULL,"Failed to install " KINAME,NULL,MB_ICONERROR|MB_OK);
44 return FALSE;
45
46 }
47
48 INF_FILE_HEADER(inf);
49 INF_FILE_SECTION(inf,"Uninstall");
50 fprintf(inf,"AddReg=kFiles\nDelReg=kReg\nUpdateInis=kMenu\n");
51
52 INF_FILE_SECTION(inf,"kFiles");
53 INF_REMOVE_ROOT(inf,SKINAME "Files",shortPath);
54 INF_REMOVE_FILE(inf,SKINAME "Files",SKINAME ".exe");
55 INF_REMOVE_HELP_FILE(inf,SKINAME "Files",SKINAME);
56 INF_REMOVE_FILE(inf,SKINAME "Files",SKINAME ".inf");
57
58 INF_FILE_SECTION(inf,"kReg");
59 INF_UNINSTALL_REG(inf,SKINAME);
60
61 INF_FILE_SECTION(inf,"kMenu");
62 INF_MENU_GROUP(inf,1,"Accessories\\Klever Co.");
63 INF_MENU_ITEM(inf,1,SKINAME);
64 fclose(inf);
65 REG_UNINSTALL_COMMAND(SKINAME,"Klever " KINAME,shortPath,SKINAME ".INF","Uninstall");
66
67 MessageBox(NULL,KINAME " installed successfully, you may now run it from Programs/Accessories/Klever Co. menu, move it to your Startup group or remove it using Control Panel Add/Remove Programs applet."," Rejoice!",MB_ICONINFORMATION|MB_OK);
68
69 return TRUE;
70}