Lines Matching refs:lock

31 # lock, then locks all other bytes before commencing recovery. If it fails
32 # to lock all other bytes (because some other process is holding a read
33 # lock) it should retry up to 100 times. Then return SQLITE_PROTOCOL to the 
37 # the WRITER lock (should be the same). Test case 1.4.
45 proc lock_callback {method filename handle lock} {
46   lappend ::locks $lock
56 } [list {0 1 lock exclusive} {1 2 lock exclusive}     \
57         {4 1 lock exclusive} {4 1 unlock exclusive}   \
58         {5 1 lock exclusive} {5 1 unlock exclusive}   \
59         {6 1 lock exclusive} {6 1 unlock exclusive}   \
60         {7 1 lock exclusive} {7 1 unlock exclusive}   \
70 } [list {0 1 lock exclusive} {1 2 lock exclusive}     \
71         {4 1 lock exclusive} {4 1 unlock exclusive}   \
72         {5 1 lock exclusive} {5 1 unlock exclusive}   \
73         {6 1 lock exclusive} {6 1 unlock exclusive}   \
74         {7 1 lock exclusive} {7 1 unlock exclusive}   \
78 proc lock_callback {method filename handle lock} {
79   if {$lock == "1 2 lock exclusive"} { return SQLITE_BUSY }
93 proc lock_callback {method filename handle lock} {
94   if {$lock == "0 1 lock exclusive"} { return SQLITE_BUSY }
105 proc lock_callback {method filename handle lock} {
106   if {$lock == "4 4 lock exclusive"} { return SQLITE_BUSY }