| blib/lib/Protocol/SOCKS/Server.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 18 | 44.4 |
| line | true | false | branch |
|---|---|---|---|
| 78 | 2 | 0 | unless ($self->init->is_ready) |
| 79 | 0 | 2 | if length $$buf < 3 |
| 81 | 0 | 2 | unless length $$buf >= 2 + $method_count |
| 84 | 0 | 2 | unless $version == $self->version |
| 88 | 2 | 1 | unless grep(($method == $_), $self->auth_methods) |
| 92 | 1 | 1 | unless (defined $auth_method) |
| 108 | 0 | 0 | unless my $details = $self->parse_request($buf) |
| 131 | 0 | 0 | unless length $$buffref >= 6 |
| 133 | 0 | 0 | unless $cmd > 0 and $cmd < 4 |