; 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 TomcatServiceNameAlreadyInstalled 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 - https://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 - https://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.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 --JvmOptions9 "--add-opens=java.base/java.lang=ALL-UNNAMED#--add-opens=java.base/java.io=ALL-UNNAMED#--add-opens=java.rmi/sun.rmi.transport=ALL-UNNAMED"' 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.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 --JvmOptions9 "--add-opens=java.base/java.lang=ALL-UNNAMED#--add-opens=java.base/java.io=ALL-UNNAMED#--add-opens=java.rmi/sun.rmi.transport=ALL-UNNAMED"' 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" \ "Publisher" "The Apache Software Foundation" 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: Pop $0 ; Stack: Pop $1 ; Stack: Pop $2 ; Stack: -empty- ${ConfigRead} $2 '$0=' $1 ; 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} ReadRegStr $TomcatServiceNameAlreadyInstalled HKLM "SYSTEM\CurrentControlSet\Services\$TomcatServiceName" \ "DisplayName" ${If} $TomcatServiceNameAlreadyInstalled != "" MessageBox MB_ICONEXCLAMATION|MB_OK 'A service with the given Service Name is already installed on this machine. \ Please choose another Service Name' 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\JRE" "CurrentVersion" ReadRegStr $1 HKLM "SOFTWARE\JavaSoft\JRE\$2" "JavaHome" ReadRegStr $3 HKLM "SOFTWARE\JavaSoft\JRE\$2" "RuntimeLib" IfErrors 0 +2 StrCpy $1 "" ClearErrors ${If} $1 == "" 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} ${EndIf} ; If no 64-bit Java was found, look for 32-bit Java ${If} $1 == "" SetRegView 32 ReadRegStr $2 HKLM "SOFTWARE\JavaSoft\JRE" "CurrentVersion" ReadRegStr $1 HKLM "SOFTWARE\JavaSoft\JRE\$2" "JavaHome" ReadRegStr $3 HKLM "SOFTWARE\JavaSoft\JRE\$2" "RuntimeLib" IfErrors 0 +2 StrCpy $1 "" ClearErrors ${If} $1 == "" 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 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 '$\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 "$\r$\n" ${Else} FileWrite $R9 "$\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 "&" "&" ${StrRep} $0 $0 "$\"" """ ${StrRep} $0 $0 "<" "<" ${StrRep} $0 $0 ">" ">" 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" \ "https://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=$\"$\"." 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