[rancid] FXOS debugging

[Ryan West]

Same error - 

Here is the list of installed TCL packages:

libtcl8.5:amd64 
libtcl8.6:amd64 
tcl             
tcl-expect:amd64
tcl8.5          
tcl8.6          

On a 9.6 Debian version.  It's just this script that this throwing errors as well.

Thanks,

-ryan

-----Original Message-----
From: heasley <heas at shrubbery.net> 
Sent: Wednesday, November 28, 2018 1:55 AM
To: Ryan West <rwest at zyedge.com>
Cc: Rancid-discuss at shrubbery.net
Subject: Re: [rancid] FXOS debugging

Tue, Nov 27, 2018 at 04:34:22PM +0000, Ryan West:
> send: sending "show model\r" to { exp5 } invalid command name "^-"
>     while executing
> "^-"
>     invoked from within
> "expect {
>             -re "\b+"                           { exp_continue }
>             -re "^\[^\n\r *]*$reprompt"         { send_user -- "$expect_out(buffer)"
>                                                 }
>             -re "^\[^\n\r]*$reprom..."
>     (procedure "run_commands" line 36)
>     invoked from within
> "run_commands $prompt $command"
>     ("foreach" body line 206)
>     invoked from within
> "foreach router [lrange $argv $i end] {
>     set router [string tolower $router]
>     # attempt at platform switching.
>     set platform ""
>     send_user ..."
>     (file "/usr/local/rancid/bin/fxlogin" line 870)

hmm, i suspect this is a tcl bug.  are you perhaps using some crusty Centos with an old tcl?  you could try changing:

            -re "^\[^-]*--More--\[^\r\n]*\[\r\n]+"      { # fxos FTP pager

to

            -re -- "^\[^-]*--More--\[^\r\n]*\[\r\n]+"      { # fxos FTP pager