annotate gaim-installer.nsi @ 8693:f83de0baf171

[gaim-migrate @ 9446] patch from simguy to remove some verbosity from gaim -d. is verbosity a word? probly not. committer: Tailor Script <tailor@pidgin.im>
author Luke Schierer <lschiere@pidgin.im>
date Sun, 18 Apr 2004 04:21:36 +0000
parents d92a7574473c
children f55f93a975f2
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
3630
9682c0e022c6 [gaim-migrate @ 3753]
Rob Flynn <gaim@robflynn.com>
parents:
diff changeset
1 ; Installer script for win32 Gaim
3917
29ccbc3eb9c1 [gaim-migrate @ 4076]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 3910
diff changeset
2 ; Herman Bloggs <hermanator12002@yahoo.com>
3630
9682c0e022c6 [gaim-migrate @ 3753]
Rob Flynn <gaim@robflynn.com>
parents:
diff changeset
3
8388
c08d9b0dbd29 [gaim-migrate @ 9116]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8183
diff changeset
4 ; NOTE: this .NSI script is intended for NSIS 2.0 (finale release).
c08d9b0dbd29 [gaim-migrate @ 9116]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8183
diff changeset
5 ;
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
6
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
7 ;--------------------------------
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
8 ;Global Variables
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
9 Var name
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
10 Var GTK_FOLDER
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
11 Var GTK_THEME_SEL
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
12 Var LANG_IS_SET
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
13 Var ISSILENT
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
14
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
15 ;--------------------------------
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
16 ;Configuration
3630
9682c0e022c6 [gaim-migrate @ 3753]
Rob Flynn <gaim@robflynn.com>
parents:
diff changeset
17
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
18 ;The name var is set in .onInit
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
19 Name $name
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
20
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
21 !ifdef WITH_GTK
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
22 OutFile "gaim-${GAIM_VERSION}.exe"
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
23 !else
5931
8b5dd7117f56 [gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5396
diff changeset
24 !ifdef DEBUG
8b5dd7117f56 [gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5396
diff changeset
25 OutFile "gaim-${GAIM_VERSION}-debug.exe"
8b5dd7117f56 [gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5396
diff changeset
26 !else
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
27 OutFile "gaim-${GAIM_VERSION}-no-gtk.exe"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
28 !endif
5931
8b5dd7117f56 [gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5396
diff changeset
29 !endif
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
30
8180
63b771e3f2c4 [gaim-migrate @ 8897]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8179
diff changeset
31 SetCompressor lzma
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
32 ShowInstDetails show
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
33 ShowUninstDetails show
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
34 SetDateSave on
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
35
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
36 ; $name and $INSTDIR are set in .onInit function..
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
37
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
38 !include "MUI.nsh"
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
39 !include "Sections.nsh"
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
40
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
41 ;--------------------------------
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
42 ;Defines
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
43
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
44 !define GAIM_NSIS_INCLUDE_PATH ".\src\win32\nsis"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
45 !define GAIM_INSTALLER_DEPS "..\win32-dev\gaim-inst-deps"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
46
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
47 !define GAIM_REG_KEY "SOFTWARE\gaim"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
48 !define GAIM_UNINSTALL_KEY "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Gaim"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
49 !define HKLM_APP_PATHS_KEY "SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\gaim.exe"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
50 !define GAIM_STARTUP_RUN_KEY "SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
51 !define GAIM_UNINST_EXE "gaim-uninst.exe"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
52 !define GAIM_REG_LANG "Installer Language"
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
53
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
54 !define GTK_VERSION "2.2.4"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
55 !define GTK_REG_KEY "SOFTWARE\GTK\2.0"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
56 !define PERL_REG_KEY "SOFTWARE\Perl"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
57 !define PERL_DLL "perl58.dll"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
58 !define GTK_DEFAULT_INSTALL_PATH "$PROGRAMFILES\Common Files\GTK\2.0"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
59 !define GTK_RUNTIME_INSTALLER "..\gtk_installer\gtk-runtime*.exe"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
60 !define GTK_THEME_DIR "..\gtk_installer\gtk_themes"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
61 !define GTK_DEFAULT_THEME_GTKRC_DIR "share\themes\Default\gtk-2.0"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
62 !define GTK_DEFAULT_THEME_ENGINE_DIR "lib\gtk-2.0\2.2.0\engines"
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
63
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
64 ;--------------------------------
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
65 ;Modern UI Configuration
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
66
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
67 !define MUI_ICON ".\pixmaps\gaim-install.ico"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
68 !define MUI_UNICON ".\pixmaps\gaim-install.ico"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
69 !define MUI_WELCOMEFINISHPAGE_BITMAP ".\src\win32\nsis\gaim-intro.bmp"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
70 !define MUI_HEADERIMAGE
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
71 !define MUI_HEADERIMAGE_BITMAP ".\src\win32\nsis\gaim-header.bmp"
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
72
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
73 ; Alter License section
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
74 !define MUI_LICENSEPAGE_BUTTON $(GAIM_LICENSE_BUTTON)
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
75 !define MUI_LICENSEPAGE_TEXT_BOTTOM $(GAIM_LICENSE_BOTTOM_TEXT)
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
76
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
77 !define MUI_COMPONENTSPAGE_SMALLDESC
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
78 !define MUI_ABORTWARNING
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
79
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
80 ;Finish Page config
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
81 !define MUI_FINISHPAGE_RUN "$INSTDIR\gaim.exe"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
82 !define MUI_FINISHPAGE_RUN_NOTCHECKED
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
83 !define MUI_FINISHPAGE_LINK $(GAIM_FINISH_VISIT_WEB_SITE)
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
84 !define MUI_FINISHPAGE_LINK_LOCATION "http://gaim.sourceforge.net/win32"
3630
9682c0e022c6 [gaim-migrate @ 3753]
Rob Flynn <gaim@robflynn.com>
parents:
diff changeset
85
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
86 ;--------------------------------
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
87 ;Pages
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
88
7600
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
89 !define MUI_PAGE_CUSTOMFUNCTION_PRE preWelcomePage
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
90 !insertmacro MUI_PAGE_WELCOME
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
91 !insertmacro MUI_PAGE_LICENSE "./COPYING"
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
92 !insertmacro MUI_PAGE_COMPONENTS
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
93
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
94 !ifdef WITH_GTK
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
95 ; GTK+ install dir page
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
96 !define MUI_PAGE_CUSTOMFUNCTION_PRE preGtkDirPage
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
97 !define MUI_PAGE_CUSTOMFUNCTION_LEAVE postGtkDirPage
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
98 !define MUI_DIRECTORYPAGE_VARIABLE $GTK_FOLDER
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
99 !insertmacro MUI_PAGE_DIRECTORY
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
100 !endif
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
101
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
102 ; Gaim install dir page
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
103 !insertmacro MUI_PAGE_DIRECTORY
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
104
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
105 !insertmacro MUI_PAGE_INSTFILES
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
106 !insertmacro MUI_PAGE_FINISH
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
107
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
108 !insertmacro MUI_UNPAGE_WELCOME
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
109 !insertmacro MUI_UNPAGE_CONFIRM
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
110 !insertmacro MUI_UNPAGE_INSTFILES
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
111 !insertmacro MUI_UNPAGE_FINISH
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
112
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
113 ;--------------------------------
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
114 ;Languages
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
115
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
116 ;; English goes first because its the default. The rest are
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
117 ;; in alphabetical order (at least the strings actually displayed
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
118 ;; will be).
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
119
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
120 !insertmacro MUI_LANGUAGE "English"
6913
44933354ecad [gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6912
diff changeset
121
44933354ecad [gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6912
diff changeset
122 !insertmacro MUI_LANGUAGE "Bulgarian"
7626
2fb83607becf [gaim-migrate @ 8250]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7600
diff changeset
123 !insertmacro MUI_LANGUAGE "Czech"
7924
cb400cd78961 [gaim-migrate @ 8593]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7626
diff changeset
124 !insertmacro MUI_LANGUAGE "Danish"
6913
44933354ecad [gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6912
diff changeset
125 !insertmacro MUI_LANGUAGE "SimpChinese"
44933354ecad [gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6912
diff changeset
126 !insertmacro MUI_LANGUAGE "TradChinese"
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
127 !insertmacro MUI_LANGUAGE "German"
7575
df5f8c339c38 [gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7572
diff changeset
128 !insertmacro MUI_LANGUAGE "Spanish"
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
129 !insertmacro MUI_LANGUAGE "French"
8388
c08d9b0dbd29 [gaim-migrate @ 9116]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8183
diff changeset
130 !insertmacro MUI_LANGUAGE "Hebrew"
6913
44933354ecad [gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6912
diff changeset
131 !insertmacro MUI_LANGUAGE "Italian"
8183
ab0fce369327 [gaim-migrate @ 8902]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8180
diff changeset
132 !insertmacro MUI_LANGUAGE "Japanese"
6913
44933354ecad [gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6912
diff changeset
133 !insertmacro MUI_LANGUAGE "Korean"
44933354ecad [gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6912
diff changeset
134 !insertmacro MUI_LANGUAGE "Hungarian"
44933354ecad [gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6912
diff changeset
135 !insertmacro MUI_LANGUAGE "Dutch"
8567
d92a7574473c [gaim-migrate @ 9314]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8388
diff changeset
136 !insertmacro MUI_LANGUAGE "Norwegian"
8126
b6458d4ce101 [gaim-migrate @ 8830]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8099
diff changeset
137 !insertmacro MUI_LANGUAGE "Polish"
6290
976d9ad5d77a [gaim-migrate @ 6789]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6277
diff changeset
138 !insertmacro MUI_LANGUAGE "PortugueseBR"
7215
fa011d609c54 [gaim-migrate @ 7784]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7214
diff changeset
139 !insertmacro MUI_LANGUAGE "Portuguese"
6951
54deff9eec41 [gaim-migrate @ 7498]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6948
diff changeset
140 !insertmacro MUI_LANGUAGE "Romanian"
8099
40163e984818 [gaim-migrate @ 8799]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7924
diff changeset
141 !insertmacro MUI_LANGUAGE "Russian"
6913
44933354ecad [gaim-migrate @ 7460]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6912
diff changeset
142 !insertmacro MUI_LANGUAGE "Serbian"
8179
3fa28787e571 [gaim-migrate @ 8896]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8178
diff changeset
143 !insertmacro MUI_LANGUAGE "Finnish"
6559
8dba07c335e9 [gaim-migrate @ 7081]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6491
diff changeset
144 !insertmacro MUI_LANGUAGE "Swedish"
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
145
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
146 ;--------------------------------
6233
0c64ba470632 [gaim-migrate @ 6726]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6159
diff changeset
147 ;Translations
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
148
7572
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
149 !define GAIM_DEFAULT_LANGFILE "${GAIM_NSIS_INCLUDE_PATH}\translations\english.nsh"
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
150
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
151 !include "${GAIM_NSIS_INCLUDE_PATH}\langmacros.nsh"
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
152
7575
df5f8c339c38 [gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7572
diff changeset
153 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "BULGARIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\bulgarian.nsh"
7626
2fb83607becf [gaim-migrate @ 8250]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7600
diff changeset
154 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "CZECH" "${GAIM_NSIS_INCLUDE_PATH}\translations\czech.nsh"
7924
cb400cd78961 [gaim-migrate @ 8593]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7626
diff changeset
155 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "DANISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\danish.nsh"
7575
df5f8c339c38 [gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7572
diff changeset
156 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "DUTCH" "${GAIM_NSIS_INCLUDE_PATH}\translations\dutch.nsh"
7572
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
157 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "ENGLISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\english.nsh"
8178
33802f8a2d90 [gaim-migrate @ 8895]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8126
diff changeset
158 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "FINNISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\finnish.nsh"
7572
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
159 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "FRENCH" "${GAIM_NSIS_INCLUDE_PATH}\translations\french.nsh"
7575
df5f8c339c38 [gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7572
diff changeset
160 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "GERMAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\german.nsh"
8388
c08d9b0dbd29 [gaim-migrate @ 9116]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8183
diff changeset
161 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "HEBREW" "${GAIM_NSIS_INCLUDE_PATH}\translations\hebrew.nsh"
7572
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
162 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "HUNGARIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\hungarian.nsh"
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
163 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "ITALIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\italian.nsh"
8183
ab0fce369327 [gaim-migrate @ 8902]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8180
diff changeset
164 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "JAPANESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\japanese.nsh"
7575
df5f8c339c38 [gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7572
diff changeset
165 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "KOREAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\korean.nsh"
8567
d92a7574473c [gaim-migrate @ 9314]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8388
diff changeset
166 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "NORWEGIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\norwegian.nsh"
8126
b6458d4ce101 [gaim-migrate @ 8830]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 8099
diff changeset
167 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "POLISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\polish.nsh"
7575
df5f8c339c38 [gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7572
diff changeset
168 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "PORTUGUESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\portuguese.nsh"
df5f8c339c38 [gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7572
diff changeset
169 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "PORTUGUESEBR" "${GAIM_NSIS_INCLUDE_PATH}\translations\portuguese-br.nsh"
df5f8c339c38 [gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7572
diff changeset
170 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "ROMANIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\romanian.nsh"
8099
40163e984818 [gaim-migrate @ 8799]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7924
diff changeset
171 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "RUSSIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\russian.nsh"
7575
df5f8c339c38 [gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7572
diff changeset
172 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SERBIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\serbian-latin.nsh"
df5f8c339c38 [gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7572
diff changeset
173 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SIMPCHINESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\simp-chinese.nsh"
df5f8c339c38 [gaim-migrate @ 8191]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7572
diff changeset
174 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SPANISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\spanish.nsh"
7572
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
175 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SWEDISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\swedish.nsh"
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
176 !insertmacro GAIM_MACRO_INCLUDE_LANGFILE "TRADCHINESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\trad-chinese.nsh"
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
177
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
178 ;--------------------------------
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
179 ;Reserve Files
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
180 ; Only need this if using bzip2 compression
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
181
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
182 !insertmacro MUI_RESERVEFILE_INSTALLOPTIONS
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
183 !insertmacro MUI_RESERVEFILE_LANGDLL
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
184 ReserveFile "${NSISDIR}\Plugins\UserInfo.dll"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
185
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
186
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
187 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
188 ;; Start Install Sections ;;
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
189 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;
3630
9682c0e022c6 [gaim-migrate @ 3753]
Rob Flynn <gaim@robflynn.com>
parents:
diff changeset
190
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
191 ;--------------------------------
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
192 ;Uninstall any old version of Gaim
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
193
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
194 Section -SecUninstallOldGaim
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
195 ; Check install rights..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
196 Call CheckUserInstallRights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
197 Pop $R0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
198
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
199 StrCmp $R0 "HKLM" gaim_hklm
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
200 StrCmp $R0 "HKCU" gaim_hkcu done
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
201
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
202 gaim_hkcu:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
203 ReadRegStr $R1 HKCU ${GAIM_REG_KEY} ""
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
204 ReadRegStr $R2 HKCU ${GAIM_REG_KEY} "Version"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
205 ReadRegStr $R3 HKCU "${GAIM_UNINSTALL_KEY}" "UninstallString"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
206 Goto try_uninstall
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
207
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
208 gaim_hklm:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
209 ReadRegStr $R1 HKLM ${GAIM_REG_KEY} ""
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
210 ReadRegStr $R2 HKLM ${GAIM_REG_KEY} "Version"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
211 ReadRegStr $R3 HKLM "${GAIM_UNINSTALL_KEY}" "UninstallString"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
212
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
213 ; If previous version exists .. remove
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
214 try_uninstall:
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
215 StrCmp $R1 "" done
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
216 ; Version key started with 0.60a3. Prior versions can't be
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
217 ; automaticlly uninstalled.
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
218 StrCmp $R2 "" uninstall_problem
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
219 ; Check if we have uninstall string..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
220 IfFileExists $R3 0 uninstall_problem
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
221 ; Have uninstall string.. go ahead and uninstall.
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
222 SetOverwrite on
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
223 ; Need to copy uninstaller outside of the install dir
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
224 ClearErrors
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
225 CopyFiles /SILENT $R3 "$TEMP\${GAIM_UNINST_EXE}"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
226 SetOverwrite off
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
227 IfErrors uninstall_problem
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
228 ; Ready to uninstall..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
229 ClearErrors
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
230 ExecWait '"$TEMP\${GAIM_UNINST_EXE}" /S _?=$R1'
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
231 IfErrors exec_error
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
232 Delete "$TEMP\${GAIM_UNINST_EXE}"
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
233 Goto done
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
234
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
235 exec_error:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
236 Delete "$TEMP\${GAIM_UNINST_EXE}"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
237 Goto uninstall_problem
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
238
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
239 uninstall_problem:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
240 ; In this case just wipe out previous Gaim install dir..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
241 ; We get here because versions 0.60a1 and 0.60a2 don't have versions set in the registry
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
242 ; and versions 0.60 and lower did not correctly set the uninstall reg string
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
243 ; (the string was set in quotes)
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
244 IfSilent do_wipeout
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
245 MessageBox MB_YESNO $(GAIM_PROMPT_WIPEOUT) IDYES do_wipeout IDNO cancel_install
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
246 cancel_install:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
247 Quit
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
248
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
249 do_wipeout:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
250 StrCmp $R0 "HKLM" gaim_del_lm_reg gaim_del_cu_reg
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
251 gaim_del_cu_reg:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
252 DeleteRegKey HKCU ${GAIM_REG_KEY}
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
253 Goto uninstall_prob_cont
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
254 gaim_del_lm_reg:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
255 DeleteRegKey HKLM ${GAIM_REG_KEY}
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
256
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
257 uninstall_prob_cont:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
258 RMDir /r "$R1"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
259
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
260 done:
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
261 SectionEnd
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
262
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
263
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
264 ;--------------------------------
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
265 ;GTK+ Runtime Install Section
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
266
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
267 !ifdef WITH_GTK
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
268 Section $(GTK_SECTION_TITLE) SecGtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
269 SectionIn 1 RO
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
270
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
271 Call CheckUserInstallRights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
272 Pop $R1
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
273
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
274 SetOutPath $TEMP
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
275 SetOverwrite on
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
276 File /oname=gtk-runtime.exe ${GTK_RUNTIME_INSTALLER}
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
277 SetOverwrite off
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
278
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
279 ; This keeps track whether we install GTK+ or not..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
280 StrCpy $R5 "0"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
281
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
282 Call DoWeNeedGtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
283 Pop $R0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
284 Pop $R6
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
285
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
286 StrCmp $R0 "0" have_gtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
287 StrCmp $R0 "1" upgrade_gtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
288 StrCmp $R0 "2" no_gtk no_gtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
289
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
290 no_gtk:
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
291 StrCmp $R1 "NONE" gtk_no_install_rights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
292 ClearErrors
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
293 ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE $ISSILENT /D=$GTK_FOLDER'
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
294 Goto gtk_install_cont
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
295
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
296 upgrade_gtk:
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
297 StrCpy $GTK_FOLDER $R6
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
298 IfSilent skip_mb
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
299 MessageBox MB_YESNO $(GTK_UPGRADE_PROMPT) IDNO done
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
300 skip_mb:
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
301 ClearErrors
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
302 ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE $ISSILENT'
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
303 Goto gtk_install_cont
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
304
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
305 gtk_install_cont:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
306 IfErrors gtk_install_error
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
307 StrCpy $R5 "1" ; marker that says we installed...
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
308 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
309
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
310 gtk_install_error:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
311 Delete "$TEMP\gtk-runtime.exe"
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
312 IfSilent skip_mb1
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
313 MessageBox MB_OK $(GTK_INSTALL_ERROR) IDOK
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
314 skip_mb1:
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
315 Quit
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
316
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
317 have_gtk:
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
318 StrCpy $GTK_FOLDER $R6
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
319 StrCmp $R1 "NONE" done ; If we have no rights.. can't re-install..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
320 ; Even if we have a sufficient version of GTK+, we give user choice to re-install.
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
321 ClearErrors
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
322 ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE $ISSILENT'
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
323 IfErrors gtk_install_error
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
324 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
325
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
326 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
327 ; end got_install rights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
328
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
329 gtk_no_install_rights:
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
330 ; Install GTK+ to Gaim install dir
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
331 StrCpy $GTK_FOLDER $INSTDIR
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
332 ClearErrors
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
333 ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE $ISSILENT /D=$GTK_FOLDER'
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
334 IfErrors gtk_install_error
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
335 SetOverwrite on
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
336 ClearErrors
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
337 CopyFiles /FILESONLY "$GTK_FOLDER\bin\*.dll" $GTK_FOLDER
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
338 SetOverwrite off
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
339 IfErrors gtk_install_error
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
340 Delete "$GTK_FOLDER\bin\*.dll"
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
341 Goto done
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
342 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
343 ; end gtk_no_install_rights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
344
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
345 done:
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
346 Delete "$TEMP\gtk-runtime.exe"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
347 SectionEnd ; end of GTK+ section
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
348 !endif
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
349
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
350 ;--------------------------------
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
351 ;Gaim Install Section
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
352
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
353 Section $(GAIM_SECTION_TITLE) SecGaim
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
354 SectionIn 1 RO
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
355
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
356 ; Check install rights..
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
357 Call CheckUserInstallRights
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
358 Pop $R0
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
359
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
360 ; Get GTK+ lib dir if we have it..
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
361
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
362 StrCmp $R0 "NONE" gaim_none
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
363 StrCmp $R0 "HKLM" gaim_hklm gaim_hkcu
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
364
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
365 gaim_hklm:
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
366 ReadRegStr $R1 HKLM ${GTK_REG_KEY} "Path"
6816
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
367 WriteRegStr HKLM "${HKLM_APP_PATHS_KEY}" "" "$INSTDIR\gaim.exe"
6422
468bbb5fbc29 [gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6300
diff changeset
368 WriteRegStr HKLM "${HKLM_APP_PATHS_KEY}" "Path" "$R1\bin"
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
369 WriteRegStr HKLM ${GAIM_REG_KEY} "" "$INSTDIR"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
370 WriteRegStr HKLM ${GAIM_REG_KEY} "Version" "${GAIM_VERSION}"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
371 WriteRegStr HKLM "${GAIM_UNINSTALL_KEY}" "DisplayName" $(GAIM_UNINSTALL_DESC)
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
372 WriteRegStr HKLM "${GAIM_UNINSTALL_KEY}" "UninstallString" "$INSTDIR\${GAIM_UNINST_EXE}"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
373 ; Sets scope of the desktop and Start Menu entries for all users.
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
374 SetShellVarContext "all"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
375 Goto gaim_install_files
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
376
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
377 gaim_hkcu:
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
378 ReadRegStr $R1 HKCU ${GTK_REG_KEY} "Path"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
379 StrCmp $R1 "" 0 gaim_hkcu1
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
380 ReadRegStr $R1 HKLM ${GTK_REG_KEY} "Path"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
381 gaim_hkcu1:
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
382 WriteRegStr HKCU ${GAIM_REG_KEY} "" "$INSTDIR"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
383 WriteRegStr HKCU ${GAIM_REG_KEY} "Version" "${GAIM_VERSION}"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
384 WriteRegStr HKCU "${GAIM_UNINSTALL_KEY}" "DisplayName" $(GAIM_UNINSTALL_DESC)
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
385 WriteRegStr HKCU "${GAIM_UNINSTALL_KEY}" "UninstallString" "$INSTDIR\${GAIM_UNINST_EXE}"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
386 Goto gaim_install_files
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
387
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
388 gaim_none:
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
389 ReadRegStr $R1 HKLM ${GTK_REG_KEY} "Path"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
390
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
391 gaim_install_files:
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
392 SetOutPath "$INSTDIR"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
393 ; Gaim files
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
394 SetOverwrite on
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
395 File /r .\win32-install-dir\*.*
5931
8b5dd7117f56 [gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5396
diff changeset
396 !ifdef DEBUG
6854
9e1bd25afa88 [gaim-migrate @ 7399]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6848
diff changeset
397 File "${GAIM_INSTALLER_DEPS}\exchndl.dll"
5931
8b5dd7117f56 [gaim-migrate @ 6371]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5396
diff changeset
398 !endif
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
399
6848
060aa79a733e [gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6816
diff changeset
400 ; Install shfolder.dll if need be..
060aa79a733e [gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6816
diff changeset
401 SearchPath $R4 "shfolder.dll"
060aa79a733e [gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6816
diff changeset
402 StrCmp $R4 "" 0 got_shfolder
060aa79a733e [gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6816
diff changeset
403 SetOutPath "$SYSDIR"
6854
9e1bd25afa88 [gaim-migrate @ 7399]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6848
diff changeset
404 File "${GAIM_INSTALLER_DEPS}\shfolder.dll"
6848
060aa79a733e [gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6816
diff changeset
405 SetOutPath "$INSTDIR"
060aa79a733e [gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6816
diff changeset
406 got_shfolder:
060aa79a733e [gaim-migrate @ 7393]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6816
diff changeset
407
6816
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
408 ; Check if Perl is installed, If not remove perl plugin
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
409 ReadRegStr $R2 HKLM ${PERL_REG_KEY} ""
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
410 StrCmp $R2 "" 0 perl_exists
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
411 ReadRegStr $R2 HKCU ${PERL_REG_KEY} ""
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
412 StrCmp $R2 "" perl_remove perl_exists
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
413
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
414 perl_remove:
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
415 Delete "$INSTDIR\plugins\perl.dll"
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
416 RMDir /r "$INSTDIR\perlmod"
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
417 Goto perl_done
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
418
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
419 perl_exists:
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
420 IfFileExists "$R2\bin\${PERL_DLL}" 0 perl_remove
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
421 StrCmp $R0 "HKLM" 0 perl_done
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
422 ReadRegStr $R3 HKLM "${HKLM_APP_PATHS_KEY}" "Path"
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
423 WriteRegStr HKLM "${HKLM_APP_PATHS_KEY}" "Path" "$R3;$R2\bin"
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
424
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
425 perl_done:
5aeba37b303c [gaim-migrate @ 7356]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6650
diff changeset
426
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
427 CreateDirectory "$SMPROGRAMS\Gaim"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
428 CreateShortCut "$SMPROGRAMS\Gaim\Gaim.lnk" "$INSTDIR\gaim.exe"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
429 CreateShortCut "$DESKTOP\Gaim.lnk" "$INSTDIR\gaim.exe"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
430 SetOutPath "$INSTDIR"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
431
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
432 ; If we don't have install rights.. we're done
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
433 StrCmp $R0 "NONE" done
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
434 CreateShortCut "$SMPROGRAMS\Gaim\Uninstall.lnk" "$INSTDIR\${GAIM_UNINST_EXE}"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
435 SetOverwrite off
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
436
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
437 ; Write out installer language
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
438 WriteRegStr HKCU "${GAIM_REG_KEY}" "${GAIM_REG_LANG}" "$LANGUAGE"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
439
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
440 ; write out uninstaller
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
441 SetOverwrite on
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
442 WriteUninstaller "$INSTDIR\${GAIM_UNINST_EXE}"
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
443 SetOverwrite off
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
444
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
445 done:
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
446 SectionEnd ; end of default Gaim section
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
447
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
448 ;--------------------------------
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
449 ;GTK+ Themes
3860
d0897828bd0d [gaim-migrate @ 4012]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 3853
diff changeset
450
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
451 SubSection /e $(GTK_THEMES_SECTION_TITLE) SecGtkThemes
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
452 Section /o $(GTK_NOTHEME_SECTION_TITLE) SecGtkNone
6948
8168bc284cfb [gaim-migrate @ 7495]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6913
diff changeset
453 Call CanWeInstallATheme
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
454 Pop $R0
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
455 StrCmp $R0 "" done
6948
8168bc284cfb [gaim-migrate @ 7495]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6913
diff changeset
456 SetOverwrite on
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
457 Rename $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc.old
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
458 CopyFiles $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc.plain $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc
6948
8168bc284cfb [gaim-migrate @ 7495]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6913
diff changeset
459 SetOverwrite off
8168bc284cfb [gaim-migrate @ 7495]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6913
diff changeset
460 done:
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
461 SectionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
462
7352
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
463 Section $(GTK_WIMP_SECTION_TITLE) SecGtkWimp
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
464 Call CanWeInstallATheme
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
465 Pop $R0
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
466 StrCmp $R0 "" done
7352
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
467 SetOverwrite on
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
468 Rename $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc.old
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
469 SetOutPath $R0\${GTK_DEFAULT_THEME_ENGINE_DIR}
7352
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
470 File ${GTK_THEME_DIR}\engines\libwimp.dll
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
471 SetOutPath $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}
7352
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
472 File ${GTK_THEME_DIR}\themes\gtkrc.gtkwimp
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
473 File /oname=gtkrc ${GTK_THEME_DIR}\themes\gtkrc.gtkwimp
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
474 SetOverwrite off
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
475 done:
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
476 SectionEnd
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
477
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
478 Section /o $(GTK_BLUECURVE_SECTION_TITLE) SecGtkBluecurve
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
479 Call CanWeInstallATheme
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
480 Pop $R0
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
481 StrCmp $R0 "" done
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
482 SetOverwrite on
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
483 Rename $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc.old
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
484 SetOutPath $R0\${GTK_DEFAULT_THEME_ENGINE_DIR}
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
485 File ${GTK_THEME_DIR}\engines\libbluecurve.dll
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
486 SetOutPath $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
487 File ${GTK_THEME_DIR}\themes\gtkrc.bluecurve
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
488 File /oname=gtkrc ${GTK_THEME_DIR}\themes\gtkrc.bluecurve
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
489 SetOverwrite off
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
490 done:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
491 SectionEnd
3860
d0897828bd0d [gaim-migrate @ 4012]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 3853
diff changeset
492
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
493 Section /o $(GTK_LIGHTHOUSEBLUE_SECTION_TITLE) SecGtkLighthouseblue
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
494 Call CanWeInstallATheme
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
495 Pop $R0
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
496 StrCmp $R0 "" done
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
497 SetOverwrite on
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
498 Rename $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}\gtkrc.old
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
499 SetOutPath $R0\${GTK_DEFAULT_THEME_ENGINE_DIR}
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
500 File ${GTK_THEME_DIR}\engines\liblighthouseblue.dll
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
501 SetOutPath $R0\${GTK_DEFAULT_THEME_GTKRC_DIR}
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
502 File ${GTK_THEME_DIR}\themes\gtkrc.lighthouseblue
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
503 File /oname=gtkrc ${GTK_THEME_DIR}\themes\gtkrc.lighthouseblue
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
504 SetOverwrite off
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
505 done:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
506 SectionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
507 SubSectionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
508
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
509 ;--------------------------------
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
510 ;Uninstaller Section
3630
9682c0e022c6 [gaim-migrate @ 3753]
Rob Flynn <gaim@robflynn.com>
parents:
diff changeset
511
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
512
3630
9682c0e022c6 [gaim-migrate @ 3753]
Rob Flynn <gaim@robflynn.com>
parents:
diff changeset
513 Section Uninstall
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
514 Call un.CheckUserInstallRights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
515 Pop $R0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
516 StrCmp $R0 "NONE" no_rights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
517 StrCmp $R0 "HKCU" try_hkcu try_hklm
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
518
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
519 try_hkcu:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
520 ReadRegStr $R0 HKCU ${GAIM_REG_KEY} ""
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
521 StrCmp $R0 $INSTDIR 0 cant_uninstall
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
522 ; HKCU install path matches our INSTDIR.. so uninstall
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
523 DeleteRegKey HKCU ${GAIM_REG_KEY}
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
524 DeleteRegKey HKCU "${GAIM_UNINSTALL_KEY}"
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
525 Goto cont_uninstall
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
526
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
527 try_hklm:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
528 ReadRegStr $R0 HKLM ${GAIM_REG_KEY} ""
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
529 StrCmp $R0 $INSTDIR 0 try_hkcu
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
530 ; HKLM install path matches our INSTDIR.. so uninstall
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
531 DeleteRegKey HKLM ${GAIM_REG_KEY}
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
532 DeleteRegKey HKLM "${GAIM_UNINSTALL_KEY}"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
533 DeleteRegKey HKLM "${HKLM_APP_PATHS_KEY}"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
534 ; Sets start menu and desktop scope to all users..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
535 SetShellVarContext "all"
4126
e8f2fdf78662 [gaim-migrate @ 4343]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 3989
diff changeset
536
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
537 cont_uninstall:
6090
44930abebe0d [gaim-migrate @ 6549]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5931
diff changeset
538 ; The WinPrefs plugin may have left this behind..
44930abebe0d [gaim-migrate @ 6549]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5931
diff changeset
539 DeleteRegValue HKCU "${GAIM_STARTUP_RUN_KEY}" "Gaim"
44930abebe0d [gaim-migrate @ 6549]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5931
diff changeset
540 DeleteRegValue HKLM "${GAIM_STARTUP_RUN_KEY}" "Gaim"
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
541 ; Remove Language preference info
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
542 DeleteRegKey HKCU ${GAIM_REG_KEY} ;${MUI_LANGDLL_REGISTRY_ROOT} ${MUI_LANGDLL_REGISTRY_KEY}
6090
44930abebe0d [gaim-migrate @ 6549]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5931
diff changeset
543
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
544 RMDir /r "$INSTDIR\locale"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
545 RMDir /r "$INSTDIR\pixmaps"
6973
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
546 RMDir /r "$INSTDIR\perlmod"
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
547 Delete "$INSTDIR\plugins\autorecon.dll"
7352
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
548 Delete "$INSTDIR\plugins\docklet.dll"
6476
1325c207d159 [gaim-migrate @ 6987]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6447
diff changeset
549 Delete "$INSTDIR\plugins\history.dll"
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
550 Delete "$INSTDIR\plugins\iconaway.dll"
6476
1325c207d159 [gaim-migrate @ 6987]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6447
diff changeset
551 Delete "$INSTDIR\plugins\idle.dll"
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
552 Delete "$INSTDIR\plugins\libgg.dll"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
553 Delete "$INSTDIR\plugins\libirc.dll"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
554 Delete "$INSTDIR\plugins\libjabber.dll"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
555 Delete "$INSTDIR\plugins\libmsn.dll"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
556 Delete "$INSTDIR\plugins\liboscar.dll"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
557 Delete "$INSTDIR\plugins\libtoc.dll"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
558 Delete "$INSTDIR\plugins\libyahoo.dll"
7352
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
559 Delete "$INSTDIR\plugins\perl.dll"
7600
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
560 Delete "$INSTDIR\plugins\relnot.dll"
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
561 Delete "$INSTDIR\plugins\spellchk.dll"
7352
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
562 Delete "$INSTDIR\plugins\ssl-nss.dll"
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
563 Delete "$INSTDIR\plugins\ssl.dll"
6476
1325c207d159 [gaim-migrate @ 6987]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6447
diff changeset
564 Delete "$INSTDIR\plugins\statenotify.dll"
8099
40163e984818 [gaim-migrate @ 8799]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7924
diff changeset
565 Delete "$INSTDIR\plugins\tcl.dll"
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
566 Delete "$INSTDIR\plugins\ticker.dll"
6476
1325c207d159 [gaim-migrate @ 6987]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6447
diff changeset
567 Delete "$INSTDIR\plugins\timestamp.dll"
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
568 Delete "$INSTDIR\plugins\win2ktrans.dll"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
569 Delete "$INSTDIR\plugins\winprefs.dll"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
570 RMDir "$INSTDIR\plugins"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
571 Delete "$INSTDIR\sounds\gaim\arrive.wav"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
572 Delete "$INSTDIR\sounds\gaim\leave.wav"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
573 Delete "$INSTDIR\sounds\gaim\receive.wav"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
574 Delete "$INSTDIR\sounds\gaim\redalert.wav"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
575 Delete "$INSTDIR\sounds\gaim\send.wav"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
576 RMDir "$INSTDIR\sounds\gaim"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
577 RMDir "$INSTDIR\sounds"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
578 Delete "$INSTDIR\gaim.dll"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
579 Delete "$INSTDIR\gaim.exe"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
580 Delete "$INSTDIR\idletrack.dll"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
581 Delete "$INSTDIR\libgtkspell.dll"
6973
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
582 Delete "$INSTDIR\nspr4.dll"
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
583 Delete "$INSTDIR\nss3.dll"
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
584 Delete "$INSTDIR\nssckbi.dll"
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
585 Delete "$INSTDIR\plc4.dll"
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
586 Delete "$INSTDIR\plds4.dll"
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
587 Delete "$INSTDIR\softokn3.dll"
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
588 Delete "$INSTDIR\ssl3.dll"
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
589 Delete "$INSTDIR\${GAIM_UNINST_EXE}"
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
590 !ifdef DEBUG
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
591 Delete "$INSTDIR\exchndl.dll"
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
592 !endif
969474e79e98 [gaim-migrate @ 7525]
uid99490
parents: 6951
diff changeset
593
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
594 ;Try to remove Gaim install dir .. if empty
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
595 RMDir "$INSTDIR"
3853
eddcb3a8c74e [gaim-migrate @ 4005]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 3849
diff changeset
596
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
597 ; Shortcuts..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
598 RMDir /r "$SMPROGRAMS\Gaim"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
599 Delete "$DESKTOP\Gaim.lnk"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
600
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
601 Goto done
4897
65a0a360e8c4 [gaim-migrate @ 5229]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 4857
diff changeset
602
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
603 cant_uninstall:
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
604 IfSilent skip_mb
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
605 MessageBox MB_OK $(un.GAIM_UNINSTALL_ERROR_1) IDOK
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
606 skip_mb:
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
607 Quit
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
608
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
609 no_rights:
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
610 IfSilent skip_mb1
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
611 MessageBox MB_OK $(un.GAIM_UNINSTALL_ERROR_2) IDOK
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
612 skip_mb1:
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
613 Quit
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
614
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
615 done:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
616 SectionEnd ; end of uninstall section
3853
eddcb3a8c74e [gaim-migrate @ 4005]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 3849
diff changeset
617
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
618 ;--------------------------------
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
619 ;Descriptions
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
620 !insertmacro MUI_FUNCTION_DESCRIPTION_BEGIN
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
621 !insertmacro MUI_DESCRIPTION_TEXT ${SecGaim} \
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
622 $(GAIM_SECTION_DESCRIPTION)
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
623 !ifdef WITH_GTK
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
624 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtk} \
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
625 $(GTK_SECTION_DESCRIPTION)
5383
e44333671363 [gaim-migrate @ 5759]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5332
diff changeset
626 !endif
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
627 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtkThemes} \
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
628 $(GTK_THEMES_SECTION_DESCRIPTION)
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
629 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtkNone} \
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
630 $(GTK_NO_THEME_DESC)
7352
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
631 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtkWimp} \
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
632 $(GTK_WIMP_THEME_DESC)
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
633 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtkBluecurve} \
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
634 $(GTK_BLUECURVE_THEME_DESC)
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
635 !insertmacro MUI_DESCRIPTION_TEXT ${SecGtkLighthouseblue} \
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
636 $(GTK_LIGHTHOUSEBLUE_THEME_DESC)
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
637 !insertmacro MUI_FUNCTION_DESCRIPTION_END
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
638
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
639 ;--------------------------------
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
640 ;Functions
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
641
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
642 ;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
643 ; Usage:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
644 ;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
645 ; Call CanWeInstallATheme
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
646 ; Pop $R0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
647 ;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
648 ; Return:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
649 ; "" - If no
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
650 ; "root path of GTK+ installation" - if yes
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
651 ;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
652 Function CanWeInstallATheme
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
653 Push $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
654 Push $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
655
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
656 ; Set default.. no rights
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
657 StrCpy $1 ""
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
658
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
659 Call CheckUserInstallRights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
660 Pop $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
661
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
662 ; If no rights check if gtk was installed to gaim dir..
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
663 StrCmp $0 "NONE" 0 themes_cont
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
664 StrCmp $GTK_FOLDER $INSTDIR 0 no_rights
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
665 StrCpy $1 $INSTDIR
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
666 Goto done
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
667 themes_cont:
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
668
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
669 StrCmp $0 "HKCU" hkcu hklm
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
670
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
671 hkcu:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
672 ReadRegStr $1 HKCU ${GTK_REG_KEY} "Path"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
673 StrCmp $1 "" no_rights done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
674
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
675 hklm:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
676 ReadRegStr $1 HKLM ${GTK_REG_KEY} "Path"
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
677 Goto done
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
678
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
679 no_rights:
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
680 IfSilent skip_mb
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
681 MessageBox MB_OK $(GTK_NO_THEME_INSTALL_RIGHTS) IDOK
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
682 skip_mb:
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
683 StrCpy $1 ""
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
684
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
685 done:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
686 Pop $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
687 Exch $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
688 FunctionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
689
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
690
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
691 Function CheckUserInstallRights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
692 ClearErrors
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
693 UserInfo::GetName
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
694 IfErrors Win9x
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
695 Pop $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
696 UserInfo::GetAccountType
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
697 Pop $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
698
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
699 StrCmp $1 "Admin" 0 +3
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
700 StrCpy $1 "HKLM"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
701 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
702 StrCmp $1 "Power" 0 +3
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
703 StrCpy $1 "HKLM"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
704 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
705 StrCmp $1 "User" 0 +3
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
706 StrCpy $1 "HKCU"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
707 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
708 StrCmp $1 "Guest" 0 +3
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
709 StrCpy $1 "NONE"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
710 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
711 ; Unknown error
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
712 StrCpy $1 "NONE"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
713 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
714
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
715 Win9x:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
716 StrCpy $1 "HKLM"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
717
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
718 done:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
719 Push $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
720 FunctionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
721
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
722 Function un.CheckUserInstallRights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
723 ClearErrors
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
724 UserInfo::GetName
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
725 IfErrors Win9x
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
726 Pop $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
727 UserInfo::GetAccountType
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
728 Pop $1
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
729
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
730 StrCmp $1 "Admin" 0 +3
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
731 StrCpy $1 "HKLM"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
732 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
733 StrCmp $1 "Power" 0 +3
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
734 StrCpy $1 "HKLM"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
735 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
736 StrCmp $1 "User" 0 +3
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
737 StrCpy $1 "HKCU"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
738 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
739 StrCmp $1 "Guest" 0 +3
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
740 StrCpy $1 "NONE"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
741 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
742 ; Unknown error
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
743 StrCpy $1 "NONE"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
744 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
745
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
746 Win9x:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
747 StrCpy $1 "HKLM"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
748
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
749 done:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
750 Push $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
751 FunctionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
752
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
753 ;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
754 ; Usage:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
755 ; Push $0 ; Path string
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
756 ; Call VerifyDir
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
757 ; Pop $0 ; 0 - Bad path 1 - Good path
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
758 ;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
759 Function VerifyDir
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
760 Pop $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
761 Loop:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
762 IfFileExists $0 dir_exists
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
763 StrCpy $1 $0 ; save last
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
764 Push $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
765 Call GetParent
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
766 Pop $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
767 StrLen $2 $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
768 ; IfFileExists "C:" on xp returns true and on win2k returns false
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
769 ; So we're done in such a case..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
770 StrCmp $2 "2" loop_done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
771 Goto Loop
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
772
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
773 loop_done:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
774 StrCpy $1 "$0\GaImFooB"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
775 ; Check if we can create dir on this drive..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
776 ClearErrors
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
777 CreateDirectory $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
778 IfErrors DirBad DirGood
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
779
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
780 dir_exists:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
781 ClearErrors
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
782 FileOpen $1 "$0\gaimfoo.bar" w
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
783 IfErrors PathBad PathGood
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
784
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
785 DirGood:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
786 RMDir $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
787 Goto PathGood1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
788
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
789 DirBad:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
790 RMDir $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
791 Goto PathBad1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
792
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
793 PathBad:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
794 FileClose $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
795 Delete "$0\gaimfoo.bar"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
796 PathBad1:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
797 StrCpy $0 "0"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
798 Push $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
799 Return
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
800
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
801 PathGood:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
802 FileClose $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
803 Delete "$0\gaimfoo.bar"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
804 PathGood1:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
805 StrCpy $0 "1"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
806 Push $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
807 FunctionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
808
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
809 Function .onVerifyInstDir
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
810 Push $INSTDIR
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
811 Call VerifyDir
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
812 Pop $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
813 StrCmp $0 "0" 0 dir_good
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
814 Abort
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
815 dir_good:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
816 FunctionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
817
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
818 ; GetParent
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
819 ; input, top of stack (e.g. C:\Program Files\Poop)
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
820 ; output, top of stack (replaces, with e.g. C:\Program Files)
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
821 ; modifies no other variables.
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
822 ;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
823 ; Usage:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
824 ; Push "C:\Program Files\Directory\Whatever"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
825 ; Call GetParent
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
826 ; Pop $R0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
827 ; ; at this point $R0 will equal "C:\Program Files\Directory"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
828 Function GetParent
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
829 Exch $0 ; old $0 is on top of stack
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
830 Push $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
831 Push $2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
832 StrCpy $1 -1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
833 loop:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
834 StrCpy $2 $0 1 $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
835 StrCmp $2 "" exit
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
836 StrCmp $2 "\" exit
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
837 IntOp $1 $1 - 1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
838 Goto loop
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
839 exit:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
840 StrCpy $0 $0 $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
841 Pop $2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
842 Pop $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
843 Exch $0 ; put $0 on top of stack, restore $0 to original value
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
844 FunctionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
845
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
846
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
847 ; CheckGtkVersion
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
848 ; inputs: Push 2 GTK+ version strings to check. The major and minor values
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
849 ; need to be equal, for success. If the micro val to check is equal or greater
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
850 ; to the refrence micro value, then we have success.
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
851 ;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
852 ; Usage:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
853 ; Push "2.2.0" ; Refrence version
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
854 ; Push "2.2.1" ; Version to check
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
855 ; Call CheckGtkVersion
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
856 ; Pop $R0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
857 ; $R0 will now equal "0", because 2.2.0 is less than 2.2.1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
858 ;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
859 Function CheckGtkVersion
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
860 ; Version we want to check
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
861 Pop $6
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
862 ; Reference version
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
863 Pop $8
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
864
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
865 ; Check that the string to check is at least 5 chars long (i.e. x.x.x)
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
866 StrLen $7 $6
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
867 IntCmp $7 5 0 bad_version
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
868
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
869 ; Major version check
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
870 StrCpy $7 $6 1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
871 StrCpy $9 $8 1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
872 IntCmp $7 $9 check_minor
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
873 Goto bad_version
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
874
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
875 check_minor:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
876 StrCpy $7 $6 1 2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
877 StrCpy $9 $8 1 2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
878 IntCmp $7 $9 check_micro
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
879 Goto bad_version
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
880
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
881 check_micro:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
882 StrCpy $7 $6 1 4
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
883 StrCpy $9 $8 1 4
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
884 IntCmp $7 $9 good_version bad_version good_version
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
885
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
886 bad_version:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
887 StrCpy $6 "0"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
888 Push $6
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
889 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
890
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
891 good_version:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
892 StrCpy $6 "1"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
893 Push $6
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
894 done:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
895 FunctionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
896
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
897 ;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
898 ; Usage:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
899 ; Call DoWeNeedGtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
900 ; First Pop:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
901 ; 0 - We have the correct version
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
902 ; Second Pop: Key where Version was found
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
903 ; 1 - We have an old version that needs to be upgraded
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
904 ; Second Pop: HKLM or HKCU depending on where GTK was found.
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
905 ; 2 - We don't have Gtk+ at all
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
906 ; Second Pop: "NONE, HKLM or HKCU" depending on our rights..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
907 ;
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
908 Function DoWeNeedGtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
909 ; Logic should be:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
910 ; - Check what user rights we have (HKLM or HKCU)
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
911 ; - If HKLM rights..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
912 ; - Only check HKLM key for GTK+
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
913 ; - If installed to HKLM, check it and return.
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
914 ; - If HKCU rights..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
915 ; - First check HKCU key for GTK+
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
916 ; - if good or bad exists stop and ret.
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
917 ; - If no hkcu gtk+ install, check HKLM
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
918 ; - If HKLM ver exists but old, return as if no ver exits.
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
919 ; - If no rights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
920 ; - Check HKLM
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
921
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
922 Call CheckUserInstallRights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
923 Pop $3
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
924 StrCmp $3 "HKLM" check_hklm
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
925 StrCmp $3 "HKCU" check_hkcu check_hklm
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
926 check_hkcu:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
927 ReadRegStr $0 HKCU ${GTK_REG_KEY} "Version"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
928 StrCpy $5 "HKCU"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
929 StrCmp $0 "" check_hklm have_gtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
930
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
931 check_hklm:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
932 ReadRegStr $0 HKLM ${GTK_REG_KEY} "Version"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
933 StrCpy $5 "HKLM"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
934 StrCmp $0 "" no_gtk have_gtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
935
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
936
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
937 have_gtk:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
938 ; GTK+ is already installed.. check version.
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
939 StrCpy $1 ${GTK_VERSION} ; Minimum GTK+ version needed
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
940 Push $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
941 Push $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
942 Call CheckGtkVersion
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
943 Pop $2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
944 StrCmp $2 "1" good_version bad_version
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
945 bad_version:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
946 ; Bad version. If hklm ver and we have hkcu or no rights.. return no gtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
947 StrCmp $3 "NONE" no_gtk ; if no rights.. can't upgrade
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
948 StrCmp $3 "HKCU" 0 upgrade_gtk ; if HKLM can upgrade..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
949 StrCmp $5 "HKLM" no_gtk upgrade_gtk ; have hkcu rights.. if found hklm ver can't upgrade..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
950
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
951 upgrade_gtk:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
952 StrCpy $2 "1"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
953 Push $5
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
954 Push $2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
955 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
956
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
957 good_version:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
958 StrCmp $5 "HKLM" have_hklm_gtk have_hkcu_gtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
959 have_hkcu_gtk:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
960 ; Have HKCU version
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
961 ReadRegStr $4 HKCU ${GTK_REG_KEY} "Path"
6422
468bbb5fbc29 [gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6300
diff changeset
962 Goto good_version_cont
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
963
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
964 have_hklm_gtk:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
965 ReadRegStr $4 HKLM ${GTK_REG_KEY} "Path"
6422
468bbb5fbc29 [gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6300
diff changeset
966 Goto good_version_cont
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
967
6422
468bbb5fbc29 [gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6300
diff changeset
968 good_version_cont:
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
969 StrCpy $2 "0"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
970 Push $4 ; The path to existing GTK+
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
971 Push $2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
972 Goto done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
973
6422
468bbb5fbc29 [gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6300
diff changeset
974 no_gtk:
468bbb5fbc29 [gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6300
diff changeset
975 StrCpy $2 "2"
468bbb5fbc29 [gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6300
diff changeset
976 Push $3 ; our rights
468bbb5fbc29 [gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6300
diff changeset
977 Push $2
468bbb5fbc29 [gaim-migrate @ 6930]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6300
diff changeset
978 Goto done
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
979
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
980 done:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
981 FunctionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
982
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
983 Function .onInit
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
984 StrCpy $name "Gaim ${GAIM_VERSION}"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
985 StrCpy $GTK_THEME_SEL ${SecGtkWimp}
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
986 StrCpy $ISSILENT "/NOUI"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
987
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
988 ; GTK installer has two silent states.. one with Message boxes, one without
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
989 ; If gaim installer was run silently, we want to supress gtk installer msg boxes.
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
990 IfSilent 0 set_gtk_normal
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
991 StrCpy $ISSILENT "/S"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
992 set_gtk_normal:
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
993
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
994 Call ParseParameters
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
995
7600
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
996 ; Select Language
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
997 IntCmp $LANG_IS_SET 1 skip_lang
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
998 ; Display Language selection dialog
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
999 !insertmacro MUI_LANGDLL_DISPLAY
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1000 skip_lang:
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1001
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1002 ; If install path was set on the command, use it.
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1003 StrCmp $INSTDIR "" 0 instdir_done
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1004
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1005 Call CheckUserInstallRights
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1006 Pop $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1007
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1008 StrCmp $0 "HKLM" 0 user_dir
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1009 StrCpy $INSTDIR "$PROGRAMFILES\Gaim"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1010 Goto instdir_done
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1011 user_dir:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1012 StrCpy $2 "$SMPROGRAMS"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1013 Push $2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1014 Call GetParent
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1015 Call GetParent
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1016 Pop $2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1017 StrCpy $INSTDIR "$2\Gaim"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1018
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1019 instdir_done:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1020
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1021 FunctionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1022
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
1023 Function un.onInit
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
1024
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
1025 ; Get stored language prefrence
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1026 ReadRegStr $LANGUAGE HKCU ${GAIM_REG_KEY} "${GAIM_REG_LANG}"
6255
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
1027
386d65dd7f0d [gaim-migrate @ 6751]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6233
diff changeset
1028 FunctionEnd
6233
0c64ba470632 [gaim-migrate @ 6726]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 6159
diff changeset
1029
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1030 Function .onSelChange
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1031 Push $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1032 Push $2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1033
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1034 StrCpy $2 ${SF_SELECTED}
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1035 SectionGetFlags ${SecGtkNone} $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1036 IntOp $2 $2 & $0
7352
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
1037 SectionGetFlags ${SecGtkWimp} $0
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
1038 IntOp $2 $2 & $0
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1039 SectionGetFlags ${SecGtkBluecurve} $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1040 IntOp $2 $2 & $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1041 SectionGetFlags ${SecGtkLighthouseblue} $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1042 IntOp $2 $2 & $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1043 StrCmp $2 0 skip
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1044 SectionSetFlags ${SecGtkNone} 0
7352
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
1045 SectionSetFlags ${SecGtkWimp} 0
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1046 SectionSetFlags ${SecGtkBluecurve} 0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1047 SectionSetFlags ${SecGtkLighthouseblue} 0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1048 skip:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1049
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1050 !insertmacro UnselectSection $GTK_THEME_SEL
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1051
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1052 ; Remember old selection
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1053 StrCpy $2 $GTK_THEME_SEL
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1054
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1055 ; Now go through and see who is checked..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1056 SectionGetFlags ${SecGtkNone} $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1057 IntOp $0 $0 & ${SF_SELECTED}
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1058 IntCmp $0 ${SF_SELECTED} 0 +2 +2
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1059 StrCpy $GTK_THEME_SEL ${SecGtkNone}
7352
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
1060 SectionGetFlags ${SecGtkWimp} $0
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
1061 IntOp $0 $0 & ${SF_SELECTED}
af0e0b4d0c32 [gaim-migrate @ 7943]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7215
diff changeset
1062 IntCmp $0 ${SF_SELECTED} 0 +2 +2
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1063 StrCpy $GTK_THEME_SEL ${SecGtkWimp}
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1064 SectionGetFlags ${SecGtkBluecurve} $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1065 IntOp $0 $0 & ${SF_SELECTED}
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1066 IntCmp $0 ${SF_SELECTED} 0 +2 +2
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1067 StrCpy $GTK_THEME_SEL ${SecGtkBluecurve}
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1068 SectionGetFlags ${SecGtkLighthouseblue} $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1069 IntOp $0 $0 & ${SF_SELECTED}
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1070 IntCmp $0 ${SF_SELECTED} 0 +2 +2
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1071 StrCpy $GTK_THEME_SEL ${SecGtkLighthouseblue}
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1072
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1073 StrCmp $2 $GTK_THEME_SEL 0 +2 ; selection hasn't changed
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1074 !insertmacro SelectSection $GTK_THEME_SEL
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1075
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1076 Pop $2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1077 Pop $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1078 FunctionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1079
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1080 ; Page enter and exit functions..
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1081
7600
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1082 Function preWelcomePage
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1083 ; If this installer dosn't have GTK, check whether we need it.
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1084 ; We do this here an not in .onInit because language change in
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1085 ; .onInit doesn't take effect until it is finished.
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1086 !ifndef WITH_GTK
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1087 Call DoWeNeedGtk
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1088 Pop $0
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1089 Pop $GTK_FOLDER
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1090
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1091 StrCmp $0 "0" have_gtk need_gtk
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1092 need_gtk:
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1093 IfSilent skip_mb
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1094 MessageBox MB_OK $(GTK_INSTALLER_NEEDED) IDOK
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1095 skip_mb:
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1096 Quit
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1097 have_gtk:
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1098 !endif
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1099 FunctionEnd
f48c6e4db102 [gaim-migrate @ 8222]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7575
diff changeset
1100
7572
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
1101 !ifdef WITH_GTK
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1102 Function preGtkDirPage
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1103 Call DoWeNeedGtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1104 Pop $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1105 Pop $1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1106
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1107 StrCmp $0 "0" have_gtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1108 StrCmp $0 "1" upgrade_gtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1109 StrCmp $0 "2" no_gtk no_gtk
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1110
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1111 ; Don't show dir selector.. Upgrades are done to existing path..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1112 have_gtk:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1113 upgrade_gtk:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1114 Abort
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1115
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1116 no_gtk:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1117 StrCmp $1 "NONE" 0 no_gtk_cont
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1118 ; Got no install rights..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1119 Abort
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1120 no_gtk_cont:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1121 ; Suggest path..
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1122 StrCmp $1 "HKCU" 0 hklm1
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1123 StrCpy $2 "$SMPROGRAMS"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1124 Push $2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1125 Call GetParent
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1126 Call GetParent
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1127 Pop $2
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1128 StrCpy $2 "$2\GTK\2.0"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1129 Goto got_path
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1130 hklm1:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1131 StrCpy $2 "${GTK_DEFAULT_INSTALL_PATH}"
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1132
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1133 got_path:
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1134 StrCpy $name "GTK+ ${GTK_VERSION}"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1135 StrCpy $GTK_FOLDER $2
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1136 FunctionEnd
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1137
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1138 Function postGtkDirPage
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1139 StrCpy $name "Gaim ${GAIM_VERSION}"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1140 Push $GTK_FOLDER
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1141 Call VerifyDir
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1142 Pop $0
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1143 StrCmp $0 "0" 0 done
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1144 IfSilent skip_mb
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1145 MessageBox MB_OK $(GTK_BAD_INSTALL_PATH) IDOK
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1146 skip_mb:
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1147 Abort
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1148 done:
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1149 FunctionEnd
7572
6300424eafbf [gaim-migrate @ 8188]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7558
diff changeset
1150 !endif
5332
4d734dbc88dd [gaim-migrate @ 5705]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 5066
diff changeset
1151
7558
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1152 ; GetParameters
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1153 ; input, none
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1154 ; output, top of stack (replaces, with e.g. whatever)
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1155 ; modifies no other variables.
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1156
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1157 Function GetParameters
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1158
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1159 Push $R0
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1160 Push $R1
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1161 Push $R2
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1162 Push $R3
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1163
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1164 StrCpy $R2 1
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1165 StrLen $R3 $CMDLINE
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1166
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1167 ;Check for quote or space
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1168 StrCpy $R0 $CMDLINE $R2
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1169 StrCmp $R0 '"' 0 +3
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1170 StrCpy $R1 '"'
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1171 Goto loop
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1172 StrCpy $R1 " "
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1173
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1174 loop:
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1175 IntOp $R2 $R2 + 1
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1176 StrCpy $R0 $CMDLINE 1 $R2
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1177 StrCmp $R0 $R1 get
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1178 StrCmp $R2 $R3 get
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1179 Goto loop
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1180
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1181 get:
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1182 IntOp $R2 $R2 + 1
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1183 StrCpy $R0 $CMDLINE 1 $R2
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1184 StrCmp $R0 " " get
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1185 StrCpy $R0 $CMDLINE "" $R2
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1186
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1187 Pop $R3
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1188 Pop $R2
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1189 Pop $R1
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1190 Exch $R0
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1191
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1192 FunctionEnd
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1193
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1194 ; StrStr
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1195 ; input, top of stack = string to search for
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1196 ; top of stack-1 = string to search in
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1197 ; output, top of stack (replaces with the portion of the string remaining)
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1198 ; modifies no other variables.
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1199 ;
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1200 ; Usage:
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1201 ; Push "this is a long ass string"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1202 ; Push "ass"
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1203 ; Call StrStr
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1204 ; Pop $R0
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1205 ; ($R0 at this point is "ass string")
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1206
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1207 Function StrStr
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1208 Exch $R1 ; st=haystack,old$R1, $R1=needle
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1209 Exch ; st=old$R1,haystack
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1210 Exch $R2 ; st=old$R1,old$R2, $R2=haystack
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1211 Push $R3
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1212 Push $R4
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1213 Push $R5
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1214 StrLen $R3 $R1
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1215 StrCpy $R4 0
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1216 ; $R1=needle
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1217 ; $R2=haystack
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1218 ; $R3=len(needle)
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1219 ; $R4=cnt
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1220 ; $R5=tmp
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1221 loop:
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1222 StrCpy $R5 $R2 $R3 $R4
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1223 StrCmp $R5 $R1 done
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1224 StrCmp $R5 "" done
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1225 IntOp $R4 $R4 + 1
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1226 Goto loop
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1227 done:
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1228 StrCpy $R1 $R2 "" $R4
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1229 Pop $R5
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1230 Pop $R4
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1231 Pop $R3
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1232 Pop $R2
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1233 Exch $R1
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1234 FunctionEnd
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1235
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1236 ;
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1237 ; Parse the Command line
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1238 ;
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1239 ; Unattended install command line parameters
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1240 ; /L=Language e.g.: /L=1033
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1241 ;
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1242 Function ParseParameters
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1243 IntOp $LANG_IS_SET 0 + 0
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1244 Call GetParameters
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1245 Pop $R0
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1246 Push $R0
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1247 Push "L="
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1248 Call StrStr
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1249 Pop $R1
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1250 StrCmp $R1 "" next
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1251 StrCpy $R1 $R1 4 2 ; Strip first 2 chars of string
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1252 StrCpy $LANGUAGE $R1
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1253 IntOp $LANG_IS_SET 0 + 1
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1254 next:
908343b14e70 [gaim-migrate @ 8172]
Herman Bloggs <hermanator12002@yahoo.com>
parents: 7357
diff changeset
1255 FunctionEnd