liminix

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

getaddress.expect (477B)

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