| line |
true |
false |
branch |
|
15
|
0 |
2 |
unless ($sshd->{'run_server'}) |
|
20
|
2 |
0 |
unless my $exe = $sshd->_sshd_executable |
|
21
|
0 |
0 |
unless $sshd->_create_keys |
|
46
|
0 |
0 |
if (defined $v) { } |
|
52
|
0 |
0 |
unless $sshd->_write_config(%Config) |
|
56
|
0 |
0 |
unless ($sshd->{'server_pid'} = $sshd->_run_cmd({'out_name', 'server', 'async', 1}, $exe, '-D', '-e', '-f', $sshd->{'config_file'})) |
|
73
|
0 |
0 |
if ($sshd->_test_server) |
|
84
|
0 |
0 |
if (open my $fn, '>', $fn) |
|
90
|
0 |
0 |
if close $fn |
|
98
|
0 |
0 |
if (defined(my $pid = $sshd->{'server_pid'})) |
|
100
|
0 |
0 |
if $rc <= 0 |
|
112
|
2 |
0 |
if (defined(my $run_dir = $sshd->_run_dir)) |
|
114
|
2 |
0 |
unless open my $fh, '<', "$run_dir/sshd.pid" |
|
116
|
0 |
0 |
unless defined $pid |
|
118
|
0 |
0 |
unless $pid |
|
134
|
0 |
0 |
if -f $fn and -f "$fn.pub" |
|
137
|
0 |
0 |
if ($sshd->_run_cmd({'search_binary', 1}, 'ssh_keygen', -'t', 'rsa', -'b', 1024, -'f', $tmpfn, -'P', '')) |
|
141
|
0 |
0 |
if (rename $tmpfn, $fn and rename "$tmpfn.pub", "$fn.pub") |
|
160
|
0 |
0 |
unless my $kdir = $sshd->_private_dir('openssh/keys') |
|
164
|
0 |
0 |
if $sshd->_create_key($user_key) |
|
173
|
0 |
0 |
unless ('IO::Socket::INET'->new('PeerAddr', "localhost:$port", 'Proto', 'tcp', 'Timeout', $sshd->{'timeout'})) |