pidgin/pidgin

merge of '77693555855fe9cd3215414f79964dba346cc5fa'
gaim
2008-11-12, Richard Laager
1966704b3e42
merge of '77693555855fe9cd3215414f79964dba346cc5fa'
and '19a87e98e5857ad0289f2c760d460f7f1dbbb42d'
; Installer script for win32 Gaim
; Original Author: Herman Bloggs <hermanator12002@yahoo.com>
; Updated By: Daniel Atallah <daniel_atallah@yahoo.com>
; NOTE: this .NSI script is intended for NSIS 2.08
;
;--------------------------------
;Global Variables
Var name
Var GTK_FOLDER
Var GTK_THEME_SEL
Var ISSILENT
Var STARTUP_RUN_KEY
Var SPELLCHECK_SEL
;--------------------------------
;Configuration
;The name var is set in .onInit
Name $name
!ifdef WITH_GTK
OutFile "gaim-${GAIM_VERSION}.exe"
!else
!ifdef DEBUG
OutFile "gaim-${GAIM_VERSION}-debug.exe"
!else
OutFile "gaim-${GAIM_VERSION}-no-gtk.exe"
!endif
!endif
SetCompressor /SOLID lzma
ShowInstDetails show
ShowUninstDetails show
SetDateSave on
; $name and $INSTDIR are set in .onInit function..
!include "MUI.nsh"
!include "Sections.nsh"
!include "FileFunc.nsh"
!insertmacro GetParameters
!insertmacro GetOptions
!insertmacro GetParent
!include "WordFunc.nsh"
!insertmacro VersionCompare
!include "TextFunc.nsh"
!insertmacro ConfigWriteS
;--------------------------------
;Defines
!define GAIM_NSIS_INCLUDE_PATH ".\gtk\win32\nsis"
!define GAIM_INSTALLER_DEPS "..\win32-dev\gaim-inst-deps"
!define GAIM_REG_KEY "SOFTWARE\gaim"
!define GAIM_UNINSTALL_KEY "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Gaim"
!define HKLM_APP_PATHS_KEY "SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\gaim.exe"
!define GAIM_STARTUP_RUN_KEY "SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
!define GAIM_UNINST_EXE "gaim-uninst.exe"
!define GTK_MIN_VERSION "2.6.10"
!define GTK_REG_KEY "SOFTWARE\GTK\2.0"
!define PERL_REG_KEY "SOFTWARE\Perl"
!define PERL_DLL "perl58.dll"
!define GTK_DEFAULT_INSTALL_PATH "$COMMONFILES\GTK\2.0"
!define GTK_RUNTIME_INSTALLER "..\gtk_installer\gtk-runtime*.exe"
!define ASPELL_REG_KEY "SOFTWARE\Aspell"
!define DOWNLOADER_URL "http://gaim.sourceforge.net/win32/download_redir.php"
;--------------------------------
;Version resource
VIProductVersion "${GAIM_PRODUCT_VERSION}"
VIAddVersionKey "ProductName" "Gaim"
VIAddVersionKey "FileVersion" "${GAIM_VERSION}"
VIAddVersionKey "ProductVersion" "${GAIM_VERSION}"
VIAddVersionKey "LegalCopyright" ""
!ifdef WITH_GTK
VIAddVersionKey "FileDescription" "Gaim Installer (w/ GTK+ Installer)"
!else
!ifdef DEBUG
VIAddVersionKey "FileDescription" "Gaim Installer (Debug Version)"
!else
VIAddVersionKey "FileDescription" "Gaim Installer (w/o GTK+ Installer)"
!endif
!endif
;--------------------------------
;Modern UI Configuration
!define MUI_ICON ".\gtk\pixmaps\gaim-install.ico"
!define MUI_UNICON ".\gtk\pixmaps\gaim-install.ico"
!define MUI_WELCOMEFINISHPAGE_BITMAP ".\gtk\win32\nsis\gaim-intro.bmp"
!define MUI_HEADERIMAGE
!define MUI_HEADERIMAGE_BITMAP ".\gtk\win32\nsis\gaim-header.bmp"
; Alter License section
!define MUI_LICENSEPAGE_BUTTON $(GAIM_LICENSE_BUTTON)
!define MUI_LICENSEPAGE_TEXT_BOTTOM $(GAIM_LICENSE_BOTTOM_TEXT)
!define MUI_LANGDLL_REGISTRY_ROOT "HKCU"
!define MUI_LANGDLL_REGISTRY_KEY ${GAIM_REG_KEY}
!define MUI_LANGDLL_REGISTRY_VALUENAME "Installer Language"
!define MUI_COMPONENTSPAGE_SMALLDESC
!define MUI_ABORTWARNING
;Finish Page config
!define MUI_FINISHPAGE_RUN "$INSTDIR\gaim.exe"
!define MUI_FINISHPAGE_RUN_NOTCHECKED
!define MUI_FINISHPAGE_LINK $(GAIM_FINISH_VISIT_WEB_SITE)
!define MUI_FINISHPAGE_LINK_LOCATION "http://gaim.sourceforge.net/win32"
;--------------------------------
;Pages
!define MUI_PAGE_CUSTOMFUNCTION_PRE preWelcomePage
!insertmacro MUI_PAGE_WELCOME
!insertmacro MUI_PAGE_LICENSE "./COPYING"
!insertmacro MUI_PAGE_COMPONENTS
!ifdef WITH_GTK
; GTK+ install dir page
!define MUI_PAGE_CUSTOMFUNCTION_PRE preGtkDirPage
!define MUI_PAGE_CUSTOMFUNCTION_LEAVE postGtkDirPage
!define MUI_DIRECTORYPAGE_VARIABLE $GTK_FOLDER
!insertmacro MUI_PAGE_DIRECTORY
!endif
; Gaim install dir page
!insertmacro MUI_PAGE_DIRECTORY
!insertmacro MUI_PAGE_INSTFILES
!insertmacro MUI_PAGE_FINISH
!insertmacro MUI_UNPAGE_WELCOME
!insertmacro MUI_UNPAGE_CONFIRM
!insertmacro MUI_UNPAGE_INSTFILES
!insertmacro MUI_UNPAGE_FINISH
;--------------------------------
;Languages
;; English goes first because its the default. The rest are
;; in alphabetical order (at least the strings actually displayed
;; will be).
!insertmacro MUI_LANGUAGE "English"
!insertmacro MUI_LANGUAGE "Albanian"
!insertmacro MUI_LANGUAGE "Bulgarian"
!insertmacro MUI_LANGUAGE "Catalan"
!insertmacro MUI_LANGUAGE "Czech"
!insertmacro MUI_LANGUAGE "Danish"
!insertmacro MUI_LANGUAGE "SimpChinese"
!insertmacro MUI_LANGUAGE "TradChinese"
!insertmacro MUI_LANGUAGE "German"
!insertmacro MUI_LANGUAGE "Spanish"
!insertmacro MUI_LANGUAGE "French"
!insertmacro MUI_LANGUAGE "Hebrew"
!insertmacro MUI_LANGUAGE "Italian"
!insertmacro MUI_LANGUAGE "Japanese"
!insertmacro MUI_LANGUAGE "Korean"
!insertmacro MUI_LANGUAGE "Kurdish"
!insertmacro MUI_LANGUAGE "Lithuanian"
!insertmacro MUI_LANGUAGE "Hungarian"
!insertmacro MUI_LANGUAGE "Dutch"
!insertmacro MUI_LANGUAGE "Norwegian"
!insertmacro MUI_LANGUAGE "Polish"
!insertmacro MUI_LANGUAGE "PortugueseBR"
!insertmacro MUI_LANGUAGE "Portuguese"
!insertmacro MUI_LANGUAGE "Romanian"
!insertmacro MUI_LANGUAGE "Russian"
!insertmacro MUI_LANGUAGE "Serbian"
!insertmacro MUI_LANGUAGE "Slovak"
!insertmacro MUI_LANGUAGE "Slovenian"
!insertmacro MUI_LANGUAGE "Finnish"
!insertmacro MUI_LANGUAGE "Swedish"
;--------------------------------
;Translations
!define GAIM_DEFAULT_LANGFILE "${GAIM_NSIS_INCLUDE_PATH}\translations\english.nsh"
!include "${GAIM_NSIS_INCLUDE_PATH}\langmacros.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "ALBANIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\albanian.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "BULGARIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\bulgarian.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "CATALAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\catalan.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "CZECH" "${GAIM_NSIS_INCLUDE_PATH}\translations\czech.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "DANISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\danish.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "DUTCH" "${GAIM_NSIS_INCLUDE_PATH}\translations\dutch.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "ENGLISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\english.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "FINNISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\finnish.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "FRENCH" "${GAIM_NSIS_INCLUDE_PATH}\translations\french.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "GERMAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\german.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "HEBREW" "${GAIM_NSIS_INCLUDE_PATH}\translations\hebrew.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "HUNGARIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\hungarian.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "ITALIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\italian.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "JAPANESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\japanese.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "KOREAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\korean.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "KURDISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\kurdish.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "LITHUANIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\lithuanian.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "NORWEGIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\norwegian.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "POLISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\polish.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "PORTUGUESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\portuguese.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "PORTUGUESEBR" "${GAIM_NSIS_INCLUDE_PATH}\translations\portuguese-br.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "ROMANIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\romanian.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "RUSSIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\russian.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SERBIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\serbian-latin.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SIMPCHINESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\simp-chinese.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SLOVAK" "${GAIM_NSIS_INCLUDE_PATH}\translations\slovak.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SLOVENIAN" "${GAIM_NSIS_INCLUDE_PATH}\translations\slovenian.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SPANISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\spanish.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "SWEDISH" "${GAIM_NSIS_INCLUDE_PATH}\translations\swedish.nsh"
!insertmacro GAIM_MACRO_INCLUDE_LANGFILE "TRADCHINESE" "${GAIM_NSIS_INCLUDE_PATH}\translations\trad-chinese.nsh"
;--------------------------------
;Reserve Files
; Only need this if using bzip2 compression
!insertmacro MUI_RESERVEFILE_INSTALLOPTIONS
!insertmacro MUI_RESERVEFILE_LANGDLL
ReserveFile "${NSISDIR}\Plugins\UserInfo.dll"
;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Start Install Sections ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;--------------------------------
;Uninstall any old version of Gaim
Section -SecUninstallOldGaim
; Check install rights..
Call CheckUserInstallRights
Pop $R0
;If gaim is currently set to run on startup,
; save the section of the Registry where the setting is before uninstalling,
; so we can put it back after installing the new version
ClearErrors
ReadRegStr $STARTUP_RUN_KEY HKCU "${GAIM_STARTUP_RUN_KEY}" "Gaim"
IfErrors +3
StrCpy $STARTUP_RUN_KEY "HKCU"
Goto +4
ClearErrors
ReadRegStr $STARTUP_RUN_KEY HKLM "${GAIM_STARTUP_RUN_KEY}" "Gaim"
IfErrors +2
StrCpy $STARTUP_RUN_KEY "HKLM"
StrCmp $R0 "HKLM" gaim_hklm
StrCmp $R0 "HKCU" gaim_hkcu done
gaim_hkcu:
ReadRegStr $R1 HKCU ${GAIM_REG_KEY} ""
ReadRegStr $R2 HKCU ${GAIM_REG_KEY} "Version"
ReadRegStr $R3 HKCU "${GAIM_UNINSTALL_KEY}" "UninstallString"
Goto try_uninstall
gaim_hklm:
ReadRegStr $R1 HKLM ${GAIM_REG_KEY} ""
ReadRegStr $R2 HKLM ${GAIM_REG_KEY} "Version"
ReadRegStr $R3 HKLM "${GAIM_UNINSTALL_KEY}" "UninstallString"
; If previous version exists .. remove
try_uninstall:
StrCmp $R1 "" done
; Version key started with 0.60a3. Prior versions can't be
; automaticlly uninstalled.
StrCmp $R2 "" uninstall_problem
; Check if we have uninstall string..
IfFileExists $R3 0 uninstall_problem
; Have uninstall string.. go ahead and uninstall.
SetOverwrite on
; Need to copy uninstaller outside of the install dir
ClearErrors
CopyFiles /SILENT $R3 "$TEMP\${GAIM_UNINST_EXE}"
SetOverwrite off
IfErrors uninstall_problem
; Ready to uninstall..
ClearErrors
ExecWait '"$TEMP\${GAIM_UNINST_EXE}" /S _?=$R1'
IfErrors exec_error
Delete "$TEMP\${GAIM_UNINST_EXE}"
Goto done
exec_error:
Delete "$TEMP\${GAIM_UNINST_EXE}"
Goto uninstall_problem
uninstall_problem:
; We can't uninstall. Either the user must manually uninstall or we ignore and reinstall over it.
MessageBox MB_OKCANCEL $(GAIM_PROMPT_CONTINUE_WITHOUT_UNINSTALL) /SD IDOK IDOK done
Quit
done:
SectionEnd
;--------------------------------
;GTK+ Runtime Install Section
!ifdef WITH_GTK
Section $(GTK_SECTION_TITLE) SecGtk
SectionIn 1 RO
Call CheckUserInstallRights
Pop $R1
SetOutPath $TEMP
SetOverwrite on
File /oname=gtk-runtime.exe ${GTK_RUNTIME_INSTALLER}
SetOverwrite off
Call DoWeNeedGtk
Pop $R0
Pop $R6
StrCmp $R0 "0" have_gtk
StrCmp $R0 "1" upgrade_gtk
StrCmp $R0 "2" upgrade_gtk
StrCmp $R0 "3" no_gtk no_gtk
no_gtk:
StrCmp $R1 "NONE" gtk_no_install_rights
ClearErrors
ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE $ISSILENT /D=$GTK_FOLDER'
IfErrors gtk_install_error done
upgrade_gtk:
StrCpy $GTK_FOLDER $R6
StrCmp $R0 "2" +2 ; Upgrade isn't optional
MessageBox MB_YESNO $(GTK_UPGRADE_PROMPT) /SD IDYES IDNO done
ClearErrors
ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE /S /D=$GTK_FOLDER'
IfErrors gtk_install_error done
gtk_install_error:
Delete "$TEMP\gtk-runtime.exe"
MessageBox MB_OK $(GTK_INSTALL_ERROR) /SD IDOK
Quit
have_gtk:
StrCpy $GTK_FOLDER $R6
StrCmp $R1 "NONE" done ; If we have no rights.. can't re-install..
; Even if we have a sufficient version of GTK+, we give user choice to re-install.
ClearErrors
ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE $ISSILENT'
IfErrors gtk_install_error
Goto done
;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; end got_install rights
gtk_no_install_rights:
; Install GTK+ to Gaim install dir
StrCpy $GTK_FOLDER $INSTDIR
ClearErrors
ExecWait '"$TEMP\gtk-runtime.exe" /L=$LANGUAGE $ISSILENT /D=$GTK_FOLDER'
IfErrors gtk_install_error
SetOverwrite on
ClearErrors
CopyFiles /FILESONLY "$GTK_FOLDER\bin\*.dll" $GTK_FOLDER
SetOverwrite off
IfErrors gtk_install_error
Delete "$GTK_FOLDER\bin\*.dll"
Goto done
;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; end gtk_no_install_rights
done:
Delete "$TEMP\gtk-runtime.exe"
SectionEnd ; end of GTK+ section
!endif
;--------------------------------
;Gaim Install Section
Section $(GAIM_SECTION_TITLE) SecGaim
SectionIn 1 RO
; Check install rights..
Call CheckUserInstallRights
Pop $R0
; Get GTK+ lib dir if we have it..
StrCmp $R0 "NONE" gaim_none
StrCmp $R0 "HKLM" gaim_hklm gaim_hkcu
gaim_hklm:
ReadRegStr $R1 HKLM ${GTK_REG_KEY} "Path"
WriteRegStr HKLM "${HKLM_APP_PATHS_KEY}" "" "$INSTDIR\gaim.exe"
WriteRegStr HKLM "${HKLM_APP_PATHS_KEY}" "Path" "$R1\bin"
WriteRegStr HKLM ${GAIM_REG_KEY} "" "$INSTDIR"
WriteRegStr HKLM ${GAIM_REG_KEY} "Version" "${GAIM_VERSION}"
WriteRegStr HKLM "${GAIM_UNINSTALL_KEY}" "DisplayName" $(GAIM_UNINSTALL_DESC)
WriteRegStr HKLM "${GAIM_UNINSTALL_KEY}" "UninstallString" "$INSTDIR\${GAIM_UNINST_EXE}"
; Sets scope of the desktop and Start Menu entries for all users.
SetShellVarContext "all"
Goto gaim_install_files
gaim_hkcu:
ReadRegStr $R1 HKCU ${GTK_REG_KEY} "Path"
StrCmp $R1 "" 0 gaim_hkcu1
ReadRegStr $R1 HKLM ${GTK_REG_KEY} "Path"
gaim_hkcu1:
WriteRegStr HKCU ${GAIM_REG_KEY} "" "$INSTDIR"
WriteRegStr HKCU ${GAIM_REG_KEY} "Version" "${GAIM_VERSION}"
WriteRegStr HKCU "${GAIM_UNINSTALL_KEY}" "DisplayName" $(GAIM_UNINSTALL_DESC)
WriteRegStr HKCU "${GAIM_UNINSTALL_KEY}" "UninstallString" "$INSTDIR\${GAIM_UNINST_EXE}"
Goto gaim_install_files
gaim_none:
ReadRegStr $R1 HKLM ${GTK_REG_KEY} "Path"
gaim_install_files:
SetOutPath "$INSTDIR"
; Gaim files
SetOverwrite on
File /r ${GAIM_INSTALL_DIR}\*.*
!ifdef DEBUG
File "${GAIM_INSTALLER_DEPS}\exchndl.dll"
!endif
; Install shfolder.dll if need be..
SearchPath $R4 "shfolder.dll"
StrCmp $R4 "" 0 got_shfolder
SetOutPath "$SYSDIR"
File "${GAIM_INSTALLER_DEPS}\shfolder.dll"
SetOutPath "$INSTDIR"
got_shfolder:
; Check if Perl is installed, if so add it to the AppPaths
ReadRegStr $R2 HKLM ${PERL_REG_KEY} ""
StrCmp $R2 "" 0 perl_exists
ReadRegStr $R2 HKCU ${PERL_REG_KEY} ""
StrCmp $R2 "" perl_done perl_exists
perl_exists:
IfFileExists "$R2\bin\${PERL_DLL}" 0 perl_done
StrCmp $R0 "HKLM" 0 perl_done
ReadRegStr $R3 HKLM "${HKLM_APP_PATHS_KEY}" "Path"
WriteRegStr HKLM "${HKLM_APP_PATHS_KEY}" "Path" "$R3;$R2\bin"
perl_done:
; If this is under NT4, delete the SILC support stuff
; there is a bug that will prevent any account from connecting
; See https://lists.silcnet.org/pipermail/silc-devel/2005-January/001588.html
Call GetWindowsVersion
Pop $R2
StrCmp $R2 "NT 4.0" +1 +4
Delete "$INSTDIR\plugins\libsilc.dll"
Delete "$INSTDIR\silcclient.dll"
Delete "$INSTDIR\silc.dll"
SetOutPath "$INSTDIR"
; If we don't have install rights.. we're done
StrCmp $R0 "NONE" done
SetOverwrite off
; write out uninstaller
SetOverwrite on
WriteUninstaller "$INSTDIR\${GAIM_UNINST_EXE}"
SetOverwrite off
; If we previously had gaim setup to run on startup, make it do so again
StrCmp $STARTUP_RUN_KEY "HKCU" +1 +2
WriteRegStr HKCU "${GAIM_STARTUP_RUN_KEY}" "Gaim" "$INSTDIR\gaim.exe"
StrCmp $STARTUP_RUN_KEY "HKLM" +1 +2
WriteRegStr HKLM "${GAIM_STARTUP_RUN_KEY}" "Gaim" "$INSTDIR\gaim.exe"
done:
SectionEnd ; end of default Gaim section
;--------------------------------
;Shortcuts
SectionGroup /e $(GAIM_SHORTCUTS_SECTION_TITLE) SecShortcuts
Section /o $(GAIM_DESKTOP_SHORTCUT_SECTION_TITLE) SecDesktopShortcut
SetOverwrite on
CreateShortCut "$DESKTOP\Gaim.lnk" "$INSTDIR\gaim.exe"
SetOverwrite off
SectionEnd
Section $(GAIM_STARTMENU_SHORTCUT_SECTION_TITLE) SecStartMenuShortcut
SetOverwrite on
CreateDirectory "$SMPROGRAMS\Gaim"
CreateShortCut "$SMPROGRAMS\Gaim\Gaim.lnk" "$INSTDIR\gaim.exe"
SetOverwrite off
SectionEnd
SectionGroupEnd
;--------------------------------
;GTK+ Themes
SectionGroup /e $(GTK_THEMES_SECTION_TITLE) SecGtkThemes
Section /o $(GTK_NOTHEME_SECTION_TITLE) SecGtkNone
Push "Raleigh"
Call WriteGtkThemeConfig
SectionEnd
Section $(GTK_WIMP_SECTION_TITLE) SecGtkWimp
Push "MS-Windows"
Call WriteGtkThemeConfig
SectionEnd
Section /o $(GTK_BLUECURVE_SECTION_TITLE) SecGtkBluecurve
Push "Bluecurve"
Call WriteGtkThemeConfig
SectionEnd
Section /o $(GTK_LIGHTHOUSEBLUE_SECTION_TITLE) SecGtkLighthouseblue
Push "Lighthouseblue"
Call WriteGtkThemeConfig
SectionEnd
SectionGroupEnd
;--------------------------------
;Spell Checking
SectionGroup /e $(GAIM_SPELLCHECK_SECTION_TITLE) SecSpellCheck
Section /o $(GAIM_SPELLCHECK_BRETON) SecSpellCheckBreton
Push ${SecSpellCheckBreton}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_CATALAN) SecSpellCheckCatalan
Push ${SecSpellCheckCatalan}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_CZECH) SecSpellCheckCzech
Push ${SecSpellCheckCzech}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_WELSH) SecSpellCheckWelsh
Push ${SecSpellCheckWelsh}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_DANISH) SecSpellCheckDanish
Push ${SecSpellCheckDanish}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_GERMAN) SecSpellCheckGerman
Push ${SecSpellCheckGerman}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_GREEK) SecSpellCheckGreek
Push ${SecSpellCheckGreek}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_ENGLISH) SecSpellCheckEnglish
Push ${SecSpellCheckEnglish}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_ESPERANTO) SecSpellCheckEsperanto
Push ${SecSpellCheckEsperanto}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_SPANISH) SecSpellCheckSpanish
Push ${SecSpellCheckSpanish}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_FAROESE) SecSpellCheckFaroese
Push ${SecSpellCheckFaroese}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_FRENCH) SecSpellCheckFrench
Push ${SecSpellCheckFrench}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_ITALIAN) SecSpellCheckItalian
Push ${SecSpellCheckItalian}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_DUTCH) SecSpellCheckDutch
Push ${SecSpellCheckDutch}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_NORWEGIAN) SecSpellCheckNorwegian
Push ${SecSpellCheckNorwegian}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_POLISH) SecSpellCheckPolish
Push ${SecSpellCheckPolish}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_PORTUGUESE) SecSpellCheckPortuguese
Push ${SecSpellCheckPortuguese}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_ROMANIAN) SecSpellCheckRomanian
Push ${SecSpellCheckRomanian}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_RUSSIAN) SecSpellCheckRussian
Push ${SecSpellCheckRussian}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_SLOVAK) SecSpellCheckSlovak
Push ${SecSpellCheckSlovak}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_SWEDISH) SecSpellCheckSwedish
Push ${SecSpellCheckSwedish}
Call InstallAspellAndDict
SectionEnd
Section /o $(GAIM_SPELLCHECK_UKRAINIAN) SecSpellCheckUkrainian
Push ${SecSpellCheckUkrainian}
Call InstallAspellAndDict
SectionEnd
SectionGroupEnd
;--------------------------------
;Uninstaller Section
Section Uninstall
Call un.CheckUserInstallRights
Pop $R0
StrCmp $R0 "NONE" no_rights
StrCmp $R0 "HKCU" try_hkcu try_hklm
try_hkcu:
ReadRegStr $R0 HKCU ${GAIM_REG_KEY} ""
StrCmp $R0 $INSTDIR 0 cant_uninstall
; HKCU install path matches our INSTDIR.. so uninstall
DeleteRegKey HKCU ${GAIM_REG_KEY}
DeleteRegKey HKCU "${GAIM_UNINSTALL_KEY}"
Goto cont_uninstall
try_hklm:
ReadRegStr $R0 HKLM ${GAIM_REG_KEY} ""
StrCmp $R0 $INSTDIR 0 try_hkcu
; HKLM install path matches our INSTDIR.. so uninstall
DeleteRegKey HKLM ${GAIM_REG_KEY}
DeleteRegKey HKLM "${GAIM_UNINSTALL_KEY}"
DeleteRegKey HKLM "${HKLM_APP_PATHS_KEY}"
; Sets start menu and desktop scope to all users..
SetShellVarContext "all"
cont_uninstall:
; The WinPrefs plugin may have left this behind..
DeleteRegValue HKCU "${GAIM_STARTUP_RUN_KEY}" "Gaim"
DeleteRegValue HKLM "${GAIM_STARTUP_RUN_KEY}" "Gaim"
; Remove Language preference info
DeleteRegKey HKCU ${GAIM_REG_KEY} ;${MUI_LANGDLL_REGISTRY_ROOT} ${MUI_LANGDLL_REGISTRY_KEY}
RMDir /r "$INSTDIR\locale"
RMDir /r "$INSTDIR\pixmaps"
RMDir /r "$INSTDIR\perlmod"
Delete "$INSTDIR\plugins\autoaccept.dll"
Delete "$INSTDIR\plugins\autoreply.dll"
Delete "$INSTDIR\plugins\buddynote.dll"
Delete "$INSTDIR\plugins\convcolors.dll"
Delete "$INSTDIR\plugins\extplacement.dll"
Delete "$INSTDIR\plugins\gaimrc.dll"
Delete "$INSTDIR\plugins\history.dll"
Delete "$INSTDIR\plugins\iconaway.dll"
Delete "$INSTDIR\plugins\idle.dll"
Delete "$INSTDIR\plugins\libaim.dll"
Delete "$INSTDIR\plugins\libgg.dll"
Delete "$INSTDIR\plugins\libicq.dll"
Delete "$INSTDIR\plugins\libirc.dll"
Delete "$INSTDIR\plugins\libjabber.dll"
Delete "$INSTDIR\plugins\libmsn.dll"
Delete "$INSTDIR\plugins\libnapster.dll"
Delete "$INSTDIR\plugins\libnovell.dll"
Delete "$INSTDIR\plugins\libqq.dll"
Delete "$INSTDIR\plugins\libsametime.dll"
Delete "$INSTDIR\plugins\libsilc.dll"
Delete "$INSTDIR\plugins\libsimple.dll"
Delete "$INSTDIR\plugins\libtoc.dll"
Delete "$INSTDIR\plugins\libyahoo.dll"
Delete "$INSTDIR\plugins\log_reader.dll"
Delete "$INSTDIR\plugins\markerline.dll"
Delete "$INSTDIR\plugins\newline.dll"
Delete "$INSTDIR\plugins\notify.dll"
Delete "$INSTDIR\plugins\offlinemsg.dll"
Delete "$INSTDIR\plugins\perl.dll"
Delete "$INSTDIR\plugins\psychic.dll"
Delete "$INSTDIR\plugins\relnot.dll"
Delete "$INSTDIR\plugins\spellchk.dll"
Delete "$INSTDIR\plugins\ssl-nss.dll"
Delete "$INSTDIR\plugins\ssl.dll"
Delete "$INSTDIR\plugins\statenotify.dll"
Delete "$INSTDIR\plugins\tcl.dll"
Delete "$INSTDIR\plugins\ticker.dll"
Delete "$INSTDIR\plugins\timestamp.dll"
Delete "$INSTDIR\plugins\timestamp_format.dll"
Delete "$INSTDIR\plugins\win2ktrans.dll"
Delete "$INSTDIR\plugins\winprefs.dll"
RMDir "$INSTDIR\plugins"
Delete "$INSTDIR\sounds\gaim\alert.wav"
Delete "$INSTDIR\sounds\gaim\login.wav"
Delete "$INSTDIR\sounds\gaim\logout.wav"
Delete "$INSTDIR\sounds\gaim\receive.wav"
Delete "$INSTDIR\sounds\gaim\send.wav"
RMDir "$INSTDIR\sounds\gaim"
RMDir "$INSTDIR\sounds"
Delete "$INSTDIR\freebl3.dll"
Delete "$INSTDIR\gaim.exe"
Delete "$INSTDIR\gtkgaim.dll"
Delete "$INSTDIR\idletrack.dll"
Delete "$INSTDIR\libgaim.dll"
Delete "$INSTDIR\libgtkspell.dll"
Delete "$INSTDIR\liboscar.dll"
Delete "$INSTDIR\libmeanwhile-1.dll"
Delete "$INSTDIR\libxml2.dll"
Delete "$INSTDIR\nspr4.dll"
Delete "$INSTDIR\nss3.dll"
Delete "$INSTDIR\nssckbi.dll"
Delete "$INSTDIR\plc4.dll"
Delete "$INSTDIR\plds4.dll"
Delete "$INSTDIR\silc.dll"
Delete "$INSTDIR\silcclient.dll"
Delete "$INSTDIR\softokn3.dll"
Delete "$INSTDIR\ssl3.dll"
Delete "$INSTDIR\${GAIM_UNINST_EXE}"
!ifdef DEBUG
Delete "$INSTDIR\exchndl.dll"
!endif
Delete "$INSTDIR\install.log"
;Try to remove Gaim install dir .. if empty
RMDir "$INSTDIR"
; Shortcuts..
RMDir /r "$SMPROGRAMS\Gaim"
Delete "$DESKTOP\Gaim.lnk"
Goto done
cant_uninstall:
MessageBox MB_OK $(un.GAIM_UNINSTALL_ERROR_1) /SD IDOK
Quit
no_rights:
MessageBox MB_OK $(un.GAIM_UNINSTALL_ERROR_2) /SD IDOK
Quit
done:
SectionEnd ; end of uninstall section
;--------------------------------
;Descriptions
!insertmacro MUI_FUNCTION_DESCRIPTION_BEGIN
!insertmacro MUI_DESCRIPTION_TEXT ${SecGaim} \
$(GAIM_SECTION_DESCRIPTION)
!ifdef WITH_GTK
!insertmacro MUI_DESCRIPTION_TEXT ${SecGtk} \
$(GTK_SECTION_DESCRIPTION)
!endif
!insertmacro MUI_DESCRIPTION_TEXT ${SecGtkThemes} \
$(GTK_THEMES_SECTION_DESCRIPTION)
!insertmacro MUI_DESCRIPTION_TEXT ${SecGtkNone} \
$(GTK_NO_THEME_DESC)
!insertmacro MUI_DESCRIPTION_TEXT ${SecGtkWimp} \
$(GTK_WIMP_THEME_DESC)
!insertmacro MUI_DESCRIPTION_TEXT ${SecGtkBluecurve} \
$(GTK_BLUECURVE_THEME_DESC)
!insertmacro MUI_DESCRIPTION_TEXT ${SecGtkLighthouseblue} \
$(GTK_LIGHTHOUSEBLUE_THEME_DESC)
!insertmacro MUI_DESCRIPTION_TEXT ${SecShortcuts} \
$(GAIM_SHORTCUTS_SECTION_DESCRIPTION)
!insertmacro MUI_DESCRIPTION_TEXT ${SecDesktopShortcut} \
$(GAIM_DESKTOP_SHORTCUT_DESC)
!insertmacro MUI_DESCRIPTION_TEXT ${SecStartMenuShortcut} \
$(GAIM_STARTMENU_SHORTCUT_DESC)
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheck} \
$(GAIM_SPELLCHECK_SECTION_DESCRIPTION)
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckBreton} \
"$(GAIM_SPELLCHECK_BRETON) (862kb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckCatalan} \
"$(GAIM_SPELLCHECK_CATALAN) (3.9Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckCzech} \
"$(GAIM_SPELLCHECK_CZECH) (17Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckWelsh} \
"$(GAIM_SPELLCHECK_WELSH) (4.2Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckDanish} \
"$(GAIM_SPELLCHECK_DANISH) (6.9Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckGerman} \
"$(GAIM_SPELLCHECK_GERMAN) (5.4Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckGreek} \
"$(GAIM_SPELLCHECK_GREEK) (7.1Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckEnglish} \
"$(GAIM_SPELLCHECK_ENGLISH) (2.3Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckEsperanto} \
"$(GAIM_SPELLCHECK_ESPERANTO) (5.7Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckSpanish} \
"$(GAIM_SPELLCHECK_SPANISH) (7.0Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckFaroese} \
"$(GAIM_SPELLCHECK_FAROESE) (913kb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckFrench} \
"$(GAIM_SPELLCHECK_FRENCH) (9.3Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckItalian} \
"$(GAIM_SPELLCHECK_ITALIAN) (770kb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckDutch} \
"$(GAIM_SPELLCHECK_DUTCH) (3.7Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckNorwegian} \
"$(GAIM_SPELLCHECK_NORWEGIAN) (3.2Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckPolish} \
"$(GAIM_SPELLCHECK_POLISH) (9.3Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckPortuguese} \
"$(GAIM_SPELLCHECK_PORTUGUESE) (5.5Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckRomanian} \
"$(GAIM_SPELLCHECK_ROMANIAN) (906kb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckRussian} \
"$(GAIM_SPELLCHECK_RUSSIAN) (11Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckSlovak} \
"$(GAIM_SPELLCHECK_SLOVAK) (8.0Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckSwedish} \
"$(GAIM_SPELLCHECK_SWEDISH) (2.2Mb)"
!insertmacro MUI_DESCRIPTION_TEXT ${SecSpellCheckUkrainian} \
"$(GAIM_SPELLCHECK_UKRAINIAN) (12Mb)"
!insertmacro MUI_FUNCTION_DESCRIPTION_END
;--------------------------------
;Functions
Function WriteGtkThemeConfig
Exch $0
Push $1
Push $2
Push $3
Call CheckUserInstallRights
Pop $2
StrCmp $2 "HKLM" 0 user_theme
; Global Theme
ClearErrors
ReadRegStr $2 HKLM ${GTK_REG_KEY} "Path"
IfErrors user_theme
StrCpy $3 "$2\etc\gtk-2.0\gtkrc"
Goto update_theme
user_theme:
StrCpy $3 "$PROFILE\.gtkrc-2.0"
update_theme:
IfFileExists $3 0 new_file
${ConfigWriteS} $3 "gtk-theme-name =" " $\"$0$\"" $1
Goto done
new_file:
FileOpen $1 $3 w
FileWrite $1 "gtk-theme-name = $\"$0$\""
FileClose $1
done:
Pop $3
Pop $2
Pop $1
Pop $0
FunctionEnd
!macro CheckUserInstallRightsMacro UN
Function ${UN}CheckUserInstallRights
Push $0
Push $1
ClearErrors
UserInfo::GetName
IfErrors Win9x
Pop $0
UserInfo::GetAccountType
Pop $1
StrCmp $1 "Admin" 0 +3
StrCpy $1 "HKLM"
Goto done
StrCmp $1 "Power" 0 +3
StrCpy $1 "HKLM"
Goto done
StrCmp $1 "User" 0 +3
StrCpy $1 "HKCU"
Goto done
StrCmp $1 "Guest" 0 +3
StrCpy $1 "NONE"
Goto done
; Unknown error
StrCpy $1 "NONE"
Goto done
Win9x:
StrCpy $1 "HKLM"
done:
Exch $1
Exch
Pop $0
FunctionEnd
!macroend
!insertmacro CheckUserInstallRightsMacro ""
!insertmacro CheckUserInstallRightsMacro "un."
;
; Usage:
; Push $0 ; Path string
; Call VerifyDir
; Pop $0 ; 0 - Bad path 1 - Good path
;
Function VerifyDir
Exch $0
Push $1
Push $2
Loop:
IfFileExists $0 dir_exists
StrCpy $1 $0 ; save last
${GetParent} $0 $0
StrLen $2 $0
; IfFileExists "C:" on xp returns true and on win2k returns false
; So we're done in such a case..
IntCmp $2 2 loop_done
; GetParent of "C:" returns ""
IntCmp $2 0 loop_done
Goto Loop
loop_done:
StrCpy $1 "$0\GaImFooB"
; Check if we can create dir on this drive..
ClearErrors
CreateDirectory $1
IfErrors DirBad DirGood
dir_exists:
ClearErrors
FileOpen $1 "$0\gaimfoo.bar" w
IfErrors PathBad PathGood
DirGood:
RMDir $1
Goto PathGood1
DirBad:
RMDir $1
Goto PathBad1
PathBad:
FileClose $1
Delete "$0\gaimfoo.bar"
PathBad1:
StrCpy $0 "0"
Push $0
Goto done
PathGood:
FileClose $1
Delete "$0\gaimfoo.bar"
PathGood1:
StrCpy $0 "1"
Push $0
done:
Exch 3 ; The top of the stack contains the output variable
Pop $0
Pop $2
Pop $1
FunctionEnd
Function .onVerifyInstDir
Push $0
Push $INSTDIR
Call VerifyDir
Pop $0
StrCmp $0 "0" 0 dir_good
Pop $0
Abort
dir_good:
Pop $0
FunctionEnd
;
; Usage:
; Call DoWeNeedGtk
; First Pop:
; 0 - We have the correct version
; Second Pop: Key where Version was found
; 1 - We have an old version that should work, prompt user for optional upgrade
; Second Pop: HKLM or HKCU depending on where GTK was found.
; 2 - We have an old version that needs to be upgraded
; Second Pop: HKLM or HKCU depending on where GTK was found.
; 3 - We don't have Gtk+ at all
; Second Pop: "NONE, HKLM or HKCU" depending on our rights..
;
Function DoWeNeedGtk
; Logic should be:
; - Check what user rights we have (HKLM or HKCU)
; - If HKLM rights..
; - Only check HKLM key for GTK+
; - If installed to HKLM, check it and return.
; - If HKCU rights..
; - First check HKCU key for GTK+
; - if good or bad exists stop and ret.
; - If no hkcu gtk+ install, check HKLM
; - If HKLM ver exists but old, return as if no ver exits.
; - If no rights
; - Check HKLM
Push $0
Push $1
Push $2
Push $3
Call CheckUserInstallRights
Pop $1
StrCmp $1 "HKLM" check_hklm
StrCmp $1 "HKCU" check_hkcu check_hklm
check_hkcu:
ReadRegStr $0 HKCU ${GTK_REG_KEY} "Version"
StrCpy $2 "HKCU"
StrCmp $0 "" check_hklm have_gtk
check_hklm:
ReadRegStr $0 HKLM ${GTK_REG_KEY} "Version"
StrCpy $2 "HKLM"
StrCmp $0 "" no_gtk have_gtk
have_gtk:
; GTK+ is already installed.. check version.
${VersionCompare} ${GTK_INSTALL_VERSION} $0 $3
IntCmp $3 1 +1 good_version good_version
${VersionCompare} ${GTK_MIN_VERSION} $0 $3
; Bad version. If hklm ver and we have hkcu or no rights.. return no gtk
StrCmp $1 "NONE" no_gtk ; if no rights.. can't upgrade
StrCmp $1 "HKCU" 0 +2 ; if HKLM can upgrade..
StrCmp $2 "HKLM" no_gtk ; have hkcu rights.. if found hklm ver can't upgrade..
Push $2
IntCmp $3 1 +3
Push "1" ; Optional Upgrade
Goto done
Push "2" ; Mandatory Upgrade
Goto done
good_version:
StrCmp $2 "HKLM" have_hklm_gtk have_hkcu_gtk
have_hkcu_gtk:
; Have HKCU version
ReadRegStr $0 HKCU ${GTK_REG_KEY} "Path"
Goto good_version_cont
have_hklm_gtk:
ReadRegStr $0 HKLM ${GTK_REG_KEY} "Path"
Goto good_version_cont
good_version_cont:
Push $0 ; The path to existing GTK+
Push "0"
Goto done
no_gtk:
Push $1 ; our rights
Push "3"
Goto done
done:
; The top two items on the stack are what we want to return
Exch 4
Pop $0
Exch 4
Pop $3
Pop $2
Pop $1
FunctionEnd
!macro RunCheckMacro UN
Function ${UN}RunCheck
Push $R0
System::Call 'kernel32::OpenMutex(i 2031617, b 0, t "gaim_is_running") i .R0'
IntCmp $R0 0 done
MessageBox MB_OK|MB_ICONEXCLAMATION $(GAIM_IS_RUNNING) /SD IDOK
Abort
done:
Pop $R0
FunctionEnd
!macroend
!insertmacro RunCheckMacro ""
!insertmacro RunCheckMacro "un."
Function .onInit
Push $R0
System::Call 'kernel32::CreateMutexA(i 0, i 0, t "gaim_installer_running") i .r1 ?e'
Pop $R0
StrCmp $R0 0 +3
MessageBox MB_OK|MB_ICONEXCLAMATION $(INSTALLER_IS_RUNNING) /SD IDOK
Abort
Call RunCheck
StrCpy $name "Gaim ${GAIM_VERSION}"
StrCpy $GTK_THEME_SEL ${SecGtkWimp}
StrCpy $SPELLCHECK_SEL ""
!insertmacro SetSectionFlag ${SecGtkThemes} ${SF_RO}
!insertmacro UnselectSection ${SecGtkThemes}
!insertmacro SelectSection $GTK_THEME_SEL
!insertmacro SetSectionFlag ${SecSpellCheck} ${SF_RO}
!insertmacro UnselectSection ${SecSpellCheck}
;Mark the dictionaries that are already installed as readonly
Call SelectAndDisableInstalledDictionaries
StrCpy $ISSILENT "/NOUI"
; GTK installer has two silent states.. one with Message boxes, one without
; If gaim installer was run silently, we want to supress gtk installer msg boxes.
IfSilent 0 set_gtk_normal
StrCpy $ISSILENT "/S"
set_gtk_normal:
${GetParameters} $R0
ClearErrors
${GetOptions} $R0 "/L=" $R0
IfErrors +3
StrCpy $LANGUAGE $R0
Goto skip_lang
; Select Language
; Display Language selection dialog
!insertmacro MUI_LANGDLL_DISPLAY
skip_lang:
; If install path was set on the command, use it.
StrCmp $INSTDIR "" 0 instdir_done
; If gaim is currently intalled, we should default to where it is currently installed
ClearErrors
ReadRegStr $INSTDIR HKCU "${GAIM_REG_KEY}" ""
IfErrors +2
StrCmp $INSTDIR "" 0 instdir_done
ClearErrors
ReadRegStr $INSTDIR HKLM "${GAIM_REG_KEY}" ""
IfErrors +2
StrCmp $INSTDIR "" 0 instdir_done
Call CheckUserInstallRights
Pop $R0
StrCmp $R0 "HKLM" 0 user_dir
StrCpy $INSTDIR "$PROGRAMFILES\Gaim"
Goto instdir_done
user_dir:
Push $SMPROGRAMS
${GetParent} $SMPROGRAMS $R2
${GetParent} $R2 $R2
StrCpy $INSTDIR "$R2\Gaim"
instdir_done:
Pop $R0
FunctionEnd
Function un.onInit
Call un.RunCheck
StrCpy $name "Gaim ${GAIM_VERSION}"
; Get stored language preference
!insertmacro MUI_UNGETLANGUAGE
FunctionEnd
; This is a modified StartRadioButtons (from Sections.nsh)
; The only difference is that it allows for nothing in the group to be selected
; In that case, the default variable should be set to ""
!macro StartRadioButtonsUnselectable var
!define StartRadioButtons_Var "${var}"
Push $R0
Push $R1
;If we have no selection, don't try to unselect it
StrCmp "${StartRadioButtons_Var}" "" +4
SectionGetFlags "${StartRadioButtons_Var}" $R0
IntOp $R1 $R0 & ${SF_SELECTED}
IntOp $R0 $R0 & ${SECTION_OFF}
SectionSetFlags "${StartRadioButtons_Var}" $R0
; If the previous value isn't currently selected,
; we don't want to select it at the end
IntCmp $R1 ${SF_SELECTED} +2
StrCpy "${StartRadioButtons_Var}" ""
StrCpy $R1 "${StartRadioButtons_Var}"
!macroend
Function .onSelChange
Push $0
Push $1
Push $2
!insertmacro StartRadioButtonsUnselectable $GTK_THEME_SEL
!insertmacro RadioButton ${SecGtkNone}
!insertmacro RadioButton ${SecGtkWimp}
!insertmacro RadioButton ${SecGtkBluecurve}
!insertmacro RadioButton ${SecGtkLighthouseblue}
!insertmacro EndRadioButtons
; Check that at most one of the non-readonly spelling dictionaries are selected
; We can't use $R0 or $R1 in this block since they're used in the macros
!insertmacro StartRadioButtonsUnselectable $SPELLCHECK_SEL
; Start with the first language dictionary
IntOp $2 ${SecSpellCheck} + 1
start_spellcheck_radio:
SectionGetFlags $2 $0
IntOp $1 $0 & ${SF_SECGRPEND}
; If it is the end of the section group, stop
IntCmp $1 ${SF_SECGRPEND} end_spellcheck_radio
IntOp $0 $0 & ${SF_RO}
IntCmp $0 ${SF_RO} after_button_insert
; If !readonly, then it is part of the radiobutton group
!insertmacro RadioButton $2
after_button_insert:
IntOp $2 $2 + 1 ;Advance to the next section
Goto start_spellcheck_radio
end_spellcheck_radio:
!insertmacro EndRadioButtons
Pop $2
Pop $1
Pop $0
FunctionEnd
; Page enter and exit functions..
Function preWelcomePage
Push R0
!ifndef WITH_GTK
; If this installer dosn't have GTK, check whether we need it.
; We do this here an not in .onInit because language change in
; .onInit doesn't take effect until it is finished.
Call DoWeNeedGtk
Pop $R0
Pop $GTK_FOLDER
IntCmp $R0 1 done done
MessageBox MB_OK $(GTK_INSTALLER_NEEDED) /SD IDOK
Quit
done:
!else
Push R1
; If on Win95/98/ME warn them that the GTK+ version wont work
Call GetWindowsVersion
Pop $R1
StrCmp $R1 "95" win_ver_bad
StrCmp $R1 "98" win_ver_bad
StrCmp $R1 "ME" win_ver_bad
Goto done
win_ver_bad:
!insertmacro UnselectSection ${SecGtk}
!insertmacro SetSectionFlag ${SecGtkNone} ${SF_RO}
!insertmacro UnselectSection ${SecGtkNone}
!insertmacro SetSectionFlag ${SecGtkWimp} ${SF_RO}
!insertmacro UnselectSection ${SecGtkWimp}
!insertmacro SetSectionFlag ${SecGtkBluecurve} ${SF_RO}
!insertmacro UnselectSection ${SecGtkBluecurve}
!insertmacro SetSectionFlag ${SecGtkLighthouseblue} ${SF_RO}
!insertmacro UnselectSection ${SecGtkLighthouseblue}
MessageBox MB_OK $(GTK_WINDOWS_INCOMPATIBLE) /SD IDOK
Call DoWeNeedGtk
Pop $R0
Pop $R1
IntCmp $R0 1 done done ; Upgrade isn't optional - abort if we don't have a suitable version
Quit
done:
Pop $R1
!endif
Pop $R0
FunctionEnd
!ifdef WITH_GTK
Function preGtkDirPage
Push $R0
Push $R1
Call DoWeNeedGtk
Pop $R0
Pop $R1
IntCmp $R0 2 +2 +2 no_gtk
StrCmp $R0 "3" no_gtk no_gtk
; Don't show dir selector.. Upgrades are done to existing path..
Pop $R1
Pop $R0
Abort
no_gtk:
StrCmp $R1 "NONE" 0 no_gtk_cont
; Got no install rights..
Pop $R1
Pop $R0
Abort
no_gtk_cont:
; Suggest path..
StrCmp $R1 "HKCU" 0 hklm1
${GetParent} $SMPROGRAMS $R0
${GetParent} $R0 $R0
StrCpy $R0 "$R0\GTK\2.0"
Goto got_path
hklm1:
StrCpy $R0 "${GTK_DEFAULT_INSTALL_PATH}"
got_path:
StrCpy $name "GTK+ ${GTK_INSTALL_VERSION}"
StrCpy $GTK_FOLDER $R0
Pop $R1
Pop $R0
FunctionEnd
Function postGtkDirPage
Push $R0
StrCpy $name "Gaim ${GAIM_VERSION}"
Push $GTK_FOLDER
Call VerifyDir
Pop $R0
StrCmp $R0 "0" 0 done
MessageBox MB_OK $(GTK_BAD_INSTALL_PATH) /SD IDOK
Pop $R0
Abort
done:
Pop $R0
FunctionEnd
!endif
; GetWindowsVersion
;
; Based on Yazno's function, http://yazno.tripod.com/powerpimpit/
; Updated by Joost Verburg
;
; Returns on top of stack
;
; Windows Version (95, 98, ME, NT x.x, 2000, XP, 2003, Vista)
; or
; '' (Unknown Windows Version)
;
; Usage:
; Call GetWindowsVersion
; Pop $R0
;
; at this point $R0 is "NT 4.0" or whatnot
Function GetWindowsVersion
Push $R0
Push $R1
ClearErrors
ReadRegStr $R0 HKLM \
"SOFTWARE\Microsoft\Windows NT\CurrentVersion" CurrentVersion
IfErrors 0 lbl_winnt
; we are not NT
ReadRegStr $R0 HKLM \
"SOFTWARE\Microsoft\Windows\CurrentVersion" VersionNumber
StrCpy $R1 $R0 1
StrCmp $R1 '4' 0 lbl_error
StrCpy $R1 $R0 3
StrCmp $R1 '4.0' lbl_win32_95
StrCmp $R1 '4.9' lbl_win32_ME lbl_win32_98
lbl_win32_95:
StrCpy $R0 '95'
Goto lbl_done
lbl_win32_98:
StrCpy $R0 '98'
Goto lbl_done
lbl_win32_ME:
StrCpy $R0 'ME'
Goto lbl_done
lbl_winnt:
StrCpy $R1 $R0 1
StrCmp $R1 '3' lbl_winnt_x
StrCmp $R1 '4' lbl_winnt_x
StrCpy $R1 $R0 3
StrCmp $R1 '5.0' lbl_winnt_2000
StrCmp $R1 '5.1' lbl_winnt_XP
StrCmp $R1 '5.2' lbl_winnt_2003
StrCmp $R1 '6.0' lbl_winnt_vista lbl_error
lbl_winnt_x:
StrCpy $R0 "NT $R0" 6
Goto lbl_done
lbl_winnt_2000:
Strcpy $R0 '2000'
Goto lbl_done
lbl_winnt_XP:
Strcpy $R0 'XP'
Goto lbl_done
lbl_winnt_2003:
Strcpy $R0 '2003'
Goto lbl_done
lbl_winnt_vista:
Strcpy $R0 'Vista'
Goto lbl_done
lbl_error:
Strcpy $R0 ''
lbl_done:
Pop $R1
Exch $R0
FunctionEnd
; SpellChecker Related Functions
;-------------------------------
; Convert the a Section index to the language code
; Push the section index onto the stack and pop off the language code after the call
; This will set the error code, if no match is found
Function GetLangCodeForSection
ClearErrors
Push $R0
Exch
Pop $R0 ;This is the section index
IntCmp $R0 ${SecSpellCheckBreton} 0 +3 +3
StrCpy $R0 "br"
Goto done
IntCmp $R0 ${SecSpellCheckCatalan} 0 +3 +3
StrCpy $R0 "ca"
Goto done
IntCmp $R0 ${SecSpellCheckCzech} 0 +3 +3
StrCpy $R0 "cs"
Goto done
IntCmp $R0 ${SecSpellCheckWelsh} 0 +3 +3
StrCpy $R0 "cy"
Goto done
IntCmp $R0 ${SecSpellCheckDanish} 0 +3 +3
StrCpy $R0 "da"
Goto done
IntCmp $R0 ${SecSpellCheckGerman} 0 +3 +3
StrCpy $R0 "de"
Goto done
IntCmp $R0 ${SecSpellCheckGreek} 0 +3 +3
StrCpy $R0 "el"
Goto done
IntCmp $R0 ${SecSpellCheckEnglish} 0 +3 +3
StrCpy $R0 "en"
Goto done
IntCmp $R0 ${SecSpellCheckEsperanto} 0 +3 +3
StrCpy $R0 "eo"
Goto done
IntCmp $R0 ${SecSpellCheckSpanish} 0 +3 +3
StrCpy $R0 "es"
Goto done
IntCmp $R0 ${SecSpellCheckFaroese} 0 +3 +3
StrCpy $R0 "fo"
Goto done
IntCmp $R0 ${SecSpellCheckFrench} 0 +3 +3
StrCpy $R0 "fr"
Goto done
IntCmp $R0 ${SecSpellCheckItalian} 0 +3 +3
StrCpy $R0 "it"
Goto done
IntCmp $R0 ${SecSpellCheckDutch} 0 +3 +3
StrCpy $R0 "nl"
Goto done
IntCmp $R0 ${SecSpellCheckNorwegian} 0 +3 +3
StrCpy $R0 "no"
Goto done
IntCmp $R0 ${SecSpellCheckPolish} 0 +3 +3
StrCpy $R0 "pl"
Goto done
IntCmp $R0 ${SecSpellCheckPortuguese} 0 +3 +3
StrCpy $R0 "pt"
Goto done
IntCmp $R0 ${SecSpellCheckRomanian} 0 +3 +3
StrCpy $R0 "ro"
Goto done
IntCmp $R0 ${SecSpellCheckRussian} 0 +3 +3
StrCpy $R0 "ru"
Goto done
IntCmp $R0 ${SecSpellCheckSlovak} 0 +3 +3
StrCpy $R0 "sk"
Goto done
IntCmp $R0 ${SecSpellCheckSwedish} 0 +3 +3
StrCpy $R0 "sv"
Goto done
IntCmp $R0 ${SecSpellCheckUkrainian} 0 +3 +3
StrCpy $R0 "uk"
Goto done
SetErrors
done:
Exch $R0
FunctionEnd ;GetLangCodeForSection
; Select and Disable any Sections that have currently installed dictionaries
Function SelectAndDisableInstalledDictionaries
Push $R0
Push $R1
Push $R2
; Start with the first language dictionary
IntOp $R0 ${SecSpellCheck} + 1
start:
; If it is the end of the section group, stop
SectionGetFlags $R0 $R1
IntOp $R2 $R1 & ${SF_SECGRPEND}
IntCmp $R2 ${SF_SECGRPEND} done
Push $R0
Call GetLangCodeForSection
Pop $R2
IfErrors end_loop
ReadRegStr $R2 HKLM "${ASPELL_REG_KEY}-$R2" "" ; Check that the dictionary is installed
StrCmp $R2 "" end_loop ; If it isn't installed, skip to the next item
IntOp $R1 $R1 | ${SF_RO} ; Mark Readonly
IntOp $R1 $R1 | ${SF_SELECTED} ; Select
SectionSetFlags $R0 $R1
end_loop:
IntOp $R0 $R0 + 1 ;Advance to the next section
Goto start
done:
Pop $R2
Pop $R1
Pop $R0
FunctionEnd
Function InstallAspellAndDict
Push $R0
Exch
Call GetLangCodeForSection
Pop $R0 ;This is the language code
Push $R1
IfErrors done ; We weren't able to convert the section to lang code
retry:
Call InstallAspell
Pop $R1
StrCmp $R1 "" +3
StrCmp $R1 "cancel" done
MessageBox MB_RETRYCANCEL "$(GAIM_SPELLCHECK_ERROR) : $R1" /SD IDCANCEL IDRETRY retry IDCANCEL done
retry_dict:
Push $R0
Call InstallAspellDictionary
Pop $R1
StrCmp $R1 "" +3
StrCmp $R1 "cancel" done
MessageBox MB_RETRYCANCEL "$(GAIM_SPELLCHECK_DICT_ERROR) : $R1" /SD IDCANCEL IDRETRY retry_dict
done:
Pop $R1
Pop $R0
FunctionEnd
Function InstallAspell
Push $R0
Push $R1
Push $R2
check:
ClearErrors
ReadRegDWORD $R0 HKLM ${ASPELL_REG_KEY} "AspellVersion"
IntCmp $R0 15 installed
; If this is the check after installation, don't infinite loop on failure
StrCmp $R1 "$TEMP\aspell_installer.exe" 0 +3
StrCpy $R0 $(ASPELL_INSTALL_FAILED)
Goto done
; We need to download and install aspell
StrCpy $R1 "$TEMP\aspell_installer.exe"
StrCpy $R2 "${DOWNLOADER_URL}?version=${GAIM_VERSION}&dl_pkg=aspell_core"
DetailPrint "Downloading Aspell... ($R2)"
NSISdl::download $R2 $R1
Pop $R0
StrCmp $R0 "success" +2
Goto done
ExecWait '"$R1"'
Delete $R1
Goto check ; Check that it is now installed correctly
installed: ;Aspell is currently installed, no error message
DetailPrint "Aspell is installed"
StrCpy $R0 ''
done:
Pop $R2
Pop $R1
Exch $R0
FunctionEnd
Function InstallAspellDictionary
Push $R0
Exch
Pop $R0 ;This is the language code
Push $R1
Push $R2
Push $R3
check:
ClearErrors
ReadRegStr $R2 HKLM "${ASPELL_REG_KEY}-$R0" ""
StrCmp $R2 "" 0 installed
; If this is the check after installation, don't infinite loop on failure
StrCmp $R1 "$TEMP\aspell_dict-$R0.exe" 0 +3
StrCpy $R0 $(ASPELL_INSTALL_FAILED)
Goto done
; We need to download and install aspell
StrCpy $R1 "$TEMP\aspell_dict-$R0.exe"
StrCpy $R3 "${DOWNLOADER_URL}?version=${GAIM_VERSION}&dl_pkg=lang_$R0"
DetailPrint "Downloading the Aspell $R0 Dictionary... ($R3)"
NSISdl::download $R3 $R1
Pop $R3
StrCmp $R3 "success" +3
StrCpy $R0 $R3
Goto done
ExecWait '"$R1"'
Delete $R1
Goto check ; Check that it is now installed correctly
installed: ;The dictionary is currently installed, no error message
DetailPrint "Aspell $R0 Dictionary is installed"
StrCpy $R0 ''
done:
Pop $R3
Pop $R2
Pop $R1
Exch $R0
FunctionEnd