| line |
true |
false |
branch |
|
37
|
0 |
0 |
unless $port or $fifo_filename |
|
40
|
0 |
0 |
$fifo_filename ? : |
|
44
|
0 |
0 |
$fifo_filename ? : |
|
45
|
0 |
0 |
unless $main_socket |
|
57
|
0 |
0 |
if (not $share_roots and $FindBin::Bin) |
|
59
|
0 |
0 |
if -d $_ and -x _ |
|
|
0 |
0 |
if -d $shares_dir |
|
62
|
0 |
0 |
if (not $share_roots) { } |
|
|
0 |
0 |
elsif (ref $share_roots eq '' and $share_roots eq '-') { } |
|
|
0 |
0 |
elsif (ref $share_roots ne 'HASH') { } |
|
|
0 |
0 |
elsif (not %$share_roots) { } |
|
88
|
0 |
0 |
unless $auth->load_user_passwords($self->passwd_filename) |
|
112
|
0 |
0 |
$tid ? : |
|
113
|
0 |
0 |
if $tree |
|
115
|
0 |
0 |
if ($command->is_smb1) |
|
116
|
0 |
0 |
if ($command->is('Negotiate') and $command->supports_protocol(2)) |
|
121
|
0 |
0 |
if ($command->is_smb2) |
|
126
|
0 |
0 |
if ($tid || exists $$command{'fid'} and not $tree) { } |
|
|
0 |
0 |
elsif ($fid) { } |
|
130
|
0 |
0 |
unless $openfile = $$connection{'openfiles'}{@$fid} |
|
135
|
0 |
0 |
if ($error) { } |
|
|
0 |
0 |
elsif ($command->is('Negotiate')) { } |
|
|
0 |
0 |
elsif ($command->is('SessionSetup')) { } |
|
|
0 |
0 |
elsif ($command->is('TreeConnect')) { } |
|
|
0 |
0 |
elsif ($command->is('Create')) { } |
|
|
0 |
0 |
elsif ($command->is('Close')) { } |
|
|
0 |
0 |
elsif ($command->is('Read')) { } |
|
|
0 |
0 |
elsif ($command->is('QueryDirectory')) { } |
|
146
|
0 |
0 |
if not $command->security_buffer or defined $auth_completed and not $auth_completed |
|
153
|
0 |
0 |
if ($tree_root or $share eq 'IPC$') { } |
|
167
|
0 |
0 |
if ($file->exists and $disposition == 1) |
|
168
|
0 |
0 |
if ($command->requested_directory and not $file->is_directory) { } |
|
|
0 |
0 |
elsif ($command->requested_non_directory and $file->is_directory) { } |
|
174
|
0 |
0 |
unless ($error) |
|
176
|
0 |
0 |
if ($openfile) { } |
|
197
|
0 |
0 |
unless defined $$command{'buffer'} |
|
200
|
0 |
0 |
unless $command->flags & 4 |
|
206
|
0 |
0 |
unless defined $$command{'files'} |
|
209
|
0 |
0 |
if $error |
|
225
|
0 |
0 |
if ($socket == $self->main_socket) { } |
|
233
|
0 |
0 |
unless ($connection) |
|
240
|
0 |
0 |
unless my $connection = $self->get_connection($socket) |
|
243
|
0 |
0 |
unless ($command) |