diff options
Diffstat (limited to 'bin/flogin.in')
| -rw-r--r-- | bin/flogin.in | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/bin/flogin.in b/bin/flogin.in index 24b8400..4e93e35 100644 --- a/bin/flogin.in +++ b/bin/flogin.in @@ -1,7 +1,8 @@ #! @EXPECT_PATH@ -- ## -## $Id: flogin.in,v 1.42 2006/08/10 07:00:30 heas Exp $ +## $Id: flogin.in,v 1.44 2006/12/05 16:50:52 heas Exp $ ## +## @PACKAGE@ @VERSION@ ## Copyright (C) 1997-2006 by Terrapin Communications, Inc. ## All rights reserved. ## @@ -76,6 +77,9 @@ if {[ info exists env(CISCO_USER) ]} { } regexp {\(([^)]*)} "$reason" junk default_user } +if {[ info exists env(CLOGINRC) ]} { + set password_file $env(CLOGINRC) +} # Sometimes routers take awhile to answer (the default is 10 sec) set timeout 45 @@ -101,13 +105,16 @@ for {set i 0} {$i < $argc} {incr i} { } set do_passwd 0 # VTY Password - } -v* - - -v* { + } -v* { if {! [ regexp .\[vV\](.+) $arg ignore passwd]} { incr i set passwd [ lindex $argv $i ] } set do_passwd 0 + # Version string + } -V* { + send_user "@PACKAGE@ @VERSION@\n" + exit 0 # Enable Username } -w* - -W* { |