Expect脚本帮助 - 从发送命令捕获数据

Question

我写了一个脚本，如果有足够的可用空间，如果没有足够的可用空间，则将IOS文件发送到我的cisco设备，直到有文件为止。除非IOS碰巧在一个目录中，否则这一切都可以正常工作。

伪代码：

send directory command 
parse output and put it in format 
flash:c3560-ipservicesk9-mz.150-2.SE7.bin 
flash:/testfolder/c3560-ipservicesk9-mz.120-2.SE7.bin 

实际代码：

set index 0 
send "dir /recursive \n" 
expect { 
     #this is the new code 
     -nocase -re "directory of (\[^\r\]+)" { 
       set test $expect_out(1,string) 
       exp_continue 
     } 
     #old code that just grabbed all ios, working 
     -nocase -re "(\[^\[:space:\]\]+.bin)" { 
       append test ":$expect_out(1,string)" 
       set ioses($index) $test 
       set index [expr $index + 1] 
       exp_continue 
     } 
     #final case which escapes the exp_continue, and sets the free space 
     -nocase -re "\\((.*) bytes free" {set free $expect_out(1,string)} 
} 

这里是 “送DIR /递归”

Directory of flash:/* 

2 -rwx 17620224 Apr 20 2015 00:49:13 +00:00 c3560-ipservicesk9-mz.150-2.SE7.bin 
3 -rwx  2236 Mar 1 1993 00:01:02 +00:00 vlan.dat 
4 -rwx  4560 Apr 22 2015 14:30:05 +00:00 private-config.text 
7 -rwx  32329 Apr 17 2015 23:09:06 +00:00 backup_config 
6 -rwx  3096 Apr 22 2015 14:30:05 +00:00 multiple-fs 
8 -rwx  32344 Apr 22 2015 14:30:04 +00:00 config.text 

Directory of flash:/testfolder 

    9 -rwx  2236 Apr 23 2015 02:01:08 +00:00 c3560-ipservicesk9-mz.120-2.SE7.bin 

27998208 bytes total (10151936 bytes free) 

当我打印出来的输出的例子我数组，我只有一个值flash：/testfolder/c3560-ipservicesk9-mz.120-2.SE7.bin“

我的算法显然是错的，怎么去解析这个数据呢？

编辑 -

这是我最终的代码，虽然DINESH的代码工作以及

expect { 
     -nocase -re "directory of.+#" { 
       set input $expect_out(buffer) 
       set filesystem $input 
       set data [split $filesystem "\r"] 
       foreach dat $data { 
         if { [regexp -nocase {directory of} $dat] } { 
           regexp -nocase {directory of (.+)} $dat -> fs 
           regsub -all {/\*} $fs "" fs 
         } 
         if { [regexp -nocase {bin} $dat] } { 
           regexp -nocase { ([^[:space:]]+bin)} $dat -> f 
           if { [regexp {/} $fs] } { 
             lappend ioses $fs/$f 
           } else { 
             lappend ioses $fs$f 
           } 
         } 
         if { [regexp -nocase {bytes free} $dat] } { 
           regexp -nocase {\((.*) bytes free} $dat -> free 
         } 
       } 
     } 
} 

Answer 1

既然你要匹配多个项目，这是更好地匹配所有内容，直到你得到命令dir /recursive的整个输出。

send "dir /recursive\r" 
expect -re "(.*)<till your prompt>" 

这里您提示可以$或>或#。一个一般性的方法可以像

set prompt "#|>|\\\$"; # Backslashes to match literal dollar sign 

一旦你从expect_out阵列的全部内容，应用regexp并获得满意的结果。

我只是假设输入变量具有整个内容。为了证明这一点，我将它分配给一个变量。

set input " 
Directory of flash:/* 

2 -rwx 17620224 Apr 20 2015 00:49:13 +00:00 c3560-ipservicesk9-mz.150-2.SE7.bin 
3 -rwx  2236 Mar 1 1993 00:01:02 +00:00 vlan.dat 
4 -rwx  4560 Apr 22 2015 14:30:05 +00:00 private-config.text 
7 -rwx  32329 Apr 17 2015 23:09:06 +00:00 backup_config 
6 -rwx  3096 Apr 22 2015 14:30:05 +00:00 multiple-fs 
8 -rwx  32344 Apr 22 2015 14:30:04 +00:00 config.text 

Directory of flash:/testfolder 

    9 -rwx  2236 Apr 23 2015 02:01:08 +00:00 c3560-ipservicesk9-mz.120-2.SE7.bin 

27998208 bytes total (10151936 bytes free) 

" 

# -all => To match all occurrence of the pattern in the given input 
# -line => To enable newline-sensitive matching. By default, newline is a 
# completely ordinary character with no special meaning. 
# -inline => To get the matched words as a list 
set dirnames [regexp -line -all -nocase -inline {directory of\s(\S+).*} $input] 
#puts $dirnames 
set filenames [regexp -line -all -inline {\S+\.bin} $input] 
#puts $filenames 
regexp {(\d+) bytes free} $input ignore freespace 

foreach {ignore actualdir} $dirnames filename $filenames { 
    //Checking if it contains '/*' or not. 
    if {[regsub {/\*} $actualdir {} actualdir]} { 
     lappend result $actualdir:$filename 
    } else { 
     lappend result "$actualdir/$filename" 
    } 
} 
foreach elem $result { 
    puts $elem 
} 
puts "Free space : $freespace" 

输出：

flash:c3560-ipservicesk9-mz.150-2.SE7.bin 
flash:/testfolder/c3560-ipservicesk9-mz.120-2.SE7.bin 
Free space : 10151936