annotate gaim-installer.nsi @ 10865:c28766b87f64

[gaim-migrate @ 12549] Check all characters in the unescaped value of a HTML entity when matching smileys. Also make sure that the returned value of the smiley length is correct when dealing with escaped text. This resolves an inconsistency between how smileys are detected and how they are looked up for display. committer: Tailor Script <tailor@pidgin.im>
author Daniel Atallah <daniel.atallah@gmail.com>
date Sun, 24 Apr 2005 21:28:39 +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