expect4j

Class ExpectEmulation

java.lang.Object

tcl.lang.Extension

expect4j.ExpectEmulation

public class ExpectEmulation
extends tcl.lang.Extension

Register commands to support the Expect API Commands: exp_continue exp_internal 0; expect log_user 0; send " "; send -- "$command\r"; sleep spawn stty -echo; stty echo; timestamp Variables: expect_out(1,string) through expect_out(5,string) expect_out(buffer) spawn_id

Nested Class Summary

Nested Classes

Modifier and Type	Class and Description
class	ExpectEmulation.ExpContinueCommand exp_continue TODO Make calling Closure check for continue var
class	ExpectEmulation.ExpectCommand expect [[-opts] pat1 body1] ...
class	ExpectEmulation.ExpInternalCommand exp_internal [-f file] [-info] [0|1] TODO find out how isExpDebug would be called
class	ExpectEmulation.IntegerAssocData
class	ExpectEmulation.LogUserCommand log_user [0|1] TODO find out how isLogUser would be called
class	ExpectEmulation.MapAssocData
class	ExpectEmulation.SendCommand Send
class	ExpectEmulation.SleepCommand sleep seconds
class	ExpectEmulation.SpawnCommand spawn [args] program [args] Called with possible local paths, like C:\Windows\ssh.exe.
class	ExpectEmulation.SttyCommand stty [-echo|echo] Only called in ask, which shouldn't be called in automated script mode
class	ExpectEmulation.TimestampCommand timestamp [-seconds NNN] [-gmt] [-format format] TODO support formattings

Field Summary

Fields

Modifier and Type	Field and Description
private static Logger	logger Interface to the Java 2 platform's core logging facilities.

Constructor Summary

Constructors

Constructor and Description
ExpectEmulation()

Method Summary

Modifier and Type	Method and Description
static String	escape(String value)
static Expect4j	expStateCurrent(tcl.lang.Interp interp)
void	init(tcl.lang.Interp interp)
static boolean	isEcho(tcl.lang.Interp interp)
static boolean	isExpContinue(tcl.lang.Interp interp)
static boolean	isExpDebug(tcl.lang.Interp interp)
static boolean	isLogUser(tcl.lang.Interp interp)
static boolean	isVar(tcl.lang.Interp interp, String varname)
static void	setBooleanVar(tcl.lang.Interp interp, String varname, boolean value)
static void	setEcho(tcl.lang.Interp interp, boolean setEcho)
static void	setExpContinue(tcl.lang.Interp interp, boolean setExpContinue)
static void	setExpDebug(tcl.lang.Interp interp, boolean setExpDebug)
static void	setLogUser(tcl.lang.Interp interp, boolean setLogUser)

Methods inherited from class tcl.lang.Extension

loadOnDemand, safeInit

Methods inherited from class java.lang.Object

clone, equals, finalize, getClass, hashCode, notify, notifyAll, toString, wait, wait, wait

Field Detail

logger

private static final Logger logger

Interface to the Java 2 platform's core logging facilities.

Constructor Detail

ExpectEmulation

public ExpectEmulation()

Method Detail

init

public void init(tcl.lang.Interp interp)

Specified by:

init in class tcl.lang.Extension

expStateCurrent

public static Expect4j expStateCurrent(tcl.lang.Interp interp)
                                throws tcl.lang.TclException

Throws:

tcl.lang.TclException

isVar

public static boolean isVar(tcl.lang.Interp interp,
                            String varname)
                     throws tcl.lang.TclException

Throws:

tcl.lang.TclException

setBooleanVar

public static void setBooleanVar(tcl.lang.Interp interp,
                                 String varname,
                                 boolean value)
                          throws tcl.lang.TclException

Throws:

tcl.lang.TclException

isEcho

public static boolean isEcho(tcl.lang.Interp interp)
                      throws tcl.lang.TclException

Throws:

tcl.lang.TclException

setEcho

public static void setEcho(tcl.lang.Interp interp,
                           boolean setEcho)
                    throws tcl.lang.TclException

Throws:

tcl.lang.TclException

isLogUser

public static boolean isLogUser(tcl.lang.Interp interp)
                         throws tcl.lang.TclException

Throws:

tcl.lang.TclException

setLogUser

public static void setLogUser(tcl.lang.Interp interp,
                              boolean setLogUser)
                       throws tcl.lang.TclException

Throws:

tcl.lang.TclException

isExpDebug

public static boolean isExpDebug(tcl.lang.Interp interp)
                          throws tcl.lang.TclException

Throws:

tcl.lang.TclException

setExpDebug

public static void setExpDebug(tcl.lang.Interp interp,
                               boolean setExpDebug)
                        throws tcl.lang.TclException

Throws:

tcl.lang.TclException

isExpContinue

public static boolean isExpContinue(tcl.lang.Interp interp)
                             throws tcl.lang.TclException

Throws:

tcl.lang.TclException

setExpContinue

public static void setExpContinue(tcl.lang.Interp interp,
                                  boolean setExpContinue)
                           throws tcl.lang.TclException

Throws:

tcl.lang.TclException

escape

public static String escape(String value)