; Copyright (c) uib gmbh (www.uib.de)
; This sourcecode is owned by uib gmbh
; and published under the Terms of the General Public License.
; credits: http://www.opsi.org/en/credits/
DefStringlist $outlist$

Set $UninstallProgram$ = $InstallDir$ + "\gpg4win-uninstall.exe"

Message "Uninstalling " + $ProductId$ + " ..."

if FileExists($UninstallProgram$)
	comment "Uninstall program found, starting uninstall"
	killtask "kleopatra.exe"
	killtask "gpg-agent.exe"
	killtask "dirmngr.exe"
	killtask "dbus-daemon.exe"
	killtask "qdbus.exe"
	Files_uninstall_special
	setLoglevel = 7
	set $outlist$ = getProcessList
	DosInAnIcon_kill_tasks winst /32bit
	set $outlist$ = getProcessList
	Files_uninstall_special
	Winbatch_uninstall /WaitforProcessending "Au_.exe" /Timeoutseconds 30
	sub_check_exitcode
	if not ("" = takefirststringcontaining(getProcessList,"Au_.exe"))
		killtask "qdbus.exe"
		killtask "kleopatra.exe"
		killtask "gpg-agent.exe"
		killtask "dirmngr.exe"
		killtask "dbus-daemon.exe"
		sleepseconds "10"
		set $outlist$ = getProcessList
	endif
	if not ("" = takefirststringcontaining(getProcessList,"Au_.exe"))
		killtask "qdbus.exe"
		killtask "kleopatra.exe"
		killtask "gpg-agent.exe"
		killtask "dirmngr.exe"
		killtask "dbus-daemon.exe"
		sleepseconds "10"
		set $outlist$ = getProcessList
	endif
	if not ("" = takefirststringcontaining(getProcessList,"Au_.exe"))
		killtask "qdbus.exe"
		killtask "kleopatra.exe"
		killtask "gpg-agent.exe"
		killtask "dirmngr.exe"
		killtask "dbus-daemon.exe"
		sleepseconds "10"
		set $outlist$ = getProcessList
	endif
	if not ("" = takefirststringcontaining(getProcessList,"Au_.exe"))
		set $outlist$ = getProcessList
		LogError("uninstallation failed")
		isFatalError
	endif
	setLoglevel = 6
endif

comment "Delete files"
Files_uninstall /32Bit

[Winbatch_uninstall]
; === Nullsoft Scriptable Install System ================================================================
"$UninstallProgram$" /S

[Files_uninstall]
del -sf "$InstallDir$\"

[Files_uninstall_special]
del -f "$InstallDir$\qdbus.exe"

[DosInAnIcon_kill_tasks]
taskkill /IM "kleopatra.exe" /F
taskkill /IM "gpg-agent.exe" /F
taskkill /IM "dirmngr.exe" /F
taskkill /IM "dbus-daemon.exe" /F

[Sub_check_exitcode]
comment "Test for installation success via exit code"
set $ExitCode$ = getLastExitCode
; informations to exit codes see
; http://msdn.microsoft.com/en-us/library/aa372835(VS.85).aspx
; http://msdn.microsoft.com/en-us/library/aa368542.aspx
if ($ExitCode$ = "0")
	comment "Looks good: setup program gives exitcode zero"
else
	comment "Setup program gives a exitcode unequal zero: " + $ExitCode$
	if ($ExitCode$ = "1605")
		comment "ERROR_UNKNOWN_PRODUCT	1605	This action is only valid for products that are currently installed."
		comment "Uninstall of a not installed product failed - no problem"
	else
		if ($ExitCode$ = "1641")
			comment "looks good: setup program gives exitcode 1641"
			comment "ERROR_SUCCESS_REBOOT_INITIATED	1641	The installer has initiated a restart. This message is indicative of a success."
			Exitwindows /Reboot
		else
			if ($ExitCode$ = "3010")
				comment "looks good: setup program gives exitcode 3010"
				comment "ERROR_SUCCESS_REBOOT_REQUIRED	3010	A restart is required to complete the install. This message is indicative of a success."
				Exitwindows /Reboot
			else
				logError "Fatal: Setup program gives an unknown exitcode unequal zero: " + $ExitCode$
				isFatalError
			endif
		endif
	endif
endif