annotate gaim-installer.nsi @ 10900:d056acc96b30

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