liminix

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README | LICENSE

getaddress.expect (440B)

      1 set timeout 60
      2 
      3 spawn socat unix-connect:vm/console -
      4 send "\r\n"
      5 expect "#"
      6 set FINISHED 0
      7 set EXIT "1" 
      8 while { $FINISHED < 10 } {
      9   send "ip address show dev ppp0 | grep ppp0\r\n"
     10   expect {
     11     "192.168.100.1" { set FINISHED 20; set EXIT 0; }
     12     "can't find device" { send_user "waiting ..." ; send "\r\n"; sleep 3 }
     13     "DOWN" { send_user "waiting ..." ; send "\r\n"; sleep 3 }
     14   }
     15   set FINISHED [ expr $FINISHED + 1 ]
     16 }
     17 
     18 exit $EXIT