Branch Coverage

blib/lib/Apache/Session/Lock/File.pm
Criterion Covered Total %
branch 23 62 37.1


line true false branch
29 0 2 if ($^O eq 'MSWin32' or $^O eq 'cygwin')
40 0 2 if $$self{'read'}
43 2 0 unless ($$self{'opened'})
49 0 2 unless open $fh, '+>' . $LockDirectory . '/Apache-Session-' . $$session{'data'}{'_session_id'} . '.lock'
55 2 0 unless ($$self{'write'})
57 0 2 unless flock $$self{'fh'}, 1
67 0 5 if $$self{'write'}
69 4 1 unless ($$self{'opened'})
75 0 4 unless open $fh, '+>' . $LockDirectory . '/Apache-Session-' . $$session{'data'}{'_session_id'} . '.lock'
81 0 5 unless flock $$self{'fh'}, 2
86 0 0 if ($^O eq 'MSWin32' or $^O eq 'cygwin')
92 0 0 unless $$self{'read'}
94 0 0 unless ($$self{'write'})
95 0 0 unless flock $$self{'fh'}, 8
96 0 0 unless close $$self{'fh'}
107 0 0 unless $$self{'write'}
109 0 0 if ($$self{'read'}) { }
110 0 0 unless flock $$self{'fh'}, 1
113 0 0 unless flock $$self{'fh'}, 8
114 0 0 unless close $$self{'fh'}
125 6 6 if ($$self{'opened'})
126 0 6 unless flock $$self{'fh'}, 8
127 0 6 unless close $$self{'fh'}
148 0 2 unless opendir DIR, $dir
151 1 25 if ($file =~ /^Apache-Session.*\.lock$/)
152 1 0 if ($now - (stat $dir . '/' . $file)[8] >= $time)
153 0 1 if ($^O eq 'MSWin32') { }
155 0 0 unless unlink $dir . '/' . $file
157 0 1 unless open FH, "+>$dir/" . $file
158 0 1 unless flock FH, 2
159 0 1 unless unlink $dir . '/' . $file