scottk/wlan-lanforge-scripts
1
0
Fork 0
mirror of https://github.com/Telecominfraproject/wlan-lanforge-scripts.git synced 2025-10-31 10:48:02 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fixes renamed flag, changes default resource

Browse Source
This commit is contained in:
Jed Reynolds
2019-10-14 10:02:47 -07:00
parent a4041a11c9
commit 3fac8cce0b
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
json/check_ports.pl
View File

@@ -46,7 +46,7 @@ GetOptions
$::HostUri = "http://$Host:$Port"; $::HostUri = "http://$Host:$Port";
my $rh_update = { my $rh_update = {
'shelf'=>1, 'resource'=>3, 'port'=>'all', 'flags'=>'0x1' 'shelf'=>1, 'resource'=>1, 'port'=>'all', 'probe_flags'=>'0x9'
}; };
my $uri = "/shelf/1"; my $uri = "/shelf/1";
my $rh = json_request($uri); my $rh = json_request($uri);
@@ -59,7 +59,7 @@ my $rh_response = json_post("/cli-json/nc_show_ports", $rh_update);
# wait on ports up # wait on ports up
my $ports_still_down = 1; my $ports_still_down = 1;
while ($ports_still_down > 0) { while ($ports_still_down > 0) {
$rh = json_request("/port/1/3/list?fields=_links,port,device,down"); $rh = json_request("/port/1/1/list?fields=_links,port,device,down");
flatten_list($rh, 'interfaces'); flatten_list($rh, 'interfaces');
$ports_still_down=0; $ports_still_down=0;
for my $rh_p (values %{$rh->{'flat_list'}}) { for my $rh_p (values %{$rh->{'flat_list'}}) {
@@ -73,4 +73,4 @@ while ($ports_still_down > 0) {
sleep 1; sleep 1;
} }
# #