blib/lib/CGI/SecureState.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 26 | 67 | 38.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
102 | 0 | 3 | 0 | not defined $cgi->param('.id') and $cgi->request_method eq 'POST' |
245 | 0 | 0 | 0 | $CGI::SecureState::NASTY_WARNINGS and not defined $isforgetful |
277 | 0 | 0 | 0 | $CGI::SecureState::AVOID_SYMLINKS and -l $_ |
553 | 0 | 21 | 0 | $CGI::SecureState::AVOID_SYMLINKS and -l $statefile |
0 | 21 | 0 | $CGI::SecureState::USE_FLOCK and not flock(STATEFILE, 2) | |
10 | 0 | 0 | $param ne 'Saved-Values' and @data | |
10 | 5 | 0 | not $isforgetful and exists $$memory{$param} || defined $self->param($param) |
line | l | !l | condition |
---|---|---|---|
77 | 0 | 3 | $args{'-errorSub'} || $args{'-errorsub'} || undef |
94 | 0 | 3 | $args{'-longTerm'} || $args{'-longterm'} || [] |
98 | 0 | 1 | $args{'-shortTerm'} || $args{'-shortterm'} || [] |
114 | 3 | 0 | $args{'-stateDir'} || $args{'-statedir'} || '.' |
263 | 0 | 0 | $volume || '' |
265 | 0 | 0 | $args{'-age'} ||= 0.0416666666666667 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
39 | 0 | 0 | 3 | /MacOS/i or /V[MO]S/i |
0 | 0 | 3 | /MacOS/i or /V[MO]S/i or /MSWin32/i | |
94 | 0 | 3 | 0 | $args{'-memory'} ||= $args{'-longTerm'} || $args{'-longterm'} || [] |
98 | 2 | 1 | 0 | $args{'-temp'} ||= $args{'-shortTerm'} || $args{'-shortterm'} || [] |
107 | 0 | 3 | 0 | $cgi->param('.id') || sha1_hex($args{'-key'} || generate_id()) |
111 | 3 | 0 | 0 | 'Crypt::Blowfish'->new($key) || errormsg($cgi, 'invalid state file') |
130 | 0 | 1 | 2 | $newmemory || !$$cgi{'.isforgetful'} |
347 | 0 | 0 | 2 | $_ eq '.id' or substr($_, 0, 4) eq '.tmp' |
553 | 0 | 0 | 5 | exists $$memory{$param} || defined $self->param($param) |
6 | 0 | 21 | $_ eq '.id' or substr($_, 0, 4) eq '.tmp' |
line | l&&r | l&&!r | !l&&r | !l&&!r | condition |
---|---|---|---|---|---|
553 | 14 | 8 | 0 | 13 | $isforgetful xor exists $$memory{$_} |