liminix/tests/wlan/wait-for-wlan.expect

21 lines
438 B
Text
Raw Normal View History

set timeout 60
2023-02-09 00:19:18 +01:00
spawn socat unix-connect:vm/console -
send "\r\n"
expect "#"
set FINISHED 0
set EXIT "1"
send "ls -l /run/uncaught-logs/current\r\n"
expect "#"
2023-12-10 19:35:14 +01:00
while { $FINISHED < 20 } {
send "date && grep AP-ENABLED /run/uncaught-logs/current || echo not\r\n"
expect {
"wlan0: AP-ENABLED" { set FINISHED 10; set EXIT 0; }
"not" { send_user "waiting ..." ; sleep 5 }
}
set FINISHED [ expr $FINISHED + 1 ]
}
exit $EXIT