1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
| #!/usr/bin/expect -f
set force_conservative 1 ;# set to 1 to force conservative mode even if
;# script wasn't run conservatively originally
if {$force_conservative} {
set send_slow {1 .1}
proc send {ignore arg} {
sleep .1
exp_send -s -- $arg
}
}
#set timeout 5
match_max 100000
#declaration de 4 parametres
set query_file [lindex $argv 0]
set passw "user"
set user "passwd"
set host "192.168.100.50"
proc check_size {passw query_file user host} {
send -- "ssh $user@$host \"wc -l $query_file\"\r"
expect {
"*password:*" {
send -- "$passw\r"
puts $expect_out(buffer)
}
}
}
exp_internal 1
log_user 1
spawn $env(SHELL)
check_size $passw $query_file $user $host |