blob: e255c8293e51d4ff6e3a826868ac7d4330d00c87 [file] [log] [blame]
; Licensed to the Apache Software Foundation (ASF) under one or more
; contributor license agreements. See the NOTICE file distributed with
; this work for additional information regarding copyright ownership.
; The ASF licenses this file to You under the Apache License, Version 2.0
; (the "License"); you may not use this file except in compliance with
; the License. You may obtain a copy of the License at
;
; http://www.apache.org/licenses/LICENSE-2.0
;
; Unless required by applicable law or agreed to in writing, software
; distributed under the License is distributed on an "AS IS" BASIS,
; WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
; See the License for the specific language governing permissions and
; limitations under the License.
; Tomcat script for Nullsoft Installer
!ifdef UNINSTALLONLY
OutFile "tempinstaller.exe"
!else
OutFile tomcat-installer.exe
!endif
;Compression options
CRCCheck on
SetCompressor /SOLID lzma
Name "Apache Tomcat"
;Product information
VIAddVersionKey ProductName "Apache Tomcat"
VIAddVersionKey CompanyName "Apache Software Foundation"
VIAddVersionKey LegalCopyright "Copyright (c) 1999-@YEAR@ The Apache Software Foundation"
VIAddVersionKey FileDescription "Apache Tomcat Installer"
VIAddVersionKey FileVersion "2.0"
VIAddVersionKey ProductVersion "@VERSION@"
VIAddVersionKey Comments "tomcat.apache.org"
VIAddVersionKey InternalName "apache-tomcat-@VERSION@.exe"
VIProductVersion @VERSION_NUMBER@
!include "MUI2.nsh"
!include "nsDialogs.nsh"
!include "StrFunc.nsh"
!include "LogicLib.nsh"
!include "FileFunc.nsh"
!include "TextFunc.nsh"
${StrRep}
Var JavaHome
Var JavaExe
Var JvmDll
Var Arch
Var ResetInstDir
Var TomcatPortShutdown
Var TomcatPortHttp
Var TomcatPortAjp
Var TomcatMenuEntriesEnable
Var TomcatShortcutAllUsers
Var TomcatServiceName
Var TomcatServiceDefaultName
Var TomcatServiceFileName
Var TomcatServiceManagerFileName
Var TomcatAdminEnable
Var TomcatAdminUsername
Var TomcatAdminPassword
Var TomcatAdminRoles
; Variables that store handles of dialog controls
Var CtlJavaHome
Var CtlTomcatPortShutdown
Var CtlTomcatPortHttp
Var CtlTomcatPortAjp
Var CtlTomcatServiceName
Var CtlTomcatShortcutAllUsers
Var CtlTomcatAdminUsername
Var CtlTomcatAdminPassword
Var CtlTomcatAdminRoles
; Handle of the service-install.log file
; It is opened in "Core" section and closed in "-post"
Var ServiceInstallLog
;--------------------------------
;Configuration
!define MUI_HEADERIMAGE
!define MUI_HEADERIMAGE_RIGHT
!define MUI_HEADERIMAGE_BITMAP header.bmp
!define MUI_WELCOMEFINISHPAGE_BITMAP side_left.bmp
!define MUI_FINISHPAGE_SHOWREADME "$INSTDIR\webapps\ROOT\RELEASE-NOTES.txt"
!define MUI_FINISHPAGE_RUN
!define MUI_FINISHPAGE_RUN_FUNCTION "startService"
!define MUI_FINISHPAGE_NOREBOOTSUPPORT
!define MUI_ABORTWARNING
!define MUI_ICON tomcat.ico
!define MUI_UNICON tomcat.ico
;Install Page order
!insertmacro MUI_PAGE_WELCOME
; Show file named "INSTALLLICENSE"
!insertmacro MUI_PAGE_LICENSE INSTALLLICENSE
; Use custom onLeave function with COMPONENTS page
!define MUI_PAGE_CUSTOMFUNCTION_LEAVE pageComponentsLeave
!insertmacro MUI_PAGE_COMPONENTS
Page custom pageConfiguration pageConfigurationLeave "$(TEXT_CONF_PAGETITLE)"
Page custom pageChooseJVM pageChooseJVMLeave "$(TEXT_JVM_PAGETITLE)"
!define MUI_PAGE_CUSTOMFUNCTION_LEAVE pageDirectoryLeave
!insertmacro MUI_PAGE_DIRECTORY
!insertmacro MUI_PAGE_INSTFILES
Page custom CheckUserType
!insertmacro MUI_PAGE_FINISH
!ifdef UNINSTALLONLY
;Uninstall Page order
!insertmacro MUI_UNPAGE_CONFIRM
!insertmacro MUI_UNPAGE_INSTFILES
!endif
;Language
!insertmacro MUI_LANGUAGE English
;Install Options pages
LangString TEXT_JVM_TITLE ${LANG_ENGLISH} "Java Virtual Machine"
LangString TEXT_JVM_SUBTITLE ${LANG_ENGLISH} "Java Virtual Machine path selection."
LangString TEXT_JVM_PAGETITLE ${LANG_ENGLISH} ": Java Virtual Machine path selection"
LangString TEXT_INSTDIR_NOT_EMPTY ${LANG_ENGLISH} "The specified installation directory is not empty. Do you wish to continue?"
LangString TEXT_CONF_TITLE ${LANG_ENGLISH} "Configuration"
LangString TEXT_CONF_SUBTITLE ${LANG_ENGLISH} "Tomcat basic configuration."
LangString TEXT_CONF_PAGETITLE ${LANG_ENGLISH} ": Configuration Options"
LangString TEXT_JVM_LABEL1 ${LANG_ENGLISH} "Please select the path of a Java SE 7.0 or later JRE installed on your system."
LangString TEXT_CONF_LABEL_PORT_SHUTDOWN ${LANG_ENGLISH} "Server Shutdown Port"
LangString TEXT_CONF_LABEL_PORT_HTTP ${LANG_ENGLISH} "HTTP/1.1 Connector Port"
LangString TEXT_CONF_LABEL_PORT_AJP ${LANG_ENGLISH} "AJP/1.3 Connector Port"
LangString TEXT_CONF_LABEL_SERVICE_NAME ${LANG_ENGLISH} "Windows Service Name"
LangString TEXT_CONF_LABEL_SHORTCUT_ALL_USERS ${LANG_ENGLISH} "Create shortcuts for all users"
LangString TEXT_CONF_LABEL_ADMIN ${LANG_ENGLISH} "Tomcat Administrator Login (optional)"
LangString TEXT_CONF_LABEL_ADMINUSERNAME ${LANG_ENGLISH} "User Name"
LangString TEXT_CONF_LABEL_ADMINPASSWORD ${LANG_ENGLISH} "Password"
LangString TEXT_CONF_LABEL_ADMINROLES ${LANG_ENGLISH} "Roles"
;Component-selection page
LangString DESC_SecTomcat ${LANG_ENGLISH} "Install the Tomcat Servlet container as a Windows service."
LangString DESC_SecTomcatCore ${LANG_ENGLISH} "Install the Tomcat Servlet container core and create the Windows service."
LangString DESC_SecTomcatService ${LANG_ENGLISH} "Automatically start the Tomcat service when the computer is started."
LangString DESC_SecTomcatNative ${LANG_ENGLISH} "Install APR based Tomcat native .dll for better performance and scalability in production environments."
LangString DESC_SecMenu ${LANG_ENGLISH} "Create a Start Menu program group for Tomcat."
LangString DESC_SecDocs ${LANG_ENGLISH} "Install the Tomcat documentation bundle. This includes documentation on the servlet container and its configuration options, on the Jasper JSP page compiler, as well as on the native webserver connectors."
LangString DESC_SecManager ${LANG_ENGLISH} "Install the Tomcat Manager administrative web application."
LangString DESC_SecHostManager ${LANG_ENGLISH} "Install the Tomcat Host Manager administrative web application."
LangString DESC_SecExamples ${LANG_ENGLISH} "Install the Servlet and JSP examples web application."
;Install types
InstType Normal
InstType Minimum
InstType Full
ReserveFile System.dll
ReserveFile nsDialogs.dll
ReserveFile confinstall\tomcat-users_1.xml
ReserveFile confinstall\tomcat-users_2.xml
;--------------------------------
;Installer Sections
SubSection "Tomcat" SecTomcat
Section "Core" SecTomcatCore
SectionIn 1 2 3 RO
${If} ${Silent}
Call checkJava
${EndIf}
SetOutPath $INSTDIR
File tomcat.ico
File LICENSE
File NOTICE
File RELEASE-NOTES
SetOutPath $INSTDIR\lib
File /r lib\*.*
; Note: just calling 'SetOutPath' will create the empty folders for us
SetOutPath $INSTDIR\logs
SetOutPath $INSTDIR\work
SetOutPath $INSTDIR\temp
SetOutPath $INSTDIR\bin
File bin\bootstrap.jar
File bin\tomcat-juli.jar
File bin\*.bat
SetOutPath $INSTDIR\conf
File conf\*.*
SetOutPath $INSTDIR\webapps\ROOT
File /r webapps\ROOT\*.*
Call configure
DetailPrint "Using Jvm: $JavaHome"
StrCpy $R0 $TomcatServiceName
StrCpy $TomcatServiceFileName $R0.exe
StrCpy $TomcatServiceManagerFileName $R0w.exe
SetOutPath $INSTDIR\bin
File /oname=$TomcatServiceManagerFileName bin\tomcat@VERSION_MAJOR@w.exe
; Get the current platform x86 / AMD64 / IA64
${If} $Arch == "x86"
File /oname=$TomcatServiceFileName bin\tomcat@VERSION_MAJOR@.exe
${ElseIf} $Arch == "x64"
File /oname=$TomcatServiceFileName bin\x64\tomcat@VERSION_MAJOR@.exe
${EndIf}
FileOpen $ServiceInstallLog "$INSTDIR\logs\service-install.log" a
FileSeek $ServiceInstallLog 0 END
InstallRetry:
FileWrite $ServiceInstallLog '"$INSTDIR\bin\$TomcatServiceFileName" //IS//$TomcatServiceName --DisplayName "Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName" --Description "Apache Tomcat @VERSION@ Server - http://tomcat.apache.org/" --LogPath "$INSTDIR\logs" --Install "$INSTDIR\bin\$TomcatServiceFileName" --Jvm "$JvmDll" --StartPath "$INSTDIR" --StopPath "$INSTDIR"'
FileWrite $ServiceInstallLog "$\r$\n"
ClearErrors
DetailPrint "Installing $TomcatServiceName service"
nsExec::ExecToStack '"$INSTDIR\bin\$TomcatServiceFileName" //IS//$TomcatServiceName --DisplayName "Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName" --Description "Apache Tomcat @VERSION@ Server - http://tomcat.apache.org/" --LogPath "$INSTDIR\logs" --Install "$INSTDIR\bin\$TomcatServiceFileName" --Jvm "$JvmDll" --StartPath "$INSTDIR" --StopPath "$INSTDIR"'
Pop $0
Pop $1
StrCmp $0 "0" InstallOk
FileWrite $ServiceInstallLog "Install failed: $0 $1$\r$\n"
MessageBox MB_ABORTRETRYIGNORE|MB_ICONSTOP \
"Failed to install $TomcatServiceName service.$\r$\nCheck your settings and permissions.$\r$\nIgnore and continue anyway (not recommended)?" \
/SD IDIGNORE IDIGNORE InstallOk IDRETRY InstallRetry
Quit
InstallOk:
ClearErrors
; Will be closed in "-post" section
; FileClose $ServiceInstallLog
SectionEnd
Section "Service Startup" SecTomcatService
SectionIn 3
${If} $ServiceInstallLog != ""
FileWrite $ServiceInstallLog '"$INSTDIR\bin\$TomcatServiceFileName" //US//$TomcatServiceName --Startup auto'
FileWrite $ServiceInstallLog "$\r$\n"
${EndIf}
DetailPrint "Configuring $TomcatServiceName service"
nsExec::ExecToLog '"$INSTDIR\bin\$TomcatServiceFileName" //US//$TomcatServiceName --Startup auto'
ClearErrors
SectionEnd
Section "Native" SecTomcatNative
SectionIn 3
SetOutPath $INSTDIR\bin
${If} $Arch == "x86"
File bin\tcnative-1.dll
${ElseIf} $Arch == "x64"
File /oname=tcnative-1.dll bin\x64\tcnative-1.dll
${EndIf}
ClearErrors
SectionEnd
SubSectionEnd
Section "Start Menu Items" SecMenu
SectionIn 1 2 3
SectionEnd
Section "Documentation" SecDocs
SectionIn 1 3
SetOutPath $INSTDIR\webapps\docs
File /r webapps\docs\*.*
SectionEnd
Section "Manager" SecManager
SectionIn 1 3
SetOverwrite on
SetOutPath $INSTDIR\webapps\manager
File /r webapps\manager\*.*
SectionEnd
Section "Host Manager" SecHostManager
SectionIn 3
SetOverwrite on
SetOutPath $INSTDIR\webapps\host-manager
File /r webapps\host-manager\*.*
SectionEnd
Section "Examples" SecExamples
SectionIn 3
SetOverwrite on
SetOutPath $INSTDIR\webapps\examples
File /r webapps\examples\*.*
SectionEnd
Section -post
${If} $ServiceInstallLog != ""
FileWrite $ServiceInstallLog '"$INSTDIR\bin\$TomcatServiceFileName" //US//$TomcatServiceName --Classpath "$INSTDIR\bin\bootstrap.jar;$INSTDIR\bin\tomcat-juli.jar" --StartClass org.apache.catalina.startup.Bootstrap --StopClass org.apache.catalina.startup.Bootstrap --StartParams start --StopParams stop --StartMode jvm --StopMode jvm'
FileWrite $ServiceInstallLog "$\r$\n"
FileWrite $ServiceInstallLog '"$INSTDIR\bin\$TomcatServiceFileName" //US//$TomcatServiceName --JvmOptions "-Dcatalina.home=$INSTDIR#-Dcatalina.base=$INSTDIR#-Djava.endorsed.dirs=$INSTDIR\endorsed#-Djava.io.tmpdir=$INSTDIR\temp#-Djava.util.logging.manager=org.apache.juli.ClassLoaderLogManager#-Djava.util.logging.config.file=$INSTDIR\conf\logging.properties"'
FileWrite $ServiceInstallLog "$\r$\n"
FileWrite $ServiceInstallLog '"$INSTDIR\bin\$TomcatServiceFileName" //US//$TomcatServiceName --StdOutput auto --StdError auto --JvmMs 128 --JvmMx 256'
FileWrite $ServiceInstallLog "$\r$\n"
FileClose $ServiceInstallLog
${EndIf}
DetailPrint "Configuring $TomcatServiceName service"
nsExec::ExecToLog '"$INSTDIR\bin\$TomcatServiceFileName" //US//$TomcatServiceName --Classpath "$INSTDIR\bin\bootstrap.jar;$INSTDIR\bin\tomcat-juli.jar" --StartClass org.apache.catalina.startup.Bootstrap --StopClass org.apache.catalina.startup.Bootstrap --StartParams start --StopParams stop --StartMode jvm --StopMode jvm'
nsExec::ExecToLog '"$INSTDIR\bin\$TomcatServiceFileName" //US//$TomcatServiceName --JvmOptions "-Dcatalina.home=$INSTDIR#-Dcatalina.base=$INSTDIR#-Djava.endorsed.dirs=$INSTDIR\endorsed#-Djava.io.tmpdir=$INSTDIR\temp#-Djava.util.logging.manager=org.apache.juli.ClassLoaderLogManager#-Djava.util.logging.config.file=$INSTDIR\conf\logging.properties"'
nsExec::ExecToLog '"$INSTDIR\bin\$TomcatServiceFileName" //US//$TomcatServiceName --StdOutput auto --StdError auto --JvmMs 128 --JvmMx 256'
${If} $TomcatShortcutAllUsers == "1"
WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Run" "ApacheTomcatMonitor@VERSION_MAJOR_MINOR@_$TomcatServiceName" '"$INSTDIR\bin\$TomcatServiceManagerFileName" //MS//$TomcatServiceName'
${Else}
WriteRegStr HKCU "Software\Microsoft\Windows\CurrentVersion\Run" "ApacheTomcatMonitor@VERSION_MAJOR_MINOR@_$TomcatServiceName" '"$INSTDIR\bin\$TomcatServiceManagerFileName" //MS//$TomcatServiceName'
${EndIf}
${If} $TomcatMenuEntriesEnable == "1"
Call createShortcuts
${EndIf}
!ifndef UNINSTALLONLY
SetOutPath $INSTDIR
; this packages the signed uninstaller
File Uninstall.exe
!endif
WriteRegStr HKLM "SOFTWARE\Apache Software Foundation\Tomcat\@VERSION_MAJOR_MINOR@\$TomcatServiceName" "InstallPath" $INSTDIR
WriteRegStr HKLM "SOFTWARE\Apache Software Foundation\Tomcat\@VERSION_MAJOR_MINOR@\$TomcatServiceName" "Version" @VERSION@
WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName" \
"DisplayName" "Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName (remove only)"
WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName" \
"DisplayVersion" @VERSION@
WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName" \
"DisplayIcon" "$\"$INSTDIR\tomcat.ico$\""
WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName" \
"UninstallString" "$\"$INSTDIR\Uninstall.exe$\" -ServiceName=$\"$TomcatServiceName$\""
SectionEnd
!define ReadFromConfigIni "!insertmacro ReadFromConfigIni"
!macro ReadFromConfigIni Return_Variable Key_Name Config_File
Push "${Config_File}"
Push "${Return_Variable}"
Push "${Key_Name}"
Call ReadFromConfigIni
IfErrors +2
StrCpy ${Return_Variable} $1
!macroend
Function ReadFromConfigIni
ClearErrors
; Stack: <Key_Name> <Return_Variable> <Config_File>
Pop $0 ; <Key_Name> Stack: <Return_Variable> <Config_File>
Pop $1 ; <Return_Variable> Stack: <Config_File>
Pop $2 ; <Config_File> Stack: -empty-
${ConfigRead} $2 '$0=' $1 ; <Config_File> <Key_Name> <Return_Variable>
FunctionEnd
Function .onInit
!ifdef UNINSTALLONLY
; If UNINSTALLONLY is defined, then we aren't supposed to do anything except write out
; the installer. This is better than processing a command line option as it means
; this entire code path is not present in the final (real) installer.
WriteUninstaller "$EXEDIR\Uninstall.exe"
Quit
!endif
${GetParameters} $R0
ClearErrors
${GetOptions} "$R0" "/?" $R1
${IfNot} ${Errors}
MessageBox MB_OK|MB_ICONINFORMATION 'Available options:$\r$\n\
/S - Silent install.$\r$\n\
/C=config.ini - specify full path of config file to override default values.$\r$\n\
/D=INSTDIR - Specify installation directory.'
Abort
${EndIf}
ClearErrors
StrCpy $ResetInstDir "$INSTDIR"
;Initialize default values
StrCpy $JavaHome ""
StrCpy $TomcatPortShutdown "8005"
StrCpy $TomcatPortHttp "8080"
StrCpy $TomcatPortAjp "8009"
StrCpy $TomcatMenuEntriesEnable "0"
StrCpy $TomcatShortcutAllUsers "0"
StrCpy $TomcatServiceDefaultName "Tomcat@VERSION_MAJOR@"
StrCpy $TomcatServiceName $TomcatServiceDefaultName
StrCpy $TomcatServiceFileName "Tomcat@VERSION_MAJOR@.exe"
StrCpy $TomcatServiceManagerFileName "Tomcat@VERSION_MAJOR@w.exe"
StrCpy $TomcatAdminEnable "0"
StrCpy $TomcatAdminUsername ""
StrCpy $TomcatAdminPassword ""
StrCpy $TomcatAdminRoles ""
;override default values in case config file was passed in
${GetOptions} "$R0" "/C=" $R2
${IfNot} ${Errors}
${ReadFromConfigIni} $JavaHome "JavaHome" $R2
${ReadFromConfigIni} $TomcatPortShutdown "TomcatPortShutdown" $R2
${ReadFromConfigIni} $TomcatPortHttp "TomcatPortHttp" $R2
${ReadFromConfigIni} $TomcatPortAjp "TomcatPortAjp" $R2
${ReadFromConfigIni} $TomcatMenuEntriesEnable "TomcatMenuEntriesEnable" $R2
${ReadFromConfigIni} $TomcatShortcutAllUsers "TomcatShortcutAllUsers" $R2
${ReadFromConfigIni} $TomcatServiceDefaultName "TomcatServiceDefaultName" $R2
${ReadFromConfigIni} $TomcatServiceName "TomcatServiceName" $R2
${ReadFromConfigIni} $TomcatServiceFileName "TomcatServiceFileName" $R2
${ReadFromConfigIni} $TomcatServiceManagerFileName "TomcatServiceManagerFileName" $R2
${ReadFromConfigIni} $TomcatAdminEnable "TomcatAdminEnable" $R2
${ReadFromConfigIni} $TomcatAdminUsername "TomcatAdminUsername" $R2
${ReadFromConfigIni} $TomcatAdminPassword "TomcatAdminPassword" $R2
${ReadFromConfigIni} $TomcatAdminRoles "TomcatAdminRoles" $R2
${EndIf}
ClearErrors
FunctionEnd
Function pageChooseJVM
!insertmacro MUI_HEADER_TEXT "$(TEXT_JVM_TITLE)" "$(TEXT_JVM_SUBTITLE)"
${If} $JavaHome == ""
Call findJavaHome
Pop $JavaHome
${EndIf}
nsDialogs::Create 1018
Pop $R0
${NSD_CreateLabel} 0 5u 100% 25u "$(TEXT_JVM_LABEL1)"
Pop $R0
${NSD_CreateDirRequest} 0 65u 280u 13u "$JavaHome"
Pop $CtlJavaHome
${NSD_CreateBrowseButton} 282u 65u 15u 13u "..."
Pop $R0
${NSD_OnClick} $R0 pageChooseJVM_onDirBrowse
${NSD_SetFocus} $CtlJavaHome
nsDialogs::Show
FunctionEnd
; onClick function for button next to DirRequest control
Function pageChooseJVM_onDirBrowse
; R0 is HWND of the button, it is on top of the stack
Pop $R0
${NSD_GetText} $CtlJavaHome $R1
nsDialogs::SelectFolderDialog "" "$R1"
Pop $R1
${If} $R1 != "error"
${NSD_SetText} $CtlJavaHome $R1
${EndIf}
FunctionEnd
Function pageChooseJVMLeave
${NSD_GetText} $CtlJavaHome $JavaHome
${If} $JavaHome == ""
Abort
${EndIf}
Call checkJava
FunctionEnd
; onLeave function for the COMPONENTS page
; It updates options based on what components were selected.
;
Function pageComponentsLeave
StrCpy $TomcatAdminEnable "0"
StrCpy $TomcatAdminRoles ""
StrCpy $TomcatMenuEntriesEnable "0"
SectionGetFlags ${SecManager} $0
IntOp $0 $0 & ${SF_SELECTED}
${If} $0 <> 0
StrCpy $TomcatAdminEnable "1"
StrCpy $TomcatAdminRoles "manager-gui"
${EndIf}
SectionGetFlags ${SecHostManager} $0
IntOp $0 $0 & ${SF_SELECTED}
${If} $0 <> 0
StrCpy $TomcatAdminEnable "1"
${If} $TomcatAdminRoles != ""
StrCpy $TomcatAdminRoles "admin-gui,$TomcatAdminRoles"
${Else}
StrCpy $TomcatAdminRoles "admin-gui"
${EndIf}
${EndIf}
SectionGetFlags ${SecMenu} $0
IntOp $0 $0 & ${SF_SELECTED}
${If} $0 <> 0
StrCpy $TomcatMenuEntriesEnable "1"
${EndIf}
FunctionEnd
Function pageDirectoryLeave
${DirState} "$INSTDIR" $0
${If} $0 == 1 ;folder is full. (other values: 0: empty, -1: not found)
;query selection
MessageBox MB_OKCANCEL|MB_ICONQUESTION "$(TEXT_INSTDIR_NOT_EMPTY)" /SD IDOK IDCANCEL notok
Goto ok
notok:
Abort
ok:
${EndIf}
FunctionEnd
Function pageConfiguration
!insertmacro MUI_HEADER_TEXT "$(TEXT_CONF_TITLE)" "$(TEXT_CONF_SUBTITLE)"
nsDialogs::Create 1018
Pop $R0
${NSD_CreateLabel} 0 2u 100u 14u "$(TEXT_CONF_LABEL_PORT_SHUTDOWN)"
Pop $R0
${NSD_CreateText} 150u 0 50u 12u "$TomcatPortShutdown"
Pop $CtlTomcatPortShutdown
${NSD_SetTextLimit} $CtlTomcatPortShutdown 5
${NSD_CreateLabel} 0 19u 100u 14u "$(TEXT_CONF_LABEL_PORT_HTTP)"
Pop $R0
${NSD_CreateText} 150u 17u 50u 12u "$TomcatPortHttp"
Pop $CtlTomcatPortHttp
${NSD_SetTextLimit} $CtlTomcatPortHttp 5
${NSD_CreateLabel} 0 36u 100u 14u "$(TEXT_CONF_LABEL_PORT_AJP)"
Pop $R0
${NSD_CreateText} 150u 34u 50u 12u "$TomcatPortAjp"
Pop $CtlTomcatPortAjp
${NSD_SetTextLimit} $CtlTomcatPortAjp 5
${NSD_CreateLabel} 0 57u 140u 14u "$(TEXT_CONF_LABEL_SERVICE_NAME)"
Pop $R0
${NSD_CreateText} 150u 55u 140u 12u "$TomcatServiceName"
Pop $CtlTomcatServiceName
${If} $TomcatMenuEntriesEnable == "1"
${NSD_CreateLabel} 0 75u 100u 14u "$(TEXT_CONF_LABEL_SHORTCUT_ALL_USERS)"
Pop $R0
${NSD_CreateCheckBox} 150u 74u 10u 10u "$TomcatShortcutAllUsers"
Pop $CtlTomcatShortcutAllUsers
${EndIf}
${If} $TomcatAdminEnable == "1"
${NSD_CreateLabel} 0 93u 90u 28u "$(TEXT_CONF_LABEL_ADMIN)"
Pop $R0
${NSD_CreateLabel} 100u 93u 40u 14u "$(TEXT_CONF_LABEL_ADMINUSERNAME)"
Pop $R0
${NSD_CreateText} 150u 91u 110u 12u "$TomcatAdminUsername"
Pop $CtlTomcatAdminUsername
${NSD_CreateLabel} 100u 110u 40u 12u "$(TEXT_CONF_LABEL_ADMINPASSWORD)"
Pop $R0
${NSD_CreatePassword} 150u 108u 110u 12u "$TomcatAdminPassword"
Pop $CtlTomcatAdminPassword
${NSD_CreateLabel} 100u 127u 40u 14u "$(TEXT_CONF_LABEL_ADMINROLES)"
Pop $R0
${NSD_CreateText} 150u 125u 110u 12u "$TomcatAdminRoles"
Pop $CtlTomcatAdminRoles
${EndIf}
${NSD_SetFocus} $CtlTomcatPortShutdown
nsDialogs::Show
FunctionEnd
Function pageConfigurationLeave
${NSD_GetText} $CtlTomcatPortShutdown $TomcatPortShutdown
${NSD_GetText} $CtlTomcatPortHttp $TomcatPortHttp
${NSD_GetText} $CtlTomcatPortAjp $TomcatPortAjp
${NSD_GetText} $CtlTomcatServiceName $TomcatServiceName
${If} $TomcatMenuEntriesEnable == "1"
${NSD_GetState} $CtlTomcatShortcutAllUsers $TomcatShortcutAllUsers
${EndIf}
${If} $TomcatAdminEnable == "1"
${NSD_GetText} $CtlTomcatAdminUsername $TomcatAdminUsername
${NSD_GetText} $CtlTomcatAdminPassword $TomcatAdminPassword
${NSD_GetText} $CtlTomcatAdminRoles $TomcatAdminRoles
${EndIf}
${If} $TomcatPortShutdown == ""
MessageBox MB_ICONEXCLAMATION|MB_OK 'The shutdown port may not be empty'
Abort "Config not right"
Goto exit
${EndIf}
${If} $TomcatPortHttp == ""
MessageBox MB_ICONEXCLAMATION|MB_OK 'The HTTP port may not be empty'
Abort "Config not right"
Goto exit
${EndIf}
${If} $TomcatPortAjp == ""
MessageBox MB_ICONEXCLAMATION|MB_OK 'The AJP port may not be empty'
Abort "Config not right"
Goto exit
${EndIf}
${If} $TomcatServiceName == ""
MessageBox MB_ICONEXCLAMATION|MB_OK 'The Service Name may not be empty'
Abort "Config not right"
Goto exit
${EndIf}
Push $TomcatServiceName
Call validateServiceName
Pop $0
IntCmp $0 1 exit
MessageBox MB_ICONEXCLAMATION|MB_OK 'The Service Name may not contain a space or any of the following characters: <>:"/\:|?*'
Abort "Config not right"
exit:
FunctionEnd
; Validates that a service name does not use any of the invalid
; characters: <>:"/\:|?*
; Note that space is also not permitted although it will be once
; Tomcat is using Daemon 1.0.6 or later
;
; Put the proposed service name on the stack
; If the name is valid, a 1 will be left on the stack
; If the name is invalid, a 0 will be left on the stack
Function validateServiceName
Pop $0
StrLen $1 $0
StrCpy $3 '<>:"/\:|?* '
StrLen $4 $3
loopInput:
IntOp $1 $1 - 1
IntCmp $1 -1 valid
loopTestChars:
IntOp $4 $4 - 1
IntCmp $4 -1 loopTestCharsDone
StrCpy $2 $0 1 $1
StrCpy $5 $3 1 $4
StrCmp $2 $5 invalid loopTestChars
loopTestCharsDone:
StrLen $4 $3
Goto loopInput
invalid:
Push 0
Goto exit
valid:
Push 1
exit:
FunctionEnd
;--------------------------------
;Descriptions
!insertmacro MUI_FUNCTION_DESCRIPTION_BEGIN
!insertmacro MUI_DESCRIPTION_TEXT ${SecTomcat} $(DESC_SecTomcat)
!insertmacro MUI_DESCRIPTION_TEXT ${SecTomcatCore} $(DESC_SecTomcatCore)
!insertmacro MUI_DESCRIPTION_TEXT ${SecTomcatService} $(DESC_SecTomcatService)
!insertmacro MUI_DESCRIPTION_TEXT ${SecTomcatNative} $(DESC_SecTomcatNative)
!insertmacro MUI_DESCRIPTION_TEXT ${SecMenu} $(DESC_SecMenu)
!insertmacro MUI_DESCRIPTION_TEXT ${SecDocs} $(DESC_SecDocs)
!insertmacro MUI_DESCRIPTION_TEXT ${SecManager} $(DESC_SecManager)
!insertmacro MUI_DESCRIPTION_TEXT ${SecHostManager} $(DESC_SecHostManager)
!insertmacro MUI_DESCRIPTION_TEXT ${SecExamples} $(DESC_SecExamples)
!insertmacro MUI_FUNCTION_DESCRIPTION_END
; =====================
; CheckUserType Function
; =====================
;
; Check the user type, and warn if it's not an administrator.
; Taken from Examples/UserInfo that ships with NSIS.
Function CheckUserType
ClearErrors
UserInfo::GetName
IfErrors Win9x
Pop $0
UserInfo::GetAccountType
Pop $1
StrCmp $1 "Admin" 0 +3
; This is OK, do nothing
Goto done
MessageBox MB_OK|MB_ICONEXCLAMATION 'Note: the current user is not an administrator. \
To run Tomcat as a Windows service, you must be an administrator. \
You can still run Tomcat from the command-line as this type of user.'
Goto done
Win9x:
# This one means you don't need to care about admin or
# not admin because Windows 9x doesn't either
MessageBox MB_OK "Error! This DLL can't run under Windows 9x!"
done:
FunctionEnd
; ==================
; checkJava Function
; ==================
;
; Checks that a valid JVM has been specified or a suitable default is available
; Sets $JavaHome, $JavaExe and $JvmDll accordingly
; Determines if the JVM is 32-bit or 64-bit and sets $Arch accordingly. For
; 64-bit JVMs, also determines if it is x64 or ia64
Function checkJava
${If} $JavaHome == ""
; E.g. if a silent install
Call findJavaHome
Pop $JavaHome
${EndIf}
${If} $JavaHome == ""
${OrIfNot} ${FileExists} "$JavaHome\bin\java.exe"
IfSilent +2
MessageBox MB_OK|MB_ICONSTOP "No Java Virtual Machine found in folder:$\r$\n$JavaHome"
DetailPrint "No Java Virtual Machine found in folder:$\r$\n$JavaHome"
Quit
${EndIf}
StrCpy "$JavaExe" "$JavaHome\bin\java.exe"
; Need path to jvm.dll to configure the service - uses $JavaHome
Call findJVMPath
Pop $5
${If} $5 == ""
IfSilent +2
MessageBox MB_OK|MB_ICONSTOP "No Java Virtual Machine found in folder:$\r$\n$5"
DetailPrint "No Java Virtual Machine found in folder:$\r$\n$5"
Quit
${EndIf}
StrCpy "$JvmDll" $5
; Read PE header of JvmDll to check for architecture
; 1. Jump to 0x3c and read offset of PE header
; 2. Jump to offset. Read PE header signature. It must be 'PE'\0\0 (50 45 00 00).
; 3. The next word gives the machine type.
; 0x014c: x86
; 0x8664: x64
; 0x0200: i64
ClearErrors
FileOpen $R1 "$JvmDll" r
IfErrors WrongPEHeader
FileSeek $R1 0x3c SET
FileReadByte $R1 $R2
FileReadByte $R1 $R3
IntOp $R3 $R3 << 8
IntOp $R2 $R2 + $R3
FileSeek $R1 $R2 SET
FileReadByte $R1 $R2
IntCmp $R2 0x50 +1 WrongPEHeader WrongPEHeader
FileReadByte $R1 $R2
IntCmp $R2 0x45 +1 WrongPEHeader WrongPEHeader
FileReadByte $R1 $R2
IntCmp $R2 0 +1 WrongPEHeader WrongPEHeader
FileReadByte $R1 $R2
IntCmp $R2 0 +1 WrongPEHeader WrongPEHeader
FileReadByte $R1 $R2
FileReadByte $R1 $R3
IntOp $R3 $R3 << 8
IntOp $R2 $R2 + $R3
IntCmp $R2 0x014c +1 +3 +3
StrCpy "$Arch" "x86"
Goto DonePEHeader
IntCmp $R2 0x8664 +1 +3 +3
StrCpy "$Arch" "x64"
Goto DonePEHeader
IntCmp $R2 0x0200 +1 +3 +3
StrCpy "$Arch" "i64"
Goto DonePEHeader
WrongPEHeader:
IfSilent +2
MessageBox MB_OK|MB_ICONEXCLAMATION 'Cannot read PE header from "$JvmDll"$\r$\nWill assume that the architecture is x86.'
DetailPrint 'Cannot read PE header from "$JvmDll". Assuming the architecture is x86.'
StrCpy "$Arch" "x86"
DonePEHeader:
FileClose $R1
DetailPrint 'Architecture: "$Arch"'
StrCpy $INSTDIR "$ResetInstDir"
; The default varies depending on 32-bit or 64-bit
${If} "$INSTDIR" == ""
${If} $Arch == "x86"
${If} $TomcatServiceName == $TomcatServiceDefaultName
StrCpy $INSTDIR "$PROGRAMFILES32\Apache Software Foundation\Tomcat @VERSION_MAJOR_MINOR@"
${Else}
StrCpy $INSTDIR "$PROGRAMFILES32\Apache Software Foundation\Tomcat @VERSION_MAJOR_MINOR@_$TomcatServiceName"
${EndIf}
${Else}
${If} $TomcatServiceName == $TomcatServiceDefaultName
StrCpy $INSTDIR "$PROGRAMFILES64\Apache Software Foundation\Tomcat @VERSION_MAJOR_MINOR@"
${Else}
StrCpy $INSTDIR "$PROGRAMFILES64\Apache Software Foundation\Tomcat @VERSION_MAJOR_MINOR@_$TomcatServiceName"
${EndIf}
${EndIf}
${EndIf}
FunctionEnd
; =====================
; findJavaHome Function
; =====================
;
; Find the JAVA_HOME used on the system, and put the result on the top of the
; stack
; Will return an empty string if the path cannot be determined
;
Function findJavaHome
ClearErrors
StrCpy $1 ""
; Use the 64-bit registry first on 64-bit machines
ExpandEnvStrings $0 "%PROGRAMW6432%"
${If} $0 != "%PROGRAMW6432%"
SetRegView 64
ReadRegStr $2 HKLM "SOFTWARE\JavaSoft\Java Runtime Environment" "CurrentVersion"
ReadRegStr $1 HKLM "SOFTWARE\JavaSoft\Java Runtime Environment\$2" "JavaHome"
ReadRegStr $3 HKLM "SOFTWARE\JavaSoft\Java Runtime Environment\$2" "RuntimeLib"
IfErrors 0 +2
StrCpy $1 ""
ClearErrors
${EndIf}
; If no 64-bit Java was found, look for 32-bit Java
${If} $1 == ""
SetRegView 32
ReadRegStr $2 HKLM "SOFTWARE\JavaSoft\Java Runtime Environment" "CurrentVersion"
ReadRegStr $1 HKLM "SOFTWARE\JavaSoft\Java Runtime Environment\$2" "JavaHome"
ReadRegStr $3 HKLM "SOFTWARE\JavaSoft\Java Runtime Environment\$2" "RuntimeLib"
IfErrors 0 +2
StrCpy $1 ""
ClearErrors
; If using 64-bit, go back to using 64-bit registry
${If} $0 != "%PROGRAMW6432%"
SetRegView 64
${EndIf}
${EndIf}
; Put the result in the stack
Push $1
FunctionEnd
; ====================
; FindJVMPath Function
; ====================
;
; Find the full JVM path, and put the result on top of the stack
; Implicit argument: $JavaHome
; Will return an empty string if the path cannot be determined
;
Function findJVMPath
ClearErrors
;Step one: Is this a JRE path (Program Files\Java\XXX)
StrCpy $1 "$JavaHome"
StrCpy $2 "$1\bin\hotspot\jvm.dll"
IfFileExists "$2" FoundJvmDll
StrCpy $2 "$1\bin\server\jvm.dll"
IfFileExists "$2" FoundJvmDll
StrCpy $2 "$1\bin\client\jvm.dll"
IfFileExists "$2" FoundJvmDll
StrCpy $2 "$1\bin\classic\jvm.dll"
IfFileExists "$2" FoundJvmDll
;Step two: Is this a JDK path (Program Files\XXX\jre)
StrCpy $1 "$JavaHome\jre"
StrCpy $2 "$1\bin\hotspot\jvm.dll"
IfFileExists "$2" FoundJvmDll
StrCpy $2 "$1\bin\server\jvm.dll"
IfFileExists "$2" FoundJvmDll
StrCpy $2 "$1\bin\client\jvm.dll"
IfFileExists "$2" FoundJvmDll
StrCpy $2 "$1\bin\classic\jvm.dll"
IfFileExists "$2" FoundJvmDll
ClearErrors
;Step three: Read defaults from registry
ReadRegStr $1 HKLM "SOFTWARE\JavaSoft\Java Runtime Environment" "CurrentVersion"
ReadRegStr $2 HKLM "SOFTWARE\JavaSoft\Java Runtime Environment\$1" "RuntimeLib"
IfErrors 0 FoundJvmDll
StrCpy $2 ""
FoundJvmDll:
ClearErrors
; Put the result in the stack
Push $2
FunctionEnd
; ==================
; Configure Function
; ==================
;
; Writes server.xml and tomcat-users.xml
;
Function configure
; Build final server.xml
DetailPrint "Creating server.xml.new"
FileOpen $R1 "$INSTDIR\conf\server.xml" r
FileOpen $R2 "$INSTDIR\conf\server.xml.new" w
SERVER_XML_LOOP:
FileRead $R1 $R3
IfErrors SERVER_XML_LEAVELOOP
${StrRep} $R4 $R3 "8005" "$TomcatPortShutdown"
${StrRep} $R3 $R4 "8080" "$TomcatPortHttp"
${StrRep} $R4 $R3 "8009" "$TomcatPortAjp"
FileWrite $R2 $R4
Goto SERVER_XML_LOOP
SERVER_XML_LEAVELOOP:
FileClose $R1
FileClose $R2
; Replace server.xml with server.xml.new
Delete "$INSTDIR\conf\server.xml"
FileOpen $R9 "$INSTDIR\conf\server.xml" w
Push "$INSTDIR\conf\server.xml.new"
Call copyFile
FileClose $R9
Delete "$INSTDIR\conf\server.xml.new"
DetailPrint 'Server shutdown listener configured on port "$TomcatPortShutdown"'
DetailPrint 'HTTP/1.1 Connector configured on port "$TomcatPortHttp"'
DetailPrint 'AJP/1.3 Connector configured on port "$TomcatPortAjp"'
DetailPrint "server.xml written"
StrCpy $R5 ''
${If} $TomcatAdminEnable == "1"
${AndIf} "$TomcatAdminUsername" != ""
${AndIf} "$TomcatAdminPassword" != ""
${AndIf} "$TomcatAdminRoles" != ""
; Escape XML
Push $TomcatAdminUsername
Call xmlEscape
Pop $R1
Push $TomcatAdminPassword
Call xmlEscape
Pop $R2
Push $TomcatAdminRoles
Call xmlEscape
Pop $R3
StrCpy $R5 '<user username="$R1" password="$R2" roles="$R3" />$\r$\n'
DetailPrint 'Admin user added: "$TomcatAdminUsername"'
${EndIf}
; Extract these fragments to $PLUGINSDIR. That is a temporary directory,
; that is automatically deleted when the installer exits.
InitPluginsDir
SetOutPath $PLUGINSDIR
File confinstall\tomcat-users_1.xml
File confinstall\tomcat-users_2.xml
; Build final tomcat-users.xml
Delete "$INSTDIR\conf\tomcat-users.xml"
DetailPrint "Writing tomcat-users.xml"
FileOpen $R9 "$INSTDIR\conf\tomcat-users.xml" w
; File will be written using current windows codepage
System::Call 'Kernel32::GetACP() i .r18'
${If} $R8 == "932"
; Special case where Java uses non-standard name for character set
FileWrite $R9 "<?xml version='1.0' encoding='ms$R8'?>$\r$\n"
${Else}
FileWrite $R9 "<?xml version='1.0' encoding='cp$R8'?>$\r$\n"
${EndIf}
Push "$PLUGINSDIR\tomcat-users_1.xml"
Call copyFile
FileWrite $R9 $R5
Push "$PLUGINSDIR\tomcat-users_2.xml"
Call copyFile
FileClose $R9
DetailPrint "tomcat-users.xml written"
Delete "$PLUGINSDIR\tomcat-users_1.xml"
Delete "$PLUGINSDIR\tomcat-users_2.xml"
FunctionEnd
Function xmlEscape
Pop $0
${StrRep} $0 $0 "&" "&amp;"
${StrRep} $0 $0 "$\"" "&quot;"
${StrRep} $0 $0 "<" "&lt;"
${StrRep} $0 $0 ">" "&gt;"
Push $0
FunctionEnd
; =================
; CopyFile Function
; =================
;
; Copy specified file contents to $R9
;
Function copyFile
ClearErrors
Pop $0
FileOpen $1 $0 r
NoError:
FileRead $1 $2
IfErrors EOF 0
FileWrite $R9 $2
IfErrors 0 NoError
EOF:
FileClose $1
ClearErrors
FunctionEnd
; =================
; createShortcuts Function
; =================
Function createShortcuts
${If} $TomcatShortcutAllUsers == ${BST_CHECKED}
SetShellVarContext all
${EndIf}
SetOutPath "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName"
CreateShortCut "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName\Tomcat Home Page.lnk" \
"http://tomcat.apache.org/"
CreateShortCut "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName\Welcome.lnk" \
"http://127.0.0.1:$TomcatPortHttp/"
${If} ${SectionIsSelected} ${SecManager}
CreateShortCut "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName\Tomcat Manager.lnk" \
"http://127.0.0.1:$TomcatPortHttp/manager/html"
${EndIf}
${If} ${SectionIsSelected} ${SecHostManager}
CreateShortCut "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName\Tomcat Host Manager.lnk" \
"http://127.0.0.1:$TomcatPortHttp/host-manager/html"
${EndIf}
${If} ${SectionIsSelected} ${SecDocs}
CreateShortCut "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName\Tomcat Documentation.lnk" \
"$INSTDIR\webapps\docs\index.html"
${EndIf}
CreateShortCut "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName\Uninstall Tomcat @VERSION_MAJOR_MINOR@.lnk" \
"$INSTDIR\Uninstall.exe" '-ServiceName="$TomcatServiceName"'
CreateShortCut "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName\Tomcat @VERSION_MAJOR_MINOR@ Program Directory.lnk" \
"$INSTDIR"
CreateShortCut "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName\Monitor Tomcat.lnk" \
"$INSTDIR\bin\$TomcatServiceManagerFileName" \
'//MS//$TomcatServiceName' \
"$INSTDIR\tomcat.ico" 0 SW_SHOWNORMAL
CreateShortCut "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName\Configure Tomcat.lnk" \
"$INSTDIR\bin\$TomcatServiceManagerFileName" \
'//ES//$TomcatServiceName' \
"$INSTDIR\tomcat.ico" 0 SW_SHOWNORMAL
${If} $TomcatShortcutAllUsers == ${BST_CHECKED}
SetShellVarContext current
${EndIf}
FunctionEnd
; =================
; startService Function
;
; Using a function allows the service name to be varied
; =================
Function startService
ExecShell "" "$INSTDIR\bin\$TomcatServiceManagerFileName" "//MR//$TomcatServiceName"
FunctionEnd
;--------------------------------
;Uninstaller Section
!ifdef UNINSTALLONLY
Section Uninstall
${If} $TomcatServiceName == ""
MessageBox MB_ICONSTOP|MB_OK \
"No service name specified to uninstall. This will be provided automatically if you uninstall via \
Add/Remove Programs or the shortcut on the Start menu. Alternatively, call the installer from \
the command line with -ServiceName=$\"<name of service>$\"."
Quit
${EndIf}
Delete "$INSTDIR\Uninstall.exe"
; Stop Tomcat service monitor if running
DetailPrint "Stopping $TomcatServiceName service monitor"
nsExec::ExecToLog '"$INSTDIR\bin\$TomcatServiceManagerFileName" //MQ//$TomcatServiceName'
; Delete Tomcat service
DetailPrint "Uninstalling $TomcatServiceName service"
nsExec::ExecToLog '"$INSTDIR\bin\$TomcatServiceFileName" //DS//$TomcatServiceName --LogPath "$INSTDIR\logs"'
ClearErrors
; Don't know if 32-bit or 64-bit registry was used so, for now, remove both
SetRegView 32
DeleteRegKey HKLM "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName"
DeleteRegKey HKLM "SOFTWARE\Apache Software Foundation\Tomcat\@VERSION_MAJOR_MINOR@\$TomcatServiceName"
DeleteRegValue HKLM "SOFTWARE\Microsoft\Windows\CurrentVersion\Run" "ApacheTomcatMonitor@VERSION_MAJOR_MINOR@_$TomcatServiceName"
DeleteRegValue HKCU "Software\Microsoft\Windows\CurrentVersion\Run" "ApacheTomcatMonitor@VERSION_MAJOR_MINOR@_$TomcatServiceName"
SetRegView 64
DeleteRegKey HKLM "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName"
DeleteRegKey HKLM "SOFTWARE\Apache Software Foundation\Tomcat\@VERSION_MAJOR_MINOR@\$TomcatServiceName"
DeleteRegValue HKLM "SOFTWARE\Microsoft\Windows\CurrentVersion\Run" "ApacheTomcatMonitor@VERSION_MAJOR_MINOR@_$TomcatServiceName"
DeleteRegValue HKCU "Software\Microsoft\Windows\CurrentVersion\Run" "ApacheTomcatMonitor@VERSION_MAJOR_MINOR@_$TomcatServiceName"
; Don't know if short-cuts were created for all users, one user or not at all so, for now, remove both
SetShellVarContext all
RMDir /r "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName"
SetShellVarContext current
RMDir /r "$SMPROGRAMS\Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName"
; Before files are removed using recursive deletes, remove any symbolic
; links in the installation directory and the directory structure below it
; to ensure the recursive deletes don't result in any nasty surprises.
Push "$INSTDIR"
Call un.RemoveSymlinks
Delete "$INSTDIR\tomcat.ico"
Delete "$INSTDIR\LICENSE"
Delete "$INSTDIR\NOTICE"
RMDir /r "$INSTDIR\bin"
RMDir /r "$INSTDIR\lib"
Delete "$INSTDIR\conf\*.dtd"
RMDir "$INSTDIR\logs"
RMDir /r "$INSTDIR\webapps\docs"
RMDir /r "$INSTDIR\webapps\examples"
RMDir /r "$INSTDIR\work"
RMDir /r "$INSTDIR\temp"
RMDir "$INSTDIR"
IfSilent Removed 0
; if $INSTDIR was removed, skip these next ones
IfFileExists "$INSTDIR" 0 Removed
MessageBox MB_YESNO|MB_ICONQUESTION \
"Remove all files in your Apache Tomcat @VERSION_MAJOR_MINOR@ $TomcatServiceName directory? (If you have anything \
you created that you want to keep, click No)" IDNO Removed
; these would be skipped if the user hits no
RMDir /r "$INSTDIR\webapps"
RMDir /r "$INSTDIR\logs"
RMDir /r "$INSTDIR\conf"
Delete "$INSTDIR\*.*"
RMDir /r "$INSTDIR"
Sleep 500
IfFileExists "$INSTDIR" 0 Removed
MessageBox MB_OK|MB_ICONEXCLAMATION \
"Note: $INSTDIR could not be removed."
Removed:
SectionEnd
; =================
; uninstall init function
;
; Read the command line parameter and set up the service name variables so the
; uninstaller knows which service it is working with
; =================
Function un.onInit
${GetParameters} $R0
${GetOptions} $R0 "-ServiceName=" $R1
StrCpy $TomcatServiceName $R1
StrCpy $TomcatServiceFileName $R1.exe
StrCpy $TomcatServiceManagerFileName $R1w.exe
FunctionEnd
; =================
; Removes symbolic links from the path found on top of the stack.
; The path is removed from the stack as a result of calling this function.
; =================
Function un.RemoveSymlinks
Pop $0
${GetFileAttributes} "$0" "REPARSE_POINT" $3
; DetailPrint "Processing directory [$0] [$3]"
FindFirst $1 $2 $0\*.*
; DetailPrint "Search [$1] found [$2]"
StrCmp $3 "1" RemoveSymlinks-delete
RemoveSymlinks-loop:
; DetailPrint "Search [$1] processing [$0\$2]"
StrCmp $2 "" RemoveSymlinks-exit
StrCmp $2 "." RemoveSymlinks-skip
StrCmp $2 ".." RemoveSymlinks-skip
IfFileExists $0\$2\*.* RemoveSymlinks-directory
RemoveSymlinks-skip:
; DetailPrint "Search [$1] ignoring file [$0\$2]"
FindNext $1 $2
StrCmp $2 "" RemoveSymlinks-exit
goto RemoveSymlinks-loop
RemoveSymlinks-directory:
; DetailPrint "Search [$1] found directory [$0\$2]"
Push $0
Push $1
Push $0\$2
Call un.RemoveSymlinks
Pop $1
Pop $0
; DetailPrint "Search [$1] restored for [$0]"
FindNext $1 $2
goto RemoveSymlinks-loop
RemoveSymlinks-delete:
; DetailPrint "Deleting symlink [$0]"
SetFileAttributes "$0" "NORMAL"
System::Call "kernel32::RemoveDirectoryW(w `$0`) i.n"
RemoveSymlinks-exit:
; DetailPrint "Search [$1] closed"
FindClose $1
FunctionEnd
!endif
;eof