Mailing-List:	contact cygwin-help AT sourceware DOT cygnus DOT com; run by ezmlm
List-Unsubscribe:	<mailto:cygwin-unsubscribe-archive-cygwin=delorie DOT com AT sourceware DOT cygnus DOT com>
List-Subscribe:	<mailto:cygwin-subscribe AT sourceware DOT cygnus DOT com>
List-Archive:	<http://sourceware.cygnus.com/ml/cygwin/>
List-Post:	<mailto:cygwin AT sourceware DOT cygnus DOT com>
List-Help:	<mailto:cygwin-help AT sourceware DOT cygnus DOT com>, <http://sourceware.cygnus.com/ml/#faqs>
Sender:	cygwin-owner AT sourceware DOT cygnus DOT com
Delivered-To:	mailing list cygwin AT sourceware DOT cygnus DOT com
Message-ID:	<F5AFD56E32E8D21191090060974838B165F65B@ulm003.vs.dasa.de>
From:	"Lasslop, Andre" <Andre DOT Lasslop AT vs DOT dasa DOT de>
To:	cygwin AT sourceware DOT cygnus DOT com
Subject:	expect does not timeout
Date:	Wed, 8 Sep 1999 15:56:45 +0200
MIME-Version:	1.0
X-Mailer:	Internet Mail Service (5.5.2448.0)
X-MIME-Autoconverted:	from quoted-printable to 8bit by delorie.com id JAA03307

Hi all,

I got a problem with a simple expect-script for controlling a serial I/O
driver with a command line interface via readline.
The part of the command script which makes the problem is the following :

    	set timeout 1
	expect {
		-i $RS_ID
		-re " ff .. 60" {
		    exp_send_user "Message 1.\n"
		    exp_continue
		} -re "^T> " {
		    exp_send_user "Unknown Msg.\n"
		    exp_continue
		} timeout {
		} eof {
		}
	}

The driver ($RS_ID) has spawned and receives some messages which were
printed to stdout as hex-dump. Expect detects the Messages and prints the
corresponding name to the user. If no more messages arrive, the script
should detect a timeout (after 1 second for this example) and go away. But
after the correct message detection does the script hang and do not detect
the timeout. I tried the following construct :

    	set timeout 1
	expect {
		-i $RS_ID
		timeout
		-re " ff .. 60" {
		    exp_send_user "Message 1.\n"
		    exp_continue
		} -re "^T> " {
		    exp_send_user "Unknown Msg.\n"
		    exp_continue
		}
	}

This detects the timeout but leads to an error cause the "-re ..." construct
is interpreted as the command.
If I include "timeout {}" instead the script does stop as before.

I'm using cygwin b20.1. The expect version is 5.26. Tcl is 8.0p2.

Any suggestions ? 

Thanks

André Lasslop

--
Want to unsubscribe from this list?
Send a message to cygwin-unsubscribe AT sourceware DOT cygnus DOT com

- Raw text -