reactos/ahk_tests
1
0
Fork 0
mirror of https://github.com/reactos/ahk_tests.git synced 2024-11-23 03:29:39 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

[AHK_VC++_Redistributable_2008_SP1_8.0]

Browse Source 
Improve uninstall process, reduce waiting time, remove hardcoded sleep calls.
The test works fine in win2k3 sp2.

svn path=/trunk/ahk_tests/; revision=1813
This commit is contained in:
Edijs Kolesnikovičs 2012-10-08 15:06:45 +00:00
parent 1433973fcc
commit 5e2f1a2802
1 changed files with 29 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

51
Visual C++ Redistributable/2008 SP1 8.0/install_test.ahk
View File

@ -27,17 +27,16 @@ IfNotExist, %ModuleExe%
TestsFailed("'" ModuleExe "' not found.") TestsFailed("'" ModuleExe "' not found.")
else else
{ {
IfExist, %MainAppFile% UninstallerPath = %A_WinDir%\System32\MsiExec.exe /qn /norestart /X{9A25302D-30C0-39D9-BD6F-21E6EC160475}
WaitUninstallDone(UninstallerPath, 3)
if bContinue
{ {
RunWait, MsiExec.exe /qn /norestart /X{9A25302D-30C0-39D9-BD6F-21E6EC160475} ; Silently uninstall it IfNotExist, %MainAppFile% ; Uninstaller might fail
Sleep, 7000 bContinue := true
else
TestsFailed("Uninstaller failed to get rid of '" MainAppFile "'.")
} }
IfNotExist, %MainAppFile% ; Uninstaller might fail
bContinue := true
else
TestsFailed("Uninstaller failed to get rid of '" MainAppFile "'.")
if bContinue if bContinue
{ {
RegDelete, HKEY_LOCAL_MACHINE, SOFTWARE\MicroSoft\Windows\CurrentVersion\Uninstall\{9A25302D-30C0-39D9-BD6F-21E6EC160475} RegDelete, HKEY_LOCAL_MACHINE, SOFTWARE\MicroSoft\Windows\CurrentVersion\Uninstall\{9A25302D-30C0-39D9-BD6F-21E6EC160475}
@ -51,16 +50,17 @@ else
TestsTotal++ TestsTotal++
if bContinue if bContinue
{ {
WinWaitActive, Microsoft Visual C++ 2008 Redistributable Setup, This wizard, 15 WinWaitActive, Microsoft Visual C++ 2008 Redistributable Setup, This wizard, 7
if ErrorLevel if ErrorLevel
TestsFailed("'Microsoft Visual C++ 2008 Redistributable Setup (This wizard)' window failed to appear.") TestsFailed("'Microsoft Visual C++ 2008 Redistributable Setup (This wizard)' window failed to appear.")
else else
{ {
Sleep, 700
; Alt+N here is as good as ControlClick (no way to know for 100% if it failed or not until 'Setup (Setup is configuring)' window appears).
SendInput, !n ; Hit 'Next' button SendInput, !n ; Hit 'Next' button
; WinWaitClose does not work for this install (win2k3 sp2) WinWaitClose, Microsoft Visual C++ 2008 Redistributable Setup, This wizard, 3
TestsOK("'Microsoft Visual C++ 2008 Redistributable Setup (This wizard)' window appeared and 'Alt+N' was sent.") if ErrorLevel
TestsFailed("'Microsoft Visual C++ 2008 Redistributable Setup (This wizard)' window failed to close despite Alt+N was sent.")
else
TestsOK("'Microsoft Visual C++ 2008 Redistributable Setup (This wizard)' window appeared and 'Alt+N' was sent.")
} }
} }
@ -69,14 +69,12 @@ if bContinue
TestsTotal++ TestsTotal++
if bContinue if bContinue
{ {
WinWaitActive, Microsoft Visual C++ 2008 Redistributable Setup, License Terms, 7 WinWaitActive, Microsoft Visual C++ 2008 Redistributable Setup, License Terms, 3
if ErrorLevel if ErrorLevel
TestsFailed("'Microsoft Visual C++ 2008 Redistributable Setup (License Terms)' window failed to appear.") TestsFailed("'Microsoft Visual C++ 2008 Redistributable Setup (License Terms)' window failed to appear.")
else else
{ {
Sleep, 700
SendInput, !a ; Hit 'I have read and accept the license terms' checkbox SendInput, !a ; Hit 'I have read and accept the license terms' checkbox
Sleep, 1200
SendInput, !i ; Hit 'Install' button SendInput, !i ; Hit 'Install' button
TestsOK("'Microsoft Visual C++ 2008 Redistributable Setup (License Terms)' window appeared, 'Alt+A' and 'Alt+I' was sent.") TestsOK("'Microsoft Visual C++ 2008 Redistributable Setup (License Terms)' window appeared, 'Alt+A' and 'Alt+I' was sent.")
} }
@ -87,13 +85,12 @@ if bContinue
TestsTotal++ TestsTotal++
if bContinue if bContinue
{ {
; Until this window shows up, we have no idea if we really succeeded WinWaitActive, Setup, Setup is configuring, 7
WinWaitActive, Setup, Setup is configuring, 10
if ErrorLevel if ErrorLevel
TestsFailed("'Setup (Setup is configuring)' window failed to appear.") TestsFailed("'Setup (Setup is configuring)' window failed to appear.")
else else
{ {
WinWaitClose, Setup,Setup is configuring, 20 WinWaitClose, Setup,Setup is configuring, 10
if ErrorLevel if ErrorLevel
TestsFailed("'Setup (Setup is configuring)' window failed to close.") TestsFailed("'Setup (Setup is configuring)' window failed to close.")
else else
@ -111,7 +108,6 @@ if bContinue
TestsFailed("'Microsoft Visual C++ 2008 Redistributable Setup (Setup Complete)' window failed to appear.") TestsFailed("'Microsoft Visual C++ 2008 Redistributable Setup (Setup Complete)' window failed to appear.")
else else
{ {
Sleep, 1500
SearchImg = %A_WorkingDir%\Media\Finish_Button.jpg SearchImg = %A_WorkingDir%\Media\Finish_Button.jpg
IfNotExist, %SearchImg% IfNotExist, %SearchImg%
TestsFailed("Can NOT find '" SearchImg "'.") TestsFailed("Can NOT find '" SearchImg "'.")
@ -125,7 +121,7 @@ if bContinue
else else
{ {
SendInput, !f ; Hit 'Finish' button SendInput, !f ; Hit 'Finish' button
WinWaitClose, Microsoft Visual C++ 2008 Redistributable Setup, Setup Complete, 7 WinWaitClose, Microsoft Visual C++ 2008 Redistributable Setup, Setup Complete, 3
if ErrorLevel if ErrorLevel
TestsFailed("'Microsoft Visual C++ 2008 Redistributable Setup (Setup Complete)' window failed to close despite 'Alt+F' was sent.") TestsFailed("'Microsoft Visual C++ 2008 Redistributable Setup (Setup Complete)' window failed to close despite 'Alt+F' was sent.")
else else
@ -140,7 +136,18 @@ if bContinue
TestsTotal++ TestsTotal++
if bContinue if bContinue
{ {
Sleep, 7000 iTimeOut := 7
while iTimeOut > 0
{
IfExist, %MainAppFile%
break
else
{
iTimeOut--
Sleep, 1000
}
}
IfNotExist, %MainAppFile% IfNotExist, %MainAppFile%
TestsFailed("Something went wrong, can't find '" MainAppFile "'.") TestsFailed("Something went wrong, can't find '" MainAppFile "'.")
else else