| line |
true |
false |
branch |
|
51
|
0 |
0 |
if (defined $self->ssh) |
|
62
|
0 |
0 |
if ($self->is_connected) |
|
74
|
0 |
0 |
if (length $username) |
|
77
|
0 |
0 |
if (length $password) |
|
80
|
0 |
0 |
if ($port) |
|
83
|
0 |
0 |
if ($self->forward_agent) |
|
88
|
0 |
0 |
if ($ssh->error) |
|
102
|
0 |
0 |
unless ($self->is_connected) |
|
108
|
0 |
0 |
unless my $sp = 'Metabrik::System::Process'->new_from_brik_init($self) |
|
125
|
0 |
0 |
unless ($self->is_connected) |
|
128
|
0 |
0 |
unless $self->brik_help_run_undef_arg('open_tunnel', $hostname) |
|
129
|
0 |
0 |
unless $self->brik_help_run_undef_arg('open_tunnel', $port) |
|
135
|
0 |
0 |
if ($ssh->error) |
|
151
|
0 |
0 |
unless ($self->is_connected) |
|
154
|
0 |
0 |
unless $self->brik_help_run_undef_arg('close_tunnel', $hostname) |
|
155
|
0 |
0 |
unless $self->brik_help_run_undef_arg('close_tunnel', $port) |
|
160
|
0 |
0 |
unless my $sp = 'Metabrik::System::Process'->new_from_brik_init($self) |
|
164
|
0 |
0 |
if ($slave_pids->{$k}{'uid'} eq "${hostname}:$port") |
|
172
|
0 |
0 |
unless ($found) |
|
183
|
0 |
0 |
if (defined $ssh) |