# ***** BEGIN LICENSE BLOCK ***** # Version: MPL 1.1/GPL 2.0/LGPL 2.1 # # The contents of this file are subject to the Mozilla Public License Version # 1.1 (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.mozilla.org/MPL/ # # Software distributed under the License is distributed on an "AS IS" basis, # WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License # for the specific language governing rights and limitations under the # License. # # The Original Code is the Mozilla Installer code. # # The Initial Developer of the Original Code is Mozilla Foundation # Portions created by the Initial Developer are Copyright (C) 2006 # the Initial Developer. All Rights Reserved. # # Contributor(s): # Robert Strong # # Alternatively, the contents of this file may be used under the terms of # either the GNU General Public License Version 2 or later (the "GPL"), or # the GNU Lesser General Public License Version 2.1 or later (the "LGPL"), # in which case the provisions of the GPL or the LGPL are applicable instead # of those above. If you wish to allow use of your version of this file only # under the terms of either the GPL or the LGPL, and not to allow others to # use your version of this file under the terms of the MPL, indicate your # decision by deleting the provisions above and replace them with the notice # and other provisions required by the GPL or the LGPL. If you do not delete # the provisions above, a recipient may use your version of this file under # the terms of any one of the MPL, the GPL or the LGPL. # # ***** END LICENSE BLOCK ***** !macro PostUpdate ; Remove registry entries for non-existent apps and for apps that point to our ; install location in the Software\Mozilla key and uninstall registry entries ; that point to our install location for both HKCU and HKLM. SetShellVarContext current ; Set SHCTX to the current user (e.g. HKCU) ${RegCleanMain} "Software\Mozilla" ${RegCleanUninstall} ${UpdateProtocolHandlers} ClearErrors WriteRegStr HKLM "Software\Mozilla\InstallerTest" "InstallerTest" "Test" ${If} ${Errors} StrCpy $TmpVal "HKCU" ; used primarily for logging ${Else} SetShellVarContext all ; Set SHCTX to all users (e.g. HKLM) DeleteRegKey HKLM "Software\Mozilla\InstallerTest" StrCpy $TmpVal "HKLM" ; used primarily for logging ${RegCleanMain} "Software\Mozilla" ${RegCleanUninstall} ${SetStartMenuInternet} ${FixShellIconHandler} ${SetUninstallKeys} ${UpdateProtocolHandlers} ReadRegStr $0 HKLM "Software\mozilla.org\Mozilla" "CurrentVersion" ${If} "$0" != "${GREVersion}" WriteRegStr HKLM "Software\mozilla.org\Mozilla" "CurrentVersion" "${GREVersion}" ${EndIf} ${EndIf} ${RemoveDeprecatedKeys} ; Add Software\Mozilla\ registry entries ${SetAppKeys} ${FixClassKeys} ; Remove files that may be left behind by the application in the ; VirtualStore directory. ${CleanVirtualStore} ; Remove talkback if it is present (remove after bug 386760 is fixed) ${If} ${FileExists} "$INSTDIR\extensions\talkback@mozilla.org\" RmDir /r "$INSTDIR\extensions\talkback@mozilla.org\" ${EndIf} !macroend !define PostUpdate "!insertmacro PostUpdate" !macro SetAsDefaultAppUser ; It is only possible to set this installation of the application as the ; StartMenuInternet handler if it was added to the HKLM StartMenuInternet ; registry keys. ; http://support.microsoft.com/kb/297878 ${StrFilter} "${FileMainEXE}" "+" "" "" $R9 ClearErrors ReadRegStr $0 HKLM "Software\Clients\StartMenuInternet\$R9\DefaultIcon" "" IfErrors updateclientkeys +1 ${GetPathFromString} "$0" $0 ${GetParent} "$0" $0 IfFileExists "$0" +1 updateclientkeys ${GetLongPath} "$0" $0 StrCmp "$0" "$INSTDIR" setdefaultuser +1 updateclientkeys: ; Calls after ElevateUAC won't be made if the user can elevate. They ; will be made in the new elevated process if the user allows elevation. ${ElevateUAC} ${SetStartMenuInternet} setdefaultuser: SetShellVarContext all ; Set SHCTX to all users (e.g. HKLM) ${FixShellIconHandler} WriteRegStr HKCU "Software\Clients\StartMenuInternet" "" "$R9" ${If} ${AtLeastWinVista} ClearErrors ReadRegStr $0 HKLM "Software\RegisteredApplications" "${AppRegName}" ; Only register as the handler on Vista if the app registry name exists ; under the RegisteredApplications registry key. ${Unless} ${Errors} AppAssocReg::SetAppAsDefaultAll "${AppRegName}" ${EndUnless} ${EndIf} ${RemoveDeprecatedKeys} SetShellVarContext current ; Set SHCTX to the current user (e.g. HKCU) ${SetHandlers} !macroend !define SetAsDefaultAppUser "!insertmacro SetAsDefaultAppUser" !macro SetAsDefaultAppGlobal ${RemoveDeprecatedKeys} SetShellVarContext all ; Set SHCTX to all users (e.g. HKLM) ${SetHandlers} ${SetStartMenuInternet} ${FixShellIconHandler} ${ShowShortcuts} ${StrFilter} "${FileMainEXE}" "+" "" "" $R9 WriteRegStr HKLM "Software\Clients\StartMenuInternet" "" "$R9" !macroend !define SetAsDefaultAppGlobal "!insertmacro SetAsDefaultAppGlobal" !macro FixReg ${SetAsDefaultAppUser} !macroend !define FixReg "!insertmacro FixReg" !macro HideShortcuts ${StrFilter} "${FileMainEXE}" "+" "" "" $0 StrCpy $R1 "Software\Clients\StartMenuInternet\$0\InstallInfo" WriteRegDWORD HKLM "$R1" "IconsVisible" 0 SetShellVarContext all ; Set $DESKTOP to All Users ${Unless} ${FileExists} "$DESKTOP\${BrandFullName}.lnk" SetShellVarContext current ; Set $DESKTOP to the current user's desktop ${EndUnless} ${If} ${FileExists} "$DESKTOP\${BrandFullName}.lnk" ShellLink::GetShortCutArgs "$DESKTOP\${BrandFullName}.lnk" Pop $0 ${If} "$0" == "" ShellLink::GetShortCutTarget "$DESKTOP\${BrandFullName}.lnk" Pop $0 ; Needs to handle short paths ${If} "$0" == "$INSTDIR\${FileMainEXE}" Delete "$DESKTOP\${BrandFullName}.lnk" ${EndIf} ${EndIf} ${EndIf} ${If} ${FileExists} "$QUICKLAUNCH\${BrandFullName}.lnk" ShellLink::GetShortCutArgs "$QUICKLAUNCH\${BrandFullName}.lnk" Pop $0 ${If} "$0" == "" ShellLink::GetShortCutTarget "$QUICKLAUNCH\${BrandFullName}.lnk" Pop $0 ; Needs to handle short paths ${If} "$0" == "$INSTDIR\${FileMainEXE}" Delete "$QUICKLAUNCH\${BrandFullName}.lnk" ${EndIf} ${EndIf} ${EndIf} !macroend !define HideShortcuts "!insertmacro HideShortcuts" !macro ShowShortcuts ${StrFilter} "${FileMainEXE}" "+" "" "" $0 StrCpy $R1 "Software\Clients\StartMenuInternet\$0\InstallInfo" WriteRegDWORD HKLM "$R1" "IconsVisible" 1 SetShellVarContext all ; Set $DESKTOP to All Users ${Unless} ${FileExists} "$DESKTOP\${BrandFullName}.lnk" CreateShortCut "$DESKTOP\${BrandFullName}.lnk" "$INSTDIR\${FileMainEXE}" "" "$INSTDIR\${FileMainEXE}" 0 ShellLink::SetShortCutWorkingDirectory "$DESKTOP\${BrandFullName}.lnk" "$INSTDIR" ${Unless} ${FileExists} "$DESKTOP\${BrandFullName}.lnk" SetShellVarContext current ; Set $DESKTOP to the current user's desktop ${Unless} ${FileExists} "$DESKTOP\${BrandFullName}.lnk" CreateShortCut "$DESKTOP\${BrandFullName}.lnk" "$INSTDIR\${FileMainEXE}" "" "$INSTDIR\${FileMainEXE}" 0 ShellLink::SetShortCutWorkingDirectory "$DESKTOP\${BrandFullName}.lnk" "$INSTDIR" ${EndUnless} ${EndUnless} ${EndUnless} ${Unless} ${FileExists} "$QUICKLAUNCH\${BrandFullName}.lnk" CreateShortCut "$QUICKLAUNCH\${BrandFullName}.lnk" "$INSTDIR\${FileMainEXE}" "" "$INSTDIR\${FileMainEXE}" 0 ShellLink::SetShortCutWorkingDirectory "$QUICKLAUNCH\${BrandFullName}.lnk" "$INSTDIR" ${EndUnless} !macroend !define ShowShortcuts "!insertmacro ShowShortcuts" !macro SetHandlers ${GetLongPath} "$INSTDIR\${FileMainEXE}" $8 StrCpy $0 "SOFTWARE\Classes" StrCpy $2 "$\"$8$\" -requestPending -osint -url $\"%1$\"" ; Associate the file handlers with FirefoxHTML ReadRegStr $6 HKCR ".htm" "" ${If} "$6" != "FirefoxHTML" WriteRegStr SHCTX "$0\.htm" "" "FirefoxHTML" ${EndIf} ReadRegStr $6 HKCR ".html" "" ${If} "$6" != "FirefoxHTML" WriteRegStr SHCTX "$0\.html" "" "FirefoxHTML" ${EndIf} ReadRegStr $6 HKCR ".shtml" "" ${If} "$6" != "FirefoxHTML" WriteRegStr SHCTX "$0\.shtml" "" "FirefoxHTML" ${EndIf} ReadRegStr $6 HKCR ".xht" "" ${If} "$6" != "FirefoxHTML" WriteRegStr SHCTX "$0\.xht" "" "FirefoxHTML" ${EndIf} ReadRegStr $6 HKCR ".xhtml" "" ${If} "$6" != "FirefoxHTML" WriteRegStr SHCTX "$0\.xhtml" "" "FirefoxHTML" ${EndIf} StrCpy $3 "$\"%1$\",,0,0,,,," ; An empty string is used for the 5th param because FirefoxHTML is not a ; protocol handler ${AddDDEHandlerValues} "FirefoxHTML" "$2" "$8,1" "${AppRegName} Document" "" \ "${DDEApplication}" "$3" "WWW_OpenURL" ${AddDDEHandlerValues} "FirefoxURL" "$2" "$8,1" "${AppRegName} URL" "true" \ "${DDEApplication}" "$3" "WWW_OpenURL" ; An empty string is used for the 4th & 5th params because the following ; protocol handlers already have a display name and the additional keys ; required for a protocol handler. ${AddDDEHandlerValues} "ftp" "$2" "$8,1" "" "" \ "${DDEApplication}" "$3" "WWW_OpenURL" ${AddDDEHandlerValues} "http" "$2" "$8,1" "" "" \ "${DDEApplication}" "$3" "WWW_OpenURL" ${AddDDEHandlerValues} "https" "$2" "$8,1" "" "" \ "${DDEApplication}" "$3" "WWW_OpenURL" !macroend !define SetHandlers "!insertmacro SetHandlers" ; The values for StartMenuInternet are only valid under HKLM and there can only ; be one installation registerred under StartMenuInternet per application since ; the key name is derived from the main application executable. ; http://support.microsoft.com/kb/297878 ; ; Note: we might be able to get away with using the full path to the ; application executable for the key name in order to support multiple ; installations. !macro SetStartMenuInternet ${GetLongPath} "$INSTDIR\${FileMainEXE}" $8 ${GetLongPath} "$INSTDIR\uninstall\helper.exe" $7 ${StrFilter} "${FileMainEXE}" "+" "" "" $R9 StrCpy $0 "Software\Clients\StartMenuInternet\$R9" WriteRegStr HKLM "$0" "" "${BrandFullName}" WriteRegStr HKLM "$0\DefaultIcon" "" "$8,0" ; The Reinstall Command is defined at ; http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/programmersguide/shell_adv/registeringapps.asp WriteRegStr HKLM "$0\InstallInfo" "HideIconsCommand" "$\"$7$\" /HideShortcuts" WriteRegStr HKLM "$0\InstallInfo" "ShowIconsCommand" "$\"$7$\" /ShowShortcuts" WriteRegStr HKLM "$0\InstallInfo" "ReinstallCommand" "$\"$7$\" /SetAsDefaultAppGlobal" ClearErrors ReadRegDWORD $1 HKLM "$0\InstallInfo" "IconsVisible" ; If the IconsVisible name vale pair doesn't exist add it otherwise the ; application won't be displayed in Set Program Access and Defaults. ${If} ${Errors} ${If} ${FileExists} "$QUICKLAUNCH\${BrandFullName}.lnk" WriteRegDWORD HKLM "$0\InstallInfo" "IconsVisible" 1 ${Else} WriteRegDWORD HKLM "$0\InstallInfo" "IconsVisible" 0 ${EndIf} ${EndIf} WriteRegStr HKLM "$0\shell\open\command" "" "$8" WriteRegStr HKLM "$0\shell\properties" "" "$(CONTEXT_OPTIONS)" WriteRegStr HKLM "$0\shell\properties\command" "" "$\"$8$\" -preferences" WriteRegStr HKLM "$0\shell\safemode" "" "$(CONTEXT_SAFE_MODE)" WriteRegStr HKLM "$0\shell\safemode\command" "" "$\"$8$\" -safe-mode" ; Vista Capabilities registry keys WriteRegStr HKLM "$0\Capabilities" "ApplicationDescription" "$(REG_APP_DESC)" WriteRegStr HKLM "$0\Capabilities" "ApplicationIcon" "$8,0" WriteRegStr HKLM "$0\Capabilities" "ApplicationName" "${BrandShortName}" WriteRegStr HKLM "$0\Capabilities\FileAssociations" ".htm" "FirefoxHTML" WriteRegStr HKLM "$0\Capabilities\FileAssociations" ".html" "FirefoxHTML" WriteRegStr HKLM "$0\Capabilities\FileAssociations" ".shtml" "FirefoxHTML" WriteRegStr HKLM "$0\Capabilities\FileAssociations" ".xht" "FirefoxHTML" WriteRegStr HKLM "$0\Capabilities\FileAssociations" ".xhtml" "FirefoxHTML" WriteRegStr HKLM "$0\Capabilities\StartMenu" "StartMenuInternet" "$R9" WriteRegStr HKLM "$0\Capabilities\URLAssociations" "ftp" "FirefoxURL" WriteRegStr HKLM "$0\Capabilities\URLAssociations" "http" "FirefoxURL" WriteRegStr HKLM "$0\Capabilities\URLAssociations" "https" "FirefoxURL" ; Vista Registered Application WriteRegStr HKLM "Software\RegisteredApplications" "${AppRegName}" "$0\Capabilities" !macroend !define SetStartMenuInternet "!insertmacro SetStartMenuInternet" !macro FixShellIconHandler ; The IconHandler reference for FirefoxHTML can end up in an inconsistent ; state due to changes not being detected by the IconHandler for side by side ; installs. The symptoms can be either an incorrect icon or no icon being ; displayed for files associated with Firefox. By setting it here it will ; always reference the install referenced in the ; HKLM\Software\Classes\FirefoxHTML registry key. ${GetLongPath} "$INSTDIR\${FileMainEXE}" $8 ClearErrors ReadRegStr $2 HKLM "Software\Classes\FirefoxHTML\ShellEx\IconHandler" "" ${Unless} ${Errors} ClearErrors ReadRegStr $3 HKLM "Software\Classes\CLSID\$2\Old Icon\FirefoxHTML\DefaultIcon" "" ${Unless} ${Errors} WriteRegStr HKLM "Software\Classes\CLSID\$2\Old Icon\FirefoxHTML\DefaultIcon" "" "$8,1" ${EndUnless} ${EndUnless} !macroend !define FixShellIconHandler "!insertmacro FixShellIconHandler" !macro SetAppKeys ${GetLongPath} "$INSTDIR" $8 StrCpy $0 "Software\Mozilla\${BrandFullNameInternal}\${AppVersion} (${AB_CD})\Main" ${WriteRegStr2} $TmpVal "$0" "Install Directory" "$8" 0 ${WriteRegStr2} $TmpVal "$0" "PathToExe" "$8\${FileMainEXE}" 0 ${WriteRegStr2} $TmpVal "$0" "Program Folder Path" "$SMPROGRAMS\$StartMenuDir" 0 SetShellVarContext all ; Set $DESKTOP to All Users ${Unless} ${FileExists} "$DESKTOP\${BrandFullName}.lnk" SetShellVarContext current ; Set $DESKTOP to the current user's desktop ${EndUnless} ${If} ${FileExists} "$DESKTOP\${BrandFullName}.lnk" ShellLink::GetShortCutArgs "$DESKTOP\${BrandFullName}.lnk" Pop $1 ${If} "$1" == "" ShellLink::GetShortCutTarget "$DESKTOP\${BrandFullName}.lnk" Pop $1 ${GetLongPath} "$1" $1 ${If} "$1" == "$8\${FileMainEXE}" ${WriteRegDWORD2} $TmpVal "$0" "Create Desktop Shortcut" 1 0 ${Else} ${WriteRegDWORD2} $TmpVal "$0" "Create Desktop Shortcut" 0 0 ${EndIf} ${EndIf} ${EndIf} ; XXXrstrong - need a cleaner way to prevent unsetting SHCTX from HKLM when ; trying to find the desktop shortcut. ${If} "$TmpVal" == "HKCU" SetShellVarContext current ; Set SHCTX to the current user (e.g. HKCU) ${Else} SetShellVarContext all ; Set SHCTX to all users (e.g. HKLM) ${EndIf} ${If} ${FileExists} "$QUICKLAUNCH\${BrandFullName}.lnk" ShellLink::GetShortCutArgs "$QUICKLAUNCH\${BrandFullName}.lnk" Pop $1 ${If} "$1" == "" ShellLink::GetShortCutTarget "$QUICKLAUNCH\${BrandFullName}.lnk" Pop $1 ${GetLongPath} "$1" $1 ${If} "$1" == "$8\${FileMainEXE}" ${WriteRegDWORD2} $TmpVal "$0" "Create Quick Launch Shortcut" 1 0 ${Else} ${WriteRegDWORD2} $TmpVal "$0" "Create Quick Launch Shortcut" 0 0 ${EndIf} ${EndIf} ${EndIf} ; XXXrstrong - "Create Start Menu Shortcut" and "Start Menu Folder" are only ; set in the installer and should also be set here for software update. StrCpy $0 "Software\Mozilla\${BrandFullNameInternal}\${AppVersion} (${AB_CD})\Uninstall" ${WriteRegStr2} $TmpVal "$0" "Uninstall Log Folder" "$8\uninstall" 0 ${WriteRegStr2} $TmpVal "$0" "Description" "${BrandFullNameInternal} (${AppVersion})" 0 StrCpy $0 "Software\Mozilla\${BrandFullNameInternal}\${AppVersion} (${AB_CD})" ${WriteRegStr2} $TmpVal "$0" "" "${AppVersion} (${AB_CD})" 0 StrCpy $0 "Software\Mozilla\${BrandFullNameInternal} ${AppVersion}\bin" ${WriteRegStr2} $TmpVal "$0" "PathToExe" "$8\${FileMainEXE}" 0 StrCpy $0 "Software\Mozilla\${BrandFullNameInternal} ${AppVersion}\extensions" ${WriteRegStr2} $TmpVal "$0" "Components" "$8\components" 0 ${WriteRegStr2} $TmpVal "$0" "Plugins" "$8\plugins" 0 StrCpy $0 "Software\Mozilla\${BrandFullNameInternal} ${AppVersion}" ${WriteRegStr2} $TmpVal "$0" "GeckoVer" "${GREVersion}" 0 StrCpy $0 "Software\Mozilla\${BrandFullNameInternal}" ${WriteRegStr2} $TmpVal "$0" "" "${GREVersion}" 0 ${WriteRegStr2} $TmpVal "$0" "CurrentVersion" "${AppVersion} (${AB_CD})" 0 !macroend !define SetAppKeys "!insertmacro SetAppKeys" !macro SetUninstallKeys StrCpy $0 "Software\Microsoft\Windows\CurrentVersion\Uninstall\${BrandFullNameInternal} (${AppVersion})" ${GetLongPath} "$INSTDIR" $8 ; Write the uninstall registry keys ${WriteRegStr2} $TmpVal "$0" "Comments" "${BrandFullNameInternal}" 0 ${WriteRegStr2} $TmpVal "$0" "DisplayIcon" "$8\${FileMainEXE},0" 0 ${WriteRegStr2} $TmpVal "$0" "DisplayName" "${BrandFullNameInternal} (${AppVersion})" 0 ${WriteRegStr2} $TmpVal "$0" "DisplayVersion" "${AppVersion} (${AB_CD})" 0 ${WriteRegStr2} $TmpVal "$0" "InstallLocation" "$8" 0 ${WriteRegStr2} $TmpVal "$0" "Publisher" "Mozilla" 0 ${WriteRegStr2} $TmpVal "$0" "UninstallString" "$8\uninstall\helper.exe" 0 ${WriteRegStr2} $TmpVal "$0" "URLInfoAbout" "${URLInfoAbout}" 0 ${WriteRegStr2} $TmpVal "$0" "URLUpdateInfo" "${URLUpdateInfo}" 0 ${WriteRegDWORD2} $TmpVal "$0" "NoModify" 1 0 ${WriteRegDWORD2} $TmpVal "$0" "NoRepair" 1 0 !macroend !define SetUninstallKeys "!insertmacro SetUninstallKeys" !macro FixClassKeys StrCpy $1 "SOFTWARE\Classes" ; File handler keys and name value pairs that may need to be created during ; install or upgrade. ReadRegStr $0 HKCR ".shtml" "Content Type" ${If} "$0" == "" StrCpy $0 "$1\.shtml" ${WriteRegStr2} $TmpVal "$1\.shtml" "" "shtmlfile" 0 ${WriteRegStr2} $TmpVal "$1\.shtml" "Content Type" "text/html" 0 ${WriteRegStr2} $TmpVal "$1\.shtml" "PerceivedType" "text" 0 ${EndIf} ReadRegStr $0 HKCR ".xht" "Content Type" ${If} "$0" == "" ${WriteRegStr2} $TmpVal "$1\.xht" "" "xhtfile" 0 ${WriteRegStr2} $TmpVal "$1\.xht" "Content Type" "application/xhtml+xml" 0 ${EndIf} ReadRegStr $0 HKCR ".xhtml" "Content Type" ${If} "$0" == "" ${WriteRegStr2} $TmpVal "$1\.xhtml" "" "xhtmlfile" 0 ${WriteRegStr2} $TmpVal "$1\.xhtml" "Content Type" "application/xhtml+xml" 0 ${EndIf} !macroend !define FixClassKeys "!insertmacro FixClassKeys" ; Updates protocol handlers if their registry open command value is for this ; install location !macro UpdateProtocolHandlers ; Store the command to open the app with an url in a register for easy access. ${GetLongPath} "$INSTDIR\${FileMainEXE}" $8 StrCpy $2 "$\"$8$\" -requestPending -osint -url $\"%1$\"" StrCpy $3 "$\"%1$\",,0,0,,,," ; Only set the file and protocol handlers if the existing one under HKCR is ; for this install location. ${IsHandlerForInstallDir} "FirefoxHTML" $R9 ${If} "$R9" == "true" ; An empty string is used for the 5th param because FirefoxHTML is not a ; protocol handler. ${AddDDEHandlerValues} "FirefoxHTML" "$2" "$8,1" "${AppRegName} Document" "" \ "${DDEApplication}" "$3" "WWW_OpenURL" ${EndIf} ${IsHandlerForInstallDir} "FirefoxURL" $R9 ${If} "$R9" == "true" ${AddDDEHandlerValues} "FirefoxURL" "$2" "$8,1" "${AppRegName} URL" "true" \ "${DDEApplication}" "$3" "WWW_OpenURL" ${EndIf} ${IsHandlerForInstallDir} "ftp" $R9 ${If} "$R9" == "true" ${AddDDEHandlerValues} "ftp" "$2" "$8,1" "" "" \ "${DDEApplication}" "$3" "WWW_OpenURL" ${EndIf} ${IsHandlerForInstallDir} "http" $R9 ${If} "$R9" == "true" ${AddDDEHandlerValues} "http" "$2" "$8,1" "" "" \ "${DDEApplication}" "$3" "WWW_OpenURL" ${EndIf} ${IsHandlerForInstallDir} "https" $R9 ${If} "$R9" == "true" ${AddDDEHandlerValues} "https" "$2" "$8,1" "" "" \ "${DDEApplication}" "$3" "WWW_OpenURL" ${EndIf} !macroend !define UpdateProtocolHandlers "!insertmacro UpdateProtocolHandlers" !macro RemoveDeprecatedKeys StrCpy $0 "SOFTWARE\Classes" ; Remove support for launching gopher urls from the shell during install or ; update if the DefaultIcon is from firefox.exe. ${RegCleanAppHandler} "gopher" ; Remove support for launching chrome urls from the shell during install or ; update if the DefaultIcon is from firefox.exe (Bug 301073). ${RegCleanAppHandler} "chrome" ; Remove protocol handler registry keys added by the MS shim DeleteRegKey HKLM "Software\Classes\Firefox.URL" DeleteRegKey HKCU "Software\Classes\Firefox.URL" ; Remove the app compatibility registry key StrCpy $0 "Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers" DeleteRegValue HKLM "$0" "$INSTDIR\${FileMainEXE}" DeleteRegValue HKCU "$0" "$INSTDIR\${FileMainEXE}" ; Delete gopher from Capabilities\URLAssociations if it is present. ${StrFilter} "${FileMainEXE}" "+" "" "" $R9 StrCpy $0 "Software\Clients\StartMenuInternet\$R9" ClearErrors ReadRegStr $2 HKLM "$0\Capabilities\URLAssociations" "gopher" ${Unless} ${Errors} DeleteRegValue HKLM "$0\Capabilities\URLAssociations" "gopher" ${EndUnless} ; Delete gopher from the user's UrlAssociations if it points to FirefoxURL. StrCpy $0 "Software\Microsoft\Windows\Shell\Associations\UrlAssociations\gopher" ReadRegStr $2 HKCU "$0\UserChoice" "Progid" ${If} "$2" == "FirefoxURL" DeleteRegKey HKCU "$0" ${EndIf} !macroend !define RemoveDeprecatedKeys "!insertmacro RemoveDeprecatedKeys" ; The files to check if they are in use during (un)install so the restart is ; required message is displayed. All files must be located in the $INSTDIR ; directory. !macro PushFilesToCheck ; The first string to be pushed onto the stack MUST be "end" to indicate ; that there are no more files to check in $INSTDIR and the last string ; should be ${FileMainEXE} so if it is in use the CheckForFilesInUse macro ; returns after the first check. Push "end" Push "AccessibleMarshal.dll" Push "freebl3.dll" Push "nssckbi.dll" Push "nspr4.dll" Push "nssdbm3.dll" Push "sqlite3.dll" Push "xpcom.dll" Push "crashreporter.exe" Push "updater.exe" Push "xpicleanup.exe" Push "${FileMainEXE}" !macroend !define PushFilesToCheck "!insertmacro PushFilesToCheck"