| blib/lib/Lock/Server.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 35 | 62 | 56.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 319 | 7 | 12 | 1 | @$lockers and $t > $self->{'_locker_counts'}{$lockers->[0]}{$key_to_check} |
| 354 | 14 | 8 | 0 | @$lockers and $t > $self->{'_locker_counts'}{$lockers->[0]}{$key_to_lock} |
| 456 | 16 | 19 | 0 | @$lockers and $t > $self->{'_locker_counts'}{$lockers->[0]}{$key_to_check} |
| line | l | !l | condition |
|---|---|---|---|
| 135 | 11 | 0 | $args->{'lock_timeout'} || 3 |
| 11 | 0 | $args->{'lock_attempt_timeout'} || 4 | |
| 0 | 11 | $args->{'host'} || '127.0.0.1' | |
| 0 | 11 | $args->{'port'} || 8004 | |
| 0 | 11 | $args->{'reconnect_attemps'} || 10 | |
| 0 | 11 | $args->{'time_between_attempts'} || 5 | |
| 313 | 16 | 3 | $self->{'_locks'}{$key_to_check} ||= [] |
| 349 | 15 | 7 | $self->{'_locks'}{$key_to_lock} ||= [] |
| 415 | 17 | 0 | $self->{'_locks'}{$key_to_unlock} ||= [] |
| 451 | 35 | 0 | $self->{'_locks'}{$key_to_check} ||= [] |
| 506 | 22 | 0 | $host ||= '127.0.0.1' |
| 507 | 22 | 0 | $port ||= '8004' |
| 515 | 0 | 22 | $args->{'reconnect_attemps'} || 3 |
| 0 | 22 | $args->{'time_between_attempts'} || 3 | |
| 603 | 0 | 22 | $timeout //= 3 |
| 623 | 0 | 3 | $timeout //= 3 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 123 | 0 | 11 | 0 | ref $pkg || $pkg |
| 234 | 0 | 0 | 17 | $listener_socket or $count++ > $self->{'attempts'} |
| 242 | 0 | 0 | 6 | $listener_socket or $count > $self->{'attempts'} |
| 509 | 0 | 22 | 0 | ref $pkg || $pkg |
| 521 | 25 | 0 | 136 | shift() || $self->{'attempts'} |
| 525 | 157 | 0 | 161 | $sock or $count++ > $attempts |
| 527 | 157 | 0 | 4 | $sock or $count > $attempts |