scottk/wlan-lanforge-scripts
1
0
Fork 0
mirror of https://github.com/Telecominfraproject/wlan-lanforge-scripts.git synced 2025-11-03 20:27:54 +00:00
Code Issues Packages Projects Releases Wiki Activity

lf_gui_cmd: fixes broken --port option; fixes whitespace

Browse Source
This commit is contained in:
Jed Reynolds
2020-02-11 17:18:45 -08:00
parent e460315b80
commit f5d05c3a94
1 changed files with 16 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lf_gui_cmd.pl
View File

@@ -37,8 +37,10 @@ my $show_help = 0;
######################################################################## ########################################################################
my $usage = qq($0 [--manager { hostname or address of LANforge GUI machine } ] my $usage = qq($0 [--manager { hostname or address of LANforge GUI machine } ]
[--port {port name} ] [--port {port name} ] # cli-socket port default 3990
# careful, your cli-socket might be 3390!
[--ttype {test instance type} ] [--ttype {test instance type} ]
# likely types: "cv", "WiFi Capacity", "Port Bringup", "Port Reset"
[--tname {test instance name} ] [--tname {test instance name} ]
[--tconfig {test configuration name, use defaults if not specified} ] [--tconfig {test configuration name, use defaults if not specified} ]
[--rpt_dest {Copy report to destination once it is complete} ] [--rpt_dest {Copy report to destination once it is complete} ]
@@ -70,6 +72,10 @@ if ($show_help) {
exit 0; exit 0;
} }
if ((defined $port) && ($port > 0)) {
$lfmgr_port = $port;
}
# Open connection to the LANforge server. # Open connection to the LANforge server.
my $t = new Net::Telnet(Prompt => '/lfgui\# /', my $t = new Net::Telnet(Prompt => '/lfgui\# /',
Timeout => 20); Timeout => 20);