+Mon May 6 11:44:18 1996 Ezra Peisach <epeisach@kangaroo.mit.edu>
+
+ * telnet.exp: Use a wrapper script for login.krb5 to setup shared
+ libraries properly.
+
Fri Mar 29 01:34:47 1996 Marc Horowitz <marc@mit.edu>
* telnet.exp (start_telnet_daemon) use sh -c around telnetd
set LOGINKRB5 [findfile $objdir/../../appl/bsd/login.krb5]
}
+# Remove old wrapper script
+ catch "exec rm -f $tmppwd/login.wrap"
+
# Start up a root shell.
if ![setup_root_shell telnet] {
return
global rlogin_spawn_id
global telnetd_pid
+ # Setup the shared library wrapper for login.krb5
+ if ![file exists $tmppwd/login.wrap] {
+ setup_wrapper $tmppwd/login.wrap "$LOGINKRB5 $*"
+ }
+
# The -debug argument tells it to accept a single connection, so
# we don't need to use inetd. The 3023 is the port to listen at.
# Note that tmppwd here is a shell variable, which is set in
# setup_root_shell, not a TCL variable.
- send -i $rlogin_spawn_id "sh -c \"$TELNETD -debug -t \$tmppwd/srvtab -R $REALMNAME -L \\\r$LOGINKRB5 -X KERBEROS_V4 3023\" &\r"
+ send -i $rlogin_spawn_id "sh -c \"$TELNETD -debug -t \$tmppwd/srvtab -R $REALMNAME -L $tmppwd/login.wrap -X KERBEROS_V4 3023\" &\r"
expect {
-i $rlogin_spawn_id
-re "$ROOT_PROMPT" { }