userspace:tortoise-svn
Differences
This shows you the differences between two versions of the page.
| Next revision | Previous revision | ||
| userspace:tortoise-svn [2012/10/04 12:26] – created bhubal | userspace:tortoise-svn [2021/08/23 10:37] (current) – external edit 127.0.0.1 | ||
|---|---|---|---|
| Line 4: | Line 4: | ||
| Comments and improvements welcome \\ | Comments and improvements welcome \\ | ||
| - | id: tortoise-svn | + | id: tortoise-svn\\ |
| - | name: TortoiseSVN | + | name: TortoiseSVN\\ |
| - | description: | + | description: |
| - | advice: | + | version: 1.7.9\\ |
| - | version: 1.7.9 | + | Full package: |
| - | Full package: | + | |
| + | ==== setup.ins ==== | ||
| + | <code winst> | ||
| + | ; Copyright (c) uib gmbh (www.uib.de) | ||
| + | ; This sourcecode is owned by uib | ||
| + | ; and published under the Terms of the General Public License. | ||
| + | ; credits: http:// | ||
| + | [Actions] | ||
| + | requiredWinstVersion >= " | ||
| + | |||
| + | 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 $installer32$ | ||
| + | DefVar $installer64$ | ||
| + | DefVar $MsiId$ | ||
| + | |||
| + | DefStringlist $MsiIdList$ | ||
| + | DefStringlist $MsiIdRegList$ | ||
| + | |||
| + | Set $INST_SystemType$ = GetSystemType | ||
| + | set $INST_architecture$ = GetProductProperty(" | ||
| + | |||
| + | |||
| + | Set $LogDir$ = " | ||
| + | |||
| + | ; ---------------------------------------------------------------- | ||
| + | ; - Please edit the following values - | ||
| + | ; ---------------------------------------------------------------- | ||
| + | Set $ProductId$ | ||
| + | Set $MinimumSpace$ | ||
| + | ; the path were we find the product after the installation | ||
| + | Set $InstallDir32$ | ||
| + | Set $InstallDir64$ | ||
| + | set $installer32$ = " | ||
| + | set $installer64$ = " | ||
| + | ; ---------------------------------------------------------------- | ||
| + | |||
| + | if not(HasMinimumSpace (" | ||
| + | LogError "Not enough space on %SystemDrive%, | ||
| + | isFatalError "no space" | ||
| + | ; Stop process and set installation status to failed | ||
| + | else | ||
| + | comment "Show product picture" | ||
| + | ShowBitmap " | ||
| + | |||
| + | if FileExists(" | ||
| + | comment "Start uninstall sub section" | ||
| + | Sub " | ||
| + | endif | ||
| + | |||
| + | comment " | ||
| + | |||
| + | if (($INST_SystemType$ = "x86 System" | ||
| + | Message " | ||
| + | comment "Start setup program" | ||
| + | Winbatch_install_32 | ||
| + | Sub_check_exitcode | ||
| + | endif | ||
| + | |||
| + | if ($INST_SystemType$ = "64 Bit System" | ||
| + | Message " | ||
| + | comment "Start setup program" | ||
| + | Winbatch_install_64 | ||
| + | Sub_check_exitcode | ||
| + | endif | ||
| + | |||
| + | endif | ||
| + | |||
| + | [Winbatch_install_32] | ||
| + | ; === MSI package ======================================================================================= | ||
| + | msiexec /i " | ||
| + | |||
| + | [Winbatch_install_64] | ||
| + | ; === MSI package ======================================================================================= | ||
| + | msiexec /i " | ||
| + | |||
| + | [Winbatch_uninstall_msi] | ||
| + | msiexec /x $MsiId$ /qb! REBOOT=ReallySuppress | ||
| + | |||
| + | [ExecWith_autoit_close_window] | ||
| + | ; exact title match | ||
| + | ; | ||
| + | $mylog = FileOpen(" | ||
| + | FileWriteLine($mylog," | ||
| + | ; do not use winwait(), it will fail on other desktops than current | ||
| + | $seconds = 0 | ||
| + | $exists = 0 | ||
| + | While ($seconds <= 300) and ($exists = 0) | ||
| + | $exists = WinExists(" | ||
| + | FileWriteLine($mylog," | ||
| + | $seconds = $seconds + 1 | ||
| + | sleep(1000) | ||
| + | WEnd | ||
| + | FileWriteLine($mylog," | ||
| + | ; next | ||
| + | $result = ControlClick(" | ||
| + | FileWriteLine($mylog," | ||
| + | Blockinput(0) | ||
| + | FileClose($mylog) | ||
| + | ;Sleep(500) | ||
| + | ;and good bye | ||
| + | Exit @error | ||
| + | |||
| + | [Sub_check_exitcode] | ||
| + | comment "Test for installation success via exit code" | ||
| + | set $ExitCode$ = getLastExitCode | ||
| + | ; informations to exit codes see | ||
| + | ; http:// | ||
| + | ; http:// | ||
| + | if ($ExitCode$ = " | ||
| + | comment "Looks good: setup program gives exitcode zero" | ||
| + | else | ||
| + | comment "Setup program gives a exitcode unequal zero: " + $ExitCode$ | ||
| + | if ($ExitCode$ = " | ||
| + | comment " | ||
| + | comment " | ||
| + | else | ||
| + | if ($ExitCode$ = " | ||
| + | comment "looks good: setup program gives exitcode 1641" | ||
| + | comment " | ||
| + | else | ||
| + | if ($ExitCode$ = " | ||
| + | comment "looks good: setup program gives exitcode 3010" | ||
| + | comment " | ||
| + | else | ||
| + | logError " | ||
| + | isFatalError "Exit Code=" + $ExitCode$ | ||
| + | endif | ||
| + | endif | ||
| + | endif | ||
| + | endif | ||
| + | |||
| + | </ | ||
| + | |||
| + | ==== delsub.ins ==== | ||
| + | <code winst> | ||
| + | |||
| + | |||
| + | ; 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:// | ||
| + | |||
| + | comment " | ||
| + | set $MsiIdList$ = createStringList(' | ||
| + | set $MsiIdList$ = addtolist($MsiIdList$,' | ||
| + | set $MsiIdList$ = addtolist($MsiIdList$,' | ||
| + | set $MsiIdList$ = addtolist($MsiIdList$,' | ||
| + | |||
| + | comment " | ||
| + | set $MsiIdRegList$ = getRegistryKeyList32(" | ||
| + | set $MsiIdRegList$ = addListToList($MsiIdRegList$, | ||
| + | |||
| + | comment " | ||
| + | for %s% in $MsiIdList$ do sub_uninstall | ||
| + | |||
| + | [sub_uninstall] | ||
| + | if not ("" | ||
| + | comment "MSI id %s% found in registry, starting msiexec to uninstall" | ||
| + | if not ("" | ||
| + | comment " | ||
| + | Exitwindows /Reboot | ||
| + | endif | ||
| + | set $MsiId$ = " | ||
| + | ExecWith_autoit_close_window " | ||
| + | Winbatch_uninstall_msi | ||
| + | killtask " | ||
| + | sub_check_exitcode | ||
| + | includelog $LogDir$+" | ||
| + | endif | ||
| + | |||
| + | [Winbatch_uninstall_msi] | ||
| + | msiexec /x $MsiId$ /qb! REBOOT=ReallySuppress | ||
| + | |||
| + | [ExecWith_autoit_close_window] | ||
| + | ; exact title match | ||
| + | ; | ||
| + | $mylog = FileOpen(" | ||
| + | FileWriteLine($mylog," | ||
| + | ; do not use winwait(), it will fail on other desktops than current | ||
| + | $seconds = 0 | ||
| + | $exists = 0 | ||
| + | While ($seconds <= 300) and ($exists = 0) | ||
| + | $exists = WinExists(" | ||
| + | FileWriteLine($mylog," | ||
| + | $seconds = $seconds + 1 | ||
| + | sleep(1000) | ||
| + | WEnd | ||
| + | FileWriteLine($mylog," | ||
| + | ; next | ||
| + | $result = ControlClick(" | ||
| + | FileWriteLine($mylog," | ||
| + | Blockinput(0) | ||
| + | FileClose($mylog) | ||
| + | ;Sleep(500) | ||
| + | ;and good bye | ||
| + | Exit @error | ||
| + | |||
| + | [Sub_check_exitcode] | ||
| + | comment "Test for installation success via exit code" | ||
| + | set $ExitCode$ = getLastExitCode | ||
| + | ; informations to exit codes see | ||
| + | ; http:// | ||
| + | ; http:// | ||
| + | if ($ExitCode$ = " | ||
| + | comment "Looks good: setup program gives exitcode zero" | ||
| + | else | ||
| + | comment "Setup program gives a exitcode unequal zero: " + $ExitCode$ | ||
| + | if ($ExitCode$ = " | ||
| + | comment " | ||
| + | comment " | ||
| + | else | ||
| + | if ($ExitCode$ = " | ||
| + | comment "looks good: setup program gives exitcode 1641" | ||
| + | comment " | ||
| + | else | ||
| + | if ($ExitCode$ = " | ||
| + | comment "looks good: setup program gives exitcode 3010" | ||
| + | comment " | ||
| + | else | ||
| + | logError " | ||
| + | isFatalError "Exit Code=" + $ExitCode$ | ||
| + | endif | ||
| + | endif | ||
| + | endif | ||
| + | endif | ||
| + | |||
| + | </ | ||
| + | |||
| + | |||
| + | ==== uninstall.ins ==== | ||
| + | <code winst> | ||
| + | ; 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:// | ||
| + | |||
| + | [Actions] | ||
| + | requiredWinstVersion >= " | ||
| + | |||
| + | DefVar $LogDir$ | ||
| + | DefVar $ExitCode$ | ||
| + | DefVar $ProductId$ | ||
| + | DefVar $InstallDir32$ | ||
| + | DefVar $InstallDir64$ | ||
| + | DefVar $LicenseRequired$ | ||
| + | DefVar $LicensePool$ | ||
| + | DefVar $INST_SystemType$ | ||
| + | DefVar $INST_architecture$ | ||
| + | DefVar $MsiId$ | ||
| + | |||
| + | DefStringlist $MsiIdList$ | ||
| + | DefStringlist $MsiIdRegList$ | ||
| + | |||
| + | Set $INST_SystemType$ = GetSystemType | ||
| + | set $INST_architecture$ = GetProductProperty(" | ||
| + | |||
| + | |||
| + | Set $LogDir$ = " | ||
| + | |||
| + | ; ---------------------------------------------------------------- | ||
| + | ; - Please edit the following values | ||
| + | ; ---------------------------------------------------------------- | ||
| + | Set $ProductId$ | ||
| + | Set $InstallDir32$ | ||
| + | Set $InstallDir64$ | ||
| + | ; ---------------------------------------------------------------- | ||
| + | |||
| + | |||
| + | comment "Show product picture" | ||
| + | ShowBitmap " | ||
| + | |||
| + | Message " | ||
| + | |||
| + | if FileExists(" | ||
| + | comment "Start uninstall sub section" | ||
| + | Sub " | ||
| + | endif | ||
| + | |||
| + | [Winbatch_uninstall_msi] | ||
| + | msiexec /x $MsiId$ /qb! REBOOT=ReallySuppress | ||
| + | |||
| + | </ | ||
userspace/tortoise-svn.1349346391.txt.gz · Last modified: (external edit)
