I haven't tried what you're trying to do before, but the syntax you're using mostly looks OK.
You haven't said what operating system you're using and that can make a difference for some versions of ssh. On most systems, the destination device has to follow the options, so there is a chance that it might work if you change:
Code:
# -re "Connection refused|Connection timed out" { spawn ssh -o StrictHostKeyChecking=no $dev -l $unam }
timeout { spawn ssh -o StrictHostKeyChecking=no $dev -l $unam
expect {
timeout { set err [ open "$hnam\_$dev.err" w ] ;
puts $err "SSH timed out for $dev.\n";
log_file ;
exit; }
}
}
}
to:
Code:
-re "Connection refused|Connection timed out" {
spawn ssh -o StrictHostKeyChecking=no -l $unam $dev
expect {
timeout {
set err [ open "$hnam\_$dev.err" w ] ;
puts $err "SSH timed out for $dev.\n";
log_file ;
exit;
}
}
}
timeout { spawn ssh -o StrictHostKeyChecking=no -l $unam $dev
expect {
timeout { set err [ open "$hnam\_$dev.err" w ] ;
puts $err "SSH timed out for $dev.\n";
log_file ;
exit; }
}
}
}
Obviously, this is totally untested. I would suggest that you turn on tcl's debugging output by including the -d option when you start it.
This User Gave Thanks to Don Cragun For This Post:
hai all,
i have an tcl script in which i have been reading the DUT Command prompt of an cisco switch as
DUT Command Prompt : cisco*
and running the test case of stp now the problem is if i have given any blank space in between the cisco or at the startup then the Expect is not identifying the... (0 Replies)
Does anyone know of an expect/tcl forum that is as helpful as this one is for shell scripting?
Or if anyone has any expect knowledge, can you please provide some guidance on how to write to a local error log based on output from a ssh session?
I have something like this:
foreach host... (2 Replies)
In the following "for" loop I assume the the script will expect "anyway", "first" NOT in any paticular order and send "yes" when there found, breaking out of the loop when "$prompt" is found. The way it is working is like 3 individual expect lines, and they MUST be in cronological order. ANY help... (0 Replies)
Can someone identify what is the problem here?.
no children
while executing
"exp_wait -nowait -i -1"
(procedure "logOptions" line 45)
invoked from within
"logOptions"
(procedure "doExecute" line 98)
invoked from within
"doExecute"
(procedure "main" line 32)
... (7 Replies)
Somewhat long story:
I have a simple Perl CGI script that uses Expect to Telnet to a device and grab some data, and then spits it back to Perl for display on the Webpage.
This works for many devices I've tried, but one device just fails, it keeps rejecting the password on this device, only... (1 Reply)
So here is what I am trying to do. I have a large # of switches and routers I am trying to log into. Unfortunately some have ssh only, some have telnet only. and some i have never logged into with ssh. I first want it to SSH, if i have never logged into the box it will ask for adding the ssh key. I... (0 Replies)
hi, I am new in Expect.
I have a question about expect timeout.
suppose I have a structure of
expect { ".."{
send"............"}
timeout{
...............
}
}
The silly question is if I reach timeout, how can I store the error message showing on the screen to... (2 Replies)
Hi gurus, I am trying to do some expect/TCL magic. My goal is to write some kind of password guessing script (nearly similar to dictionary attack against ssh). I read that this could be possible with expect/TCL, I am newbie in this language, its function and its terms so please be patient ;)
... (3 Replies)
The below error message I started seeing using Ubuntu 14.04 and was wondering if the forum has seen it because I cant seem much on the net for this:
perl -e 'use IO::Socket::SSL qw(debug3);IO::Socket::SSL->new(PeerAddr=>"10.0.0.100",PeerPort=> 443,Proto=>"TCP") or die $!'
DEBUG:... (1 Reply)
Discussion started by: metallica1973
1 Replies
10. Forum Support Area for Unregistered Users & Account Problems
Neo
Thanks for your reply to my original post, entitled "Problem changing the email address associated with my unix.com account".
I am unable to reply to you in that thread, as I am unable to log-on to unix.com!
From what you said about purging dormant accounts, it is likely that my account... (1 Reply)
Discussion started by: irb
1 Replies
LEARN ABOUT DEBIAN
rxtelnet
RXTELNET(1) BSD General Commands Manual RXTELNET(1)NAME
rxtelnet -- start a telnet and forward X-connections.
SYNOPSIS
rxtelnet [-l username] [-k] [-t telnet_args] [-x xterm_args] [-K kx_args] [-w term_emulator] [-b telnet_program] [-n] [-v] host [port]
DESCRIPTION
The rxtelnet program starts an xterm window with a telnet to host host. From this window you will also be able to run X clients that will be
able to connect securely to your X server. If port is given, that port will be used instead of the default.
If setting up the X forwarding failes, rxtelnet will still telnet in to the remote host, but without X forwarding.
The supported options are:
-l Log in on the remote host as user username.
-k Disables keep-alives.
-t Send telnet_args as arguments to telnet.
-x Send xterm_args as arguments to xterm.
-X Send kx_args as arguments to kx.
-w Use term_emulator instead of xterm.
-b Use telnet_program instead of telnet.
-n Do not start any terminal emulator.
-v Be verbose.
EXAMPLE
To login from host foo (where your display is) to host bar, you might do the following.
1. On foo: rxtelnet bar
2. You will get a new window with a telnet to bar. In this window you will be able to start X clients.
SEE ALSO kx(1), rxterm(1), telnet(1), tenletxr(1), kxd(8)KTH_KRB March 7, 2004 KTH_KRB