| lib/SMB/Auth.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 49 | 99 | 49.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 189 | 0 | 0 | 0 | $username && $username =~ /^\w[\w.+-]*$/ && @hash_bytes |
| 243 | 0 | 0 | 16 | $tag >= 160 and $tag <= 163 |
| 276 | 0 | 0 | 16 | $tag >= 160 and $tag <= 163 |
| 282 | 0 | 0 | 7 | ($id0 = $_) && () |
| 328 | 0 | 0 | 2 | ref $value eq 'ARRAY' and shift @$value == 48 |
| 331 | 0 | 0 | 2 | $_->[0] == 6 and $_->[1] eq '1.3.6.1.4.1.311.2.2.10' |
| 338 | 1 | 0 | 3 | ref $value eq 'ARRAY' && shift @$value == 4 |
| 370 | 0 | 1 | 0 | $parser->uint16 == 8 && $self->server_timestamp($parser->uint64) |
| 403 | 0 | 0 | 1 | ref $value eq 'ARRAY' and shift @$value == 10 |
| line | l | !l | condition |
|---|---|---|---|
| 105 | 0 | 0 | shift() || die('No user passwords to set') |
| 114 | 1 | 0 | shift() // '' |
| 123 | 3 | 0 | shift() // '' |
| 129 | 0 | 0 | shift() || die() |
| 140 | 3 | 0 | shift() || die() |
| 141 | 3 | 0 | shift() // '' |
| 142 | 3 | 0 | shift() // '' |
| 156 | 1 | 0 | shift() || 24 |
| 176 | 0 | 0 | shift() || (return) |
| 187 | 0 | 0 | $hash_str || '' |
| 204 | 1 | 0 | $self->ntlm_response || (return $self->err('No ntlm_response from client')) |
| 210 | 1 | 0 | $self->username // (return $self->err('No username from client')) |
| 211 | 1 | 0 | $self->user_passwords->{$username} // (return $self->err("No user '${username}' on server")) |
| 263 | 4 | 12 | $parsed_context_values[$tag - 160] //= \@contents |
| 272 | 41 | 0 | shift() // die('No asn1 tag') |
| 273 | 41 | 0 | shift() // die('No asn1 tag content') |
| 316 | 6 | 0 | shift() // (return) |
| 515 | 1 | 0 | $options{'username'} || '' |
| 516 | 1 | 0 | $options{'password'} || '' |
| 517 | 1 | 0 | $options{'domain'} || 'MYGROUP' |
| 527 | 0 | 1 | $self->server_timestamp || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 215 | 0 | 1 | 0 | $ntlm_hash ||= &create_ntlm_hash($password) |
| 243 | 9 | 0 | 19 | $tag == 48 or $tag == 49 |
| 9 | 3 | 16 | $tag == 48 or $tag == 49 or $tag == 96 | |
| 276 | 9 | 0 | 19 | $tag == 48 or $tag == 49 |
| 9 | 3 | 16 | $tag == 48 or $tag == 49 or $tag == 96 | |
| 326 | 1 | 1 | 4 | not defined $self->ntlmssp_supported or $options{'is_initial'} |
| 419 | 1 | 1 | 4 | not defined $self->ntlmssp_supported or $options{'is_initial'} |
| 433 | 2 | 2 | 0 | $options{'host'} || $names[0] |
| 434 | 1 | 0 | 3 | $options{'domain'} || $names[1] |
| 524 | 0 | 1 | 0 | $options{'ntlm_password_hash'} || &create_ntlm_hash($password) |