fix(tools): treat empty tunnel list as no tunnels

main
Tsu-ba-me 1 year ago committed by Yanhao Lei
parent b3cc8a7f7f
commit a321a3f404
  1. 8
      tools/striker-manage-vnc-pipes

@ -241,12 +241,16 @@ sub find_tunnels
my $debug = $parameters->{debug} || 3; my $debug = $parameters->{debug} || 3;
my $tunnel_ls_path = $parameters->{tunnel_ls_path}; my $tunnel_ls_path = $parameters->{tunnel_ls_path};
return (1) if ( (not defined $tunnel_ls_path) || (not -e $tunnel_ls_path) ); $anvil->Log->variables({ source => $THIS_FILE, line => __LINE__, level => $debug, list => $parameters, prefix => "find_tunnels" });
open(my $tunnel_ls_fh, "< :encoding(UTF-8)", $tunnel_ls_path) or return (1); return (1) if (not defined $tunnel_ls_path);
my $result = { server_uuids => {}, lports => {} }; my $result = { server_uuids => {}, lports => {} };
return (0, $result) if (not -e $tunnel_ls_path);
open(my $tunnel_ls_fh, "< :encoding(UTF-8)", $tunnel_ls_path) or return (1);
while (my $line = <$tunnel_ls_fh>) while (my $line = <$tunnel_ls_fh>)
{ {
chomp($line); chomp($line);

Loading…
Cancel
Save