ExternalVendorCode/genode
1
0
Fork 0
mirror of https://github.com/genodelabs/genode.git synced 2025-04-27 22:40:15 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

autopilot: add information log file

Browse Source 
The information log file contains a list of all log files that are
expected to exist after the autopilot has finished its execution.
By using the '-i' option the default filename of 'autopilot.log'
can be overriden.
This commit is contained in:
Josef Söntgen 2017-03-29 13:44:07 +02:00 committed by Christian Helmuth
parent adf39c4cc8
commit 2b7587ceca
1 changed files with 27 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
tool/autopilot
View File

@ -49,6 +49,7 @@ proc help { } {
[-k <kernel> ...] [-k <kernel> ...]
[-r <run-script> ...] [-r <run-script> ...]
[-d <test-dir>] [-j <make-jobs>] [-d <test-dir>] [-j <make-jobs>]
[-i <info-file-name>]
[--help] [--cleanup] [--force] [--keep] [--help] [--cleanup] [--force] [--keep]
[--stdout] [--skip-clean-rules] [--stdout] [--skip-clean-rules]
[--enable-ccache] [--enable-ccache]
@ -121,9 +122,16 @@ proc build_dir { platform } {
## ##
# Return name of log file for test of 'run_script' on 'platform' # Return name of log file for test of 'run_script' on 'platform'
# #
proc log_file_name { platform kernel run_script } {
return $platform.$kernel.$run_script.log
}
##
# Return path to log file for test of 'run_script' on 'platform'
#
proc log_file { platform kernel run_script } { proc log_file { platform kernel run_script } {
global test_dir global test_dir
return [file join $test_dir $platform.$kernel.$run_script.log] return [file join $test_dir [log_file_name $platform $kernel $run_script]]
} }
@ -329,6 +337,24 @@ foreach platform $platforms {
} }
#
# Create info file that contains all expected log files
#
set info_file "autopilot.log"
foreach_cmdline_arg i { global info_file; set info_file $i }
set info_fd [open [file join $test_dir $info_file] "WRONLY CREAT TRUNC"]
foreach platform $platforms {
foreach kernel $kernels {
foreach run_script $run_scripts {
puts $info_fd "[log_file_name $platform $kernel $run_script]"
}
}
}
close $info_fd
# #
# Revisit each platform's build directory and execute all test cases # Revisit each platform's build directory and execute all test cases
# #