#!/usr/local/bin/expect -f
# install_sipp.tcl - Expect script to install sipp files 
# (excluding executable) on target
#
# Assumes terminfo file 'linux' has been downloaded to /var/tmp/ 
#
# usage: install_sipp.tcl targetName

set target  [lindex $argv 0]

spawn telnet $target
send "cd /var/tmp/\r"
expect "> "
send "mkdir -p /usr/share/terminfo/l\r"
expect "> "
send "cp -a linux /usr/share/terminfo/l\r"
expect "> "
send "chmod u+x sipp\r"
expect "> "