genode/tool/run/powerplug.inc

10 lines
274 B
PHP
Raw Normal View History

2015-01-08 21:08:48 +00:00
proc power_plug_connect { server_ip user_name password } {
spawn telnet $server_ip 1234
set connection_id $spawn_id
expect -i $connection_id "KSHELL V1.*"
send -i $connection_id "login $user_name $password\n"
expect -i $connection_id "250 OK"
return $connection_id
}