mirror of
https://github.com/genodelabs/genode.git
synced 2024-12-24 15:56:41 +00:00
parent
8a393183e9
commit
5d04f88816
@ -148,7 +148,17 @@ append qemu_args " -net user -redir tcp:5555::80 "
|
|||||||
|
|
||||||
run_genode_until {.*Start the server loop \.\.\..*} 30
|
run_genode_until {.*Start the server loop \.\.\..*} 30
|
||||||
|
|
||||||
set uri "http://localhost:5555/"
|
if [is_amt_available] {
|
||||||
|
set match_string "got IP address"
|
||||||
|
grep_output $match_string
|
||||||
|
unify_output {[\r\n\t]+} ""
|
||||||
|
unify_output {[\033]\[0m} ""
|
||||||
|
set pos [string first $match_string $output]
|
||||||
|
set ip_addr [string replace $output 0 [expr $pos+14]]
|
||||||
|
set uri "http://$ip_addr:80/"
|
||||||
|
} else {
|
||||||
|
set uri "http://localhost:5555/"
|
||||||
|
}
|
||||||
|
|
||||||
puts "http server is up, try to query website $uri"
|
puts "http server is up, try to query website $uri"
|
||||||
|
|
||||||
@ -161,6 +171,6 @@ if {![regexp {Welcome to our lwIP HTTP server!} $website dummy]} {
|
|||||||
exit 2;
|
exit 2;
|
||||||
}
|
}
|
||||||
|
|
||||||
puts "test succeeded"
|
puts "Test succeeded"
|
||||||
|
|
||||||
# vi: set ft=tcl :
|
# vi: set ft=tcl :
|
||||||
|
Loading…
Reference in New Issue
Block a user