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 |
