Script to update default password on linux-academy servers to something useful

Makefile

update_server_password:
	./update_la_pwd.exp $LI_IP $PASSWORD

update_la_pwd.exp

#!/usr/bin/env expect -f

## Script to update default password on linux-academy servers to something useful
## References
### http://www.admin-magazine.com/Articles/Automating-with-Expect-Scripts
### https://www.pantz.org/software/expect/expect_examples_and_tips.html
### http://wiki.tcl.tk/11583

set send_human {.1 .3 1 .05 2}
set strace 4
set hostname [lindex $argv 0]
set password [lindex $argv 1]

if {[llength $argv] != 2} {
       send_user "Usage: scriptname \'hostname\' \'password\'\n"
       exit 1
   }

spawn ssh -t user@$hostname
expect {
    -re ".*Are you sure you want to continue.*" {
        send "yes\r"
    }
    default {
        send_user "Failed match on auth"
        exit 1
    }
}

expect {
    default {
        send -h "123456\r"
    }
}

expect -re ".*" {}
expect -re ".*" {}
expect -re ".*" {}
expect -re ".*" {}
expect -re ".*" {}
expect -re ".*" {}

expect {
    "(current) UNIX password:" {
        send "123456\r"
    }
}

expect {
    "New password:" {
        send "$password\r"
    }
}

expect {
    "Retype new password:" {
        send "$password\r"
    }
}

expect {
    "passwd: all authentication tokens updated successfully." {
        send_user "Updated password to be $password"
        exit 0
    }
    default {
        send_user "Failed. You messed up somewhere. Buh-bye!"
        exit 1
    }
}