| perllib/Arch/RunLimit.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 33 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 44 | 0 | 0 | 0 | $length and $addr |
| 51 | 0 | 0 | 0 | -d '/proc' && -d "/proc/$$" |
| 74 | 0 | 0 | 0 | $ENV{'DEBUG'} and ("$ENV{'DEBUG'}" & "\cB") ne "\000" |
| 77 | 0 | 0 | 0 | time - $1 < $$self{'timeout'} and !$$self{'proc_able'} || -d "/proc/$2" |
| 96 | 0 | 0 | 0 | $ENV{'DEBUG'} and ("$ENV{'DEBUG'}" & "\cB") ne "\000" |
| 107 | 0 | 0 | 0 | $$self{'added'} and defined $$self{'exceeded'} |
| line | l | !l | condition |
|---|---|---|---|
| 26 | 0 | 0 | $init{'file'} || '/please/specify/run-limit-file' |
| 45 | 0 | 0 | $hostname ||= 'unknown-host' |
| 46 | 0 | 0 | $hostip ||= '127.0.0.1' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 33 | 0 | 0 | 0 | $$self{'limit'} <= 0 or $$self{'timeout'} <= 0 |
| 77 | 0 | 0 | 0 | !$$self{'proc_able'} || -d "/proc/$2" |
| 0 | 0 | 0 | $3 ne $$self{'host_id'} or time - $1 < $$self{'timeout'} and !$$self{'proc_able'} || -d "/proc/$2" |