/ Hex Artifact Content
Login

Artifact 3239a45dbd2f50195bfc97f1ed35cb8fe5a3f60c:


0000: 2f 2a 0a 2a 2a 20 32 30 30 34 20 4d 61 79 20 32  /*.** 2004 May 2
0010: 32 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 75 74 68  2.**.** The auth
0020: 6f 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70  or disclaims cop
0030: 79 72 69 67 68 74 20 74 6f 20 74 68 69 73 20 73  yright to this s
0040: 6f 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20  ource code.  In 
0050: 70 6c 61 63 65 20 6f 66 0a 2a 2a 20 61 20 6c 65  place of.** a le
0060: 67 61 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72 65  gal notice, here
0070: 20 69 73 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a   is a blessing:.
0080: 2a 2a 0a 2a 2a 20 20 20 20 4d 61 79 20 79 6f 75  **.**    May you
0090: 20 64 6f 20 67 6f 6f 64 20 61 6e 64 20 6e 6f 74   do good and not
00a0: 20 65 76 69 6c 2e 0a 2a 2a 20 20 20 20 4d 61 79   evil..**    May
00b0: 20 79 6f 75 20 66 69 6e 64 20 66 6f 72 67 69 76   you find forgiv
00c0: 65 6e 65 73 73 20 66 6f 72 20 79 6f 75 72 73 65  eness for yourse
00d0: 6c 66 20 61 6e 64 20 66 6f 72 67 69 76 65 20 6f  lf and forgive o
00e0: 74 68 65 72 73 2e 0a 2a 2a 20 20 20 20 4d 61 79  thers..**    May
00f0: 20 79 6f 75 20 73 68 61 72 65 20 66 72 65 65 6c   you share freel
0100: 79 2c 20 6e 65 76 65 72 20 74 61 6b 69 6e 67 20  y, never taking 
0110: 6d 6f 72 65 20 74 68 61 6e 20 79 6f 75 20 67 69  more than you gi
0120: 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ve..**.*********
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0170: 2a 2a 2a 2a 2a 0a 2a 2a 0a 2a 2a 20 54 68 69 73  *****.**.** This
0180: 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 63   file contains c
0190: 6f 64 65 20 74 68 61 74 20 69 73 20 73 70 65 63  ode that is spec
01a0: 69 66 69 63 20 74 6f 20 55 6e 69 78 20 73 79 73  ific to Unix sys
01b0: 74 65 6d 73 2e 0a 2a 2f 0a 23 69 6e 63 6c 75 64  tems..*/.#includ
01c0: 65 20 22 6f 73 2e 68 22 20 20 20 20 20 20 20 20  e "os.h"        
01d0: 20 20 2f 2a 20 4d 75 73 74 20 62 65 20 66 69 72    /* Must be fir
01e0: 73 74 20 74 6f 20 65 6e 61 62 6c 65 20 6c 61 72  st to enable lar
01f0: 67 65 20 66 69 6c 65 20 73 75 70 70 6f 72 74 20  ge file support 
0200: 2a 2f 0a 23 69 66 20 4f 53 5f 55 4e 49 58 20 20  */.#if OS_UNIX  
0210: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54              /* T
0220: 68 69 73 20 66 69 6c 65 20 69 73 20 75 73 65 64  his file is used
0230: 20 6f 6e 20 75 6e 69 78 20 6f 6e 6c 79 20 2a 2f   on unix only */
0240: 0a 23 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74  .#include "sqlit
0250: 65 49 6e 74 2e 68 22 0a 0a 0a 23 69 6e 63 6c 75  eInt.h"...#inclu
0260: 64 65 20 3c 74 69 6d 65 2e 68 3e 0a 23 69 6e 63  de <time.h>.#inc
0270: 6c 75 64 65 20 3c 65 72 72 6e 6f 2e 68 3e 0a 23  lude <errno.h>.#
0280: 69 6e 63 6c 75 64 65 20 3c 75 6e 69 73 74 64 2e  include <unistd.
0290: 68 3e 0a 23 69 66 6e 64 65 66 20 4f 5f 4c 41 52  h>.#ifndef O_LAR
02a0: 47 45 46 49 4c 45 0a 23 20 64 65 66 69 6e 65 20  GEFILE.# define 
02b0: 4f 5f 4c 41 52 47 45 46 49 4c 45 20 30 0a 23 65  O_LARGEFILE 0.#e
02c0: 6e 64 69 66 0a 23 69 66 64 65 66 20 53 51 4c 49  ndif.#ifdef SQLI
02d0: 54 45 5f 44 49 53 41 42 4c 45 5f 4c 46 53 0a 23  TE_DISABLE_LFS.#
02e0: 20 75 6e 64 65 66 20 4f 5f 4c 41 52 47 45 46 49   undef O_LARGEFI
02f0: 4c 45 0a 23 20 64 65 66 69 6e 65 20 4f 5f 4c 41  LE.# define O_LA
0300: 52 47 45 46 49 4c 45 20 30 0a 23 65 6e 64 69 66  RGEFILE 0.#endif
0310: 0a 23 69 66 6e 64 65 66 20 4f 5f 4e 4f 46 4f 4c  .#ifndef O_NOFOL
0320: 4c 4f 57 0a 23 20 64 65 66 69 6e 65 20 4f 5f 4e  LOW.# define O_N
0330: 4f 46 4f 4c 4c 4f 57 20 30 0a 23 65 6e 64 69 66  OFOLLOW 0.#endif
0340: 0a 23 69 66 6e 64 65 66 20 4f 5f 42 49 4e 41 52  .#ifndef O_BINAR
0350: 59 0a 23 20 64 65 66 69 6e 65 20 4f 5f 42 49 4e  Y.# define O_BIN
0360: 41 52 59 20 30 0a 23 65 6e 64 69 66 0a 0a 2f 2a  ARY 0.#endif../*
0370: 0a 2a 2a 20 54 68 65 20 44 4a 47 50 50 20 63 6f  .** The DJGPP co
0380: 6d 70 69 6c 65 72 20 65 6e 76 69 72 6f 6e 6d 65  mpiler environme
0390: 6e 74 20 6c 6f 6f 6b 73 20 6d 6f 73 74 6c 79 20  nt looks mostly 
03a0: 6c 69 6b 65 20 55 6e 69 78 2c 20 62 75 74 20 69  like Unix, but i
03b0: 74 0a 2a 2a 20 6c 61 63 6b 73 20 74 68 65 20 66  t.** lacks the f
03c0: 63 6e 74 6c 28 29 20 73 79 73 74 65 6d 20 63 61  cntl() system ca
03d0: 6c 6c 2e 20 20 53 6f 20 72 65 64 65 66 69 6e 65  ll.  So redefine
03e0: 20 66 63 6e 74 6c 28 29 20 74 6f 20 62 65 20 73   fcntl() to be s
03f0: 6f 6d 65 74 68 69 6e 67 0a 2a 2a 20 74 68 61 74  omething.** that
0400: 20 61 6c 77 61 79 73 20 73 75 63 63 65 65 64 73   always succeeds
0410: 2e 20 20 54 68 69 73 20 6d 65 61 6e 73 20 74 68  .  This means th
0420: 61 74 20 6c 6f 63 6b 69 6e 67 20 64 6f 65 73 20  at locking does 
0430: 6e 6f 74 20 6f 63 63 75 72 20 75 6e 64 65 72 0a  not occur under.
0440: 2a 2a 20 44 4a 47 50 50 2e 20 20 42 75 74 20 69  ** DJGPP.  But i
0450: 74 73 20 44 4f 53 20 2d 20 77 68 61 74 20 64 69  ts DOS - what di
0460: 64 20 79 6f 75 20 65 78 70 65 63 74 3f 0a 2a 2f  d you expect?.*/
0470: 0a 23 69 66 64 65 66 20 5f 5f 44 4a 47 50 50 5f  .#ifdef __DJGPP_
0480: 5f 0a 23 20 64 65 66 69 6e 65 20 66 63 6e 74 6c  _.# define fcntl
0490: 28 41 2c 42 2c 43 29 20 30 0a 23 65 6e 64 69 66  (A,B,C) 0.#endif
04a0: 0a 0a 2f 2a 0a 2a 2a 20 4d 61 63 72 6f 73 20 75  ../*.** Macros u
04b0: 73 65 64 20 74 6f 20 64 65 74 65 72 6d 69 6e 65  sed to determine
04c0: 20 77 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20   whether or not 
04d0: 74 6f 20 75 73 65 20 74 68 72 65 61 64 73 2e 20  to use threads. 
04e0: 20 54 68 65 0a 2a 2a 20 53 51 4c 49 54 45 5f 55   The.** SQLITE_U
04f0: 4e 49 58 5f 54 48 52 45 41 44 53 20 6d 61 63 72  NIX_THREADS macr
0500: 6f 20 69 73 20 64 65 66 69 6e 65 64 20 69 66 20  o is defined if 
0510: 77 65 20 61 72 65 20 73 79 6e 63 68 72 6f 6e 69  we are synchroni
0520: 7a 69 6e 67 20 66 6f 72 0a 2a 2a 20 50 6f 73 69  zing for.** Posi
0530: 78 20 74 68 72 65 61 64 73 20 61 6e 64 20 53 51  x threads and SQ
0540: 4c 49 54 45 5f 57 33 32 5f 54 48 52 45 41 44 53  LITE_W32_THREADS
0550: 20 69 73 20 64 65 66 69 6e 65 64 20 69 66 20 77   is defined if w
0560: 65 20 61 72 65 0a 2a 2a 20 73 79 6e 63 68 72 6f  e are.** synchro
0570: 6e 69 7a 69 6e 67 20 75 73 69 6e 67 20 57 69 6e  nizing using Win
0580: 33 32 20 74 68 72 65 61 64 73 2e 0a 2a 2f 0a 23  32 threads..*/.#
0590: 69 66 20 64 65 66 69 6e 65 64 28 54 48 52 45 41  if defined(THREA
05a0: 44 53 41 46 45 29 20 26 26 20 54 48 52 45 41 44  DSAFE) && THREAD
05b0: 53 41 46 45 0a 23 20 69 6e 63 6c 75 64 65 20 3c  SAFE.# include <
05c0: 70 74 68 72 65 61 64 2e 68 3e 0a 23 20 64 65 66  pthread.h>.# def
05d0: 69 6e 65 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f  ine SQLITE_UNIX_
05e0: 54 48 52 45 41 44 53 20 31 0a 23 65 6e 64 69 66  THREADS 1.#endif
05f0: 0a 0a 0a 2f 2a 0a 2a 2a 20 49 6e 63 6c 75 64 65  .../*.** Include
0600: 20 63 6f 64 65 20 74 68 61 74 20 69 73 20 63 6f   code that is co
0610: 6d 6d 6f 6e 20 74 6f 20 61 6c 6c 20 6f 73 5f 2a  mmon to all os_*
0620: 2e 63 20 66 69 6c 65 73 0a 2a 2f 0a 23 69 6e 63  .c files.*/.#inc
0630: 6c 75 64 65 20 22 6f 73 5f 63 6f 6d 6d 6f 6e 2e  lude "os_common.
0640: 68 22 0a 0a 23 69 66 20 64 65 66 69 6e 65 64 28  h"..#if defined(
0650: 54 48 52 45 41 44 53 41 46 45 29 20 26 26 20 54  THREADSAFE) && T
0660: 48 52 45 41 44 53 41 46 45 20 26 26 20 64 65 66  HREADSAFE && def
0670: 69 6e 65 64 28 5f 5f 6c 69 6e 75 78 5f 5f 29 0a  ined(__linux__).
0680: 23 64 65 66 69 6e 65 20 67 65 74 70 69 64 20 70  #define getpid p
0690: 74 68 72 65 61 64 5f 73 65 6c 66 0a 23 65 6e 64  thread_self.#end
06a0: 69 66 0a 0a 2f 2a 0a 2a 2a 20 48 65 72 65 20 69  if../*.** Here i
06b0: 73 20 74 68 65 20 64 69 72 74 20 6f 6e 20 50 4f  s the dirt on PO
06c0: 53 49 58 20 61 64 76 69 73 6f 72 79 20 6c 6f 63  SIX advisory loc
06d0: 6b 73 3a 20 20 41 4e 53 49 20 53 54 44 20 31 30  ks:  ANSI STD 10
06e0: 30 33 2e 31 20 28 31 39 39 36 29 0a 2a 2a 20 73  03.1 (1996).** s
06f0: 65 63 74 69 6f 6e 20 36 2e 35 2e 32 2e 32 20 6c  ection 6.5.2.2 l
0700: 69 6e 65 73 20 34 38 33 20 74 68 72 6f 75 67 68  ines 483 through
0710: 20 34 39 30 20 73 70 65 63 69 66 79 20 74 68 61   490 specify tha
0720: 74 20 77 68 65 6e 20 61 20 70 72 6f 63 65 73 73  t when a process
0730: 0a 2a 2a 20 73 65 74 73 20 6f 72 20 63 6c 65 61  .** sets or clea
0740: 72 73 20 61 20 6c 6f 63 6b 2c 20 74 68 61 74 20  rs a lock, that 
0750: 6f 70 65 72 61 74 69 6f 6e 20 6f 76 65 72 72 69  operation overri
0760: 64 65 73 20 61 6e 79 20 70 72 69 6f 72 20 6c 6f  des any prior lo
0770: 63 6b 73 20 73 65 74 0a 2a 2a 20 62 79 20 74 68  cks set.** by th
0780: 65 20 73 61 6d 65 20 70 72 6f 63 65 73 73 2e 20  e same process. 
0790: 20 49 74 20 64 6f 65 73 20 6e 6f 74 20 65 78 70   It does not exp
07a0: 6c 69 63 69 74 6c 79 20 73 61 79 20 73 6f 2c 20  licitly say so, 
07b0: 62 75 74 20 74 68 69 73 20 69 6d 70 6c 69 65 73  but this implies
07c0: 0a 2a 2a 20 74 68 61 74 20 69 74 20 6f 76 65 72  .** that it over
07d0: 72 69 64 65 73 20 6c 6f 63 6b 73 20 73 65 74 20  rides locks set 
07e0: 62 79 20 74 68 65 20 73 61 6d 65 20 70 72 6f 63  by the same proc
07f0: 65 73 73 20 75 73 69 6e 67 20 61 20 64 69 66 66  ess using a diff
0800: 65 72 65 6e 74 0a 2a 2a 20 66 69 6c 65 20 64 65  erent.** file de
0810: 73 63 72 69 70 74 6f 72 2e 20 20 43 6f 6e 73 69  scriptor.  Consi
0820: 64 65 72 20 74 68 69 73 20 74 65 73 74 20 63 61  der this test ca
0830: 73 65 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20  se:.**.**       
0840: 69 6e 74 20 66 64 31 20 3d 20 6f 70 65 6e 28 22  int fd1 = open("
0850: 2e 2f 66 69 6c 65 31 22 2c 20 4f 5f 52 44 57 52  ./file1", O_RDWR
0860: 7c 4f 5f 43 52 45 41 54 2c 20 30 36 34 34 29 3b  |O_CREAT, 0644);
0870: 0a 2a 2a 20 20 20 20 20 20 20 69 6e 74 20 66 64  .**       int fd
0880: 32 20 3d 20 6f 70 65 6e 28 22 2e 2f 66 69 6c 65  2 = open("./file
0890: 32 22 2c 20 4f 5f 52 44 57 52 7c 4f 5f 43 52 45  2", O_RDWR|O_CRE
08a0: 41 54 2c 20 30 36 34 34 29 3b 0a 2a 2a 0a 2a 2a  AT, 0644);.**.**
08b0: 20 53 75 70 70 6f 73 65 20 2e 2f 66 69 6c 65 31   Suppose ./file1
08c0: 20 61 6e 64 20 2e 2f 66 69 6c 65 32 20 61 72 65   and ./file2 are
08d0: 20 72 65 61 6c 6c 79 20 74 68 65 20 73 61 6d 65   really the same
08e0: 20 66 69 6c 65 20 28 62 65 63 61 75 73 65 0a 2a   file (because.*
08f0: 2a 20 6f 6e 65 20 69 73 20 61 20 68 61 72 64 20  * one is a hard 
0900: 6f 72 20 73 79 6d 62 6f 6c 69 63 20 6c 69 6e 6b  or symbolic link
0910: 20 74 6f 20 74 68 65 20 6f 74 68 65 72 29 20 74   to the other) t
0920: 68 65 6e 20 69 66 20 79 6f 75 20 73 65 74 0a 2a  hen if you set.*
0930: 2a 20 61 6e 20 65 78 63 6c 75 73 69 76 65 20 6c  * an exclusive l
0940: 6f 63 6b 20 6f 6e 20 66 64 31 2c 20 74 68 65 6e  ock on fd1, then
0950: 20 74 72 79 20 74 6f 20 67 65 74 20 61 6e 20 65   try to get an e
0960: 78 63 6c 75 73 69 76 65 20 6c 6f 63 6b 0a 2a 2a  xclusive lock.**
0970: 20 6f 6e 20 66 64 32 2c 20 69 74 20 77 6f 72 6b   on fd2, it work
0980: 73 2e 20 20 49 20 77 6f 75 6c 64 20 68 61 76 65  s.  I would have
0990: 20 65 78 70 65 63 74 65 64 20 74 68 65 20 73 65   expected the se
09a0: 63 6f 6e 64 20 6c 6f 63 6b 20 74 6f 0a 2a 2a 20  cond lock to.** 
09b0: 66 61 69 6c 20 73 69 6e 63 65 20 74 68 65 72 65  fail since there
09c0: 20 77 61 73 20 61 6c 72 65 61 64 79 20 61 20 6c   was already a l
09d0: 6f 63 6b 20 6f 6e 20 74 68 65 20 66 69 6c 65 20  ock on the file 
09e0: 64 75 65 20 74 6f 20 66 64 31 2e 0a 2a 2a 20 42  due to fd1..** B
09f0: 75 74 20 6e 6f 74 20 73 6f 2e 20 20 53 69 6e 63  ut not so.  Sinc
0a00: 65 20 62 6f 74 68 20 6c 6f 63 6b 73 20 63 61 6d  e both locks cam
0a10: 65 20 66 72 6f 6d 20 74 68 65 20 73 61 6d 65 20  e from the same 
0a20: 70 72 6f 63 65 73 73 2c 20 74 68 65 0a 2a 2a 20  process, the.** 
0a30: 73 65 63 6f 6e 64 20 6f 76 65 72 72 69 64 65 73  second overrides
0a40: 20 74 68 65 20 66 69 72 73 74 2c 20 65 76 65 6e   the first, even
0a50: 20 74 68 6f 75 67 68 20 74 68 65 79 20 77 65 72   though they wer
0a60: 65 20 6f 6e 20 64 69 66 66 65 72 65 6e 74 0a 2a  e on different.*
0a70: 2a 20 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f  * file descripto
0a80: 72 73 20 6f 70 65 6e 65 64 20 6f 6e 20 64 69 66  rs opened on dif
0a90: 66 65 72 65 6e 74 20 66 69 6c 65 20 6e 61 6d 65  ferent file name
0aa0: 73 2e 0a 2a 2a 0a 2a 2a 20 42 75 6d 6d 65 72 2e  s..**.** Bummer.
0ab0: 20 20 49 66 20 79 6f 75 20 61 73 6b 20 6d 65 2c    If you ask me,
0ac0: 20 74 68 69 73 20 69 73 20 62 72 6f 6b 65 6e 2e   this is broken.
0ad0: 20 20 42 61 64 6c 79 20 62 72 6f 6b 65 6e 2e 20    Badly broken. 
0ae0: 20 49 74 20 6d 65 61 6e 73 0a 2a 2a 20 74 68 61   It means.** tha
0af0: 74 20 77 65 20 63 61 6e 6e 6f 74 20 75 73 65 20  t we cannot use 
0b00: 50 4f 53 49 58 20 6c 6f 63 6b 73 20 74 6f 20 73  POSIX locks to s
0b10: 79 6e 63 68 72 6f 6e 69 7a 65 20 66 69 6c 65 20  ynchronize file 
0b20: 61 63 63 65 73 73 20 61 6d 6f 6e 67 0a 2a 2a 20  access among.** 
0b30: 63 6f 6d 70 65 74 69 6e 67 20 74 68 72 65 61 64  competing thread
0b40: 73 20 6f 66 20 74 68 65 20 73 61 6d 65 20 70 72  s of the same pr
0b50: 6f 63 65 73 73 2e 20 20 50 4f 53 49 58 20 6c 6f  ocess.  POSIX lo
0b60: 63 6b 73 20 77 69 6c 6c 20 77 6f 72 6b 20 66 69  cks will work fi
0b70: 6e 65 0a 2a 2a 20 74 6f 20 73 79 6e 63 68 72 6f  ne.** to synchro
0b80: 6e 69 7a 65 20 61 63 63 65 73 73 20 66 6f 72 20  nize access for 
0b90: 74 68 72 65 61 64 73 20 69 6e 20 73 65 70 61 72  threads in separ
0ba0: 61 74 65 20 70 72 6f 63 65 73 73 65 73 2c 20 62  ate processes, b
0bb0: 75 74 20 6e 6f 74 0a 2a 2a 20 74 68 72 65 61 64  ut not.** thread
0bc0: 73 20 77 69 74 68 69 6e 20 74 68 65 20 73 61 6d  s within the sam
0bd0: 65 20 70 72 6f 63 65 73 73 2e 0a 2a 2a 0a 2a 2a  e process..**.**
0be0: 20 54 6f 20 77 6f 72 6b 20 61 72 6f 75 6e 64 20   To work around 
0bf0: 74 68 65 20 70 72 6f 62 6c 65 6d 2c 20 53 51 4c  the problem, SQL
0c00: 69 74 65 20 68 61 73 20 74 6f 20 6d 61 6e 61 67  ite has to manag
0c10: 65 20 66 69 6c 65 20 6c 6f 63 6b 73 20 69 6e 74  e file locks int
0c20: 65 72 6e 61 6c 6c 79 0a 2a 2a 20 6f 6e 20 69 74  ernally.** on it
0c30: 73 20 6f 77 6e 2e 20 20 57 68 65 6e 65 76 65 72  s own.  Whenever
0c40: 20 61 20 6e 65 77 20 64 61 74 61 62 61 73 65 20   a new database 
0c50: 69 73 20 6f 70 65 6e 65 64 2c 20 77 65 20 68 61  is opened, we ha
0c60: 76 65 20 74 6f 20 66 69 6e 64 20 74 68 65 0a 2a  ve to find the.*
0c70: 2a 20 73 70 65 63 69 66 69 63 20 69 6e 6f 64 65  * specific inode
0c80: 20 6f 66 20 74 68 65 20 64 61 74 61 62 61 73 65   of the database
0c90: 20 66 69 6c 65 20 28 74 68 65 20 69 6e 6f 64 65   file (the inode
0ca0: 20 69 73 20 64 65 74 65 72 6d 69 6e 65 64 20 62   is determined b
0cb0: 79 20 74 68 65 0a 2a 2a 20 73 74 5f 64 65 76 20  y the.** st_dev 
0cc0: 61 6e 64 20 73 74 5f 69 6e 6f 20 66 69 65 6c 64  and st_ino field
0cd0: 73 20 6f 66 20 74 68 65 20 73 74 61 74 20 73 74  s of the stat st
0ce0: 72 75 63 74 75 72 65 20 74 68 61 74 20 66 73 74  ructure that fst
0cf0: 61 74 28 29 20 66 69 6c 6c 73 20 69 6e 29 0a 2a  at() fills in).*
0d00: 2a 20 61 6e 64 20 63 68 65 63 6b 20 66 6f 72 20  * and check for 
0d10: 6c 6f 63 6b 73 20 61 6c 72 65 61 64 79 20 65 78  locks already ex
0d20: 69 73 74 69 6e 67 20 6f 6e 20 74 68 61 74 20 69  isting on that i
0d30: 6e 6f 64 65 2e 20 20 57 68 65 6e 20 6c 6f 63 6b  node.  When lock
0d40: 73 20 61 72 65 0a 2a 2a 20 63 72 65 61 74 65 64  s are.** created
0d50: 20 6f 72 20 72 65 6d 6f 76 65 64 2c 20 77 65 20   or removed, we 
0d60: 68 61 76 65 20 74 6f 20 6c 6f 6f 6b 20 61 74 20  have to look at 
0d70: 6f 75 72 20 6f 77 6e 20 69 6e 74 65 72 6e 61 6c  our own internal
0d80: 20 72 65 63 6f 72 64 20 6f 66 20 74 68 65 0a 2a   record of the.*
0d90: 2a 20 6c 6f 63 6b 73 20 74 6f 20 73 65 65 20 69  * locks to see i
0da0: 66 20 61 6e 6f 74 68 65 72 20 74 68 72 65 61 64  f another thread
0db0: 20 68 61 73 20 70 72 65 76 69 6f 75 73 6c 79 20   has previously 
0dc0: 73 65 74 20 61 20 6c 6f 63 6b 20 6f 6e 20 74 68  set a lock on th
0dd0: 61 74 20 73 61 6d 65 0a 2a 2a 20 69 6e 6f 64 65  at same.** inode
0de0: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 4f 73 46 69  ..**.** The OsFi
0df0: 6c 65 20 73 74 72 75 63 74 75 72 65 20 66 6f 72  le structure for
0e00: 20 50 4f 53 49 58 20 69 73 20 6e 6f 20 6c 6f 6e   POSIX is no lon
0e10: 67 65 72 20 6a 75 73 74 20 61 6e 20 69 6e 74 65  ger just an inte
0e20: 67 65 72 20 66 69 6c 65 0a 2a 2a 20 64 65 73 63  ger file.** desc
0e30: 72 69 70 74 6f 72 2e 20 20 49 74 20 69 73 20 6e  riptor.  It is n
0e40: 6f 77 20 61 20 73 74 72 75 63 74 75 72 65 20 74  ow a structure t
0e50: 68 61 74 20 68 6f 6c 64 73 20 74 68 65 20 69 6e  hat holds the in
0e60: 74 65 67 65 72 20 66 69 6c 65 0a 2a 2a 20 64 65  teger file.** de
0e70: 73 63 72 69 70 74 6f 72 20 61 6e 64 20 61 20 70  scriptor and a p
0e80: 6f 69 6e 74 65 72 20 74 6f 20 61 20 73 74 72 75  ointer to a stru
0e90: 63 74 75 72 65 20 74 68 61 74 20 64 65 73 63 72  cture that descr
0ea0: 69 62 65 73 20 74 68 65 20 69 6e 74 65 72 6e 61  ibes the interna
0eb0: 6c 0a 2a 2a 20 6c 6f 63 6b 73 20 6f 6e 20 74 68  l.** locks on th
0ec0: 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20  e corresponding 
0ed0: 69 6e 6f 64 65 2e 20 20 54 68 65 72 65 20 69 73  inode.  There is
0ee0: 20 6f 6e 65 20 6c 6f 63 6b 69 6e 67 20 73 74 72   one locking str
0ef0: 75 63 74 75 72 65 0a 2a 2a 20 70 65 72 20 69 6e  ucture.** per in
0f00: 6f 64 65 2c 20 73 6f 20 69 66 20 74 68 65 20 73  ode, so if the s
0f10: 61 6d 65 20 69 6e 6f 64 65 20 69 73 20 6f 70 65  ame inode is ope
0f20: 6e 65 64 20 74 77 69 63 65 2c 20 62 6f 74 68 20  ned twice, both 
0f30: 4f 73 46 69 6c 65 20 73 74 72 75 63 74 75 72 65  OsFile structure
0f40: 73 0a 2a 2a 20 70 6f 69 6e 74 20 74 6f 20 74 68  s.** point to th
0f50: 65 20 73 61 6d 65 20 6c 6f 63 6b 69 6e 67 20 73  e same locking s
0f60: 74 72 75 63 74 75 72 65 2e 20 20 54 68 65 20 6c  tructure.  The l
0f70: 6f 63 6b 69 6e 67 20 73 74 72 75 63 74 75 72 65  ocking structure
0f80: 20 6b 65 65 70 73 0a 2a 2a 20 61 20 72 65 66 65   keeps.** a refe
0f90: 72 65 6e 63 65 20 63 6f 75 6e 74 20 28 73 6f 20  rence count (so 
0fa0: 77 65 20 77 69 6c 6c 20 6b 6e 6f 77 20 77 68 65  we will know whe
0fb0: 6e 20 74 6f 20 64 65 6c 65 74 65 20 69 74 29 20  n to delete it) 
0fc0: 61 6e 64 20 61 20 22 63 6e 74 22 0a 2a 2a 20 66  and a "cnt".** f
0fd0: 69 65 6c 64 20 74 68 61 74 20 74 65 6c 6c 73 20  ield that tells 
0fe0: 75 73 20 69 74 73 20 69 6e 74 65 72 6e 61 6c 20  us its internal 
0ff0: 6c 6f 63 6b 20 73 74 61 74 75 73 2e 20 20 63 6e  lock status.  cn
1000: 74 3d 3d 30 20 6d 65 61 6e 73 20 74 68 65 0a 2a  t==0 means the.*
1010: 2a 20 66 69 6c 65 20 69 73 20 75 6e 6c 6f 63 6b  * file is unlock
1020: 65 64 2e 20 20 63 6e 74 3d 3d 2d 31 20 6d 65 61  ed.  cnt==-1 mea
1030: 6e 73 20 74 68 65 20 66 69 6c 65 20 68 61 73 20  ns the file has 
1040: 61 6e 20 65 78 63 6c 75 73 69 76 65 20 6c 6f 63  an exclusive loc
1050: 6b 2e 0a 2a 2a 20 63 6e 74 3e 30 20 6d 65 61 6e  k..** cnt>0 mean
1060: 73 20 74 68 65 72 65 20 61 72 65 20 63 6e 74 20  s there are cnt 
1070: 73 68 61 72 65 64 20 6c 6f 63 6b 73 20 6f 6e 20  shared locks on 
1080: 74 68 65 20 66 69 6c 65 2e 0a 2a 2a 0a 2a 2a 20  the file..**.** 
1090: 41 6e 79 20 61 74 74 65 6d 70 74 20 74 6f 20 6c  Any attempt to l
10a0: 6f 63 6b 20 6f 72 20 75 6e 6c 6f 63 6b 20 61 20  ock or unlock a 
10b0: 66 69 6c 65 20 66 69 72 73 74 20 63 68 65 63 6b  file first check
10c0: 73 20 74 68 65 20 6c 6f 63 6b 69 6e 67 0a 2a 2a  s the locking.**
10d0: 20 73 74 72 75 63 74 75 72 65 2e 20 20 54 68 65   structure.  The
10e0: 20 66 63 6e 74 6c 28 29 20 73 79 73 74 65 6d 20   fcntl() system 
10f0: 63 61 6c 6c 20 69 73 20 6f 6e 6c 79 20 69 6e 76  call is only inv
1100: 6f 6b 65 64 20 74 6f 20 73 65 74 20 61 20 0a 2a  oked to set a .*
1110: 2a 20 50 4f 53 49 58 20 6c 6f 63 6b 20 69 66 20  * POSIX lock if 
1120: 74 68 65 20 69 6e 74 65 72 6e 61 6c 20 6c 6f 63  the internal loc
1130: 6b 20 73 74 72 75 63 74 75 72 65 20 74 72 61 6e  k structure tran
1140: 73 69 74 69 6f 6e 73 20 62 65 74 77 65 65 6e 0a  sitions between.
1150: 2a 2a 20 61 20 6c 6f 63 6b 65 64 20 61 6e 64 20  ** a locked and 
1160: 61 6e 20 75 6e 6c 6f 63 6b 65 64 20 73 74 61 74  an unlocked stat
1170: 65 2e 0a 2a 2a 0a 2a 2a 20 32 30 30 34 2d 4a 61  e..**.** 2004-Ja
1180: 6e 2d 31 31 3a 0a 2a 2a 20 4d 6f 72 65 20 72 65  n-11:.** More re
1190: 63 65 6e 74 20 64 69 73 63 6f 76 65 72 69 65 73  cent discoveries
11a0: 20 61 62 6f 75 74 20 50 4f 53 49 58 20 61 64 76   about POSIX adv
11b0: 69 73 6f 72 79 20 6c 6f 63 6b 73 2e 20 20 28 54  isory locks.  (T
11c0: 68 65 20 6d 6f 72 65 0a 2a 2a 20 49 20 64 69 73  he more.** I dis
11d0: 63 6f 76 65 72 2c 20 74 68 65 20 6d 6f 72 65 20  cover, the more 
11e0: 49 20 72 65 61 6c 69 7a 65 20 74 68 65 20 61 20  I realize the a 
11f0: 50 4f 53 49 58 20 61 64 76 69 73 6f 72 79 20 6c  POSIX advisory l
1200: 6f 63 6b 73 20 61 72 65 0a 2a 2a 20 61 6e 20 61  ocks are.** an a
1210: 62 6f 6d 69 6e 61 74 69 6f 6e 2e 29 0a 2a 2a 0a  bomination.).**.
1220: 2a 2a 20 49 66 20 79 6f 75 20 63 6c 6f 73 65 20  ** If you close 
1230: 61 20 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f  a file descripto
1240: 72 20 74 68 61 74 20 70 6f 69 6e 74 73 20 74 6f  r that points to
1250: 20 61 20 66 69 6c 65 20 74 68 61 74 20 68 61 73   a file that has
1260: 20 6c 6f 63 6b 73 2c 0a 2a 2a 20 61 6c 6c 20 6c   locks,.** all l
1270: 6f 63 6b 73 20 6f 6e 20 74 68 61 74 20 66 69 6c  ocks on that fil
1280: 65 20 74 68 61 74 20 61 72 65 20 6f 77 6e 65 64  e that are owned
1290: 20 62 79 20 74 68 65 20 63 75 72 72 65 6e 74 20   by the current 
12a0: 70 72 6f 63 65 73 73 20 61 72 65 0a 2a 2a 20 72  process are.** r
12b0: 65 6c 65 61 73 65 64 2e 20 20 54 6f 20 77 6f 72  eleased.  To wor
12c0: 6b 20 61 72 6f 75 6e 64 20 74 68 69 73 20 70 72  k around this pr
12d0: 6f 62 6c 65 6d 2c 20 65 61 63 68 20 4f 73 46 69  oblem, each OsFi
12e0: 6c 65 20 73 74 72 75 63 74 75 72 65 20 63 6f 6e  le structure con
12f0: 74 61 69 6e 73 0a 2a 2a 20 61 20 70 6f 69 6e 74  tains.** a point
1300: 65 72 20 74 6f 20 61 6e 20 6f 70 65 6e 43 6e 74  er to an openCnt
1310: 20 73 74 72 75 63 74 75 72 65 2e 20 20 54 68 65   structure.  The
1320: 72 65 20 69 73 20 6f 6e 65 20 6f 70 65 6e 43 6e  re is one openCn
1330: 74 20 73 74 72 75 63 74 75 72 65 0a 2a 2a 20 70  t structure.** p
1340: 65 72 20 6f 70 65 6e 20 69 6e 6f 64 65 2c 20 77  er open inode, w
1350: 68 69 63 68 20 6d 65 61 6e 73 20 74 68 61 74 20  hich means that 
1360: 6d 75 6c 74 69 70 6c 65 20 4f 73 46 69 6c 65 73  multiple OsFiles
1370: 20 63 61 6e 20 70 6f 69 6e 74 20 74 6f 20 61 20   can point to a 
1380: 73 69 6e 67 6c 65 0a 2a 2a 20 6f 70 65 6e 43 6e  single.** openCn
1390: 74 2e 20 20 57 68 65 6e 20 61 6e 20 61 74 74 65  t.  When an atte
13a0: 6d 70 74 20 69 73 20 6d 61 64 65 20 74 6f 20 63  mpt is made to c
13b0: 6c 6f 73 65 20 61 6e 20 4f 73 46 69 6c 65 2c 20  lose an OsFile, 
13c0: 69 66 20 74 68 65 72 65 20 61 72 65 0a 2a 2a 20  if there are.** 
13d0: 6f 74 68 65 72 20 4f 73 46 69 6c 65 73 20 6f 70  other OsFiles op
13e0: 65 6e 20 6f 6e 20 74 68 65 20 73 61 6d 65 20 69  en on the same i
13f0: 6e 6f 64 65 20 74 68 61 74 20 61 72 65 20 68 6f  node that are ho
1400: 6c 64 69 6e 67 20 6c 6f 63 6b 73 2c 20 74 68 65  lding locks, the
1410: 20 63 61 6c 6c 0a 2a 2a 20 74 6f 20 63 6c 6f 73   call.** to clos
1420: 65 28 29 20 74 68 65 20 66 69 6c 65 20 64 65 73  e() the file des
1430: 63 72 69 70 74 6f 72 20 69 73 20 64 65 66 65 72  criptor is defer
1440: 72 65 64 20 75 6e 74 69 6c 20 61 6c 6c 20 6f 66  red until all of
1450: 20 74 68 65 20 6c 6f 63 6b 73 20 63 6c 65 61 72   the locks clear
1460: 2e 0a 2a 2a 20 54 68 65 20 6f 70 65 6e 43 6e 74  ..** The openCnt
1470: 20 73 74 72 75 63 74 75 72 65 20 6b 65 65 70 73   structure keeps
1480: 20 61 20 6c 69 73 74 20 6f 66 20 66 69 6c 65 20   a list of file 
1490: 64 65 73 63 72 69 70 74 6f 72 73 20 74 68 61 74  descriptors that
14a0: 20 6e 65 65 64 20 74 6f 0a 2a 2a 20 62 65 20 63   need to.** be c
14b0: 6c 6f 73 65 64 20 61 6e 64 20 74 68 61 74 20 6c  losed and that l
14c0: 69 73 74 20 69 73 20 77 61 6c 6b 65 64 20 28 61  ist is walked (a
14d0: 6e 64 20 63 6c 65 61 72 65 64 29 20 77 68 65 6e  nd cleared) when
14e0: 20 74 68 65 20 6c 61 73 74 20 6c 6f 63 6b 0a 2a   the last lock.*
14f0: 2a 20 63 6c 65 61 72 73 2e 0a 2a 2a 0a 2a 2a 20  * clears..**.** 
1500: 46 69 72 73 74 2c 20 75 6e 64 65 72 20 4c 69 6e  First, under Lin
1510: 75 78 20 74 68 72 65 61 64 73 2c 20 62 65 63 61  ux threads, beca
1520: 75 73 65 20 65 61 63 68 20 74 68 72 65 61 64 20  use each thread 
1530: 68 61 73 20 61 20 73 65 70 61 72 61 74 65 0a 2a  has a separate.*
1540: 2a 20 70 72 6f 63 65 73 73 20 49 44 2c 20 6c 6f  * process ID, lo
1550: 63 6b 20 6f 70 65 72 61 74 69 6f 6e 73 20 69 6e  ck operations in
1560: 20 6f 6e 65 20 74 68 72 65 61 64 20 64 6f 20 6e   one thread do n
1570: 6f 74 20 6f 76 65 72 72 69 64 65 20 6c 6f 63 6b  ot override lock
1580: 73 0a 2a 2a 20 74 6f 20 74 68 65 20 73 61 6d 65  s.** to the same
1590: 20 66 69 6c 65 20 69 6e 20 6f 74 68 65 72 20 74   file in other t
15a0: 68 72 65 61 64 73 2e 20 20 4c 69 6e 75 78 20 74  hreads.  Linux t
15b0: 68 72 65 61 64 73 20 62 65 68 61 76 65 20 6c 69  hreads behave li
15c0: 6b 65 0a 2a 2a 20 73 65 70 61 72 61 74 65 20 70  ke.** separate p
15d0: 72 6f 63 65 73 73 65 73 20 69 6e 20 74 68 69 73  rocesses in this
15e0: 20 72 65 73 70 65 63 74 2e 20 20 42 75 74 2c 20   respect.  But, 
15f0: 69 66 20 79 6f 75 20 63 6c 6f 73 65 20 61 20 66  if you close a f
1600: 69 6c 65 0a 2a 2a 20 64 65 73 63 72 69 70 74 6f  ile.** descripto
1610: 72 20 69 6e 20 6c 69 6e 75 78 20 74 68 72 65 61  r in linux threa
1620: 64 73 2c 20 61 6c 6c 20 6c 6f 63 6b 73 20 61 72  ds, all locks ar
1630: 65 20 63 6c 65 61 72 65 64 2c 20 65 76 65 6e 20  e cleared, even 
1640: 6c 6f 63 6b 73 0a 2a 2a 20 6f 6e 20 6f 74 68 65  locks.** on othe
1650: 72 20 74 68 72 65 61 64 73 20 61 6e 64 20 65 76  r threads and ev
1660: 65 6e 20 74 68 6f 75 67 68 20 74 68 65 20 6f 74  en though the ot
1670: 68 65 72 20 74 68 72 65 61 64 73 20 68 61 76 65  her threads have
1680: 20 64 69 66 66 65 72 65 6e 74 0a 2a 2a 20 70 72   different.** pr
1690: 6f 63 65 73 73 20 49 44 73 2e 20 20 4c 69 6e 75  ocess IDs.  Linu
16a0: 78 20 74 68 72 65 61 64 73 20 69 73 20 69 6e 63  x threads is inc
16b0: 6f 6e 73 69 73 74 65 6e 74 20 69 6e 20 74 68 69  onsistent in thi
16c0: 73 20 72 65 73 70 65 63 74 2e 0a 2a 2a 20 28 49  s respect..** (I
16d0: 27 6d 20 62 65 67 69 6e 6e 69 6e 67 20 74 6f 20  'm beginning to 
16e0: 74 68 69 6e 6b 20 74 68 61 74 20 6c 69 6e 75 78  think that linux
16f0: 20 74 68 72 65 61 64 73 20 69 73 20 61 6e 20 61   threads is an a
1700: 62 6f 6d 69 6e 61 74 69 6f 6e 20 74 6f 6f 2e 29  bomination too.)
1710: 0a 2a 2a 20 54 68 65 20 63 6f 6e 73 65 71 75 65  .** The conseque
1720: 6e 63 65 20 6f 66 20 74 68 69 73 20 61 6c 6c 20  nce of this all 
1730: 69 73 20 74 68 61 74 20 74 68 65 20 68 61 73 68  is that the hash
1740: 20 74 61 62 6c 65 20 66 6f 72 20 74 68 65 20 6c   table for the l
1750: 6f 63 6b 49 6e 66 6f 0a 2a 2a 20 73 74 72 75 63  ockInfo.** struc
1760: 74 75 72 65 20 68 61 73 20 74 6f 20 69 6e 63 6c  ture has to incl
1770: 75 64 65 20 74 68 65 20 70 72 6f 63 65 73 73 20  ude the process 
1780: 69 64 20 61 73 20 70 61 72 74 20 6f 66 20 69 74  id as part of it
1790: 73 20 6b 65 79 20 62 65 63 61 75 73 65 0a 2a 2a  s key because.**
17a0: 20 6c 6f 63 6b 73 20 69 6e 20 64 69 66 66 65 72   locks in differ
17b0: 65 6e 74 20 74 68 72 65 61 64 73 20 61 72 65 20  ent threads are 
17c0: 74 72 65 61 74 65 64 20 61 73 20 64 69 73 74 69  treated as disti
17d0: 6e 63 74 2e 20 20 42 75 74 20 74 68 65 20 0a 2a  nct.  But the .*
17e0: 2a 20 6f 70 65 6e 43 6e 74 20 73 74 72 75 63 74  * openCnt struct
17f0: 75 72 65 20 73 68 6f 75 6c 64 20 6e 6f 74 20 69  ure should not i
1800: 6e 63 6c 75 64 65 20 74 68 65 20 70 72 6f 63 65  nclude the proce
1810: 73 73 20 69 64 20 69 6e 20 69 74 73 0a 2a 2a 20  ss id in its.** 
1820: 6b 65 79 20 62 65 63 61 75 73 65 20 63 6c 6f 73  key because clos
1830: 65 28 29 20 63 6c 65 61 72 73 20 6c 6f 63 6b 20  e() clears lock 
1840: 6f 6e 20 61 6c 6c 20 74 68 72 65 61 64 73 2c 20  on all threads, 
1850: 6e 6f 74 20 6a 75 73 74 20 74 68 65 20 63 75 72  not just the cur
1860: 72 65 6e 74 0a 2a 2a 20 74 68 72 65 61 64 2e 20  rent.** thread. 
1870: 20 57 65 72 65 20 69 74 20 6e 6f 74 20 66 6f 72   Were it not for
1880: 20 74 68 69 73 20 67 6f 6f 66 69 6e 65 73 73 20   this goofiness 
1890: 69 6e 20 6c 69 6e 75 78 20 74 68 72 65 61 64 73  in linux threads
18a0: 2c 20 77 65 20 63 6f 75 6c 64 0a 2a 2a 20 63 6f  , we could.** co
18b0: 6d 62 69 6e 65 20 74 68 65 20 6c 6f 63 6b 49 6e  mbine the lockIn
18c0: 66 6f 20 61 6e 64 20 6f 70 65 6e 43 6e 74 20 73  fo and openCnt s
18d0: 74 72 75 63 74 75 72 65 73 20 69 6e 74 6f 20 61  tructures into a
18e0: 20 73 69 6e 67 6c 65 20 73 74 72 75 63 74 75 72   single structur
18f0: 65 2e 0a 2a 2a 0a 2a 2a 20 32 30 30 34 2d 4a 75  e..**.** 2004-Ju
1900: 6e 2d 32 38 3a 0a 2a 2a 20 4f 6e 20 73 6f 6d 65  n-28:.** On some
1910: 20 76 65 72 73 69 6f 6e 73 20 6f 66 20 6c 69 6e   versions of lin
1920: 75 78 2c 20 74 68 72 65 61 64 73 20 63 61 6e 20  ux, threads can 
1930: 6f 76 65 72 72 69 64 65 20 65 61 63 68 20 6f 74  override each ot
1940: 68 65 72 73 20 6c 6f 63 6b 73 2e 0a 2a 2a 20 4f  hers locks..** O
1950: 6e 20 6f 74 68 65 72 73 20 6e 6f 74 2e 20 20 53  n others not.  S
1960: 6f 6d 65 74 69 6d 65 73 20 79 6f 75 20 63 61 6e  ometimes you can
1970: 20 63 68 61 6e 67 65 20 74 68 65 20 62 65 68 61   change the beha
1980: 76 69 6f 72 20 6f 6e 20 74 68 65 20 73 61 6d 65  vior on the same
1990: 0a 2a 2a 20 73 79 73 74 65 6d 20 62 79 20 73 65  .** system by se
19a0: 74 74 69 6e 67 20 74 68 65 20 4c 44 5f 41 53 53  tting the LD_ASS
19b0: 55 4d 45 5f 4b 45 52 4e 45 4c 20 65 6e 76 69 72  UME_KERNEL envir
19c0: 6f 6e 6d 65 6e 74 20 76 61 72 69 61 62 6c 65 2e  onment variable.
19d0: 20 20 54 68 65 0a 2a 2a 20 50 4f 53 49 58 20 73    The.** POSIX s
19e0: 74 61 6e 64 61 72 64 20 69 73 20 73 69 6c 65 6e  tandard is silen
19f0: 74 20 61 73 20 74 6f 20 77 68 69 63 68 20 62 65  t as to which be
1a00: 68 61 76 69 6f 72 20 69 73 20 63 6f 72 72 65 63  havior is correc
1a10: 74 2c 20 61 73 20 66 61 72 0a 2a 2a 20 61 73 20  t, as far.** as 
1a20: 49 20 63 61 6e 20 74 65 6c 6c 2c 20 73 6f 20 6f  I can tell, so o
1a30: 74 68 65 72 20 76 65 72 73 69 6f 6e 73 20 6f 66  ther versions of
1a40: 20 75 6e 69 78 20 6d 69 67 68 74 20 73 68 6f 77   unix might show
1a50: 20 74 68 65 20 73 61 6d 65 0a 2a 2a 20 69 6e 63   the same.** inc
1a60: 6f 6e 73 69 73 74 65 6e 63 79 2e 20 20 54 68 65  onsistency.  The
1a70: 72 65 20 69 73 20 6e 6f 20 6c 69 74 74 6c 65 20  re is no little 
1a80: 64 6f 75 62 74 20 69 6e 20 6d 79 20 6d 69 6e 64  doubt in my mind
1a90: 20 74 68 61 74 20 70 6f 73 69 78 0a 2a 2a 20 61   that posix.** a
1aa0: 64 76 69 73 6f 72 79 20 6c 6f 63 6b 73 20 61 6e  dvisory locks an
1ab0: 64 20 6c 69 6e 75 78 20 74 68 72 65 61 64 73 20  d linux threads 
1ac0: 61 72 65 20 70 72 6f 66 6f 75 6e 64 6c 79 20 62  are profoundly b
1ad0: 72 6f 6b 65 6e 2e 0a 2a 2a 0a 2a 2a 20 54 6f 20  roken..**.** To 
1ae0: 77 6f 72 6b 20 61 72 6f 75 6e 64 20 74 68 65 20  work around the 
1af0: 69 6e 63 6f 6e 73 69 73 74 65 6e 63 69 65 73 2c  inconsistencies,
1b00: 20 77 65 20 68 61 76 65 20 74 6f 20 74 65 73 74   we have to test
1b10: 20 61 74 20 72 75 6e 74 69 6d 65 20 0a 2a 2a 20   at runtime .** 
1b20: 77 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74  whether or not t
1b30: 68 72 65 61 64 73 20 63 61 6e 20 6f 76 65 72 72  hreads can overr
1b40: 69 64 65 20 65 61 63 68 20 6f 74 68 65 72 73 20  ide each others 
1b50: 6c 6f 63 6b 73 2e 20 20 54 68 69 73 20 74 65 73  locks.  This tes
1b60: 74 0a 2a 2a 20 69 73 20 72 75 6e 20 6f 6e 63 65  t.** is run once
1b70: 2c 20 74 68 65 20 66 69 72 73 74 20 74 69 6d 65  , the first time
1b80: 20 61 6e 79 20 6c 6f 63 6b 20 69 73 20 61 74 74   any lock is att
1b90: 65 6d 70 74 65 64 2e 20 20 41 20 73 74 61 74 69  empted.  A stati
1ba0: 63 20 0a 2a 2a 20 76 61 72 69 61 62 6c 65 20 69  c .** variable i
1bb0: 73 20 73 65 74 20 74 6f 20 72 65 63 6f 72 64 20  s set to record 
1bc0: 74 68 65 20 72 65 73 75 6c 74 73 20 6f 66 20 74  the results of t
1bd0: 68 69 73 20 74 65 73 74 20 66 6f 72 20 66 75 74  his test for fut
1be0: 75 72 65 0a 2a 2a 20 75 73 65 2e 0a 2a 2f 0a 0a  ure.** use..*/..
1bf0: 2f 2a 0a 2a 2a 20 41 6e 20 69 6e 73 74 61 6e 63  /*.** An instanc
1c00: 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69  e of the followi
1c10: 6e 67 20 73 74 72 75 63 74 75 72 65 20 73 65 72  ng structure ser
1c20: 76 65 73 20 61 73 20 74 68 65 20 6b 65 79 20 75  ves as the key u
1c30: 73 65 64 0a 2a 2a 20 74 6f 20 6c 6f 63 61 74 65  sed.** to locate
1c40: 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 6c 6f   a particular lo
1c50: 63 6b 49 6e 66 6f 20 73 74 72 75 63 74 75 72 65  ckInfo structure
1c60: 20 67 69 76 65 6e 20 69 74 73 20 69 6e 6f 64 65   given its inode
1c70: 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68 72 65 61  ..**.** If threa
1c80: 64 73 20 63 61 6e 6e 6f 74 20 6f 76 65 72 72 69  ds cannot overri
1c90: 64 65 20 65 61 63 68 20 6f 74 68 65 72 73 20 6c  de each others l
1ca0: 6f 63 6b 73 2c 20 74 68 65 6e 20 77 65 20 73 65  ocks, then we se
1cb0: 74 20 74 68 65 0a 2a 2a 20 6c 6f 63 6b 4b 65 79  t the.** lockKey
1cc0: 2e 74 69 64 20 66 69 65 6c 64 20 74 6f 20 74 68  .tid field to th
1cd0: 65 20 74 68 72 65 61 64 20 49 44 2e 20 20 49 66  e thread ID.  If
1ce0: 20 74 68 72 65 61 64 73 20 63 61 6e 20 6f 76 65   threads can ove
1cf0: 72 72 69 64 65 0a 2a 2a 20 65 61 63 68 20 6f 74  rride.** each ot
1d00: 68 65 72 73 20 6c 6f 63 6b 73 20 74 68 65 6e 20  hers locks then 
1d10: 74 69 64 20 69 73 20 61 6c 77 61 79 73 20 73 65  tid is always se
1d20: 74 20 74 6f 20 7a 65 72 6f 2e 20 20 74 69 64 20  t to zero.  tid 
1d30: 69 73 20 61 6c 73 6f 0a 2a 2a 20 73 65 74 20 74  is also.** set t
1d40: 6f 20 7a 65 72 6f 20 69 66 20 77 65 20 63 6f 6d  o zero if we com
1d50: 70 69 6c 65 20 77 69 74 68 6f 75 74 20 74 68 72  pile without thr
1d60: 65 61 64 69 6e 67 20 73 75 70 70 6f 72 74 2e 0a  eading support..
1d70: 2a 2f 0a 73 74 72 75 63 74 20 6c 6f 63 6b 4b 65  */.struct lockKe
1d80: 79 20 7b 0a 20 20 64 65 76 5f 74 20 64 65 76 3b  y {.  dev_t dev;
1d90: 20 20 20 20 20 20 20 2f 2a 20 44 65 76 69 63 65         /* Device
1da0: 20 6e 75 6d 62 65 72 20 2a 2f 0a 20 20 69 6e 6f   number */.  ino
1db0: 5f 74 20 69 6e 6f 3b 20 20 20 20 20 20 20 2f 2a  _t ino;       /*
1dc0: 20 49 6e 6f 64 65 20 6e 75 6d 62 65 72 20 2a 2f   Inode number */
1dd0: 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 55  .#ifdef SQLITE_U
1de0: 4e 49 58 5f 54 48 52 45 41 44 53 0a 20 20 70 74  NIX_THREADS.  pt
1df0: 68 72 65 61 64 5f 74 20 74 69 64 3b 20 20 20 2f  hread_t tid;   /
1e00: 2a 20 54 68 72 65 61 64 20 49 44 20 6f 72 20 7a  * Thread ID or z
1e10: 65 72 6f 20 69 66 20 74 68 72 65 61 64 73 20 63  ero if threads c
1e20: 61 6e 6e 6f 74 20 6f 76 65 72 72 69 64 65 20 65  annot override e
1e30: 61 63 68 20 6f 74 68 65 72 20 2a 2f 0a 23 65 6e  ach other */.#en
1e40: 64 69 66 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 41 6e  dif.};../*.** An
1e50: 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68 65   instance of the
1e60: 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63   following struc
1e70: 74 75 72 65 20 69 73 20 61 6c 6c 6f 63 61 74 65  ture is allocate
1e80: 64 20 66 6f 72 20 65 61 63 68 20 6f 70 65 6e 0a  d for each open.
1e90: 2a 2a 20 69 6e 6f 64 65 20 6f 6e 20 65 61 63 68  ** inode on each
1ea0: 20 74 68 72 65 61 64 20 77 69 74 68 20 61 20 64   thread with a d
1eb0: 69 66 66 65 72 65 6e 74 20 70 72 6f 63 65 73 73  ifferent process
1ec0: 20 49 44 2e 20 20 28 54 68 72 65 61 64 73 20 68   ID.  (Threads h
1ed0: 61 76 65 0a 2a 2a 20 64 69 66 66 65 72 65 6e 74  ave.** different
1ee0: 20 70 72 6f 63 65 73 73 20 49 44 73 20 6f 6e 20   process IDs on 
1ef0: 6c 69 6e 75 78 2c 20 62 75 74 20 6e 6f 74 20 6f  linux, but not o
1f00: 6e 20 6d 6f 73 74 20 6f 74 68 65 72 20 75 6e 69  n most other uni
1f10: 78 65 73 2e 29 0a 2a 2a 0a 2a 2a 20 41 20 73 69  xes.).**.** A si
1f20: 6e 67 6c 65 20 69 6e 6f 64 65 20 63 61 6e 20 68  ngle inode can h
1f30: 61 76 65 20 6d 75 6c 74 69 70 6c 65 20 66 69 6c  ave multiple fil
1f40: 65 20 64 65 73 63 72 69 70 74 6f 72 73 2c 20 73  e descriptors, s
1f50: 6f 20 65 61 63 68 20 4f 73 46 69 6c 65 0a 2a 2a  o each OsFile.**
1f60: 20 73 74 72 75 63 74 75 72 65 20 63 6f 6e 74 61   structure conta
1f70: 69 6e 73 20 61 20 70 6f 69 6e 74 65 72 20 74 6f  ins a pointer to
1f80: 20 61 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20   an instance of 
1f90: 74 68 69 73 20 6f 62 6a 65 63 74 20 61 6e 64 20  this object and 
1fa0: 74 68 69 73 0a 2a 2a 20 6f 62 6a 65 63 74 20 6b  this.** object k
1fb0: 65 65 70 73 20 61 20 63 6f 75 6e 74 20 6f 66 20  eeps a count of 
1fc0: 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 4f 73  the number of Os
1fd0: 46 69 6c 65 73 20 70 6f 69 6e 74 69 6e 67 20 74  Files pointing t
1fe0: 6f 20 69 74 2e 0a 2a 2f 0a 73 74 72 75 63 74 20  o it..*/.struct 
1ff0: 6c 6f 63 6b 49 6e 66 6f 20 7b 0a 20 20 73 74 72  lockInfo {.  str
2000: 75 63 74 20 6c 6f 63 6b 4b 65 79 20 6b 65 79 3b  uct lockKey key;
2010: 20 20 2f 2a 20 54 68 65 20 6c 6f 6f 6b 75 70 20    /* The lookup 
2020: 6b 65 79 20 2a 2f 0a 20 20 69 6e 74 20 63 6e 74  key */.  int cnt
2030: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a  ;             /*
2040: 20 4e 75 6d 62 65 72 20 6f 66 20 53 48 41 52 45   Number of SHARE
2050: 44 20 6c 6f 63 6b 73 20 68 65 6c 64 20 2a 2f 0a  D locks held */.
2060: 20 20 69 6e 74 20 6c 6f 63 6b 74 79 70 65 3b 20    int locktype; 
2070: 20 20 20 20 20 20 20 2f 2a 20 4f 6e 65 20 6f 66         /* One of
2080: 20 53 48 41 52 45 44 5f 4c 4f 43 4b 2c 20 52 45   SHARED_LOCK, RE
2090: 53 45 52 56 45 44 5f 4c 4f 43 4b 20 65 74 63 2e  SERVED_LOCK etc.
20a0: 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65 66 3b 20   */.  int nRef; 
20b0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75             /* Nu
20c0: 6d 62 65 72 20 6f 66 20 70 6f 69 6e 74 65 72 73  mber of pointers
20d0: 20 74 6f 20 74 68 69 73 20 73 74 72 75 63 74 75   to this structu
20e0: 72 65 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20  re */.};../*.** 
20f0: 41 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74  An instance of t
2100: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72  he following str
2110: 75 63 74 75 72 65 20 73 65 72 76 65 73 20 61 73  ucture serves as
2120: 20 74 68 65 20 6b 65 79 20 75 73 65 64 0a 2a 2a   the key used.**
2130: 20 74 6f 20 6c 6f 63 61 74 65 20 61 20 70 61 72   to locate a par
2140: 74 69 63 75 6c 61 72 20 6f 70 65 6e 43 6e 74 20  ticular openCnt 
2150: 73 74 72 75 63 74 75 72 65 20 67 69 76 65 6e 20  structure given 
2160: 69 74 73 20 69 6e 6f 64 65 2e 20 20 54 68 69 73  its inode.  This
2170: 0a 2a 2a 20 69 73 20 74 68 65 20 73 61 6d 65 20  .** is the same 
2180: 61 73 20 74 68 65 20 6c 6f 63 6b 4b 65 79 20 65  as the lockKey e
2190: 78 63 65 70 74 20 74 68 61 74 20 74 68 65 20 74  xcept that the t
21a0: 68 72 65 61 64 20 49 44 20 69 73 20 6f 6d 69 74  hread ID is omit
21b0: 74 65 64 2e 0a 2a 2f 0a 73 74 72 75 63 74 20 6f  ted..*/.struct o
21c0: 70 65 6e 4b 65 79 20 7b 0a 20 20 64 65 76 5f 74  penKey {.  dev_t
21d0: 20 64 65 76 3b 20 20 20 2f 2a 20 44 65 76 69 63   dev;   /* Devic
21e0: 65 20 6e 75 6d 62 65 72 20 2a 2f 0a 20 20 69 6e  e number */.  in
21f0: 6f 5f 74 20 69 6e 6f 3b 20 20 20 2f 2a 20 49 6e  o_t ino;   /* In
2200: 6f 64 65 20 6e 75 6d 62 65 72 20 2a 2f 0a 7d 3b  ode number */.};
2210: 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20 69 6e 73 74 61  ../*.** An insta
2220: 6e 63 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f  nce of the follo
2230: 77 69 6e 67 20 73 74 72 75 63 74 75 72 65 20 69  wing structure i
2240: 73 20 61 6c 6c 6f 63 61 74 65 64 20 66 6f 72 20  s allocated for 
2250: 65 61 63 68 20 6f 70 65 6e 0a 2a 2a 20 69 6e 6f  each open.** ino
2260: 64 65 2e 20 20 54 68 69 73 20 73 74 72 75 63 74  de.  This struct
2270: 75 72 65 20 6b 65 65 70 73 20 74 72 61 63 6b 20  ure keeps track 
2280: 6f 66 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66  of the number of
2290: 20 6c 6f 63 6b 73 20 6f 6e 20 74 68 61 74 0a 2a   locks on that.*
22a0: 2a 20 69 6e 6f 64 65 2e 20 20 49 66 20 61 20 63  * inode.  If a c
22b0: 6c 6f 73 65 20 69 73 20 61 74 74 65 6d 70 74 65  lose is attempte
22c0: 64 20 61 67 61 69 6e 73 74 20 61 6e 20 69 6e 6f  d against an ino
22d0: 64 65 20 74 68 61 74 20 69 73 20 68 6f 6c 64 69  de that is holdi
22e0: 6e 67 0a 2a 2a 20 6c 6f 63 6b 73 2c 20 74 68 65  ng.** locks, the
22f0: 20 63 6c 6f 73 65 20 69 73 20 64 65 66 65 72 72   close is deferr
2300: 65 64 20 75 6e 74 69 6c 20 61 6c 6c 20 6c 6f 63  ed until all loc
2310: 6b 73 20 63 6c 65 61 72 20 62 79 20 61 64 64 69  ks clear by addi
2320: 6e 67 20 74 68 65 0a 2a 2a 20 66 69 6c 65 20 64  ng the.** file d
2330: 65 73 63 72 69 70 74 6f 72 20 74 6f 20 62 65 20  escriptor to be 
2340: 63 6c 6f 73 65 64 20 74 6f 20 74 68 65 20 70 65  closed to the pe
2350: 6e 64 69 6e 67 20 6c 69 73 74 2e 0a 2a 2f 0a 73  nding list..*/.s
2360: 74 72 75 63 74 20 6f 70 65 6e 43 6e 74 20 7b 0a  truct openCnt {.
2370: 20 20 73 74 72 75 63 74 20 6f 70 65 6e 4b 65 79    struct openKey
2380: 20 6b 65 79 3b 20 20 20 2f 2a 20 54 68 65 20 6c   key;   /* The l
2390: 6f 6f 6b 75 70 20 6b 65 79 20 2a 2f 0a 20 20 69  ookup key */.  i
23a0: 6e 74 20 6e 52 65 66 3b 20 20 20 20 20 20 20 20  nt nRef;        
23b0: 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f       /* Number o
23c0: 66 20 70 6f 69 6e 74 65 72 73 20 74 6f 20 74 68  f pointers to th
23d0: 69 73 20 73 74 72 75 63 74 75 72 65 20 2a 2f 0a  is structure */.
23e0: 20 20 69 6e 74 20 6e 4c 6f 63 6b 3b 20 20 20 20    int nLock;    
23f0: 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65          /* Numbe
2400: 72 20 6f 66 20 6f 75 74 73 74 61 6e 64 69 6e 67  r of outstanding
2410: 20 6c 6f 63 6b 73 20 2a 2f 0a 20 20 69 6e 74 20   locks */.  int 
2420: 6e 50 65 6e 64 69 6e 67 3b 20 20 20 20 20 20 20  nPending;       
2430: 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 70    /* Number of p
2440: 65 6e 64 69 6e 67 20 63 6c 6f 73 65 28 29 20 6f  ending close() o
2450: 70 65 72 61 74 69 6f 6e 73 20 2a 2f 0a 20 20 69  perations */.  i
2460: 6e 74 20 2a 61 50 65 6e 64 69 6e 67 3b 20 20 20  nt *aPending;   
2470: 20 20 20 20 20 2f 2a 20 4d 61 6c 6c 6f 63 65 64       /* Malloced
2480: 20 73 70 61 63 65 20 68 6f 6c 64 69 6e 67 20 66   space holding f
2490: 64 27 73 20 61 77 61 69 74 69 6e 67 20 61 20 63  d's awaiting a c
24a0: 6c 6f 73 65 28 29 20 2a 2f 0a 7d 3b 0a 0a 2f 2a  lose() */.};../*
24b0: 20 0a 2a 2a 20 54 68 65 73 65 20 68 61 73 68 20   .** These hash 
24c0: 74 61 62 6c 65 20 6d 61 70 73 20 69 6e 6f 64 65  table maps inode
24d0: 73 20 61 6e 64 20 70 72 6f 63 65 73 73 20 49 44  s and process ID
24e0: 73 20 69 6e 74 6f 20 6c 6f 63 6b 49 6e 66 6f 20  s into lockInfo 
24f0: 61 6e 64 20 6f 70 65 6e 43 6e 74 0a 2a 2a 20 73  and openCnt.** s
2500: 74 72 75 63 74 75 72 65 73 2e 20 20 41 63 63 65  tructures.  Acce
2510: 73 73 20 74 6f 20 74 68 65 73 65 20 68 61 73 68  ss to these hash
2520: 20 74 61 62 6c 65 73 20 6d 75 73 74 20 62 65 20   tables must be 
2530: 70 72 6f 74 65 63 74 65 64 20 62 79 20 61 20 6d  protected by a m
2540: 75 74 65 78 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  utex..*/.static 
2550: 48 61 73 68 20 6c 6f 63 6b 48 61 73 68 20 3d 20  Hash lockHash = 
2560: 7b 20 53 51 4c 49 54 45 5f 48 41 53 48 5f 42 49  { SQLITE_HASH_BI
2570: 4e 41 52 59 2c 20 30 2c 20 30 2c 20 30 2c 20 30  NARY, 0, 0, 0, 0
2580: 2c 20 30 20 7d 3b 0a 73 74 61 74 69 63 20 48 61  , 0 };.static Ha
2590: 73 68 20 6f 70 65 6e 48 61 73 68 20 3d 20 7b 20  sh openHash = { 
25a0: 53 51 4c 49 54 45 5f 48 41 53 48 5f 42 49 4e 41  SQLITE_HASH_BINA
25b0: 52 59 2c 20 30 2c 20 30 2c 20 30 2c 20 30 2c 20  RY, 0, 0, 0, 0, 
25c0: 30 20 7d 3b 0a 0a 0a 23 69 66 64 65 66 20 53 51  0 };...#ifdef SQ
25d0: 4c 49 54 45 5f 55 4e 49 58 5f 54 48 52 45 41 44  LITE_UNIX_THREAD
25e0: 53 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 76 61 72  S./*.** This var
25f0: 69 61 62 6c 65 20 72 65 63 6f 72 64 73 20 77 68  iable records wh
2600: 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 68 72  ether or not thr
2610: 65 61 64 73 20 63 61 6e 20 6f 76 65 72 72 69 64  eads can overrid
2620: 65 20 65 61 63 68 20 6f 74 68 65 72 73 0a 2a 2a  e each others.**
2630: 20 6c 6f 63 6b 73 2e 0a 2a 2a 0a 2a 2a 20 20 20   locks..**.**   
2640: 20 30 3a 20 20 4e 6f 2e 20 20 54 68 72 65 61 64   0:  No.  Thread
2650: 73 20 63 61 6e 6e 6f 74 20 6f 76 65 72 72 69 64  s cannot overrid
2660: 65 20 65 61 63 68 20 6f 74 68 65 72 73 20 6c 6f  e each others lo
2670: 63 6b 73 2e 0a 2a 2a 20 20 20 20 31 3a 20 20 59  cks..**    1:  Y
2680: 65 73 2e 20 20 54 68 72 65 61 64 73 20 63 61 6e  es.  Threads can
2690: 20 6f 76 65 72 72 69 64 65 20 65 61 63 68 20 6f   override each o
26a0: 74 68 65 72 73 20 6c 6f 63 6b 73 2e 0a 2a 2a 20  thers locks..** 
26b0: 20 20 2d 31 3a 20 20 57 65 20 64 6f 6e 27 74 20    -1:  We don't 
26c0: 6b 6e 6f 77 20 79 65 74 2e 0a 2a 2f 0a 73 74 61  know yet..*/.sta
26d0: 74 69 63 20 69 6e 74 20 74 68 72 65 61 64 73 4f  tic int threadsO
26e0: 76 65 72 72 69 64 65 45 61 63 68 4f 74 68 65 72  verrideEachOther
26f0: 73 4c 6f 63 6b 73 20 3d 20 2d 31 3b 0a 0a 2f 2a  sLocks = -1;../*
2700: 0a 2a 2a 20 54 68 69 73 20 73 74 72 75 63 74 75  .** This structu
2710: 72 65 20 68 6f 6c 64 73 20 69 6e 66 6f 72 6d 61  re holds informa
2720: 74 69 6f 6e 20 70 61 73 73 65 64 20 69 6e 74 6f  tion passed into
2730: 20 69 6e 64 69 76 69 64 75 61 6c 20 74 65 73 74   individual test
2740: 0a 2a 2a 20 74 68 72 65 61 64 73 20 62 79 20 74  .** threads by t
2750: 68 65 20 74 65 73 74 54 68 72 65 61 64 4c 6f 63  he testThreadLoc
2760: 6b 69 6e 67 42 65 68 61 76 69 6f 72 28 29 20 72  kingBehavior() r
2770: 6f 75 74 69 6e 65 2e 0a 2a 2f 0a 73 74 72 75 63  outine..*/.struc
2780: 74 20 74 68 72 65 61 64 54 65 73 74 44 61 74 61  t threadTestData
2790: 20 7b 0a 20 20 69 6e 74 20 66 64 3b 20 20 20 20   {.  int fd;    
27a0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 46              /* F
27b0: 69 6c 65 20 74 6f 20 62 65 20 6c 6f 63 6b 65 64  ile to be locked
27c0: 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 66 6c 6f   */.  struct flo
27d0: 63 6b 20 6c 6f 63 6b 3b 20 20 20 20 20 2f 2a 20  ck lock;     /* 
27e0: 54 68 65 20 6c 6f 63 6b 69 6e 67 20 6f 70 65 72  The locking oper
27f0: 61 74 69 6f 6e 20 2a 2f 0a 20 20 69 6e 74 20 72  ation */.  int r
2800: 65 73 75 6c 74 3b 20 20 20 20 20 20 20 20 20 20  esult;          
2810: 20 20 2f 2a 20 52 65 73 75 6c 74 20 6f 66 20 74    /* Result of t
2820: 68 65 20 6c 6f 63 6b 69 6e 67 20 6f 70 65 72 61  he locking opera
2830: 74 69 6f 6e 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a  tion */.};../*.*
2840: 2a 20 54 68 65 20 74 65 73 74 54 68 72 65 61 64  * The testThread
2850: 4c 6f 63 6b 69 6e 67 42 65 68 61 76 69 6f 72 28  LockingBehavior(
2860: 29 20 72 6f 75 74 69 6e 65 20 6c 61 75 6e 63 68  ) routine launch
2870: 65 73 20 74 77 6f 20 73 65 70 61 72 61 74 65 0a  es two separate.
2880: 2a 2a 20 74 68 72 65 61 64 73 20 6f 6e 20 74 68  ** threads on th
2890: 69 73 20 72 6f 75 74 69 6e 65 2e 20 20 54 68 69  is routine.  Thi
28a0: 73 20 72 6f 75 74 69 6e 65 20 61 74 74 65 6d 70  s routine attemp
28b0: 74 73 20 74 6f 20 6c 6f 63 6b 20 61 20 66 69 6c  ts to lock a fil
28c0: 65 0a 2a 2a 20 64 65 73 63 72 69 70 74 6f 72 20  e.** descriptor 
28d0: 74 68 65 6e 20 72 65 74 75 72 6e 73 2e 20 20 54  then returns.  T
28e0: 68 65 20 73 75 63 63 65 73 73 20 6f 72 20 66 61  he success or fa
28f0: 69 6c 75 72 65 20 6f 66 20 74 68 61 74 20 61 74  ilure of that at
2900: 74 65 6d 70 74 0a 2a 2a 20 61 6c 6c 6f 77 73 20  tempt.** allows 
2910: 74 68 65 20 74 65 73 74 54 68 72 65 61 64 4c 6f  the testThreadLo
2920: 63 6b 69 6e 67 42 65 68 61 76 69 6f 72 28 29 20  ckingBehavior() 
2930: 70 72 6f 63 65 64 75 72 65 20 74 6f 20 64 65 74  procedure to det
2940: 65 72 6d 69 6e 65 0a 2a 2a 20 77 68 65 74 68 65  ermine.** whethe
2950: 72 20 6f 72 20 6e 6f 74 20 74 68 72 65 61 64 73  r or not threads
2960: 20 63 61 6e 20 6f 76 65 72 72 69 64 65 20 65 61   can override ea
2970: 63 68 20 6f 74 68 65 72 73 20 6c 6f 63 6b 73 2e  ch others locks.
2980: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
2990: 2a 74 68 72 65 61 64 4c 6f 63 6b 69 6e 67 54 65  *threadLockingTe
29a0: 73 74 28 76 6f 69 64 20 2a 70 41 72 67 29 7b 0a  st(void *pArg){.
29b0: 20 20 73 74 72 75 63 74 20 74 68 72 65 61 64 54    struct threadT
29c0: 65 73 74 44 61 74 61 20 2a 70 44 61 74 61 20 3d  estData *pData =
29d0: 20 28 73 74 72 75 63 74 20 74 68 72 65 61 64 54   (struct threadT
29e0: 65 73 74 44 61 74 61 2a 29 70 41 72 67 3b 0a 20  estData*)pArg;. 
29f0: 20 70 44 61 74 61 2d 3e 72 65 73 75 6c 74 20 3d   pData->result =
2a00: 20 66 63 6e 74 6c 28 70 44 61 74 61 2d 3e 66 64   fcntl(pData->fd
2a10: 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 70 44 61 74  , F_SETLK, &pDat
2a20: 61 2d 3e 6c 6f 63 6b 29 3b 0a 20 20 72 65 74 75  a->lock);.  retu
2a30: 72 6e 20 70 41 72 67 3b 0a 7d 0a 0a 2f 2a 0a 2a  rn pArg;.}../*.*
2a40: 2a 20 54 68 69 73 20 70 72 6f 63 65 64 75 72 65  * This procedure
2a50: 20 61 74 74 65 6d 70 74 73 20 74 6f 20 64 65 74   attempts to det
2a60: 65 72 6d 69 6e 65 20 77 68 65 74 68 65 72 20 6f  ermine whether o
2a70: 72 20 6e 6f 74 20 74 68 72 65 61 64 73 0a 2a 2a  r not threads.**
2a80: 20 63 61 6e 20 6f 76 65 72 72 69 64 65 20 65 61   can override ea
2a90: 63 68 20 6f 74 68 65 72 73 20 6c 6f 63 6b 73 20  ch others locks 
2aa0: 74 68 65 6e 20 73 65 74 73 20 74 68 65 20 0a 2a  then sets the .*
2ab0: 2a 20 74 68 72 65 61 64 73 4f 76 65 72 72 69 64  * threadsOverrid
2ac0: 65 45 61 63 68 4f 74 68 65 72 73 4c 6f 63 6b 73  eEachOthersLocks
2ad0: 20 76 61 72 69 61 62 6c 65 20 61 70 70 72 6f 70   variable approp
2ae0: 72 69 61 74 65 6c 79 2e 0a 2a 2f 0a 73 74 61 74  riately..*/.stat
2af0: 69 63 20 76 6f 69 64 20 74 65 73 74 54 68 72 65  ic void testThre
2b00: 61 64 4c 6f 63 6b 69 6e 67 42 65 68 61 76 69 6f  adLockingBehavio
2b10: 72 28 66 64 5f 6f 72 69 67 29 7b 0a 20 20 69 6e  r(fd_orig){.  in
2b20: 74 20 66 64 3b 0a 20 20 73 74 72 75 63 74 20 74  t fd;.  struct t
2b30: 68 72 65 61 64 54 65 73 74 44 61 74 61 20 64 5b  hreadTestData d[
2b40: 32 5d 3b 0a 20 20 70 74 68 72 65 61 64 5f 74 20  2];.  pthread_t 
2b50: 74 5b 32 5d 3b 0a 0a 20 20 66 64 20 3d 20 64 75  t[2];..  fd = du
2b60: 70 28 66 64 5f 6f 72 69 67 29 3b 0a 20 20 69 66  p(fd_orig);.  if
2b70: 28 20 66 64 3c 30 20 29 20 72 65 74 75 72 6e 3b  ( fd<0 ) return;
2b80: 0a 20 20 6d 65 6d 73 65 74 28 64 2c 20 30 2c 20  .  memset(d, 0, 
2b90: 73 69 7a 65 6f 66 28 64 29 29 3b 0a 20 20 64 5b  sizeof(d));.  d[
2ba0: 30 5d 2e 66 64 20 3d 20 66 64 3b 0a 20 20 64 5b  0].fd = fd;.  d[
2bb0: 30 5d 2e 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d  0].lock.l_type =
2bc0: 20 46 5f 52 44 4c 43 4b 3b 0a 20 20 64 5b 30 5d   F_RDLCK;.  d[0]
2bd0: 2e 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 31 3b  .lock.l_len = 1;
2be0: 0a 20 20 64 5b 30 5d 2e 6c 6f 63 6b 2e 6c 5f 73  .  d[0].lock.l_s
2bf0: 74 61 72 74 20 3d 20 30 3b 0a 20 20 64 5b 30 5d  tart = 0;.  d[0]
2c00: 2e 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65 20 3d  .lock.l_whence =
2c10: 20 53 45 45 4b 5f 53 45 54 3b 0a 20 20 64 5b 31   SEEK_SET;.  d[1
2c20: 5d 20 3d 20 64 5b 30 5d 3b 0a 20 20 64 5b 31 5d  ] = d[0];.  d[1]
2c30: 2e 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d 20 46  .lock.l_type = F
2c40: 5f 57 52 4c 43 4b 3b 0a 20 20 70 74 68 72 65 61  _WRLCK;.  pthrea
2c50: 64 5f 63 72 65 61 74 65 28 26 74 5b 30 5d 2c 20  d_create(&t[0], 
2c60: 30 2c 20 74 68 72 65 61 64 4c 6f 63 6b 69 6e 67  0, threadLocking
2c70: 54 65 73 74 2c 20 26 64 5b 30 5d 29 3b 0a 20 20  Test, &d[0]);.  
2c80: 70 74 68 72 65 61 64 5f 63 72 65 61 74 65 28 26  pthread_create(&
2c90: 74 5b 31 5d 2c 20 30 2c 20 74 68 72 65 61 64 4c  t[1], 0, threadL
2ca0: 6f 63 6b 69 6e 67 54 65 73 74 2c 20 26 64 5b 31  ockingTest, &d[1
2cb0: 5d 29 3b 0a 20 20 70 74 68 72 65 61 64 5f 6a 6f  ]);.  pthread_jo
2cc0: 69 6e 28 74 5b 30 5d 2c 20 30 29 3b 0a 20 20 70  in(t[0], 0);.  p
2cd0: 74 68 72 65 61 64 5f 6a 6f 69 6e 28 74 5b 31 5d  thread_join(t[1]
2ce0: 2c 20 30 29 3b 0a 20 20 63 6c 6f 73 65 28 66 64  , 0);.  close(fd
2cf0: 29 3b 0a 20 20 74 68 72 65 61 64 73 4f 76 65 72  );.  threadsOver
2d00: 72 69 64 65 45 61 63 68 4f 74 68 65 72 73 4c 6f  rideEachOthersLo
2d10: 63 6b 73 20 3d 20 20 64 5b 30 5d 2e 72 65 73 75  cks =  d[0].resu
2d20: 6c 74 3d 3d 30 20 26 26 20 64 5b 31 5d 2e 72 65  lt==0 && d[1].re
2d30: 73 75 6c 74 3d 3d 30 3b 0a 7d 0a 23 65 6e 64 69  sult==0;.}.#endi
2d40: 66 20 2f 2a 20 53 51 4c 49 54 45 5f 55 4e 49 58  f /* SQLITE_UNIX
2d50: 5f 54 48 52 45 41 44 53 20 2a 2f 0a 0a 2f 2a 0a  _THREADS */../*.
2d60: 2a 2a 20 52 65 6c 65 61 73 65 20 61 20 6c 6f 63  ** Release a loc
2d70: 6b 49 6e 66 6f 20 73 74 72 75 63 74 75 72 65 20  kInfo structure 
2d80: 70 72 65 76 69 6f 75 73 6c 79 20 61 6c 6c 6f 63  previously alloc
2d90: 61 74 65 64 20 62 79 20 66 69 6e 64 4c 6f 63 6b  ated by findLock
2da0: 49 6e 66 6f 28 29 2e 0a 2a 2f 0a 73 74 61 74 69  Info()..*/.stati
2db0: 63 20 76 6f 69 64 20 72 65 6c 65 61 73 65 4c 6f  c void releaseLo
2dc0: 63 6b 49 6e 66 6f 28 73 74 72 75 63 74 20 6c 6f  ckInfo(struct lo
2dd0: 63 6b 49 6e 66 6f 20 2a 70 4c 6f 63 6b 29 7b 0a  ckInfo *pLock){.
2de0: 20 20 70 4c 6f 63 6b 2d 3e 6e 52 65 66 2d 2d 3b    pLock->nRef--;
2df0: 0a 20 20 69 66 28 20 70 4c 6f 63 6b 2d 3e 6e 52  .  if( pLock->nR
2e00: 65 66 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c  ef==0 ){.    sql
2e10: 69 74 65 33 48 61 73 68 49 6e 73 65 72 74 28 26  ite3HashInsert(&
2e20: 6c 6f 63 6b 48 61 73 68 2c 20 26 70 4c 6f 63 6b  lockHash, &pLock
2e30: 2d 3e 6b 65 79 2c 20 73 69 7a 65 6f 66 28 70 4c  ->key, sizeof(pL
2e40: 6f 63 6b 2d 3e 6b 65 79 29 2c 20 30 29 3b 0a 20  ock->key), 0);. 
2e50: 20 20 20 73 71 6c 69 74 65 46 72 65 65 28 70 4c     sqliteFree(pL
2e60: 6f 63 6b 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a  ock);.  }.}../*.
2e70: 2a 2a 20 52 65 6c 65 61 73 65 20 61 20 6f 70 65  ** Release a ope
2e80: 6e 43 6e 74 20 73 74 72 75 63 74 75 72 65 20 70  nCnt structure p
2e90: 72 65 76 69 6f 75 73 6c 79 20 61 6c 6c 6f 63 61  reviously alloca
2ea0: 74 65 64 20 62 79 20 66 69 6e 64 4c 6f 63 6b 49  ted by findLockI
2eb0: 6e 66 6f 28 29 2e 0a 2a 2f 0a 73 74 61 74 69 63  nfo()..*/.static
2ec0: 20 76 6f 69 64 20 72 65 6c 65 61 73 65 4f 70 65   void releaseOpe
2ed0: 6e 43 6e 74 28 73 74 72 75 63 74 20 6f 70 65 6e  nCnt(struct open
2ee0: 43 6e 74 20 2a 70 4f 70 65 6e 29 7b 0a 20 20 70  Cnt *pOpen){.  p
2ef0: 4f 70 65 6e 2d 3e 6e 52 65 66 2d 2d 3b 0a 20 20  Open->nRef--;.  
2f00: 69 66 28 20 70 4f 70 65 6e 2d 3e 6e 52 65 66 3d  if( pOpen->nRef=
2f10: 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65  =0 ){.    sqlite
2f20: 33 48 61 73 68 49 6e 73 65 72 74 28 26 6f 70 65  3HashInsert(&ope
2f30: 6e 48 61 73 68 2c 20 26 70 4f 70 65 6e 2d 3e 6b  nHash, &pOpen->k
2f40: 65 79 2c 20 73 69 7a 65 6f 66 28 70 4f 70 65 6e  ey, sizeof(pOpen
2f50: 2d 3e 6b 65 79 29 2c 20 30 29 3b 0a 20 20 20 20  ->key), 0);.    
2f60: 73 71 6c 69 74 65 46 72 65 65 28 70 4f 70 65 6e  sqliteFree(pOpen
2f70: 2d 3e 61 50 65 6e 64 69 6e 67 29 3b 0a 20 20 20  ->aPending);.   
2f80: 20 73 71 6c 69 74 65 46 72 65 65 28 70 4f 70 65   sqliteFree(pOpe
2f90: 6e 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a  n);.  }.}../*.**
2fa0: 20 47 69 76 65 6e 20 61 20 66 69 6c 65 20 64 65   Given a file de
2fb0: 73 63 72 69 70 74 6f 72 2c 20 6c 6f 63 61 74 65  scriptor, locate
2fc0: 20 6c 6f 63 6b 49 6e 66 6f 20 61 6e 64 20 6f 70   lockInfo and op
2fd0: 65 6e 43 6e 74 20 73 74 72 75 63 74 75 72 65 73  enCnt structures
2fe0: 20 74 68 61 74 0a 2a 2a 20 64 65 73 63 72 69 62   that.** describ
2ff0: 65 73 20 74 68 61 74 20 66 69 6c 65 20 64 65 73  es that file des
3000: 63 72 69 70 74 6f 72 2e 20 20 43 72 65 61 74 65  criptor.  Create
3010: 20 61 20 6e 65 77 20 6f 6e 65 73 20 69 66 20 6e   a new ones if n
3020: 65 63 65 73 73 61 72 79 2e 20 20 54 68 65 0a 2a  ecessary.  The.*
3030: 2a 20 72 65 74 75 72 6e 20 76 61 6c 75 65 73 20  * return values 
3040: 6d 69 67 68 74 20 62 65 20 75 6e 73 65 74 20 69  might be unset i
3050: 66 20 61 6e 20 65 72 72 6f 72 20 6f 63 63 75 72  f an error occur
3060: 73 2e 0a 2a 2a 0a 2a 2a 20 52 65 74 75 72 6e 20  s..**.** Return 
3070: 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 65 72  the number of er
3080: 72 6f 72 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  rors..*/.static 
3090: 69 6e 74 20 66 69 6e 64 4c 6f 63 6b 49 6e 66 6f  int findLockInfo
30a0: 28 0a 20 20 69 6e 74 20 66 64 2c 20 20 20 20 20  (.  int fd,     
30b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
30c0: 20 2f 2a 20 54 68 65 20 66 69 6c 65 20 64 65 73   /* The file des
30d0: 63 72 69 70 74 6f 72 20 75 73 65 64 20 69 6e 20  criptor used in 
30e0: 74 68 65 20 6b 65 79 20 2a 2f 0a 20 20 73 74 72  the key */.  str
30f0: 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20 2a 2a 70  uct lockInfo **p
3100: 70 4c 6f 63 6b 2c 20 20 20 20 2f 2a 20 52 65 74  pLock,    /* Ret
3110: 75 72 6e 20 74 68 65 20 6c 6f 63 6b 49 6e 66 6f  urn the lockInfo
3120: 20 73 74 72 75 63 74 75 72 65 20 68 65 72 65 20   structure here 
3130: 2a 2f 0a 20 20 73 74 72 75 63 74 20 6f 70 65 6e  */.  struct open
3140: 43 6e 74 20 2a 2a 70 70 4f 70 65 6e 20 20 20 20  Cnt **ppOpen    
3150: 20 20 2f 2a 20 52 65 74 75 72 6e 20 74 68 65 20    /* Return the 
3160: 6f 70 65 6e 43 6e 74 20 73 74 72 75 63 74 75 72  openCnt structur
3170: 65 20 68 65 72 65 20 2a 2f 0a 29 7b 0a 20 20 69  e here */.){.  i
3180: 6e 74 20 72 63 3b 0a 20 20 73 74 72 75 63 74 20  nt rc;.  struct 
3190: 6c 6f 63 6b 4b 65 79 20 6b 65 79 31 3b 0a 20 20  lockKey key1;.  
31a0: 73 74 72 75 63 74 20 6f 70 65 6e 4b 65 79 20 6b  struct openKey k
31b0: 65 79 32 3b 0a 20 20 73 74 72 75 63 74 20 73 74  ey2;.  struct st
31c0: 61 74 20 73 74 61 74 62 75 66 3b 0a 20 20 73 74  at statbuf;.  st
31d0: 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20 2a 70  ruct lockInfo *p
31e0: 4c 6f 63 6b 3b 0a 20 20 73 74 72 75 63 74 20 6f  Lock;.  struct o
31f0: 70 65 6e 43 6e 74 20 2a 70 4f 70 65 6e 3b 0a 20  penCnt *pOpen;. 
3200: 20 72 63 20 3d 20 66 73 74 61 74 28 66 64 2c 20   rc = fstat(fd, 
3210: 26 73 74 61 74 62 75 66 29 3b 0a 20 20 69 66 28  &statbuf);.  if(
3220: 20 72 63 21 3d 30 20 29 20 72 65 74 75 72 6e 20   rc!=0 ) return 
3230: 31 3b 0a 20 20 6d 65 6d 73 65 74 28 26 6b 65 79  1;.  memset(&key
3240: 31 2c 20 30 2c 20 73 69 7a 65 6f 66 28 6b 65 79  1, 0, sizeof(key
3250: 31 29 29 3b 0a 20 20 6b 65 79 31 2e 64 65 76 20  1));.  key1.dev 
3260: 3d 20 73 74 61 74 62 75 66 2e 73 74 5f 64 65 76  = statbuf.st_dev
3270: 3b 0a 20 20 6b 65 79 31 2e 69 6e 6f 20 3d 20 73  ;.  key1.ino = s
3280: 74 61 74 62 75 66 2e 73 74 5f 69 6e 6f 3b 0a 23  tatbuf.st_ino;.#
3290: 69 66 64 65 66 20 53 51 4c 49 54 45 5f 55 4e 49  ifdef SQLITE_UNI
32a0: 58 5f 54 48 52 45 41 44 53 0a 20 20 69 66 28 20  X_THREADS.  if( 
32b0: 74 68 72 65 61 64 73 4f 76 65 72 72 69 64 65 45  threadsOverrideE
32c0: 61 63 68 4f 74 68 65 72 73 4c 6f 63 6b 73 3c 30  achOthersLocks<0
32d0: 20 29 7b 0a 20 20 20 20 74 65 73 74 54 68 72 65   ){.    testThre
32e0: 61 64 4c 6f 63 6b 69 6e 67 42 65 68 61 76 69 6f  adLockingBehavio
32f0: 72 28 66 64 29 3b 0a 20 20 7d 0a 20 20 6b 65 79  r(fd);.  }.  key
3300: 31 2e 74 69 64 20 3d 20 74 68 72 65 61 64 73 4f  1.tid = threadsO
3310: 76 65 72 72 69 64 65 45 61 63 68 4f 74 68 65 72  verrideEachOther
3320: 73 4c 6f 63 6b 73 20 3f 20 30 20 3a 20 70 74 68  sLocks ? 0 : pth
3330: 72 65 61 64 5f 73 65 6c 66 28 29 3b 0a 23 65 6e  read_self();.#en
3340: 64 69 66 0a 20 20 6d 65 6d 73 65 74 28 26 6b 65  dif.  memset(&ke
3350: 79 32 2c 20 30 2c 20 73 69 7a 65 6f 66 28 6b 65  y2, 0, sizeof(ke
3360: 79 32 29 29 3b 0a 20 20 6b 65 79 32 2e 64 65 76  y2));.  key2.dev
3370: 20 3d 20 73 74 61 74 62 75 66 2e 73 74 5f 64 65   = statbuf.st_de
3380: 76 3b 0a 20 20 6b 65 79 32 2e 69 6e 6f 20 3d 20  v;.  key2.ino = 
3390: 73 74 61 74 62 75 66 2e 73 74 5f 69 6e 6f 3b 0a  statbuf.st_ino;.
33a0: 20 20 70 4c 6f 63 6b 20 3d 20 28 73 74 72 75 63    pLock = (struc
33b0: 74 20 6c 6f 63 6b 49 6e 66 6f 2a 29 73 71 6c 69  t lockInfo*)sqli
33c0: 74 65 33 48 61 73 68 46 69 6e 64 28 26 6c 6f 63  te3HashFind(&loc
33d0: 6b 48 61 73 68 2c 20 26 6b 65 79 31 2c 20 73 69  kHash, &key1, si
33e0: 7a 65 6f 66 28 6b 65 79 31 29 29 3b 0a 20 20 69  zeof(key1));.  i
33f0: 66 28 20 70 4c 6f 63 6b 3d 3d 30 20 29 7b 0a 20  f( pLock==0 ){. 
3400: 20 20 20 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e     struct lockIn
3410: 66 6f 20 2a 70 4f 6c 64 3b 0a 20 20 20 20 70 4c  fo *pOld;.    pL
3420: 6f 63 6b 20 3d 20 73 71 6c 69 74 65 4d 61 6c 6c  ock = sqliteMall
3430: 6f 63 52 61 77 28 20 73 69 7a 65 6f 66 28 2a 70  ocRaw( sizeof(*p
3440: 4c 6f 63 6b 29 20 29 3b 0a 20 20 20 20 69 66 28  Lock) );.    if(
3450: 20 70 4c 6f 63 6b 3d 3d 30 20 29 20 72 65 74 75   pLock==0 ) retu
3460: 72 6e 20 31 3b 0a 20 20 20 20 70 4c 6f 63 6b 2d  rn 1;.    pLock-
3470: 3e 6b 65 79 20 3d 20 6b 65 79 31 3b 0a 20 20 20  >key = key1;.   
3480: 20 70 4c 6f 63 6b 2d 3e 6e 52 65 66 20 3d 20 31   pLock->nRef = 1
3490: 3b 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e 63 6e 74  ;.    pLock->cnt
34a0: 20 3d 20 30 3b 0a 20 20 20 20 70 4c 6f 63 6b 2d   = 0;.    pLock-
34b0: 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 30 3b 0a 20  >locktype = 0;. 
34c0: 20 20 20 70 4f 6c 64 20 3d 20 73 71 6c 69 74 65     pOld = sqlite
34d0: 33 48 61 73 68 49 6e 73 65 72 74 28 26 6c 6f 63  3HashInsert(&loc
34e0: 6b 48 61 73 68 2c 20 26 70 4c 6f 63 6b 2d 3e 6b  kHash, &pLock->k
34f0: 65 79 2c 20 73 69 7a 65 6f 66 28 6b 65 79 31 29  ey, sizeof(key1)
3500: 2c 20 70 4c 6f 63 6b 29 3b 0a 20 20 20 20 69 66  , pLock);.    if
3510: 28 20 70 4f 6c 64 21 3d 30 20 29 7b 0a 20 20 20  ( pOld!=0 ){.   
3520: 20 20 20 61 73 73 65 72 74 28 20 70 4f 6c 64 3d     assert( pOld=
3530: 3d 70 4c 6f 63 6b 20 29 3b 0a 20 20 20 20 20 20  =pLock );.      
3540: 73 71 6c 69 74 65 46 72 65 65 28 70 4c 6f 63 6b  sqliteFree(pLock
3550: 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20  );.      return 
3560: 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65  1;.    }.  }else
3570: 7b 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e 6e 52 65  {.    pLock->nRe
3580: 66 2b 2b 3b 0a 20 20 7d 0a 20 20 2a 70 70 4c 6f  f++;.  }.  *ppLo
3590: 63 6b 20 3d 20 70 4c 6f 63 6b 3b 0a 20 20 70 4f  ck = pLock;.  pO
35a0: 70 65 6e 20 3d 20 28 73 74 72 75 63 74 20 6f 70  pen = (struct op
35b0: 65 6e 43 6e 74 2a 29 73 71 6c 69 74 65 33 48 61  enCnt*)sqlite3Ha
35c0: 73 68 46 69 6e 64 28 26 6f 70 65 6e 48 61 73 68  shFind(&openHash
35d0: 2c 20 26 6b 65 79 32 2c 20 73 69 7a 65 6f 66 28  , &key2, sizeof(
35e0: 6b 65 79 32 29 29 3b 0a 20 20 69 66 28 20 70 4f  key2));.  if( pO
35f0: 70 65 6e 3d 3d 30 20 29 7b 0a 20 20 20 20 73 74  pen==0 ){.    st
3600: 72 75 63 74 20 6f 70 65 6e 43 6e 74 20 2a 70 4f  ruct openCnt *pO
3610: 6c 64 3b 0a 20 20 20 20 70 4f 70 65 6e 20 3d 20  ld;.    pOpen = 
3620: 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 52 61 77 28  sqliteMallocRaw(
3630: 20 73 69 7a 65 6f 66 28 2a 70 4f 70 65 6e 29 20   sizeof(*pOpen) 
3640: 29 3b 0a 20 20 20 20 69 66 28 20 70 4f 70 65 6e  );.    if( pOpen
3650: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 72 65 6c  ==0 ){.      rel
3660: 65 61 73 65 4c 6f 63 6b 49 6e 66 6f 28 70 4c 6f  easeLockInfo(pLo
3670: 63 6b 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72  ck);.      retur
3680: 6e 20 31 3b 0a 20 20 20 20 7d 0a 20 20 20 20 70  n 1;.    }.    p
3690: 4f 70 65 6e 2d 3e 6b 65 79 20 3d 20 6b 65 79 32  Open->key = key2
36a0: 3b 0a 20 20 20 20 70 4f 70 65 6e 2d 3e 6e 52 65  ;.    pOpen->nRe
36b0: 66 20 3d 20 31 3b 0a 20 20 20 20 70 4f 70 65 6e  f = 1;.    pOpen
36c0: 2d 3e 6e 4c 6f 63 6b 20 3d 20 30 3b 0a 20 20 20  ->nLock = 0;.   
36d0: 20 70 4f 70 65 6e 2d 3e 6e 50 65 6e 64 69 6e 67   pOpen->nPending
36e0: 20 3d 20 30 3b 0a 20 20 20 20 70 4f 70 65 6e 2d   = 0;.    pOpen-
36f0: 3e 61 50 65 6e 64 69 6e 67 20 3d 20 30 3b 0a 20  >aPending = 0;. 
3700: 20 20 20 70 4f 6c 64 20 3d 20 73 71 6c 69 74 65     pOld = sqlite
3710: 33 48 61 73 68 49 6e 73 65 72 74 28 26 6f 70 65  3HashInsert(&ope
3720: 6e 48 61 73 68 2c 20 26 70 4f 70 65 6e 2d 3e 6b  nHash, &pOpen->k
3730: 65 79 2c 20 73 69 7a 65 6f 66 28 6b 65 79 32 29  ey, sizeof(key2)
3740: 2c 20 70 4f 70 65 6e 29 3b 0a 20 20 20 20 69 66  , pOpen);.    if
3750: 28 20 70 4f 6c 64 21 3d 30 20 29 7b 0a 20 20 20  ( pOld!=0 ){.   
3760: 20 20 20 61 73 73 65 72 74 28 20 70 4f 6c 64 3d     assert( pOld=
3770: 3d 70 4f 70 65 6e 20 29 3b 0a 20 20 20 20 20 20  =pOpen );.      
3780: 73 71 6c 69 74 65 46 72 65 65 28 70 4f 70 65 6e  sqliteFree(pOpen
3790: 29 3b 0a 20 20 20 20 20 20 72 65 6c 65 61 73 65  );.      release
37a0: 4c 6f 63 6b 49 6e 66 6f 28 70 4c 6f 63 6b 29 3b  LockInfo(pLock);
37b0: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 31 3b  .      return 1;
37c0: 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a  .    }.  }else{.
37d0: 20 20 20 20 70 4f 70 65 6e 2d 3e 6e 52 65 66 2b      pOpen->nRef+
37e0: 2b 3b 0a 20 20 7d 0a 20 20 2a 70 70 4f 70 65 6e  +;.  }.  *ppOpen
37f0: 20 3d 20 70 4f 70 65 6e 3b 0a 20 20 72 65 74 75   = pOpen;.  retu
3800: 72 6e 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 44  rn 0;.}../*.** D
3810: 65 6c 65 74 65 20 74 68 65 20 6e 61 6d 65 64 20  elete the named 
3820: 66 69 6c 65 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  file.*/.int sqli
3830: 74 65 33 4f 73 44 65 6c 65 74 65 28 63 6f 6e 73  te3OsDelete(cons
3840: 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d  t char *zFilenam
3850: 65 29 7b 0a 20 20 75 6e 6c 69 6e 6b 28 7a 46 69  e){.  unlink(zFi
3860: 6c 65 6e 61 6d 65 29 3b 0a 20 20 72 65 74 75 72  lename);.  retur
3870: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a  n SQLITE_OK;.}..
3880: 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52 55  /*.** Return TRU
3890: 45 20 69 66 20 74 68 65 20 6e 61 6d 65 64 20 66  E if the named f
38a0: 69 6c 65 20 65 78 69 73 74 73 2e 0a 2a 2f 0a 69  ile exists..*/.i
38b0: 6e 74 20 73 71 6c 69 74 65 33 4f 73 46 69 6c 65  nt sqlite3OsFile
38c0: 45 78 69 73 74 73 28 63 6f 6e 73 74 20 63 68 61  Exists(const cha
38d0: 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b 0a 20  r *zFilename){. 
38e0: 20 72 65 74 75 72 6e 20 61 63 63 65 73 73 28 7a   return access(z
38f0: 46 69 6c 65 6e 61 6d 65 2c 20 30 29 3d 3d 30 3b  Filename, 0)==0;
3900: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70  .}../*.** Attemp
3910: 74 20 74 6f 20 6f 70 65 6e 20 61 20 66 69 6c 65  t to open a file
3920: 20 66 6f 72 20 62 6f 74 68 20 72 65 61 64 69 6e   for both readin
3930: 67 20 61 6e 64 20 77 72 69 74 69 6e 67 2e 20 20  g and writing.  
3940: 49 66 20 74 68 61 74 0a 2a 2a 20 66 61 69 6c 73  If that.** fails
3950: 2c 20 74 72 79 20 6f 70 65 6e 69 6e 67 20 69 74  , try opening it
3960: 20 72 65 61 64 2d 6f 6e 6c 79 2e 20 20 49 66 20   read-only.  If 
3970: 74 68 65 20 66 69 6c 65 20 64 6f 65 73 20 6e 6f  the file does no
3980: 74 20 65 78 69 73 74 2c 0a 2a 2a 20 74 72 79 20  t exist,.** try 
3990: 74 6f 20 63 72 65 61 74 65 20 69 74 2e 0a 2a 2a  to create it..**
39a0: 0a 2a 2a 20 4f 6e 20 73 75 63 63 65 73 73 2c 20  .** On success, 
39b0: 61 20 68 61 6e 64 6c 65 20 66 6f 72 20 74 68 65  a handle for the
39c0: 20 6f 70 65 6e 20 66 69 6c 65 20 69 73 20 77 72   open file is wr
39d0: 69 74 74 65 6e 20 74 6f 20 2a 69 64 0a 2a 2a 20  itten to *id.** 
39e0: 61 6e 64 20 2a 70 52 65 61 64 6f 6e 6c 79 20 69  and *pReadonly i
39f0: 73 20 73 65 74 20 74 6f 20 30 20 69 66 20 74 68  s set to 0 if th
3a00: 65 20 66 69 6c 65 20 77 61 73 20 6f 70 65 6e 65  e file was opene
3a10: 64 20 66 6f 72 20 72 65 61 64 69 6e 67 20 61 6e  d for reading an
3a20: 64 0a 2a 2a 20 77 72 69 74 69 6e 67 20 6f 72 20  d.** writing or 
3a30: 31 20 69 66 20 74 68 65 20 66 69 6c 65 20 77 61  1 if the file wa
3a40: 73 20 6f 70 65 6e 65 64 20 72 65 61 64 2d 6f 6e  s opened read-on
3a50: 6c 79 2e 20 20 54 68 65 20 66 75 6e 63 74 69 6f  ly.  The functio
3a60: 6e 20 72 65 74 75 72 6e 73 0a 2a 2a 20 53 51 4c  n returns.** SQL
3a70: 49 54 45 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e  ITE_OK..**.** On
3a80: 20 66 61 69 6c 75 72 65 2c 20 74 68 65 20 66 75   failure, the fu
3a90: 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 53  nction returns S
3aa0: 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 20 61  QLITE_CANTOPEN a
3ab0: 6e 64 20 6c 65 61 76 65 73 0a 2a 2a 20 2a 69 64  nd leaves.** *id
3ac0: 20 61 6e 64 20 2a 70 52 65 61 64 6f 6e 6c 79 20   and *pReadonly 
3ad0: 75 6e 63 68 61 6e 67 65 64 2e 0a 2a 2f 0a 69 6e  unchanged..*/.in
3ae0: 74 20 73 71 6c 69 74 65 33 4f 73 4f 70 65 6e 52  t sqlite3OsOpenR
3af0: 65 61 64 57 72 69 74 65 28 0a 20 20 63 6f 6e 73  eadWrite(.  cons
3b00: 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d  t char *zFilenam
3b10: 65 2c 0a 20 20 4f 73 46 69 6c 65 20 2a 69 64 2c  e,.  OsFile *id,
3b20: 0a 20 20 69 6e 74 20 2a 70 52 65 61 64 6f 6e 6c  .  int *pReadonl
3b30: 79 0a 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20  y.){.  int rc;. 
3b40: 20 61 73 73 65 72 74 28 20 21 69 64 2d 3e 69 73   assert( !id->is
3b50: 4f 70 65 6e 20 29 3b 0a 20 20 69 64 2d 3e 64 69  Open );.  id->di
3b60: 72 66 64 20 3d 20 2d 31 3b 0a 20 20 69 64 2d 3e  rfd = -1;.  id->
3b70: 68 20 3d 20 6f 70 65 6e 28 7a 46 69 6c 65 6e 61  h = open(zFilena
3b80: 6d 65 2c 20 4f 5f 52 44 57 52 7c 4f 5f 43 52 45  me, O_RDWR|O_CRE
3b90: 41 54 7c 4f 5f 4c 41 52 47 45 46 49 4c 45 7c 4f  AT|O_LARGEFILE|O
3ba0: 5f 42 49 4e 41 52 59 2c 20 30 36 34 34 29 3b 0a  _BINARY, 0644);.
3bb0: 20 20 69 66 28 20 69 64 2d 3e 68 3c 30 20 29 7b    if( id->h<0 ){
3bc0: 0a 23 69 66 64 65 66 20 45 49 53 44 49 52 0a 20  .#ifdef EISDIR. 
3bd0: 20 20 20 69 66 28 20 65 72 72 6e 6f 3d 3d 45 49     if( errno==EI
3be0: 53 44 49 52 20 29 7b 0a 20 20 20 20 20 20 72 65  SDIR ){.      re
3bf0: 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54  turn SQLITE_CANT
3c00: 4f 50 45 4e 3b 0a 20 20 20 20 7d 0a 23 65 6e 64  OPEN;.    }.#end
3c10: 69 66 0a 20 20 20 20 69 64 2d 3e 68 20 3d 20 6f  if.    id->h = o
3c20: 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f  pen(zFilename, O
3c30: 5f 52 44 4f 4e 4c 59 7c 4f 5f 4c 41 52 47 45 46  _RDONLY|O_LARGEF
3c40: 49 4c 45 7c 4f 5f 42 49 4e 41 52 59 29 3b 0a 20  ILE|O_BINARY);. 
3c50: 20 20 20 69 66 28 20 69 64 2d 3e 68 3c 30 20 29     if( id->h<0 )
3c60: 7b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 53  {.      return S
3c70: 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 20  QLITE_CANTOPEN; 
3c80: 0a 20 20 20 20 7d 0a 20 20 20 20 2a 70 52 65 61  .    }.    *pRea
3c90: 64 6f 6e 6c 79 20 3d 20 31 3b 0a 20 20 7d 65 6c  donly = 1;.  }el
3ca0: 73 65 7b 0a 20 20 20 20 2a 70 52 65 61 64 6f 6e  se{.    *pReadon
3cb0: 6c 79 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 73 71  ly = 0;.  }.  sq
3cc0: 6c 69 74 65 33 4f 73 45 6e 74 65 72 4d 75 74 65  lite3OsEnterMute
3cd0: 78 28 29 3b 0a 20 20 72 63 20 3d 20 66 69 6e 64  x();.  rc = find
3ce0: 4c 6f 63 6b 49 6e 66 6f 28 69 64 2d 3e 68 2c 20  LockInfo(id->h, 
3cf0: 26 69 64 2d 3e 70 4c 6f 63 6b 2c 20 26 69 64 2d  &id->pLock, &id-
3d00: 3e 70 4f 70 65 6e 29 3b 0a 20 20 73 71 6c 69 74  >pOpen);.  sqlit
3d10: 65 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29  e3OsLeaveMutex()
3d20: 3b 0a 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20  ;.  if( rc ){.  
3d30: 20 20 63 6c 6f 73 65 28 69 64 2d 3e 68 29 3b 0a    close(id->h);.
3d40: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54      return SQLIT
3d50: 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d 0a 20 20 69  E_NOMEM;.  }.  i
3d60: 64 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 30 3b  d->locktype = 0;
3d70: 0a 20 20 69 64 2d 3e 69 73 4f 70 65 6e 20 3d 20  .  id->isOpen = 
3d80: 31 3b 0a 20 20 54 52 41 43 45 33 28 22 4f 50 45  1;.  TRACE3("OPE
3d90: 4e 20 20 20 20 25 2d 33 64 20 25 73 5c 6e 22 2c  N    %-3d %s\n",
3da0: 20 69 64 2d 3e 68 2c 20 7a 46 69 6c 65 6e 61 6d   id->h, zFilenam
3db0: 65 29 3b 0a 20 20 4f 70 65 6e 43 6f 75 6e 74 65  e);.  OpenCounte
3dc0: 72 28 2b 31 29 3b 0a 20 20 72 65 74 75 72 6e 20  r(+1);.  return 
3dd0: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 0a 2f  SQLITE_OK;.}.../
3de0: 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f 20  *.** Attempt to 
3df0: 6f 70 65 6e 20 61 20 6e 65 77 20 66 69 6c 65 20  open a new file 
3e00: 66 6f 72 20 65 78 63 6c 75 73 69 76 65 20 61 63  for exclusive ac
3e10: 63 65 73 73 20 62 79 20 74 68 69 73 20 70 72 6f  cess by this pro
3e20: 63 65 73 73 2e 0a 2a 2a 20 54 68 65 20 66 69 6c  cess..** The fil
3e30: 65 20 77 69 6c 6c 20 62 65 20 6f 70 65 6e 65 64  e will be opened
3e40: 20 66 6f 72 20 62 6f 74 68 20 72 65 61 64 69 6e   for both readin
3e50: 67 20 61 6e 64 20 77 72 69 74 69 6e 67 2e 20 20  g and writing.  
3e60: 54 6f 20 61 76 6f 69 64 0a 2a 2a 20 61 20 70 6f  To avoid.** a po
3e70: 74 65 6e 74 69 61 6c 20 73 65 63 75 72 69 74 79  tential security
3e80: 20 70 72 6f 62 6c 65 6d 2c 20 77 65 20 64 6f 20   problem, we do 
3e90: 6e 6f 74 20 61 6c 6c 6f 77 20 74 68 65 20 66 69  not allow the fi
3ea0: 6c 65 20 74 6f 20 68 61 76 65 0a 2a 2a 20 70 72  le to have.** pr
3eb0: 65 76 69 6f 75 73 6c 79 20 65 78 69 73 74 65 64  eviously existed
3ec0: 2e 20 20 4e 6f 72 20 64 6f 20 77 65 20 61 6c 6c  .  Nor do we all
3ed0: 6f 77 20 74 68 65 20 66 69 6c 65 20 74 6f 20 62  ow the file to b
3ee0: 65 20 61 20 73 79 6d 62 6f 6c 69 63 0a 2a 2a 20  e a symbolic.** 
3ef0: 6c 69 6e 6b 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 64  link..**.** If d
3f00: 65 6c 46 6c 61 67 20 69 73 20 74 72 75 65 2c 20  elFlag is true, 
3f10: 74 68 65 6e 20 6d 61 6b 65 20 61 72 72 61 6e 67  then make arrang
3f20: 65 6d 65 6e 74 73 20 74 6f 20 61 75 74 6f 6d 61  ements to automa
3f30: 74 69 63 61 6c 6c 79 20 64 65 6c 65 74 65 0a 2a  tically delete.*
3f40: 2a 20 74 68 65 20 66 69 6c 65 20 77 68 65 6e 20  * the file when 
3f50: 69 74 20 69 73 20 63 6c 6f 73 65 64 2e 0a 2a 2a  it is closed..**
3f60: 0a 2a 2a 20 4f 6e 20 73 75 63 63 65 73 73 2c 20  .** On success, 
3f70: 77 72 69 74 65 20 74 68 65 20 66 69 6c 65 20 68  write the file h
3f80: 61 6e 64 6c 65 20 69 6e 74 6f 20 2a 69 64 20 61  andle into *id a
3f90: 6e 64 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  nd return SQLITE
3fa0: 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66 61  _OK..**.** On fa
3fb0: 69 6c 75 72 65 2c 20 72 65 74 75 72 6e 20 53 51  ilure, return SQ
3fc0: 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 2e 0a 2a  LITE_CANTOPEN..*
3fd0: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 4f  /.int sqlite3OsO
3fe0: 70 65 6e 45 78 63 6c 75 73 69 76 65 28 63 6f 6e  penExclusive(con
3ff0: 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61  st char *zFilena
4000: 6d 65 2c 20 4f 73 46 69 6c 65 20 2a 69 64 2c 20  me, OsFile *id, 
4010: 69 6e 74 20 64 65 6c 46 6c 61 67 29 7b 0a 20 20  int delFlag){.  
4020: 69 6e 74 20 72 63 3b 0a 20 20 61 73 73 65 72 74  int rc;.  assert
4030: 28 20 21 69 64 2d 3e 69 73 4f 70 65 6e 20 29 3b  ( !id->isOpen );
4040: 0a 20 20 69 66 28 20 61 63 63 65 73 73 28 7a 46  .  if( access(zF
4050: 69 6c 65 6e 61 6d 65 2c 20 30 29 3d 3d 30 20 29  ilename, 0)==0 )
4060: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c  {.    return SQL
4070: 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20  ITE_CANTOPEN;.  
4080: 7d 0a 20 20 69 64 2d 3e 64 69 72 66 64 20 3d 20  }.  id->dirfd = 
4090: 2d 31 3b 0a 20 20 69 64 2d 3e 68 20 3d 20 6f 70  -1;.  id->h = op
40a0: 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20 20  en(zFilename,.  
40b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 5f                O_
40c0: 52 44 57 52 7c 4f 5f 43 52 45 41 54 7c 4f 5f 45  RDWR|O_CREAT|O_E
40d0: 58 43 4c 7c 4f 5f 4e 4f 46 4f 4c 4c 4f 57 7c 4f  XCL|O_NOFOLLOW|O
40e0: 5f 4c 41 52 47 45 46 49 4c 45 7c 4f 5f 42 49 4e  _LARGEFILE|O_BIN
40f0: 41 52 59 2c 20 30 36 30 30 29 3b 0a 20 20 69 66  ARY, 0600);.  if
4100: 28 20 69 64 2d 3e 68 3c 30 20 29 7b 0a 20 20 20  ( id->h<0 ){.   
4110: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43   return SQLITE_C
4120: 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 20 73  ANTOPEN;.  }.  s
4130: 71 6c 69 74 65 33 4f 73 45 6e 74 65 72 4d 75 74  qlite3OsEnterMut
4140: 65 78 28 29 3b 0a 20 20 72 63 20 3d 20 66 69 6e  ex();.  rc = fin
4150: 64 4c 6f 63 6b 49 6e 66 6f 28 69 64 2d 3e 68 2c  dLockInfo(id->h,
4160: 20 26 69 64 2d 3e 70 4c 6f 63 6b 2c 20 26 69 64   &id->pLock, &id
4170: 2d 3e 70 4f 70 65 6e 29 3b 0a 20 20 73 71 6c 69  ->pOpen);.  sqli
4180: 74 65 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28  te3OsLeaveMutex(
4190: 29 3b 0a 20 20 69 66 28 20 72 63 20 29 7b 0a 20  );.  if( rc ){. 
41a0: 20 20 20 63 6c 6f 73 65 28 69 64 2d 3e 68 29 3b     close(id->h);
41b0: 0a 20 20 20 20 75 6e 6c 69 6e 6b 28 7a 46 69 6c  .    unlink(zFil
41c0: 65 6e 61 6d 65 29 3b 0a 20 20 20 20 72 65 74 75  ename);.    retu
41d0: 72 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b  rn SQLITE_NOMEM;
41e0: 0a 20 20 7d 0a 20 20 69 64 2d 3e 6c 6f 63 6b 74  .  }.  id->lockt
41f0: 79 70 65 20 3d 20 30 3b 0a 20 20 69 64 2d 3e 69  ype = 0;.  id->i
4200: 73 4f 70 65 6e 20 3d 20 31 3b 0a 20 20 69 66 28  sOpen = 1;.  if(
4210: 20 64 65 6c 46 6c 61 67 20 29 7b 0a 20 20 20 20   delFlag ){.    
4220: 75 6e 6c 69 6e 6b 28 7a 46 69 6c 65 6e 61 6d 65  unlink(zFilename
4230: 29 3b 0a 20 20 7d 0a 20 20 54 52 41 43 45 33 28  );.  }.  TRACE3(
4240: 22 4f 50 45 4e 2d 45 58 20 25 2d 33 64 20 25 73  "OPEN-EX %-3d %s
4250: 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20 7a 46 69 6c  \n", id->h, zFil
4260: 65 6e 61 6d 65 29 3b 0a 20 20 4f 70 65 6e 43 6f  ename);.  OpenCo
4270: 75 6e 74 65 72 28 2b 31 29 3b 0a 20 20 72 65 74  unter(+1);.  ret
4280: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d  urn SQLITE_OK;.}
4290: 0a 0a 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20  ../*.** Attempt 
42a0: 74 6f 20 6f 70 65 6e 20 61 20 6e 65 77 20 66 69  to open a new fi
42b0: 6c 65 20 66 6f 72 20 72 65 61 64 2d 6f 6e 6c 79  le for read-only
42c0: 20 61 63 63 65 73 73 2e 0a 2a 2a 0a 2a 2a 20 4f   access..**.** O
42d0: 6e 20 73 75 63 63 65 73 73 2c 20 77 72 69 74 65  n success, write
42e0: 20 74 68 65 20 66 69 6c 65 20 68 61 6e 64 6c 65   the file handle
42f0: 20 69 6e 74 6f 20 2a 69 64 20 61 6e 64 20 72 65   into *id and re
4300: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a  turn SQLITE_OK..
4310: 2a 2a 0a 2a 2a 20 4f 6e 20 66 61 69 6c 75 72 65  **.** On failure
4320: 2c 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f  , return SQLITE_
4330: 43 41 4e 54 4f 50 45 4e 2e 0a 2a 2f 0a 69 6e 74  CANTOPEN..*/.int
4340: 20 73 71 6c 69 74 65 33 4f 73 4f 70 65 6e 52 65   sqlite3OsOpenRe
4350: 61 64 4f 6e 6c 79 28 63 6f 6e 73 74 20 63 68 61  adOnly(const cha
4360: 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 73  r *zFilename, Os
4370: 46 69 6c 65 20 2a 69 64 29 7b 0a 20 20 69 6e 74  File *id){.  int
4380: 20 72 63 3b 0a 20 20 61 73 73 65 72 74 28 20 21   rc;.  assert( !
4390: 69 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20  id->isOpen );.  
43a0: 69 64 2d 3e 64 69 72 66 64 20 3d 20 2d 31 3b 0a  id->dirfd = -1;.
43b0: 20 20 69 64 2d 3e 68 20 3d 20 6f 70 65 6e 28 7a    id->h = open(z
43c0: 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44 4f 4e  Filename, O_RDON
43d0: 4c 59 7c 4f 5f 4c 41 52 47 45 46 49 4c 45 7c 4f  LY|O_LARGEFILE|O
43e0: 5f 42 49 4e 41 52 59 29 3b 0a 20 20 69 66 28 20  _BINARY);.  if( 
43f0: 69 64 2d 3e 68 3c 30 20 29 7b 0a 20 20 20 20 72  id->h<0 ){.    r
4400: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e  eturn SQLITE_CAN
4410: 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 20 73 71 6c  TOPEN;.  }.  sql
4420: 69 74 65 33 4f 73 45 6e 74 65 72 4d 75 74 65 78  ite3OsEnterMutex
4430: 28 29 3b 0a 20 20 72 63 20 3d 20 66 69 6e 64 4c  ();.  rc = findL
4440: 6f 63 6b 49 6e 66 6f 28 69 64 2d 3e 68 2c 20 26  ockInfo(id->h, &
4450: 69 64 2d 3e 70 4c 6f 63 6b 2c 20 26 69 64 2d 3e  id->pLock, &id->
4460: 70 4f 70 65 6e 29 3b 0a 20 20 73 71 6c 69 74 65  pOpen);.  sqlite
4470: 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b  3OsLeaveMutex();
4480: 0a 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20 20  .  if( rc ){.   
4490: 20 63 6c 6f 73 65 28 69 64 2d 3e 68 29 3b 0a 20   close(id->h);. 
44a0: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45     return SQLITE
44b0: 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d 0a 20 20 69 64  _NOMEM;.  }.  id
44c0: 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 30 3b 0a  ->locktype = 0;.
44d0: 20 20 69 64 2d 3e 69 73 4f 70 65 6e 20 3d 20 31    id->isOpen = 1
44e0: 3b 0a 20 20 54 52 41 43 45 33 28 22 4f 50 45 4e  ;.  TRACE3("OPEN
44f0: 2d 52 4f 20 25 2d 33 64 20 25 73 5c 6e 22 2c 20  -RO %-3d %s\n", 
4500: 69 64 2d 3e 68 2c 20 7a 46 69 6c 65 6e 61 6d 65  id->h, zFilename
4510: 29 3b 0a 20 20 4f 70 65 6e 43 6f 75 6e 74 65 72  );.  OpenCounter
4520: 28 2b 31 29 3b 0a 20 20 72 65 74 75 72 6e 20 53  (+1);.  return S
4530: 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a  QLITE_OK;.}../*.
4540: 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f 20 6f 70  ** Attempt to op
4550: 65 6e 20 61 20 66 69 6c 65 20 64 65 73 63 72 69  en a file descri
4560: 70 74 6f 72 20 66 6f 72 20 74 68 65 20 64 69 72  ptor for the dir
4570: 65 63 74 6f 72 79 20 74 68 61 74 20 63 6f 6e 74  ectory that cont
4580: 61 69 6e 73 20 61 0a 2a 2a 20 66 69 6c 65 2e 20  ains a.** file. 
4590: 20 54 68 69 73 20 66 69 6c 65 20 64 65 73 63 72   This file descr
45a0: 69 70 74 6f 72 20 63 61 6e 20 62 65 20 75 73 65  iptor can be use
45b0: 64 20 74 6f 20 66 73 79 6e 63 28 29 20 74 68 65  d to fsync() the
45c0: 20 64 69 72 65 63 74 6f 72 79 0a 2a 2a 20 69 6e   directory.** in
45d0: 20 6f 72 64 65 72 20 74 6f 20 6d 61 6b 65 20 73   order to make s
45e0: 75 72 65 20 74 68 65 20 63 72 65 61 74 69 6f 6e  ure the creation
45f0: 20 6f 66 20 61 20 6e 65 77 20 66 69 6c 65 20 69   of a new file i
4600: 73 20 61 63 74 75 61 6c 6c 79 20 77 72 69 74 74  s actually writt
4610: 65 6e 0a 2a 2a 20 74 6f 20 64 69 73 6b 2e 0a 2a  en.** to disk..*
4620: 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e  *.** This routin
4630: 65 20 69 73 20 6f 6e 6c 79 20 6d 65 61 6e 69 6e  e is only meanin
4640: 67 66 75 6c 20 66 6f 72 20 55 6e 69 78 2e 20 20  gful for Unix.  
4650: 49 74 20 69 73 20 61 20 6e 6f 2d 6f 70 20 75 6e  It is a no-op un
4660: 64 65 72 0a 2a 2a 20 77 69 6e 64 6f 77 73 20 73  der.** windows s
4670: 69 6e 63 65 20 77 69 6e 64 6f 77 73 20 64 6f 65  ince windows doe
4680: 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 20 68 61  s not support ha
4690: 72 64 20 6c 69 6e 6b 73 2e 0a 2a 2a 0a 2a 2a 20  rd links..**.** 
46a0: 4f 6e 20 73 75 63 63 65 73 73 2c 20 61 20 68 61  On success, a ha
46b0: 6e 64 6c 65 20 66 6f 72 20 61 20 70 72 65 76 69  ndle for a previ
46c0: 6f 75 73 6c 79 20 6f 70 65 6e 20 66 69 6c 65 20  ously open file 
46d0: 69 73 20 61 74 20 2a 69 64 20 69 73 0a 2a 2a 20  is at *id is.** 
46e0: 75 70 64 61 74 65 64 20 77 69 74 68 20 74 68 65  updated with the
46f0: 20 6e 65 77 20 64 69 72 65 63 74 6f 72 79 20 66   new directory f
4700: 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20 61  ile descriptor a
4710: 6e 64 20 53 51 4c 49 54 45 5f 4f 4b 20 69 73 0a  nd SQLITE_OK is.
4720: 2a 2a 20 72 65 74 75 72 6e 65 64 2e 0a 2a 2a 0a  ** returned..**.
4730: 2a 2a 20 4f 6e 20 66 61 69 6c 75 72 65 2c 20 74  ** On failure, t
4740: 68 65 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75  he function retu
4750: 72 6e 73 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f  rns SQLITE_CANTO
4760: 50 45 4e 20 61 6e 64 20 6c 65 61 76 65 73 0a 2a  PEN and leaves.*
4770: 2a 20 2a 69 64 20 75 6e 63 68 61 6e 67 65 64 2e  * *id unchanged.
4780: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f  .*/.int sqlite3O
4790: 73 4f 70 65 6e 44 69 72 65 63 74 6f 72 79 28 0a  sOpenDirectory(.
47a0: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 44    const char *zD
47b0: 69 72 6e 61 6d 65 2c 0a 20 20 4f 73 46 69 6c 65  irname,.  OsFile
47c0: 20 2a 69 64 0a 29 7b 0a 20 20 69 66 28 20 21 69   *id.){.  if( !i
47d0: 64 2d 3e 69 73 4f 70 65 6e 20 29 7b 0a 20 20 20  d->isOpen ){.   
47e0: 20 2f 2a 20 44 6f 20 6e 6f 74 20 6f 70 65 6e 20   /* Do not open 
47f0: 74 68 65 20 64 69 72 65 63 74 6f 72 79 20 69 66  the directory if
4800: 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69   the correspondi
4810: 6e 67 20 66 69 6c 65 20 69 73 20 6e 6f 74 20 61  ng file is not a
4820: 6c 72 65 61 64 79 0a 20 20 20 20 2a 2a 20 6f 70  lready.    ** op
4830: 65 6e 2e 20 2a 2f 0a 20 20 20 20 72 65 74 75 72  en. */.    retur
4840: 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45  n SQLITE_CANTOPE
4850: 4e 3b 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28  N;.  }.  assert(
4860: 20 69 64 2d 3e 64 69 72 66 64 3c 30 20 29 3b 0a   id->dirfd<0 );.
4870: 20 20 69 64 2d 3e 64 69 72 66 64 20 3d 20 6f 70    id->dirfd = op
4880: 65 6e 28 7a 44 69 72 6e 61 6d 65 2c 20 4f 5f 52  en(zDirname, O_R
4890: 44 4f 4e 4c 59 7c 4f 5f 42 49 4e 41 52 59 2c 20  DONLY|O_BINARY, 
48a0: 30 36 34 34 29 3b 0a 20 20 69 66 28 20 69 64 2d  0644);.  if( id-
48b0: 3e 64 69 72 66 64 3c 30 20 29 7b 0a 20 20 20 20  >dirfd<0 ){.    
48c0: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41  return SQLITE_CA
48d0: 4e 54 4f 50 45 4e 3b 20 0a 20 20 7d 0a 20 20 54  NTOPEN; .  }.  T
48e0: 52 41 43 45 33 28 22 4f 50 45 4e 44 49 52 20 25  RACE3("OPENDIR %
48f0: 2d 33 64 20 25 73 5c 6e 22 2c 20 69 64 2d 3e 64  -3d %s\n", id->d
4900: 69 72 66 64 2c 20 7a 44 69 72 6e 61 6d 65 29 3b  irfd, zDirname);
4910: 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  .  return SQLITE
4920: 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 66  _OK;.}../*.** If
4930: 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 67   the following g
4940: 6c 6f 62 61 6c 20 76 61 72 69 61 62 6c 65 20 70  lobal variable p
4950: 6f 69 6e 74 73 20 74 6f 20 61 20 73 74 72 69 6e  oints to a strin
4960: 67 20 77 68 69 63 68 20 69 73 20 74 68 65 0a 2a  g which is the.*
4970: 2a 20 6e 61 6d 65 20 6f 66 20 61 20 64 69 72 65  * name of a dire
4980: 63 74 6f 72 79 2c 20 74 68 65 6e 20 74 68 61 74  ctory, then that
4990: 20 64 69 72 65 63 74 6f 72 79 20 77 69 6c 6c 20   directory will 
49a0: 62 65 20 75 73 65 64 20 74 6f 20 73 74 6f 72 65  be used to store
49b0: 0a 2a 2a 20 74 65 6d 70 6f 72 61 72 79 20 66 69  .** temporary fi
49c0: 6c 65 73 2e 0a 2a 2f 0a 63 6f 6e 73 74 20 63 68  les..*/.const ch
49d0: 61 72 20 2a 73 71 6c 69 74 65 5f 74 65 6d 70 5f  ar *sqlite_temp_
49e0: 64 69 72 65 63 74 6f 72 79 20 3d 20 30 3b 0a 0a  directory = 0;..
49f0: 2f 2a 0a 2a 2a 20 43 72 65 61 74 65 20 61 20 74  /*.** Create a t
4a00: 65 6d 70 6f 72 61 72 79 20 66 69 6c 65 20 6e 61  emporary file na
4a10: 6d 65 20 69 6e 20 7a 42 75 66 2e 20 20 7a 42 75  me in zBuf.  zBu
4a20: 66 20 6d 75 73 74 20 62 65 20 62 69 67 20 65 6e  f must be big en
4a30: 6f 75 67 68 20 74 6f 0a 2a 2a 20 68 6f 6c 64 20  ough to.** hold 
4a40: 61 74 20 6c 65 61 73 74 20 53 51 4c 49 54 45 5f  at least SQLITE_
4a50: 54 45 4d 50 4e 41 4d 45 5f 53 49 5a 45 20 63 68  TEMPNAME_SIZE ch
4a60: 61 72 61 63 74 65 72 73 2e 0a 2a 2f 0a 69 6e 74  aracters..*/.int
4a70: 20 73 71 6c 69 74 65 33 4f 73 54 65 6d 70 46 69   sqlite3OsTempFi
4a80: 6c 65 4e 61 6d 65 28 63 68 61 72 20 2a 7a 42 75  leName(char *zBu
4a90: 66 29 7b 0a 20 20 73 74 61 74 69 63 20 63 6f 6e  f){.  static con
4aa0: 73 74 20 63 68 61 72 20 2a 61 7a 44 69 72 73 5b  st char *azDirs[
4ab0: 5d 20 3d 20 7b 0a 20 20 20 20 20 30 2c 0a 20 20  ] = {.     0,.  
4ac0: 20 20 20 22 2f 76 61 72 2f 74 6d 70 22 2c 0a 20     "/var/tmp",. 
4ad0: 20 20 20 20 22 2f 75 73 72 2f 74 6d 70 22 2c 0a      "/usr/tmp",.
4ae0: 20 20 20 20 20 22 2f 74 6d 70 22 2c 0a 20 20 20       "/tmp",.   
4af0: 20 20 22 2e 22 2c 0a 20 20 7d 3b 0a 20 20 73 74    ".",.  };.  st
4b00: 61 74 69 63 20 75 6e 73 69 67 6e 65 64 20 63 68  atic unsigned ch
4b10: 61 72 20 7a 43 68 61 72 73 5b 5d 20 3d 0a 20 20  ar zChars[] =.  
4b20: 20 20 22 61 62 63 64 65 66 67 68 69 6a 6b 6c 6d    "abcdefghijklm
4b30: 6e 6f 70 71 72 73 74 75 76 77 78 79 7a 22 0a 20  nopqrstuvwxyz". 
4b40: 20 20 20 22 41 42 43 44 45 46 47 48 49 4a 4b 4c     "ABCDEFGHIJKL
4b50: 4d 4e 4f 50 51 52 53 54 55 56 57 58 59 5a 22 0a  MNOPQRSTUVWXYZ".
4b60: 20 20 20 20 22 30 31 32 33 34 35 36 37 38 39 22      "0123456789"
4b70: 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a 20 20  ;.  int i, j;.  
4b80: 73 74 72 75 63 74 20 73 74 61 74 20 62 75 66 3b  struct stat buf;
4b90: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
4ba0: 44 69 72 20 3d 20 22 2e 22 3b 0a 20 20 61 7a 44  Dir = ".";.  azD
4bb0: 69 72 73 5b 30 5d 20 3d 20 73 71 6c 69 74 65 5f  irs[0] = sqlite_
4bc0: 74 65 6d 70 5f 64 69 72 65 63 74 6f 72 79 3b 0a  temp_directory;.
4bd0: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 73 69 7a    for(i=0; i<siz
4be0: 65 6f 66 28 61 7a 44 69 72 73 29 2f 73 69 7a 65  eof(azDirs)/size
4bf0: 6f 66 28 61 7a 44 69 72 73 5b 30 5d 29 3b 20 69  of(azDirs[0]); i
4c00: 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 61 7a 44  ++){.    if( azD
4c10: 69 72 73 5b 69 5d 3d 3d 30 20 29 20 63 6f 6e 74  irs[i]==0 ) cont
4c20: 69 6e 75 65 3b 0a 20 20 20 20 69 66 28 20 73 74  inue;.    if( st
4c30: 61 74 28 61 7a 44 69 72 73 5b 69 5d 2c 20 26 62  at(azDirs[i], &b
4c40: 75 66 29 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a  uf) ) continue;.
4c50: 20 20 20 20 69 66 28 20 21 53 5f 49 53 44 49 52      if( !S_ISDIR
4c60: 28 62 75 66 2e 73 74 5f 6d 6f 64 65 29 20 29 20  (buf.st_mode) ) 
4c70: 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 69 66  continue;.    if
4c80: 28 20 61 63 63 65 73 73 28 61 7a 44 69 72 73 5b  ( access(azDirs[
4c90: 69 5d 2c 20 30 37 29 20 29 20 63 6f 6e 74 69 6e  i], 07) ) contin
4ca0: 75 65 3b 0a 20 20 20 20 7a 44 69 72 20 3d 20 61  ue;.    zDir = a
4cb0: 7a 44 69 72 73 5b 69 5d 3b 0a 20 20 20 20 62 72  zDirs[i];.    br
4cc0: 65 61 6b 3b 0a 20 20 7d 0a 20 20 64 6f 7b 0a 20  eak;.  }.  do{. 
4cd0: 20 20 20 73 70 72 69 6e 74 66 28 7a 42 75 66 2c     sprintf(zBuf,
4ce0: 20 22 25 73 2f 22 54 45 4d 50 5f 46 49 4c 45 5f   "%s/"TEMP_FILE_
4cf0: 50 52 45 46 49 58 2c 20 7a 44 69 72 29 3b 0a 20  PREFIX, zDir);. 
4d00: 20 20 20 6a 20 3d 20 73 74 72 6c 65 6e 28 7a 42     j = strlen(zB
4d10: 75 66 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33  uf);.    sqlite3
4d20: 52 61 6e 64 6f 6d 6e 65 73 73 28 31 35 2c 20 26  Randomness(15, &
4d30: 7a 42 75 66 5b 6a 5d 29 3b 0a 20 20 20 20 66 6f  zBuf[j]);.    fo
4d40: 72 28 69 3d 30 3b 20 69 3c 31 35 3b 20 69 2b 2b  r(i=0; i<15; i++
4d50: 2c 20 6a 2b 2b 29 7b 0a 20 20 20 20 20 20 7a 42  , j++){.      zB
4d60: 75 66 5b 6a 5d 20 3d 20 28 63 68 61 72 29 7a 43  uf[j] = (char)zC
4d70: 68 61 72 73 5b 20 28 28 75 6e 73 69 67 6e 65 64  hars[ ((unsigned
4d80: 20 63 68 61 72 29 7a 42 75 66 5b 6a 5d 29 25 28   char)zBuf[j])%(
4d90: 73 69 7a 65 6f 66 28 7a 43 68 61 72 73 29 2d 31  sizeof(zChars)-1
4da0: 29 20 5d 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a  ) ];.    }.    z
4db0: 42 75 66 5b 6a 5d 20 3d 20 30 3b 0a 20 20 7d 77  Buf[j] = 0;.  }w
4dc0: 68 69 6c 65 28 20 61 63 63 65 73 73 28 7a 42 75  hile( access(zBu
4dd0: 66 2c 30 29 3d 3d 30 20 29 3b 0a 20 20 72 65 74  f,0)==0 );.  ret
4de0: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 20 0a  urn SQLITE_OK; .
4df0: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 64 61  }../*.** Read da
4e00: 74 61 20 66 72 6f 6d 20 61 20 66 69 6c 65 20 69  ta from a file i
4e10: 6e 74 6f 20 61 20 62 75 66 66 65 72 2e 20 20 52  nto a buffer.  R
4e20: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 20  eturn SQLITE_OK 
4e30: 69 66 20 61 6c 6c 0a 2a 2a 20 62 79 74 65 73 20  if all.** bytes 
4e40: 77 65 72 65 20 72 65 61 64 20 73 75 63 63 65 73  were read succes
4e50: 73 66 75 6c 6c 79 20 61 6e 64 20 53 51 4c 49 54  sfully and SQLIT
4e60: 45 5f 49 4f 45 52 52 20 69 66 20 61 6e 79 74 68  E_IOERR if anyth
4e70: 69 6e 67 20 67 6f 65 73 0a 2a 2a 20 77 72 6f 6e  ing goes.** wron
4e80: 67 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  g..*/.int sqlite
4e90: 33 4f 73 52 65 61 64 28 4f 73 46 69 6c 65 20 2a  3OsRead(OsFile *
4ea0: 69 64 2c 20 76 6f 69 64 20 2a 70 42 75 66 2c 20  id, void *pBuf, 
4eb0: 69 6e 74 20 61 6d 74 29 7b 0a 20 20 69 6e 74 20  int amt){.  int 
4ec0: 67 6f 74 3b 0a 20 20 61 73 73 65 72 74 28 20 69  got;.  assert( i
4ed0: 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20 53  d->isOpen );.  S
4ee0: 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53  imulateIOError(S
4ef0: 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20  QLITE_IOERR);.  
4f00: 54 49 4d 45 52 5f 53 54 41 52 54 3b 0a 20 20 67  TIMER_START;.  g
4f10: 6f 74 20 3d 20 72 65 61 64 28 69 64 2d 3e 68 2c  ot = read(id->h,
4f20: 20 70 42 75 66 2c 20 61 6d 74 29 3b 0a 20 20 54   pBuf, amt);.  T
4f30: 49 4d 45 52 5f 45 4e 44 3b 0a 20 20 54 52 41 43  IMER_END;.  TRAC
4f40: 45 34 28 22 52 45 41 44 20 20 20 20 25 2d 33 64  E4("READ    %-3d
4f50: 20 25 37 64 20 25 64 5c 6e 22 2c 20 69 64 2d 3e   %7d %d\n", id->
4f60: 68 2c 20 6c 61 73 74 5f 70 61 67 65 2c 20 54 49  h, last_page, TI
4f70: 4d 45 52 5f 45 4c 41 50 53 45 44 29 3b 0a 20 20  MER_ELAPSED);.  
4f80: 53 45 45 4b 28 30 29 3b 0a 20 20 2f 2a 20 69 66  SEEK(0);.  /* if
4f90: 28 20 67 6f 74 3c 30 20 29 20 67 6f 74 20 3d 20  ( got<0 ) got = 
4fa0: 30 3b 20 2a 2f 0a 20 20 69 66 28 20 67 6f 74 3d  0; */.  if( got=
4fb0: 3d 61 6d 74 20 29 7b 0a 20 20 20 20 72 65 74 75  =amt ){.    retu
4fc0: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20  rn SQLITE_OK;.  
4fd0: 7d 65 6c 73 65 7b 0a 20 20 20 20 72 65 74 75 72  }else{.    retur
4fe0: 6e 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a  n SQLITE_IOERR;.
4ff0: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 72 69    }.}../*.** Wri
5000: 74 65 20 64 61 74 61 20 66 72 6f 6d 20 61 20 62  te data from a b
5010: 75 66 66 65 72 20 69 6e 74 6f 20 61 20 66 69 6c  uffer into a fil
5020: 65 2e 20 20 52 65 74 75 72 6e 20 53 51 4c 49 54  e.  Return SQLIT
5030: 45 5f 4f 4b 20 6f 6e 20 73 75 63 63 65 73 73 0a  E_OK on success.
5040: 2a 2a 20 6f 72 20 73 6f 6d 65 20 6f 74 68 65 72  ** or some other
5050: 20 65 72 72 6f 72 20 63 6f 64 65 20 6f 6e 20 66   error code on f
5060: 61 69 6c 75 72 65 2e 0a 2a 2f 0a 69 6e 74 20 73  ailure..*/.int s
5070: 71 6c 69 74 65 33 4f 73 57 72 69 74 65 28 4f 73  qlite3OsWrite(Os
5080: 46 69 6c 65 20 2a 69 64 2c 20 63 6f 6e 73 74 20  File *id, const 
5090: 76 6f 69 64 20 2a 70 42 75 66 2c 20 69 6e 74 20  void *pBuf, int 
50a0: 61 6d 74 29 7b 0a 20 20 69 6e 74 20 77 72 6f 74  amt){.  int wrot
50b0: 65 20 3d 20 30 3b 0a 20 20 61 73 73 65 72 74 28  e = 0;.  assert(
50c0: 20 69 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20   id->isOpen );. 
50d0: 20 53 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72   SimulateIOError
50e0: 28 53 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a  (SQLITE_IOERR);.
50f0: 20 20 54 49 4d 45 52 5f 53 54 41 52 54 3b 0a 20    TIMER_START;. 
5100: 20 77 68 69 6c 65 28 20 61 6d 74 3e 30 20 26 26   while( amt>0 &&
5110: 20 28 77 72 6f 74 65 20 3d 20 77 72 69 74 65 28   (wrote = write(
5120: 69 64 2d 3e 68 2c 20 70 42 75 66 2c 20 61 6d 74  id->h, pBuf, amt
5130: 29 29 3e 30 20 29 7b 0a 20 20 20 20 61 6d 74 20  ))>0 ){.    amt 
5140: 2d 3d 20 77 72 6f 74 65 3b 0a 20 20 20 20 70 42  -= wrote;.    pB
5150: 75 66 20 3d 20 26 28 28 63 68 61 72 2a 29 70 42  uf = &((char*)pB
5160: 75 66 29 5b 77 72 6f 74 65 5d 3b 0a 20 20 7d 0a  uf)[wrote];.  }.
5170: 20 20 54 49 4d 45 52 5f 45 4e 44 3b 0a 20 20 54    TIMER_END;.  T
5180: 52 41 43 45 34 28 22 57 52 49 54 45 20 20 20 25  RACE4("WRITE   %
5190: 2d 33 64 20 25 37 64 20 25 64 5c 6e 22 2c 20 69  -3d %7d %d\n", i
51a0: 64 2d 3e 68 2c 20 6c 61 73 74 5f 70 61 67 65 2c  d->h, last_page,
51b0: 20 54 49 4d 45 52 5f 45 4c 41 50 53 45 44 29 3b   TIMER_ELAPSED);
51c0: 0a 20 20 53 45 45 4b 28 30 29 3b 0a 20 20 69 66  .  SEEK(0);.  if
51d0: 28 20 61 6d 74 3e 30 20 29 7b 0a 20 20 20 20 72  ( amt>0 ){.    r
51e0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 46 55 4c  eturn SQLITE_FUL
51f0: 4c 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20  L;.  }.  return 
5200: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a  SQLITE_OK;.}../*
5210: 0a 2a 2a 20 4d 6f 76 65 20 74 68 65 20 72 65 61  .** Move the rea
5220: 64 2f 77 72 69 74 65 20 70 6f 69 6e 74 65 72 20  d/write pointer 
5230: 69 6e 20 61 20 66 69 6c 65 2e 0a 2a 2f 0a 69 6e  in a file..*/.in
5240: 74 20 73 71 6c 69 74 65 33 4f 73 53 65 65 6b 28  t sqlite3OsSeek(
5250: 4f 73 46 69 6c 65 20 2a 69 64 2c 20 6f 66 66 5f  OsFile *id, off_
5260: 74 20 6f 66 66 73 65 74 29 7b 0a 20 20 61 73 73  t offset){.  ass
5270: 65 72 74 28 20 69 64 2d 3e 69 73 4f 70 65 6e 20  ert( id->isOpen 
5280: 29 3b 0a 20 20 53 45 45 4b 28 6f 66 66 73 65 74  );.  SEEK(offset
5290: 2f 31 30 32 34 20 2b 20 31 29 3b 0a 20 20 6c 73  /1024 + 1);.  ls
52a0: 65 65 6b 28 69 64 2d 3e 68 2c 20 6f 66 66 73 65  eek(id->h, offse
52b0: 74 2c 20 53 45 45 4b 5f 53 45 54 29 3b 0a 20 20  t, SEEK_SET);.  
52c0: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b  return SQLITE_OK
52d0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 66  ;.}../*.** The f
52e0: 73 79 6e 63 28 29 20 73 79 73 74 65 6d 20 63 61  sync() system ca
52f0: 6c 6c 20 64 6f 65 73 20 6e 6f 74 20 77 6f 72 6b  ll does not work
5300: 20 61 73 20 61 64 76 65 72 74 69 73 65 64 20 6f   as advertised o
5310: 6e 20 6d 61 6e 79 0a 2a 2a 20 75 6e 69 78 20 73  n many.** unix s
5320: 79 73 74 65 6d 73 2e 20 20 54 68 65 20 66 6f 6c  ystems.  The fol
5330: 6c 6f 77 69 6e 67 20 70 72 6f 63 65 64 75 72 65  lowing procedure
5340: 20 69 73 20 61 6e 20 61 74 74 65 6d 70 74 20 74   is an attempt t
5350: 6f 20 6d 61 6b 65 0a 2a 2a 20 69 74 20 77 6f 72  o make.** it wor
5360: 6b 20 62 65 74 74 65 72 2e 0a 2a 2f 0a 73 74 61  k better..*/.sta
5370: 74 69 63 20 69 6e 74 20 66 75 6c 6c 5f 66 73 79  tic int full_fsy
5380: 6e 63 28 69 6e 74 20 66 64 29 7b 0a 20 20 69 6e  nc(int fd){.  in
5390: 74 20 72 63 3b 0a 23 69 66 64 65 66 20 46 5f 46  t rc;.#ifdef F_F
53a0: 55 4c 4c 46 53 59 4e 43 0a 20 20 72 63 20 3d 20  ULLFSYNC.  rc = 
53b0: 66 63 6e 74 6c 28 66 64 2c 20 46 5f 46 55 4c 4c  fcntl(fd, F_FULL
53c0: 46 53 59 4e 43 2c 20 30 29 3b 0a 20 20 69 66 28  FSYNC, 0);.  if(
53d0: 20 72 63 20 29 20 72 63 20 3d 20 66 73 79 6e 63   rc ) rc = fsync
53e0: 28 66 64 29 3b 0a 23 65 6c 73 65 0a 20 20 72 63  (fd);.#else.  rc
53f0: 20 3d 20 66 73 79 6e 63 28 66 64 29 3b 0a 23 65   = fsync(fd);.#e
5400: 6e 64 69 66 0a 20 20 72 65 74 75 72 6e 20 72 63  ndif.  return rc
5410: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4d 61 6b 65 20  ;.}../*.** Make 
5420: 73 75 72 65 20 61 6c 6c 20 77 72 69 74 65 73 20  sure all writes 
5430: 74 6f 20 61 20 70 61 72 74 69 63 75 6c 61 72 20  to a particular 
5440: 66 69 6c 65 20 61 72 65 20 63 6f 6d 6d 69 74 74  file are committ
5450: 65 64 20 74 6f 20 64 69 73 6b 2e 0a 2a 2a 0a 2a  ed to disk..**.*
5460: 2a 20 55 6e 64 65 72 20 55 6e 69 78 2c 20 61 6c  * Under Unix, al
5470: 73 6f 20 6d 61 6b 65 20 73 75 72 65 20 74 68 61  so make sure tha
5480: 74 20 74 68 65 20 64 69 72 65 63 74 6f 72 79 20  t the directory 
5490: 65 6e 74 72 79 20 66 6f 72 20 74 68 65 20 66 69  entry for the fi
54a0: 6c 65 0a 2a 2a 20 68 61 73 20 62 65 65 6e 20 63  le.** has been c
54b0: 72 65 61 74 65 64 20 62 79 20 66 73 79 6e 63 2d  reated by fsync-
54c0: 69 6e 67 20 74 68 65 20 64 69 72 65 63 74 6f 72  ing the director
54d0: 79 20 74 68 61 74 20 63 6f 6e 74 61 69 6e 73 20  y that contains 
54e0: 74 68 65 20 66 69 6c 65 2e 0a 2a 2a 20 49 66 20  the file..** If 
54f0: 77 65 20 64 6f 20 6e 6f 74 20 64 6f 20 74 68 69  we do not do thi
5500: 73 20 61 6e 64 20 77 65 20 65 6e 63 6f 75 6e 74  s and we encount
5510: 65 72 20 61 20 70 6f 77 65 72 20 66 61 69 6c 75  er a power failu
5520: 72 65 2c 20 74 68 65 20 64 69 72 65 63 74 6f 72  re, the director
5530: 79 0a 2a 2a 20 65 6e 74 72 79 20 66 6f 72 20 74  y.** entry for t
5540: 68 65 20 6a 6f 75 72 6e 61 6c 20 6d 69 67 68 74  he journal might
5550: 20 6e 6f 74 20 65 78 69 73 74 20 61 66 74 65 72   not exist after
5560: 20 77 65 20 72 65 62 6f 6f 74 2e 20 20 54 68 65   we reboot.  The
5570: 20 6e 65 78 74 0a 2a 2a 20 53 51 4c 69 74 65 20   next.** SQLite 
5580: 74 6f 20 61 63 63 65 73 73 20 74 68 65 20 66 69  to access the fi
5590: 6c 65 20 77 69 6c 6c 20 6e 6f 74 20 6b 6e 6f 77  le will not know
55a0: 20 74 68 61 74 20 74 68 65 20 6a 6f 75 72 6e 61   that the journa
55b0: 6c 20 65 78 69 73 74 73 20 28 62 65 63 61 75 73  l exists (becaus
55c0: 65 0a 2a 2a 20 74 68 65 20 64 69 72 65 63 74 6f  e.** the directo
55d0: 72 79 20 65 6e 74 72 79 20 66 6f 72 20 74 68 65  ry entry for the
55e0: 20 6a 6f 75 72 6e 61 6c 20 77 61 73 20 6e 65 76   journal was nev
55f0: 65 72 20 63 72 65 61 74 65 64 29 20 61 6e 64 20  er created) and 
5600: 74 68 65 20 74 72 61 6e 73 61 63 74 69 6f 6e 0a  the transaction.
5610: 2a 2a 20 77 69 6c 6c 20 6e 6f 74 20 72 6f 6c 6c  ** will not roll
5620: 20 62 61 63 6b 20 2d 20 70 6f 73 73 69 62 6c 79   back - possibly
5630: 20 6c 65 61 64 69 6e 67 20 74 6f 20 64 61 74 61   leading to data
5640: 62 61 73 65 20 63 6f 72 72 75 70 74 69 6f 6e 2e  base corruption.
5650: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f  .*/.int sqlite3O
5660: 73 53 79 6e 63 28 4f 73 46 69 6c 65 20 2a 69 64  sSync(OsFile *id
5670: 29 7b 0a 20 20 61 73 73 65 72 74 28 20 69 64 2d  ){.  assert( id-
5680: 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20 53 69 6d  >isOpen );.  Sim
5690: 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53 51 4c  ulateIOError(SQL
56a0: 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20 54 52  ITE_IOERR);.  TR
56b0: 41 43 45 32 28 22 53 59 4e 43 20 20 20 20 25 2d  ACE2("SYNC    %-
56c0: 33 64 5c 6e 22 2c 20 69 64 2d 3e 68 29 3b 0a 20  3d\n", id->h);. 
56d0: 20 69 66 28 20 66 75 6c 6c 5f 66 73 79 6e 63 28   if( full_fsync(
56e0: 69 64 2d 3e 68 29 20 29 7b 0a 20 20 20 20 72 65  id->h) ){.    re
56f0: 74 75 72 6e 20 53 51 4c 49 54 45 5f 49 4f 45 52  turn SQLITE_IOER
5700: 52 3b 0a 20 20 7d 0a 20 20 69 66 28 20 69 64 2d  R;.  }.  if( id-
5710: 3e 64 69 72 66 64 3e 3d 30 20 29 7b 0a 20 20 20  >dirfd>=0 ){.   
5720: 20 54 52 41 43 45 32 28 22 44 49 52 53 59 4e 43   TRACE2("DIRSYNC
5730: 20 25 2d 33 64 5c 6e 22 2c 20 69 64 2d 3e 64 69   %-3d\n", id->di
5740: 72 66 64 29 3b 0a 20 20 20 20 66 75 6c 6c 5f 66  rfd);.    full_f
5750: 73 79 6e 63 28 69 64 2d 3e 64 69 72 66 64 29 3b  sync(id->dirfd);
5760: 0a 20 20 20 20 63 6c 6f 73 65 28 69 64 2d 3e 64  .    close(id->d
5770: 69 72 66 64 29 3b 20 20 2f 2a 20 4f 6e 6c 79 20  irfd);  /* Only 
5780: 6e 65 65 64 20 74 6f 20 73 79 6e 63 20 6f 6e 63  need to sync onc
5790: 65 2c 20 73 6f 20 63 6c 6f 73 65 20 74 68 65 20  e, so close the 
57a0: 64 69 72 65 63 74 6f 72 79 20 2a 2f 0a 20 20 20  directory */.   
57b0: 20 69 64 2d 3e 64 69 72 66 64 20 3d 20 2d 31 3b   id->dirfd = -1;
57c0: 20 20 20 20 2f 2a 20 77 68 65 6e 20 77 65 20 61      /* when we a
57d0: 72 65 20 64 6f 6e 65 2e 20 2a 2f 0a 20 20 7d 0a  re done. */.  }.
57e0: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
57f0: 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 79 6e  OK;.}../*.** Syn
5800: 63 20 74 68 65 20 64 69 72 65 63 74 6f 72 79 20  c the directory 
5810: 7a 44 69 72 6e 61 6d 65 2e 20 54 68 69 73 20 69  zDirname. This i
5820: 73 20 61 20 6e 6f 2d 6f 70 20 6f 6e 20 6f 70 65  s a no-op on ope
5830: 72 61 74 69 6e 67 20 73 79 73 74 65 6d 73 20 6f  rating systems o
5840: 74 68 65 72 0a 2a 2a 20 74 68 61 6e 20 55 4e 49  ther.** than UNI
5850: 58 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  X..*/.int sqlite
5860: 33 4f 73 53 79 6e 63 44 69 72 65 63 74 6f 72 79  3OsSyncDirectory
5870: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 44 69  (const char *zDi
5880: 72 6e 61 6d 65 29 7b 0a 20 20 69 6e 74 20 66 64  rname){.  int fd
5890: 3b 0a 20 20 69 6e 74 20 72 3b 0a 20 20 53 69 6d  ;.  int r;.  Sim
58a0: 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53 51 4c  ulateIOError(SQL
58b0: 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20 66 64  ITE_IOERR);.  fd
58c0: 20 3d 20 6f 70 65 6e 28 7a 44 69 72 6e 61 6d 65   = open(zDirname
58d0: 2c 20 4f 5f 52 44 4f 4e 4c 59 7c 4f 5f 42 49 4e  , O_RDONLY|O_BIN
58e0: 41 52 59 2c 20 30 36 34 34 29 3b 0a 20 20 54 52  ARY, 0644);.  TR
58f0: 41 43 45 33 28 22 44 49 52 53 59 4e 43 20 25 2d  ACE3("DIRSYNC %-
5900: 33 64 20 28 25 73 29 5c 6e 22 2c 20 66 64 2c 20  3d (%s)\n", fd, 
5910: 7a 44 69 72 6e 61 6d 65 29 3b 0a 20 20 69 66 28  zDirname);.  if(
5920: 20 66 64 3c 30 20 29 7b 0a 20 20 20 20 72 65 74   fd<0 ){.    ret
5930: 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f  urn SQLITE_CANTO
5940: 50 45 4e 3b 20 0a 20 20 7d 0a 20 20 72 20 3d 20  PEN; .  }.  r = 
5950: 66 73 79 6e 63 28 66 64 29 3b 0a 20 20 63 6c 6f  fsync(fd);.  clo
5960: 73 65 28 66 64 29 3b 0a 20 20 72 65 74 75 72 6e  se(fd);.  return
5970: 20 28 28 72 3d 3d 30 29 3f 53 51 4c 49 54 45 5f   ((r==0)?SQLITE_
5980: 4f 4b 3a 53 51 4c 49 54 45 5f 49 4f 45 52 52 29  OK:SQLITE_IOERR)
5990: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 72 75 6e 63  ;.}../*.** Trunc
59a0: 61 74 65 20 61 6e 20 6f 70 65 6e 20 66 69 6c 65  ate an open file
59b0: 20 74 6f 20 61 20 73 70 65 63 69 66 69 65 64 20   to a specified 
59c0: 73 69 7a 65 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  size.*/.int sqli
59d0: 74 65 33 4f 73 54 72 75 6e 63 61 74 65 28 4f 73  te3OsTruncate(Os
59e0: 46 69 6c 65 20 2a 69 64 2c 20 6f 66 66 5f 74 20  File *id, off_t 
59f0: 6e 42 79 74 65 29 7b 0a 20 20 61 73 73 65 72 74  nByte){.  assert
5a00: 28 20 69 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a  ( id->isOpen );.
5a10: 20 20 53 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f    SimulateIOErro
5a20: 72 28 53 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b  r(SQLITE_IOERR);
5a30: 0a 20 20 72 65 74 75 72 6e 20 66 74 72 75 6e 63  .  return ftrunc
5a40: 61 74 65 28 69 64 2d 3e 68 2c 20 6e 42 79 74 65  ate(id->h, nByte
5a50: 29 3d 3d 30 20 3f 20 53 51 4c 49 54 45 5f 4f 4b  )==0 ? SQLITE_OK
5a60: 20 3a 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b   : SQLITE_IOERR;
5a70: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 44 65 74 65 72 6d  .}../*.** Determ
5a80: 69 6e 65 20 74 68 65 20 63 75 72 72 65 6e 74 20  ine the current 
5a90: 73 69 7a 65 20 6f 66 20 61 20 66 69 6c 65 20 69  size of a file i
5aa0: 6e 20 62 79 74 65 73 0a 2a 2f 0a 69 6e 74 20 73  n bytes.*/.int s
5ab0: 71 6c 69 74 65 33 4f 73 46 69 6c 65 53 69 7a 65  qlite3OsFileSize
5ac0: 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20 6f 66 66  (OsFile *id, off
5ad0: 5f 74 20 2a 70 53 69 7a 65 29 7b 0a 20 20 73 74  _t *pSize){.  st
5ae0: 72 75 63 74 20 73 74 61 74 20 62 75 66 3b 0a 20  ruct stat buf;. 
5af0: 20 61 73 73 65 72 74 28 20 69 64 2d 3e 69 73 4f   assert( id->isO
5b00: 70 65 6e 20 29 3b 0a 20 20 53 69 6d 75 6c 61 74  pen );.  Simulat
5b10: 65 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f  eIOError(SQLITE_
5b20: 49 4f 45 52 52 29 3b 0a 20 20 69 66 28 20 66 73  IOERR);.  if( fs
5b30: 74 61 74 28 69 64 2d 3e 68 2c 20 26 62 75 66 29  tat(id->h, &buf)
5b40: 21 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72  !=0 ){.    retur
5b50: 6e 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a  n SQLITE_IOERR;.
5b60: 20 20 7d 0a 20 20 2a 70 53 69 7a 65 20 3d 20 62    }.  *pSize = b
5b70: 75 66 2e 73 74 5f 73 69 7a 65 3b 0a 20 20 72 65  uf.st_size;.  re
5b80: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  turn SQLITE_OK;.
5b90: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f  }../*.** This ro
5ba0: 75 74 69 6e 65 20 63 68 65 63 6b 73 20 69 66 20  utine checks if 
5bb0: 74 68 65 72 65 20 69 73 20 61 20 52 45 53 45 52  there is a RESER
5bc0: 56 45 44 20 6c 6f 63 6b 20 68 65 6c 64 20 6f 6e  VED lock held on
5bd0: 20 74 68 65 20 73 70 65 63 69 66 69 65 64 0a 2a   the specified.*
5be0: 2a 20 66 69 6c 65 20 62 79 20 74 68 69 73 20 6f  * file by this o
5bf0: 72 20 61 6e 79 20 6f 74 68 65 72 20 70 72 6f 63  r any other proc
5c00: 65 73 73 2e 20 49 66 20 73 75 63 68 20 61 20 6c  ess. If such a l
5c10: 6f 63 6b 20 69 73 20 68 65 6c 64 2c 20 72 65 74  ock is held, ret
5c20: 75 72 6e 0a 2a 2a 20 6e 6f 6e 2d 7a 65 72 6f 2e  urn.** non-zero.
5c30: 20 20 49 66 20 74 68 65 20 66 69 6c 65 20 69 73    If the file is
5c40: 20 75 6e 6c 6f 63 6b 65 64 20 6f 72 20 68 6f 6c   unlocked or hol
5c50: 64 73 20 6f 6e 6c 79 20 53 48 41 52 45 44 20 6c  ds only SHARED l
5c60: 6f 63 6b 73 2c 20 74 68 65 6e 0a 2a 2a 20 72 65  ocks, then.** re
5c70: 74 75 72 6e 20 7a 65 72 6f 2e 0a 2a 2f 0a 69 6e  turn zero..*/.in
5c80: 74 20 73 71 6c 69 74 65 33 4f 73 43 68 65 63 6b  t sqlite3OsCheck
5c90: 52 65 73 65 72 76 65 64 4c 6f 63 6b 28 4f 73 46  ReservedLock(OsF
5ca0: 69 6c 65 20 2a 69 64 29 7b 0a 20 20 69 6e 74 20  ile *id){.  int 
5cb0: 72 20 3d 20 30 3b 0a 0a 20 20 61 73 73 65 72 74  r = 0;..  assert
5cc0: 28 20 69 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a  ( id->isOpen );.
5cd0: 20 20 73 71 6c 69 74 65 33 4f 73 45 6e 74 65 72    sqlite3OsEnter
5ce0: 4d 75 74 65 78 28 29 3b 20 2f 2a 20 4e 65 65 64  Mutex(); /* Need
5cf0: 65 64 20 62 65 63 61 75 73 65 20 69 64 2d 3e 70  ed because id->p
5d00: 4c 6f 63 6b 20 69 73 20 73 68 61 72 65 64 20 61  Lock is shared a
5d10: 63 72 6f 73 73 20 74 68 72 65 61 64 73 20 2a 2f  cross threads */
5d20: 0a 0a 20 20 2f 2a 20 43 68 65 63 6b 20 69 66 20  ..  /* Check if 
5d30: 61 20 74 68 72 65 61 64 20 69 6e 20 74 68 69 73  a thread in this
5d40: 20 70 72 6f 63 65 73 73 20 68 6f 6c 64 73 20 73   process holds s
5d50: 75 63 68 20 61 20 6c 6f 63 6b 20 2a 2f 0a 20 20  uch a lock */.  
5d60: 69 66 28 20 69 64 2d 3e 70 4c 6f 63 6b 2d 3e 6c  if( id->pLock->l
5d70: 6f 63 6b 74 79 70 65 3e 53 48 41 52 45 44 5f 4c  ocktype>SHARED_L
5d80: 4f 43 4b 20 29 7b 0a 20 20 20 20 72 20 3d 20 31  OCK ){.    r = 1
5d90: 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 4f 74 68 65  ;.  }..  /* Othe
5da0: 72 77 69 73 65 20 73 65 65 20 69 66 20 73 6f 6d  rwise see if som
5db0: 65 20 6f 74 68 65 72 20 70 72 6f 63 65 73 73 20  e other process 
5dc0: 68 6f 6c 64 73 20 69 74 2e 0a 20 20 2a 2f 0a 20  holds it..  */. 
5dd0: 20 69 66 28 20 21 72 20 29 7b 0a 20 20 20 20 73   if( !r ){.    s
5de0: 74 72 75 63 74 20 66 6c 6f 63 6b 20 6c 6f 63 6b  truct flock lock
5df0: 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65  ;.    lock.l_whe
5e00: 6e 63 65 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a  nce = SEEK_SET;.
5e10: 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74      lock.l_start
5e20: 20 3d 20 52 45 53 45 52 56 45 44 5f 42 59 54 45   = RESERVED_BYTE
5e30: 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e  ;.    lock.l_len
5e40: 20 3d 20 31 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c   = 1;.    lock.l
5e50: 5f 74 79 70 65 20 3d 20 46 5f 57 52 4c 43 4b 3b  _type = F_WRLCK;
5e60: 0a 20 20 20 20 66 63 6e 74 6c 28 69 64 2d 3e 68  .    fcntl(id->h
5e70: 2c 20 46 5f 47 45 54 4c 4b 2c 20 26 6c 6f 63 6b  , F_GETLK, &lock
5e80: 29 3b 0a 20 20 20 20 69 66 28 20 6c 6f 63 6b 2e  );.    if( lock.
5e90: 6c 5f 74 79 70 65 21 3d 46 5f 55 4e 4c 43 4b 20  l_type!=F_UNLCK 
5ea0: 29 7b 0a 20 20 20 20 20 20 72 20 3d 20 31 3b 0a  ){.      r = 1;.
5eb0: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 0a 20 20 73      }.  }.  .  s
5ec0: 71 6c 69 74 65 33 4f 73 4c 65 61 76 65 4d 75 74  qlite3OsLeaveMut
5ed0: 65 78 28 29 3b 0a 20 20 54 52 41 43 45 33 28 22  ex();.  TRACE3("
5ee0: 54 45 53 54 20 57 52 2d 4c 4f 43 4b 20 25 64 20  TEST WR-LOCK %d 
5ef0: 25 64 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20 72 29  %d\n", id->h, r)
5f00: 3b 0a 0a 20 20 72 65 74 75 72 6e 20 72 3b 0a 7d  ;..  return r;.}
5f10: 0a 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f  ..#ifdef SQLITE_
5f20: 44 45 42 55 47 0a 2f 2a 0a 2a 2a 20 48 65 6c 70  DEBUG./*.** Help
5f30: 65 72 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20  er function for 
5f40: 70 72 69 6e 74 69 6e 67 20 6f 75 74 20 74 72 61  printing out tra
5f50: 63 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66  ce information f
5f60: 72 6f 6d 20 64 65 62 75 67 67 69 6e 67 0a 2a 2a  rom debugging.**
5f70: 20 62 69 6e 61 72 69 65 73 2e 20 54 68 69 73 20   binaries. This 
5f80: 72 65 74 75 72 6e 73 20 74 68 65 20 73 74 72 69  returns the stri
5f90: 6e 67 20 72 65 70 72 65 73 65 74 61 74 69 6f 6e  ng represetation
5fa0: 20 6f 66 20 74 68 65 20 73 75 70 70 6c 69 65 64   of the supplied
5fb0: 0a 2a 2a 20 69 6e 74 65 67 65 72 20 6c 6f 63 6b  .** integer lock
5fc0: 2d 74 79 70 65 2e 0a 2a 2f 0a 73 74 61 74 69 63  -type..*/.static
5fd0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 20 6c 6f   const char * lo
5fe0: 63 6b 74 79 70 65 4e 61 6d 65 28 69 6e 74 20 6c  cktypeName(int l
5ff0: 6f 63 6b 74 79 70 65 29 7b 0a 20 20 73 77 69 74  ocktype){.  swit
6000: 63 68 28 20 6c 6f 63 6b 74 79 70 65 20 29 7b 0a  ch( locktype ){.
6010: 20 20 63 61 73 65 20 4e 4f 5f 4c 4f 43 4b 3a 20    case NO_LOCK: 
6020: 72 65 74 75 72 6e 20 22 4e 4f 4e 45 22 3b 0a 20  return "NONE";. 
6030: 20 63 61 73 65 20 53 48 41 52 45 44 5f 4c 4f 43   case SHARED_LOC
6040: 4b 3a 20 72 65 74 75 72 6e 20 22 53 48 41 52 45  K: return "SHARE
6050: 44 22 3b 0a 20 20 63 61 73 65 20 52 45 53 45 52  D";.  case RESER
6060: 56 45 44 5f 4c 4f 43 4b 3a 20 72 65 74 75 72 6e  VED_LOCK: return
6070: 20 22 52 45 53 45 52 56 45 44 22 3b 0a 20 20 63   "RESERVED";.  c
6080: 61 73 65 20 50 45 4e 44 49 4e 47 5f 4c 4f 43 4b  ase PENDING_LOCK
6090: 3a 20 72 65 74 75 72 6e 20 22 50 45 4e 44 49 4e  : return "PENDIN
60a0: 47 22 3b 0a 20 20 63 61 73 65 20 45 58 43 4c 55  G";.  case EXCLU
60b0: 53 49 56 45 5f 4c 4f 43 4b 3a 20 72 65 74 75 72  SIVE_LOCK: retur
60c0: 6e 20 22 45 58 43 4c 55 53 49 56 45 22 3b 0a 20  n "EXCLUSIVE";. 
60d0: 20 7d 0a 20 20 72 65 74 75 72 6e 20 22 45 52 52   }.  return "ERR
60e0: 4f 52 22 3b 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f  OR";.}.#endif../
60f0: 2a 0a 2a 2a 20 4c 6f 63 6b 20 74 68 65 20 66 69  *.** Lock the fi
6100: 6c 65 20 77 69 74 68 20 74 68 65 20 6c 6f 63 6b  le with the lock
6110: 20 73 70 65 63 69 66 69 65 64 20 62 79 20 70 61   specified by pa
6120: 72 61 6d 65 74 65 72 20 6c 6f 63 6b 74 79 70 65  rameter locktype
6130: 20 2d 20 6f 6e 65 0a 2a 2a 20 6f 66 20 74 68 65   - one.** of the
6140: 20 66 6f 6c 6c 6f 77 69 6e 67 3a 0a 2a 2a 0a 2a   following:.**.*
6150: 2a 20 20 20 20 20 28 31 29 20 53 48 41 52 45 44  *     (1) SHARED
6160: 5f 4c 4f 43 4b 0a 2a 2a 20 20 20 20 20 28 32 29  _LOCK.**     (2)
6170: 20 52 45 53 45 52 56 45 44 5f 4c 4f 43 4b 0a 2a   RESERVED_LOCK.*
6180: 2a 20 20 20 20 20 28 33 29 20 50 45 4e 44 49 4e  *     (3) PENDIN
6190: 47 5f 4c 4f 43 4b 0a 2a 2a 20 20 20 20 20 28 34  G_LOCK.**     (4
61a0: 29 20 45 58 43 4c 55 53 49 56 45 5f 4c 4f 43 4b  ) EXCLUSIVE_LOCK
61b0: 0a 2a 2a 0a 2a 2a 20 53 6f 6d 65 74 69 6d 65 73  .**.** Sometimes
61c0: 20 77 68 65 6e 20 72 65 71 75 65 73 74 69 6e 67   when requesting
61d0: 20 6f 6e 65 20 6c 6f 63 6b 20 73 74 61 74 65 2c   one lock state,
61e0: 20 61 64 64 69 74 69 6f 6e 61 6c 20 6c 6f 63 6b   additional lock
61f0: 20 73 74 61 74 65 73 0a 2a 2a 20 61 72 65 20 69   states.** are i
6200: 6e 73 65 72 74 65 64 20 69 6e 20 62 65 74 77 65  nserted in betwe
6210: 65 6e 2e 20 20 54 68 65 20 6c 6f 63 6b 69 6e 67  en.  The locking
6220: 20 6d 69 67 68 74 20 66 61 69 6c 20 6f 6e 20 6f   might fail on o
6230: 6e 65 20 6f 66 20 74 68 65 20 6c 61 74 65 72 0a  ne of the later.
6240: 2a 2a 20 74 72 61 6e 73 69 74 69 6f 6e 73 20 6c  ** transitions l
6250: 65 61 76 69 6e 67 20 74 68 65 20 6c 6f 63 6b 20  eaving the lock 
6260: 73 74 61 74 65 20 64 69 66 66 65 72 65 6e 74 20  state different 
6270: 66 72 6f 6d 20 77 68 61 74 20 69 74 20 73 74 61  from what it sta
6280: 72 74 65 64 20 62 75 74 0a 2a 2a 20 73 74 69 6c  rted but.** stil
6290: 6c 20 73 68 6f 72 74 20 6f 66 20 69 74 73 20 67  l short of its g
62a0: 6f 61 6c 2e 20 20 54 68 65 20 66 6f 6c 6c 6f 77  oal.  The follow
62b0: 69 6e 67 20 63 68 61 72 74 20 73 68 6f 77 73 20  ing chart shows 
62c0: 74 68 65 20 61 6c 6c 6f 77 65 64 0a 2a 2a 20 74  the allowed.** t
62d0: 72 61 6e 73 69 74 69 6f 6e 73 20 61 6e 64 20 74  ransitions and t
62e0: 68 65 20 69 6e 73 65 72 74 65 64 20 69 6e 74 65  he inserted inte
62f0: 72 6d 65 64 69 61 74 65 20 73 74 61 74 65 73 3a  rmediate states:
6300: 0a 2a 2a 0a 2a 2a 20 20 20 20 55 4e 4c 4f 43 4b  .**.**    UNLOCK
6310: 45 44 20 2d 3e 20 53 48 41 52 45 44 0a 2a 2a 20  ED -> SHARED.** 
6320: 20 20 20 53 48 41 52 45 44 20 2d 3e 20 52 45 53     SHARED -> RES
6330: 45 52 56 45 44 0a 2a 2a 20 20 20 20 53 48 41 52  ERVED.**    SHAR
6340: 45 44 20 2d 3e 20 28 50 45 4e 44 49 4e 47 29 20  ED -> (PENDING) 
6350: 2d 3e 20 45 58 43 4c 55 53 49 56 45 0a 2a 2a 20  -> EXCLUSIVE.** 
6360: 20 20 20 52 45 53 45 52 56 45 44 20 2d 3e 20 28     RESERVED -> (
6370: 50 45 4e 44 49 4e 47 29 20 2d 3e 20 45 58 43 4c  PENDING) -> EXCL
6380: 55 53 49 56 45 0a 2a 2a 20 20 20 20 50 45 4e 44  USIVE.**    PEND
6390: 49 4e 47 20 2d 3e 20 45 58 43 4c 55 53 49 56 45  ING -> EXCLUSIVE
63a0: 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74  .**.** This rout
63b0: 69 6e 65 20 77 69 6c 6c 20 6f 6e 6c 79 20 69 6e  ine will only in
63c0: 63 72 65 61 73 65 20 61 20 6c 6f 63 6b 2e 20 20  crease a lock.  
63d0: 55 73 65 20 74 68 65 20 73 71 6c 69 74 65 33 4f  Use the sqlite3O
63e0: 73 55 6e 6c 6f 63 6b 28 29 0a 2a 2a 20 72 6f 75  sUnlock().** rou
63f0: 74 69 6e 65 20 74 6f 20 6c 6f 77 65 72 20 61 20  tine to lower a 
6400: 6c 6f 63 6b 69 6e 67 20 6c 65 76 65 6c 2e 0a 2a  locking level..*
6410: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 4c  /.int sqlite3OsL
6420: 6f 63 6b 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20  ock(OsFile *id, 
6430: 69 6e 74 20 6c 6f 63 6b 74 79 70 65 29 7b 0a 20  int locktype){. 
6440: 20 2f 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e   /* The followin
6450: 67 20 64 65 73 63 72 69 62 65 73 20 74 68 65 20  g describes the 
6460: 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 6f  implementation o
6470: 66 20 74 68 65 20 76 61 72 69 6f 75 73 20 6c 6f  f the various lo
6480: 63 6b 73 20 61 6e 64 0a 20 20 2a 2a 20 6c 6f 63  cks and.  ** loc
6490: 6b 20 74 72 61 6e 73 69 74 69 6f 6e 73 20 69 6e  k transitions in
64a0: 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 50 4f   terms of the PO
64b0: 53 49 58 20 61 64 76 69 73 6f 72 79 20 73 68 61  SIX advisory sha
64c0: 72 65 64 20 61 6e 64 20 65 78 63 6c 75 73 69 76  red and exclusiv
64d0: 65 0a 20 20 2a 2a 20 6c 6f 63 6b 20 70 72 69 6d  e.  ** lock prim
64e0: 69 74 69 76 65 73 20 28 63 61 6c 6c 65 64 20 72  itives (called r
64f0: 65 61 64 2d 6c 6f 63 6b 73 20 61 6e 64 20 77 72  ead-locks and wr
6500: 69 74 65 2d 6c 6f 63 6b 73 20 62 65 6c 6f 77 2c  ite-locks below,
6510: 20 74 6f 20 61 76 6f 69 64 0a 20 20 2a 2a 20 63   to avoid.  ** c
6520: 6f 6e 66 75 73 69 6f 6e 20 77 69 74 68 20 53 51  onfusion with SQ
6530: 4c 69 74 65 20 6c 6f 63 6b 20 6e 61 6d 65 73 29  Lite lock names)
6540: 2e 20 54 68 65 20 61 6c 67 6f 72 69 74 68 6d 73  . The algorithms
6550: 20 61 72 65 20 63 6f 6d 70 6c 69 63 61 74 65 64   are complicated
6560: 0a 20 20 2a 2a 20 73 6c 69 67 68 74 6c 79 20 69  .  ** slightly i
6570: 6e 20 6f 72 64 65 72 20 74 6f 20 62 65 20 63 6f  n order to be co
6580: 6d 70 61 74 69 62 6c 65 20 77 69 74 68 20 77 69  mpatible with wi
6590: 6e 64 6f 77 73 20 73 79 73 74 65 6d 73 20 73 69  ndows systems si
65a0: 6d 75 6c 74 61 6e 65 6f 75 73 6c 79 0a 20 20 2a  multaneously.  *
65b0: 2a 20 61 63 63 65 73 73 69 6e 67 20 74 68 65 20  * accessing the 
65c0: 73 61 6d 65 20 64 61 74 61 62 61 73 65 20 66 69  same database fi
65d0: 6c 65 2c 20 69 6e 20 63 61 73 65 20 74 68 61 74  le, in case that
65e0: 20 69 73 20 65 76 65 72 20 72 65 71 75 69 72 65   is ever require
65f0: 64 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 53 79 6d  d..  **.  ** Sym
6600: 62 6f 6c 73 20 64 65 66 69 6e 65 64 20 69 6e 20  bols defined in 
6610: 6f 73 2e 68 20 69 6e 64 65 6e 74 69 66 79 20 74  os.h indentify t
6620: 68 65 20 27 70 65 6e 64 69 6e 67 20 62 79 74 65  he 'pending byte
6630: 27 20 61 6e 64 20 74 68 65 20 27 72 65 73 65 72  ' and the 'reser
6640: 76 65 64 0a 20 20 2a 2a 20 62 79 74 65 27 2c 20  ved.  ** byte', 
6650: 65 61 63 68 20 73 69 6e 67 6c 65 20 62 79 74 65  each single byte
6660: 73 20 61 74 20 77 65 6c 6c 20 6b 6e 6f 77 6e 20  s at well known 
6670: 6f 66 66 73 65 74 73 2c 20 61 6e 64 20 74 68 65  offsets, and the
6680: 20 27 73 68 61 72 65 64 20 62 79 74 65 0a 20 20   'shared byte.  
6690: 2a 2a 20 72 61 6e 67 65 27 2c 20 61 20 72 61 6e  ** range', a ran
66a0: 67 65 20 6f 66 20 35 31 30 20 62 79 74 65 73 20  ge of 510 bytes 
66b0: 61 74 20 61 20 77 65 6c 6c 20 6b 6e 6f 77 6e 20  at a well known 
66c0: 6f 66 66 73 65 74 2e 0a 20 20 2a 2a 0a 20 20 2a  offset..  **.  *
66d0: 2a 20 54 6f 20 6f 62 74 61 69 6e 20 61 20 53 48  * To obtain a SH
66e0: 41 52 45 44 20 6c 6f 63 6b 2c 20 61 20 72 65 61  ARED lock, a rea
66f0: 64 2d 6c 6f 63 6b 20 69 73 20 6f 62 74 61 69 6e  d-lock is obtain
6700: 65 64 20 6f 6e 20 74 68 65 20 27 70 65 6e 64 69  ed on the 'pendi
6710: 6e 67 0a 20 20 2a 2a 20 62 79 74 65 27 2e 20 20  ng.  ** byte'.  
6720: 49 66 20 74 68 69 73 20 69 73 20 73 75 63 63 65  If this is succe
6730: 73 73 66 75 6c 2c 20 61 20 72 61 6e 64 6f 6d 20  ssful, a random 
6740: 62 79 74 65 20 66 72 6f 6d 20 74 68 65 20 27 73  byte from the 's
6750: 68 61 72 65 64 20 62 79 74 65 0a 20 20 2a 2a 20  hared byte.  ** 
6760: 72 61 6e 67 65 27 20 69 73 20 72 65 61 64 2d 6c  range' is read-l
6770: 6f 63 6b 65 64 20 61 6e 64 20 74 68 65 20 6c 6f  ocked and the lo
6780: 63 6b 20 6f 6e 20 74 68 65 20 27 70 65 6e 64 69  ck on the 'pendi
6790: 6e 67 20 62 79 74 65 27 20 72 65 6c 65 61 73 65  ng byte' release
67a0: 64 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 41 20 70  d..  **.  ** A p
67b0: 72 6f 63 65 73 73 20 6d 61 79 20 6f 6e 6c 79 20  rocess may only 
67c0: 6f 62 74 61 69 6e 20 61 20 52 45 53 45 52 56 45  obtain a RESERVE
67d0: 44 20 6c 6f 63 6b 20 61 66 74 65 72 20 69 74 20  D lock after it 
67e0: 68 61 73 20 61 20 53 48 41 52 45 44 20 6c 6f 63  has a SHARED loc
67f0: 6b 2e 0a 20 20 2a 2a 20 41 20 52 45 53 45 52 56  k..  ** A RESERV
6800: 45 44 20 6c 6f 63 6b 20 69 73 20 69 6d 70 6c 65  ED lock is imple
6810: 6d 65 6e 74 65 64 20 62 79 20 67 72 61 62 62 69  mented by grabbi
6820: 6e 67 20 61 20 77 72 69 74 65 2d 6c 6f 63 6b 20  ng a write-lock 
6830: 6f 6e 20 74 68 65 0a 20 20 2a 2a 20 27 72 65 73  on the.  ** 'res
6840: 65 72 76 65 64 20 62 79 74 65 27 2e 20 0a 20 20  erved byte'. .  
6850: 2a 2a 0a 20 20 2a 2a 20 41 20 70 72 6f 63 65 73  **.  ** A proces
6860: 73 20 6d 61 79 20 6f 6e 6c 79 20 6f 62 74 61 69  s may only obtai
6870: 6e 20 61 20 50 45 4e 44 49 4e 47 20 6c 6f 63 6b  n a PENDING lock
6880: 20 61 66 74 65 72 20 69 74 20 68 61 73 20 6f 62   after it has ob
6890: 74 61 69 6e 65 64 20 61 0a 20 20 2a 2a 20 53 48  tained a.  ** SH
68a0: 41 52 45 44 20 6c 6f 63 6b 2e 20 41 20 50 45 4e  ARED lock. A PEN
68b0: 44 49 4e 47 20 6c 6f 63 6b 20 69 73 20 69 6d 70  DING lock is imp
68c0: 6c 65 6d 65 6e 74 65 64 20 62 79 20 6f 62 74 61  lemented by obta
68d0: 69 6e 69 6e 67 20 61 20 77 72 69 74 65 2d 6c 6f  ining a write-lo
68e0: 63 6b 0a 20 20 2a 2a 20 6f 6e 20 74 68 65 20 27  ck.  ** on the '
68f0: 70 65 6e 64 69 6e 67 20 62 79 74 65 27 2e 20 54  pending byte'. T
6900: 68 69 73 20 65 6e 73 75 72 65 73 20 74 68 61 74  his ensures that
6910: 20 6e 6f 20 6e 65 77 20 53 48 41 52 45 44 20 6c   no new SHARED l
6920: 6f 63 6b 73 20 63 61 6e 20 62 65 0a 20 20 2a 2a  ocks can be.  **
6930: 20 6f 62 74 61 69 6e 65 64 2c 20 62 75 74 20 65   obtained, but e
6940: 78 69 73 74 69 6e 67 20 53 48 41 52 45 44 20 6c  xisting SHARED l
6950: 6f 63 6b 73 20 61 72 65 20 61 6c 6c 6f 77 65 64  ocks are allowed
6960: 20 74 6f 20 70 65 72 73 69 73 74 2e 20 41 20 70   to persist. A p
6970: 72 6f 63 65 73 73 0a 20 20 2a 2a 20 64 6f 65 73  rocess.  ** does
6980: 20 6e 6f 74 20 68 61 76 65 20 74 6f 20 6f 62 74   not have to obt
6990: 61 69 6e 20 61 20 52 45 53 45 52 56 45 44 20 6c  ain a RESERVED l
69a0: 6f 63 6b 20 6f 6e 20 74 68 65 20 77 61 79 20 74  ock on the way t
69b0: 6f 20 61 20 50 45 4e 44 49 4e 47 20 6c 6f 63 6b  o a PENDING lock
69c0: 2e 0a 20 20 2a 2a 20 54 68 69 73 20 70 72 6f 70  ..  ** This prop
69d0: 65 72 74 79 20 69 73 20 75 73 65 64 20 62 79 20  erty is used by 
69e0: 74 68 65 20 61 6c 67 6f 72 69 74 68 6d 20 66 6f  the algorithm fo
69f0: 72 20 72 6f 6c 6c 69 6e 67 20 62 61 63 6b 20 61  r rolling back a
6a00: 20 6a 6f 75 72 6e 61 6c 20 66 69 6c 65 0a 20 20   journal file.  
6a10: 2a 2a 20 61 66 74 65 72 20 61 20 63 72 61 73 68  ** after a crash
6a20: 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 41 6e 20 45  ..  **.  ** An E
6a30: 58 43 4c 55 53 49 56 45 20 6c 6f 63 6b 2c 20 6f  XCLUSIVE lock, o
6a40: 62 74 61 69 6e 65 64 20 61 66 74 65 72 20 61 20  btained after a 
6a50: 50 45 4e 44 49 4e 47 20 6c 6f 63 6b 20 69 73 20  PENDING lock is 
6a60: 68 65 6c 64 2c 20 69 73 0a 20 20 2a 2a 20 69 6d  held, is.  ** im
6a70: 70 6c 65 6d 65 6e 74 65 64 20 62 79 20 6f 62 74  plemented by obt
6a80: 61 69 6e 69 6e 67 20 61 20 77 72 69 74 65 2d 6c  aining a write-l
6a90: 6f 63 6b 20 6f 6e 20 74 68 65 20 65 6e 74 69 72  ock on the entir
6aa0: 65 20 27 73 68 61 72 65 64 20 62 79 74 65 0a 20  e 'shared byte. 
6ab0: 20 2a 2a 20 72 61 6e 67 65 27 2e 20 53 69 6e 63   ** range'. Sinc
6ac0: 65 20 61 6c 6c 20 6f 74 68 65 72 20 6c 6f 63 6b  e all other lock
6ad0: 73 20 72 65 71 75 69 72 65 20 61 20 72 65 61 64  s require a read
6ae0: 2d 6c 6f 63 6b 20 6f 6e 20 6f 6e 65 20 6f 66 20  -lock on one of 
6af0: 74 68 65 20 62 79 74 65 73 0a 20 20 2a 2a 20 77  the bytes.  ** w
6b00: 69 74 68 69 6e 20 74 68 69 73 20 72 61 6e 67 65  ithin this range
6b10: 2c 20 74 68 69 73 20 65 6e 73 75 72 65 73 20 74  , this ensures t
6b20: 68 61 74 20 6e 6f 20 6f 74 68 65 72 20 6c 6f 63  hat no other loc
6b30: 6b 73 20 61 72 65 20 68 65 6c 64 20 6f 6e 20 74  ks are held on t
6b40: 68 65 0a 20 20 2a 2a 20 64 61 74 61 62 61 73 65  he.  ** database
6b50: 2e 20 0a 20 20 2a 2a 0a 20 20 2a 2a 20 54 68 65  . .  **.  ** The
6b60: 20 72 65 61 73 6f 6e 20 61 20 73 69 6e 67 6c 65   reason a single
6b70: 20 62 79 74 65 20 63 61 6e 6e 6f 74 20 62 65 20   byte cannot be 
6b80: 75 73 65 64 20 69 6e 73 74 65 61 64 20 6f 66 20  used instead of 
6b90: 74 68 65 20 27 73 68 61 72 65 64 20 62 79 74 65  the 'shared byte
6ba0: 0a 20 20 2a 2a 20 72 61 6e 67 65 27 20 69 73 20  .  ** range' is 
6bb0: 74 68 61 74 20 73 6f 6d 65 20 76 65 72 73 69 6f  that some versio
6bc0: 6e 73 20 6f 66 20 77 69 6e 64 6f 77 73 20 64 6f  ns of windows do
6bd0: 20 6e 6f 74 20 73 75 70 70 6f 72 74 20 72 65 61   not support rea
6be0: 64 2d 6c 6f 63 6b 73 2e 20 42 79 0a 20 20 2a 2a  d-locks. By.  **
6bf0: 20 6c 6f 63 6b 69 6e 67 20 61 20 72 61 6e 64 6f   locking a rando
6c00: 6d 20 62 79 74 65 20 66 72 6f 6d 20 61 20 72 61  m byte from a ra
6c10: 6e 67 65 2c 20 63 6f 6e 63 75 72 72 65 6e 74 20  nge, concurrent 
6c20: 53 48 41 52 45 44 20 6c 6f 63 6b 73 20 6d 61 79  SHARED locks may
6c30: 20 65 78 69 73 74 0a 20 20 2a 2a 20 65 76 65 6e   exist.  ** even
6c40: 20 69 66 20 74 68 65 20 6c 6f 63 6b 69 6e 67 20   if the locking 
6c50: 70 72 69 6d 69 74 69 76 65 20 75 73 65 64 20 69  primitive used i
6c60: 73 20 61 6c 77 61 79 73 20 61 20 77 72 69 74 65  s always a write
6c70: 2d 6c 6f 63 6b 2e 0a 20 20 2a 2f 0a 20 20 69 6e  -lock..  */.  in
6c80: 74 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b  t rc = SQLITE_OK
6c90: 3b 0a 20 20 73 74 72 75 63 74 20 6c 6f 63 6b 49  ;.  struct lockI
6ca0: 6e 66 6f 20 2a 70 4c 6f 63 6b 20 3d 20 69 64 2d  nfo *pLock = id-
6cb0: 3e 70 4c 6f 63 6b 3b 0a 20 20 73 74 72 75 63 74  >pLock;.  struct
6cc0: 20 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 0a 20 20 69   flock lock;.  i
6cd0: 6e 74 20 73 3b 0a 0a 20 20 61 73 73 65 72 74 28  nt s;..  assert(
6ce0: 20 69 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20   id->isOpen );. 
6cf0: 20 54 52 41 43 45 37 28 22 4c 4f 43 4b 20 25 64   TRACE7("LOCK %d
6d00: 20 25 73 20 77 61 73 20 25 73 28 25 73 2c 25 64   %s was %s(%s,%d
6d10: 29 20 70 69 64 3d 25 64 5c 6e 22 2c 20 69 64 2d  ) pid=%d\n", id-
6d20: 3e 68 2c 20 6c 6f 63 6b 74 79 70 65 4e 61 6d 65  >h, locktypeName
6d30: 28 6c 6f 63 6b 74 79 70 65 29 2c 20 0a 20 20 20  (locktype), .   
6d40: 20 20 20 6c 6f 63 6b 74 79 70 65 4e 61 6d 65 28     locktypeName(
6d50: 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 29 2c 20 6c  id->locktype), l
6d60: 6f 63 6b 74 79 70 65 4e 61 6d 65 28 70 4c 6f 63  ocktypeName(pLoc
6d70: 6b 2d 3e 6c 6f 63 6b 74 79 70 65 29 2c 20 70 4c  k->locktype), pL
6d80: 6f 63 6b 2d 3e 63 6e 74 0a 20 20 20 20 20 20 2c  ock->cnt.      ,
6d90: 67 65 74 70 69 64 28 29 20 29 3b 0a 0a 20 20 2f  getpid() );..  /
6da0: 2a 20 49 66 20 74 68 65 72 65 20 69 73 20 61 6c  * If there is al
6db0: 72 65 61 64 79 20 61 20 6c 6f 63 6b 20 6f 66 20  ready a lock of 
6dc0: 74 68 69 73 20 74 79 70 65 20 6f 72 20 6d 6f 72  this type or mor
6dd0: 65 20 72 65 73 74 72 69 63 74 69 76 65 20 6f 6e  e restrictive on
6de0: 20 74 68 65 0a 20 20 2a 2a 20 4f 73 46 69 6c 65   the.  ** OsFile
6df0: 2c 20 64 6f 20 6e 6f 74 68 69 6e 67 2e 20 44 6f  , do nothing. Do
6e00: 6e 27 74 20 75 73 65 20 74 68 65 20 65 6e 64 5f  n't use the end_
6e10: 6c 6f 63 6b 3a 20 65 78 69 74 20 70 61 74 68 2c  lock: exit path,
6e20: 20 61 73 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33   as.  ** sqlite3
6e30: 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 20 68  OsEnterMutex() h
6e40: 61 73 6e 27 74 20 62 65 65 6e 20 63 61 6c 6c 65  asn't been calle
6e50: 64 20 79 65 74 2e 0a 20 20 2a 2f 0a 20 20 69 66  d yet..  */.  if
6e60: 28 20 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 3e 3d  ( id->locktype>=
6e70: 6c 6f 63 6b 74 79 70 65 20 29 7b 0a 20 20 20 20  locktype ){.    
6e80: 54 52 41 43 45 33 28 22 4c 4f 43 4b 20 25 64 20  TRACE3("LOCK %d 
6e90: 25 73 20 6f 6b 20 28 61 6c 72 65 61 64 79 20 68  %s ok (already h
6ea0: 65 6c 64 29 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20  eld)\n", id->h, 
6eb0: 6c 6f 63 6b 74 79 70 65 4e 61 6d 65 28 6c 6f 63  locktypeName(loc
6ec0: 6b 74 79 70 65 29 29 3b 0a 20 20 20 20 72 65 74  ktype));.    ret
6ed0: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20  urn SQLITE_OK;. 
6ee0: 20 7d 0a 0a 20 20 2f 2a 20 4d 61 6b 65 20 73 75   }..  /* Make su
6ef0: 72 65 20 74 68 65 20 6c 6f 63 6b 69 6e 67 20 73  re the locking s
6f00: 65 71 75 65 6e 63 65 20 69 73 20 63 6f 72 72 65  equence is corre
6f10: 63 74 0a 20 20 2a 2f 0a 20 20 61 73 73 65 72 74  ct.  */.  assert
6f20: 28 20 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 21 3d  ( id->locktype!=
6f30: 4e 4f 5f 4c 4f 43 4b 20 7c 7c 20 6c 6f 63 6b 74  NO_LOCK || lockt
6f40: 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43 4b  ype==SHARED_LOCK
6f50: 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 6c 6f   );.  assert( lo
6f60: 63 6b 74 79 70 65 21 3d 50 45 4e 44 49 4e 47 5f  cktype!=PENDING_
6f70: 4c 4f 43 4b 20 29 3b 0a 20 20 61 73 73 65 72 74  LOCK );.  assert
6f80: 28 20 6c 6f 63 6b 74 79 70 65 21 3d 52 45 53 45  ( locktype!=RESE
6f90: 52 56 45 44 5f 4c 4f 43 4b 20 7c 7c 20 69 64 2d  RVED_LOCK || id-
6fa0: 3e 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41 52 45  >locktype==SHARE
6fb0: 44 5f 4c 4f 43 4b 20 29 3b 0a 0a 20 20 2f 2a 20  D_LOCK );..  /* 
6fc0: 54 68 69 73 20 6d 75 74 65 78 20 69 73 20 6e 65  This mutex is ne
6fd0: 65 64 65 64 20 62 65 63 61 75 73 65 20 69 64 2d  eded because id-
6fe0: 3e 70 4c 6f 63 6b 20 69 73 20 73 68 61 72 65 64  >pLock is shared
6ff0: 20 61 63 72 6f 73 73 20 74 68 72 65 61 64 73 0a   across threads.
7000: 20 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 4f 73    */.  sqlite3Os
7010: 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a 0a 20  EnterMutex();.. 
7020: 20 2f 2a 20 49 66 20 73 6f 6d 65 20 74 68 72 65   /* If some thre
7030: 61 64 20 75 73 69 6e 67 20 74 68 69 73 20 50 49  ad using this PI
7040: 44 20 68 61 73 20 61 20 6c 6f 63 6b 20 76 69 61  D has a lock via
7050: 20 61 20 64 69 66 66 65 72 65 6e 74 20 4f 73 46   a different OsF
7060: 69 6c 65 2a 0a 20 20 2a 2a 20 68 61 6e 64 6c 65  ile*.  ** handle
7070: 20 74 68 61 74 20 70 72 65 63 6c 75 64 65 73 20   that precludes 
7080: 74 68 65 20 72 65 71 75 65 73 74 65 64 20 6c 6f  the requested lo
7090: 63 6b 2c 20 72 65 74 75 72 6e 20 42 55 53 59 2e  ck, return BUSY.
70a0: 0a 20 20 2a 2f 0a 20 20 69 66 28 20 28 69 64 2d  .  */.  if( (id-
70b0: 3e 6c 6f 63 6b 74 79 70 65 21 3d 70 4c 6f 63 6b  >locktype!=pLock
70c0: 2d 3e 6c 6f 63 6b 74 79 70 65 20 26 26 20 0a 20  ->locktype && . 
70d0: 20 20 20 20 20 20 20 20 20 28 70 4c 6f 63 6b 2d           (pLock-
70e0: 3e 6c 6f 63 6b 74 79 70 65 3e 3d 50 45 4e 44 49  >locktype>=PENDI
70f0: 4e 47 5f 4c 4f 43 4b 20 7c 7c 20 6c 6f 63 6b 74  NG_LOCK || lockt
7100: 79 70 65 3e 53 48 41 52 45 44 5f 4c 4f 43 4b 29  ype>SHARED_LOCK)
7110: 29 0a 20 20 29 7b 0a 20 20 20 20 72 63 20 3d 20  ).  ){.    rc = 
7120: 53 51 4c 49 54 45 5f 42 55 53 59 3b 0a 20 20 20  SQLITE_BUSY;.   
7130: 20 67 6f 74 6f 20 65 6e 64 5f 6c 6f 63 6b 3b 0a   goto end_lock;.
7140: 20 20 7d 0a 0a 20 20 2f 2a 20 49 66 20 61 20 53    }..  /* If a S
7150: 48 41 52 45 44 20 6c 6f 63 6b 20 69 73 20 72 65  HARED lock is re
7160: 71 75 65 73 74 65 64 2c 20 61 6e 64 20 73 6f 6d  quested, and som
7170: 65 20 74 68 72 65 61 64 20 75 73 69 6e 67 20 74  e thread using t
7180: 68 69 73 20 50 49 44 20 61 6c 72 65 61 64 79 0a  his PID already.
7190: 20 20 2a 2a 20 68 61 73 20 61 20 53 48 41 52 45    ** has a SHARE
71a0: 44 20 6f 72 20 52 45 53 45 52 56 45 44 20 6c 6f  D or RESERVED lo
71b0: 63 6b 2c 20 74 68 65 6e 20 69 6e 63 72 65 6d 65  ck, then increme
71c0: 6e 74 20 72 65 66 65 72 65 6e 63 65 20 63 6f 75  nt reference cou
71d0: 6e 74 73 20 61 6e 64 0a 20 20 2a 2a 20 72 65 74  nts and.  ** ret
71e0: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a 20  urn SQLITE_OK.. 
71f0: 20 2a 2f 0a 20 20 69 66 28 20 6c 6f 63 6b 74 79   */.  if( lockty
7200: 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43 4b 20  pe==SHARED_LOCK 
7210: 26 26 20 0a 20 20 20 20 20 20 28 70 4c 6f 63 6b  && .      (pLock
7220: 2d 3e 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41 52  ->locktype==SHAR
7230: 45 44 5f 4c 4f 43 4b 20 7c 7c 20 70 4c 6f 63 6b  ED_LOCK || pLock
7240: 2d 3e 6c 6f 63 6b 74 79 70 65 3d 3d 52 45 53 45  ->locktype==RESE
7250: 52 56 45 44 5f 4c 4f 43 4b 29 20 29 7b 0a 20 20  RVED_LOCK) ){.  
7260: 20 20 61 73 73 65 72 74 28 20 6c 6f 63 6b 74 79    assert( lockty
7270: 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43 4b 20  pe==SHARED_LOCK 
7280: 29 3b 0a 20 20 20 20 61 73 73 65 72 74 28 20 69  );.    assert( i
7290: 64 2d 3e 6c 6f 63 6b 74 79 70 65 3d 3d 30 20 29  d->locktype==0 )
72a0: 3b 0a 20 20 20 20 61 73 73 65 72 74 28 20 70 4c  ;.    assert( pL
72b0: 6f 63 6b 2d 3e 63 6e 74 3e 30 20 29 3b 0a 20 20  ock->cnt>0 );.  
72c0: 20 20 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d    id->locktype =
72d0: 20 53 48 41 52 45 44 5f 4c 4f 43 4b 3b 0a 20 20   SHARED_LOCK;.  
72e0: 20 20 70 4c 6f 63 6b 2d 3e 63 6e 74 2b 2b 3b 0a    pLock->cnt++;.
72f0: 20 20 20 20 69 64 2d 3e 70 4f 70 65 6e 2d 3e 6e      id->pOpen->n
7300: 4c 6f 63 6b 2b 2b 3b 0a 20 20 20 20 67 6f 74 6f  Lock++;.    goto
7310: 20 65 6e 64 5f 6c 6f 63 6b 3b 0a 20 20 7d 0a 0a   end_lock;.  }..
7320: 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 31    lock.l_len = 1
7330: 4c 3b 0a 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e  L;.  lock.l_when
7340: 63 65 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 0a  ce = SEEK_SET;..
7350: 20 20 2f 2a 20 41 20 50 45 4e 44 49 4e 47 20 6c    /* A PENDING l
7360: 6f 63 6b 20 69 73 20 6e 65 65 64 65 64 20 62 65  ock is needed be
7370: 66 6f 72 65 20 61 63 71 75 69 72 69 6e 67 20 61  fore acquiring a
7380: 20 53 48 41 52 45 44 20 6c 6f 63 6b 20 61 6e 64   SHARED lock and
7390: 20 62 65 66 6f 72 65 0a 20 20 2a 2a 20 61 63 71   before.  ** acq
73a0: 75 69 72 69 6e 67 20 61 6e 20 45 58 43 4c 55 53  uiring an EXCLUS
73b0: 49 56 45 20 6c 6f 63 6b 2e 20 20 46 6f 72 20 74  IVE lock.  For t
73c0: 68 65 20 53 48 41 52 45 44 20 6c 6f 63 6b 2c 20  he SHARED lock, 
73d0: 74 68 65 20 50 45 4e 44 49 4e 47 20 77 69 6c 6c  the PENDING will
73e0: 0a 20 20 2a 2a 20 62 65 20 72 65 6c 65 61 73 65  .  ** be release
73f0: 64 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 6c 6f  d..  */.  if( lo
7400: 63 6b 74 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c  cktype==SHARED_L
7410: 4f 43 4b 20 0a 20 20 20 20 20 20 7c 7c 20 28 6c  OCK .      || (l
7420: 6f 63 6b 74 79 70 65 3d 3d 45 58 43 4c 55 53 49  ocktype==EXCLUSI
7430: 56 45 5f 4c 4f 43 4b 20 26 26 20 69 64 2d 3e 6c  VE_LOCK && id->l
7440: 6f 63 6b 74 79 70 65 3c 50 45 4e 44 49 4e 47 5f  ocktype<PENDING_
7450: 4c 4f 43 4b 29 0a 20 20 29 7b 0a 20 20 20 20 6c  LOCK).  ){.    l
7460: 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d 20 28 6c 6f  ock.l_type = (lo
7470: 63 6b 74 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c  cktype==SHARED_L
7480: 4f 43 4b 3f 46 5f 52 44 4c 43 4b 3a 46 5f 57 52  OCK?F_RDLCK:F_WR
7490: 4c 43 4b 29 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c  LCK);.    lock.l
74a0: 5f 73 74 61 72 74 20 3d 20 50 45 4e 44 49 4e 47  _start = PENDING
74b0: 5f 42 59 54 45 3b 0a 20 20 20 20 73 20 3d 20 66  _BYTE;.    s = f
74c0: 63 6e 74 6c 28 69 64 2d 3e 68 2c 20 46 5f 53 45  cntl(id->h, F_SE
74d0: 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b 0a 20 20 20  TLK, &lock);.   
74e0: 20 69 66 28 20 73 20 29 7b 0a 20 20 20 20 20 20   if( s ){.      
74f0: 72 63 20 3d 20 28 65 72 72 6e 6f 3d 3d 45 49 4e  rc = (errno==EIN
7500: 56 41 4c 29 20 3f 20 53 51 4c 49 54 45 5f 4e 4f  VAL) ? SQLITE_NO
7510: 4c 46 53 20 3a 20 53 51 4c 49 54 45 5f 42 55 53  LFS : SQLITE_BUS
7520: 59 3b 0a 20 20 20 20 20 20 67 6f 74 6f 20 65 6e  Y;.      goto en
7530: 64 5f 6c 6f 63 6b 3b 0a 20 20 20 20 7d 0a 20 20  d_lock;.    }.  
7540: 7d 0a 0a 0a 20 20 2f 2a 20 49 66 20 63 6f 6e 74  }...  /* If cont
7550: 72 6f 6c 20 67 65 74 73 20 74 6f 20 74 68 69 73  rol gets to this
7560: 20 70 6f 69 6e 74 2c 20 74 68 65 6e 20 61 63 74   point, then act
7570: 75 61 6c 6c 79 20 67 6f 20 61 68 65 61 64 20 61  ually go ahead a
7580: 6e 64 20 6d 61 6b 65 0a 20 20 2a 2a 20 6f 70 65  nd make.  ** ope
7590: 72 61 74 69 6e 67 20 73 79 73 74 65 6d 20 63 61  rating system ca
75a0: 6c 6c 73 20 66 6f 72 20 74 68 65 20 73 70 65 63  lls for the spec
75b0: 69 66 69 65 64 20 6c 6f 63 6b 2e 0a 20 20 2a 2f  ified lock..  */
75c0: 0a 20 20 69 66 28 20 6c 6f 63 6b 74 79 70 65 3d  .  if( locktype=
75d0: 3d 53 48 41 52 45 44 5f 4c 4f 43 4b 20 29 7b 0a  =SHARED_LOCK ){.
75e0: 20 20 20 20 61 73 73 65 72 74 28 20 70 4c 6f 63      assert( pLoc
75f0: 6b 2d 3e 63 6e 74 3d 3d 30 20 29 3b 0a 20 20 20  k->cnt==0 );.   
7600: 20 61 73 73 65 72 74 28 20 70 4c 6f 63 6b 2d 3e   assert( pLock->
7610: 6c 6f 63 6b 74 79 70 65 3d 3d 30 20 29 3b 0a 0a  locktype==0 );..
7620: 20 20 20 20 2f 2a 20 4e 6f 77 20 67 65 74 20 74      /* Now get t
7630: 68 65 20 72 65 61 64 2d 6c 6f 63 6b 20 2a 2f 0a  he read-lock */.
7640: 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74      lock.l_start
7650: 20 3d 20 53 48 41 52 45 44 5f 46 49 52 53 54 3b   = SHARED_FIRST;
7660: 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20  .    lock.l_len 
7670: 3d 20 53 48 41 52 45 44 5f 53 49 5a 45 3b 0a 20  = SHARED_SIZE;. 
7680: 20 20 20 73 20 3d 20 66 63 6e 74 6c 28 69 64 2d     s = fcntl(id-
7690: 3e 68 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f  >h, F_SETLK, &lo
76a0: 63 6b 29 3b 0a 0a 20 20 20 20 2f 2a 20 44 72 6f  ck);..    /* Dro
76b0: 70 20 74 68 65 20 74 65 6d 70 6f 72 61 72 79 20  p the temporary 
76c0: 50 45 4e 44 49 4e 47 20 6c 6f 63 6b 20 2a 2f 0a  PENDING lock */.
76d0: 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74      lock.l_start
76e0: 20 3d 20 50 45 4e 44 49 4e 47 5f 42 59 54 45 3b   = PENDING_BYTE;
76f0: 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20  .    lock.l_len 
7700: 3d 20 31 4c 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c  = 1L;.    lock.l
7710: 5f 74 79 70 65 20 3d 20 46 5f 55 4e 4c 43 4b 3b  _type = F_UNLCK;
7720: 0a 20 20 20 20 66 63 6e 74 6c 28 69 64 2d 3e 68  .    fcntl(id->h
7730: 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b  , F_SETLK, &lock
7740: 29 3b 0a 20 20 20 20 69 66 28 20 73 20 29 7b 0a  );.    if( s ){.
7750: 20 20 20 20 20 20 72 63 20 3d 20 28 65 72 72 6e        rc = (errn
7760: 6f 3d 3d 45 49 4e 56 41 4c 29 20 3f 20 53 51 4c  o==EINVAL) ? SQL
7770: 49 54 45 5f 4e 4f 4c 46 53 20 3a 20 53 51 4c 49  ITE_NOLFS : SQLI
7780: 54 45 5f 42 55 53 59 3b 0a 20 20 20 20 7d 65 6c  TE_BUSY;.    }el
7790: 73 65 7b 0a 20 20 20 20 20 20 69 64 2d 3e 6c 6f  se{.      id->lo
77a0: 63 6b 74 79 70 65 20 3d 20 53 48 41 52 45 44 5f  cktype = SHARED_
77b0: 4c 4f 43 4b 3b 0a 20 20 20 20 20 20 69 64 2d 3e  LOCK;.      id->
77c0: 70 4f 70 65 6e 2d 3e 6e 4c 6f 63 6b 2b 2b 3b 0a  pOpen->nLock++;.
77d0: 20 20 20 20 20 20 70 4c 6f 63 6b 2d 3e 63 6e 74        pLock->cnt
77e0: 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 65   = 1;.    }.  }e
77f0: 6c 73 65 20 69 66 28 20 6c 6f 63 6b 74 79 70 65  lse if( locktype
7800: 3d 3d 45 58 43 4c 55 53 49 56 45 5f 4c 4f 43 4b  ==EXCLUSIVE_LOCK
7810: 20 26 26 20 70 4c 6f 63 6b 2d 3e 63 6e 74 3e 31   && pLock->cnt>1
7820: 20 29 7b 0a 20 20 20 20 2f 2a 20 57 65 20 61 72   ){.    /* We ar
7830: 65 20 74 72 79 69 6e 67 20 66 6f 72 20 61 6e 20  e trying for an 
7840: 65 78 63 6c 75 73 69 76 65 20 6c 6f 63 6b 20 62  exclusive lock b
7850: 75 74 20 61 6e 6f 74 68 65 72 20 74 68 72 65 61  ut another threa
7860: 64 20 69 6e 20 74 68 69 73 0a 20 20 20 20 2a 2a  d in this.    **
7870: 20 73 61 6d 65 20 70 72 6f 63 65 73 73 20 69 73   same process is
7880: 20 73 74 69 6c 6c 20 68 6f 6c 64 69 6e 67 20 61   still holding a
7890: 20 73 68 61 72 65 64 20 6c 6f 63 6b 2e 20 2a 2f   shared lock. */
78a0: 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45  .    rc = SQLITE
78b0: 5f 42 55 53 59 3b 0a 20 20 7d 65 6c 73 65 7b 0a  _BUSY;.  }else{.
78c0: 20 20 20 20 2f 2a 20 54 68 65 20 72 65 71 75 65      /* The reque
78d0: 73 74 20 77 61 73 20 66 6f 72 20 61 20 52 45 53  st was for a RES
78e0: 45 52 56 45 44 20 6f 72 20 45 58 43 4c 55 53 49  ERVED or EXCLUSI
78f0: 56 45 20 6c 6f 63 6b 2e 20 20 49 74 20 69 73 0a  VE lock.  It is.
7900: 20 20 20 20 2a 2a 20 61 73 73 75 6d 65 64 20 74      ** assumed t
7910: 68 61 74 20 74 68 65 72 65 20 69 73 20 61 20 53  hat there is a S
7920: 48 41 52 45 44 20 6f 72 20 67 72 65 61 74 65 72  HARED or greater
7930: 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 66 69 6c   lock on the fil
7940: 65 0a 20 20 20 20 2a 2a 20 61 6c 72 65 61 64 79  e.    ** already
7950: 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 61 73 73  ..    */.    ass
7960: 65 72 74 28 20 30 21 3d 69 64 2d 3e 6c 6f 63 6b  ert( 0!=id->lock
7970: 74 79 70 65 20 29 3b 0a 20 20 20 20 6c 6f 63 6b  type );.    lock
7980: 2e 6c 5f 74 79 70 65 20 3d 20 46 5f 57 52 4c 43  .l_type = F_WRLC
7990: 4b 3b 0a 20 20 20 20 73 77 69 74 63 68 28 20 6c  K;.    switch( l
79a0: 6f 63 6b 74 79 70 65 20 29 7b 0a 20 20 20 20 20  ocktype ){.     
79b0: 20 63 61 73 65 20 52 45 53 45 52 56 45 44 5f 4c   case RESERVED_L
79c0: 4f 43 4b 3a 0a 20 20 20 20 20 20 20 20 6c 6f 63  OCK:.        loc
79d0: 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 52 45 53 45  k.l_start = RESE
79e0: 52 56 45 44 5f 42 59 54 45 3b 0a 20 20 20 20 20  RVED_BYTE;.     
79f0: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20     break;.      
7a00: 63 61 73 65 20 45 58 43 4c 55 53 49 56 45 5f 4c  case EXCLUSIVE_L
7a10: 4f 43 4b 3a 0a 20 20 20 20 20 20 20 20 6c 6f 63  OCK:.        loc
7a20: 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 53 48 41 52  k.l_start = SHAR
7a30: 45 44 5f 46 49 52 53 54 3b 0a 20 20 20 20 20 20  ED_FIRST;.      
7a40: 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 53    lock.l_len = S
7a50: 48 41 52 45 44 5f 53 49 5a 45 3b 0a 20 20 20 20  HARED_SIZE;.    
7a60: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20      break;.     
7a70: 20 64 65 66 61 75 6c 74 3a 0a 20 20 20 20 20 20   default:.      
7a80: 20 20 61 73 73 65 72 74 28 30 29 3b 0a 20 20 20    assert(0);.   
7a90: 20 7d 0a 20 20 20 20 73 20 3d 20 66 63 6e 74 6c   }.    s = fcntl
7aa0: 28 69 64 2d 3e 68 2c 20 46 5f 53 45 54 4c 4b 2c  (id->h, F_SETLK,
7ab0: 20 26 6c 6f 63 6b 29 3b 0a 20 20 20 20 69 66 28   &lock);.    if(
7ac0: 20 73 20 29 7b 0a 20 20 20 20 20 20 72 63 20 3d   s ){.      rc =
7ad0: 20 28 65 72 72 6e 6f 3d 3d 45 49 4e 56 41 4c 29   (errno==EINVAL)
7ae0: 20 3f 20 53 51 4c 49 54 45 5f 4e 4f 4c 46 53 20   ? SQLITE_NOLFS 
7af0: 3a 20 53 51 4c 49 54 45 5f 42 55 53 59 3b 0a 20  : SQLITE_BUSY;. 
7b00: 20 20 20 7d 0a 20 20 7d 0a 20 20 0a 20 20 69 66     }.  }.  .  if
7b10: 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20  ( rc==SQLITE_OK 
7b20: 29 7b 0a 20 20 20 20 69 64 2d 3e 6c 6f 63 6b 74  ){.    id->lockt
7b30: 79 70 65 20 3d 20 6c 6f 63 6b 74 79 70 65 3b 0a  ype = locktype;.
7b40: 20 20 20 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74      pLock->lockt
7b50: 79 70 65 20 3d 20 6c 6f 63 6b 74 79 70 65 3b 0a  ype = locktype;.
7b60: 20 20 7d 65 6c 73 65 20 69 66 28 20 6c 6f 63 6b    }else if( lock
7b70: 74 79 70 65 3d 3d 45 58 43 4c 55 53 49 56 45 5f  type==EXCLUSIVE_
7b80: 4c 4f 43 4b 20 29 7b 0a 20 20 20 20 69 64 2d 3e  LOCK ){.    id->
7b90: 6c 6f 63 6b 74 79 70 65 20 3d 20 50 45 4e 44 49  locktype = PENDI
7ba0: 4e 47 5f 4c 4f 43 4b 3b 0a 20 20 20 20 70 4c 6f  NG_LOCK;.    pLo
7bb0: 63 6b 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 50  ck->locktype = P
7bc0: 45 4e 44 49 4e 47 5f 4c 4f 43 4b 3b 0a 20 20 7d  ENDING_LOCK;.  }
7bd0: 0a 0a 65 6e 64 5f 6c 6f 63 6b 3a 0a 20 20 73 71  ..end_lock:.  sq
7be0: 6c 69 74 65 33 4f 73 4c 65 61 76 65 4d 75 74 65  lite3OsLeaveMute
7bf0: 78 28 29 3b 0a 20 20 54 52 41 43 45 34 28 22 4c  x();.  TRACE4("L
7c00: 4f 43 4b 20 25 64 20 25 73 20 25 73 5c 6e 22 2c  OCK %d %s %s\n",
7c10: 20 69 64 2d 3e 68 2c 20 6c 6f 63 6b 74 79 70 65   id->h, locktype
7c20: 4e 61 6d 65 28 6c 6f 63 6b 74 79 70 65 29 2c 20  Name(locktype), 
7c30: 0a 20 20 20 20 20 20 72 63 3d 3d 53 51 4c 49 54  .      rc==SQLIT
7c40: 45 5f 4f 4b 20 3f 20 22 6f 6b 22 20 3a 20 22 66  E_OK ? "ok" : "f
7c50: 61 69 6c 65 64 22 29 3b 0a 20 20 72 65 74 75 72  ailed");.  retur
7c60: 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4c  n rc;.}../*.** L
7c70: 6f 77 65 72 20 74 68 65 20 6c 6f 63 6b 69 6e 67  ower the locking
7c80: 20 6c 65 76 65 6c 20 6f 6e 20 66 69 6c 65 20 64   level on file d
7c90: 65 73 63 72 69 70 74 6f 72 20 69 64 20 74 6f 20  escriptor id to 
7ca0: 6c 6f 63 6b 74 79 70 65 2e 20 20 6c 6f 63 6b 74  locktype.  lockt
7cb0: 79 70 65 0a 2a 2a 20 6d 75 73 74 20 62 65 20 65  ype.** must be e
7cc0: 69 74 68 65 72 20 4e 4f 5f 4c 4f 43 4b 20 6f 72  ither NO_LOCK or
7cd0: 20 53 48 41 52 45 44 5f 4c 4f 43 4b 2e 0a 2a 2a   SHARED_LOCK..**
7ce0: 0a 2a 2a 20 49 66 20 74 68 65 20 6c 6f 63 6b 69  .** If the locki
7cf0: 6e 67 20 6c 65 76 65 6c 20 6f 66 20 74 68 65 20  ng level of the 
7d00: 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20  file descriptor 
7d10: 69 73 20 61 6c 72 65 61 64 79 20 61 74 20 6f 72  is already at or
7d20: 20 62 65 6c 6f 77 0a 2a 2a 20 74 68 65 20 72 65   below.** the re
7d30: 71 75 65 73 74 65 64 20 6c 6f 63 6b 69 6e 67 20  quested locking 
7d40: 6c 65 76 65 6c 2c 20 74 68 69 73 20 72 6f 75 74  level, this rout
7d50: 69 6e 65 20 69 73 20 61 20 6e 6f 2d 6f 70 2e 0a  ine is a no-op..
7d60: 2a 2a 0a 2a 2a 20 49 74 20 69 73 20 6e 6f 74 20  **.** It is not 
7d70: 70 6f 73 73 69 62 6c 65 20 66 6f 72 20 74 68 69  possible for thi
7d80: 73 20 72 6f 75 74 69 6e 65 20 74 6f 20 66 61 69  s routine to fai
7d90: 6c 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  l..*/.int sqlite
7da0: 33 4f 73 55 6e 6c 6f 63 6b 28 4f 73 46 69 6c 65  3OsUnlock(OsFile
7db0: 20 2a 69 64 2c 20 69 6e 74 20 6c 6f 63 6b 74 79   *id, int lockty
7dc0: 70 65 29 7b 0a 20 20 73 74 72 75 63 74 20 6c 6f  pe){.  struct lo
7dd0: 63 6b 49 6e 66 6f 20 2a 70 4c 6f 63 6b 3b 0a 20  ckInfo *pLock;. 
7de0: 20 73 74 72 75 63 74 20 66 6c 6f 63 6b 20 6c 6f   struct flock lo
7df0: 63 6b 3b 0a 0a 20 20 61 73 73 65 72 74 28 20 69  ck;..  assert( i
7e00: 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20 54  d->isOpen );.  T
7e10: 52 41 43 45 37 28 22 55 4e 4c 4f 43 4b 20 25 64  RACE7("UNLOCK %d
7e20: 20 25 64 20 77 61 73 20 25 64 28 25 64 2c 25 64   %d was %d(%d,%d
7e30: 29 20 70 69 64 3d 25 64 5c 6e 22 2c 20 69 64 2d  ) pid=%d\n", id-
7e40: 3e 68 2c 20 6c 6f 63 6b 74 79 70 65 2c 20 69 64  >h, locktype, id
7e50: 2d 3e 6c 6f 63 6b 74 79 70 65 2c 20 0a 20 20 20  ->locktype, .   
7e60: 20 20 20 69 64 2d 3e 70 4c 6f 63 6b 2d 3e 6c 6f     id->pLock->lo
7e70: 63 6b 74 79 70 65 2c 20 69 64 2d 3e 70 4c 6f 63  cktype, id->pLoc
7e80: 6b 2d 3e 63 6e 74 2c 20 67 65 74 70 69 64 28 29  k->cnt, getpid()
7e90: 29 3b 0a 0a 20 20 61 73 73 65 72 74 28 20 6c 6f  );..  assert( lo
7ea0: 63 6b 74 79 70 65 3c 3d 53 48 41 52 45 44 5f 4c  cktype<=SHARED_L
7eb0: 4f 43 4b 20 29 3b 0a 20 20 69 66 28 20 69 64 2d  OCK );.  if( id-
7ec0: 3e 6c 6f 63 6b 74 79 70 65 3c 3d 6c 6f 63 6b 74  >locktype<=lockt
7ed0: 79 70 65 20 29 7b 0a 20 20 20 20 72 65 74 75 72  ype ){.    retur
7ee0: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 7d  n SQLITE_OK;.  }
7ef0: 0a 20 20 73 71 6c 69 74 65 33 4f 73 45 6e 74 65  .  sqlite3OsEnte
7f00: 72 4d 75 74 65 78 28 29 3b 0a 20 20 70 4c 6f 63  rMutex();.  pLoc
7f10: 6b 20 3d 20 69 64 2d 3e 70 4c 6f 63 6b 3b 0a 20  k = id->pLock;. 
7f20: 20 61 73 73 65 72 74 28 20 70 4c 6f 63 6b 2d 3e   assert( pLock->
7f30: 63 6e 74 21 3d 30 20 29 3b 0a 20 20 69 66 28 20  cnt!=0 );.  if( 
7f40: 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 3e 53 48 41  id->locktype>SHA
7f50: 52 45 44 5f 4c 4f 43 4b 20 29 7b 0a 20 20 20 20  RED_LOCK ){.    
7f60: 61 73 73 65 72 74 28 20 70 4c 6f 63 6b 2d 3e 6c  assert( pLock->l
7f70: 6f 63 6b 74 79 70 65 3d 3d 69 64 2d 3e 6c 6f 63  ocktype==id->loc
7f80: 6b 74 79 70 65 20 29 3b 0a 20 20 20 20 6c 6f 63  ktype );.    loc
7f90: 6b 2e 6c 5f 74 79 70 65 20 3d 20 46 5f 55 4e 4c  k.l_type = F_UNL
7fa0: 43 4b 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 77  CK;.    lock.l_w
7fb0: 68 65 6e 63 65 20 3d 20 53 45 45 4b 5f 53 45 54  hence = SEEK_SET
7fc0: 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61  ;.    lock.l_sta
7fd0: 72 74 20 3d 20 50 45 4e 44 49 4e 47 5f 42 59 54  rt = PENDING_BYT
7fe0: 45 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 6c 65  E;.    lock.l_le
7ff0: 6e 20 3d 20 32 4c 3b 20 20 61 73 73 65 72 74 28  n = 2L;  assert(
8000: 20 50 45 4e 44 49 4e 47 5f 42 59 54 45 2b 31 3d   PENDING_BYTE+1=
8010: 3d 52 45 53 45 52 56 45 44 5f 42 59 54 45 20 29  =RESERVED_BYTE )
8020: 3b 0a 20 20 20 20 66 63 6e 74 6c 28 69 64 2d 3e  ;.    fcntl(id->
8030: 68 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63  h, F_SETLK, &loc
8040: 6b 29 3b 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e 6c  k);.    pLock->l
8050: 6f 63 6b 74 79 70 65 20 3d 20 53 48 41 52 45 44  ocktype = SHARED
8060: 5f 4c 4f 43 4b 3b 0a 20 20 7d 0a 20 20 69 66 28  _LOCK;.  }.  if(
8070: 20 6c 6f 63 6b 74 79 70 65 3d 3d 4e 4f 5f 4c 4f   locktype==NO_LO
8080: 43 4b 20 29 7b 0a 20 20 20 20 73 74 72 75 63 74  CK ){.    struct
8090: 20 6f 70 65 6e 43 6e 74 20 2a 70 4f 70 65 6e 3b   openCnt *pOpen;
80a0: 0a 0a 20 20 20 20 2f 2a 20 44 65 63 72 65 6d 65  ..    /* Decreme
80b0: 6e 74 20 74 68 65 20 73 68 61 72 65 64 20 6c 6f  nt the shared lo
80c0: 63 6b 20 63 6f 75 6e 74 65 72 2e 20 20 52 65 6c  ck counter.  Rel
80d0: 65 61 73 65 20 74 68 65 20 6c 6f 63 6b 20 75 73  ease the lock us
80e0: 69 6e 67 20 61 6e 0a 20 20 20 20 2a 2a 20 4f 53  ing an.    ** OS
80f0: 20 63 61 6c 6c 20 6f 6e 6c 79 20 77 68 65 6e 20   call only when 
8100: 61 6c 6c 20 74 68 72 65 61 64 73 20 69 6e 20 74  all threads in t
8110: 68 69 73 20 73 61 6d 65 20 70 72 6f 63 65 73 73  his same process
8120: 20 68 61 76 65 20 72 65 6c 65 61 73 65 64 0a 20   have released. 
8130: 20 20 20 2a 2a 20 74 68 65 20 6c 6f 63 6b 2e 0a     ** the lock..
8140: 20 20 20 20 2a 2f 0a 20 20 20 20 70 4c 6f 63 6b      */.    pLock
8150: 2d 3e 63 6e 74 2d 2d 3b 0a 20 20 20 20 69 66 28  ->cnt--;.    if(
8160: 20 70 4c 6f 63 6b 2d 3e 63 6e 74 3d 3d 30 20 29   pLock->cnt==0 )
8170: 7b 0a 20 20 20 20 20 20 6c 6f 63 6b 2e 6c 5f 74  {.      lock.l_t
8180: 79 70 65 20 3d 20 46 5f 55 4e 4c 43 4b 3b 0a 20  ype = F_UNLCK;. 
8190: 20 20 20 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e       lock.l_when
81a0: 63 65 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 20  ce = SEEK_SET;. 
81b0: 20 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72       lock.l_star
81c0: 74 20 3d 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d  t = lock.l_len =
81d0: 20 30 4c 3b 0a 20 20 20 20 20 20 66 63 6e 74 6c   0L;.      fcntl
81e0: 28 69 64 2d 3e 68 2c 20 46 5f 53 45 54 4c 4b 2c  (id->h, F_SETLK,
81f0: 20 26 6c 6f 63 6b 29 3b 0a 20 20 20 20 20 20 70   &lock);.      p
8200: 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d  Lock->locktype =
8210: 20 4e 4f 5f 4c 4f 43 4b 3b 0a 20 20 20 20 7d 0a   NO_LOCK;.    }.
8220: 0a 20 20 20 20 2f 2a 20 44 65 63 72 65 6d 65 6e  .    /* Decremen
8230: 74 20 74 68 65 20 63 6f 75 6e 74 20 6f 66 20 6c  t the count of l
8240: 6f 63 6b 73 20 61 67 61 69 6e 73 74 20 74 68 69  ocks against thi
8250: 73 20 73 61 6d 65 20 66 69 6c 65 2e 20 20 57 68  s same file.  Wh
8260: 65 6e 20 74 68 65 0a 20 20 20 20 2a 2a 20 63 6f  en the.    ** co
8270: 75 6e 74 20 72 65 61 63 68 65 73 20 7a 65 72 6f  unt reaches zero
8280: 2c 20 63 6c 6f 73 65 20 61 6e 79 20 6f 74 68 65  , close any othe
8290: 72 20 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f  r file descripto
82a0: 72 73 20 77 68 6f 73 65 20 63 6c 6f 73 65 0a 20  rs whose close. 
82b0: 20 20 20 2a 2a 20 77 61 73 20 64 65 66 65 72 72     ** was deferr
82c0: 65 64 20 62 65 63 61 75 73 65 20 6f 66 20 6f 75  ed because of ou
82d0: 74 73 74 61 6e 64 69 6e 67 20 6c 6f 63 6b 73 2e  tstanding locks.
82e0: 0a 20 20 20 20 2a 2f 0a 20 20 20 20 70 4f 70 65  .    */.    pOpe
82f0: 6e 20 3d 20 69 64 2d 3e 70 4f 70 65 6e 3b 0a 20  n = id->pOpen;. 
8300: 20 20 20 70 4f 70 65 6e 2d 3e 6e 4c 6f 63 6b 2d     pOpen->nLock-
8310: 2d 3b 0a 20 20 20 20 61 73 73 65 72 74 28 20 70  -;.    assert( p
8320: 4f 70 65 6e 2d 3e 6e 4c 6f 63 6b 3e 3d 30 20 29  Open->nLock>=0 )
8330: 3b 0a 20 20 20 20 69 66 28 20 70 4f 70 65 6e 2d  ;.    if( pOpen-
8340: 3e 6e 4c 6f 63 6b 3d 3d 30 20 26 26 20 70 4f 70  >nLock==0 && pOp
8350: 65 6e 2d 3e 6e 50 65 6e 64 69 6e 67 3e 30 20 29  en->nPending>0 )
8360: 7b 0a 20 20 20 20 20 20 69 6e 74 20 69 3b 0a 20  {.      int i;. 
8370: 20 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c       for(i=0; i<
8380: 70 4f 70 65 6e 2d 3e 6e 50 65 6e 64 69 6e 67 3b  pOpen->nPending;
8390: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 63   i++){.        c
83a0: 6c 6f 73 65 28 70 4f 70 65 6e 2d 3e 61 50 65 6e  lose(pOpen->aPen
83b0: 64 69 6e 67 5b 69 5d 29 3b 0a 20 20 20 20 20 20  ding[i]);.      
83c0: 7d 0a 20 20 20 20 20 20 73 71 6c 69 74 65 46 72  }.      sqliteFr
83d0: 65 65 28 70 4f 70 65 6e 2d 3e 61 50 65 6e 64 69  ee(pOpen->aPendi
83e0: 6e 67 29 3b 0a 20 20 20 20 20 20 70 4f 70 65 6e  ng);.      pOpen
83f0: 2d 3e 6e 50 65 6e 64 69 6e 67 20 3d 20 30 3b 0a  ->nPending = 0;.
8400: 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e 61 50 65        pOpen->aPe
8410: 6e 64 69 6e 67 20 3d 20 30 3b 0a 20 20 20 20 7d  nding = 0;.    }
8420: 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 4f 73  .  }.  sqlite3Os
8430: 4c 65 61 76 65 4d 75 74 65 78 28 29 3b 0a 20 20  LeaveMutex();.  
8440: 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 6c  id->locktype = l
8450: 6f 63 6b 74 79 70 65 3b 0a 20 20 72 65 74 75 72  ocktype;.  retur
8460: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a  n SQLITE_OK;.}..
8470: 2f 2a 0a 2a 2a 20 43 6c 6f 73 65 20 61 20 66 69  /*.** Close a fi
8480: 6c 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74  le..*/.int sqlit
8490: 65 33 4f 73 43 6c 6f 73 65 28 4f 73 46 69 6c 65  e3OsClose(OsFile
84a0: 20 2a 69 64 29 7b 0a 20 20 69 66 28 20 21 69 64   *id){.  if( !id
84b0: 2d 3e 69 73 4f 70 65 6e 20 29 20 72 65 74 75 72  ->isOpen ) retur
84c0: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 73  n SQLITE_OK;.  s
84d0: 71 6c 69 74 65 33 4f 73 55 6e 6c 6f 63 6b 28 69  qlite3OsUnlock(i
84e0: 64 2c 20 4e 4f 5f 4c 4f 43 4b 29 3b 0a 20 20 69  d, NO_LOCK);.  i
84f0: 66 28 20 69 64 2d 3e 64 69 72 66 64 3e 3d 30 20  f( id->dirfd>=0 
8500: 29 20 63 6c 6f 73 65 28 69 64 2d 3e 64 69 72 66  ) close(id->dirf
8510: 64 29 3b 0a 20 20 69 64 2d 3e 64 69 72 66 64 20  d);.  id->dirfd 
8520: 3d 20 2d 31 3b 0a 20 20 73 71 6c 69 74 65 33 4f  = -1;.  sqlite3O
8530: 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a 20  sEnterMutex();. 
8540: 20 69 66 28 20 69 64 2d 3e 70 4f 70 65 6e 2d 3e   if( id->pOpen->
8550: 6e 4c 6f 63 6b 20 29 7b 0a 20 20 20 20 2f 2a 20  nLock ){.    /* 
8560: 49 66 20 74 68 65 72 65 20 61 72 65 20 6f 75 74  If there are out
8570: 73 74 61 6e 64 69 6e 67 20 6c 6f 63 6b 73 2c 20  standing locks, 
8580: 64 6f 20 6e 6f 74 20 61 63 74 75 61 6c 6c 79 20  do not actually 
8590: 63 6c 6f 73 65 20 74 68 65 20 66 69 6c 65 20 6a  close the file j
85a0: 75 73 74 0a 20 20 20 20 2a 2a 20 79 65 74 20 62  ust.    ** yet b
85b0: 65 63 61 75 73 65 20 74 68 61 74 20 77 6f 75 6c  ecause that woul
85c0: 64 20 63 6c 65 61 72 20 74 68 6f 73 65 20 6c 6f  d clear those lo
85d0: 63 6b 73 2e 20 20 49 6e 73 74 65 61 64 2c 20 61  cks.  Instead, a
85e0: 64 64 20 74 68 65 20 66 69 6c 65 0a 20 20 20 20  dd the file.    
85f0: 2a 2a 20 64 65 73 63 72 69 70 74 6f 72 20 74 6f  ** descriptor to
8600: 20 70 4f 70 65 6e 2d 3e 61 50 65 6e 64 69 6e 67   pOpen->aPending
8610: 2e 20 20 49 74 20 77 69 6c 6c 20 62 65 20 61 75  .  It will be au
8620: 74 6f 6d 61 74 69 63 61 6c 6c 79 20 63 6c 6f 73  tomatically clos
8630: 65 64 20 77 68 65 6e 0a 20 20 20 20 2a 2a 20 74  ed when.    ** t
8640: 68 65 20 6c 61 73 74 20 6c 6f 63 6b 20 69 73 20  he last lock is 
8650: 63 6c 65 61 72 65 64 2e 0a 20 20 20 20 2a 2f 0a  cleared..    */.
8660: 20 20 20 20 69 6e 74 20 2a 61 4e 65 77 3b 0a 20      int *aNew;. 
8670: 20 20 20 73 74 72 75 63 74 20 6f 70 65 6e 43 6e     struct openCn
8680: 74 20 2a 70 4f 70 65 6e 20 3d 20 69 64 2d 3e 70  t *pOpen = id->p
8690: 4f 70 65 6e 3b 0a 20 20 20 20 70 4f 70 65 6e 2d  Open;.    pOpen-
86a0: 3e 6e 50 65 6e 64 69 6e 67 2b 2b 3b 0a 20 20 20  >nPending++;.   
86b0: 20 61 4e 65 77 20 3d 20 73 71 6c 69 74 65 52 65   aNew = sqliteRe
86c0: 61 6c 6c 6f 63 28 20 70 4f 70 65 6e 2d 3e 61 50  alloc( pOpen->aP
86d0: 65 6e 64 69 6e 67 2c 20 70 4f 70 65 6e 2d 3e 6e  ending, pOpen->n
86e0: 50 65 6e 64 69 6e 67 2a 73 69 7a 65 6f 66 28 69  Pending*sizeof(i
86f0: 6e 74 29 20 29 3b 0a 20 20 20 20 69 66 28 20 61  nt) );.    if( a
8700: 4e 65 77 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20  New==0 ){.      
8710: 2f 2a 20 49 66 20 61 20 6d 61 6c 6c 6f 63 20 66  /* If a malloc f
8720: 61 69 6c 73 2c 20 6a 75 73 74 20 6c 65 61 6b 20  ails, just leak 
8730: 74 68 65 20 66 69 6c 65 20 64 65 73 63 72 69 70  the file descrip
8740: 74 6f 72 20 2a 2f 0a 20 20 20 20 7d 65 6c 73 65  tor */.    }else
8750: 7b 0a 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e 61  {.      pOpen->a
8760: 50 65 6e 64 69 6e 67 20 3d 20 61 4e 65 77 3b 0a  Pending = aNew;.
8770: 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e 61 50 65        pOpen->aPe
8780: 6e 64 69 6e 67 5b 70 4f 70 65 6e 2d 3e 6e 50 65  nding[pOpen->nPe
8790: 6e 64 69 6e 67 2d 31 5d 20 3d 20 69 64 2d 3e 68  nding-1] = id->h
87a0: 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b  ;.    }.  }else{
87b0: 0a 20 20 20 20 2f 2a 20 54 68 65 72 65 20 61 72  .    /* There ar
87c0: 65 20 6e 6f 20 6f 75 74 73 74 61 6e 64 69 6e 67  e no outstanding
87d0: 20 6c 6f 63 6b 73 20 73 6f 20 77 65 20 63 61 6e   locks so we can
87e0: 20 63 6c 6f 73 65 20 74 68 65 20 66 69 6c 65 20   close the file 
87f0: 69 6d 6d 65 64 69 61 74 65 6c 79 20 2a 2f 0a 20  immediately */. 
8800: 20 20 20 63 6c 6f 73 65 28 69 64 2d 3e 68 29 3b     close(id->h);
8810: 0a 20 20 7d 0a 20 20 72 65 6c 65 61 73 65 4c 6f  .  }.  releaseLo
8820: 63 6b 49 6e 66 6f 28 69 64 2d 3e 70 4c 6f 63 6b  ckInfo(id->pLock
8830: 29 3b 0a 20 20 72 65 6c 65 61 73 65 4f 70 65 6e  );.  releaseOpen
8840: 43 6e 74 28 69 64 2d 3e 70 4f 70 65 6e 29 3b 0a  Cnt(id->pOpen);.
8850: 20 20 73 71 6c 69 74 65 33 4f 73 4c 65 61 76 65    sqlite3OsLeave
8860: 4d 75 74 65 78 28 29 3b 0a 20 20 69 64 2d 3e 69  Mutex();.  id->i
8870: 73 4f 70 65 6e 20 3d 20 30 3b 0a 20 20 54 52 41  sOpen = 0;.  TRA
8880: 43 45 32 28 22 43 4c 4f 53 45 20 20 20 25 2d 33  CE2("CLOSE   %-3
8890: 64 5c 6e 22 2c 20 69 64 2d 3e 68 29 3b 0a 20 20  d\n", id->h);.  
88a0: 4f 70 65 6e 43 6f 75 6e 74 65 72 28 2d 31 29 3b  OpenCounter(-1);
88b0: 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  .  return SQLITE
88c0: 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 65  _OK;.}../*.** Ge
88d0: 74 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 74 6f  t information to
88e0: 20 73 65 65 64 20 74 68 65 20 72 61 6e 64 6f 6d   seed the random
88f0: 20 6e 75 6d 62 65 72 20 67 65 6e 65 72 61 74 6f   number generato
8900: 72 2e 20 20 54 68 65 20 73 65 65 64 0a 2a 2a 20  r.  The seed.** 
8910: 69 73 20 77 72 69 74 74 65 6e 20 69 6e 74 6f 20  is written into 
8920: 74 68 65 20 62 75 66 66 65 72 20 7a 42 75 66 5b  the buffer zBuf[
8930: 32 35 36 5d 2e 20 20 54 68 65 20 63 61 6c 6c 69  256].  The calli
8940: 6e 67 20 66 75 6e 63 74 69 6f 6e 20 6d 75 73 74  ng function must
8950: 0a 2a 2a 20 73 75 70 70 6c 79 20 61 20 73 75 66  .** supply a suf
8960: 66 69 63 69 65 6e 74 6c 79 20 6c 61 72 67 65 20  ficiently large 
8970: 62 75 66 66 65 72 2e 0a 2a 2f 0a 69 6e 74 20 73  buffer..*/.int s
8980: 71 6c 69 74 65 33 4f 73 52 61 6e 64 6f 6d 53 65  qlite3OsRandomSe
8990: 65 64 28 63 68 61 72 20 2a 7a 42 75 66 29 7b 0a  ed(char *zBuf){.
89a0: 20 20 2f 2a 20 57 65 20 68 61 76 65 20 74 6f 20    /* We have to 
89b0: 69 6e 69 74 69 61 6c 69 7a 65 20 7a 42 75 66 20  initialize zBuf 
89c0: 74 6f 20 70 72 65 76 65 6e 74 20 76 61 6c 67 72  to prevent valgr
89d0: 69 6e 64 20 66 72 6f 6d 20 72 65 70 6f 72 74 69  ind from reporti
89e0: 6e 67 0a 20 20 2a 2a 20 65 72 72 6f 72 73 2e 20  ng.  ** errors. 
89f0: 20 54 68 65 20 72 65 70 6f 72 74 73 20 69 73 73   The reports iss
8a00: 75 65 64 20 62 79 20 76 61 6c 67 72 69 6e 64 20  ued by valgrind 
8a10: 61 72 65 20 69 6e 63 6f 72 72 65 63 74 20 2d 20  are incorrect - 
8a20: 77 65 20 77 6f 75 6c 64 0a 20 20 2a 2a 20 70 72  we would.  ** pr
8a30: 65 66 65 72 20 74 68 61 74 20 74 68 65 20 72 61  efer that the ra
8a40: 6e 64 6f 6d 6e 65 73 73 20 62 65 20 69 6e 63 72  ndomness be incr
8a50: 65 61 73 65 64 20 62 79 20 6d 61 6b 69 6e 67 20  eased by making 
8a60: 75 73 65 20 6f 66 20 74 68 65 0a 20 20 2a 2a 20  use of the.  ** 
8a70: 75 6e 69 6e 69 74 69 61 6c 69 7a 65 64 20 73 70  uninitialized sp
8a80: 61 63 65 20 69 6e 20 7a 42 75 66 20 2d 20 62 75  ace in zBuf - bu
8a90: 74 20 76 61 6c 67 72 69 6e 64 20 65 72 72 6f 72  t valgrind error
8aa0: 73 20 74 65 6e 64 20 74 6f 20 77 6f 72 72 79 0a  s tend to worry.
8ab0: 20 20 2a 2a 20 73 6f 6d 65 20 75 73 65 72 73 2e    ** some users.
8ac0: 20 20 52 61 74 68 65 72 20 74 68 61 6e 20 61 72    Rather than ar
8ad0: 67 75 65 2c 20 69 74 20 73 65 65 6d 73 20 65 61  gue, it seems ea
8ae0: 73 69 65 72 20 6a 75 73 74 20 74 6f 20 69 6e 69  sier just to ini
8af0: 74 69 61 6c 69 7a 65 0a 20 20 2a 2a 20 74 68 65  tialize.  ** the
8b00: 20 77 68 6f 6c 65 20 61 72 72 61 79 20 61 6e 64   whole array and
8b10: 20 73 69 6c 65 6e 63 65 20 76 61 6c 67 72 69 6e   silence valgrin
8b20: 64 2c 20 65 76 65 6e 20 69 66 20 74 68 61 74 20  d, even if that 
8b30: 6d 65 61 6e 73 20 6c 65 73 73 20 72 61 6e 64 6f  means less rando
8b40: 6d 6e 65 73 73 0a 20 20 2a 2a 20 69 6e 20 74 68  mness.  ** in th
8b50: 65 20 72 61 6e 64 6f 6d 20 73 65 65 64 2e 0a 20  e random seed.. 
8b60: 20 2a 2a 0a 20 20 2a 2a 20 57 68 65 6e 20 74 65   **.  ** When te
8b70: 73 74 69 6e 67 2c 20 69 6e 69 74 69 61 6c 69 7a  sting, initializ
8b80: 69 6e 67 20 7a 42 75 66 5b 5d 20 74 6f 20 7a 65  ing zBuf[] to ze
8b90: 72 6f 20 69 73 20 61 6c 6c 20 77 65 20 64 6f 2e  ro is all we do.
8ba0: 20 20 54 68 61 74 20 6d 65 61 6e 73 0a 20 20 2a    That means.  *
8bb0: 2a 20 74 68 61 74 20 77 65 20 61 6c 77 61 79 73  * that we always
8bc0: 20 75 73 65 20 74 68 65 20 73 61 6d 65 20 72 61   use the same ra
8bd0: 6e 64 6f 6d 20 6e 75 6d 62 65 72 20 73 65 71 75  ndom number sequ
8be0: 65 6e 63 65 2e 2a 20 54 68 69 73 20 6d 61 6b 65  ence.* This make
8bf0: 73 20 74 68 65 0a 20 20 2a 2a 20 74 65 73 74 73  s the.  ** tests
8c00: 20 72 65 70 65 61 74 61 62 6c 65 2e 0a 20 20 2a   repeatable..  *
8c10: 2f 0a 20 20 6d 65 6d 73 65 74 28 7a 42 75 66 2c  /.  memset(zBuf,
8c20: 20 30 2c 20 32 35 36 29 3b 0a 23 69 66 20 21 64   0, 256);.#if !d
8c30: 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 54 45  efined(SQLITE_TE
8c40: 53 54 29 0a 20 20 7b 0a 20 20 20 20 69 6e 74 20  ST).  {.    int 
8c50: 70 69 64 3b 0a 20 20 20 20 74 69 6d 65 28 28 74  pid;.    time((t
8c60: 69 6d 65 5f 74 2a 29 7a 42 75 66 29 3b 0a 20 20  ime_t*)zBuf);.  
8c70: 20 20 70 69 64 20 3d 20 67 65 74 70 69 64 28 29    pid = getpid()
8c80: 3b 0a 20 20 20 20 6d 65 6d 63 70 79 28 26 7a 42  ;.    memcpy(&zB
8c90: 75 66 5b 73 69 7a 65 6f 66 28 74 69 6d 65 5f 74  uf[sizeof(time_t
8ca0: 29 5d 2c 20 26 70 69 64 2c 20 73 69 7a 65 6f 66  )], &pid, sizeof
8cb0: 28 70 69 64 29 29 3b 0a 20 20 7d 0a 23 65 6e 64  (pid));.  }.#end
8cc0: 69 66 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49  if.  return SQLI
8cd0: 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  TE_OK;.}../*.** 
8ce0: 53 6c 65 65 70 20 66 6f 72 20 61 20 6c 69 74 74  Sleep for a litt
8cf0: 6c 65 20 77 68 69 6c 65 2e 20 20 52 65 74 75 72  le while.  Retur
8d00: 6e 20 74 68 65 20 61 6d 6f 75 6e 74 20 6f 66 20  n the amount of 
8d10: 74 69 6d 65 20 73 6c 65 70 74 2e 0a 2a 2f 0a 69  time slept..*/.i
8d20: 6e 74 20 73 71 6c 69 74 65 33 4f 73 53 6c 65 65  nt sqlite3OsSlee
8d30: 70 28 69 6e 74 20 6d 73 29 7b 0a 23 69 66 20 64  p(int ms){.#if d
8d40: 65 66 69 6e 65 64 28 48 41 56 45 5f 55 53 4c 45  efined(HAVE_USLE
8d50: 45 50 29 20 26 26 20 48 41 56 45 5f 55 53 4c 45  EP) && HAVE_USLE
8d60: 45 50 0a 20 20 75 73 6c 65 65 70 28 6d 73 2a 31  EP.  usleep(ms*1
8d70: 30 30 30 29 3b 0a 20 20 72 65 74 75 72 6e 20 6d  000);.  return m
8d80: 73 3b 0a 23 65 6c 73 65 0a 20 20 73 6c 65 65 70  s;.#else.  sleep
8d90: 28 28 6d 73 2b 39 39 39 29 2f 31 30 30 30 29 3b  ((ms+999)/1000);
8da0: 0a 20 20 72 65 74 75 72 6e 20 31 30 30 30 2a 28  .  return 1000*(
8db0: 28 6d 73 2b 39 39 39 29 2f 31 30 30 30 29 3b 0a  (ms+999)/1000);.
8dc0: 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  #endif.}../*.** 
8dd0: 53 74 61 74 69 63 20 76 61 72 69 61 62 6c 65 73  Static variables
8de0: 20 75 73 65 64 20 66 6f 72 20 74 68 72 65 61 64   used for thread
8df0: 20 73 79 6e 63 68 72 6f 6e 69 7a 61 74 69 6f 6e   synchronization
8e00: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 69  .*/.static int i
8e10: 6e 4d 75 74 65 78 20 3d 20 30 3b 0a 23 69 66 64  nMutex = 0;.#ifd
8e20: 65 66 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f 54  ef SQLITE_UNIX_T
8e30: 48 52 45 41 44 53 0a 73 74 61 74 69 63 20 70 74  HREADS.static pt
8e40: 68 72 65 61 64 5f 6d 75 74 65 78 5f 74 20 6d 75  hread_mutex_t mu
8e50: 74 65 78 20 3d 20 50 54 48 52 45 41 44 5f 4d 55  tex = PTHREAD_MU
8e60: 54 45 58 5f 49 4e 49 54 49 41 4c 49 5a 45 52 3b  TEX_INITIALIZER;
8e70: 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 54  .#endif../*.** T
8e80: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 70 61 69  he following pai
8e90: 72 20 6f 66 20 72 6f 75 74 69 6e 65 20 69 6d 70  r of routine imp
8ea0: 6c 65 6d 65 6e 74 20 6d 75 74 75 61 6c 20 65 78  lement mutual ex
8eb0: 63 6c 75 73 69 6f 6e 20 66 6f 72 0a 2a 2a 20 6d  clusion for.** m
8ec0: 75 6c 74 69 2d 74 68 72 65 61 64 65 64 20 70 72  ulti-threaded pr
8ed0: 6f 63 65 73 73 65 73 2e 20 20 4f 6e 6c 79 20 61  ocesses.  Only a
8ee0: 20 73 69 6e 67 6c 65 20 74 68 72 65 61 64 20 69   single thread i
8ef0: 73 20 61 6c 6c 6f 77 65 64 20 74 6f 0a 2a 2a 20  s allowed to.** 
8f00: 65 78 65 63 75 74 65 64 20 63 6f 64 65 20 74 68  executed code th
8f10: 61 74 20 69 73 20 73 75 72 72 6f 75 6e 64 65 64  at is surrounded
8f20: 20 62 79 20 45 6e 74 65 72 4d 75 74 65 78 28 29   by EnterMutex()
8f30: 20 61 6e 64 20 4c 65 61 76 65 4d 75 74 65 78 28   and LeaveMutex(
8f40: 29 2e 0a 2a 2a 0a 2a 2a 20 53 51 4c 69 74 65 20  )..**.** SQLite 
8f50: 75 73 65 73 20 6f 6e 6c 79 20 61 20 73 69 6e 67  uses only a sing
8f60: 6c 65 20 4d 75 74 65 78 2e 20 20 54 68 65 72 65  le Mutex.  There
8f70: 20 69 73 20 6e 6f 74 20 6d 75 63 68 20 63 72 69   is not much cri
8f80: 74 69 63 61 6c 0a 2a 2a 20 63 6f 64 65 20 61 6e  tical.** code an
8f90: 64 20 77 68 61 74 20 6c 69 74 74 6c 65 20 74 68  d what little th
8fa0: 65 72 65 20 69 73 20 65 78 65 63 75 74 65 73 20  ere is executes 
8fb0: 71 75 69 63 6b 6c 79 20 61 6e 64 20 77 69 74 68  quickly and with
8fc0: 6f 75 74 20 62 6c 6f 63 6b 69 6e 67 2e 0a 2a 2f  out blocking..*/
8fd0: 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 4f 73 45  .void sqlite3OsE
8fe0: 6e 74 65 72 4d 75 74 65 78 28 29 7b 0a 23 69 66  nterMutex(){.#if
8ff0: 64 65 66 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f  def SQLITE_UNIX_
9000: 54 48 52 45 41 44 53 0a 20 20 70 74 68 72 65 61  THREADS.  pthrea
9010: 64 5f 6d 75 74 65 78 5f 6c 6f 63 6b 28 26 6d 75  d_mutex_lock(&mu
9020: 74 65 78 29 3b 0a 23 65 6e 64 69 66 0a 20 20 61  tex);.#endif.  a
9030: 73 73 65 72 74 28 20 21 69 6e 4d 75 74 65 78 20  ssert( !inMutex 
9040: 29 3b 0a 20 20 69 6e 4d 75 74 65 78 20 3d 20 31  );.  inMutex = 1
9050: 3b 0a 7d 0a 76 6f 69 64 20 73 71 6c 69 74 65 33  ;.}.void sqlite3
9060: 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 7b 0a  OsLeaveMutex(){.
9070: 20 20 61 73 73 65 72 74 28 20 69 6e 4d 75 74 65    assert( inMute
9080: 78 20 29 3b 0a 20 20 69 6e 4d 75 74 65 78 20 3d  x );.  inMutex =
9090: 20 30 3b 0a 23 69 66 64 65 66 20 53 51 4c 49 54   0;.#ifdef SQLIT
90a0: 45 5f 55 4e 49 58 5f 54 48 52 45 41 44 53 0a 20  E_UNIX_THREADS. 
90b0: 20 70 74 68 72 65 61 64 5f 6d 75 74 65 78 5f 75   pthread_mutex_u
90c0: 6e 6c 6f 63 6b 28 26 6d 75 74 65 78 29 3b 0a 23  nlock(&mutex);.#
90d0: 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  endif.}../*.** T
90e0: 75 72 6e 20 61 20 72 65 6c 61 74 69 76 65 20 70  urn a relative p
90f0: 61 74 68 6e 61 6d 65 20 69 6e 74 6f 20 61 20 66  athname into a f
9100: 75 6c 6c 20 70 61 74 68 6e 61 6d 65 2e 20 20 52  ull pathname.  R
9110: 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 65 72 0a  eturn a pointer.
9120: 2a 2a 20 74 6f 20 74 68 65 20 66 75 6c 6c 20 70  ** to the full p
9130: 61 74 68 6e 61 6d 65 20 73 74 6f 72 65 64 20 69  athname stored i
9140: 6e 20 73 70 61 63 65 20 6f 62 74 61 69 6e 65 64  n space obtained
9150: 20 66 72 6f 6d 20 73 71 6c 69 74 65 4d 61 6c 6c   from sqliteMall
9160: 6f 63 28 29 2e 0a 2a 2a 20 54 68 65 20 63 61 6c  oc()..** The cal
9170: 6c 69 6e 67 20 66 75 6e 63 74 69 6f 6e 20 69 73  ling function is
9180: 20 72 65 73 70 6f 6e 73 69 62 6c 65 20 66 6f 72   responsible for
9190: 20 66 72 65 65 69 6e 67 20 74 68 69 73 20 73 70   freeing this sp
91a0: 61 63 65 20 6f 6e 63 65 20 69 74 0a 2a 2a 20 69  ace once it.** i
91b0: 73 20 6e 6f 20 6c 6f 6e 67 65 72 20 6e 65 65 64  s no longer need
91c0: 65 64 2e 0a 2a 2f 0a 63 68 61 72 20 2a 73 71 6c  ed..*/.char *sql
91d0: 69 74 65 33 4f 73 46 75 6c 6c 50 61 74 68 6e 61  ite3OsFullPathna
91e0: 6d 65 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  me(const char *z
91f0: 52 65 6c 61 74 69 76 65 29 7b 0a 20 20 63 68 61  Relative){.  cha
9200: 72 20 2a 7a 46 75 6c 6c 20 3d 20 30 3b 0a 20 20  r *zFull = 0;.  
9210: 69 66 28 20 7a 52 65 6c 61 74 69 76 65 5b 30 5d  if( zRelative[0]
9220: 3d 3d 27 2f 27 20 29 7b 0a 20 20 20 20 73 71 6c  =='/' ){.    sql
9230: 69 74 65 33 53 65 74 53 74 72 69 6e 67 28 26 7a  ite3SetString(&z
9240: 46 75 6c 6c 2c 20 7a 52 65 6c 61 74 69 76 65 2c  Full, zRelative,
9250: 20 28 63 68 61 72 2a 29 30 29 3b 0a 20 20 7d 65   (char*)0);.  }e
9260: 6c 73 65 7b 0a 20 20 20 20 63 68 61 72 20 7a 42  lse{.    char zB
9270: 75 66 5b 35 30 30 30 5d 3b 0a 20 20 20 20 73 71  uf[5000];.    sq
9280: 6c 69 74 65 33 53 65 74 53 74 72 69 6e 67 28 26  lite3SetString(&
9290: 7a 46 75 6c 6c 2c 20 67 65 74 63 77 64 28 7a 42  zFull, getcwd(zB
92a0: 75 66 2c 20 73 69 7a 65 6f 66 28 7a 42 75 66 29  uf, sizeof(zBuf)
92b0: 29 2c 20 22 2f 22 2c 20 7a 52 65 6c 61 74 69 76  ), "/", zRelativ
92c0: 65 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20  e,.             
92d0: 20 20 20 20 20 20 20 28 63 68 61 72 2a 29 30 29         (char*)0)
92e0: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 7a  ;.  }.  return z
92f0: 46 75 6c 6c 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  Full;.}../*.** T
9300: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 76 61 72  he following var
9310: 69 61 62 6c 65 2c 20 69 66 20 73 65 74 20 74 6f  iable, if set to
9320: 20 61 20 6e 6f 6e 2d 7a 65 72 6f 20 76 61 6c 75   a non-zero valu
9330: 65 2c 20 62 65 63 6f 6d 65 73 20 74 68 65 20 72  e, becomes the r
9340: 65 73 75 6c 74 0a 2a 2a 20 72 65 74 75 72 6e 65  esult.** returne
9350: 64 20 66 72 6f 6d 20 73 71 6c 69 74 65 33 4f 73  d from sqlite3Os
9360: 43 75 72 72 65 6e 74 54 69 6d 65 28 29 2e 20 20  CurrentTime().  
9370: 54 68 69 73 20 69 73 20 75 73 65 64 20 66 6f 72  This is used for
9380: 20 74 65 73 74 69 6e 67 2e 0a 2a 2f 0a 23 69 66   testing..*/.#if
9390: 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a  def SQLITE_TEST.
93a0: 69 6e 74 20 73 71 6c 69 74 65 33 5f 63 75 72 72  int sqlite3_curr
93b0: 65 6e 74 5f 74 69 6d 65 20 3d 20 30 3b 0a 23 65  ent_time = 0;.#e
93c0: 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 46 69 6e 64  ndif../*.** Find
93d0: 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 69 6d   the current tim
93e0: 65 20 28 69 6e 20 55 6e 69 76 65 72 73 61 6c 20  e (in Universal 
93f0: 43 6f 6f 72 64 69 6e 61 74 65 64 20 54 69 6d 65  Coordinated Time
9400: 29 2e 20 20 57 72 69 74 65 20 74 68 65 0a 2a 2a  ).  Write the.**
9410: 20 63 75 72 72 65 6e 74 20 74 69 6d 65 20 61 6e   current time an
9420: 64 20 64 61 74 65 20 61 73 20 61 20 4a 75 6c 69  d date as a Juli
9430: 61 6e 20 44 61 79 20 6e 75 6d 62 65 72 20 69 6e  an Day number in
9440: 74 6f 20 2a 70 72 4e 6f 77 20 61 6e 64 0a 2a 2a  to *prNow and.**
9450: 20 72 65 74 75 72 6e 20 30 2e 20 20 52 65 74 75   return 0.  Retu
9460: 72 6e 20 31 20 69 66 20 74 68 65 20 74 69 6d 65  rn 1 if the time
9470: 20 61 6e 64 20 64 61 74 65 20 63 61 6e 6e 6f 74   and date cannot
9480: 20 62 65 20 66 6f 75 6e 64 2e 0a 2a 2f 0a 69 6e   be found..*/.in
9490: 74 20 73 71 6c 69 74 65 33 4f 73 43 75 72 72 65  t sqlite3OsCurre
94a0: 6e 74 54 69 6d 65 28 64 6f 75 62 6c 65 20 2a 70  ntTime(double *p
94b0: 72 4e 6f 77 29 7b 0a 20 20 74 69 6d 65 5f 74 20  rNow){.  time_t 
94c0: 74 3b 0a 20 20 74 69 6d 65 28 26 74 29 3b 0a 20  t;.  time(&t);. 
94d0: 20 2a 70 72 4e 6f 77 20 3d 20 74 2f 38 36 34 30   *prNow = t/8640
94e0: 30 2e 30 20 2b 20 32 34 34 30 35 38 37 2e 35 3b  0.0 + 2440587.5;
94f0: 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54  .#ifdef SQLITE_T
9500: 45 53 54 0a 20 20 69 66 28 20 73 71 6c 69 74 65  EST.  if( sqlite
9510: 33 5f 63 75 72 72 65 6e 74 5f 74 69 6d 65 20 29  3_current_time )
9520: 7b 0a 20 20 20 20 2a 70 72 4e 6f 77 20 3d 20 73  {.    *prNow = s
9530: 71 6c 69 74 65 33 5f 63 75 72 72 65 6e 74 5f 74  qlite3_current_t
9540: 69 6d 65 2f 38 36 34 30 30 2e 30 20 2b 20 32 34  ime/86400.0 + 24
9550: 34 30 35 38 37 2e 35 3b 0a 20 20 7d 0a 23 65 6e  40587.5;.  }.#en
9560: 64 69 66 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a  dif.  return 0;.
9570: 7d 0a 0a 23 69 66 20 30 20 2f 2a 20 4e 4f 54 20  }..#if 0 /* NOT 
9580: 55 53 45 44 20 2a 2f 0a 2f 2a 0a 2a 2a 20 46 69  USED */./*.** Fi
9590: 6e 64 20 74 68 65 20 74 69 6d 65 20 74 68 61 74  nd the time that
95a0: 20 74 68 65 20 66 69 6c 65 20 77 61 73 20 6c 61   the file was la
95b0: 73 74 20 6d 6f 64 69 66 69 65 64 2e 20 20 57 72  st modified.  Wr
95c0: 69 74 65 20 74 68 65 0a 2a 2a 20 6d 6f 64 69 66  ite the.** modif
95d0: 69 63 61 74 69 6f 6e 20 74 69 6d 65 20 61 6e 64  ication time and
95e0: 20 64 61 74 65 20 61 73 20 61 20 4a 75 6c 69 61   date as a Julia
95f0: 6e 20 44 61 79 20 6e 75 6d 62 65 72 20 69 6e 74  n Day number int
9600: 6f 20 2a 70 72 4e 6f 77 20 61 6e 64 0a 2a 2a 20  o *prNow and.** 
9610: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b  return SQLITE_OK
9620: 2e 20 20 52 65 74 75 72 6e 20 53 51 4c 49 54 45  .  Return SQLITE
9630: 5f 45 52 52 4f 52 20 69 66 20 74 68 65 20 6d 6f  _ERROR if the mo
9640: 64 69 66 69 63 61 74 69 6f 6e 0a 2a 2a 20 74 69  dification.** ti
9650: 6d 65 20 63 61 6e 6e 6f 74 20 62 65 20 66 6f 75  me cannot be fou
9660: 6e 64 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74  nd..*/.int sqlit
9670: 65 33 4f 73 46 69 6c 65 4d 6f 64 54 69 6d 65 28  e3OsFileModTime(
9680: 4f 73 46 69 6c 65 20 2a 69 64 2c 20 64 6f 75 62  OsFile *id, doub
9690: 6c 65 20 2a 70 72 4e 6f 77 29 7b 0a 20 20 69 6e  le *prNow){.  in
96a0: 74 20 72 63 3b 0a 20 20 73 74 72 75 63 74 20 73  t rc;.  struct s
96b0: 74 61 74 20 73 74 61 74 62 75 66 3b 0a 20 20 69  tat statbuf;.  i
96c0: 66 28 20 66 73 74 61 74 28 69 64 2d 3e 68 2c 20  f( fstat(id->h, 
96d0: 26 73 74 61 74 62 75 66 29 3d 3d 30 20 29 7b 0a  &statbuf)==0 ){.
96e0: 20 20 20 20 2a 70 72 4e 6f 77 20 3d 20 73 74 61      *prNow = sta
96f0: 74 62 75 66 2e 73 74 5f 6d 74 69 6d 65 2f 38 36  tbuf.st_mtime/86
9700: 34 30 30 2e 30 20 2b 20 32 34 34 30 35 38 37 2e  400.0 + 2440587.
9710: 35 3b 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49  5;.    rc = SQLI
9720: 54 45 5f 4f 4b 3b 0a 20 20 7d 65 6c 73 65 7b 0a  TE_OK;.  }else{.
9730: 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f      rc = SQLITE_
9740: 45 52 52 4f 52 3b 0a 20 20 7d 0a 20 20 72 65 74  ERROR;.  }.  ret
9750: 75 72 6e 20 72 63 3b 0a 7d 0a 23 65 6e 64 69 66  urn rc;.}.#endif
9760: 20 2f 2a 20 4e 4f 54 20 55 53 45 44 20 2a 2f 0a   /* NOT USED */.
9770: 0a 23 65 6e 64 69 66 20 2f 2a 20 4f 53 5f 55 4e  .#endif /* OS_UN
9780: 49 58 20 2a 2f 0a                                IX */.