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) |