summaryrefslogtreecommitdiffstats
path: root/packaging/windows/subsurface.nsi.in
diff options
context:
space:
mode:
authorGravatar Lubomir I. Ivanov <neolit123@gmail.com>2015-11-03 19:03:35 +0200
committerGravatar Dirk Hohndel <dirk@hohndel.org>2015-11-03 09:06:07 -0800
commit0196ac1568f4fe52669f6f19db14181b0e531b0d (patch)
treeba1ccca94e705e655bb6e389d92d94b527d56979 /packaging/windows/subsurface.nsi.in
parent5002fa48870170c8993a713b5d0b92408cd52ab7 (diff)
downloadsubsurface-0196ac1568f4fe52669f6f19db14181b0e531b0d.tar.gz
NSIS: add a couple of uninstaller checkboxes
Add a new dialog/page which is shown right before the final "uninstall" click. The dialog may contains two checkboxes - for registry entries and for the user path. These checkboxes will not be created if the user has not run the application yet, as no registry keys will be available. Selecting the user directory checkbox shows a warning message box, that the user should make sure no important files are present there. Signed-off-by: Lubomir I. Ivanov <neolit123@gmail.com> Signed-off-by: Dirk Hohndel <dirk@hohndel.org>
Diffstat (limited to 'packaging/windows/subsurface.nsi.in')
-rw-r--r--packaging/windows/subsurface.nsi.in68
1 files changed, 66 insertions, 2 deletions
diff --git a/packaging/windows/subsurface.nsi.in b/packaging/windows/subsurface.nsi.in
index d09d4beb3..b5032a698 100644
--- a/packaging/windows/subsurface.nsi.in
+++ b/packaging/windows/subsurface.nsi.in
@@ -63,6 +63,58 @@
Var StartMenuFolder
#--------------------------------
+# Custom pages
+
+# Maintain some checkboxes in the uninstall dialog
+Var UninstallDialog
+Var Checkbox_Reg
+Var Checkbox_Reg_State
+Var Checkbox_UserDir
+Var Checkbox_UserDir_State
+Var UserDir
+
+Function un.UninstallOptions
+ nsDialogs::Create 1018
+ Pop $UninstallDialog
+ ${If} $UninstallDialog == error
+ Abort
+ ${EndIf}
+
+ StrCpy $Checkbox_Reg_State 0
+ StrCpy $Checkbox_UserDir 0
+
+ # if this key exists Subsurface was run at least once
+ ReadRegStr $UserDir HKCU "Software\Subsurface\Subsurface\GeneralSettings" "default_directory"
+ ${If} $UserDir != ""
+ # checkbox for removing registry entries
+ ${NSD_CreateCheckbox} 0 0u 100% 20u "Registry entries (HKEY_CURRENT_USER\Software\Subsurface)"
+ Pop $Checkbox_Reg
+ GetFunctionAddress $0 un.OnCheckbox_Reg
+ nsDialogs::OnClick $Checkbox_Reg $0
+
+ ${If} ${FileExists} "$UserDir\*.*"
+ # checkbox for removing the user directory
+ ${NSD_CreateCheckbox} 0 20u 100% 20u "User directory ($UserDir)"
+ Pop $Checkbox_UserDir
+ GetFunctionAddress $0 un.OnCheckbox_UserDir
+ nsDialogs::OnClick $Checkbox_UserDir $0
+ ${EndIf}
+ ${EndIf}
+
+ nsDialogs::Show
+FunctionEnd
+
+Function un.OnCheckbox_Reg
+ ${NSD_GetState} $Checkbox_Reg $Checkbox_Reg_State
+FunctionEnd
+Function un.OnCheckbox_UserDir
+ ${NSD_GetState} $Checkbox_UserDir $Checkbox_UserDir_State
+ ${If} $Checkbox_UserDir_State == 1
+ MessageBox MB_OK "WARNING!$\nMake sure you don't have important files in the user directory!"
+ ${EndIf}
+FunctionEnd
+
+#--------------------------------
# Pages
# Installer pages
@@ -73,6 +125,7 @@
# Uninstaller pages
!insertmacro MUI_UNPAGE_CONFIRM
+ UninstPage custom un.UninstallOptions
!insertmacro MUI_UNPAGE_INSTFILES
#--------------------------------
@@ -163,8 +216,19 @@ Section "Uninstall"
RMDir "$SMPROGRAMS\$StartMenuFolder"
Delete "$DESKTOP\Subsurface.lnk"
- # Remove registry entries
- DeleteRegKey /ifempty HKCU "Software\Subsurface"
+ # remove the registry entires
+ ${If} $Checkbox_Reg_State == 1
+ DeleteRegKey HKCU "Software\Subsurface"
+ ${EndIf}
+
+ # remove the user directory
+ ${If} $Checkbox_UserDir_State == 1
+ ${AndIf} $UserDir != ""
+ ${AndIf} ${FileExists} "$UserDir\*.*"
+ RMDir /r $UserDir
+ ${EndIf}
+
+ # remove the uninstaller entry
DeleteRegKey HKCU "Software\Microsoft\Windows\CurrentVersion\Uninstall\Subsurface"
SectionEnd