Red Bear OS
1b3e94a20d
From release 0.1.0 pre-patched archive. This includes all Red Bear modifications previously maintained as patches in local/patches/relibc/.
18 lines
382 B
Plaintext
18 lines
382 B
Plaintext
#!/usr/bin/expect
|
|
|
|
set testgetpass [lindex $argv 0];
|
|
|
|
spawn $testgetpass
|
|
expect "Enter password: "
|
|
send -- "pass\r"
|
|
|
|
expect "Enter password: "
|
|
send -- "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa\r"
|
|
|
|
expect "Enter password: "
|
|
send -- "\r"
|
|
|
|
expect {
|
|
"incorrect password" { exit 123 }
|
|
eof
|
|
} |