+Mon May 6 08:05:33 1996 Ezra Peisach <epeisach@kangaroo.mit.edu>
+
+ * rsh.exp: Setup a wrapper script in executing klist in the remote
+ shell so that environment variables are properly set.
+
+ * kadmin.exp: (kpasswd_cpw): After giving new password, wait for
+ the newline or we hang waiting for the process to finish.
+
Fri May 3 21:44:24 1996 Ken Raeburn <raeburn@cygnus.com>
Fri Mar 29 15:05:30 1996 Chris Provenzano <proven@cygnus.com>
expect "Enter old password for $princ:" { send "$opw\r" }
expect "Enter new password:" { send "$npw\r" }
expect "Re-enter new password:" { send "$npw\r" }
+ expect "\r"
+
if ![check_exit_status "kpasswd"] {
fail "kpasswd $princ $npw"
return 0
global hostname
global env
global spawn_id
+ global tmppwd
# Start up the kerberos and kadmind daemons and get a srvtab and a
# ticket file.
set failed no
start_rsh_daemon -k
set testname "rsh forwarding tickets"
- spawn $RSH $hostname -f -k $REALMNAME -D 3544 -A $BINSH -c $KLIST
+
+ # We need a wrapper for klist in order to setup for shared library
+ # runtime environment
+ setup_wrapper $tmppwd/klist.wrap $KLIST
+
+ spawn $RSH $hostname -f -k $REALMNAME -D 3544 -A $BINSH -c $tmppwd/klist.wrap
expect {
"Ticket cache:" { }
"klist: No credentials cache file found" {
set failed no
start_rsh_daemon -e
set testname "encrypted rsh forwarding tickets"
- spawn $RSH $hostname -x -f -k $REALMNAME -D 3544 -A $BINSH -c $KLIST
+ spawn $RSH $hostname -x -f -k $REALMNAME -D 3544 -A $BINSH -c $tmppwd/klist.wrap
expect {
"Ticket cache:" { }
"klist: No credentials cache file found" {