Branch Coverage

blib/lib/Metabrik/Client/Ssh.pm
Criterion Covered Total %
branch 0 98 0.0


line true false branch
69 0 0 if (defined $self->ssh2)
77 0 0 unless $self->brik_help_run_undef_arg("connect", $hostname)
78 0 0 unless $self->brik_help_run_undef_arg("connect", $port)
79 0 0 unless $self->brik_help_run_undef_arg("connect", $username)
83 0 0 if ($self->use_publickey and not $publickey)
86 0 0 if ($self->use_publickey and not $privatekey)
91 0 0 unless (defined $ssh2)
96 0 0 unless ($ret)
100 0 0 if ($self->use_publickey) { }
106 0 0 unless ($ret)
112 0 0 unless (defined $password)
113 0 0 unless my $sp = "Metabrik::String::Password"->new_from_brik_init($self)
118 0 0 unless ($ret)
132 0 0 unless (defined $ssh2)
149 0 0 unless $self->brik_help_run_undef_arg("connect", $ssh2)
150 0 0 unless $self->brik_help_run_undef_arg("execute", $cmd)
154 0 0 unless my $channel = $self->create_channel
156 0 0 unless $channel->process("exec", $cmd)
166 0 0 unless $self->brik_help_run_undef_arg("connect", $ssh2)
169 0 0 unless (defined $channel)
180 0 0 if (defined $channel)
193 0 0 unless $self->brik_help_run_undef_arg("connect", $ssh2)
194 0 0 unless $self->brik_help_run_undef_arg("execute_in_background", $cmd)
199 0 0 unless my $channel = $self->create_channel
202 0 0 if (defined $stdin_file)
209 0 0 unless $channel->process("exec", $cmd)
211 0 0 unless $channel->send_eof
214 0 0 unless $self->close_channel
224 0 0 unless $self->brik_help_run_undef_arg("create_channel", $channel)
231 0 0 unless (defined $rc)
234 0 0 if ($rc > 0) { }
0 0 elsif ($rc < 0) { }
239 0 0 if $char eq "\n"
257 0 0 unless $self->brik_help_run_undef_arg("create_channel", $channel)
259 0 0 unless my $read = $self->read($channel)
273 0 0 unless $self->brik_help_run_undef_arg("create_channel", $channel)
282 0 0 unless (defined $rc)
285 0 0 if ($rc > 0) { }
0 0 elsif ($rc < 0) { }
290 0 0 if $rc < $count
310 0 0 unless $self->brik_help_run_undef_arg("connect", $ssh2)
311 0 0 unless $self->brik_help_run_undef_arg("load", $file)
315 0 0 unless $ssh2->scp_get($file, $io)
333 0 0 unless $self->brik_help_run_undef_arg("connect", $ssh2)
334 0 0 unless $self->brik_help_run_undef_arg("capture", $cmd)
336 0 0 unless my $channel = $self->create_channel
340 0 0 unless $channel->process("exec", $cmd)
343 0 0 unless my $lines = $self->read_line_all
353 0 0 if (defined $ssh2)