fix(tools): correct typos in manage vnc pipes

tools/striker-manage-vnc-pipes

@@ -248,7 +248,7 @@ sub find_tunnels
 
 		my ($svr_uuid, $tunnel_lport, $tunnel_rport) = $line =~ /^([^\s]+)-[L|R].*:(\d+):.*:(\d+)$/;
 
-		my $tunnel = { lport => $lport, rport => $rport, server_uuid => $svr_uuid };
+		my $tunnel = { lport => $tunnel_lport, rport => $tunnel_rport, server_uuid => $svr_uuid };
 
 		set_tunnel({ debug => $debug, entry => $tunnel, entries => $result });
 	}
@@ -528,9 +528,11 @@ sub start_pipe
 
 		next if ($rcode);
 
+		my $tunnel = $tunnels->{server_uuids}{$svr_uuid};
+
 		($rcode) = set_tunnel_variable({
 			debug          => $debug,
-			end_port       => $tunnel_rport,
+			end_port       => $tunnel->{rport},
 			svr_uuid       => $svr_uuid,
 			tp_target_uuid => $host_uuid
 		});
@@ -538,8 +540,7 @@ sub start_pipe
 		if ($rcode)
 		{
 			stop_tunnel({
-				lport       => $ws_process->{sport},
+				%$tunnel,
-				rport       => $tunnel->{end_port},
 				tp_ctl_path => $tp_process->{ctl_path},
 				%$common_params,
 			});