2015-10-28 15:06:24 +01:00

35 lines
617 B
Plaintext

##
# Capture the output of a scenario executed via Qemu
#
source [genode_dir]/tool/run/log.inc
source [genode_dir]/tool/run/qemu.inc
proc run_log { wait_for_re timeout_value } {
global qemu_spawn_id
global output_spawn_id
set output_spawn_id $qemu_spawn_id
set kernel_msg [run_boot_string]
set timeout $timeout_value
expect {
-i $output_spawn_id $kernel_msg { }
eof {
puts stderr "Aborting, received EOF"
return false
}
timeout {
puts stderr "Boot process timed out"
close
return false
}
}
wait_for_output $wait_for_re $timeout_value $qemu_spawn_id
return true
}