====== CD-Burner XP ======

Tested with opsi 4.0.1 \\
requiredWinstVersion >= 4.10.8.6 \\
By //[[thomas.heinrich@polizei.berlin.de|Thomas_H]] 2011/10/27 15:57//

The installion-files can be downloaded from: http://cdburnerxp.se/

Tree:\\
├ CDBurnerXP.jpg\\
├ cdbxp_setup_x.y.z.1234.exe\\
├ cdbxp_setup_x.y.z.1234_x64.exe\\
├ default.cfg\\
├ delsub.ins\\
├ setup.ins\\
└ uninstall.ins


Last checks:
[[thomas.heinrich@polizei.berlin.de|Thomas_H]] 2019/05/14 11:45\\



==== setup.ins ====
<code winst>
[Initial]
SetLogLevel=9
;  Log Errors in Logfile but don't abort:
ExitOnError=false
; Show syntax errors in the script:
ScriptErrorMessages=on
; Dont trace step by step through the script:
TraceMode=off
; let started programs run in front of the winst window
StayOnTop=false


[Actions]
requiredWinstVersion >= "4.10.8.6"

DefVar $LogDir$
DefVar $ProductId$
DefVar $MinimumSpace$
DefVar $InstallDir32$
DefVar $InstallDir64$
DefVar $ExitCode$
DefVar $LicenseRequired$
DefVar $LicenseKey$
DefVar $LicensePool$
DefVar $INST_SystemType$
DefVar $INST_architecture$
DefVar $Version$
DefVar $Inst_Cmd$
DefVar $Inst_Prg32$
DefVar $Inst_Prg64$
DefVar $Uninst_Cmd$
DefVar $Uninst_Prg$

Set $INST_SystemType$ = GetSystemType
set $INST_architecture$ = GetProductProperty("install_architecture","system specific")


Set $LogDir$ = "%SystemDrive%\tmp"

; ----------------------------------------------------------------
; - Please edit the following values                             -
; ----------------------------------------------------------------
;$ProductId$ should be the name of the product in opsi
; therefore please: only lower letters, no umlauts,
; no white space use '-' as a seperator
Set $ProductId$       = "CDBurnerXP"
Set $Version$         = "4.5.8.7032"
Set $MinimumSpace$    = "13 MB"
; the path were we find the product after the installation
Set $InstallDir32$      = "%ProgramFiles32Dir%\CDBurnerXP\"
Set $InstallDir64$      = "%ProgramFiles64Dir%\CDBurnerXP\"
Set $LicenseRequired$ = "false"
Set $LicensePool$     = "p_" + $ProductId$
Set $Inst_Prg32$      = "cdbxp_setup_" + $Version$ + ".exe"
Set $Inst_Prg64$      = "cdbxp_setup_" + $Version$ + "_x64.exe"
Set $Uninst_Prg$      = "unins000.exe"
Set $Inst_Cmd$        = '/VERYSILENT /LOADINF=%ScriptPath%\default.cfg'
Set $Uninst_Cmd$      = '/VERYSILENT /SUPPRESSMSGBOXES /NORESTART'
; ----------------------------------------------------------------

comment "Show product picture"
ShowBitmap "%ScriptPath%\" + $ProductId$ + ".jpg" $ProductId$

if not(HasMinimumSpace ("%SystemDrive%", $MinimumSpace$))
        LogError "Not enough space on %SystemDrive%, " + $MinimumSpace$ + " on drive %SystemDrive% needed for " + $ProductId$
        isFatalError
        ; Stop process and set installation status to failed
else

        if FileExists("$InstallDir32$$Uninst_Prg")
                comment "Start uninstall sub section"
                Sub "%ScriptPath%\delsub.ins"
        endif
        if FileExists("$InstallDir64$$Uninst_Prg")
                comment "Start uninstall sub section"
                Sub "%ScriptPath%\delsub.ins"
        endif

        if $LicenseRequired$ = "true"
                comment "Licensing required, reserve license and get license key"
                Sub_get_licensekey
        endif

        comment "Installiere "+$ProductID$+"..."

        if (($INST_SystemType$ = "x86 System") and ($INST_architecture$ = "system specific")) or ($INST_architecture$ = "both") or ($INST_architecture$ = "32 only")
                Message "Installiere " + $ProductId$+" (32 Bit)"
                comment "Start setup program"
                Winbatch_install_32
                Sub_check_exitcode
        endif

        if ($INST_SystemType$ = "64 Bit System") and (($INST_architecture$ = "system specific") or ($INST_architecture$ = "both") or ($INST_architecture$ = "64 only"))
                Message "Installiere " + $ProductId$+" (64 Bit)"
                comment "Start setup program"
                Winbatch_install_64
                Sub_check_exitcode
        endif

endif


[Winbatch_install_32]
%ScriptPath%\$Inst_Prg32$ $Inst_Cmd$

[Winbatch_install_64]
%ScriptPath%\$Inst_Prg64$ $Inst_Cmd$

[Sub_check_exitcode]
comment "Test for installation success via exit code"
set $ExitCode$ = getLastExitCode
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."
                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."
                        else
                                logError "Fatal: Setup program gives an unknown exitcode unequal zero: " + $ExitCode$
                                isFatalError
                        endif
                endif
        endif
endif
</code>

==== uninstall.ins ====
<code winst>
[Initial]
LogLevel=9
;  Log Errors in Logfile but don't abort:
ExitOnError=false
; Show syntax errors in the script:
ScriptErrorMessages=on
; Dont trace step by step through the script:
TraceMode=off
; let started programs run in front of the winst window
StayOnTop=false

[Actions]
requiredWinstVersion >= "4.10.8.6"

DefVar $UninstallProgram32$
DefVar $LogDir$
DefVar $ExitCode$
DefVar $ProductId$
DefVar $InstallDir32$
DefVar $InstallDir64$
DefVar $LicenseRequired$
DefVar $LicensePool$
DefVar $INST_SystemType$
DefVar $INST_architecture$
DefVar $Uninst_Cmd$
DefVar $Uninst_Prg$

Set $INST_SystemType$ = GetSystemType
set $INST_architecture$ = GetProductProperty("install_architecture","system specific")


Set $LogDir$ = "%SystemDrive%\tmp"

; ----------------------------------------------------------------
; - Please edit the following values                             -
; ----------------------------------------------------------------
Set $ProductId$         = "CDBurnerXP"
Set $InstallDir32$      = "%ProgramFiles32Dir%\CDBurnerXP\"
Set $InstallDir64$      = "%ProgramFiles64Dir%\CDBurnerXP\"
Set $LicenseRequired$   = "false"
Set $LicensePool$       = "p_" + $ProductId$
Set $Uninst_Prg$      = "unins000.exe"
Set $Uninst_Cmd$      = '/SILENT /SUPPRESSMSGBOXES /NORESTART'
; ----------------------------------------------------------------

comment "Show product picture"
ShowBitmap "%ScriptPath%\" + $ProductId$ + ".jpg" $ProductId$

Message "Deinstalliere " + $ProductId$ + ". Bitte etwas Geduld..."
comment "Start uninstall sub section"
Sub "%ScriptPath%\delsub.ins"

if $LicenseRequired$ = "true"
        comment "Licensing required, free license used"
        Sub_free_license
endif

</code>

==== delsub.ins ====
<code winst>
if (($INST_SystemType$ = "x86 System") and ($INST_architecture$ = "system specific")) or ($INST_architecture$ = "both") or ($INST_architecture$ = "32 only")
        Message "Uninstalling " + $ProductId$ + " 32 Bit..."
        Winbatch_uninstall_32
        comment "Removing "+$InstallDir32$
        Files_uninstall_32
        sub_check_exitcode
Mendif

if ($INST_SystemType$ = "64 Bit System") and (($INST_architecture$ = "system specific") or ($INST_architecture$ = "both") or ($INST_architecture$ = "64 only"))
        Message "Uninstalling " + $ProductId$ + " 64 Bit..."
        Winbatch_uninstall_64
        comment "Removing "+$InstallDir64$
        Files_uninstall_64
        sub_check_exitcode
endif


[Winbatch_uninstall_32]
"$InstallDir32$\$Uninst_Prg$" $Uninst_Cmd$

[Winbatch_uninstall_64]
"$InstallDir64$\$Uninst_Prg$" $Uninst_Cmd$

[Files_uninstall_32]
delete -sf "$InstallDir32$\"

[Files_uninstall_64]
delete -sf "$InstallDir64$\"

[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."
                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."
                        else
                                logError "Fatal: Setup program gives an unknown exitcode unequal zero: " + $ExitCode$
                                isFatalError
                        endif
                endif
        endif
endif
</code>

==== default.cfg ====

<code>
[Setup]
Lang=German
Dir=C:\Programme\CDBurnerXP
Group=CDBurnerXP
NoIcons=0
SetupType=custom
Components=main,nmsaccess,lang,lang\germany
Tasks=desktopicon,desktopicon\common,fileassoc,isoassoc
</code>