/ Hex Artifact Content
Login

Artifact cb8a39901b8eb920372c2e42f7ea9ab40f2e47ae:


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 73 71 6c 69 74 65 49 6e 74 2e 68 22 0a  e "sqliteInt.h".
01d0: 23 69 6e 63 6c 75 64 65 20 22 6f 73 2e 68 22 0a  #include "os.h".
01e0: 23 69 66 20 4f 53 5f 55 4e 49 58 20 20 20 20 20  #if OS_UNIX     
01f0: 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 69 73           /* This
0200: 20 66 69 6c 65 20 69 73 20 75 73 65 64 20 6f 6e   file is used on
0210: 20 75 6e 69 78 20 6f 6e 6c 79 20 2a 2f 0a 0a 0a   unix only */...
0220: 23 69 6e 63 6c 75 64 65 20 3c 74 69 6d 65 2e 68  #include <time.h
0230: 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 65 72 72 6e  >.#include <errn
0240: 6f 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 75  o.h>.#include <u
0250: 6e 69 73 74 64 2e 68 3e 0a 23 69 66 6e 64 65 66  nistd.h>.#ifndef
0260: 20 4f 5f 4c 41 52 47 45 46 49 4c 45 0a 23 20 64   O_LARGEFILE.# d
0270: 65 66 69 6e 65 20 4f 5f 4c 41 52 47 45 46 49 4c  efine O_LARGEFIL
0280: 45 20 30 0a 23 65 6e 64 69 66 0a 23 69 66 64 65  E 0.#endif.#ifde
0290: 66 20 53 51 4c 49 54 45 5f 44 49 53 41 42 4c 45  f SQLITE_DISABLE
02a0: 5f 4c 46 53 0a 23 20 75 6e 64 65 66 20 4f 5f 4c  _LFS.# undef O_L
02b0: 41 52 47 45 46 49 4c 45 0a 23 20 64 65 66 69 6e  ARGEFILE.# defin
02c0: 65 20 4f 5f 4c 41 52 47 45 46 49 4c 45 20 30 0a  e O_LARGEFILE 0.
02d0: 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 4f  #endif.#ifndef O
02e0: 5f 4e 4f 46 4f 4c 4c 4f 57 0a 23 20 64 65 66 69  _NOFOLLOW.# defi
02f0: 6e 65 20 4f 5f 4e 4f 46 4f 4c 4c 4f 57 20 30 0a  ne O_NOFOLLOW 0.
0300: 23 65 6e 64 69 66 0a 23 69 66 6e 64 65 66 20 4f  #endif.#ifndef O
0310: 5f 42 49 4e 41 52 59 0a 23 20 64 65 66 69 6e 65  _BINARY.# define
0320: 20 4f 5f 42 49 4e 41 52 59 20 30 0a 23 65 6e 64   O_BINARY 0.#end
0330: 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 44  if.../*.** The D
0340: 4a 47 50 50 20 63 6f 6d 70 69 6c 65 72 20 65 6e  JGPP compiler en
0350: 76 69 72 6f 6e 6d 65 6e 74 20 6c 6f 6f 6b 73 20  vironment looks 
0360: 6d 6f 73 74 6c 79 20 6c 69 6b 65 20 55 6e 69 78  mostly like Unix
0370: 2c 20 62 75 74 20 69 74 0a 2a 2a 20 6c 61 63 6b  , but it.** lack
0380: 73 20 74 68 65 20 66 63 6e 74 6c 28 29 20 73 79  s the fcntl() sy
0390: 73 74 65 6d 20 63 61 6c 6c 2e 20 20 53 6f 20 72  stem call.  So r
03a0: 65 64 65 66 69 6e 65 20 66 63 6e 74 6c 28 29 20  edefine fcntl() 
03b0: 74 6f 20 62 65 20 73 6f 6d 65 74 68 69 6e 67 0a  to be something.
03c0: 2a 2a 20 74 68 61 74 20 61 6c 77 61 79 73 20 73  ** that always s
03d0: 75 63 63 65 65 64 73 2e 20 20 54 68 69 73 20 6d  ucceeds.  This m
03e0: 65 61 6e 73 20 74 68 61 74 20 6c 6f 63 6b 69 6e  eans that lockin
03f0: 67 20 64 6f 65 73 20 6e 6f 74 20 6f 63 63 75 72  g does not occur
0400: 20 75 6e 64 65 72 0a 2a 2a 20 44 4a 47 50 50 2e   under.** DJGPP.
0410: 20 20 42 75 74 20 69 74 73 20 44 4f 53 20 2d 20    But its DOS - 
0420: 77 68 61 74 20 64 69 64 20 79 6f 75 20 65 78 70  what did you exp
0430: 65 63 74 3f 0a 2a 2f 0a 23 69 66 64 65 66 20 5f  ect?.*/.#ifdef _
0440: 5f 44 4a 47 50 50 5f 5f 0a 23 20 64 65 66 69 6e  _DJGPP__.# defin
0450: 65 20 66 63 6e 74 6c 28 41 2c 42 2c 43 29 20 30  e fcntl(A,B,C) 0
0460: 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 4d  .#endif../*.** M
0470: 61 63 72 6f 73 20 75 73 65 64 20 74 6f 20 64 65  acros used to de
0480: 74 65 72 6d 69 6e 65 20 77 68 65 74 68 65 72 20  termine whether 
0490: 6f 72 20 6e 6f 74 20 74 6f 20 75 73 65 20 74 68  or not to use th
04a0: 72 65 61 64 73 2e 20 20 54 68 65 0a 2a 2a 20 53  reads.  The.** S
04b0: 51 4c 49 54 45 5f 55 4e 49 58 5f 54 48 52 45 41  QLITE_UNIX_THREA
04c0: 44 53 20 6d 61 63 72 6f 20 69 73 20 64 65 66 69  DS macro is defi
04d0: 6e 65 64 20 69 66 20 77 65 20 61 72 65 20 73 79  ned if we are sy
04e0: 6e 63 68 72 6f 6e 69 7a 69 6e 67 20 66 6f 72 0a  nchronizing for.
04f0: 2a 2a 20 50 6f 73 69 78 20 74 68 72 65 61 64 73  ** Posix threads
0500: 20 61 6e 64 20 53 51 4c 49 54 45 5f 57 33 32 5f   and SQLITE_W32_
0510: 54 48 52 45 41 44 53 20 69 73 20 64 65 66 69 6e  THREADS is defin
0520: 65 64 20 69 66 20 77 65 20 61 72 65 0a 2a 2a 20  ed if we are.** 
0530: 73 79 6e 63 68 72 6f 6e 69 7a 69 6e 67 20 75 73  synchronizing us
0540: 69 6e 67 20 57 69 6e 33 32 20 74 68 72 65 61 64  ing Win32 thread
0550: 73 2e 0a 2a 2f 0a 23 69 66 20 64 65 66 69 6e 65  s..*/.#if define
0560: 64 28 54 48 52 45 41 44 53 41 46 45 29 20 26 26  d(THREADSAFE) &&
0570: 20 54 48 52 45 41 44 53 41 46 45 0a 23 20 69 6e   THREADSAFE.# in
0580: 63 6c 75 64 65 20 3c 70 74 68 72 65 61 64 2e 68  clude <pthread.h
0590: 3e 0a 23 20 64 65 66 69 6e 65 20 53 51 4c 49 54  >.# define SQLIT
05a0: 45 5f 55 4e 49 58 5f 54 48 52 45 41 44 53 20 31  E_UNIX_THREADS 1
05b0: 0a 23 65 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20  .#endif.../*.** 
05c0: 49 6e 63 6c 75 64 65 20 63 6f 64 65 20 74 68 61  Include code tha
05d0: 74 20 69 73 20 63 6f 6d 6d 6f 6e 20 74 6f 20 61  t is common to a
05e0: 6c 6c 20 6f 73 5f 2a 2e 63 20 66 69 6c 65 73 0a  ll os_*.c files.
05f0: 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 6f 73 5f  */.#include "os_
0600: 63 6f 6d 6d 6f 6e 2e 68 22 0a 0a 23 69 66 20 64  common.h"..#if d
0610: 65 66 69 6e 65 64 28 54 48 52 45 41 44 53 41 46  efined(THREADSAF
0620: 45 29 20 26 26 20 54 48 52 45 41 44 53 41 46 45  E) && THREADSAFE
0630: 20 26 26 20 64 65 66 69 6e 65 64 28 5f 5f 6c 69   && defined(__li
0640: 6e 75 78 5f 5f 29 0a 23 64 65 66 69 6e 65 20 67  nux__).#define g
0650: 65 74 70 69 64 20 70 74 68 72 65 61 64 5f 73 65  etpid pthread_se
0660: 6c 66 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a  lf.#endif../*.**
0670: 20 48 65 72 65 20 69 73 20 74 68 65 20 64 69 72   Here is the dir
0680: 74 20 6f 6e 20 50 4f 53 49 58 20 61 64 76 69 73  t on POSIX advis
0690: 6f 72 79 20 6c 6f 63 6b 73 3a 20 20 41 4e 53 49  ory locks:  ANSI
06a0: 20 53 54 44 20 31 30 30 33 2e 31 20 28 31 39 39   STD 1003.1 (199
06b0: 36 29 0a 2a 2a 20 73 65 63 74 69 6f 6e 20 36 2e  6).** section 6.
06c0: 35 2e 32 2e 32 20 6c 69 6e 65 73 20 34 38 33 20  5.2.2 lines 483 
06d0: 74 68 72 6f 75 67 68 20 34 39 30 20 73 70 65 63  through 490 spec
06e0: 69 66 79 20 74 68 61 74 20 77 68 65 6e 20 61 20  ify that when a 
06f0: 70 72 6f 63 65 73 73 0a 2a 2a 20 73 65 74 73 20  process.** sets 
0700: 6f 72 20 63 6c 65 61 72 73 20 61 20 6c 6f 63 6b  or clears a lock
0710: 2c 20 74 68 61 74 20 6f 70 65 72 61 74 69 6f 6e  , that operation
0720: 20 6f 76 65 72 72 69 64 65 73 20 61 6e 79 20 70   overrides any p
0730: 72 69 6f 72 20 6c 6f 63 6b 73 20 73 65 74 0a 2a  rior locks set.*
0740: 2a 20 62 79 20 74 68 65 20 73 61 6d 65 20 70 72  * by the same pr
0750: 6f 63 65 73 73 2e 20 20 49 74 20 64 6f 65 73 20  ocess.  It does 
0760: 6e 6f 74 20 65 78 70 6c 69 63 69 74 6c 79 20 73  not explicitly s
0770: 61 79 20 73 6f 2c 20 62 75 74 20 74 68 69 73 20  ay so, but this 
0780: 69 6d 70 6c 69 65 73 0a 2a 2a 20 74 68 61 74 20  implies.** that 
0790: 69 74 20 6f 76 65 72 72 69 64 65 73 20 6c 6f 63  it overrides loc
07a0: 6b 73 20 73 65 74 20 62 79 20 74 68 65 20 73 61  ks set by the sa
07b0: 6d 65 20 70 72 6f 63 65 73 73 20 75 73 69 6e 67  me process using
07c0: 20 61 20 64 69 66 66 65 72 65 6e 74 0a 2a 2a 20   a different.** 
07d0: 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 2e  file descriptor.
07e0: 20 20 43 6f 6e 73 69 64 65 72 20 74 68 69 73 20    Consider this 
07f0: 74 65 73 74 20 63 61 73 65 3a 0a 2a 2a 0a 2a 2a  test case:.**.**
0800: 20 20 20 20 20 20 20 69 6e 74 20 66 64 31 20 3d         int fd1 =
0810: 20 6f 70 65 6e 28 22 2e 2f 66 69 6c 65 31 22 2c   open("./file1",
0820: 20 4f 5f 52 44 57 52 7c 4f 5f 43 52 45 41 54 2c   O_RDWR|O_CREAT,
0830: 20 30 36 34 34 29 3b 0a 2a 2a 20 20 20 20 20 20   0644);.**      
0840: 20 69 6e 74 20 66 64 32 20 3d 20 6f 70 65 6e 28   int fd2 = open(
0850: 22 2e 2f 66 69 6c 65 32 22 2c 20 4f 5f 52 44 57  "./file2", O_RDW
0860: 52 7c 4f 5f 43 52 45 41 54 2c 20 30 36 34 34 29  R|O_CREAT, 0644)
0870: 3b 0a 2a 2a 0a 2a 2a 20 53 75 70 70 6f 73 65 20  ;.**.** Suppose 
0880: 2e 2f 66 69 6c 65 31 20 61 6e 64 20 2e 2f 66 69  ./file1 and ./fi
0890: 6c 65 32 20 61 72 65 20 72 65 61 6c 6c 79 20 74  le2 are really t
08a0: 68 65 20 73 61 6d 65 20 66 69 6c 65 20 28 62 65  he same file (be
08b0: 63 61 75 73 65 0a 2a 2a 20 6f 6e 65 20 69 73 20  cause.** one is 
08c0: 61 20 68 61 72 64 20 6f 72 20 73 79 6d 62 6f 6c  a hard or symbol
08d0: 69 63 20 6c 69 6e 6b 20 74 6f 20 74 68 65 20 6f  ic link to the o
08e0: 74 68 65 72 29 20 74 68 65 6e 20 69 66 20 79 6f  ther) then if yo
08f0: 75 20 73 65 74 0a 2a 2a 20 61 6e 20 65 78 63 6c  u set.** an excl
0900: 75 73 69 76 65 20 6c 6f 63 6b 20 6f 6e 20 66 64  usive lock on fd
0910: 31 2c 20 74 68 65 6e 20 74 72 79 20 74 6f 20 67  1, then try to g
0920: 65 74 20 61 6e 20 65 78 63 6c 75 73 69 76 65 20  et an exclusive 
0930: 6c 6f 63 6b 0a 2a 2a 20 6f 6e 20 66 64 32 2c 20  lock.** on fd2, 
0940: 69 74 20 77 6f 72 6b 73 2e 20 20 49 20 77 6f 75  it works.  I wou
0950: 6c 64 20 68 61 76 65 20 65 78 70 65 63 74 65 64  ld have expected
0960: 20 74 68 65 20 73 65 63 6f 6e 64 20 6c 6f 63 6b   the second lock
0970: 20 74 6f 0a 2a 2a 20 66 61 69 6c 20 73 69 6e 63   to.** fail sinc
0980: 65 20 74 68 65 72 65 20 77 61 73 20 61 6c 72 65  e there was alre
0990: 61 64 79 20 61 20 6c 6f 63 6b 20 6f 6e 20 74 68  ady a lock on th
09a0: 65 20 66 69 6c 65 20 64 75 65 20 74 6f 20 66 64  e file due to fd
09b0: 31 2e 0a 2a 2a 20 42 75 74 20 6e 6f 74 20 73 6f  1..** But not so
09c0: 2e 20 20 53 69 6e 63 65 20 62 6f 74 68 20 6c 6f  .  Since both lo
09d0: 63 6b 73 20 63 61 6d 65 20 66 72 6f 6d 20 74 68  cks came from th
09e0: 65 20 73 61 6d 65 20 70 72 6f 63 65 73 73 2c 20  e same process, 
09f0: 74 68 65 0a 2a 2a 20 73 65 63 6f 6e 64 20 6f 76  the.** second ov
0a00: 65 72 72 69 64 65 73 20 74 68 65 20 66 69 72 73  errides the firs
0a10: 74 2c 20 65 76 65 6e 20 74 68 6f 75 67 68 20 74  t, even though t
0a20: 68 65 79 20 77 65 72 65 20 6f 6e 20 64 69 66 66  hey were on diff
0a30: 65 72 65 6e 74 0a 2a 2a 20 66 69 6c 65 20 64 65  erent.** file de
0a40: 73 63 72 69 70 74 6f 72 73 20 6f 70 65 6e 65 64  scriptors opened
0a50: 20 6f 6e 20 64 69 66 66 65 72 65 6e 74 20 66 69   on different fi
0a60: 6c 65 20 6e 61 6d 65 73 2e 0a 2a 2a 0a 2a 2a 20  le names..**.** 
0a70: 42 75 6d 6d 65 72 2e 20 20 49 66 20 79 6f 75 20  Bummer.  If you 
0a80: 61 73 6b 20 6d 65 2c 20 74 68 69 73 20 69 73 20  ask me, this is 
0a90: 62 72 6f 6b 65 6e 2e 20 20 42 61 64 6c 79 20 62  broken.  Badly b
0aa0: 72 6f 6b 65 6e 2e 20 20 49 74 20 6d 65 61 6e 73  roken.  It means
0ab0: 0a 2a 2a 20 74 68 61 74 20 77 65 20 63 61 6e 6e  .** that we cann
0ac0: 6f 74 20 75 73 65 20 50 4f 53 49 58 20 6c 6f 63  ot use POSIX loc
0ad0: 6b 73 20 74 6f 20 73 79 6e 63 68 72 6f 6e 69 7a  ks to synchroniz
0ae0: 65 20 66 69 6c 65 20 61 63 63 65 73 73 20 61 6d  e file access am
0af0: 6f 6e 67 0a 2a 2a 20 63 6f 6d 70 65 74 69 6e 67  ong.** competing
0b00: 20 74 68 72 65 61 64 73 20 6f 66 20 74 68 65 20   threads of the 
0b10: 73 61 6d 65 20 70 72 6f 63 65 73 73 2e 20 20 50  same process.  P
0b20: 4f 53 49 58 20 6c 6f 63 6b 73 20 77 69 6c 6c 20  OSIX locks will 
0b30: 77 6f 72 6b 20 66 69 6e 65 0a 2a 2a 20 74 6f 20  work fine.** to 
0b40: 73 79 6e 63 68 72 6f 6e 69 7a 65 20 61 63 63 65  synchronize acce
0b50: 73 73 20 66 6f 72 20 74 68 72 65 61 64 73 20 69  ss for threads i
0b60: 6e 20 73 65 70 61 72 61 74 65 20 70 72 6f 63 65  n separate proce
0b70: 73 73 65 73 2c 20 62 75 74 20 6e 6f 74 0a 2a 2a  sses, but not.**
0b80: 20 74 68 72 65 61 64 73 20 77 69 74 68 69 6e 20   threads within 
0b90: 74 68 65 20 73 61 6d 65 20 70 72 6f 63 65 73 73  the same process
0ba0: 2e 0a 2a 2a 0a 2a 2a 20 54 6f 20 77 6f 72 6b 20  ..**.** To work 
0bb0: 61 72 6f 75 6e 64 20 74 68 65 20 70 72 6f 62 6c  around the probl
0bc0: 65 6d 2c 20 53 51 4c 69 74 65 20 68 61 73 20 74  em, SQLite has t
0bd0: 6f 20 6d 61 6e 61 67 65 20 66 69 6c 65 20 6c 6f  o manage file lo
0be0: 63 6b 73 20 69 6e 74 65 72 6e 61 6c 6c 79 0a 2a  cks internally.*
0bf0: 2a 20 6f 6e 20 69 74 73 20 6f 77 6e 2e 20 20 57  * on its own.  W
0c00: 68 65 6e 65 76 65 72 20 61 20 6e 65 77 20 64 61  henever a new da
0c10: 74 61 62 61 73 65 20 69 73 20 6f 70 65 6e 65 64  tabase is opened
0c20: 2c 20 77 65 20 68 61 76 65 20 74 6f 20 66 69 6e  , we have to fin
0c30: 64 20 74 68 65 0a 2a 2a 20 73 70 65 63 69 66 69  d the.** specifi
0c40: 63 20 69 6e 6f 64 65 20 6f 66 20 74 68 65 20 64  c inode of the d
0c50: 61 74 61 62 61 73 65 20 66 69 6c 65 20 28 74 68  atabase file (th
0c60: 65 20 69 6e 6f 64 65 20 69 73 20 64 65 74 65 72  e inode is deter
0c70: 6d 69 6e 65 64 20 62 79 20 74 68 65 0a 2a 2a 20  mined by the.** 
0c80: 73 74 5f 64 65 76 20 61 6e 64 20 73 74 5f 69 6e  st_dev and st_in
0c90: 6f 20 66 69 65 6c 64 73 20 6f 66 20 74 68 65 20  o fields of the 
0ca0: 73 74 61 74 20 73 74 72 75 63 74 75 72 65 20 74  stat structure t
0cb0: 68 61 74 20 66 73 74 61 74 28 29 20 66 69 6c 6c  hat fstat() fill
0cc0: 73 20 69 6e 29 0a 2a 2a 20 61 6e 64 20 63 68 65  s in).** and che
0cd0: 63 6b 20 66 6f 72 20 6c 6f 63 6b 73 20 61 6c 72  ck for locks alr
0ce0: 65 61 64 79 20 65 78 69 73 74 69 6e 67 20 6f 6e  eady existing on
0cf0: 20 74 68 61 74 20 69 6e 6f 64 65 2e 20 20 57 68   that inode.  Wh
0d00: 65 6e 20 6c 6f 63 6b 73 20 61 72 65 0a 2a 2a 20  en locks are.** 
0d10: 63 72 65 61 74 65 64 20 6f 72 20 72 65 6d 6f 76  created or remov
0d20: 65 64 2c 20 77 65 20 68 61 76 65 20 74 6f 20 6c  ed, we have to l
0d30: 6f 6f 6b 20 61 74 20 6f 75 72 20 6f 77 6e 20 69  ook at our own i
0d40: 6e 74 65 72 6e 61 6c 20 72 65 63 6f 72 64 20 6f  nternal record o
0d50: 66 20 74 68 65 0a 2a 2a 20 6c 6f 63 6b 73 20 74  f the.** locks t
0d60: 6f 20 73 65 65 20 69 66 20 61 6e 6f 74 68 65 72  o see if another
0d70: 20 74 68 72 65 61 64 20 68 61 73 20 70 72 65 76   thread has prev
0d80: 69 6f 75 73 6c 79 20 73 65 74 20 61 20 6c 6f 63  iously set a loc
0d90: 6b 20 6f 6e 20 74 68 61 74 20 73 61 6d 65 0a 2a  k on that same.*
0da0: 2a 20 69 6e 6f 64 65 2e 0a 2a 2a 0a 2a 2a 20 54  * inode..**.** T
0db0: 68 65 20 4f 73 46 69 6c 65 20 73 74 72 75 63 74  he OsFile struct
0dc0: 75 72 65 20 66 6f 72 20 50 4f 53 49 58 20 69 73  ure for POSIX is
0dd0: 20 6e 6f 20 6c 6f 6e 67 65 72 20 6a 75 73 74 20   no longer just 
0de0: 61 6e 20 69 6e 74 65 67 65 72 20 66 69 6c 65 0a  an integer file.
0df0: 2a 2a 20 64 65 73 63 72 69 70 74 6f 72 2e 20 20  ** descriptor.  
0e00: 49 74 20 69 73 20 6e 6f 77 20 61 20 73 74 72 75  It is now a stru
0e10: 63 74 75 72 65 20 74 68 61 74 20 68 6f 6c 64 73  cture that holds
0e20: 20 74 68 65 20 69 6e 74 65 67 65 72 20 66 69 6c   the integer fil
0e30: 65 0a 2a 2a 20 64 65 73 63 72 69 70 74 6f 72 20  e.** descriptor 
0e40: 61 6e 64 20 61 20 70 6f 69 6e 74 65 72 20 74 6f  and a pointer to
0e50: 20 61 20 73 74 72 75 63 74 75 72 65 20 74 68 61   a structure tha
0e60: 74 20 64 65 73 63 72 69 62 65 73 20 74 68 65 20  t describes the 
0e70: 69 6e 74 65 72 6e 61 6c 0a 2a 2a 20 6c 6f 63 6b  internal.** lock
0e80: 73 20 6f 6e 20 74 68 65 20 63 6f 72 72 65 73 70  s on the corresp
0e90: 6f 6e 64 69 6e 67 20 69 6e 6f 64 65 2e 20 20 54  onding inode.  T
0ea0: 68 65 72 65 20 69 73 20 6f 6e 65 20 6c 6f 63 6b  here is one lock
0eb0: 69 6e 67 20 73 74 72 75 63 74 75 72 65 0a 2a 2a  ing structure.**
0ec0: 20 70 65 72 20 69 6e 6f 64 65 2c 20 73 6f 20 69   per inode, so i
0ed0: 66 20 74 68 65 20 73 61 6d 65 20 69 6e 6f 64 65  f the same inode
0ee0: 20 69 73 20 6f 70 65 6e 65 64 20 74 77 69 63 65   is opened twice
0ef0: 2c 20 62 6f 74 68 20 4f 73 46 69 6c 65 20 73 74  , both OsFile st
0f00: 72 75 63 74 75 72 65 73 0a 2a 2a 20 70 6f 69 6e  ructures.** poin
0f10: 74 20 74 6f 20 74 68 65 20 73 61 6d 65 20 6c 6f  t to the same lo
0f20: 63 6b 69 6e 67 20 73 74 72 75 63 74 75 72 65 2e  cking structure.
0f30: 20 20 54 68 65 20 6c 6f 63 6b 69 6e 67 20 73 74    The locking st
0f40: 72 75 63 74 75 72 65 20 6b 65 65 70 73 0a 2a 2a  ructure keeps.**
0f50: 20 61 20 72 65 66 65 72 65 6e 63 65 20 63 6f 75   a reference cou
0f60: 6e 74 20 28 73 6f 20 77 65 20 77 69 6c 6c 20 6b  nt (so we will k
0f70: 6e 6f 77 20 77 68 65 6e 20 74 6f 20 64 65 6c 65  now when to dele
0f80: 74 65 20 69 74 29 20 61 6e 64 20 61 20 22 63 6e  te it) and a "cn
0f90: 74 22 0a 2a 2a 20 66 69 65 6c 64 20 74 68 61 74  t".** field that
0fa0: 20 74 65 6c 6c 73 20 75 73 20 69 74 73 20 69 6e   tells us its in
0fb0: 74 65 72 6e 61 6c 20 6c 6f 63 6b 20 73 74 61 74  ternal lock stat
0fc0: 75 73 2e 20 20 63 6e 74 3d 3d 30 20 6d 65 61 6e  us.  cnt==0 mean
0fd0: 73 20 74 68 65 0a 2a 2a 20 66 69 6c 65 20 69 73  s the.** file is
0fe0: 20 75 6e 6c 6f 63 6b 65 64 2e 20 20 63 6e 74 3d   unlocked.  cnt=
0ff0: 3d 2d 31 20 6d 65 61 6e 73 20 74 68 65 20 66 69  =-1 means the fi
1000: 6c 65 20 68 61 73 20 61 6e 20 65 78 63 6c 75 73  le has an exclus
1010: 69 76 65 20 6c 6f 63 6b 2e 0a 2a 2a 20 63 6e 74  ive lock..** cnt
1020: 3e 30 20 6d 65 61 6e 73 20 74 68 65 72 65 20 61  >0 means there a
1030: 72 65 20 63 6e 74 20 73 68 61 72 65 64 20 6c 6f  re cnt shared lo
1040: 63 6b 73 20 6f 6e 20 74 68 65 20 66 69 6c 65 2e  cks on the file.
1050: 0a 2a 2a 0a 2a 2a 20 41 6e 79 20 61 74 74 65 6d  .**.** Any attem
1060: 70 74 20 74 6f 20 6c 6f 63 6b 20 6f 72 20 75 6e  pt to lock or un
1070: 6c 6f 63 6b 20 61 20 66 69 6c 65 20 66 69 72 73  lock a file firs
1080: 74 20 63 68 65 63 6b 73 20 74 68 65 20 6c 6f 63  t checks the loc
1090: 6b 69 6e 67 0a 2a 2a 20 73 74 72 75 63 74 75 72  king.** structur
10a0: 65 2e 20 20 54 68 65 20 66 63 6e 74 6c 28 29 20  e.  The fcntl() 
10b0: 73 79 73 74 65 6d 20 63 61 6c 6c 20 69 73 20 6f  system call is o
10c0: 6e 6c 79 20 69 6e 76 6f 6b 65 64 20 74 6f 20 73  nly invoked to s
10d0: 65 74 20 61 20 0a 2a 2a 20 50 4f 53 49 58 20 6c  et a .** POSIX l
10e0: 6f 63 6b 20 69 66 20 74 68 65 20 69 6e 74 65 72  ock if the inter
10f0: 6e 61 6c 20 6c 6f 63 6b 20 73 74 72 75 63 74 75  nal lock structu
1100: 72 65 20 74 72 61 6e 73 69 74 69 6f 6e 73 20 62  re transitions b
1110: 65 74 77 65 65 6e 0a 2a 2a 20 61 20 6c 6f 63 6b  etween.** a lock
1120: 65 64 20 61 6e 64 20 61 6e 20 75 6e 6c 6f 63 6b  ed and an unlock
1130: 65 64 20 73 74 61 74 65 2e 0a 2a 2a 0a 2a 2a 20  ed state..**.** 
1140: 32 30 30 34 2d 4a 61 6e 2d 31 31 3a 0a 2a 2a 20  2004-Jan-11:.** 
1150: 4d 6f 72 65 20 72 65 63 65 6e 74 20 64 69 73 63  More recent disc
1160: 6f 76 65 72 69 65 73 20 61 62 6f 75 74 20 50 4f  overies about PO
1170: 53 49 58 20 61 64 76 69 73 6f 72 79 20 6c 6f 63  SIX advisory loc
1180: 6b 73 2e 20 20 28 54 68 65 20 6d 6f 72 65 0a 2a  ks.  (The more.*
1190: 2a 20 49 20 64 69 73 63 6f 76 65 72 2c 20 74 68  * I discover, th
11a0: 65 20 6d 6f 72 65 20 49 20 72 65 61 6c 69 7a 65  e more I realize
11b0: 20 74 68 65 20 61 20 50 4f 53 49 58 20 61 64 76   the a POSIX adv
11c0: 69 73 6f 72 79 20 6c 6f 63 6b 73 20 61 72 65 0a  isory locks are.
11d0: 2a 2a 20 61 6e 20 61 62 6f 6d 69 6e 61 74 69 6f  ** an abominatio
11e0: 6e 2e 29 0a 2a 2a 0a 2a 2a 20 49 66 20 79 6f 75  n.).**.** If you
11f0: 20 63 6c 6f 73 65 20 61 20 66 69 6c 65 20 64 65   close a file de
1200: 73 63 72 69 70 74 6f 72 20 74 68 61 74 20 70 6f  scriptor that po
1210: 69 6e 74 73 20 74 6f 20 61 20 66 69 6c 65 20 74  ints to a file t
1220: 68 61 74 20 68 61 73 20 6c 6f 63 6b 73 2c 0a 2a  hat has locks,.*
1230: 2a 20 61 6c 6c 20 6c 6f 63 6b 73 20 6f 6e 20 74  * all locks on t
1240: 68 61 74 20 66 69 6c 65 20 74 68 61 74 20 61 72  hat file that ar
1250: 65 20 6f 77 6e 65 64 20 62 79 20 74 68 65 20 63  e owned by the c
1260: 75 72 72 65 6e 74 20 70 72 6f 63 65 73 73 20 61  urrent process a
1270: 72 65 0a 2a 2a 20 72 65 6c 65 61 73 65 64 2e 20  re.** released. 
1280: 20 54 6f 20 77 6f 72 6b 20 61 72 6f 75 6e 64 20   To work around 
1290: 74 68 69 73 20 70 72 6f 62 6c 65 6d 2c 20 65 61  this problem, ea
12a0: 63 68 20 4f 73 46 69 6c 65 20 73 74 72 75 63 74  ch OsFile struct
12b0: 75 72 65 20 63 6f 6e 74 61 69 6e 73 0a 2a 2a 20  ure contains.** 
12c0: 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 6e 20  a pointer to an 
12d0: 6f 70 65 6e 43 6e 74 20 73 74 72 75 63 74 75 72  openCnt structur
12e0: 65 2e 20 20 54 68 65 72 65 20 69 73 20 6f 6e 65  e.  There is one
12f0: 20 6f 70 65 6e 43 6e 74 20 73 74 72 75 63 74 75   openCnt structu
1300: 72 65 0a 2a 2a 20 70 65 72 20 6f 70 65 6e 20 69  re.** per open i
1310: 6e 6f 64 65 2c 20 77 68 69 63 68 20 6d 65 61 6e  node, which mean
1320: 73 20 74 68 61 74 20 6d 75 6c 74 69 70 6c 65 20  s that multiple 
1330: 4f 73 46 69 6c 65 73 20 63 61 6e 20 70 6f 69 6e  OsFiles can poin
1340: 74 20 74 6f 20 61 20 73 69 6e 67 6c 65 0a 2a 2a  t to a single.**
1350: 20 6f 70 65 6e 43 6e 74 2e 20 20 57 68 65 6e 20   openCnt.  When 
1360: 61 6e 20 61 74 74 65 6d 70 74 20 69 73 20 6d 61  an attempt is ma
1370: 64 65 20 74 6f 20 63 6c 6f 73 65 20 61 6e 20 4f  de to close an O
1380: 73 46 69 6c 65 2c 20 69 66 20 74 68 65 72 65 20  sFile, if there 
1390: 61 72 65 0a 2a 2a 20 6f 74 68 65 72 20 4f 73 46  are.** other OsF
13a0: 69 6c 65 73 20 6f 70 65 6e 20 6f 6e 20 74 68 65  iles open on the
13b0: 20 73 61 6d 65 20 69 6e 6f 64 65 20 74 68 61 74   same inode that
13c0: 20 61 72 65 20 68 6f 6c 64 69 6e 67 20 6c 6f 63   are holding loc
13d0: 6b 73 2c 20 74 68 65 20 63 61 6c 6c 0a 2a 2a 20  ks, the call.** 
13e0: 74 6f 20 63 6c 6f 73 65 28 29 20 74 68 65 20 66  to close() the f
13f0: 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20 69  ile descriptor i
1400: 73 20 64 65 66 65 72 72 65 64 20 75 6e 74 69 6c  s deferred until
1410: 20 61 6c 6c 20 6f 66 20 74 68 65 20 6c 6f 63 6b   all of the lock
1420: 73 20 63 6c 65 61 72 2e 0a 2a 2a 20 54 68 65 20  s clear..** The 
1430: 6f 70 65 6e 43 6e 74 20 73 74 72 75 63 74 75 72  openCnt structur
1440: 65 20 6b 65 65 70 73 20 61 20 6c 69 73 74 20 6f  e keeps a list o
1450: 66 20 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f  f file descripto
1460: 72 73 20 74 68 61 74 20 6e 65 65 64 20 74 6f 0a  rs that need to.
1470: 2a 2a 20 62 65 20 63 6c 6f 73 65 64 20 61 6e 64  ** be closed and
1480: 20 74 68 61 74 20 6c 69 73 74 20 69 73 20 77 61   that list is wa
1490: 6c 6b 65 64 20 28 61 6e 64 20 63 6c 65 61 72 65  lked (and cleare
14a0: 64 29 20 77 68 65 6e 20 74 68 65 20 6c 61 73 74  d) when the last
14b0: 20 6c 6f 63 6b 0a 2a 2a 20 63 6c 65 61 72 73 2e   lock.** clears.
14c0: 0a 2a 2a 0a 2a 2a 20 46 69 72 73 74 2c 20 75 6e  .**.** First, un
14d0: 64 65 72 20 4c 69 6e 75 78 20 74 68 72 65 61 64  der Linux thread
14e0: 73 2c 20 62 65 63 61 75 73 65 20 65 61 63 68 20  s, because each 
14f0: 74 68 72 65 61 64 20 68 61 73 20 61 20 73 65 70  thread has a sep
1500: 61 72 61 74 65 0a 2a 2a 20 70 72 6f 63 65 73 73  arate.** process
1510: 20 49 44 2c 20 6c 6f 63 6b 20 6f 70 65 72 61 74   ID, lock operat
1520: 69 6f 6e 73 20 69 6e 20 6f 6e 65 20 74 68 72 65  ions in one thre
1530: 61 64 20 64 6f 20 6e 6f 74 20 6f 76 65 72 72 69  ad do not overri
1540: 64 65 20 6c 6f 63 6b 73 0a 2a 2a 20 74 6f 20 74  de locks.** to t
1550: 68 65 20 73 61 6d 65 20 66 69 6c 65 20 69 6e 20  he same file in 
1560: 6f 74 68 65 72 20 74 68 72 65 61 64 73 2e 20 20  other threads.  
1570: 4c 69 6e 75 78 20 74 68 72 65 61 64 73 20 62 65  Linux threads be
1580: 68 61 76 65 20 6c 69 6b 65 0a 2a 2a 20 73 65 70  have like.** sep
1590: 61 72 61 74 65 20 70 72 6f 63 65 73 73 65 73 20  arate processes 
15a0: 69 6e 20 74 68 69 73 20 72 65 73 70 65 63 74 2e  in this respect.
15b0: 20 20 42 75 74 2c 20 69 66 20 79 6f 75 20 63 6c    But, if you cl
15c0: 6f 73 65 20 61 20 66 69 6c 65 0a 2a 2a 20 64 65  ose a file.** de
15d0: 73 63 72 69 70 74 6f 72 20 69 6e 20 6c 69 6e 75  scriptor in linu
15e0: 78 20 74 68 72 65 61 64 73 2c 20 61 6c 6c 20 6c  x threads, all l
15f0: 6f 63 6b 73 20 61 72 65 20 63 6c 65 61 72 65 64  ocks are cleared
1600: 2c 20 65 76 65 6e 20 6c 6f 63 6b 73 0a 2a 2a 20  , even locks.** 
1610: 6f 6e 20 6f 74 68 65 72 20 74 68 72 65 61 64 73  on other threads
1620: 20 61 6e 64 20 65 76 65 6e 20 74 68 6f 75 67 68   and even though
1630: 20 74 68 65 20 6f 74 68 65 72 20 74 68 72 65 61   the other threa
1640: 64 73 20 68 61 76 65 20 64 69 66 66 65 72 65 6e  ds have differen
1650: 74 0a 2a 2a 20 70 72 6f 63 65 73 73 20 49 44 73  t.** process IDs
1660: 2e 20 20 4c 69 6e 75 78 20 74 68 72 65 61 64 73  .  Linux threads
1670: 20 69 73 20 69 6e 63 6f 6e 73 69 73 74 65 6e 74   is inconsistent
1680: 20 69 6e 20 74 68 69 73 20 72 65 73 70 65 63 74   in this respect
1690: 2e 0a 2a 2a 20 28 49 27 6d 20 62 65 67 69 6e 6e  ..** (I'm beginn
16a0: 69 6e 67 20 74 6f 20 74 68 69 6e 6b 20 74 68 61  ing to think tha
16b0: 74 20 6c 69 6e 75 78 20 74 68 72 65 61 64 73 20  t linux threads 
16c0: 69 73 20 61 6e 20 61 62 6f 6d 69 6e 61 74 69 6f  is an abominatio
16d0: 6e 20 74 6f 6f 2e 29 0a 2a 2a 20 54 68 65 20 63  n too.).** The c
16e0: 6f 6e 73 65 71 75 65 6e 63 65 20 6f 66 20 74 68  onsequence of th
16f0: 69 73 20 61 6c 6c 20 69 73 20 74 68 61 74 20 74  is all is that t
1700: 68 65 20 68 61 73 68 20 74 61 62 6c 65 20 66 6f  he hash table fo
1710: 72 20 74 68 65 20 6c 6f 63 6b 49 6e 66 6f 0a 2a  r the lockInfo.*
1720: 2a 20 73 74 72 75 63 74 75 72 65 20 68 61 73 20  * structure has 
1730: 74 6f 20 69 6e 63 6c 75 64 65 20 74 68 65 20 70  to include the p
1740: 72 6f 63 65 73 73 20 69 64 20 61 73 20 70 61 72  rocess id as par
1750: 74 20 6f 66 20 69 74 73 20 6b 65 79 20 62 65 63  t of its key bec
1760: 61 75 73 65 0a 2a 2a 20 6c 6f 63 6b 73 20 69 6e  ause.** locks in
1770: 20 64 69 66 66 65 72 65 6e 74 20 74 68 72 65 61   different threa
1780: 64 73 20 61 72 65 20 74 72 65 61 74 65 64 20 61  ds are treated a
1790: 73 20 64 69 73 74 69 6e 63 74 2e 20 20 42 75 74  s distinct.  But
17a0: 20 74 68 65 20 0a 2a 2a 20 6f 70 65 6e 43 6e 74   the .** openCnt
17b0: 20 73 74 72 75 63 74 75 72 65 20 73 68 6f 75 6c   structure shoul
17c0: 64 20 6e 6f 74 20 69 6e 63 6c 75 64 65 20 74 68  d not include th
17d0: 65 20 70 72 6f 63 65 73 73 20 69 64 20 69 6e 20  e process id in 
17e0: 69 74 73 0a 2a 2a 20 6b 65 79 20 62 65 63 61 75  its.** key becau
17f0: 73 65 20 63 6c 6f 73 65 28 29 20 63 6c 65 61 72  se close() clear
1800: 73 20 6c 6f 63 6b 20 6f 6e 20 61 6c 6c 20 74 68  s lock on all th
1810: 72 65 61 64 73 2c 20 6e 6f 74 20 6a 75 73 74 20  reads, not just 
1820: 74 68 65 20 63 75 72 72 65 6e 74 0a 2a 2a 20 74  the current.** t
1830: 68 72 65 61 64 2e 20 20 57 65 72 65 20 69 74 20  hread.  Were it 
1840: 6e 6f 74 20 66 6f 72 20 74 68 69 73 20 67 6f 6f  not for this goo
1850: 66 69 6e 65 73 73 20 69 6e 20 6c 69 6e 75 78 20  finess in linux 
1860: 74 68 72 65 61 64 73 2c 20 77 65 20 63 6f 75 6c  threads, we coul
1870: 64 0a 2a 2a 20 63 6f 6d 62 69 6e 65 20 74 68 65  d.** combine the
1880: 20 6c 6f 63 6b 49 6e 66 6f 20 61 6e 64 20 6f 70   lockInfo and op
1890: 65 6e 43 6e 74 20 73 74 72 75 63 74 75 72 65 73  enCnt structures
18a0: 20 69 6e 74 6f 20 61 20 73 69 6e 67 6c 65 20 73   into a single s
18b0: 74 72 75 63 74 75 72 65 2e 0a 2a 2a 0a 2a 2a 20  tructure..**.** 
18c0: 32 30 30 34 2d 4a 75 6e 2d 32 38 3a 0a 2a 2a 20  2004-Jun-28:.** 
18d0: 4f 6e 20 73 6f 6d 65 20 76 65 72 73 69 6f 6e 73  On some versions
18e0: 20 6f 66 20 6c 69 6e 75 78 2c 20 74 68 72 65 61   of linux, threa
18f0: 64 73 20 63 61 6e 20 6f 76 65 72 72 69 64 65 20  ds can override 
1900: 65 61 63 68 20 6f 74 68 65 72 73 20 6c 6f 63 6b  each others lock
1910: 73 2e 0a 2a 2a 20 4f 6e 20 6f 74 68 65 72 73 20  s..** On others 
1920: 6e 6f 74 2e 20 20 53 6f 6d 65 74 69 6d 65 73 20  not.  Sometimes 
1930: 79 6f 75 20 63 61 6e 20 63 68 61 6e 67 65 20 74  you can change t
1940: 68 65 20 62 65 68 61 76 69 6f 72 20 6f 6e 20 74  he behavior on t
1950: 68 65 20 73 61 6d 65 0a 2a 2a 20 73 79 73 74 65  he same.** syste
1960: 6d 20 62 79 20 73 65 74 74 69 6e 67 20 74 68 65  m by setting the
1970: 20 4c 44 5f 41 53 53 55 4d 45 5f 4b 45 52 4e 45   LD_ASSUME_KERNE
1980: 4c 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 76 61  L environment va
1990: 72 69 61 62 6c 65 2e 20 20 54 68 65 0a 2a 2a 20  riable.  The.** 
19a0: 50 4f 53 49 58 20 73 74 61 6e 64 61 72 64 20 69  POSIX standard i
19b0: 73 20 73 69 6c 65 6e 74 20 61 73 20 74 6f 20 77  s silent as to w
19c0: 68 69 63 68 20 62 65 68 61 76 69 6f 72 20 69 73  hich behavior is
19d0: 20 63 6f 72 72 65 63 74 2c 20 61 73 20 66 61 72   correct, as far
19e0: 0a 2a 2a 20 61 73 20 49 20 63 61 6e 20 74 65 6c  .** as I can tel
19f0: 6c 2c 20 73 6f 20 6f 74 68 65 72 20 76 65 72 73  l, so other vers
1a00: 69 6f 6e 73 20 6f 66 20 75 6e 69 78 20 6d 69 67  ions of unix mig
1a10: 68 74 20 73 68 6f 77 20 74 68 65 20 73 61 6d 65  ht show the same
1a20: 0a 2a 2a 20 69 6e 63 6f 6e 73 69 73 74 65 6e 63  .** inconsistenc
1a30: 79 2e 20 20 54 68 65 72 65 20 69 73 20 6e 6f 20  y.  There is no 
1a40: 6c 69 74 74 6c 65 20 64 6f 75 62 74 20 69 6e 20  little doubt in 
1a50: 6d 79 20 6d 69 6e 64 20 74 68 61 74 20 70 6f 73  my mind that pos
1a60: 69 78 0a 2a 2a 20 61 64 76 69 73 6f 72 79 20 6c  ix.** advisory l
1a70: 6f 63 6b 73 20 61 6e 64 20 6c 69 6e 75 78 20 74  ocks and linux t
1a80: 68 72 65 61 64 73 20 61 72 65 20 70 72 6f 66 6f  hreads are profo
1a90: 75 6e 64 6c 79 20 62 72 6f 6b 65 6e 2e 0a 2a 2a  undly broken..**
1aa0: 0a 2a 2a 20 54 6f 20 77 6f 72 6b 20 61 72 6f 75  .** To work arou
1ab0: 6e 64 20 74 68 65 20 69 6e 63 6f 6e 73 69 73 74  nd the inconsist
1ac0: 65 6e 63 69 65 73 2c 20 77 65 20 68 61 76 65 20  encies, we have 
1ad0: 74 6f 20 74 65 73 74 20 61 74 20 72 75 6e 74 69  to test at runti
1ae0: 6d 65 20 0a 2a 2a 20 77 68 65 74 68 65 72 20 6f  me .** whether o
1af0: 72 20 6e 6f 74 20 74 68 72 65 61 64 73 20 63 61  r not threads ca
1b00: 6e 20 6f 76 65 72 72 69 64 65 20 65 61 63 68 20  n override each 
1b10: 6f 74 68 65 72 73 20 6c 6f 63 6b 73 2e 20 20 54  others locks.  T
1b20: 68 69 73 20 74 65 73 74 0a 2a 2a 20 69 73 20 72  his test.** is r
1b30: 75 6e 20 6f 6e 63 65 2c 20 74 68 65 20 66 69 72  un once, the fir
1b40: 73 74 20 74 69 6d 65 20 61 6e 79 20 6c 6f 63 6b  st time any lock
1b50: 20 69 73 20 61 74 74 65 6d 70 74 65 64 2e 20 20   is attempted.  
1b60: 41 20 73 74 61 74 69 63 20 0a 2a 2a 20 76 61 72  A static .** var
1b70: 69 61 62 6c 65 20 69 73 20 73 65 74 20 74 6f 20  iable is set to 
1b80: 72 65 63 6f 72 64 20 74 68 65 20 72 65 73 75 6c  record the resul
1b90: 74 73 20 6f 66 20 74 68 69 73 20 74 65 73 74 20  ts of this test 
1ba0: 66 6f 72 20 66 75 74 75 72 65 0a 2a 2a 20 75 73  for future.** us
1bb0: 65 2e 0a 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20  e..*/../*.** An 
1bc0: 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68 65 20  instance of the 
1bd0: 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63 74  following struct
1be0: 75 72 65 20 73 65 72 76 65 73 20 61 73 20 74 68  ure serves as th
1bf0: 65 20 6b 65 79 20 75 73 65 64 0a 2a 2a 20 74 6f  e key used.** to
1c00: 20 6c 6f 63 61 74 65 20 61 20 70 61 72 74 69 63   locate a partic
1c10: 75 6c 61 72 20 6c 6f 63 6b 49 6e 66 6f 20 73 74  ular lockInfo st
1c20: 72 75 63 74 75 72 65 20 67 69 76 65 6e 20 69 74  ructure given it
1c30: 73 20 69 6e 6f 64 65 2e 0a 2a 2a 0a 2a 2a 20 49  s inode..**.** I
1c40: 66 20 74 68 72 65 61 64 73 20 63 61 6e 6e 6f 74  f threads cannot
1c50: 20 6f 76 65 72 72 69 64 65 20 65 61 63 68 20 6f   override each o
1c60: 74 68 65 72 73 20 6c 6f 63 6b 73 2c 20 74 68 65  thers locks, the
1c70: 6e 20 77 65 20 73 65 74 20 74 68 65 0a 2a 2a 20  n we set the.** 
1c80: 6c 6f 63 6b 4b 65 79 2e 74 69 64 20 66 69 65 6c  lockKey.tid fiel
1c90: 64 20 74 6f 20 74 68 65 20 74 68 72 65 61 64 20  d to the thread 
1ca0: 49 44 2e 20 20 49 66 20 74 68 72 65 61 64 73 20  ID.  If threads 
1cb0: 63 61 6e 20 6f 76 65 72 72 69 64 65 0a 2a 2a 20  can override.** 
1cc0: 65 61 63 68 20 6f 74 68 65 72 73 20 6c 6f 63 6b  each others lock
1cd0: 73 20 74 68 65 6e 20 74 69 64 20 69 73 20 61 6c  s then tid is al
1ce0: 77 61 79 73 20 73 65 74 20 74 6f 20 7a 65 72 6f  ways set to zero
1cf0: 2e 20 20 74 69 64 20 69 73 20 61 6c 73 6f 0a 2a  .  tid is also.*
1d00: 2a 20 73 65 74 20 74 6f 20 7a 65 72 6f 20 69 66  * set to zero if
1d10: 20 77 65 20 63 6f 6d 70 69 6c 65 20 77 69 74 68   we compile with
1d20: 6f 75 74 20 74 68 72 65 61 64 69 6e 67 20 73 75  out threading su
1d30: 70 70 6f 72 74 2e 0a 2a 2f 0a 73 74 72 75 63 74  pport..*/.struct
1d40: 20 6c 6f 63 6b 4b 65 79 20 7b 0a 20 20 64 65 76   lockKey {.  dev
1d50: 5f 74 20 64 65 76 3b 20 20 20 20 20 20 20 2f 2a  _t dev;       /*
1d60: 20 44 65 76 69 63 65 20 6e 75 6d 62 65 72 20 2a   Device number *
1d70: 2f 0a 20 20 69 6e 6f 5f 74 20 69 6e 6f 3b 20 20  /.  ino_t ino;  
1d80: 20 20 20 20 20 2f 2a 20 49 6e 6f 64 65 20 6e 75       /* Inode nu
1d90: 6d 62 65 72 20 2a 2f 0a 23 69 66 64 65 66 20 53  mber */.#ifdef S
1da0: 51 4c 49 54 45 5f 55 4e 49 58 5f 54 48 52 45 41  QLITE_UNIX_THREA
1db0: 44 53 0a 20 20 70 74 68 72 65 61 64 5f 74 20 74  DS.  pthread_t t
1dc0: 69 64 3b 20 20 20 2f 2a 20 54 68 72 65 61 64 20  id;   /* Thread 
1dd0: 49 44 20 6f 72 20 7a 65 72 6f 20 69 66 20 74 68  ID or zero if th
1de0: 72 65 61 64 73 20 63 61 6e 6e 6f 74 20 6f 76 65  reads cannot ove
1df0: 72 72 69 64 65 20 65 61 63 68 20 6f 74 68 65 72  rride each other
1e00: 20 2a 2f 0a 23 65 6e 64 69 66 0a 7d 3b 0a 0a 2f   */.#endif.};../
1e10: 2a 0a 2a 2a 20 41 6e 20 69 6e 73 74 61 6e 63 65  *.** An instance
1e20: 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e   of the followin
1e30: 67 20 73 74 72 75 63 74 75 72 65 20 69 73 20 61  g structure is a
1e40: 6c 6c 6f 63 61 74 65 64 20 66 6f 72 20 65 61 63  llocated for eac
1e50: 68 20 6f 70 65 6e 0a 2a 2a 20 69 6e 6f 64 65 20  h open.** inode 
1e60: 6f 6e 20 65 61 63 68 20 74 68 72 65 61 64 20 77  on each thread w
1e70: 69 74 68 20 61 20 64 69 66 66 65 72 65 6e 74 20  ith a different 
1e80: 70 72 6f 63 65 73 73 20 49 44 2e 20 20 28 54 68  process ID.  (Th
1e90: 72 65 61 64 73 20 68 61 76 65 0a 2a 2a 20 64 69  reads have.** di
1ea0: 66 66 65 72 65 6e 74 20 70 72 6f 63 65 73 73 20  fferent process 
1eb0: 49 44 73 20 6f 6e 20 6c 69 6e 75 78 2c 20 62 75  IDs on linux, bu
1ec0: 74 20 6e 6f 74 20 6f 6e 20 6d 6f 73 74 20 6f 74  t not on most ot
1ed0: 68 65 72 20 75 6e 69 78 65 73 2e 29 0a 2a 2a 0a  her unixes.).**.
1ee0: 2a 2a 20 41 20 73 69 6e 67 6c 65 20 69 6e 6f 64  ** A single inod
1ef0: 65 20 63 61 6e 20 68 61 76 65 20 6d 75 6c 74 69  e can have multi
1f00: 70 6c 65 20 66 69 6c 65 20 64 65 73 63 72 69 70  ple file descrip
1f10: 74 6f 72 73 2c 20 73 6f 20 65 61 63 68 20 4f 73  tors, so each Os
1f20: 46 69 6c 65 0a 2a 2a 20 73 74 72 75 63 74 75 72  File.** structur
1f30: 65 20 63 6f 6e 74 61 69 6e 73 20 61 20 70 6f 69  e contains a poi
1f40: 6e 74 65 72 20 74 6f 20 61 6e 20 69 6e 73 74 61  nter to an insta
1f50: 6e 63 65 20 6f 66 20 74 68 69 73 20 6f 62 6a 65  nce of this obje
1f60: 63 74 20 61 6e 64 20 74 68 69 73 0a 2a 2a 20 6f  ct and this.** o
1f70: 62 6a 65 63 74 20 6b 65 65 70 73 20 61 20 63 6f  bject keeps a co
1f80: 75 6e 74 20 6f 66 20 74 68 65 20 6e 75 6d 62 65  unt of the numbe
1f90: 72 20 6f 66 20 4f 73 46 69 6c 65 73 20 70 6f 69  r of OsFiles poi
1fa0: 6e 74 69 6e 67 20 74 6f 20 69 74 2e 0a 2a 2f 0a  nting to it..*/.
1fb0: 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20  struct lockInfo 
1fc0: 7b 0a 20 20 73 74 72 75 63 74 20 6c 6f 63 6b 4b  {.  struct lockK
1fd0: 65 79 20 6b 65 79 3b 20 20 2f 2a 20 54 68 65 20  ey key;  /* The 
1fe0: 6c 6f 6f 6b 75 70 20 6b 65 79 20 2a 2f 0a 20 20  lookup key */.  
1ff0: 69 6e 74 20 63 6e 74 3b 20 20 20 20 20 20 20 20  int cnt;        
2000: 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f       /* Number o
2010: 66 20 53 48 41 52 45 44 20 6c 6f 63 6b 73 20 68  f SHARED locks h
2020: 65 6c 64 20 2a 2f 0a 20 20 69 6e 74 20 6c 6f 63  eld */.  int loc
2030: 6b 74 79 70 65 3b 20 20 20 20 20 20 20 20 2f 2a  ktype;        /*
2040: 20 4f 6e 65 20 6f 66 20 53 48 41 52 45 44 5f 4c   One of SHARED_L
2050: 4f 43 4b 2c 20 52 45 53 45 52 56 45 44 5f 4c 4f  OCK, RESERVED_LO
2060: 43 4b 20 65 74 63 2e 20 2a 2f 0a 20 20 69 6e 74  CK etc. */.  int
2070: 20 6e 52 65 66 3b 20 20 20 20 20 20 20 20 20 20   nRef;          
2080: 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 70    /* Number of p
2090: 6f 69 6e 74 65 72 73 20 74 6f 20 74 68 69 73 20  ointers to this 
20a0: 73 74 72 75 63 74 75 72 65 20 2a 2f 0a 7d 3b 0a  structure */.};.
20b0: 0a 2f 2a 0a 2a 2a 20 41 6e 20 69 6e 73 74 61 6e  ./*.** An instan
20c0: 63 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77  ce of the follow
20d0: 69 6e 67 20 73 74 72 75 63 74 75 72 65 20 73 65  ing structure se
20e0: 72 76 65 73 20 61 73 20 74 68 65 20 6b 65 79 20  rves as the key 
20f0: 75 73 65 64 0a 2a 2a 20 74 6f 20 6c 6f 63 61 74  used.** to locat
2100: 65 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 6f  e a particular o
2110: 70 65 6e 43 6e 74 20 73 74 72 75 63 74 75 72 65  penCnt structure
2120: 20 67 69 76 65 6e 20 69 74 73 20 69 6e 6f 64 65   given its inode
2130: 2e 20 20 54 68 69 73 0a 2a 2a 20 69 73 20 74 68  .  This.** is th
2140: 65 20 73 61 6d 65 20 61 73 20 74 68 65 20 6c 6f  e same as the lo
2150: 63 6b 4b 65 79 20 65 78 63 65 70 74 20 74 68 61  ckKey except tha
2160: 74 20 74 68 65 20 74 68 72 65 61 64 20 49 44 20  t the thread ID 
2170: 69 73 20 6f 6d 69 74 74 65 64 2e 0a 2a 2f 0a 73  is omitted..*/.s
2180: 74 72 75 63 74 20 6f 70 65 6e 4b 65 79 20 7b 0a  truct openKey {.
2190: 20 20 64 65 76 5f 74 20 64 65 76 3b 20 20 20 2f    dev_t dev;   /
21a0: 2a 20 44 65 76 69 63 65 20 6e 75 6d 62 65 72 20  * Device number 
21b0: 2a 2f 0a 20 20 69 6e 6f 5f 74 20 69 6e 6f 3b 20  */.  ino_t ino; 
21c0: 20 20 2f 2a 20 49 6e 6f 64 65 20 6e 75 6d 62 65    /* Inode numbe
21d0: 72 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 41  r */.};../*.** A
21e0: 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68  n instance of th
21f0: 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75  e following stru
2200: 63 74 75 72 65 20 69 73 20 61 6c 6c 6f 63 61 74  cture is allocat
2210: 65 64 20 66 6f 72 20 65 61 63 68 20 6f 70 65 6e  ed for each open
2220: 0a 2a 2a 20 69 6e 6f 64 65 2e 20 20 54 68 69 73  .** inode.  This
2230: 20 73 74 72 75 63 74 75 72 65 20 6b 65 65 70 73   structure keeps
2240: 20 74 72 61 63 6b 20 6f 66 20 74 68 65 20 6e 75   track of the nu
2250: 6d 62 65 72 20 6f 66 20 6c 6f 63 6b 73 20 6f 6e  mber of locks on
2260: 20 74 68 61 74 0a 2a 2a 20 69 6e 6f 64 65 2e 20   that.** inode. 
2270: 20 49 66 20 61 20 63 6c 6f 73 65 20 69 73 20 61   If a close is a
2280: 74 74 65 6d 70 74 65 64 20 61 67 61 69 6e 73 74  ttempted against
2290: 20 61 6e 20 69 6e 6f 64 65 20 74 68 61 74 20 69   an inode that i
22a0: 73 20 68 6f 6c 64 69 6e 67 0a 2a 2a 20 6c 6f 63  s holding.** loc
22b0: 6b 73 2c 20 74 68 65 20 63 6c 6f 73 65 20 69 73  ks, the close is
22c0: 20 64 65 66 65 72 72 65 64 20 75 6e 74 69 6c 20   deferred until 
22d0: 61 6c 6c 20 6c 6f 63 6b 73 20 63 6c 65 61 72 20  all locks clear 
22e0: 62 79 20 61 64 64 69 6e 67 20 74 68 65 0a 2a 2a  by adding the.**
22f0: 20 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72   file descriptor
2300: 20 74 6f 20 62 65 20 63 6c 6f 73 65 64 20 74 6f   to be closed to
2310: 20 74 68 65 20 70 65 6e 64 69 6e 67 20 6c 69 73   the pending lis
2320: 74 2e 0a 2a 2f 0a 73 74 72 75 63 74 20 6f 70 65  t..*/.struct ope
2330: 6e 43 6e 74 20 7b 0a 20 20 73 74 72 75 63 74 20  nCnt {.  struct 
2340: 6f 70 65 6e 4b 65 79 20 6b 65 79 3b 20 20 20 2f  openKey key;   /
2350: 2a 20 54 68 65 20 6c 6f 6f 6b 75 70 20 6b 65 79  * The lookup key
2360: 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65 66 3b 20   */.  int nRef; 
2370: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e              /* N
2380: 75 6d 62 65 72 20 6f 66 20 70 6f 69 6e 74 65 72  umber of pointer
2390: 73 20 74 6f 20 74 68 69 73 20 73 74 72 75 63 74  s to this struct
23a0: 75 72 65 20 2a 2f 0a 20 20 69 6e 74 20 6e 4c 6f  ure */.  int nLo
23b0: 63 6b 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f  ck;            /
23c0: 2a 20 4e 75 6d 62 65 72 20 6f 66 20 6f 75 74 73  * Number of outs
23d0: 74 61 6e 64 69 6e 67 20 6c 6f 63 6b 73 20 2a 2f  tanding locks */
23e0: 0a 20 20 69 6e 74 20 6e 50 65 6e 64 69 6e 67 3b  .  int nPending;
23f0: 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62           /* Numb
2400: 65 72 20 6f 66 20 70 65 6e 64 69 6e 67 20 63 6c  er of pending cl
2410: 6f 73 65 28 29 20 6f 70 65 72 61 74 69 6f 6e 73  ose() operations
2420: 20 2a 2f 0a 20 20 69 6e 74 20 2a 61 50 65 6e 64   */.  int *aPend
2430: 69 6e 67 3b 20 20 20 20 20 20 20 20 2f 2a 20 4d  ing;        /* M
2440: 61 6c 6c 6f 63 65 64 20 73 70 61 63 65 20 68 6f  alloced space ho
2450: 6c 64 69 6e 67 20 66 64 27 73 20 61 77 61 69 74  lding fd's await
2460: 69 6e 67 20 61 20 63 6c 6f 73 65 28 29 20 2a 2f  ing a close() */
2470: 0a 7d 3b 0a 0a 2f 2a 20 0a 2a 2a 20 54 68 65 73  .};../* .** Thes
2480: 65 20 68 61 73 68 20 74 61 62 6c 65 20 6d 61 70  e hash table map
2490: 73 20 69 6e 6f 64 65 73 20 61 6e 64 20 70 72 6f  s inodes and pro
24a0: 63 65 73 73 20 49 44 73 20 69 6e 74 6f 20 6c 6f  cess IDs into lo
24b0: 63 6b 49 6e 66 6f 20 61 6e 64 20 6f 70 65 6e 43  ckInfo and openC
24c0: 6e 74 0a 2a 2a 20 73 74 72 75 63 74 75 72 65 73  nt.** structures
24d0: 2e 20 20 41 63 63 65 73 73 20 74 6f 20 74 68 65  .  Access to the
24e0: 73 65 20 68 61 73 68 20 74 61 62 6c 65 73 20 6d  se hash tables m
24f0: 75 73 74 20 62 65 20 70 72 6f 74 65 63 74 65 64  ust be protected
2500: 20 62 79 20 61 20 6d 75 74 65 78 2e 0a 2a 2f 0a   by a mutex..*/.
2510: 73 74 61 74 69 63 20 48 61 73 68 20 6c 6f 63 6b  static Hash lock
2520: 48 61 73 68 20 3d 20 7b 20 53 51 4c 49 54 45 5f  Hash = { SQLITE_
2530: 48 41 53 48 5f 42 49 4e 41 52 59 2c 20 30 2c 20  HASH_BINARY, 0, 
2540: 30 2c 20 30 2c 20 30 2c 20 30 20 7d 3b 0a 73 74  0, 0, 0, 0 };.st
2550: 61 74 69 63 20 48 61 73 68 20 6f 70 65 6e 48 61  atic Hash openHa
2560: 73 68 20 3d 20 7b 20 53 51 4c 49 54 45 5f 48 41  sh = { SQLITE_HA
2570: 53 48 5f 42 49 4e 41 52 59 2c 20 30 2c 20 30 2c  SH_BINARY, 0, 0,
2580: 20 30 2c 20 30 2c 20 30 20 7d 3b 0a 0a 0a 23 69   0, 0, 0 };...#i
2590: 66 64 65 66 20 53 51 4c 49 54 45 5f 55 4e 49 58  fdef SQLITE_UNIX
25a0: 5f 54 48 52 45 41 44 53 0a 2f 2a 0a 2a 2a 20 54  _THREADS./*.** T
25b0: 68 69 73 20 76 61 72 69 61 62 6c 65 20 72 65 63  his variable rec
25c0: 6f 72 64 73 20 77 68 65 74 68 65 72 20 6f 72 20  ords whether or 
25d0: 6e 6f 74 20 74 68 72 65 61 64 73 20 63 61 6e 20  not threads can 
25e0: 6f 76 65 72 72 69 64 65 20 65 61 63 68 20 6f 74  override each ot
25f0: 68 65 72 73 0a 2a 2a 20 6c 6f 63 6b 73 2e 0a 2a  hers.** locks..*
2600: 2a 0a 2a 2a 20 20 20 20 30 3a 20 20 4e 6f 2e 20  *.**    0:  No. 
2610: 20 54 68 72 65 61 64 73 20 63 61 6e 6e 6f 74 20   Threads cannot 
2620: 6f 76 65 72 72 69 64 65 20 65 61 63 68 20 6f 74  override each ot
2630: 68 65 72 73 20 6c 6f 63 6b 73 2e 0a 2a 2a 20 20  hers locks..**  
2640: 20 20 31 3a 20 20 59 65 73 2e 20 20 54 68 72 65    1:  Yes.  Thre
2650: 61 64 73 20 63 61 6e 20 6f 76 65 72 72 69 64 65  ads can override
2660: 20 65 61 63 68 20 6f 74 68 65 72 73 20 6c 6f 63   each others loc
2670: 6b 73 2e 0a 2a 2a 20 20 20 2d 31 3a 20 20 57 65  ks..**   -1:  We
2680: 20 64 6f 6e 27 74 20 6b 6e 6f 77 20 79 65 74 2e   don't know yet.
2690: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 74  .*/.static int t
26a0: 68 72 65 61 64 73 4f 76 65 72 72 69 64 65 45 61  hreadsOverrideEa
26b0: 63 68 4f 74 68 65 72 73 4c 6f 63 6b 73 20 3d 20  chOthersLocks = 
26c0: 2d 31 3b 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20  -1;../*.** This 
26d0: 73 74 72 75 63 74 75 72 65 20 68 6f 6c 64 73 20  structure holds 
26e0: 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 70 61 73 73  information pass
26f0: 65 64 20 69 6e 74 6f 20 69 6e 64 69 76 69 64 75  ed into individu
2700: 61 6c 20 74 65 73 74 0a 2a 2a 20 74 68 72 65 61  al test.** threa
2710: 64 73 20 62 79 20 74 68 65 20 74 65 73 74 54 68  ds by the testTh
2720: 72 65 61 64 4c 6f 63 6b 69 6e 67 42 65 68 61 76  readLockingBehav
2730: 69 6f 72 28 29 20 72 6f 75 74 69 6e 65 2e 0a 2a  ior() routine..*
2740: 2f 0a 73 74 72 75 63 74 20 74 68 72 65 61 64 54  /.struct threadT
2750: 65 73 74 44 61 74 61 20 7b 0a 20 20 69 6e 74 20  estData {.  int 
2760: 66 64 3b 20 20 20 20 20 20 20 20 20 20 20 20 20  fd;             
2770: 20 20 20 2f 2a 20 46 69 6c 65 20 74 6f 20 62 65     /* File to be
2780: 20 6c 6f 63 6b 65 64 20 2a 2f 0a 20 20 73 74 72   locked */.  str
2790: 75 63 74 20 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 20  uct flock lock; 
27a0: 20 20 20 20 2f 2a 20 54 68 65 20 6c 6f 63 6b 69      /* The locki
27b0: 6e 67 20 6f 70 65 72 61 74 69 6f 6e 20 2a 2f 0a  ng operation */.
27c0: 20 20 69 6e 74 20 72 65 73 75 6c 74 3b 20 20 20    int result;   
27d0: 20 20 20 20 20 20 20 20 20 2f 2a 20 52 65 73 75           /* Resu
27e0: 6c 74 20 6f 66 20 74 68 65 20 6c 6f 63 6b 69 6e  lt of the lockin
27f0: 67 20 6f 70 65 72 61 74 69 6f 6e 20 2a 2f 0a 7d  g operation */.}
2800: 3b 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 74 65 73  ;../*.** The tes
2810: 74 54 68 72 65 61 64 4c 6f 63 6b 69 6e 67 42 65  tThreadLockingBe
2820: 68 61 76 69 6f 72 28 29 20 72 6f 75 74 69 6e 65  havior() routine
2830: 20 6c 61 75 6e 63 68 65 73 20 74 77 6f 20 73 65   launches two se
2840: 70 61 72 61 74 65 0a 2a 2a 20 74 68 72 65 61 64  parate.** thread
2850: 73 20 6f 6e 20 74 68 69 73 20 72 6f 75 74 69 6e  s on this routin
2860: 65 2e 20 20 54 68 69 73 20 72 6f 75 74 69 6e 65  e.  This routine
2870: 20 61 74 74 65 6d 70 74 73 20 74 6f 20 6c 6f 63   attempts to loc
2880: 6b 20 61 20 66 69 6c 65 0a 2a 2a 20 64 65 73 63  k a file.** desc
2890: 72 69 70 74 6f 72 20 74 68 65 6e 20 72 65 74 75  riptor then retu
28a0: 72 6e 73 2e 20 20 54 68 65 20 73 75 63 63 65 73  rns.  The succes
28b0: 73 20 6f 72 20 66 61 69 6c 75 72 65 20 6f 66 20  s or failure of 
28c0: 74 68 61 74 20 61 74 74 65 6d 70 74 0a 2a 2a 20  that attempt.** 
28d0: 61 6c 6c 6f 77 73 20 74 68 65 20 74 65 73 74 54  allows the testT
28e0: 68 72 65 61 64 4c 6f 63 6b 69 6e 67 42 65 68 61  hreadLockingBeha
28f0: 76 69 6f 72 28 29 20 70 72 6f 63 65 64 75 72 65  vior() procedure
2900: 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 0a 2a 2a   to determine.**
2910: 20 77 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20   whether or not 
2920: 74 68 72 65 61 64 73 20 63 61 6e 20 6f 76 65 72  threads can over
2930: 72 69 64 65 20 65 61 63 68 20 6f 74 68 65 72 73  ride each others
2940: 20 6c 6f 63 6b 73 2e 0a 2a 2f 0a 73 74 61 74 69   locks..*/.stati
2950: 63 20 76 6f 69 64 20 2a 74 68 72 65 61 64 4c 6f  c void *threadLo
2960: 63 6b 69 6e 67 54 65 73 74 28 76 6f 69 64 20 2a  ckingTest(void *
2970: 70 41 72 67 29 7b 0a 20 20 73 74 72 75 63 74 20  pArg){.  struct 
2980: 74 68 72 65 61 64 54 65 73 74 44 61 74 61 20 2a  threadTestData *
2990: 70 44 61 74 61 20 3d 20 28 73 74 72 75 63 74 20  pData = (struct 
29a0: 74 68 72 65 61 64 54 65 73 74 44 61 74 61 2a 29  threadTestData*)
29b0: 70 41 72 67 3b 0a 20 20 70 44 61 74 61 2d 3e 72  pArg;.  pData->r
29c0: 65 73 75 6c 74 20 3d 20 66 63 6e 74 6c 28 70 44  esult = fcntl(pD
29d0: 61 74 61 2d 3e 66 64 2c 20 46 5f 53 45 54 4c 4b  ata->fd, F_SETLK
29e0: 2c 20 26 70 44 61 74 61 2d 3e 6c 6f 63 6b 29 3b  , &pData->lock);
29f0: 0a 20 20 72 65 74 75 72 6e 20 70 41 72 67 3b 0a  .  return pArg;.
2a00: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 70 72  }../*.** This pr
2a10: 6f 63 65 64 75 72 65 20 61 74 74 65 6d 70 74 73  ocedure attempts
2a20: 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 77 68   to determine wh
2a30: 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 68 72  ether or not thr
2a40: 65 61 64 73 0a 2a 2a 20 63 61 6e 20 6f 76 65 72  eads.** can over
2a50: 72 69 64 65 20 65 61 63 68 20 6f 74 68 65 72 73  ride each others
2a60: 20 6c 6f 63 6b 73 20 74 68 65 6e 20 73 65 74 73   locks then sets
2a70: 20 74 68 65 20 0a 2a 2a 20 74 68 72 65 61 64 73   the .** threads
2a80: 4f 76 65 72 72 69 64 65 45 61 63 68 4f 74 68 65  OverrideEachOthe
2a90: 72 73 4c 6f 63 6b 73 20 76 61 72 69 61 62 6c 65  rsLocks variable
2aa0: 20 61 70 70 72 6f 70 72 69 61 74 65 6c 79 2e 0a   appropriately..
2ab0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 74  */.static void t
2ac0: 65 73 74 54 68 72 65 61 64 4c 6f 63 6b 69 6e 67  estThreadLocking
2ad0: 42 65 68 61 76 69 6f 72 28 66 64 5f 6f 72 69 67  Behavior(fd_orig
2ae0: 29 7b 0a 20 20 69 6e 74 20 66 64 3b 0a 20 20 73  ){.  int fd;.  s
2af0: 74 72 75 63 74 20 74 68 72 65 61 64 54 65 73 74  truct threadTest
2b00: 44 61 74 61 20 64 5b 32 5d 3b 0a 20 20 70 74 68  Data d[2];.  pth
2b10: 72 65 61 64 5f 74 20 74 5b 32 5d 3b 0a 0a 20 20  read_t t[2];..  
2b20: 66 64 20 3d 20 64 75 70 28 66 64 5f 6f 72 69 67  fd = dup(fd_orig
2b30: 29 3b 0a 20 20 69 66 28 20 66 64 3c 30 20 29 20  );.  if( fd<0 ) 
2b40: 72 65 74 75 72 6e 3b 0a 20 20 6d 65 6d 73 65 74  return;.  memset
2b50: 28 64 2c 20 30 2c 20 73 69 7a 65 6f 66 28 64 29  (d, 0, sizeof(d)
2b60: 29 3b 0a 20 20 64 5b 30 5d 2e 66 64 20 3d 20 66  );.  d[0].fd = f
2b70: 64 3b 0a 20 20 64 5b 30 5d 2e 6c 6f 63 6b 2e 6c  d;.  d[0].lock.l
2b80: 5f 74 79 70 65 20 3d 20 46 5f 52 44 4c 43 4b 3b  _type = F_RDLCK;
2b90: 0a 20 20 64 5b 30 5d 2e 6c 6f 63 6b 2e 6c 5f 6c  .  d[0].lock.l_l
2ba0: 65 6e 20 3d 20 31 3b 0a 20 20 64 5b 30 5d 2e 6c  en = 1;.  d[0].l
2bb0: 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 30 3b  ock.l_start = 0;
2bc0: 0a 20 20 64 5b 30 5d 2e 6c 6f 63 6b 2e 6c 5f 77  .  d[0].lock.l_w
2bd0: 68 65 6e 63 65 20 3d 20 53 45 45 4b 5f 53 45 54  hence = SEEK_SET
2be0: 3b 0a 20 20 64 5b 31 5d 20 3d 20 64 5b 30 5d 3b  ;.  d[1] = d[0];
2bf0: 0a 20 20 64 5b 31 5d 2e 6c 6f 63 6b 2e 6c 5f 74  .  d[1].lock.l_t
2c00: 79 70 65 20 3d 20 46 5f 57 52 4c 43 4b 3b 0a 20  ype = F_WRLCK;. 
2c10: 20 70 74 68 72 65 61 64 5f 63 72 65 61 74 65 28   pthread_create(
2c20: 26 74 5b 30 5d 2c 20 30 2c 20 74 68 72 65 61 64  &t[0], 0, thread
2c30: 4c 6f 63 6b 69 6e 67 54 65 73 74 2c 20 26 64 5b  LockingTest, &d[
2c40: 30 5d 29 3b 0a 20 20 70 74 68 72 65 61 64 5f 63  0]);.  pthread_c
2c50: 72 65 61 74 65 28 26 74 5b 31 5d 2c 20 30 2c 20  reate(&t[1], 0, 
2c60: 74 68 72 65 61 64 4c 6f 63 6b 69 6e 67 54 65 73  threadLockingTes
2c70: 74 2c 20 26 64 5b 31 5d 29 3b 0a 20 20 70 74 68  t, &d[1]);.  pth
2c80: 72 65 61 64 5f 6a 6f 69 6e 28 74 5b 30 5d 2c 20  read_join(t[0], 
2c90: 30 29 3b 0a 20 20 70 74 68 72 65 61 64 5f 6a 6f  0);.  pthread_jo
2ca0: 69 6e 28 74 5b 31 5d 2c 20 30 29 3b 0a 20 20 63  in(t[1], 0);.  c
2cb0: 6c 6f 73 65 28 66 64 29 3b 0a 20 20 74 68 72 65  lose(fd);.  thre
2cc0: 61 64 73 4f 76 65 72 72 69 64 65 45 61 63 68 4f  adsOverrideEachO
2cd0: 74 68 65 72 73 4c 6f 63 6b 73 20 3d 20 20 64 5b  thersLocks =  d[
2ce0: 30 5d 2e 72 65 73 75 6c 74 3d 3d 30 20 26 26 20  0].result==0 && 
2cf0: 64 5b 31 5d 2e 72 65 73 75 6c 74 3d 3d 30 3b 0a  d[1].result==0;.
2d00: 7d 0a 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49  }.#endif /* SQLI
2d10: 54 45 5f 55 4e 49 58 5f 54 48 52 45 41 44 53 20  TE_UNIX_THREADS 
2d20: 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 52 65 6c 65 61 73  */../*.** Releas
2d30: 65 20 61 20 6c 6f 63 6b 49 6e 66 6f 20 73 74 72  e a lockInfo str
2d40: 75 63 74 75 72 65 20 70 72 65 76 69 6f 75 73 6c  ucture previousl
2d50: 79 20 61 6c 6c 6f 63 61 74 65 64 20 62 79 20 66  y allocated by f
2d60: 69 6e 64 4c 6f 63 6b 49 6e 66 6f 28 29 2e 0a 2a  indLockInfo()..*
2d70: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72 65  /.static void re
2d80: 6c 65 61 73 65 4c 6f 63 6b 49 6e 66 6f 28 73 74  leaseLockInfo(st
2d90: 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20 2a 70  ruct lockInfo *p
2da0: 4c 6f 63 6b 29 7b 0a 20 20 70 4c 6f 63 6b 2d 3e  Lock){.  pLock->
2db0: 6e 52 65 66 2d 2d 3b 0a 20 20 69 66 28 20 70 4c  nRef--;.  if( pL
2dc0: 6f 63 6b 2d 3e 6e 52 65 66 3d 3d 30 20 29 7b 0a  ock->nRef==0 ){.
2dd0: 20 20 20 20 73 71 6c 69 74 65 33 48 61 73 68 49      sqlite3HashI
2de0: 6e 73 65 72 74 28 26 6c 6f 63 6b 48 61 73 68 2c  nsert(&lockHash,
2df0: 20 26 70 4c 6f 63 6b 2d 3e 6b 65 79 2c 20 73 69   &pLock->key, si
2e00: 7a 65 6f 66 28 70 4c 6f 63 6b 2d 3e 6b 65 79 29  zeof(pLock->key)
2e10: 2c 20 30 29 3b 0a 20 20 20 20 73 71 6c 69 74 65  , 0);.    sqlite
2e20: 46 72 65 65 28 70 4c 6f 63 6b 29 3b 0a 20 20 7d  Free(pLock);.  }
2e30: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 6c 65 61 73  .}../*.** Releas
2e40: 65 20 61 20 6f 70 65 6e 43 6e 74 20 73 74 72 75  e a openCnt stru
2e50: 63 74 75 72 65 20 70 72 65 76 69 6f 75 73 6c 79  cture previously
2e60: 20 61 6c 6c 6f 63 61 74 65 64 20 62 79 20 66 69   allocated by fi
2e70: 6e 64 4c 6f 63 6b 49 6e 66 6f 28 29 2e 0a 2a 2f  ndLockInfo()..*/
2e80: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72 65 6c  .static void rel
2e90: 65 61 73 65 4f 70 65 6e 43 6e 74 28 73 74 72 75  easeOpenCnt(stru
2ea0: 63 74 20 6f 70 65 6e 43 6e 74 20 2a 70 4f 70 65  ct openCnt *pOpe
2eb0: 6e 29 7b 0a 20 20 70 4f 70 65 6e 2d 3e 6e 52 65  n){.  pOpen->nRe
2ec0: 66 2d 2d 3b 0a 20 20 69 66 28 20 70 4f 70 65 6e  f--;.  if( pOpen
2ed0: 2d 3e 6e 52 65 66 3d 3d 30 20 29 7b 0a 20 20 20  ->nRef==0 ){.   
2ee0: 20 73 71 6c 69 74 65 33 48 61 73 68 49 6e 73 65   sqlite3HashInse
2ef0: 72 74 28 26 6f 70 65 6e 48 61 73 68 2c 20 26 70  rt(&openHash, &p
2f00: 4f 70 65 6e 2d 3e 6b 65 79 2c 20 73 69 7a 65 6f  Open->key, sizeo
2f10: 66 28 70 4f 70 65 6e 2d 3e 6b 65 79 29 2c 20 30  f(pOpen->key), 0
2f20: 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65  );.    sqliteFre
2f30: 65 28 70 4f 70 65 6e 2d 3e 61 50 65 6e 64 69 6e  e(pOpen->aPendin
2f40: 67 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 46 72  g);.    sqliteFr
2f50: 65 65 28 70 4f 70 65 6e 29 3b 0a 20 20 7d 0a 7d  ee(pOpen);.  }.}
2f60: 0a 0a 2f 2a 0a 2a 2a 20 47 69 76 65 6e 20 61 20  ../*.** Given a 
2f70: 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 2c  file descriptor,
2f80: 20 6c 6f 63 61 74 65 20 6c 6f 63 6b 49 6e 66 6f   locate lockInfo
2f90: 20 61 6e 64 20 6f 70 65 6e 43 6e 74 20 73 74 72   and openCnt str
2fa0: 75 63 74 75 72 65 73 20 74 68 61 74 0a 2a 2a 20  uctures that.** 
2fb0: 64 65 73 63 72 69 62 65 73 20 74 68 61 74 20 66  describes that f
2fc0: 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 2e 20  ile descriptor. 
2fd0: 20 43 72 65 61 74 65 20 61 20 6e 65 77 20 6f 6e   Create a new on
2fe0: 65 73 20 69 66 20 6e 65 63 65 73 73 61 72 79 2e  es if necessary.
2ff0: 20 20 54 68 65 0a 2a 2a 20 72 65 74 75 72 6e 20    The.** return 
3000: 76 61 6c 75 65 73 20 6d 69 67 68 74 20 62 65 20  values might be 
3010: 75 6e 73 65 74 20 69 66 20 61 6e 20 65 72 72 6f  unset if an erro
3020: 72 20 6f 63 63 75 72 73 2e 0a 2a 2a 0a 2a 2a 20  r occurs..**.** 
3030: 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d 62 65  Return the numbe
3040: 72 20 6f 66 20 65 72 72 6f 72 73 2e 0a 2a 2f 0a  r of errors..*/.
3050: 73 74 61 74 69 63 20 69 6e 74 20 66 69 6e 64 4c  static int findL
3060: 6f 63 6b 49 6e 66 6f 28 0a 20 20 69 6e 74 20 66  ockInfo(.  int f
3070: 64 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  d,              
3080: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 66          /* The f
3090: 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20 75  ile descriptor u
30a0: 73 65 64 20 69 6e 20 74 68 65 20 6b 65 79 20 2a  sed in the key *
30b0: 2f 0a 20 20 73 74 72 75 63 74 20 6c 6f 63 6b 49  /.  struct lockI
30c0: 6e 66 6f 20 2a 2a 70 70 4c 6f 63 6b 2c 20 20 20  nfo **ppLock,   
30d0: 20 2f 2a 20 52 65 74 75 72 6e 20 74 68 65 20 6c   /* Return the l
30e0: 6f 63 6b 49 6e 66 6f 20 73 74 72 75 63 74 75 72  ockInfo structur
30f0: 65 20 68 65 72 65 20 2a 2f 0a 20 20 73 74 72 75  e here */.  stru
3100: 63 74 20 6f 70 65 6e 43 6e 74 20 2a 2a 70 70 4f  ct openCnt **ppO
3110: 70 65 6e 20 20 20 20 20 20 2f 2a 20 52 65 74 75  pen      /* Retu
3120: 72 6e 20 74 68 65 20 6f 70 65 6e 43 6e 74 20 73  rn the openCnt s
3130: 74 72 75 63 74 75 72 65 20 68 65 72 65 20 2a 2f  tructure here */
3140: 0a 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20  .){.  int rc;.  
3150: 73 74 72 75 63 74 20 6c 6f 63 6b 4b 65 79 20 6b  struct lockKey k
3160: 65 79 31 3b 0a 20 20 73 74 72 75 63 74 20 6f 70  ey1;.  struct op
3170: 65 6e 4b 65 79 20 6b 65 79 32 3b 0a 20 20 73 74  enKey key2;.  st
3180: 72 75 63 74 20 73 74 61 74 20 73 74 61 74 62 75  ruct stat statbu
3190: 66 3b 0a 20 20 73 74 72 75 63 74 20 6c 6f 63 6b  f;.  struct lock
31a0: 49 6e 66 6f 20 2a 70 4c 6f 63 6b 3b 0a 20 20 73  Info *pLock;.  s
31b0: 74 72 75 63 74 20 6f 70 65 6e 43 6e 74 20 2a 70  truct openCnt *p
31c0: 4f 70 65 6e 3b 0a 20 20 72 63 20 3d 20 66 73 74  Open;.  rc = fst
31d0: 61 74 28 66 64 2c 20 26 73 74 61 74 62 75 66 29  at(fd, &statbuf)
31e0: 3b 0a 20 20 69 66 28 20 72 63 21 3d 30 20 29 20  ;.  if( rc!=0 ) 
31f0: 72 65 74 75 72 6e 20 31 3b 0a 20 20 6d 65 6d 73  return 1;.  mems
3200: 65 74 28 26 6b 65 79 31 2c 20 30 2c 20 73 69 7a  et(&key1, 0, siz
3210: 65 6f 66 28 6b 65 79 31 29 29 3b 0a 20 20 6b 65  eof(key1));.  ke
3220: 79 31 2e 64 65 76 20 3d 20 73 74 61 74 62 75 66  y1.dev = statbuf
3230: 2e 73 74 5f 64 65 76 3b 0a 20 20 6b 65 79 31 2e  .st_dev;.  key1.
3240: 69 6e 6f 20 3d 20 73 74 61 74 62 75 66 2e 73 74  ino = statbuf.st
3250: 5f 69 6e 6f 3b 0a 23 69 66 64 65 66 20 53 51 4c  _ino;.#ifdef SQL
3260: 49 54 45 5f 55 4e 49 58 5f 54 48 52 45 41 44 53  ITE_UNIX_THREADS
3270: 0a 20 20 69 66 28 20 74 68 72 65 61 64 73 4f 76  .  if( threadsOv
3280: 65 72 72 69 64 65 45 61 63 68 4f 74 68 65 72 73  errideEachOthers
3290: 4c 6f 63 6b 73 3c 30 20 29 7b 0a 20 20 20 20 74  Locks<0 ){.    t
32a0: 65 73 74 54 68 72 65 61 64 4c 6f 63 6b 69 6e 67  estThreadLocking
32b0: 42 65 68 61 76 69 6f 72 28 66 64 29 3b 0a 20 20  Behavior(fd);.  
32c0: 7d 0a 20 20 6b 65 79 31 2e 74 69 64 20 3d 20 74  }.  key1.tid = t
32d0: 68 72 65 61 64 73 4f 76 65 72 72 69 64 65 45 61  hreadsOverrideEa
32e0: 63 68 4f 74 68 65 72 73 4c 6f 63 6b 73 20 3f 20  chOthersLocks ? 
32f0: 30 20 3a 20 70 74 68 72 65 61 64 5f 73 65 6c 66  0 : pthread_self
3300: 28 29 3b 0a 23 65 6e 64 69 66 0a 20 20 6d 65 6d  ();.#endif.  mem
3310: 73 65 74 28 26 6b 65 79 32 2c 20 30 2c 20 73 69  set(&key2, 0, si
3320: 7a 65 6f 66 28 6b 65 79 32 29 29 3b 0a 20 20 6b  zeof(key2));.  k
3330: 65 79 32 2e 64 65 76 20 3d 20 73 74 61 74 62 75  ey2.dev = statbu
3340: 66 2e 73 74 5f 64 65 76 3b 0a 20 20 6b 65 79 32  f.st_dev;.  key2
3350: 2e 69 6e 6f 20 3d 20 73 74 61 74 62 75 66 2e 73  .ino = statbuf.s
3360: 74 5f 69 6e 6f 3b 0a 20 20 70 4c 6f 63 6b 20 3d  t_ino;.  pLock =
3370: 20 28 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66   (struct lockInf
3380: 6f 2a 29 73 71 6c 69 74 65 33 48 61 73 68 46 69  o*)sqlite3HashFi
3390: 6e 64 28 26 6c 6f 63 6b 48 61 73 68 2c 20 26 6b  nd(&lockHash, &k
33a0: 65 79 31 2c 20 73 69 7a 65 6f 66 28 6b 65 79 31  ey1, sizeof(key1
33b0: 29 29 3b 0a 20 20 69 66 28 20 70 4c 6f 63 6b 3d  ));.  if( pLock=
33c0: 3d 30 20 29 7b 0a 20 20 20 20 73 74 72 75 63 74  =0 ){.    struct
33d0: 20 6c 6f 63 6b 49 6e 66 6f 20 2a 70 4f 6c 64 3b   lockInfo *pOld;
33e0: 0a 20 20 20 20 70 4c 6f 63 6b 20 3d 20 73 71 6c  .    pLock = sql
33f0: 69 74 65 4d 61 6c 6c 6f 63 52 61 77 28 20 73 69  iteMallocRaw( si
3400: 7a 65 6f 66 28 2a 70 4c 6f 63 6b 29 20 29 3b 0a  zeof(*pLock) );.
3410: 20 20 20 20 69 66 28 20 70 4c 6f 63 6b 3d 3d 30      if( pLock==0
3420: 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20   ) return 1;.   
3430: 20 70 4c 6f 63 6b 2d 3e 6b 65 79 20 3d 20 6b 65   pLock->key = ke
3440: 79 31 3b 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e 6e  y1;.    pLock->n
3450: 52 65 66 20 3d 20 31 3b 0a 20 20 20 20 70 4c 6f  Ref = 1;.    pLo
3460: 63 6b 2d 3e 63 6e 74 20 3d 20 30 3b 0a 20 20 20  ck->cnt = 0;.   
3470: 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 79 70 65   pLock->locktype
3480: 20 3d 20 30 3b 0a 20 20 20 20 70 4f 6c 64 20 3d   = 0;.    pOld =
3490: 20 73 71 6c 69 74 65 33 48 61 73 68 49 6e 73 65   sqlite3HashInse
34a0: 72 74 28 26 6c 6f 63 6b 48 61 73 68 2c 20 26 70  rt(&lockHash, &p
34b0: 4c 6f 63 6b 2d 3e 6b 65 79 2c 20 73 69 7a 65 6f  Lock->key, sizeo
34c0: 66 28 6b 65 79 31 29 2c 20 70 4c 6f 63 6b 29 3b  f(key1), pLock);
34d0: 0a 20 20 20 20 69 66 28 20 70 4f 6c 64 21 3d 30  .    if( pOld!=0
34e0: 20 29 7b 0a 20 20 20 20 20 20 61 73 73 65 72 74   ){.      assert
34f0: 28 20 70 4f 6c 64 3d 3d 70 4c 6f 63 6b 20 29 3b  ( pOld==pLock );
3500: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 46 72 65  .      sqliteFre
3510: 65 28 70 4c 6f 63 6b 29 3b 0a 20 20 20 20 20 20  e(pLock);.      
3520: 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 7d 0a  return 1;.    }.
3530: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 70 4c 6f    }else{.    pLo
3540: 63 6b 2d 3e 6e 52 65 66 2b 2b 3b 0a 20 20 7d 0a  ck->nRef++;.  }.
3550: 20 20 2a 70 70 4c 6f 63 6b 20 3d 20 70 4c 6f 63    *ppLock = pLoc
3560: 6b 3b 0a 20 20 70 4f 70 65 6e 20 3d 20 28 73 74  k;.  pOpen = (st
3570: 72 75 63 74 20 6f 70 65 6e 43 6e 74 2a 29 73 71  ruct openCnt*)sq
3580: 6c 69 74 65 33 48 61 73 68 46 69 6e 64 28 26 6f  lite3HashFind(&o
3590: 70 65 6e 48 61 73 68 2c 20 26 6b 65 79 32 2c 20  penHash, &key2, 
35a0: 73 69 7a 65 6f 66 28 6b 65 79 32 29 29 3b 0a 20  sizeof(key2));. 
35b0: 20 69 66 28 20 70 4f 70 65 6e 3d 3d 30 20 29 7b   if( pOpen==0 ){
35c0: 0a 20 20 20 20 73 74 72 75 63 74 20 6f 70 65 6e  .    struct open
35d0: 43 6e 74 20 2a 70 4f 6c 64 3b 0a 20 20 20 20 70  Cnt *pOld;.    p
35e0: 4f 70 65 6e 20 3d 20 73 71 6c 69 74 65 4d 61 6c  Open = sqliteMal
35f0: 6c 6f 63 52 61 77 28 20 73 69 7a 65 6f 66 28 2a  locRaw( sizeof(*
3600: 70 4f 70 65 6e 29 20 29 3b 0a 20 20 20 20 69 66  pOpen) );.    if
3610: 28 20 70 4f 70 65 6e 3d 3d 30 20 29 7b 0a 20 20  ( pOpen==0 ){.  
3620: 20 20 20 20 72 65 6c 65 61 73 65 4c 6f 63 6b 49      releaseLockI
3630: 6e 66 6f 28 70 4c 6f 63 6b 29 3b 0a 20 20 20 20  nfo(pLock);.    
3640: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20    return 1;.    
3650: 7d 0a 20 20 20 20 70 4f 70 65 6e 2d 3e 6b 65 79  }.    pOpen->key
3660: 20 3d 20 6b 65 79 32 3b 0a 20 20 20 20 70 4f 70   = key2;.    pOp
3670: 65 6e 2d 3e 6e 52 65 66 20 3d 20 31 3b 0a 20 20  en->nRef = 1;.  
3680: 20 20 70 4f 70 65 6e 2d 3e 6e 4c 6f 63 6b 20 3d    pOpen->nLock =
3690: 20 30 3b 0a 20 20 20 20 70 4f 70 65 6e 2d 3e 6e   0;.    pOpen->n
36a0: 50 65 6e 64 69 6e 67 20 3d 20 30 3b 0a 20 20 20  Pending = 0;.   
36b0: 20 70 4f 70 65 6e 2d 3e 61 50 65 6e 64 69 6e 67   pOpen->aPending
36c0: 20 3d 20 30 3b 0a 20 20 20 20 70 4f 6c 64 20 3d   = 0;.    pOld =
36d0: 20 73 71 6c 69 74 65 33 48 61 73 68 49 6e 73 65   sqlite3HashInse
36e0: 72 74 28 26 6f 70 65 6e 48 61 73 68 2c 20 26 70  rt(&openHash, &p
36f0: 4f 70 65 6e 2d 3e 6b 65 79 2c 20 73 69 7a 65 6f  Open->key, sizeo
3700: 66 28 6b 65 79 32 29 2c 20 70 4f 70 65 6e 29 3b  f(key2), pOpen);
3710: 0a 20 20 20 20 69 66 28 20 70 4f 6c 64 21 3d 30  .    if( pOld!=0
3720: 20 29 7b 0a 20 20 20 20 20 20 61 73 73 65 72 74   ){.      assert
3730: 28 20 70 4f 6c 64 3d 3d 70 4f 70 65 6e 20 29 3b  ( pOld==pOpen );
3740: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 46 72 65  .      sqliteFre
3750: 65 28 70 4f 70 65 6e 29 3b 0a 20 20 20 20 20 20  e(pOpen);.      
3760: 72 65 6c 65 61 73 65 4c 6f 63 6b 49 6e 66 6f 28  releaseLockInfo(
3770: 70 4c 6f 63 6b 29 3b 0a 20 20 20 20 20 20 72 65  pLock);.      re
3780: 74 75 72 6e 20 31 3b 0a 20 20 20 20 7d 0a 20 20  turn 1;.    }.  
3790: 7d 65 6c 73 65 7b 0a 20 20 20 20 70 4f 70 65 6e  }else{.    pOpen
37a0: 2d 3e 6e 52 65 66 2b 2b 3b 0a 20 20 7d 0a 20 20  ->nRef++;.  }.  
37b0: 2a 70 70 4f 70 65 6e 20 3d 20 70 4f 70 65 6e 3b  *ppOpen = pOpen;
37c0: 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d 0a 0a  .  return 0;.}..
37d0: 2f 2a 0a 2a 2a 20 44 65 6c 65 74 65 20 74 68 65  /*.** Delete the
37e0: 20 6e 61 6d 65 64 20 66 69 6c 65 0a 2a 2f 0a 69   named file.*/.i
37f0: 6e 74 20 73 71 6c 69 74 65 33 4f 73 44 65 6c 65  nt sqlite3OsDele
3800: 74 65 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  te(const char *z
3810: 46 69 6c 65 6e 61 6d 65 29 7b 0a 20 20 75 6e 6c  Filename){.  unl
3820: 69 6e 6b 28 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a  ink(zFilename);.
3830: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
3840: 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74  OK;.}../*.** Ret
3850: 75 72 6e 20 54 52 55 45 20 69 66 20 74 68 65 20  urn TRUE if the 
3860: 6e 61 6d 65 64 20 66 69 6c 65 20 65 78 69 73 74  named file exist
3870: 73 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  s..*/.int sqlite
3880: 33 4f 73 46 69 6c 65 45 78 69 73 74 73 28 63 6f  3OsFileExists(co
3890: 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e  nst char *zFilen
38a0: 61 6d 65 29 7b 0a 20 20 72 65 74 75 72 6e 20 61  ame){.  return a
38b0: 63 63 65 73 73 28 7a 46 69 6c 65 6e 61 6d 65 2c  ccess(zFilename,
38c0: 20 30 29 3d 3d 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a   0)==0;.}../*.**
38d0: 20 41 74 74 65 6d 70 74 20 74 6f 20 6f 70 65 6e   Attempt to open
38e0: 20 61 20 66 69 6c 65 20 66 6f 72 20 62 6f 74 68   a file for both
38f0: 20 72 65 61 64 69 6e 67 20 61 6e 64 20 77 72 69   reading and wri
3900: 74 69 6e 67 2e 20 20 49 66 20 74 68 61 74 0a 2a  ting.  If that.*
3910: 2a 20 66 61 69 6c 73 2c 20 74 72 79 20 6f 70 65  * fails, try ope
3920: 6e 69 6e 67 20 69 74 20 72 65 61 64 2d 6f 6e 6c  ning it read-onl
3930: 79 2e 20 20 49 66 20 74 68 65 20 66 69 6c 65 20  y.  If the file 
3940: 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 2c 0a  does not exist,.
3950: 2a 2a 20 74 72 79 20 74 6f 20 63 72 65 61 74 65  ** try to create
3960: 20 69 74 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 73 75   it..**.** On su
3970: 63 63 65 73 73 2c 20 61 20 68 61 6e 64 6c 65 20  ccess, a handle 
3980: 66 6f 72 20 74 68 65 20 6f 70 65 6e 20 66 69 6c  for the open fil
3990: 65 20 69 73 20 77 72 69 74 74 65 6e 20 74 6f 20  e is written to 
39a0: 2a 69 64 0a 2a 2a 20 61 6e 64 20 2a 70 52 65 61  *id.** and *pRea
39b0: 64 6f 6e 6c 79 20 69 73 20 73 65 74 20 74 6f 20  donly is set to 
39c0: 30 20 69 66 20 74 68 65 20 66 69 6c 65 20 77 61  0 if the file wa
39d0: 73 20 6f 70 65 6e 65 64 20 66 6f 72 20 72 65 61  s opened for rea
39e0: 64 69 6e 67 20 61 6e 64 0a 2a 2a 20 77 72 69 74  ding and.** writ
39f0: 69 6e 67 20 6f 72 20 31 20 69 66 20 74 68 65 20  ing or 1 if the 
3a00: 66 69 6c 65 20 77 61 73 20 6f 70 65 6e 65 64 20  file was opened 
3a10: 72 65 61 64 2d 6f 6e 6c 79 2e 20 20 54 68 65 20  read-only.  The 
3a20: 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73  function returns
3a30: 0a 2a 2a 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a 2a  .** SQLITE_OK..*
3a40: 2a 0a 2a 2a 20 4f 6e 20 66 61 69 6c 75 72 65 2c  *.** On failure,
3a50: 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 72 65   the function re
3a60: 74 75 72 6e 73 20 53 51 4c 49 54 45 5f 43 41 4e  turns SQLITE_CAN
3a70: 54 4f 50 45 4e 20 61 6e 64 20 6c 65 61 76 65 73  TOPEN and leaves
3a80: 0a 2a 2a 20 2a 69 64 20 61 6e 64 20 2a 70 52 65  .** *id and *pRe
3a90: 61 64 6f 6e 6c 79 20 75 6e 63 68 61 6e 67 65 64  adonly unchanged
3aa0: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33  ..*/.int sqlite3
3ab0: 4f 73 4f 70 65 6e 52 65 61 64 57 72 69 74 65 28  OsOpenReadWrite(
3ac0: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
3ad0: 46 69 6c 65 6e 61 6d 65 2c 0a 20 20 4f 73 46 69  Filename,.  OsFi
3ae0: 6c 65 20 2a 69 64 2c 0a 20 20 69 6e 74 20 2a 70  le *id,.  int *p
3af0: 52 65 61 64 6f 6e 6c 79 0a 29 7b 0a 20 20 69 6e  Readonly.){.  in
3b00: 74 20 72 63 3b 0a 20 20 61 73 73 65 72 74 28 20  t rc;.  assert( 
3b10: 21 69 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20  !id->isOpen );. 
3b20: 20 69 64 2d 3e 64 69 72 66 64 20 3d 20 2d 31 3b   id->dirfd = -1;
3b30: 0a 20 20 69 64 2d 3e 68 20 3d 20 6f 70 65 6e 28  .  id->h = open(
3b40: 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44 57  zFilename, O_RDW
3b50: 52 7c 4f 5f 43 52 45 41 54 7c 4f 5f 4c 41 52 47  R|O_CREAT|O_LARG
3b60: 45 46 49 4c 45 7c 4f 5f 42 49 4e 41 52 59 2c 0a  EFILE|O_BINARY,.
3b70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
3b80: 20 20 20 20 20 20 20 20 20 20 53 51 4c 49 54 45            SQLITE
3b90: 5f 44 45 46 41 55 4c 54 5f 46 49 4c 45 5f 50 45  _DEFAULT_FILE_PE
3ba0: 52 4d 49 53 53 49 4f 4e 53 29 3b 0a 20 20 69 66  RMISSIONS);.  if
3bb0: 28 20 69 64 2d 3e 68 3c 30 20 29 7b 0a 23 69 66  ( id->h<0 ){.#if
3bc0: 64 65 66 20 45 49 53 44 49 52 0a 20 20 20 20 69  def EISDIR.    i
3bd0: 66 28 20 65 72 72 6e 6f 3d 3d 45 49 53 44 49 52  f( errno==EISDIR
3be0: 20 29 7b 0a 20 20 20 20 20 20 72 65 74 75 72 6e   ){.      return
3bf0: 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e   SQLITE_CANTOPEN
3c00: 3b 0a 20 20 20 20 7d 0a 23 65 6e 64 69 66 0a 20  ;.    }.#endif. 
3c10: 20 20 20 69 64 2d 3e 68 20 3d 20 6f 70 65 6e 28     id->h = open(
3c20: 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44 4f  zFilename, O_RDO
3c30: 4e 4c 59 7c 4f 5f 4c 41 52 47 45 46 49 4c 45 7c  NLY|O_LARGEFILE|
3c40: 4f 5f 42 49 4e 41 52 59 29 3b 0a 20 20 20 20 69  O_BINARY);.    i
3c50: 66 28 20 69 64 2d 3e 68 3c 30 20 29 7b 0a 20 20  f( id->h<0 ){.  
3c60: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54      return SQLIT
3c70: 45 5f 43 41 4e 54 4f 50 45 4e 3b 20 0a 20 20 20  E_CANTOPEN; .   
3c80: 20 7d 0a 20 20 20 20 2a 70 52 65 61 64 6f 6e 6c   }.    *pReadonl
3c90: 79 20 3d 20 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a  y = 1;.  }else{.
3ca0: 20 20 20 20 2a 70 52 65 61 64 6f 6e 6c 79 20 3d      *pReadonly =
3cb0: 20 30 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65   0;.  }.  sqlite
3cc0: 33 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b  3OsEnterMutex();
3cd0: 0a 20 20 72 63 20 3d 20 66 69 6e 64 4c 6f 63 6b  .  rc = findLock
3ce0: 49 6e 66 6f 28 69 64 2d 3e 68 2c 20 26 69 64 2d  Info(id->h, &id-
3cf0: 3e 70 4c 6f 63 6b 2c 20 26 69 64 2d 3e 70 4f 70  >pLock, &id->pOp
3d00: 65 6e 29 3b 0a 20 20 73 71 6c 69 74 65 33 4f 73  en);.  sqlite3Os
3d10: 4c 65 61 76 65 4d 75 74 65 78 28 29 3b 0a 20 20  LeaveMutex();.  
3d20: 69 66 28 20 72 63 20 29 7b 0a 20 20 20 20 63 6c  if( rc ){.    cl
3d30: 6f 73 65 28 69 64 2d 3e 68 29 3b 0a 20 20 20 20  ose(id->h);.    
3d40: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e 4f  return SQLITE_NO
3d50: 4d 45 4d 3b 0a 20 20 7d 0a 20 20 69 64 2d 3e 6c  MEM;.  }.  id->l
3d60: 6f 63 6b 74 79 70 65 20 3d 20 30 3b 0a 20 20 69  ocktype = 0;.  i
3d70: 64 2d 3e 69 73 4f 70 65 6e 20 3d 20 31 3b 0a 20  d->isOpen = 1;. 
3d80: 20 54 52 41 43 45 33 28 22 4f 50 45 4e 20 20 20   TRACE3("OPEN   
3d90: 20 25 2d 33 64 20 25 73 5c 6e 22 2c 20 69 64 2d   %-3d %s\n", id-
3da0: 3e 68 2c 20 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a  >h, zFilename);.
3db0: 20 20 4f 70 65 6e 43 6f 75 6e 74 65 72 28 2b 31    OpenCounter(+1
3dc0: 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49  );.  return SQLI
3dd0: 54 45 5f 4f 4b 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a  TE_OK;.}.../*.**
3de0: 20 41 74 74 65 6d 70 74 20 74 6f 20 6f 70 65 6e   Attempt to open
3df0: 20 61 20 6e 65 77 20 66 69 6c 65 20 66 6f 72 20   a new file for 
3e00: 65 78 63 6c 75 73 69 76 65 20 61 63 63 65 73 73  exclusive access
3e10: 20 62 79 20 74 68 69 73 20 70 72 6f 63 65 73 73   by this process
3e20: 2e 0a 2a 2a 20 54 68 65 20 66 69 6c 65 20 77 69  ..** The file wi
3e30: 6c 6c 20 62 65 20 6f 70 65 6e 65 64 20 66 6f 72  ll be opened for
3e40: 20 62 6f 74 68 20 72 65 61 64 69 6e 67 20 61 6e   both reading an
3e50: 64 20 77 72 69 74 69 6e 67 2e 20 20 54 6f 20 61  d writing.  To a
3e60: 76 6f 69 64 0a 2a 2a 20 61 20 70 6f 74 65 6e 74  void.** a potent
3e70: 69 61 6c 20 73 65 63 75 72 69 74 79 20 70 72 6f  ial security pro
3e80: 62 6c 65 6d 2c 20 77 65 20 64 6f 20 6e 6f 74 20  blem, we do not 
3e90: 61 6c 6c 6f 77 20 74 68 65 20 66 69 6c 65 20 74  allow the file t
3ea0: 6f 20 68 61 76 65 0a 2a 2a 20 70 72 65 76 69 6f  o have.** previo
3eb0: 75 73 6c 79 20 65 78 69 73 74 65 64 2e 20 20 4e  usly existed.  N
3ec0: 6f 72 20 64 6f 20 77 65 20 61 6c 6c 6f 77 20 74  or do we allow t
3ed0: 68 65 20 66 69 6c 65 20 74 6f 20 62 65 20 61 20  he file to be a 
3ee0: 73 79 6d 62 6f 6c 69 63 0a 2a 2a 20 6c 69 6e 6b  symbolic.** link
3ef0: 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 64 65 6c 46 6c  ..**.** If delFl
3f00: 61 67 20 69 73 20 74 72 75 65 2c 20 74 68 65 6e  ag is true, then
3f10: 20 6d 61 6b 65 20 61 72 72 61 6e 67 65 6d 65 6e   make arrangemen
3f20: 74 73 20 74 6f 20 61 75 74 6f 6d 61 74 69 63 61  ts to automatica
3f30: 6c 6c 79 20 64 65 6c 65 74 65 0a 2a 2a 20 74 68  lly delete.** th
3f40: 65 20 66 69 6c 65 20 77 68 65 6e 20 69 74 20 69  e file when it i
3f50: 73 20 63 6c 6f 73 65 64 2e 0a 2a 2a 0a 2a 2a 20  s closed..**.** 
3f60: 4f 6e 20 73 75 63 63 65 73 73 2c 20 77 72 69 74  On success, writ
3f70: 65 20 74 68 65 20 66 69 6c 65 20 68 61 6e 64 6c  e the file handl
3f80: 65 20 69 6e 74 6f 20 2a 69 64 20 61 6e 64 20 72  e into *id and r
3f90: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 2e  eturn SQLITE_OK.
3fa0: 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66 61 69 6c 75 72  .**.** On failur
3fb0: 65 2c 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  e, return SQLITE
3fc0: 5f 43 41 4e 54 4f 50 45 4e 2e 0a 2a 2f 0a 69 6e  _CANTOPEN..*/.in
3fd0: 74 20 73 71 6c 69 74 65 33 4f 73 4f 70 65 6e 45  t sqlite3OsOpenE
3fe0: 78 63 6c 75 73 69 76 65 28 63 6f 6e 73 74 20 63  xclusive(const c
3ff0: 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 2c 20  har *zFilename, 
4000: 4f 73 46 69 6c 65 20 2a 69 64 2c 20 69 6e 74 20  OsFile *id, int 
4010: 64 65 6c 46 6c 61 67 29 7b 0a 20 20 69 6e 74 20  delFlag){.  int 
4020: 72 63 3b 0a 20 20 61 73 73 65 72 74 28 20 21 69  rc;.  assert( !i
4030: 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20 69  d->isOpen );.  i
4040: 66 28 20 61 63 63 65 73 73 28 7a 46 69 6c 65 6e  f( access(zFilen
4050: 61 6d 65 2c 20 30 29 3d 3d 30 20 29 7b 0a 20 20  ame, 0)==0 ){.  
4060: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
4070: 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 20  CANTOPEN;.  }.  
4080: 69 64 2d 3e 64 69 72 66 64 20 3d 20 2d 31 3b 0a  id->dirfd = -1;.
4090: 20 20 69 64 2d 3e 68 20 3d 20 6f 70 65 6e 28 7a    id->h = open(z
40a0: 46 69 6c 65 6e 61 6d 65 2c 0a 20 20 20 20 20 20  Filename,.      
40b0: 20 20 20 20 20 20 20 20 20 20 4f 5f 52 44 57 52            O_RDWR
40c0: 7c 4f 5f 43 52 45 41 54 7c 4f 5f 45 58 43 4c 7c  |O_CREAT|O_EXCL|
40d0: 4f 5f 4e 4f 46 4f 4c 4c 4f 57 7c 4f 5f 4c 41 52  O_NOFOLLOW|O_LAR
40e0: 47 45 46 49 4c 45 7c 4f 5f 42 49 4e 41 52 59 2c  GEFILE|O_BINARY,
40f0: 20 30 36 30 30 29 3b 0a 20 20 69 66 28 20 69 64   0600);.  if( id
4100: 2d 3e 68 3c 30 20 29 7b 0a 20 20 20 20 72 65 74  ->h<0 ){.    ret
4110: 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f  urn SQLITE_CANTO
4120: 50 45 4e 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74  PEN;.  }.  sqlit
4130: 65 33 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29  e3OsEnterMutex()
4140: 3b 0a 20 20 72 63 20 3d 20 66 69 6e 64 4c 6f 63  ;.  rc = findLoc
4150: 6b 49 6e 66 6f 28 69 64 2d 3e 68 2c 20 26 69 64  kInfo(id->h, &id
4160: 2d 3e 70 4c 6f 63 6b 2c 20 26 69 64 2d 3e 70 4f  ->pLock, &id->pO
4170: 70 65 6e 29 3b 0a 20 20 73 71 6c 69 74 65 33 4f  pen);.  sqlite3O
4180: 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b 0a 20  sLeaveMutex();. 
4190: 20 69 66 28 20 72 63 20 29 7b 0a 20 20 20 20 63   if( rc ){.    c
41a0: 6c 6f 73 65 28 69 64 2d 3e 68 29 3b 0a 20 20 20  lose(id->h);.   
41b0: 20 75 6e 6c 69 6e 6b 28 7a 46 69 6c 65 6e 61 6d   unlink(zFilenam
41c0: 65 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 53  e);.    return S
41d0: 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d  QLITE_NOMEM;.  }
41e0: 0a 20 20 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 20  .  id->locktype 
41f0: 3d 20 30 3b 0a 20 20 69 64 2d 3e 69 73 4f 70 65  = 0;.  id->isOpe
4200: 6e 20 3d 20 31 3b 0a 20 20 69 66 28 20 64 65 6c  n = 1;.  if( del
4210: 46 6c 61 67 20 29 7b 0a 20 20 20 20 75 6e 6c 69  Flag ){.    unli
4220: 6e 6b 28 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20  nk(zFilename);. 
4230: 20 7d 0a 20 20 54 52 41 43 45 33 28 22 4f 50 45   }.  TRACE3("OPE
4240: 4e 2d 45 58 20 25 2d 33 64 20 25 73 5c 6e 22 2c  N-EX %-3d %s\n",
4250: 20 69 64 2d 3e 68 2c 20 7a 46 69 6c 65 6e 61 6d   id->h, zFilenam
4260: 65 29 3b 0a 20 20 4f 70 65 6e 43 6f 75 6e 74 65  e);.  OpenCounte
4270: 72 28 2b 31 29 3b 0a 20 20 72 65 74 75 72 6e 20  r(+1);.  return 
4280: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a  SQLITE_OK;.}../*
4290: 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f 20 6f  .** Attempt to o
42a0: 70 65 6e 20 61 20 6e 65 77 20 66 69 6c 65 20 66  pen a new file f
42b0: 6f 72 20 72 65 61 64 2d 6f 6e 6c 79 20 61 63 63  or read-only acc
42c0: 65 73 73 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 73 75  ess..**.** On su
42d0: 63 63 65 73 73 2c 20 77 72 69 74 65 20 74 68 65  ccess, write the
42e0: 20 66 69 6c 65 20 68 61 6e 64 6c 65 20 69 6e 74   file handle int
42f0: 6f 20 2a 69 64 20 61 6e 64 20 72 65 74 75 72 6e  o *id and return
4300: 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a 2a 2a 0a 2a   SQLITE_OK..**.*
4310: 2a 20 4f 6e 20 66 61 69 6c 75 72 65 2c 20 72 65  * On failure, re
4320: 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54  turn SQLITE_CANT
4330: 4f 50 45 4e 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c  OPEN..*/.int sql
4340: 69 74 65 33 4f 73 4f 70 65 6e 52 65 61 64 4f 6e  ite3OsOpenReadOn
4350: 6c 79 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  ly(const char *z
4360: 46 69 6c 65 6e 61 6d 65 2c 20 4f 73 46 69 6c 65  Filename, OsFile
4370: 20 2a 69 64 29 7b 0a 20 20 69 6e 74 20 72 63 3b   *id){.  int rc;
4380: 0a 20 20 61 73 73 65 72 74 28 20 21 69 64 2d 3e  .  assert( !id->
4390: 69 73 4f 70 65 6e 20 29 3b 0a 20 20 69 64 2d 3e  isOpen );.  id->
43a0: 64 69 72 66 64 20 3d 20 2d 31 3b 0a 20 20 69 64  dirfd = -1;.  id
43b0: 2d 3e 68 20 3d 20 6f 70 65 6e 28 7a 46 69 6c 65  ->h = open(zFile
43c0: 6e 61 6d 65 2c 20 4f 5f 52 44 4f 4e 4c 59 7c 4f  name, O_RDONLY|O
43d0: 5f 4c 41 52 47 45 46 49 4c 45 7c 4f 5f 42 49 4e  _LARGEFILE|O_BIN
43e0: 41 52 59 29 3b 0a 20 20 69 66 28 20 69 64 2d 3e  ARY);.  if( id->
43f0: 68 3c 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72  h<0 ){.    retur
4400: 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45  n SQLITE_CANTOPE
4410: 4e 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33  N;.  }.  sqlite3
4420: 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a  OsEnterMutex();.
4430: 20 20 72 63 20 3d 20 66 69 6e 64 4c 6f 63 6b 49    rc = findLockI
4440: 6e 66 6f 28 69 64 2d 3e 68 2c 20 26 69 64 2d 3e  nfo(id->h, &id->
4450: 70 4c 6f 63 6b 2c 20 26 69 64 2d 3e 70 4f 70 65  pLock, &id->pOpe
4460: 6e 29 3b 0a 20 20 73 71 6c 69 74 65 33 4f 73 4c  n);.  sqlite3OsL
4470: 65 61 76 65 4d 75 74 65 78 28 29 3b 0a 20 20 69  eaveMutex();.  i
4480: 66 28 20 72 63 20 29 7b 0a 20 20 20 20 63 6c 6f  f( rc ){.    clo
4490: 73 65 28 69 64 2d 3e 68 29 3b 0a 20 20 20 20 72  se(id->h);.    r
44a0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d  eturn SQLITE_NOM
44b0: 45 4d 3b 0a 20 20 7d 0a 20 20 69 64 2d 3e 6c 6f  EM;.  }.  id->lo
44c0: 63 6b 74 79 70 65 20 3d 20 30 3b 0a 20 20 69 64  cktype = 0;.  id
44d0: 2d 3e 69 73 4f 70 65 6e 20 3d 20 31 3b 0a 20 20  ->isOpen = 1;.  
44e0: 54 52 41 43 45 33 28 22 4f 50 45 4e 2d 52 4f 20  TRACE3("OPEN-RO 
44f0: 25 2d 33 64 20 25 73 5c 6e 22 2c 20 69 64 2d 3e  %-3d %s\n", id->
4500: 68 2c 20 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20  h, zFilename);. 
4510: 20 4f 70 65 6e 43 6f 75 6e 74 65 72 28 2b 31 29   OpenCounter(+1)
4520: 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  ;.  return SQLIT
4530: 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41  E_OK;.}../*.** A
4540: 74 74 65 6d 70 74 20 74 6f 20 6f 70 65 6e 20 61  ttempt to open a
4550: 20 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72   file descriptor
4560: 20 66 6f 72 20 74 68 65 20 64 69 72 65 63 74 6f   for the directo
4570: 72 79 20 74 68 61 74 20 63 6f 6e 74 61 69 6e 73  ry that contains
4580: 20 61 0a 2a 2a 20 66 69 6c 65 2e 20 20 54 68 69   a.** file.  Thi
4590: 73 20 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f  s file descripto
45a0: 72 20 63 61 6e 20 62 65 20 75 73 65 64 20 74 6f  r can be used to
45b0: 20 66 73 79 6e 63 28 29 20 74 68 65 20 64 69 72   fsync() the dir
45c0: 65 63 74 6f 72 79 0a 2a 2a 20 69 6e 20 6f 72 64  ectory.** in ord
45d0: 65 72 20 74 6f 20 6d 61 6b 65 20 73 75 72 65 20  er to make sure 
45e0: 74 68 65 20 63 72 65 61 74 69 6f 6e 20 6f 66 20  the creation of 
45f0: 61 20 6e 65 77 20 66 69 6c 65 20 69 73 20 61 63  a new file is ac
4600: 74 75 61 6c 6c 79 20 77 72 69 74 74 65 6e 0a 2a  tually written.*
4610: 2a 20 74 6f 20 64 69 73 6b 2e 0a 2a 2a 0a 2a 2a  * to disk..**.**
4620: 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73   This routine is
4630: 20 6f 6e 6c 79 20 6d 65 61 6e 69 6e 67 66 75 6c   only meaningful
4640: 20 66 6f 72 20 55 6e 69 78 2e 20 20 49 74 20 69   for Unix.  It i
4650: 73 20 61 20 6e 6f 2d 6f 70 20 75 6e 64 65 72 0a  s a no-op under.
4660: 2a 2a 20 77 69 6e 64 6f 77 73 20 73 69 6e 63 65  ** windows since
4670: 20 77 69 6e 64 6f 77 73 20 64 6f 65 73 20 6e 6f   windows does no
4680: 74 20 73 75 70 70 6f 72 74 20 68 61 72 64 20 6c  t support hard l
4690: 69 6e 6b 73 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 73  inks..**.** On s
46a0: 75 63 63 65 73 73 2c 20 61 20 68 61 6e 64 6c 65  uccess, a handle
46b0: 20 66 6f 72 20 61 20 70 72 65 76 69 6f 75 73 6c   for a previousl
46c0: 79 20 6f 70 65 6e 20 66 69 6c 65 20 69 73 20 61  y open file is a
46d0: 74 20 2a 69 64 20 69 73 0a 2a 2a 20 75 70 64 61  t *id is.** upda
46e0: 74 65 64 20 77 69 74 68 20 74 68 65 20 6e 65 77  ted with the new
46f0: 20 64 69 72 65 63 74 6f 72 79 20 66 69 6c 65 20   directory file 
4700: 64 65 73 63 72 69 70 74 6f 72 20 61 6e 64 20 53  descriptor and S
4710: 51 4c 49 54 45 5f 4f 4b 20 69 73 0a 2a 2a 20 72  QLITE_OK is.** r
4720: 65 74 75 72 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 4f  eturned..**.** O
4730: 6e 20 66 61 69 6c 75 72 65 2c 20 74 68 65 20 66  n failure, the f
4740: 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20  unction returns 
4750: 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 20  SQLITE_CANTOPEN 
4760: 61 6e 64 20 6c 65 61 76 65 73 0a 2a 2a 20 2a 69  and leaves.** *i
4770: 64 20 75 6e 63 68 61 6e 67 65 64 2e 0a 2a 2f 0a  d unchanged..*/.
4780: 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 4f 70 65  int sqlite3OsOpe
4790: 6e 44 69 72 65 63 74 6f 72 79 28 0a 20 20 63 6f  nDirectory(.  co
47a0: 6e 73 74 20 63 68 61 72 20 2a 7a 44 69 72 6e 61  nst char *zDirna
47b0: 6d 65 2c 0a 20 20 4f 73 46 69 6c 65 20 2a 69 64  me,.  OsFile *id
47c0: 0a 29 7b 0a 20 20 69 66 28 20 21 69 64 2d 3e 69  .){.  if( !id->i
47d0: 73 4f 70 65 6e 20 29 7b 0a 20 20 20 20 2f 2a 20  sOpen ){.    /* 
47e0: 44 6f 20 6e 6f 74 20 6f 70 65 6e 20 74 68 65 20  Do not open the 
47f0: 64 69 72 65 63 74 6f 72 79 20 69 66 20 74 68 65  directory if the
4800: 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 66   corresponding f
4810: 69 6c 65 20 69 73 20 6e 6f 74 20 61 6c 72 65 61  ile is not alrea
4820: 64 79 0a 20 20 20 20 2a 2a 20 6f 70 65 6e 2e 20  dy.    ** open. 
4830: 2a 2f 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51  */.    return SQ
4840: 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20  LITE_CANTOPEN;. 
4850: 20 7d 0a 20 20 61 73 73 65 72 74 28 20 69 64 2d   }.  assert( id-
4860: 3e 64 69 72 66 64 3c 30 20 29 3b 0a 20 20 69 64  >dirfd<0 );.  id
4870: 2d 3e 64 69 72 66 64 20 3d 20 6f 70 65 6e 28 7a  ->dirfd = open(z
4880: 44 69 72 6e 61 6d 65 2c 20 4f 5f 52 44 4f 4e 4c  Dirname, O_RDONL
4890: 59 7c 4f 5f 42 49 4e 41 52 59 2c 20 30 29 3b 0a  Y|O_BINARY, 0);.
48a0: 20 20 69 66 28 20 69 64 2d 3e 64 69 72 66 64 3c    if( id->dirfd<
48b0: 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20  0 ){.    return 
48c0: 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b  SQLITE_CANTOPEN;
48d0: 20 0a 20 20 7d 0a 20 20 54 52 41 43 45 33 28 22   .  }.  TRACE3("
48e0: 4f 50 45 4e 44 49 52 20 25 2d 33 64 20 25 73 5c  OPENDIR %-3d %s\
48f0: 6e 22 2c 20 69 64 2d 3e 64 69 72 66 64 2c 20 7a  n", id->dirfd, z
4900: 44 69 72 6e 61 6d 65 29 3b 0a 20 20 72 65 74 75  Dirname);.  retu
4910: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a  rn SQLITE_OK;.}.
4920: 0a 2f 2a 0a 2a 2a 20 49 66 20 74 68 65 20 66 6f  ./*.** If the fo
4930: 6c 6c 6f 77 69 6e 67 20 67 6c 6f 62 61 6c 20 76  llowing global v
4940: 61 72 69 61 62 6c 65 20 70 6f 69 6e 74 73 20 74  ariable points t
4950: 6f 20 61 20 73 74 72 69 6e 67 20 77 68 69 63 68  o a string which
4960: 20 69 73 20 74 68 65 0a 2a 2a 20 6e 61 6d 65 20   is the.** name 
4970: 6f 66 20 61 20 64 69 72 65 63 74 6f 72 79 2c 20  of a directory, 
4980: 74 68 65 6e 20 74 68 61 74 20 64 69 72 65 63 74  then that direct
4990: 6f 72 79 20 77 69 6c 6c 20 62 65 20 75 73 65 64  ory will be used
49a0: 20 74 6f 20 73 74 6f 72 65 0a 2a 2a 20 74 65 6d   to store.** tem
49b0: 70 6f 72 61 72 79 20 66 69 6c 65 73 2e 0a 2a 2f  porary files..*/
49c0: 0a 63 68 61 72 20 2a 73 71 6c 69 74 65 33 5f 74  .char *sqlite3_t
49d0: 65 6d 70 5f 64 69 72 65 63 74 6f 72 79 20 3d 20  emp_directory = 
49e0: 30 3b 0a 0a 2f 2a 0a 2a 2a 20 43 72 65 61 74 65  0;../*.** Create
49f0: 20 61 20 74 65 6d 70 6f 72 61 72 79 20 66 69 6c   a temporary fil
4a00: 65 20 6e 61 6d 65 20 69 6e 20 7a 42 75 66 2e 20  e name in zBuf. 
4a10: 20 7a 42 75 66 20 6d 75 73 74 20 62 65 20 62 69   zBuf must be bi
4a20: 67 20 65 6e 6f 75 67 68 20 74 6f 0a 2a 2a 20 68  g enough to.** h
4a30: 6f 6c 64 20 61 74 20 6c 65 61 73 74 20 53 51 4c  old at least SQL
4a40: 49 54 45 5f 54 45 4d 50 4e 41 4d 45 5f 53 49 5a  ITE_TEMPNAME_SIZ
4a50: 45 20 63 68 61 72 61 63 74 65 72 73 2e 0a 2a 2f  E characters..*/
4a60: 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 54 65  .int sqlite3OsTe
4a70: 6d 70 46 69 6c 65 4e 61 6d 65 28 63 68 61 72 20  mpFileName(char 
4a80: 2a 7a 42 75 66 29 7b 0a 20 20 73 74 61 74 69 63  *zBuf){.  static
4a90: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 61 7a 44   const char *azD
4aa0: 69 72 73 5b 5d 20 3d 20 7b 0a 20 20 20 20 20 30  irs[] = {.     0
4ab0: 2c 0a 20 20 20 20 20 22 2f 76 61 72 2f 74 6d 70  ,.     "/var/tmp
4ac0: 22 2c 0a 20 20 20 20 20 22 2f 75 73 72 2f 74 6d  ",.     "/usr/tm
4ad0: 70 22 2c 0a 20 20 20 20 20 22 2f 74 6d 70 22 2c  p",.     "/tmp",
4ae0: 0a 20 20 20 20 20 22 2e 22 2c 0a 20 20 7d 3b 0a  .     ".",.  };.
4af0: 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75    static const u
4b00: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 7a 43 68  nsigned char zCh
4b10: 61 72 73 5b 5d 20 3d 0a 20 20 20 20 22 61 62 63  ars[] =.    "abc
4b20: 64 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73  defghijklmnopqrs
4b30: 74 75 76 77 78 79 7a 22 0a 20 20 20 20 22 41 42  tuvwxyz".    "AB
4b40: 43 44 45 46 47 48 49 4a 4b 4c 4d 4e 4f 50 51 52  CDEFGHIJKLMNOPQR
4b50: 53 54 55 56 57 58 59 5a 22 0a 20 20 20 20 22 30  STUVWXYZ".    "0
4b60: 31 32 33 34 35 36 37 38 39 22 3b 0a 20 20 69 6e  123456789";.  in
4b70: 74 20 69 2c 20 6a 3b 0a 20 20 73 74 72 75 63 74  t i, j;.  struct
4b80: 20 73 74 61 74 20 62 75 66 3b 0a 20 20 63 6f 6e   stat buf;.  con
4b90: 73 74 20 63 68 61 72 20 2a 7a 44 69 72 20 3d 20  st char *zDir = 
4ba0: 22 2e 22 3b 0a 20 20 61 7a 44 69 72 73 5b 30 5d  ".";.  azDirs[0]
4bb0: 20 3d 20 73 71 6c 69 74 65 33 5f 74 65 6d 70 5f   = sqlite3_temp_
4bc0: 64 69 72 65 63 74 6f 72 79 3b 0a 20 20 66 6f 72  directory;.  for
4bd0: 28 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61  (i=0; i<sizeof(a
4be0: 7a 44 69 72 73 29 2f 73 69 7a 65 6f 66 28 61 7a  zDirs)/sizeof(az
4bf0: 44 69 72 73 5b 30 5d 29 3b 20 69 2b 2b 29 7b 0a  Dirs[0]); i++){.
4c00: 20 20 20 20 69 66 28 20 61 7a 44 69 72 73 5b 69      if( azDirs[i
4c10: 5d 3d 3d 30 20 29 20 63 6f 6e 74 69 6e 75 65 3b  ]==0 ) continue;
4c20: 0a 20 20 20 20 69 66 28 20 73 74 61 74 28 61 7a  .    if( stat(az
4c30: 44 69 72 73 5b 69 5d 2c 20 26 62 75 66 29 20 29  Dirs[i], &buf) )
4c40: 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 69   continue;.    i
4c50: 66 28 20 21 53 5f 49 53 44 49 52 28 62 75 66 2e  f( !S_ISDIR(buf.
4c60: 73 74 5f 6d 6f 64 65 29 20 29 20 63 6f 6e 74 69  st_mode) ) conti
4c70: 6e 75 65 3b 0a 20 20 20 20 69 66 28 20 61 63 63  nue;.    if( acc
4c80: 65 73 73 28 61 7a 44 69 72 73 5b 69 5d 2c 20 30  ess(azDirs[i], 0
4c90: 37 29 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20  7) ) continue;. 
4ca0: 20 20 20 7a 44 69 72 20 3d 20 61 7a 44 69 72 73     zDir = azDirs
4cb0: 5b 69 5d 3b 0a 20 20 20 20 62 72 65 61 6b 3b 0a  [i];.    break;.
4cc0: 20 20 7d 0a 20 20 64 6f 7b 0a 20 20 20 20 73 70    }.  do{.    sp
4cd0: 72 69 6e 74 66 28 7a 42 75 66 2c 20 22 25 73 2f  rintf(zBuf, "%s/
4ce0: 22 54 45 4d 50 5f 46 49 4c 45 5f 50 52 45 46 49  "TEMP_FILE_PREFI
4cf0: 58 2c 20 7a 44 69 72 29 3b 0a 20 20 20 20 6a 20  X, zDir);.    j 
4d00: 3d 20 73 74 72 6c 65 6e 28 7a 42 75 66 29 3b 0a  = strlen(zBuf);.
4d10: 20 20 20 20 73 71 6c 69 74 65 33 52 61 6e 64 6f      sqlite3Rando
4d20: 6d 6e 65 73 73 28 31 35 2c 20 26 7a 42 75 66 5b  mness(15, &zBuf[
4d30: 6a 5d 29 3b 0a 20 20 20 20 66 6f 72 28 69 3d 30  j]);.    for(i=0
4d40: 3b 20 69 3c 31 35 3b 20 69 2b 2b 2c 20 6a 2b 2b  ; i<15; i++, j++
4d50: 29 7b 0a 20 20 20 20 20 20 7a 42 75 66 5b 6a 5d  ){.      zBuf[j]
4d60: 20 3d 20 28 63 68 61 72 29 7a 43 68 61 72 73 5b   = (char)zChars[
4d70: 20 28 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72   ((unsigned char
4d80: 29 7a 42 75 66 5b 6a 5d 29 25 28 73 69 7a 65 6f  )zBuf[j])%(sizeo
4d90: 66 28 7a 43 68 61 72 73 29 2d 31 29 20 5d 3b 0a  f(zChars)-1) ];.
4da0: 20 20 20 20 7d 0a 20 20 20 20 7a 42 75 66 5b 6a      }.    zBuf[j
4db0: 5d 20 3d 20 30 3b 0a 20 20 7d 77 68 69 6c 65 28  ] = 0;.  }while(
4dc0: 20 61 63 63 65 73 73 28 7a 42 75 66 2c 30 29 3d   access(zBuf,0)=
4dd0: 3d 30 20 29 3b 0a 20 20 72 65 74 75 72 6e 20 53  =0 );.  return S
4de0: 51 4c 49 54 45 5f 4f 4b 3b 20 0a 7d 0a 0a 23 69  QLITE_OK; .}..#i
4df0: 66 6e 64 65 66 20 53 51 4c 49 54 45 5f 4f 4d 49  fndef SQLITE_OMI
4e00: 54 5f 50 41 47 45 52 5f 50 52 41 47 4d 41 53 0a  T_PAGER_PRAGMAS.
4e10: 2f 2a 0a 2a 2a 20 43 68 65 63 6b 20 74 68 61 74  /*.** Check that
4e20: 20 61 20 67 69 76 65 6e 20 70 61 74 68 6e 61 6d   a given pathnam
4e30: 65 20 69 73 20 61 20 64 69 72 65 63 74 6f 72 79  e is a directory
4e40: 20 61 6e 64 20 69 73 20 77 72 69 74 61 62 6c 65   and is writable
4e50: 20 0a 2a 2a 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69   .**.*/.int sqli
4e60: 74 65 33 4f 73 49 73 44 69 72 57 72 69 74 61 62  te3OsIsDirWritab
4e70: 6c 65 28 63 68 61 72 20 2a 7a 42 75 66 29 7b 0a  le(char *zBuf){.
4e80: 20 20 73 74 72 75 63 74 20 73 74 61 74 20 62 75    struct stat bu
4e90: 66 3b 0a 20 20 69 66 28 20 7a 42 75 66 3d 3d 30  f;.  if( zBuf==0
4ea0: 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 69   ) return 0;.  i
4eb0: 66 28 20 7a 42 75 66 5b 30 5d 3d 3d 30 20 29 20  f( zBuf[0]==0 ) 
4ec0: 72 65 74 75 72 6e 20 30 3b 0a 20 20 69 66 28 20  return 0;.  if( 
4ed0: 73 74 61 74 28 7a 42 75 66 2c 20 26 62 75 66 29  stat(zBuf, &buf)
4ee0: 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 69   ) return 0;.  i
4ef0: 66 28 20 21 53 5f 49 53 44 49 52 28 62 75 66 2e  f( !S_ISDIR(buf.
4f00: 73 74 5f 6d 6f 64 65 29 20 29 20 72 65 74 75 72  st_mode) ) retur
4f10: 6e 20 30 3b 0a 20 20 69 66 28 20 61 63 63 65 73  n 0;.  if( acces
4f20: 73 28 7a 42 75 66 2c 20 30 37 29 20 29 20 72 65  s(zBuf, 07) ) re
4f30: 74 75 72 6e 20 30 3b 0a 20 20 72 65 74 75 72 6e  turn 0;.  return
4f40: 20 31 3b 0a 7d 0a 23 65 6e 64 69 66 20 2f 2a 20   1;.}.#endif /* 
4f50: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 50 41 47 45  SQLITE_OMIT_PAGE
4f60: 52 5f 50 52 41 47 4d 41 53 20 2a 2f 0a 0a 2f 2a  R_PRAGMAS */../*
4f70: 0a 2a 2a 20 52 65 61 64 20 64 61 74 61 20 66 72  .** Read data fr
4f80: 6f 6d 20 61 20 66 69 6c 65 20 69 6e 74 6f 20 61  om a file into a
4f90: 20 62 75 66 66 65 72 2e 20 20 52 65 74 75 72 6e   buffer.  Return
4fa0: 20 53 51 4c 49 54 45 5f 4f 4b 20 69 66 20 61 6c   SQLITE_OK if al
4fb0: 6c 0a 2a 2a 20 62 79 74 65 73 20 77 65 72 65 20  l.** bytes were 
4fc0: 72 65 61 64 20 73 75 63 63 65 73 73 66 75 6c 6c  read successfull
4fd0: 79 20 61 6e 64 20 53 51 4c 49 54 45 5f 49 4f 45  y and SQLITE_IOE
4fe0: 52 52 20 69 66 20 61 6e 79 74 68 69 6e 67 20 67  RR if anything g
4ff0: 6f 65 73 0a 2a 2a 20 77 72 6f 6e 67 2e 0a 2a 2f  oes.** wrong..*/
5000: 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 52 65  .int sqlite3OsRe
5010: 61 64 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20 76  ad(OsFile *id, v
5020: 6f 69 64 20 2a 70 42 75 66 2c 20 69 6e 74 20 61  oid *pBuf, int a
5030: 6d 74 29 7b 0a 20 20 69 6e 74 20 67 6f 74 3b 0a  mt){.  int got;.
5040: 20 20 61 73 73 65 72 74 28 20 69 64 2d 3e 69 73    assert( id->is
5050: 4f 70 65 6e 20 29 3b 0a 20 20 53 69 6d 75 6c 61  Open );.  Simula
5060: 74 65 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45  teIOError(SQLITE
5070: 5f 49 4f 45 52 52 29 3b 0a 20 20 54 49 4d 45 52  _IOERR);.  TIMER
5080: 5f 53 54 41 52 54 3b 0a 20 20 67 6f 74 20 3d 20  _START;.  got = 
5090: 72 65 61 64 28 69 64 2d 3e 68 2c 20 70 42 75 66  read(id->h, pBuf
50a0: 2c 20 61 6d 74 29 3b 0a 20 20 54 49 4d 45 52 5f  , amt);.  TIMER_
50b0: 45 4e 44 3b 0a 20 20 54 52 41 43 45 35 28 22 52  END;.  TRACE5("R
50c0: 45 41 44 20 20 20 20 25 2d 33 64 20 25 35 64 20  EAD    %-3d %5d 
50d0: 25 37 64 20 25 64 5c 6e 22 2c 20 69 64 2d 3e 68  %7d %d\n", id->h
50e0: 2c 20 67 6f 74 2c 20 6c 61 73 74 5f 70 61 67 65  , got, last_page
50f0: 2c 20 54 49 4d 45 52 5f 45 4c 41 50 53 45 44 29  , TIMER_ELAPSED)
5100: 3b 0a 20 20 53 45 45 4b 28 30 29 3b 0a 20 20 2f  ;.  SEEK(0);.  /
5110: 2a 20 69 66 28 20 67 6f 74 3c 30 20 29 20 67 6f  * if( got<0 ) go
5120: 74 20 3d 20 30 3b 20 2a 2f 0a 20 20 69 66 28 20  t = 0; */.  if( 
5130: 67 6f 74 3d 3d 61 6d 74 20 29 7b 0a 20 20 20 20  got==amt ){.    
5140: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b  return SQLITE_OK
5150: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72  ;.  }else{.    r
5160: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 49 4f 45  eturn SQLITE_IOE
5170: 52 52 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a  RR;.  }.}../*.**
5180: 20 57 72 69 74 65 20 64 61 74 61 20 66 72 6f 6d   Write data from
5190: 20 61 20 62 75 66 66 65 72 20 69 6e 74 6f 20 61   a buffer into a
51a0: 20 66 69 6c 65 2e 20 20 52 65 74 75 72 6e 20 53   file.  Return S
51b0: 51 4c 49 54 45 5f 4f 4b 20 6f 6e 20 73 75 63 63  QLITE_OK on succ
51c0: 65 73 73 0a 2a 2a 20 6f 72 20 73 6f 6d 65 20 6f  ess.** or some o
51d0: 74 68 65 72 20 65 72 72 6f 72 20 63 6f 64 65 20  ther error code 
51e0: 6f 6e 20 66 61 69 6c 75 72 65 2e 0a 2a 2f 0a 69  on failure..*/.i
51f0: 6e 74 20 73 71 6c 69 74 65 33 4f 73 57 72 69 74  nt sqlite3OsWrit
5200: 65 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20 63 6f  e(OsFile *id, co
5210: 6e 73 74 20 76 6f 69 64 20 2a 70 42 75 66 2c 20  nst void *pBuf, 
5220: 69 6e 74 20 61 6d 74 29 7b 0a 20 20 69 6e 74 20  int amt){.  int 
5230: 77 72 6f 74 65 20 3d 20 30 3b 0a 20 20 61 73 73  wrote = 0;.  ass
5240: 65 72 74 28 20 69 64 2d 3e 69 73 4f 70 65 6e 20  ert( id->isOpen 
5250: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 61 6d 74  );.  assert( amt
5260: 3e 30 20 29 3b 0a 20 20 53 69 6d 75 6c 61 74 65  >0 );.  Simulate
5270: 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f 49  IOError(SQLITE_I
5280: 4f 45 52 52 29 3b 0a 20 20 53 69 6d 75 6c 61 74  OERR);.  Simulat
5290: 65 44 69 73 6b 66 75 6c 6c 45 72 72 6f 72 3b 0a  eDiskfullError;.
52a0: 20 20 54 49 4d 45 52 5f 53 54 41 52 54 3b 0a 20    TIMER_START;. 
52b0: 20 77 68 69 6c 65 28 20 61 6d 74 3e 30 20 26 26   while( amt>0 &&
52c0: 20 28 77 72 6f 74 65 20 3d 20 77 72 69 74 65 28   (wrote = write(
52d0: 69 64 2d 3e 68 2c 20 70 42 75 66 2c 20 61 6d 74  id->h, pBuf, amt
52e0: 29 29 3e 30 20 29 7b 0a 20 20 20 20 61 6d 74 20  ))>0 ){.    amt 
52f0: 2d 3d 20 77 72 6f 74 65 3b 0a 20 20 20 20 70 42  -= wrote;.    pB
5300: 75 66 20 3d 20 26 28 28 63 68 61 72 2a 29 70 42  uf = &((char*)pB
5310: 75 66 29 5b 77 72 6f 74 65 5d 3b 0a 20 20 7d 0a  uf)[wrote];.  }.
5320: 20 20 54 49 4d 45 52 5f 45 4e 44 3b 0a 20 20 54    TIMER_END;.  T
5330: 52 41 43 45 35 28 22 57 52 49 54 45 20 20 20 25  RACE5("WRITE   %
5340: 2d 33 64 20 25 35 64 20 25 37 64 20 25 64 5c 6e  -3d %5d %7d %d\n
5350: 22 2c 20 69 64 2d 3e 68 2c 20 77 72 6f 74 65 2c  ", id->h, wrote,
5360: 20 6c 61 73 74 5f 70 61 67 65 2c 20 54 49 4d 45   last_page, TIME
5370: 52 5f 45 4c 41 50 53 45 44 29 3b 0a 20 20 53 45  R_ELAPSED);.  SE
5380: 45 4b 28 30 29 3b 0a 20 20 69 66 28 20 61 6d 74  EK(0);.  if( amt
5390: 3e 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  >0 ){.    return
53a0: 20 53 51 4c 49 54 45 5f 46 55 4c 4c 3b 0a 20 20   SQLITE_FULL;.  
53b0: 7d 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  }.  return SQLIT
53c0: 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4d  E_OK;.}../*.** M
53d0: 6f 76 65 20 74 68 65 20 72 65 61 64 2f 77 72 69  ove the read/wri
53e0: 74 65 20 70 6f 69 6e 74 65 72 20 69 6e 20 61 20  te pointer in a 
53f0: 66 69 6c 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c  file..*/.int sql
5400: 69 74 65 33 4f 73 53 65 65 6b 28 4f 73 46 69 6c  ite3OsSeek(OsFil
5410: 65 20 2a 69 64 2c 20 69 36 34 20 6f 66 66 73 65  e *id, i64 offse
5420: 74 29 7b 0a 20 20 61 73 73 65 72 74 28 20 69 64  t){.  assert( id
5430: 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20 53 45  ->isOpen );.  SE
5440: 45 4b 28 6f 66 66 73 65 74 2f 31 30 32 34 20 2b  EK(offset/1024 +
5450: 20 31 29 3b 0a 20 20 6c 73 65 65 6b 28 69 64 2d   1);.  lseek(id-
5460: 3e 68 2c 20 6f 66 66 73 65 74 2c 20 53 45 45 4b  >h, offset, SEEK
5470: 5f 53 45 54 29 3b 0a 20 20 72 65 74 75 72 6e 20  _SET);.  return 
5480: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 23 69  SQLITE_OK;.}..#i
5490: 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54  fdef SQLITE_TEST
54a0: 0a 2f 2a 0a 2a 2a 20 43 6f 75 6e 74 20 74 68 65  ./*.** Count the
54b0: 20 6e 75 6d 62 65 72 20 6f 66 20 66 75 6c 6c 73   number of fulls
54c0: 79 6e 63 73 20 61 6e 64 20 6e 6f 72 6d 61 6c 20  yncs and normal 
54d0: 73 79 6e 63 73 2e 20 20 54 68 69 73 20 69 73 20  syncs.  This is 
54e0: 75 73 65 64 20 74 6f 20 74 65 73 74 0a 2a 2a 20  used to test.** 
54f0: 74 68 61 74 20 73 79 6e 63 73 20 61 6e 64 20 66  that syncs and f
5500: 75 6c 6c 73 79 6e 63 73 20 61 72 65 20 6f 63 63  ullsyncs are occ
5510: 75 72 69 6e 67 20 61 74 20 74 68 65 20 72 69 67  uring at the rig
5520: 68 74 20 74 69 6d 65 73 2e 0a 2a 2f 0a 69 6e 74  ht times..*/.int
5530: 20 73 71 6c 69 74 65 33 5f 73 79 6e 63 5f 63 6f   sqlite3_sync_co
5540: 75 6e 74 20 3d 20 30 3b 0a 69 6e 74 20 73 71 6c  unt = 0;.int sql
5550: 69 74 65 33 5f 66 75 6c 6c 73 79 6e 63 5f 63 6f  ite3_fullsync_co
5560: 75 6e 74 20 3d 20 30 3b 0a 23 65 6e 64 69 66 0a  unt = 0;.#endif.
5570: 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 66 73 79 6e  ../*.** The fsyn
5580: 63 28 29 20 73 79 73 74 65 6d 20 63 61 6c 6c 20  c() system call 
5590: 64 6f 65 73 20 6e 6f 74 20 77 6f 72 6b 20 61 73  does not work as
55a0: 20 61 64 76 65 72 74 69 73 65 64 20 6f 6e 20 6d   advertised on m
55b0: 61 6e 79 0a 2a 2a 20 75 6e 69 78 20 73 79 73 74  any.** unix syst
55c0: 65 6d 73 2e 20 20 54 68 65 20 66 6f 6c 6c 6f 77  ems.  The follow
55d0: 69 6e 67 20 70 72 6f 63 65 64 75 72 65 20 69 73  ing procedure is
55e0: 20 61 6e 20 61 74 74 65 6d 70 74 20 74 6f 20 6d   an attempt to m
55f0: 61 6b 65 0a 2a 2a 20 69 74 20 77 6f 72 6b 20 62  ake.** it work b
5600: 65 74 74 65 72 2e 0a 2a 2a 0a 2a 2a 20 54 68 65  etter..**.** The
5610: 20 53 51 4c 49 54 45 5f 4e 4f 5f 53 59 4e 43 20   SQLITE_NO_SYNC 
5620: 6d 61 63 72 6f 20 64 69 73 61 62 6c 65 73 20 61  macro disables a
5630: 6c 6c 20 66 73 79 6e 63 28 29 73 2e 20 20 54 68  ll fsync()s.  Th
5640: 69 73 20 69 73 20 75 73 65 66 75 6c 0a 2a 2a 20  is is useful.** 
5650: 66 6f 72 20 74 65 73 74 69 6e 67 20 77 68 65 6e  for testing when
5660: 20 77 65 20 77 61 6e 74 20 74 6f 20 72 75 6e 20   we want to run 
5670: 74 68 72 6f 75 67 68 20 74 68 65 20 74 65 73 74  through the test
5680: 20 73 75 69 74 65 20 71 75 69 63 6b 6c 79 2e 0a   suite quickly..
5690: 2a 2a 20 59 6f 75 20 61 72 65 20 73 74 72 6f 6e  ** You are stron
56a0: 67 6c 79 20 61 64 76 69 73 65 64 20 2a 6e 6f 74  gly advised *not
56b0: 2a 20 74 6f 20 64 65 70 6c 6f 79 20 77 69 74 68  * to deploy with
56c0: 20 53 51 4c 49 54 45 5f 4e 4f 5f 53 59 4e 43 0a   SQLITE_NO_SYNC.
56d0: 2a 2a 20 65 6e 61 62 6c 65 64 2c 20 68 6f 77 65  ** enabled, howe
56e0: 76 65 72 2c 20 73 69 6e 63 65 20 77 69 74 68 20  ver, since with 
56f0: 53 51 4c 49 54 45 5f 4e 4f 5f 53 59 4e 43 20 65  SQLITE_NO_SYNC e
5700: 6e 61 62 6c 65 64 2c 20 61 6e 20 4f 53 20 63 72  nabled, an OS cr
5710: 61 73 68 0a 2a 2a 20 6f 72 20 70 6f 77 65 72 20  ash.** or power 
5720: 66 61 69 6c 75 72 65 20 77 69 6c 6c 20 6c 69 6b  failure will lik
5730: 65 6c 79 20 63 6f 72 72 75 70 74 20 74 68 65 20  ely corrupt the 
5740: 64 61 74 61 62 61 73 65 20 66 69 6c 65 2e 0a 2a  database file..*
5750: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 66 75 6c  /.static int ful
5760: 6c 5f 66 73 79 6e 63 28 69 6e 74 20 66 64 2c 20  l_fsync(int fd, 
5770: 69 6e 74 20 66 75 6c 6c 53 79 6e 63 29 7b 0a 20  int fullSync){. 
5780: 20 69 6e 74 20 72 63 3b 0a 0a 20 20 2f 2a 20 52   int rc;..  /* R
5790: 65 63 6f 72 64 20 74 68 65 20 6e 75 6d 62 65 72  ecord the number
57a0: 20 6f 66 20 74 69 6d 65 73 20 74 68 61 74 20 77   of times that w
57b0: 65 20 64 6f 20 61 20 6e 6f 72 6d 61 6c 20 66 73  e do a normal fs
57c0: 79 6e 63 28 29 20 61 6e 64 20 0a 20 20 2a 2a 20  ync() and .  ** 
57d0: 46 55 4c 4c 53 59 4e 43 2e 20 20 54 68 69 73 20  FULLSYNC.  This 
57e0: 69 73 20 75 73 65 64 20 64 75 72 69 6e 67 20 74  is used during t
57f0: 65 73 74 69 6e 67 20 74 6f 20 76 65 72 69 66 79  esting to verify
5800: 20 74 68 61 74 20 74 68 69 73 20 70 72 6f 63 65   that this proce
5810: 64 75 72 65 0a 20 20 2a 2a 20 67 65 74 73 20 63  dure.  ** gets c
5820: 61 6c 6c 65 64 20 77 69 74 68 20 74 68 65 20 63  alled with the c
5830: 6f 72 72 65 63 74 20 61 72 67 75 6d 65 6e 74 73  orrect arguments
5840: 2e 0a 20 20 2a 2f 0a 23 69 66 64 65 66 20 53 51  ..  */.#ifdef SQ
5850: 4c 49 54 45 5f 54 45 53 54 0a 20 20 69 66 28 20  LITE_TEST.  if( 
5860: 66 75 6c 6c 53 79 6e 63 20 29 20 73 71 6c 69 74  fullSync ) sqlit
5870: 65 33 5f 66 75 6c 6c 73 79 6e 63 5f 63 6f 75 6e  e3_fullsync_coun
5880: 74 2b 2b 3b 0a 20 20 73 71 6c 69 74 65 33 5f 73  t++;.  sqlite3_s
5890: 79 6e 63 5f 63 6f 75 6e 74 2b 2b 3b 0a 23 65 6e  ync_count++;.#en
58a0: 64 69 66 0a 0a 20 20 2f 2a 20 49 66 20 77 65 20  dif..  /* If we 
58b0: 63 6f 6d 70 69 6c 65 64 20 77 69 74 68 20 74 68  compiled with th
58c0: 65 20 53 51 4c 49 54 45 5f 4e 4f 5f 53 59 4e 43  e SQLITE_NO_SYNC
58d0: 20 66 6c 61 67 2c 20 74 68 65 6e 20 73 79 6e 63   flag, then sync
58e0: 69 6e 67 20 69 73 20 61 0a 20 20 2a 2a 20 6e 6f  ing is a.  ** no
58f0: 2d 6f 70 0a 20 20 2a 2f 0a 23 69 66 64 65 66 20  -op.  */.#ifdef 
5900: 53 51 4c 49 54 45 5f 4e 4f 5f 53 59 4e 43 0a 20  SQLITE_NO_SYNC. 
5910: 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b   rc = SQLITE_OK;
5920: 0a 23 65 6c 73 65 0a 0a 23 69 66 64 65 66 20 46  .#else..#ifdef F
5930: 5f 46 55 4c 4c 46 53 59 4e 43 0a 20 20 69 66 28  _FULLFSYNC.  if(
5940: 20 66 75 6c 6c 53 79 6e 63 20 29 7b 0a 20 20 20   fullSync ){.   
5950: 20 72 63 20 3d 20 66 63 6e 74 6c 28 66 64 2c 20   rc = fcntl(fd, 
5960: 46 5f 46 55 4c 4c 46 53 59 4e 43 2c 20 30 29 3b  F_FULLFSYNC, 0);
5970: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63  .  }else{.    rc
5980: 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 2f 2a 20 49   = 1;.  }.  /* I
5990: 66 20 74 68 65 20 46 55 4c 4c 53 59 4e 43 20 66  f the FULLSYNC f
59a0: 61 69 6c 65 64 2c 20 74 72 79 20 74 6f 20 64 6f  ailed, try to do
59b0: 20 61 20 6e 6f 72 6d 61 6c 20 66 73 79 6e 63 28   a normal fsync(
59c0: 29 20 2a 2f 0a 20 20 69 66 28 20 72 63 20 29 20  ) */.  if( rc ) 
59d0: 72 63 20 3d 20 66 73 79 6e 63 28 66 64 29 3b 0a  rc = fsync(fd);.
59e0: 0a 23 65 6c 73 65 0a 20 20 72 63 20 3d 20 66 73  .#else.  rc = fs
59f0: 79 6e 63 28 66 64 29 3b 0a 23 65 6e 64 69 66 20  ync(fd);.#endif 
5a00: 2f 2a 20 64 65 66 69 6e 65 64 28 46 5f 46 55 4c  /* defined(F_FUL
5a10: 4c 46 53 59 4e 43 29 20 2a 2f 0a 23 65 6e 64 69  LFSYNC) */.#endi
5a20: 66 20 2f 2a 20 64 65 66 69 6e 65 64 28 53 51 4c  f /* defined(SQL
5a30: 49 54 45 5f 4e 4f 5f 53 59 4e 43 29 20 2a 2f 0a  ITE_NO_SYNC) */.
5a40: 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a  .  return rc;.}.
5a50: 0a 2f 2a 0a 2a 2a 20 4d 61 6b 65 20 73 75 72 65  ./*.** Make sure
5a60: 20 61 6c 6c 20 77 72 69 74 65 73 20 74 6f 20 61   all writes to a
5a70: 20 70 61 72 74 69 63 75 6c 61 72 20 66 69 6c 65   particular file
5a80: 20 61 72 65 20 63 6f 6d 6d 69 74 74 65 64 20 74   are committed t
5a90: 6f 20 64 69 73 6b 2e 0a 2a 2a 0a 2a 2a 20 55 6e  o disk..**.** Un
5aa0: 64 65 72 20 55 6e 69 78 2c 20 61 6c 73 6f 20 6d  der Unix, also m
5ab0: 61 6b 65 20 73 75 72 65 20 74 68 61 74 20 74 68  ake sure that th
5ac0: 65 20 64 69 72 65 63 74 6f 72 79 20 65 6e 74 72  e directory entr
5ad0: 79 20 66 6f 72 20 74 68 65 20 66 69 6c 65 0a 2a  y for the file.*
5ae0: 2a 20 68 61 73 20 62 65 65 6e 20 63 72 65 61 74  * has been creat
5af0: 65 64 20 62 79 20 66 73 79 6e 63 2d 69 6e 67 20  ed by fsync-ing 
5b00: 74 68 65 20 64 69 72 65 63 74 6f 72 79 20 74 68  the directory th
5b10: 61 74 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20  at contains the 
5b20: 66 69 6c 65 2e 0a 2a 2a 20 49 66 20 77 65 20 64  file..** If we d
5b30: 6f 20 6e 6f 74 20 64 6f 20 74 68 69 73 20 61 6e  o not do this an
5b40: 64 20 77 65 20 65 6e 63 6f 75 6e 74 65 72 20 61  d we encounter a
5b50: 20 70 6f 77 65 72 20 66 61 69 6c 75 72 65 2c 20   power failure, 
5b60: 74 68 65 20 64 69 72 65 63 74 6f 72 79 0a 2a 2a  the directory.**
5b70: 20 65 6e 74 72 79 20 66 6f 72 20 74 68 65 20 6a   entry for the j
5b80: 6f 75 72 6e 61 6c 20 6d 69 67 68 74 20 6e 6f 74  ournal might not
5b90: 20 65 78 69 73 74 20 61 66 74 65 72 20 77 65 20   exist after we 
5ba0: 72 65 62 6f 6f 74 2e 20 20 54 68 65 20 6e 65 78  reboot.  The nex
5bb0: 74 0a 2a 2a 20 53 51 4c 69 74 65 20 74 6f 20 61  t.** SQLite to a
5bc0: 63 63 65 73 73 20 74 68 65 20 66 69 6c 65 20 77  ccess the file w
5bd0: 69 6c 6c 20 6e 6f 74 20 6b 6e 6f 77 20 74 68 61  ill not know tha
5be0: 74 20 74 68 65 20 6a 6f 75 72 6e 61 6c 20 65 78  t the journal ex
5bf0: 69 73 74 73 20 28 62 65 63 61 75 73 65 0a 2a 2a  ists (because.**
5c00: 20 74 68 65 20 64 69 72 65 63 74 6f 72 79 20 65   the directory e
5c10: 6e 74 72 79 20 66 6f 72 20 74 68 65 20 6a 6f 75  ntry for the jou
5c20: 72 6e 61 6c 20 77 61 73 20 6e 65 76 65 72 20 63  rnal was never c
5c30: 72 65 61 74 65 64 29 20 61 6e 64 20 74 68 65 20  reated) and the 
5c40: 74 72 61 6e 73 61 63 74 69 6f 6e 0a 2a 2a 20 77  transaction.** w
5c50: 69 6c 6c 20 6e 6f 74 20 72 6f 6c 6c 20 62 61 63  ill not roll bac
5c60: 6b 20 2d 20 70 6f 73 73 69 62 6c 79 20 6c 65 61  k - possibly lea
5c70: 64 69 6e 67 20 74 6f 20 64 61 74 61 62 61 73 65  ding to database
5c80: 20 63 6f 72 72 75 70 74 69 6f 6e 2e 0a 2a 2f 0a   corruption..*/.
5c90: 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 53 79 6e  int sqlite3OsSyn
5ca0: 63 28 4f 73 46 69 6c 65 20 2a 69 64 29 7b 0a 20  c(OsFile *id){. 
5cb0: 20 61 73 73 65 72 74 28 20 69 64 2d 3e 69 73 4f   assert( id->isO
5cc0: 70 65 6e 20 29 3b 0a 20 20 53 69 6d 75 6c 61 74  pen );.  Simulat
5cd0: 65 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f  eIOError(SQLITE_
5ce0: 49 4f 45 52 52 29 3b 0a 20 20 54 52 41 43 45 32  IOERR);.  TRACE2
5cf0: 28 22 53 59 4e 43 20 20 20 20 25 2d 33 64 5c 6e  ("SYNC    %-3d\n
5d00: 22 2c 20 69 64 2d 3e 68 29 3b 0a 20 20 69 66 28  ", id->h);.  if(
5d10: 20 66 75 6c 6c 5f 66 73 79 6e 63 28 69 64 2d 3e   full_fsync(id->
5d20: 68 2c 20 69 64 2d 3e 66 75 6c 6c 53 79 6e 63 29  h, id->fullSync)
5d30: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53   ){.    return S
5d40: 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 20 20 7d  QLITE_IOERR;.  }
5d50: 0a 20 20 69 66 28 20 69 64 2d 3e 64 69 72 66 64  .  if( id->dirfd
5d60: 3e 3d 30 20 29 7b 0a 20 20 20 20 54 52 41 43 45  >=0 ){.    TRACE
5d70: 32 28 22 44 49 52 53 59 4e 43 20 25 2d 33 64 5c  2("DIRSYNC %-3d\
5d80: 6e 22 2c 20 69 64 2d 3e 64 69 72 66 64 29 3b 0a  n", id->dirfd);.
5d90: 20 20 20 20 66 75 6c 6c 5f 66 73 79 6e 63 28 69      full_fsync(i
5da0: 64 2d 3e 64 69 72 66 64 2c 20 69 64 2d 3e 66 75  d->dirfd, id->fu
5db0: 6c 6c 53 79 6e 63 29 3b 0a 20 20 20 20 63 6c 6f  llSync);.    clo
5dc0: 73 65 28 69 64 2d 3e 64 69 72 66 64 29 3b 20 20  se(id->dirfd);  
5dd0: 2f 2a 20 4f 6e 6c 79 20 6e 65 65 64 20 74 6f 20  /* Only need to 
5de0: 73 79 6e 63 20 6f 6e 63 65 2c 20 73 6f 20 63 6c  sync once, so cl
5df0: 6f 73 65 20 74 68 65 20 64 69 72 65 63 74 6f 72  ose the director
5e00: 79 20 2a 2f 0a 20 20 20 20 69 64 2d 3e 64 69 72  y */.    id->dir
5e10: 66 64 20 3d 20 2d 31 3b 20 20 20 20 2f 2a 20 77  fd = -1;    /* w
5e20: 68 65 6e 20 77 65 20 61 72 65 20 64 6f 6e 65 2e  hen we are done.
5e30: 20 2a 2f 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e   */.  }.  return
5e40: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f   SQLITE_OK;.}../
5e50: 2a 0a 2a 2a 20 53 79 6e 63 20 74 68 65 20 64 69  *.** Sync the di
5e60: 72 65 63 74 6f 72 79 20 7a 44 69 72 6e 61 6d 65  rectory zDirname
5e70: 2e 20 54 68 69 73 20 69 73 20 61 20 6e 6f 2d 6f  . This is a no-o
5e80: 70 20 6f 6e 20 6f 70 65 72 61 74 69 6e 67 20 73  p on operating s
5e90: 79 73 74 65 6d 73 20 6f 74 68 65 72 0a 2a 2a 20  ystems other.** 
5ea0: 74 68 61 6e 20 55 4e 49 58 2e 0a 2a 2a 0a 2a 2a  than UNIX..**.**
5eb0: 20 54 68 69 73 20 69 73 20 75 73 65 64 20 74 6f   This is used to
5ec0: 20 6d 61 6b 65 20 73 75 72 65 20 74 68 65 20 6d   make sure the m
5ed0: 61 73 74 65 72 20 6a 6f 75 72 6e 61 6c 20 66 69  aster journal fi
5ee0: 6c 65 20 68 61 73 20 74 72 75 65 6c 79 20 62 65  le has truely be
5ef0: 65 6e 20 64 65 6c 65 74 65 64 0a 2a 2a 20 62 65  en deleted.** be
5f00: 66 6f 72 65 20 6d 61 6b 69 6e 67 20 63 68 61 6e  fore making chan
5f10: 67 65 73 20 74 6f 20 69 6e 64 69 76 69 64 75 61  ges to individua
5f20: 6c 20 6a 6f 75 72 6e 61 6c 73 20 6f 6e 20 61 20  l journals on a 
5f30: 6d 75 6c 74 69 2d 64 61 74 61 62 61 73 65 20 63  multi-database c
5f40: 6f 6d 6d 69 74 2e 0a 2a 2a 20 54 68 65 20 46 5f  ommit..** The F_
5f50: 46 55 4c 4c 46 53 59 4e 43 20 6f 70 74 69 6f 6e  FULLFSYNC option
5f60: 20 69 73 20 6e 6f 74 20 6e 65 65 64 65 64 20 68   is not needed h
5f70: 65 72 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  ere..*/.int sqli
5f80: 74 65 33 4f 73 53 79 6e 63 44 69 72 65 63 74 6f  te3OsSyncDirecto
5f90: 72 79 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  ry(const char *z
5fa0: 44 69 72 6e 61 6d 65 29 7b 0a 20 20 69 6e 74 20  Dirname){.  int 
5fb0: 66 64 3b 0a 20 20 69 6e 74 20 72 3b 0a 20 20 53  fd;.  int r;.  S
5fc0: 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53  imulateIOError(S
5fd0: 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20  QLITE_IOERR);.  
5fe0: 66 64 20 3d 20 6f 70 65 6e 28 7a 44 69 72 6e 61  fd = open(zDirna
5ff0: 6d 65 2c 20 4f 5f 52 44 4f 4e 4c 59 7c 4f 5f 42  me, O_RDONLY|O_B
6000: 49 4e 41 52 59 2c 20 30 29 3b 0a 20 20 54 52 41  INARY, 0);.  TRA
6010: 43 45 33 28 22 44 49 52 53 59 4e 43 20 25 2d 33  CE3("DIRSYNC %-3
6020: 64 20 28 25 73 29 5c 6e 22 2c 20 66 64 2c 20 7a  d (%s)\n", fd, z
6030: 44 69 72 6e 61 6d 65 29 3b 0a 20 20 69 66 28 20  Dirname);.  if( 
6040: 66 64 3c 30 20 29 7b 0a 20 20 20 20 72 65 74 75  fd<0 ){.    retu
6050: 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50  rn SQLITE_CANTOP
6060: 45 4e 3b 20 0a 20 20 7d 0a 20 20 72 20 3d 20 66  EN; .  }.  r = f
6070: 73 79 6e 63 28 66 64 29 3b 0a 20 20 63 6c 6f 73  sync(fd);.  clos
6080: 65 28 66 64 29 3b 0a 20 20 72 65 74 75 72 6e 20  e(fd);.  return 
6090: 28 28 72 3d 3d 30 29 3f 53 51 4c 49 54 45 5f 4f  ((r==0)?SQLITE_O
60a0: 4b 3a 53 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b  K:SQLITE_IOERR);
60b0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 72 75 6e 63 61  .}../*.** Trunca
60c0: 74 65 20 61 6e 20 6f 70 65 6e 20 66 69 6c 65 20  te an open file 
60d0: 74 6f 20 61 20 73 70 65 63 69 66 69 65 64 20 73  to a specified s
60e0: 69 7a 65 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74  ize.*/.int sqlit
60f0: 65 33 4f 73 54 72 75 6e 63 61 74 65 28 4f 73 46  e3OsTruncate(OsF
6100: 69 6c 65 20 2a 69 64 2c 20 69 36 34 20 6e 42 79  ile *id, i64 nBy
6110: 74 65 29 7b 0a 20 20 61 73 73 65 72 74 28 20 69  te){.  assert( i
6120: 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20 53  d->isOpen );.  S
6130: 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53  imulateIOError(S
6140: 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20  QLITE_IOERR);.  
6150: 72 65 74 75 72 6e 20 66 74 72 75 6e 63 61 74 65  return ftruncate
6160: 28 69 64 2d 3e 68 2c 20 6e 42 79 74 65 29 3d 3d  (id->h, nByte)==
6170: 30 20 3f 20 53 51 4c 49 54 45 5f 4f 4b 20 3a 20  0 ? SQLITE_OK : 
6180: 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 7d 0a  SQLITE_IOERR;.}.
6190: 0a 2f 2a 0a 2a 2a 20 44 65 74 65 72 6d 69 6e 65  ./*.** Determine
61a0: 20 74 68 65 20 63 75 72 72 65 6e 74 20 73 69 7a   the current siz
61b0: 65 20 6f 66 20 61 20 66 69 6c 65 20 69 6e 20 62  e of a file in b
61c0: 79 74 65 73 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  ytes.*/.int sqli
61d0: 74 65 33 4f 73 46 69 6c 65 53 69 7a 65 28 4f 73  te3OsFileSize(Os
61e0: 46 69 6c 65 20 2a 69 64 2c 20 69 36 34 20 2a 70  File *id, i64 *p
61f0: 53 69 7a 65 29 7b 0a 20 20 73 74 72 75 63 74 20  Size){.  struct 
6200: 73 74 61 74 20 62 75 66 3b 0a 20 20 61 73 73 65  stat buf;.  asse
6210: 72 74 28 20 69 64 2d 3e 69 73 4f 70 65 6e 20 29  rt( id->isOpen )
6220: 3b 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f 45 72  ;.  SimulateIOEr
6230: 72 6f 72 28 53 51 4c 49 54 45 5f 49 4f 45 52 52  ror(SQLITE_IOERR
6240: 29 3b 0a 20 20 69 66 28 20 66 73 74 61 74 28 69  );.  if( fstat(i
6250: 64 2d 3e 68 2c 20 26 62 75 66 29 21 3d 30 20 29  d->h, &buf)!=0 )
6260: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c  {.    return SQL
6270: 49 54 45 5f 49 4f 45 52 52 3b 0a 20 20 7d 0a 20  ITE_IOERR;.  }. 
6280: 20 2a 70 53 69 7a 65 20 3d 20 62 75 66 2e 73 74   *pSize = buf.st
6290: 5f 73 69 7a 65 3b 0a 20 20 72 65 74 75 72 6e 20  _size;.  return 
62a0: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a  SQLITE_OK;.}../*
62b0: 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65  .** This routine
62c0: 20 63 68 65 63 6b 73 20 69 66 20 74 68 65 72 65   checks if there
62d0: 20 69 73 20 61 20 52 45 53 45 52 56 45 44 20 6c   is a RESERVED l
62e0: 6f 63 6b 20 68 65 6c 64 20 6f 6e 20 74 68 65 20  ock held on the 
62f0: 73 70 65 63 69 66 69 65 64 0a 2a 2a 20 66 69 6c  specified.** fil
6300: 65 20 62 79 20 74 68 69 73 20 6f 72 20 61 6e 79  e by this or any
6310: 20 6f 74 68 65 72 20 70 72 6f 63 65 73 73 2e 20   other process. 
6320: 49 66 20 73 75 63 68 20 61 20 6c 6f 63 6b 20 69  If such a lock i
6330: 73 20 68 65 6c 64 2c 20 72 65 74 75 72 6e 0a 2a  s held, return.*
6340: 2a 20 6e 6f 6e 2d 7a 65 72 6f 2e 20 20 49 66 20  * non-zero.  If 
6350: 74 68 65 20 66 69 6c 65 20 69 73 20 75 6e 6c 6f  the file is unlo
6360: 63 6b 65 64 20 6f 72 20 68 6f 6c 64 73 20 6f 6e  cked or holds on
6370: 6c 79 20 53 48 41 52 45 44 20 6c 6f 63 6b 73 2c  ly SHARED locks,
6380: 20 74 68 65 6e 0a 2a 2a 20 72 65 74 75 72 6e 20   then.** return 
6390: 7a 65 72 6f 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c  zero..*/.int sql
63a0: 69 74 65 33 4f 73 43 68 65 63 6b 52 65 73 65 72  ite3OsCheckReser
63b0: 76 65 64 4c 6f 63 6b 28 4f 73 46 69 6c 65 20 2a  vedLock(OsFile *
63c0: 69 64 29 7b 0a 20 20 69 6e 74 20 72 20 3d 20 30  id){.  int r = 0
63d0: 3b 0a 0a 20 20 61 73 73 65 72 74 28 20 69 64 2d  ;..  assert( id-
63e0: 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20 73 71 6c  >isOpen );.  sql
63f0: 69 74 65 33 4f 73 45 6e 74 65 72 4d 75 74 65 78  ite3OsEnterMutex
6400: 28 29 3b 20 2f 2a 20 4e 65 65 64 65 64 20 62 65  (); /* Needed be
6410: 63 61 75 73 65 20 69 64 2d 3e 70 4c 6f 63 6b 20  cause id->pLock 
6420: 69 73 20 73 68 61 72 65 64 20 61 63 72 6f 73 73  is shared across
6430: 20 74 68 72 65 61 64 73 20 2a 2f 0a 0a 20 20 2f   threads */..  /
6440: 2a 20 43 68 65 63 6b 20 69 66 20 61 20 74 68 72  * Check if a thr
6450: 65 61 64 20 69 6e 20 74 68 69 73 20 70 72 6f 63  ead in this proc
6460: 65 73 73 20 68 6f 6c 64 73 20 73 75 63 68 20 61  ess holds such a
6470: 20 6c 6f 63 6b 20 2a 2f 0a 20 20 69 66 28 20 69   lock */.  if( i
6480: 64 2d 3e 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 79  d->pLock->lockty
6490: 70 65 3e 53 48 41 52 45 44 5f 4c 4f 43 4b 20 29  pe>SHARED_LOCK )
64a0: 7b 0a 20 20 20 20 72 20 3d 20 31 3b 0a 20 20 7d  {.    r = 1;.  }
64b0: 0a 0a 20 20 2f 2a 20 4f 74 68 65 72 77 69 73 65  ..  /* Otherwise
64c0: 20 73 65 65 20 69 66 20 73 6f 6d 65 20 6f 74 68   see if some oth
64d0: 65 72 20 70 72 6f 63 65 73 73 20 68 6f 6c 64 73  er process holds
64e0: 20 69 74 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20   it..  */.  if( 
64f0: 21 72 20 29 7b 0a 20 20 20 20 73 74 72 75 63 74  !r ){.    struct
6500: 20 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 0a 20 20 20   flock lock;.   
6510: 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65 20 3d   lock.l_whence =
6520: 20 53 45 45 4b 5f 53 45 54 3b 0a 20 20 20 20 6c   SEEK_SET;.    l
6530: 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 52 45  ock.l_start = RE
6540: 53 45 52 56 45 44 5f 42 59 54 45 3b 0a 20 20 20  SERVED_BYTE;.   
6550: 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 31 3b   lock.l_len = 1;
6560: 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 74 79 70 65  .    lock.l_type
6570: 20 3d 20 46 5f 57 52 4c 43 4b 3b 0a 20 20 20 20   = F_WRLCK;.    
6580: 66 63 6e 74 6c 28 69 64 2d 3e 68 2c 20 46 5f 47  fcntl(id->h, F_G
6590: 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b 0a 20 20  ETLK, &lock);.  
65a0: 20 20 69 66 28 20 6c 6f 63 6b 2e 6c 5f 74 79 70    if( lock.l_typ
65b0: 65 21 3d 46 5f 55 4e 4c 43 4b 20 29 7b 0a 20 20  e!=F_UNLCK ){.  
65c0: 20 20 20 20 72 20 3d 20 31 3b 0a 20 20 20 20 7d      r = 1;.    }
65d0: 0a 20 20 7d 0a 20 20 0a 20 20 73 71 6c 69 74 65  .  }.  .  sqlite
65e0: 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b  3OsLeaveMutex();
65f0: 0a 20 20 54 52 41 43 45 33 28 22 54 45 53 54 20  .  TRACE3("TEST 
6600: 57 52 2d 4c 4f 43 4b 20 25 64 20 25 64 5c 6e 22  WR-LOCK %d %d\n"
6610: 2c 20 69 64 2d 3e 68 2c 20 72 29 3b 0a 0a 20 20  , id->h, r);..  
6620: 72 65 74 75 72 6e 20 72 3b 0a 7d 0a 0a 23 69 66  return r;.}..#if
6630: 64 65 66 20 53 51 4c 49 54 45 5f 44 45 42 55 47  def SQLITE_DEBUG
6640: 0a 2f 2a 0a 2a 2a 20 48 65 6c 70 65 72 20 66 75  ./*.** Helper fu
6650: 6e 63 74 69 6f 6e 20 66 6f 72 20 70 72 69 6e 74  nction for print
6660: 69 6e 67 20 6f 75 74 20 74 72 61 63 65 20 69 6e  ing out trace in
6670: 66 6f 72 6d 61 74 69 6f 6e 20 66 72 6f 6d 20 64  formation from d
6680: 65 62 75 67 67 69 6e 67 0a 2a 2a 20 62 69 6e 61  ebugging.** bina
6690: 72 69 65 73 2e 20 54 68 69 73 20 72 65 74 75 72  ries. This retur
66a0: 6e 73 20 74 68 65 20 73 74 72 69 6e 67 20 72 65  ns the string re
66b0: 70 72 65 73 65 74 61 74 69 6f 6e 20 6f 66 20 74  presetation of t
66c0: 68 65 20 73 75 70 70 6c 69 65 64 0a 2a 2a 20 69  he supplied.** i
66d0: 6e 74 65 67 65 72 20 6c 6f 63 6b 2d 74 79 70 65  nteger lock-type
66e0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 63 6f 6e 73  ..*/.static cons
66f0: 74 20 63 68 61 72 20 2a 20 6c 6f 63 6b 74 79 70  t char * locktyp
6700: 65 4e 61 6d 65 28 69 6e 74 20 6c 6f 63 6b 74 79  eName(int lockty
6710: 70 65 29 7b 0a 20 20 73 77 69 74 63 68 28 20 6c  pe){.  switch( l
6720: 6f 63 6b 74 79 70 65 20 29 7b 0a 20 20 63 61 73  ocktype ){.  cas
6730: 65 20 4e 4f 5f 4c 4f 43 4b 3a 20 72 65 74 75 72  e NO_LOCK: retur
6740: 6e 20 22 4e 4f 4e 45 22 3b 0a 20 20 63 61 73 65  n "NONE";.  case
6750: 20 53 48 41 52 45 44 5f 4c 4f 43 4b 3a 20 72 65   SHARED_LOCK: re
6760: 74 75 72 6e 20 22 53 48 41 52 45 44 22 3b 0a 20  turn "SHARED";. 
6770: 20 63 61 73 65 20 52 45 53 45 52 56 45 44 5f 4c   case RESERVED_L
6780: 4f 43 4b 3a 20 72 65 74 75 72 6e 20 22 52 45 53  OCK: return "RES
6790: 45 52 56 45 44 22 3b 0a 20 20 63 61 73 65 20 50  ERVED";.  case P
67a0: 45 4e 44 49 4e 47 5f 4c 4f 43 4b 3a 20 72 65 74  ENDING_LOCK: ret
67b0: 75 72 6e 20 22 50 45 4e 44 49 4e 47 22 3b 0a 20  urn "PENDING";. 
67c0: 20 63 61 73 65 20 45 58 43 4c 55 53 49 56 45 5f   case EXCLUSIVE_
67d0: 4c 4f 43 4b 3a 20 72 65 74 75 72 6e 20 22 45 58  LOCK: return "EX
67e0: 43 4c 55 53 49 56 45 22 3b 0a 20 20 7d 0a 20 20  CLUSIVE";.  }.  
67f0: 72 65 74 75 72 6e 20 22 45 52 52 4f 52 22 3b 0a  return "ERROR";.
6800: 7d 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20  }.#endif../*.** 
6810: 4c 6f 63 6b 20 74 68 65 20 66 69 6c 65 20 77 69  Lock the file wi
6820: 74 68 20 74 68 65 20 6c 6f 63 6b 20 73 70 65 63  th the lock spec
6830: 69 66 69 65 64 20 62 79 20 70 61 72 61 6d 65 74  ified by paramet
6840: 65 72 20 6c 6f 63 6b 74 79 70 65 20 2d 20 6f 6e  er locktype - on
6850: 65 0a 2a 2a 20 6f 66 20 74 68 65 20 66 6f 6c 6c  e.** of the foll
6860: 6f 77 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20  owing:.**.**    
6870: 20 28 31 29 20 53 48 41 52 45 44 5f 4c 4f 43 4b   (1) SHARED_LOCK
6880: 0a 2a 2a 20 20 20 20 20 28 32 29 20 52 45 53 45  .**     (2) RESE
6890: 52 56 45 44 5f 4c 4f 43 4b 0a 2a 2a 20 20 20 20  RVED_LOCK.**    
68a0: 20 28 33 29 20 50 45 4e 44 49 4e 47 5f 4c 4f 43   (3) PENDING_LOC
68b0: 4b 0a 2a 2a 20 20 20 20 20 28 34 29 20 45 58 43  K.**     (4) EXC
68c0: 4c 55 53 49 56 45 5f 4c 4f 43 4b 0a 2a 2a 0a 2a  LUSIVE_LOCK.**.*
68d0: 2a 20 53 6f 6d 65 74 69 6d 65 73 20 77 68 65 6e  * Sometimes when
68e0: 20 72 65 71 75 65 73 74 69 6e 67 20 6f 6e 65 20   requesting one 
68f0: 6c 6f 63 6b 20 73 74 61 74 65 2c 20 61 64 64 69  lock state, addi
6900: 74 69 6f 6e 61 6c 20 6c 6f 63 6b 20 73 74 61 74  tional lock stat
6910: 65 73 0a 2a 2a 20 61 72 65 20 69 6e 73 65 72 74  es.** are insert
6920: 65 64 20 69 6e 20 62 65 74 77 65 65 6e 2e 20 20  ed in between.  
6930: 54 68 65 20 6c 6f 63 6b 69 6e 67 20 6d 69 67 68  The locking migh
6940: 74 20 66 61 69 6c 20 6f 6e 20 6f 6e 65 20 6f 66  t fail on one of
6950: 20 74 68 65 20 6c 61 74 65 72 0a 2a 2a 20 74 72   the later.** tr
6960: 61 6e 73 69 74 69 6f 6e 73 20 6c 65 61 76 69 6e  ansitions leavin
6970: 67 20 74 68 65 20 6c 6f 63 6b 20 73 74 61 74 65  g the lock state
6980: 20 64 69 66 66 65 72 65 6e 74 20 66 72 6f 6d 20   different from 
6990: 77 68 61 74 20 69 74 20 73 74 61 72 74 65 64 20  what it started 
69a0: 62 75 74 0a 2a 2a 20 73 74 69 6c 6c 20 73 68 6f  but.** still sho
69b0: 72 74 20 6f 66 20 69 74 73 20 67 6f 61 6c 2e 20  rt of its goal. 
69c0: 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 63   The following c
69d0: 68 61 72 74 20 73 68 6f 77 73 20 74 68 65 20 61  hart shows the a
69e0: 6c 6c 6f 77 65 64 0a 2a 2a 20 74 72 61 6e 73 69  llowed.** transi
69f0: 74 69 6f 6e 73 20 61 6e 64 20 74 68 65 20 69 6e  tions and the in
6a00: 73 65 72 74 65 64 20 69 6e 74 65 72 6d 65 64 69  serted intermedi
6a10: 61 74 65 20 73 74 61 74 65 73 3a 0a 2a 2a 0a 2a  ate states:.**.*
6a20: 2a 20 20 20 20 55 4e 4c 4f 43 4b 45 44 20 2d 3e  *    UNLOCKED ->
6a30: 20 53 48 41 52 45 44 0a 2a 2a 20 20 20 20 53 48   SHARED.**    SH
6a40: 41 52 45 44 20 2d 3e 20 52 45 53 45 52 56 45 44  ARED -> RESERVED
6a50: 0a 2a 2a 20 20 20 20 53 48 41 52 45 44 20 2d 3e  .**    SHARED ->
6a60: 20 28 50 45 4e 44 49 4e 47 29 20 2d 3e 20 45 58   (PENDING) -> EX
6a70: 43 4c 55 53 49 56 45 0a 2a 2a 20 20 20 20 52 45  CLUSIVE.**    RE
6a80: 53 45 52 56 45 44 20 2d 3e 20 28 50 45 4e 44 49  SERVED -> (PENDI
6a90: 4e 47 29 20 2d 3e 20 45 58 43 4c 55 53 49 56 45  NG) -> EXCLUSIVE
6aa0: 0a 2a 2a 20 20 20 20 50 45 4e 44 49 4e 47 20 2d  .**    PENDING -
6ab0: 3e 20 45 58 43 4c 55 53 49 56 45 0a 2a 2a 0a 2a  > EXCLUSIVE.**.*
6ac0: 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 77  * This routine w
6ad0: 69 6c 6c 20 6f 6e 6c 79 20 69 6e 63 72 65 61 73  ill only increas
6ae0: 65 20 61 20 6c 6f 63 6b 2e 20 20 55 73 65 20 74  e a lock.  Use t
6af0: 68 65 20 73 71 6c 69 74 65 33 4f 73 55 6e 6c 6f  he sqlite3OsUnlo
6b00: 63 6b 28 29 0a 2a 2a 20 72 6f 75 74 69 6e 65 20  ck().** routine 
6b10: 74 6f 20 6c 6f 77 65 72 20 61 20 6c 6f 63 6b 69  to lower a locki
6b20: 6e 67 20 6c 65 76 65 6c 2e 0a 2a 2f 0a 69 6e 74  ng level..*/.int
6b30: 20 73 71 6c 69 74 65 33 4f 73 4c 6f 63 6b 28 4f   sqlite3OsLock(O
6b40: 73 46 69 6c 65 20 2a 69 64 2c 20 69 6e 74 20 6c  sFile *id, int l
6b50: 6f 63 6b 74 79 70 65 29 7b 0a 20 20 2f 2a 20 54  ocktype){.  /* T
6b60: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 64 65 73  he following des
6b70: 63 72 69 62 65 73 20 74 68 65 20 69 6d 70 6c 65  cribes the imple
6b80: 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65  mentation of the
6b90: 20 76 61 72 69 6f 75 73 20 6c 6f 63 6b 73 20 61   various locks a
6ba0: 6e 64 0a 20 20 2a 2a 20 6c 6f 63 6b 20 74 72 61  nd.  ** lock tra
6bb0: 6e 73 69 74 69 6f 6e 73 20 69 6e 20 74 65 72 6d  nsitions in term
6bc0: 73 20 6f 66 20 74 68 65 20 50 4f 53 49 58 20 61  s of the POSIX a
6bd0: 64 76 69 73 6f 72 79 20 73 68 61 72 65 64 20 61  dvisory shared a
6be0: 6e 64 20 65 78 63 6c 75 73 69 76 65 0a 20 20 2a  nd exclusive.  *
6bf0: 2a 20 6c 6f 63 6b 20 70 72 69 6d 69 74 69 76 65  * lock primitive
6c00: 73 20 28 63 61 6c 6c 65 64 20 72 65 61 64 2d 6c  s (called read-l
6c10: 6f 63 6b 73 20 61 6e 64 20 77 72 69 74 65 2d 6c  ocks and write-l
6c20: 6f 63 6b 73 20 62 65 6c 6f 77 2c 20 74 6f 20 61  ocks below, to a
6c30: 76 6f 69 64 0a 20 20 2a 2a 20 63 6f 6e 66 75 73  void.  ** confus
6c40: 69 6f 6e 20 77 69 74 68 20 53 51 4c 69 74 65 20  ion with SQLite 
6c50: 6c 6f 63 6b 20 6e 61 6d 65 73 29 2e 20 54 68 65  lock names). The
6c60: 20 61 6c 67 6f 72 69 74 68 6d 73 20 61 72 65 20   algorithms are 
6c70: 63 6f 6d 70 6c 69 63 61 74 65 64 0a 20 20 2a 2a  complicated.  **
6c80: 20 73 6c 69 67 68 74 6c 79 20 69 6e 20 6f 72 64   slightly in ord
6c90: 65 72 20 74 6f 20 62 65 20 63 6f 6d 70 61 74 69  er to be compati
6ca0: 62 6c 65 20 77 69 74 68 20 77 69 6e 64 6f 77 73  ble with windows
6cb0: 20 73 79 73 74 65 6d 73 20 73 69 6d 75 6c 74 61   systems simulta
6cc0: 6e 65 6f 75 73 6c 79 0a 20 20 2a 2a 20 61 63 63  neously.  ** acc
6cd0: 65 73 73 69 6e 67 20 74 68 65 20 73 61 6d 65 20  essing the same 
6ce0: 64 61 74 61 62 61 73 65 20 66 69 6c 65 2c 20 69  database file, i
6cf0: 6e 20 63 61 73 65 20 74 68 61 74 20 69 73 20 65  n case that is e
6d00: 76 65 72 20 72 65 71 75 69 72 65 64 2e 0a 20 20  ver required..  
6d10: 2a 2a 0a 20 20 2a 2a 20 53 79 6d 62 6f 6c 73 20  **.  ** Symbols 
6d20: 64 65 66 69 6e 65 64 20 69 6e 20 6f 73 2e 68 20  defined in os.h 
6d30: 69 6e 64 65 6e 74 69 66 79 20 74 68 65 20 27 70  indentify the 'p
6d40: 65 6e 64 69 6e 67 20 62 79 74 65 27 20 61 6e 64  ending byte' and
6d50: 20 74 68 65 20 27 72 65 73 65 72 76 65 64 0a 20   the 'reserved. 
6d60: 20 2a 2a 20 62 79 74 65 27 2c 20 65 61 63 68 20   ** byte', each 
6d70: 73 69 6e 67 6c 65 20 62 79 74 65 73 20 61 74 20  single bytes at 
6d80: 77 65 6c 6c 20 6b 6e 6f 77 6e 20 6f 66 66 73 65  well known offse
6d90: 74 73 2c 20 61 6e 64 20 74 68 65 20 27 73 68 61  ts, and the 'sha
6da0: 72 65 64 20 62 79 74 65 0a 20 20 2a 2a 20 72 61  red byte.  ** ra
6db0: 6e 67 65 27 2c 20 61 20 72 61 6e 67 65 20 6f 66  nge', a range of
6dc0: 20 35 31 30 20 62 79 74 65 73 20 61 74 20 61 20   510 bytes at a 
6dd0: 77 65 6c 6c 20 6b 6e 6f 77 6e 20 6f 66 66 73 65  well known offse
6de0: 74 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 54 6f 20  t..  **.  ** To 
6df0: 6f 62 74 61 69 6e 20 61 20 53 48 41 52 45 44 20  obtain a SHARED 
6e00: 6c 6f 63 6b 2c 20 61 20 72 65 61 64 2d 6c 6f 63  lock, a read-loc
6e10: 6b 20 69 73 20 6f 62 74 61 69 6e 65 64 20 6f 6e  k is obtained on
6e20: 20 74 68 65 20 27 70 65 6e 64 69 6e 67 0a 20 20   the 'pending.  
6e30: 2a 2a 20 62 79 74 65 27 2e 20 20 49 66 20 74 68  ** byte'.  If th
6e40: 69 73 20 69 73 20 73 75 63 63 65 73 73 66 75 6c  is is successful
6e50: 2c 20 61 20 72 61 6e 64 6f 6d 20 62 79 74 65 20  , a random byte 
6e60: 66 72 6f 6d 20 74 68 65 20 27 73 68 61 72 65 64  from the 'shared
6e70: 20 62 79 74 65 0a 20 20 2a 2a 20 72 61 6e 67 65   byte.  ** range
6e80: 27 20 69 73 20 72 65 61 64 2d 6c 6f 63 6b 65 64  ' is read-locked
6e90: 20 61 6e 64 20 74 68 65 20 6c 6f 63 6b 20 6f 6e   and the lock on
6ea0: 20 74 68 65 20 27 70 65 6e 64 69 6e 67 20 62 79   the 'pending by
6eb0: 74 65 27 20 72 65 6c 65 61 73 65 64 2e 0a 20 20  te' released..  
6ec0: 2a 2a 0a 20 20 2a 2a 20 41 20 70 72 6f 63 65 73  **.  ** A proces
6ed0: 73 20 6d 61 79 20 6f 6e 6c 79 20 6f 62 74 61 69  s may only obtai
6ee0: 6e 20 61 20 52 45 53 45 52 56 45 44 20 6c 6f 63  n a RESERVED loc
6ef0: 6b 20 61 66 74 65 72 20 69 74 20 68 61 73 20 61  k after it has a
6f00: 20 53 48 41 52 45 44 20 6c 6f 63 6b 2e 0a 20 20   SHARED lock..  
6f10: 2a 2a 20 41 20 52 45 53 45 52 56 45 44 20 6c 6f  ** A RESERVED lo
6f20: 63 6b 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74 65  ck is implemente
6f30: 64 20 62 79 20 67 72 61 62 62 69 6e 67 20 61 20  d by grabbing a 
6f40: 77 72 69 74 65 2d 6c 6f 63 6b 20 6f 6e 20 74 68  write-lock on th
6f50: 65 0a 20 20 2a 2a 20 27 72 65 73 65 72 76 65 64  e.  ** 'reserved
6f60: 20 62 79 74 65 27 2e 20 0a 20 20 2a 2a 0a 20 20   byte'. .  **.  
6f70: 2a 2a 20 41 20 70 72 6f 63 65 73 73 20 6d 61 79  ** A process may
6f80: 20 6f 6e 6c 79 20 6f 62 74 61 69 6e 20 61 20 50   only obtain a P
6f90: 45 4e 44 49 4e 47 20 6c 6f 63 6b 20 61 66 74 65  ENDING lock afte
6fa0: 72 20 69 74 20 68 61 73 20 6f 62 74 61 69 6e 65  r it has obtaine
6fb0: 64 20 61 0a 20 20 2a 2a 20 53 48 41 52 45 44 20  d a.  ** SHARED 
6fc0: 6c 6f 63 6b 2e 20 41 20 50 45 4e 44 49 4e 47 20  lock. A PENDING 
6fd0: 6c 6f 63 6b 20 69 73 20 69 6d 70 6c 65 6d 65 6e  lock is implemen
6fe0: 74 65 64 20 62 79 20 6f 62 74 61 69 6e 69 6e 67  ted by obtaining
6ff0: 20 61 20 77 72 69 74 65 2d 6c 6f 63 6b 0a 20 20   a write-lock.  
7000: 2a 2a 20 6f 6e 20 74 68 65 20 27 70 65 6e 64 69  ** on the 'pendi
7010: 6e 67 20 62 79 74 65 27 2e 20 54 68 69 73 20 65  ng byte'. This e
7020: 6e 73 75 72 65 73 20 74 68 61 74 20 6e 6f 20 6e  nsures that no n
7030: 65 77 20 53 48 41 52 45 44 20 6c 6f 63 6b 73 20  ew SHARED locks 
7040: 63 61 6e 20 62 65 0a 20 20 2a 2a 20 6f 62 74 61  can be.  ** obta
7050: 69 6e 65 64 2c 20 62 75 74 20 65 78 69 73 74 69  ined, but existi
7060: 6e 67 20 53 48 41 52 45 44 20 6c 6f 63 6b 73 20  ng SHARED locks 
7070: 61 72 65 20 61 6c 6c 6f 77 65 64 20 74 6f 20 70  are allowed to p
7080: 65 72 73 69 73 74 2e 20 41 20 70 72 6f 63 65 73  ersist. A proces
7090: 73 0a 20 20 2a 2a 20 64 6f 65 73 20 6e 6f 74 20  s.  ** does not 
70a0: 68 61 76 65 20 74 6f 20 6f 62 74 61 69 6e 20 61  have to obtain a
70b0: 20 52 45 53 45 52 56 45 44 20 6c 6f 63 6b 20 6f   RESERVED lock o
70c0: 6e 20 74 68 65 20 77 61 79 20 74 6f 20 61 20 50  n the way to a P
70d0: 45 4e 44 49 4e 47 20 6c 6f 63 6b 2e 0a 20 20 2a  ENDING lock..  *
70e0: 2a 20 54 68 69 73 20 70 72 6f 70 65 72 74 79 20  * This property 
70f0: 69 73 20 75 73 65 64 20 62 79 20 74 68 65 20 61  is used by the a
7100: 6c 67 6f 72 69 74 68 6d 20 66 6f 72 20 72 6f 6c  lgorithm for rol
7110: 6c 69 6e 67 20 62 61 63 6b 20 61 20 6a 6f 75 72  ling back a jour
7120: 6e 61 6c 20 66 69 6c 65 0a 20 20 2a 2a 20 61 66  nal file.  ** af
7130: 74 65 72 20 61 20 63 72 61 73 68 2e 0a 20 20 2a  ter a crash..  *
7140: 2a 0a 20 20 2a 2a 20 41 6e 20 45 58 43 4c 55 53  *.  ** An EXCLUS
7150: 49 56 45 20 6c 6f 63 6b 2c 20 6f 62 74 61 69 6e  IVE lock, obtain
7160: 65 64 20 61 66 74 65 72 20 61 20 50 45 4e 44 49  ed after a PENDI
7170: 4e 47 20 6c 6f 63 6b 20 69 73 20 68 65 6c 64 2c  NG lock is held,
7180: 20 69 73 0a 20 20 2a 2a 20 69 6d 70 6c 65 6d 65   is.  ** impleme
7190: 6e 74 65 64 20 62 79 20 6f 62 74 61 69 6e 69 6e  nted by obtainin
71a0: 67 20 61 20 77 72 69 74 65 2d 6c 6f 63 6b 20 6f  g a write-lock o
71b0: 6e 20 74 68 65 20 65 6e 74 69 72 65 20 27 73 68  n the entire 'sh
71c0: 61 72 65 64 20 62 79 74 65 0a 20 20 2a 2a 20 72  ared byte.  ** r
71d0: 61 6e 67 65 27 2e 20 53 69 6e 63 65 20 61 6c 6c  ange'. Since all
71e0: 20 6f 74 68 65 72 20 6c 6f 63 6b 73 20 72 65 71   other locks req
71f0: 75 69 72 65 20 61 20 72 65 61 64 2d 6c 6f 63 6b  uire a read-lock
7200: 20 6f 6e 20 6f 6e 65 20 6f 66 20 74 68 65 20 62   on one of the b
7210: 79 74 65 73 0a 20 20 2a 2a 20 77 69 74 68 69 6e  ytes.  ** within
7220: 20 74 68 69 73 20 72 61 6e 67 65 2c 20 74 68 69   this range, thi
7230: 73 20 65 6e 73 75 72 65 73 20 74 68 61 74 20 6e  s ensures that n
7240: 6f 20 6f 74 68 65 72 20 6c 6f 63 6b 73 20 61 72  o other locks ar
7250: 65 20 68 65 6c 64 20 6f 6e 20 74 68 65 0a 20 20  e held on the.  
7260: 2a 2a 20 64 61 74 61 62 61 73 65 2e 20 0a 20 20  ** database. .  
7270: 2a 2a 0a 20 20 2a 2a 20 54 68 65 20 72 65 61 73  **.  ** The reas
7280: 6f 6e 20 61 20 73 69 6e 67 6c 65 20 62 79 74 65  on a single byte
7290: 20 63 61 6e 6e 6f 74 20 62 65 20 75 73 65 64 20   cannot be used 
72a0: 69 6e 73 74 65 61 64 20 6f 66 20 74 68 65 20 27  instead of the '
72b0: 73 68 61 72 65 64 20 62 79 74 65 0a 20 20 2a 2a  shared byte.  **
72c0: 20 72 61 6e 67 65 27 20 69 73 20 74 68 61 74 20   range' is that 
72d0: 73 6f 6d 65 20 76 65 72 73 69 6f 6e 73 20 6f 66  some versions of
72e0: 20 77 69 6e 64 6f 77 73 20 64 6f 20 6e 6f 74 20   windows do not 
72f0: 73 75 70 70 6f 72 74 20 72 65 61 64 2d 6c 6f 63  support read-loc
7300: 6b 73 2e 20 42 79 0a 20 20 2a 2a 20 6c 6f 63 6b  ks. By.  ** lock
7310: 69 6e 67 20 61 20 72 61 6e 64 6f 6d 20 62 79 74  ing a random byt
7320: 65 20 66 72 6f 6d 20 61 20 72 61 6e 67 65 2c 20  e from a range, 
7330: 63 6f 6e 63 75 72 72 65 6e 74 20 53 48 41 52 45  concurrent SHARE
7340: 44 20 6c 6f 63 6b 73 20 6d 61 79 20 65 78 69 73  D locks may exis
7350: 74 0a 20 20 2a 2a 20 65 76 65 6e 20 69 66 20 74  t.  ** even if t
7360: 68 65 20 6c 6f 63 6b 69 6e 67 20 70 72 69 6d 69  he locking primi
7370: 74 69 76 65 20 75 73 65 64 20 69 73 20 61 6c 77  tive used is alw
7380: 61 79 73 20 61 20 77 72 69 74 65 2d 6c 6f 63 6b  ays a write-lock
7390: 2e 0a 20 20 2a 2f 0a 20 20 69 6e 74 20 72 63 20  ..  */.  int rc 
73a0: 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 73  = SQLITE_OK;.  s
73b0: 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20 2a  truct lockInfo *
73c0: 70 4c 6f 63 6b 20 3d 20 69 64 2d 3e 70 4c 6f 63  pLock = id->pLoc
73d0: 6b 3b 0a 20 20 73 74 72 75 63 74 20 66 6c 6f 63  k;.  struct floc
73e0: 6b 20 6c 6f 63 6b 3b 0a 20 20 69 6e 74 20 73 3b  k lock;.  int s;
73f0: 0a 0a 20 20 61 73 73 65 72 74 28 20 69 64 2d 3e  ..  assert( id->
7400: 69 73 4f 70 65 6e 20 29 3b 0a 20 20 54 52 41 43  isOpen );.  TRAC
7410: 45 37 28 22 4c 4f 43 4b 20 20 20 20 25 64 20 25  E7("LOCK    %d %
7420: 73 20 77 61 73 20 25 73 28 25 73 2c 25 64 29 20  s was %s(%s,%d) 
7430: 70 69 64 3d 25 64 5c 6e 22 2c 20 69 64 2d 3e 68  pid=%d\n", id->h
7440: 2c 20 6c 6f 63 6b 74 79 70 65 4e 61 6d 65 28 6c  , locktypeName(l
7450: 6f 63 6b 74 79 70 65 29 2c 20 0a 20 20 20 20 20  ocktype), .     
7460: 20 6c 6f 63 6b 74 79 70 65 4e 61 6d 65 28 69 64   locktypeName(id
7470: 2d 3e 6c 6f 63 6b 74 79 70 65 29 2c 20 6c 6f 63  ->locktype), loc
7480: 6b 74 79 70 65 4e 61 6d 65 28 70 4c 6f 63 6b 2d  ktypeName(pLock-
7490: 3e 6c 6f 63 6b 74 79 70 65 29 2c 20 70 4c 6f 63  >locktype), pLoc
74a0: 6b 2d 3e 63 6e 74 0a 20 20 20 20 20 20 2c 67 65  k->cnt.      ,ge
74b0: 74 70 69 64 28 29 20 29 3b 0a 0a 20 20 2f 2a 20  tpid() );..  /* 
74c0: 49 66 20 74 68 65 72 65 20 69 73 20 61 6c 72 65  If there is alre
74d0: 61 64 79 20 61 20 6c 6f 63 6b 20 6f 66 20 74 68  ady a lock of th
74e0: 69 73 20 74 79 70 65 20 6f 72 20 6d 6f 72 65 20  is type or more 
74f0: 72 65 73 74 72 69 63 74 69 76 65 20 6f 6e 20 74  restrictive on t
7500: 68 65 0a 20 20 2a 2a 20 4f 73 46 69 6c 65 2c 20  he.  ** OsFile, 
7510: 64 6f 20 6e 6f 74 68 69 6e 67 2e 20 44 6f 6e 27  do nothing. Don'
7520: 74 20 75 73 65 20 74 68 65 20 65 6e 64 5f 6c 6f  t use the end_lo
7530: 63 6b 3a 20 65 78 69 74 20 70 61 74 68 2c 20 61  ck: exit path, a
7540: 73 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33 4f 73  s.  ** sqlite3Os
7550: 45 6e 74 65 72 4d 75 74 65 78 28 29 20 68 61 73  EnterMutex() has
7560: 6e 27 74 20 62 65 65 6e 20 63 61 6c 6c 65 64 20  n't been called 
7570: 79 65 74 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20  yet..  */.  if( 
7580: 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 3e 3d 6c 6f  id->locktype>=lo
7590: 63 6b 74 79 70 65 20 29 7b 0a 20 20 20 20 54 52  cktype ){.    TR
75a0: 41 43 45 33 28 22 4c 4f 43 4b 20 20 20 20 25 64  ACE3("LOCK    %d
75b0: 20 25 73 20 6f 6b 20 28 61 6c 72 65 61 64 79 20   %s ok (already 
75c0: 68 65 6c 64 29 5c 6e 22 2c 20 69 64 2d 3e 68 2c  held)\n", id->h,
75d0: 20 6c 6f 63 6b 74 79 70 65 4e 61 6d 65 28 6c 6f   locktypeName(lo
75e0: 63 6b 74 79 70 65 29 29 3b 0a 20 20 20 20 72 65  cktype));.    re
75f0: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  turn SQLITE_OK;.
7600: 20 20 7d 0a 0a 20 20 2f 2a 20 4d 61 6b 65 20 73    }..  /* Make s
7610: 75 72 65 20 74 68 65 20 6c 6f 63 6b 69 6e 67 20  ure the locking 
7620: 73 65 71 75 65 6e 63 65 20 69 73 20 63 6f 72 72  sequence is corr
7630: 65 63 74 0a 20 20 2a 2f 0a 20 20 61 73 73 65 72  ect.  */.  asser
7640: 74 28 20 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 21  t( id->locktype!
7650: 3d 4e 4f 5f 4c 4f 43 4b 20 7c 7c 20 6c 6f 63 6b  =NO_LOCK || lock
7660: 74 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43  type==SHARED_LOC
7670: 4b 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 6c  K );.  assert( l
7680: 6f 63 6b 74 79 70 65 21 3d 50 45 4e 44 49 4e 47  ocktype!=PENDING
7690: 5f 4c 4f 43 4b 20 29 3b 0a 20 20 61 73 73 65 72  _LOCK );.  asser
76a0: 74 28 20 6c 6f 63 6b 74 79 70 65 21 3d 52 45 53  t( locktype!=RES
76b0: 45 52 56 45 44 5f 4c 4f 43 4b 20 7c 7c 20 69 64  ERVED_LOCK || id
76c0: 2d 3e 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41 52  ->locktype==SHAR
76d0: 45 44 5f 4c 4f 43 4b 20 29 3b 0a 0a 20 20 2f 2a  ED_LOCK );..  /*
76e0: 20 54 68 69 73 20 6d 75 74 65 78 20 69 73 20 6e   This mutex is n
76f0: 65 65 64 65 64 20 62 65 63 61 75 73 65 20 69 64  eeded because id
7700: 2d 3e 70 4c 6f 63 6b 20 69 73 20 73 68 61 72 65  ->pLock is share
7710: 64 20 61 63 72 6f 73 73 20 74 68 72 65 61 64 73  d across threads
7720: 0a 20 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 4f  .  */.  sqlite3O
7730: 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a 0a  sEnterMutex();..
7740: 20 20 2f 2a 20 49 66 20 73 6f 6d 65 20 74 68 72    /* If some thr
7750: 65 61 64 20 75 73 69 6e 67 20 74 68 69 73 20 50  ead using this P
7760: 49 44 20 68 61 73 20 61 20 6c 6f 63 6b 20 76 69  ID has a lock vi
7770: 61 20 61 20 64 69 66 66 65 72 65 6e 74 20 4f 73  a a different Os
7780: 46 69 6c 65 2a 0a 20 20 2a 2a 20 68 61 6e 64 6c  File*.  ** handl
7790: 65 20 74 68 61 74 20 70 72 65 63 6c 75 64 65 73  e that precludes
77a0: 20 74 68 65 20 72 65 71 75 65 73 74 65 64 20 6c   the requested l
77b0: 6f 63 6b 2c 20 72 65 74 75 72 6e 20 42 55 53 59  ock, return BUSY
77c0: 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 28 69 64  ..  */.  if( (id
77d0: 2d 3e 6c 6f 63 6b 74 79 70 65 21 3d 70 4c 6f 63  ->locktype!=pLoc
77e0: 6b 2d 3e 6c 6f 63 6b 74 79 70 65 20 26 26 20 0a  k->locktype && .
77f0: 20 20 20 20 20 20 20 20 20 20 28 70 4c 6f 63 6b            (pLock
7800: 2d 3e 6c 6f 63 6b 74 79 70 65 3e 3d 50 45 4e 44  ->locktype>=PEND
7810: 49 4e 47 5f 4c 4f 43 4b 20 7c 7c 20 6c 6f 63 6b  ING_LOCK || lock
7820: 74 79 70 65 3e 53 48 41 52 45 44 5f 4c 4f 43 4b  type>SHARED_LOCK
7830: 29 29 0a 20 20 29 7b 0a 20 20 20 20 72 63 20 3d  )).  ){.    rc =
7840: 20 53 51 4c 49 54 45 5f 42 55 53 59 3b 0a 20 20   SQLITE_BUSY;.  
7850: 20 20 67 6f 74 6f 20 65 6e 64 5f 6c 6f 63 6b 3b    goto end_lock;
7860: 0a 20 20 7d 0a 0a 20 20 2f 2a 20 49 66 20 61 20  .  }..  /* If a 
7870: 53 48 41 52 45 44 20 6c 6f 63 6b 20 69 73 20 72  SHARED lock is r
7880: 65 71 75 65 73 74 65 64 2c 20 61 6e 64 20 73 6f  equested, and so
7890: 6d 65 20 74 68 72 65 61 64 20 75 73 69 6e 67 20  me thread using 
78a0: 74 68 69 73 20 50 49 44 20 61 6c 72 65 61 64 79  this PID already
78b0: 0a 20 20 2a 2a 20 68 61 73 20 61 20 53 48 41 52  .  ** has a SHAR
78c0: 45 44 20 6f 72 20 52 45 53 45 52 56 45 44 20 6c  ED or RESERVED l
78d0: 6f 63 6b 2c 20 74 68 65 6e 20 69 6e 63 72 65 6d  ock, then increm
78e0: 65 6e 74 20 72 65 66 65 72 65 6e 63 65 20 63 6f  ent reference co
78f0: 75 6e 74 73 20 61 6e 64 0a 20 20 2a 2a 20 72 65  unts and.  ** re
7900: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a  turn SQLITE_OK..
7910: 20 20 2a 2f 0a 20 20 69 66 28 20 6c 6f 63 6b 74    */.  if( lockt
7920: 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43 4b  ype==SHARED_LOCK
7930: 20 26 26 20 0a 20 20 20 20 20 20 28 70 4c 6f 63   && .      (pLoc
7940: 6b 2d 3e 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41  k->locktype==SHA
7950: 52 45 44 5f 4c 4f 43 4b 20 7c 7c 20 70 4c 6f 63  RED_LOCK || pLoc
7960: 6b 2d 3e 6c 6f 63 6b 74 79 70 65 3d 3d 52 45 53  k->locktype==RES
7970: 45 52 56 45 44 5f 4c 4f 43 4b 29 20 29 7b 0a 20  ERVED_LOCK) ){. 
7980: 20 20 20 61 73 73 65 72 74 28 20 6c 6f 63 6b 74     assert( lockt
7990: 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43 4b  ype==SHARED_LOCK
79a0: 20 29 3b 0a 20 20 20 20 61 73 73 65 72 74 28 20   );.    assert( 
79b0: 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 3d 3d 30 20  id->locktype==0 
79c0: 29 3b 0a 20 20 20 20 61 73 73 65 72 74 28 20 70  );.    assert( p
79d0: 4c 6f 63 6b 2d 3e 63 6e 74 3e 30 20 29 3b 0a 20  Lock->cnt>0 );. 
79e0: 20 20 20 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 20     id->locktype 
79f0: 3d 20 53 48 41 52 45 44 5f 4c 4f 43 4b 3b 0a 20  = SHARED_LOCK;. 
7a00: 20 20 20 70 4c 6f 63 6b 2d 3e 63 6e 74 2b 2b 3b     pLock->cnt++;
7a10: 0a 20 20 20 20 69 64 2d 3e 70 4f 70 65 6e 2d 3e  .    id->pOpen->
7a20: 6e 4c 6f 63 6b 2b 2b 3b 0a 20 20 20 20 67 6f 74  nLock++;.    got
7a30: 6f 20 65 6e 64 5f 6c 6f 63 6b 3b 0a 20 20 7d 0a  o end_lock;.  }.
7a40: 0a 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20  .  lock.l_len = 
7a50: 31 4c 3b 0a 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65  1L;.  lock.l_whe
7a60: 6e 63 65 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a  nce = SEEK_SET;.
7a70: 0a 20 20 2f 2a 20 41 20 50 45 4e 44 49 4e 47 20  .  /* A PENDING 
7a80: 6c 6f 63 6b 20 69 73 20 6e 65 65 64 65 64 20 62  lock is needed b
7a90: 65 66 6f 72 65 20 61 63 71 75 69 72 69 6e 67 20  efore acquiring 
7aa0: 61 20 53 48 41 52 45 44 20 6c 6f 63 6b 20 61 6e  a SHARED lock an
7ab0: 64 20 62 65 66 6f 72 65 0a 20 20 2a 2a 20 61 63  d before.  ** ac
7ac0: 71 75 69 72 69 6e 67 20 61 6e 20 45 58 43 4c 55  quiring an EXCLU
7ad0: 53 49 56 45 20 6c 6f 63 6b 2e 20 20 46 6f 72 20  SIVE lock.  For 
7ae0: 74 68 65 20 53 48 41 52 45 44 20 6c 6f 63 6b 2c  the SHARED lock,
7af0: 20 74 68 65 20 50 45 4e 44 49 4e 47 20 77 69 6c   the PENDING wil
7b00: 6c 0a 20 20 2a 2a 20 62 65 20 72 65 6c 65 61 73  l.  ** be releas
7b10: 65 64 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 6c  ed..  */.  if( l
7b20: 6f 63 6b 74 79 70 65 3d 3d 53 48 41 52 45 44 5f  ocktype==SHARED_
7b30: 4c 4f 43 4b 20 0a 20 20 20 20 20 20 7c 7c 20 28  LOCK .      || (
7b40: 6c 6f 63 6b 74 79 70 65 3d 3d 45 58 43 4c 55 53  locktype==EXCLUS
7b50: 49 56 45 5f 4c 4f 43 4b 20 26 26 20 69 64 2d 3e  IVE_LOCK && id->
7b60: 6c 6f 63 6b 74 79 70 65 3c 50 45 4e 44 49 4e 47  locktype<PENDING
7b70: 5f 4c 4f 43 4b 29 0a 20 20 29 7b 0a 20 20 20 20  _LOCK).  ){.    
7b80: 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d 20 28 6c  lock.l_type = (l
7b90: 6f 63 6b 74 79 70 65 3d 3d 53 48 41 52 45 44 5f  ocktype==SHARED_
7ba0: 4c 4f 43 4b 3f 46 5f 52 44 4c 43 4b 3a 46 5f 57  LOCK?F_RDLCK:F_W
7bb0: 52 4c 43 4b 29 3b 0a 20 20 20 20 6c 6f 63 6b 2e  RLCK);.    lock.
7bc0: 6c 5f 73 74 61 72 74 20 3d 20 50 45 4e 44 49 4e  l_start = PENDIN
7bd0: 47 5f 42 59 54 45 3b 0a 20 20 20 20 73 20 3d 20  G_BYTE;.    s = 
7be0: 66 63 6e 74 6c 28 69 64 2d 3e 68 2c 20 46 5f 53  fcntl(id->h, F_S
7bf0: 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b 0a 20 20  ETLK, &lock);.  
7c00: 20 20 69 66 28 20 73 20 29 7b 0a 20 20 20 20 20    if( s ){.     
7c10: 20 72 63 20 3d 20 28 65 72 72 6e 6f 3d 3d 45 49   rc = (errno==EI
7c20: 4e 56 41 4c 29 20 3f 20 53 51 4c 49 54 45 5f 4e  NVAL) ? SQLITE_N
7c30: 4f 4c 46 53 20 3a 20 53 51 4c 49 54 45 5f 42 55  OLFS : SQLITE_BU
7c40: 53 59 3b 0a 20 20 20 20 20 20 67 6f 74 6f 20 65  SY;.      goto e
7c50: 6e 64 5f 6c 6f 63 6b 3b 0a 20 20 20 20 7d 0a 20  nd_lock;.    }. 
7c60: 20 7d 0a 0a 0a 20 20 2f 2a 20 49 66 20 63 6f 6e   }...  /* If con
7c70: 74 72 6f 6c 20 67 65 74 73 20 74 6f 20 74 68 69  trol gets to thi
7c80: 73 20 70 6f 69 6e 74 2c 20 74 68 65 6e 20 61 63  s point, then ac
7c90: 74 75 61 6c 6c 79 20 67 6f 20 61 68 65 61 64 20  tually go ahead 
7ca0: 61 6e 64 20 6d 61 6b 65 0a 20 20 2a 2a 20 6f 70  and make.  ** op
7cb0: 65 72 61 74 69 6e 67 20 73 79 73 74 65 6d 20 63  erating system c
7cc0: 61 6c 6c 73 20 66 6f 72 20 74 68 65 20 73 70 65  alls for the spe
7cd0: 63 69 66 69 65 64 20 6c 6f 63 6b 2e 0a 20 20 2a  cified lock..  *
7ce0: 2f 0a 20 20 69 66 28 20 6c 6f 63 6b 74 79 70 65  /.  if( locktype
7cf0: 3d 3d 53 48 41 52 45 44 5f 4c 4f 43 4b 20 29 7b  ==SHARED_LOCK ){
7d00: 0a 20 20 20 20 61 73 73 65 72 74 28 20 70 4c 6f  .    assert( pLo
7d10: 63 6b 2d 3e 63 6e 74 3d 3d 30 20 29 3b 0a 20 20  ck->cnt==0 );.  
7d20: 20 20 61 73 73 65 72 74 28 20 70 4c 6f 63 6b 2d    assert( pLock-
7d30: 3e 6c 6f 63 6b 74 79 70 65 3d 3d 30 20 29 3b 0a  >locktype==0 );.
7d40: 0a 20 20 20 20 2f 2a 20 4e 6f 77 20 67 65 74 20  .    /* Now get 
7d50: 74 68 65 20 72 65 61 64 2d 6c 6f 63 6b 20 2a 2f  the read-lock */
7d60: 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72  .    lock.l_star
7d70: 74 20 3d 20 53 48 41 52 45 44 5f 46 49 52 53 54  t = SHARED_FIRST
7d80: 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e  ;.    lock.l_len
7d90: 20 3d 20 53 48 41 52 45 44 5f 53 49 5a 45 3b 0a   = SHARED_SIZE;.
7da0: 20 20 20 20 73 20 3d 20 66 63 6e 74 6c 28 69 64      s = fcntl(id
7db0: 2d 3e 68 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c  ->h, F_SETLK, &l
7dc0: 6f 63 6b 29 3b 0a 0a 20 20 20 20 2f 2a 20 44 72  ock);..    /* Dr
7dd0: 6f 70 20 74 68 65 20 74 65 6d 70 6f 72 61 72 79  op the temporary
7de0: 20 50 45 4e 44 49 4e 47 20 6c 6f 63 6b 20 2a 2f   PENDING lock */
7df0: 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72  .    lock.l_star
7e00: 74 20 3d 20 50 45 4e 44 49 4e 47 5f 42 59 54 45  t = PENDING_BYTE
7e10: 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e  ;.    lock.l_len
7e20: 20 3d 20 31 4c 3b 0a 20 20 20 20 6c 6f 63 6b 2e   = 1L;.    lock.
7e30: 6c 5f 74 79 70 65 20 3d 20 46 5f 55 4e 4c 43 4b  l_type = F_UNLCK
7e40: 3b 0a 20 20 20 20 66 63 6e 74 6c 28 69 64 2d 3e  ;.    fcntl(id->
7e50: 68 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63  h, F_SETLK, &loc
7e60: 6b 29 3b 0a 20 20 20 20 69 66 28 20 73 20 29 7b  k);.    if( s ){
7e70: 0a 20 20 20 20 20 20 72 63 20 3d 20 28 65 72 72  .      rc = (err
7e80: 6e 6f 3d 3d 45 49 4e 56 41 4c 29 20 3f 20 53 51  no==EINVAL) ? SQ
7e90: 4c 49 54 45 5f 4e 4f 4c 46 53 20 3a 20 53 51 4c  LITE_NOLFS : SQL
7ea0: 49 54 45 5f 42 55 53 59 3b 0a 20 20 20 20 7d 65  ITE_BUSY;.    }e
7eb0: 6c 73 65 7b 0a 20 20 20 20 20 20 69 64 2d 3e 6c  lse{.      id->l
7ec0: 6f 63 6b 74 79 70 65 20 3d 20 53 48 41 52 45 44  ocktype = SHARED
7ed0: 5f 4c 4f 43 4b 3b 0a 20 20 20 20 20 20 69 64 2d  _LOCK;.      id-
7ee0: 3e 70 4f 70 65 6e 2d 3e 6e 4c 6f 63 6b 2b 2b 3b  >pOpen->nLock++;
7ef0: 0a 20 20 20 20 20 20 70 4c 6f 63 6b 2d 3e 63 6e  .      pLock->cn
7f00: 74 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20 7d  t = 1;.    }.  }
7f10: 65 6c 73 65 20 69 66 28 20 6c 6f 63 6b 74 79 70  else if( locktyp
7f20: 65 3d 3d 45 58 43 4c 55 53 49 56 45 5f 4c 4f 43  e==EXCLUSIVE_LOC
7f30: 4b 20 26 26 20 70 4c 6f 63 6b 2d 3e 63 6e 74 3e  K && pLock->cnt>
7f40: 31 20 29 7b 0a 20 20 20 20 2f 2a 20 57 65 20 61  1 ){.    /* We a
7f50: 72 65 20 74 72 79 69 6e 67 20 66 6f 72 20 61 6e  re trying for an
7f60: 20 65 78 63 6c 75 73 69 76 65 20 6c 6f 63 6b 20   exclusive lock 
7f70: 62 75 74 20 61 6e 6f 74 68 65 72 20 74 68 72 65  but another thre
7f80: 61 64 20 69 6e 20 74 68 69 73 0a 20 20 20 20 2a  ad in this.    *
7f90: 2a 20 73 61 6d 65 20 70 72 6f 63 65 73 73 20 69  * same process i
7fa0: 73 20 73 74 69 6c 6c 20 68 6f 6c 64 69 6e 67 20  s still holding 
7fb0: 61 20 73 68 61 72 65 64 20 6c 6f 63 6b 2e 20 2a  a shared lock. *
7fc0: 2f 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54  /.    rc = SQLIT
7fd0: 45 5f 42 55 53 59 3b 0a 20 20 7d 65 6c 73 65 7b  E_BUSY;.  }else{
7fe0: 0a 20 20 20 20 2f 2a 20 54 68 65 20 72 65 71 75  .    /* The requ
7ff0: 65 73 74 20 77 61 73 20 66 6f 72 20 61 20 52 45  est was for a RE
8000: 53 45 52 56 45 44 20 6f 72 20 45 58 43 4c 55 53  SERVED or EXCLUS
8010: 49 56 45 20 6c 6f 63 6b 2e 20 20 49 74 20 69 73  IVE lock.  It is
8020: 0a 20 20 20 20 2a 2a 20 61 73 73 75 6d 65 64 20  .    ** assumed 
8030: 74 68 61 74 20 74 68 65 72 65 20 69 73 20 61 20  that there is a 
8040: 53 48 41 52 45 44 20 6f 72 20 67 72 65 61 74 65  SHARED or greate
8050: 72 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 66 69  r lock on the fi
8060: 6c 65 0a 20 20 20 20 2a 2a 20 61 6c 72 65 61 64  le.    ** alread
8070: 79 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 61 73  y..    */.    as
8080: 73 65 72 74 28 20 30 21 3d 69 64 2d 3e 6c 6f 63  sert( 0!=id->loc
8090: 6b 74 79 70 65 20 29 3b 0a 20 20 20 20 6c 6f 63  ktype );.    loc
80a0: 6b 2e 6c 5f 74 79 70 65 20 3d 20 46 5f 57 52 4c  k.l_type = F_WRL
80b0: 43 4b 3b 0a 20 20 20 20 73 77 69 74 63 68 28 20  CK;.    switch( 
80c0: 6c 6f 63 6b 74 79 70 65 20 29 7b 0a 20 20 20 20  locktype ){.    
80d0: 20 20 63 61 73 65 20 52 45 53 45 52 56 45 44 5f    case RESERVED_
80e0: 4c 4f 43 4b 3a 0a 20 20 20 20 20 20 20 20 6c 6f  LOCK:.        lo
80f0: 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 52 45 53  ck.l_start = RES
8100: 45 52 56 45 44 5f 42 59 54 45 3b 0a 20 20 20 20  ERVED_BYTE;.    
8110: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20      break;.     
8120: 20 63 61 73 65 20 45 58 43 4c 55 53 49 56 45 5f   case EXCLUSIVE_
8130: 4c 4f 43 4b 3a 0a 20 20 20 20 20 20 20 20 6c 6f  LOCK:.        lo
8140: 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 53 48 41  ck.l_start = SHA
8150: 52 45 44 5f 46 49 52 53 54 3b 0a 20 20 20 20 20  RED_FIRST;.     
8160: 20 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20     lock.l_len = 
8170: 53 48 41 52 45 44 5f 53 49 5a 45 3b 0a 20 20 20  SHARED_SIZE;.   
8180: 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20       break;.    
8190: 20 20 64 65 66 61 75 6c 74 3a 0a 20 20 20 20 20    default:.     
81a0: 20 20 20 61 73 73 65 72 74 28 30 29 3b 0a 20 20     assert(0);.  
81b0: 20 20 7d 0a 20 20 20 20 73 20 3d 20 66 63 6e 74    }.    s = fcnt
81c0: 6c 28 69 64 2d 3e 68 2c 20 46 5f 53 45 54 4c 4b  l(id->h, F_SETLK
81d0: 2c 20 26 6c 6f 63 6b 29 3b 0a 20 20 20 20 69 66  , &lock);.    if
81e0: 28 20 73 20 29 7b 0a 20 20 20 20 20 20 72 63 20  ( s ){.      rc 
81f0: 3d 20 28 65 72 72 6e 6f 3d 3d 45 49 4e 56 41 4c  = (errno==EINVAL
8200: 29 20 3f 20 53 51 4c 49 54 45 5f 4e 4f 4c 46 53  ) ? SQLITE_NOLFS
8210: 20 3a 20 53 51 4c 49 54 45 5f 42 55 53 59 3b 0a   : SQLITE_BUSY;.
8220: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 0a 20 20 69      }.  }.  .  i
8230: 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b  f( rc==SQLITE_OK
8240: 20 29 7b 0a 20 20 20 20 69 64 2d 3e 6c 6f 63 6b   ){.    id->lock
8250: 74 79 70 65 20 3d 20 6c 6f 63 6b 74 79 70 65 3b  type = locktype;
8260: 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b  .    pLock->lock
8270: 74 79 70 65 20 3d 20 6c 6f 63 6b 74 79 70 65 3b  type = locktype;
8280: 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 6c 6f 63  .  }else if( loc
8290: 6b 74 79 70 65 3d 3d 45 58 43 4c 55 53 49 56 45  ktype==EXCLUSIVE
82a0: 5f 4c 4f 43 4b 20 29 7b 0a 20 20 20 20 69 64 2d  _LOCK ){.    id-
82b0: 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 50 45 4e 44  >locktype = PEND
82c0: 49 4e 47 5f 4c 4f 43 4b 3b 0a 20 20 20 20 70 4c  ING_LOCK;.    pL
82d0: 6f 63 6b 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20  ock->locktype = 
82e0: 50 45 4e 44 49 4e 47 5f 4c 4f 43 4b 3b 0a 20 20  PENDING_LOCK;.  
82f0: 7d 0a 0a 65 6e 64 5f 6c 6f 63 6b 3a 0a 20 20 73  }..end_lock:.  s
8300: 71 6c 69 74 65 33 4f 73 4c 65 61 76 65 4d 75 74  qlite3OsLeaveMut
8310: 65 78 28 29 3b 0a 20 20 54 52 41 43 45 34 28 22  ex();.  TRACE4("
8320: 4c 4f 43 4b 20 20 20 20 25 64 20 25 73 20 25 73  LOCK    %d %s %s
8330: 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20 6c 6f 63 6b  \n", id->h, lock
8340: 74 79 70 65 4e 61 6d 65 28 6c 6f 63 6b 74 79 70  typeName(locktyp
8350: 65 29 2c 20 0a 20 20 20 20 20 20 72 63 3d 3d 53  e), .      rc==S
8360: 51 4c 49 54 45 5f 4f 4b 20 3f 20 22 6f 6b 22 20  QLITE_OK ? "ok" 
8370: 3a 20 22 66 61 69 6c 65 64 22 29 3b 0a 20 20 72  : "failed");.  r
8380: 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a  eturn rc;.}../*.
8390: 2a 2a 20 4c 6f 77 65 72 20 74 68 65 20 6c 6f 63  ** Lower the loc
83a0: 6b 69 6e 67 20 6c 65 76 65 6c 20 6f 6e 20 66 69  king level on fi
83b0: 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20 69 64  le descriptor id
83c0: 20 74 6f 20 6c 6f 63 6b 74 79 70 65 2e 20 20 6c   to locktype.  l
83d0: 6f 63 6b 74 79 70 65 0a 2a 2a 20 6d 75 73 74 20  ocktype.** must 
83e0: 62 65 20 65 69 74 68 65 72 20 4e 4f 5f 4c 4f 43  be either NO_LOC
83f0: 4b 20 6f 72 20 53 48 41 52 45 44 5f 4c 4f 43 4b  K or SHARED_LOCK
8400: 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68 65 20 6c  ..**.** If the l
8410: 6f 63 6b 69 6e 67 20 6c 65 76 65 6c 20 6f 66 20  ocking level of 
8420: 74 68 65 20 66 69 6c 65 20 64 65 73 63 72 69 70  the file descrip
8430: 74 6f 72 20 69 73 20 61 6c 72 65 61 64 79 20 61  tor is already a
8440: 74 20 6f 72 20 62 65 6c 6f 77 0a 2a 2a 20 74 68  t or below.** th
8450: 65 20 72 65 71 75 65 73 74 65 64 20 6c 6f 63 6b  e requested lock
8460: 69 6e 67 20 6c 65 76 65 6c 2c 20 74 68 69 73 20  ing level, this 
8470: 72 6f 75 74 69 6e 65 20 69 73 20 61 20 6e 6f 2d  routine is a no-
8480: 6f 70 2e 0a 2a 2a 0a 2a 2a 20 49 74 20 69 73 20  op..**.** It is 
8490: 6e 6f 74 20 70 6f 73 73 69 62 6c 65 20 66 6f 72  not possible for
84a0: 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 74 6f   this routine to
84b0: 20 66 61 69 6c 20 69 66 20 74 68 65 20 73 65 63   fail if the sec
84c0: 6f 6e 64 20 61 72 67 75 6d 65 6e 74 0a 2a 2a 20  ond argument.** 
84d0: 69 73 20 4e 4f 5f 4c 4f 43 4b 2e 20 20 49 66 20  is NO_LOCK.  If 
84e0: 74 68 65 20 73 65 63 6f 6e 64 20 61 72 67 75 6d  the second argum
84f0: 65 6e 74 20 69 73 20 53 48 41 52 45 44 5f 4c 4f  ent is SHARED_LO
8500: 43 4b 2c 20 74 68 69 73 20 72 6f 75 74 69 6e 65  CK, this routine
8510: 0a 2a 2a 20 6d 69 67 68 74 20 72 65 74 75 72 6e  .** might return
8520: 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 20 69 6e   SQLITE_IOERR in
8530: 73 74 65 61 64 20 6f 66 20 53 51 4c 49 54 45 5f  stead of SQLITE_
8540: 4f 4b 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74  OK..*/.int sqlit
8550: 65 33 4f 73 55 6e 6c 6f 63 6b 28 4f 73 46 69 6c  e3OsUnlock(OsFil
8560: 65 20 2a 69 64 2c 20 69 6e 74 20 6c 6f 63 6b 74  e *id, int lockt
8570: 79 70 65 29 7b 0a 20 20 73 74 72 75 63 74 20 6c  ype){.  struct l
8580: 6f 63 6b 49 6e 66 6f 20 2a 70 4c 6f 63 6b 3b 0a  ockInfo *pLock;.
8590: 20 20 73 74 72 75 63 74 20 66 6c 6f 63 6b 20 6c    struct flock l
85a0: 6f 63 6b 3b 0a 20 20 69 6e 74 20 72 63 20 3d 20  ock;.  int rc = 
85b0: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 0a 20 20 61 73  SQLITE_OK;..  as
85c0: 73 65 72 74 28 20 69 64 2d 3e 69 73 4f 70 65 6e  sert( id->isOpen
85d0: 20 29 3b 0a 20 20 54 52 41 43 45 37 28 22 55 4e   );.  TRACE7("UN
85e0: 4c 4f 43 4b 20 20 25 64 20 25 64 20 77 61 73 20  LOCK  %d %d was 
85f0: 25 64 28 25 64 2c 25 64 29 20 70 69 64 3d 25 64  %d(%d,%d) pid=%d
8600: 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20 6c 6f 63 6b  \n", id->h, lock
8610: 74 79 70 65 2c 20 69 64 2d 3e 6c 6f 63 6b 74 79  type, id->lockty
8620: 70 65 2c 20 0a 20 20 20 20 20 20 69 64 2d 3e 70  pe, .      id->p
8630: 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 79 70 65 2c 20  Lock->locktype, 
8640: 69 64 2d 3e 70 4c 6f 63 6b 2d 3e 63 6e 74 2c 20  id->pLock->cnt, 
8650: 67 65 74 70 69 64 28 29 29 3b 0a 0a 20 20 61 73  getpid());..  as
8660: 73 65 72 74 28 20 6c 6f 63 6b 74 79 70 65 3c 3d  sert( locktype<=
8670: 53 48 41 52 45 44 5f 4c 4f 43 4b 20 29 3b 0a 20  SHARED_LOCK );. 
8680: 20 69 66 28 20 69 64 2d 3e 6c 6f 63 6b 74 79 70   if( id->locktyp
8690: 65 3c 3d 6c 6f 63 6b 74 79 70 65 20 29 7b 0a 20  e<=locktype ){. 
86a0: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45     return SQLITE
86b0: 5f 4f 4b 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74  _OK;.  }.  sqlit
86c0: 65 33 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29  e3OsEnterMutex()
86d0: 3b 0a 20 20 70 4c 6f 63 6b 20 3d 20 69 64 2d 3e  ;.  pLock = id->
86e0: 70 4c 6f 63 6b 3b 0a 20 20 61 73 73 65 72 74 28  pLock;.  assert(
86f0: 20 70 4c 6f 63 6b 2d 3e 63 6e 74 21 3d 30 20 29   pLock->cnt!=0 )
8700: 3b 0a 20 20 69 66 28 20 69 64 2d 3e 6c 6f 63 6b  ;.  if( id->lock
8710: 74 79 70 65 3e 53 48 41 52 45 44 5f 4c 4f 43 4b  type>SHARED_LOCK
8720: 20 29 7b 0a 20 20 20 20 61 73 73 65 72 74 28 20   ){.    assert( 
8730: 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 79 70 65 3d  pLock->locktype=
8740: 3d 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 20 29 3b  =id->locktype );
8750: 0a 20 20 20 20 69 66 28 20 6c 6f 63 6b 74 79 70  .    if( locktyp
8760: 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43 4b 20 29  e==SHARED_LOCK )
8770: 7b 0a 20 20 20 20 20 20 6c 6f 63 6b 2e 6c 5f 74  {.      lock.l_t
8780: 79 70 65 20 3d 20 46 5f 52 44 4c 43 4b 3b 0a 20  ype = F_RDLCK;. 
8790: 20 20 20 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e       lock.l_when
87a0: 63 65 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 20  ce = SEEK_SET;. 
87b0: 20 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72       lock.l_star
87c0: 74 20 3d 20 53 48 41 52 45 44 5f 46 49 52 53 54  t = SHARED_FIRST
87d0: 3b 0a 20 20 20 20 20 20 6c 6f 63 6b 2e 6c 5f 6c  ;.      lock.l_l
87e0: 65 6e 20 3d 20 53 48 41 52 45 44 5f 53 49 5a 45  en = SHARED_SIZE
87f0: 3b 0a 20 20 20 20 20 20 69 66 28 20 66 63 6e 74  ;.      if( fcnt
8800: 6c 28 69 64 2d 3e 68 2c 20 46 5f 53 45 54 4c 4b  l(id->h, F_SETLK
8810: 2c 20 26 6c 6f 63 6b 29 21 3d 30 20 29 7b 0a 20  , &lock)!=0 ){. 
8820: 20 20 20 20 20 20 20 2f 2a 20 54 68 69 73 20 73         /* This s
8830: 68 6f 75 6c 64 20 6e 65 76 65 72 20 68 61 70 70  hould never happ
8840: 65 6e 20 2a 2f 0a 20 20 20 20 20 20 20 20 72 63  en */.        rc
8850: 20 3d 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b   = SQLITE_IOERR;
8860: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20  .      }.    }. 
8870: 20 20 20 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d     lock.l_type =
8880: 20 46 5f 55 4e 4c 43 4b 3b 0a 20 20 20 20 6c 6f   F_UNLCK;.    lo
8890: 63 6b 2e 6c 5f 77 68 65 6e 63 65 20 3d 20 53 45  ck.l_whence = SE
88a0: 45 4b 5f 53 45 54 3b 0a 20 20 20 20 6c 6f 63 6b  EK_SET;.    lock
88b0: 2e 6c 5f 73 74 61 72 74 20 3d 20 50 45 4e 44 49  .l_start = PENDI
88c0: 4e 47 5f 42 59 54 45 3b 0a 20 20 20 20 6c 6f 63  NG_BYTE;.    loc
88d0: 6b 2e 6c 5f 6c 65 6e 20 3d 20 32 4c 3b 20 20 61  k.l_len = 2L;  a
88e0: 73 73 65 72 74 28 20 50 45 4e 44 49 4e 47 5f 42  ssert( PENDING_B
88f0: 59 54 45 2b 31 3d 3d 52 45 53 45 52 56 45 44 5f  YTE+1==RESERVED_
8900: 42 59 54 45 20 29 3b 0a 20 20 20 20 66 63 6e 74  BYTE );.    fcnt
8910: 6c 28 69 64 2d 3e 68 2c 20 46 5f 53 45 54 4c 4b  l(id->h, F_SETLK
8920: 2c 20 26 6c 6f 63 6b 29 3b 0a 20 20 20 20 70 4c  , &lock);.    pL
8930: 6f 63 6b 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20  ock->locktype = 
8940: 53 48 41 52 45 44 5f 4c 4f 43 4b 3b 0a 20 20 7d  SHARED_LOCK;.  }
8950: 0a 20 20 69 66 28 20 6c 6f 63 6b 74 79 70 65 3d  .  if( locktype=
8960: 3d 4e 4f 5f 4c 4f 43 4b 20 29 7b 0a 20 20 20 20  =NO_LOCK ){.    
8970: 73 74 72 75 63 74 20 6f 70 65 6e 43 6e 74 20 2a  struct openCnt *
8980: 70 4f 70 65 6e 3b 0a 0a 20 20 20 20 2f 2a 20 44  pOpen;..    /* D
8990: 65 63 72 65 6d 65 6e 74 20 74 68 65 20 73 68 61  ecrement the sha
89a0: 72 65 64 20 6c 6f 63 6b 20 63 6f 75 6e 74 65 72  red lock counter
89b0: 2e 20 20 52 65 6c 65 61 73 65 20 74 68 65 20 6c  .  Release the l
89c0: 6f 63 6b 20 75 73 69 6e 67 20 61 6e 0a 20 20 20  ock using an.   
89d0: 20 2a 2a 20 4f 53 20 63 61 6c 6c 20 6f 6e 6c 79   ** OS call only
89e0: 20 77 68 65 6e 20 61 6c 6c 20 74 68 72 65 61 64   when all thread
89f0: 73 20 69 6e 20 74 68 69 73 20 73 61 6d 65 20 70  s in this same p
8a00: 72 6f 63 65 73 73 20 68 61 76 65 20 72 65 6c 65  rocess have rele
8a10: 61 73 65 64 0a 20 20 20 20 2a 2a 20 74 68 65 20  ased.    ** the 
8a20: 6c 6f 63 6b 2e 0a 20 20 20 20 2a 2f 0a 20 20 20  lock..    */.   
8a30: 20 70 4c 6f 63 6b 2d 3e 63 6e 74 2d 2d 3b 0a 20   pLock->cnt--;. 
8a40: 20 20 20 69 66 28 20 70 4c 6f 63 6b 2d 3e 63 6e     if( pLock->cn
8a50: 74 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 6c 6f  t==0 ){.      lo
8a60: 63 6b 2e 6c 5f 74 79 70 65 20 3d 20 46 5f 55 4e  ck.l_type = F_UN
8a70: 4c 43 4b 3b 0a 20 20 20 20 20 20 6c 6f 63 6b 2e  LCK;.      lock.
8a80: 6c 5f 77 68 65 6e 63 65 20 3d 20 53 45 45 4b 5f  l_whence = SEEK_
8a90: 53 45 54 3b 0a 20 20 20 20 20 20 6c 6f 63 6b 2e  SET;.      lock.
8aa0: 6c 5f 73 74 61 72 74 20 3d 20 6c 6f 63 6b 2e 6c  l_start = lock.l
8ab0: 5f 6c 65 6e 20 3d 20 30 4c 3b 0a 20 20 20 20 20  _len = 0L;.     
8ac0: 20 66 63 6e 74 6c 28 69 64 2d 3e 68 2c 20 46 5f   fcntl(id->h, F_
8ad0: 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b 0a 20  SETLK, &lock);. 
8ae0: 20 20 20 20 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b       pLock->lock
8af0: 74 79 70 65 20 3d 20 4e 4f 5f 4c 4f 43 4b 3b 0a  type = NO_LOCK;.
8b00: 20 20 20 20 7d 0a 0a 20 20 20 20 2f 2a 20 44 65      }..    /* De
8b10: 63 72 65 6d 65 6e 74 20 74 68 65 20 63 6f 75 6e  crement the coun
8b20: 74 20 6f 66 20 6c 6f 63 6b 73 20 61 67 61 69 6e  t of locks again
8b30: 73 74 20 74 68 69 73 20 73 61 6d 65 20 66 69 6c  st this same fil
8b40: 65 2e 20 20 57 68 65 6e 20 74 68 65 0a 20 20 20  e.  When the.   
8b50: 20 2a 2a 20 63 6f 75 6e 74 20 72 65 61 63 68 65   ** count reache
8b60: 73 20 7a 65 72 6f 2c 20 63 6c 6f 73 65 20 61 6e  s zero, close an
8b70: 79 20 6f 74 68 65 72 20 66 69 6c 65 20 64 65 73  y other file des
8b80: 63 72 69 70 74 6f 72 73 20 77 68 6f 73 65 20 63  criptors whose c
8b90: 6c 6f 73 65 0a 20 20 20 20 2a 2a 20 77 61 73 20  lose.    ** was 
8ba0: 64 65 66 65 72 72 65 64 20 62 65 63 61 75 73 65  deferred because
8bb0: 20 6f 66 20 6f 75 74 73 74 61 6e 64 69 6e 67 20   of outstanding 
8bc0: 6c 6f 63 6b 73 2e 0a 20 20 20 20 2a 2f 0a 20 20  locks..    */.  
8bd0: 20 20 70 4f 70 65 6e 20 3d 20 69 64 2d 3e 70 4f    pOpen = id->pO
8be0: 70 65 6e 3b 0a 20 20 20 20 70 4f 70 65 6e 2d 3e  pen;.    pOpen->
8bf0: 6e 4c 6f 63 6b 2d 2d 3b 0a 20 20 20 20 61 73 73  nLock--;.    ass
8c00: 65 72 74 28 20 70 4f 70 65 6e 2d 3e 6e 4c 6f 63  ert( pOpen->nLoc
8c10: 6b 3e 3d 30 20 29 3b 0a 20 20 20 20 69 66 28 20  k>=0 );.    if( 
8c20: 70 4f 70 65 6e 2d 3e 6e 4c 6f 63 6b 3d 3d 30 20  pOpen->nLock==0 
8c30: 26 26 20 70 4f 70 65 6e 2d 3e 6e 50 65 6e 64 69  && pOpen->nPendi
8c40: 6e 67 3e 30 20 29 7b 0a 20 20 20 20 20 20 69 6e  ng>0 ){.      in
8c50: 74 20 69 3b 0a 20 20 20 20 20 20 66 6f 72 28 69  t i;.      for(i
8c60: 3d 30 3b 20 69 3c 70 4f 70 65 6e 2d 3e 6e 50 65  =0; i<pOpen->nPe
8c70: 6e 64 69 6e 67 3b 20 69 2b 2b 29 7b 0a 20 20 20  nding; i++){.   
8c80: 20 20 20 20 20 63 6c 6f 73 65 28 70 4f 70 65 6e       close(pOpen
8c90: 2d 3e 61 50 65 6e 64 69 6e 67 5b 69 5d 29 3b 0a  ->aPending[i]);.
8ca0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 73 71        }.      sq
8cb0: 6c 69 74 65 46 72 65 65 28 70 4f 70 65 6e 2d 3e  liteFree(pOpen->
8cc0: 61 50 65 6e 64 69 6e 67 29 3b 0a 20 20 20 20 20  aPending);.     
8cd0: 20 70 4f 70 65 6e 2d 3e 6e 50 65 6e 64 69 6e 67   pOpen->nPending
8ce0: 20 3d 20 30 3b 0a 20 20 20 20 20 20 70 4f 70 65   = 0;.      pOpe
8cf0: 6e 2d 3e 61 50 65 6e 64 69 6e 67 20 3d 20 30 3b  n->aPending = 0;
8d00: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 73 71 6c  .    }.  }.  sql
8d10: 69 74 65 33 4f 73 4c 65 61 76 65 4d 75 74 65 78  ite3OsLeaveMutex
8d20: 28 29 3b 0a 20 20 69 64 2d 3e 6c 6f 63 6b 74 79  ();.  id->lockty
8d30: 70 65 20 3d 20 6c 6f 63 6b 74 79 70 65 3b 0a 20  pe = locktype;. 
8d40: 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f   return rc;.}../
8d50: 2a 0a 2a 2a 20 43 6c 6f 73 65 20 61 20 66 69 6c  *.** Close a fil
8d60: 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  e..*/.int sqlite
8d70: 33 4f 73 43 6c 6f 73 65 28 4f 73 46 69 6c 65 20  3OsClose(OsFile 
8d80: 2a 69 64 29 7b 0a 20 20 69 66 28 20 21 69 64 2d  *id){.  if( !id-
8d90: 3e 69 73 4f 70 65 6e 20 29 20 72 65 74 75 72 6e  >isOpen ) return
8da0: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 73 71   SQLITE_OK;.  sq
8db0: 6c 69 74 65 33 4f 73 55 6e 6c 6f 63 6b 28 69 64  lite3OsUnlock(id
8dc0: 2c 20 4e 4f 5f 4c 4f 43 4b 29 3b 0a 20 20 69 66  , NO_LOCK);.  if
8dd0: 28 20 69 64 2d 3e 64 69 72 66 64 3e 3d 30 20 29  ( id->dirfd>=0 )
8de0: 20 63 6c 6f 73 65 28 69 64 2d 3e 64 69 72 66 64   close(id->dirfd
8df0: 29 3b 0a 20 20 69 64 2d 3e 64 69 72 66 64 20 3d  );.  id->dirfd =
8e00: 20 2d 31 3b 0a 20 20 73 71 6c 69 74 65 33 4f 73   -1;.  sqlite3Os
8e10: 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a 20 20  EnterMutex();.  
8e20: 69 66 28 20 69 64 2d 3e 70 4f 70 65 6e 2d 3e 6e  if( id->pOpen->n
8e30: 4c 6f 63 6b 20 29 7b 0a 20 20 20 20 2f 2a 20 49  Lock ){.    /* I
8e40: 66 20 74 68 65 72 65 20 61 72 65 20 6f 75 74 73  f there are outs
8e50: 74 61 6e 64 69 6e 67 20 6c 6f 63 6b 73 2c 20 64  tanding locks, d
8e60: 6f 20 6e 6f 74 20 61 63 74 75 61 6c 6c 79 20 63  o not actually c
8e70: 6c 6f 73 65 20 74 68 65 20 66 69 6c 65 20 6a 75  lose the file ju
8e80: 73 74 0a 20 20 20 20 2a 2a 20 79 65 74 20 62 65  st.    ** yet be
8e90: 63 61 75 73 65 20 74 68 61 74 20 77 6f 75 6c 64  cause that would
8ea0: 20 63 6c 65 61 72 20 74 68 6f 73 65 20 6c 6f 63   clear those loc
8eb0: 6b 73 2e 20 20 49 6e 73 74 65 61 64 2c 20 61 64  ks.  Instead, ad
8ec0: 64 20 74 68 65 20 66 69 6c 65 0a 20 20 20 20 2a  d the file.    *
8ed0: 2a 20 64 65 73 63 72 69 70 74 6f 72 20 74 6f 20  * descriptor to 
8ee0: 70 4f 70 65 6e 2d 3e 61 50 65 6e 64 69 6e 67 2e  pOpen->aPending.
8ef0: 20 20 49 74 20 77 69 6c 6c 20 62 65 20 61 75 74    It will be aut
8f00: 6f 6d 61 74 69 63 61 6c 6c 79 20 63 6c 6f 73 65  omatically close
8f10: 64 20 77 68 65 6e 0a 20 20 20 20 2a 2a 20 74 68  d when.    ** th
8f20: 65 20 6c 61 73 74 20 6c 6f 63 6b 20 69 73 20 63  e last lock is c
8f30: 6c 65 61 72 65 64 2e 0a 20 20 20 20 2a 2f 0a 20  leared..    */. 
8f40: 20 20 20 69 6e 74 20 2a 61 4e 65 77 3b 0a 20 20     int *aNew;.  
8f50: 20 20 73 74 72 75 63 74 20 6f 70 65 6e 43 6e 74    struct openCnt
8f60: 20 2a 70 4f 70 65 6e 20 3d 20 69 64 2d 3e 70 4f   *pOpen = id->pO
8f70: 70 65 6e 3b 0a 20 20 20 20 70 4f 70 65 6e 2d 3e  pen;.    pOpen->
8f80: 6e 50 65 6e 64 69 6e 67 2b 2b 3b 0a 20 20 20 20  nPending++;.    
8f90: 61 4e 65 77 20 3d 20 73 71 6c 69 74 65 52 65 61  aNew = sqliteRea
8fa0: 6c 6c 6f 63 28 20 70 4f 70 65 6e 2d 3e 61 50 65  lloc( pOpen->aPe
8fb0: 6e 64 69 6e 67 2c 20 70 4f 70 65 6e 2d 3e 6e 50  nding, pOpen->nP
8fc0: 65 6e 64 69 6e 67 2a 73 69 7a 65 6f 66 28 69 6e  ending*sizeof(in
8fd0: 74 29 20 29 3b 0a 20 20 20 20 69 66 28 20 61 4e  t) );.    if( aN
8fe0: 65 77 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 2f  ew==0 ){.      /
8ff0: 2a 20 49 66 20 61 20 6d 61 6c 6c 6f 63 20 66 61  * If a malloc fa
9000: 69 6c 73 2c 20 6a 75 73 74 20 6c 65 61 6b 20 74  ils, just leak t
9010: 68 65 20 66 69 6c 65 20 64 65 73 63 72 69 70 74  he file descript
9020: 6f 72 20 2a 2f 0a 20 20 20 20 7d 65 6c 73 65 7b  or */.    }else{
9030: 0a 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e 61 50  .      pOpen->aP
9040: 65 6e 64 69 6e 67 20 3d 20 61 4e 65 77 3b 0a 20  ending = aNew;. 
9050: 20 20 20 20 20 70 4f 70 65 6e 2d 3e 61 50 65 6e       pOpen->aPen
9060: 64 69 6e 67 5b 70 4f 70 65 6e 2d 3e 6e 50 65 6e  ding[pOpen->nPen
9070: 64 69 6e 67 2d 31 5d 20 3d 20 69 64 2d 3e 68 3b  ding-1] = id->h;
9080: 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a  .    }.  }else{.
9090: 20 20 20 20 2f 2a 20 54 68 65 72 65 20 61 72 65      /* There are
90a0: 20 6e 6f 20 6f 75 74 73 74 61 6e 64 69 6e 67 20   no outstanding 
90b0: 6c 6f 63 6b 73 20 73 6f 20 77 65 20 63 61 6e 20  locks so we can 
90c0: 63 6c 6f 73 65 20 74 68 65 20 66 69 6c 65 20 69  close the file i
90d0: 6d 6d 65 64 69 61 74 65 6c 79 20 2a 2f 0a 20 20  mmediately */.  
90e0: 20 20 63 6c 6f 73 65 28 69 64 2d 3e 68 29 3b 0a    close(id->h);.
90f0: 20 20 7d 0a 20 20 72 65 6c 65 61 73 65 4c 6f 63    }.  releaseLoc
9100: 6b 49 6e 66 6f 28 69 64 2d 3e 70 4c 6f 63 6b 29  kInfo(id->pLock)
9110: 3b 0a 20 20 72 65 6c 65 61 73 65 4f 70 65 6e 43  ;.  releaseOpenC
9120: 6e 74 28 69 64 2d 3e 70 4f 70 65 6e 29 3b 0a 20  nt(id->pOpen);. 
9130: 20 73 71 6c 69 74 65 33 4f 73 4c 65 61 76 65 4d   sqlite3OsLeaveM
9140: 75 74 65 78 28 29 3b 0a 20 20 69 64 2d 3e 69 73  utex();.  id->is
9150: 4f 70 65 6e 20 3d 20 30 3b 0a 20 20 54 52 41 43  Open = 0;.  TRAC
9160: 45 32 28 22 43 4c 4f 53 45 20 20 20 25 2d 33 64  E2("CLOSE   %-3d
9170: 5c 6e 22 2c 20 69 64 2d 3e 68 29 3b 0a 20 20 4f  \n", id->h);.  O
9180: 70 65 6e 43 6f 75 6e 74 65 72 28 2d 31 29 3b 0a  penCounter(-1);.
9190: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
91a0: 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 65 74  OK;.}../*.** Get
91b0: 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 74 6f 20   information to 
91c0: 73 65 65 64 20 74 68 65 20 72 61 6e 64 6f 6d 20  seed the random 
91d0: 6e 75 6d 62 65 72 20 67 65 6e 65 72 61 74 6f 72  number generator
91e0: 2e 20 20 54 68 65 20 73 65 65 64 0a 2a 2a 20 69  .  The seed.** i
91f0: 73 20 77 72 69 74 74 65 6e 20 69 6e 74 6f 20 74  s written into t
9200: 68 65 20 62 75 66 66 65 72 20 7a 42 75 66 5b 32  he buffer zBuf[2
9210: 35 36 5d 2e 20 20 54 68 65 20 63 61 6c 6c 69 6e  56].  The callin
9220: 67 20 66 75 6e 63 74 69 6f 6e 20 6d 75 73 74 0a  g function must.
9230: 2a 2a 20 73 75 70 70 6c 79 20 61 20 73 75 66 66  ** supply a suff
9240: 69 63 69 65 6e 74 6c 79 20 6c 61 72 67 65 20 62  iciently large b
9250: 75 66 66 65 72 2e 0a 2a 2f 0a 69 6e 74 20 73 71  uffer..*/.int sq
9260: 6c 69 74 65 33 4f 73 52 61 6e 64 6f 6d 53 65 65  lite3OsRandomSee
9270: 64 28 63 68 61 72 20 2a 7a 42 75 66 29 7b 0a 20  d(char *zBuf){. 
9280: 20 2f 2a 20 57 65 20 68 61 76 65 20 74 6f 20 69   /* We have to i
9290: 6e 69 74 69 61 6c 69 7a 65 20 7a 42 75 66 20 74  nitialize zBuf t
92a0: 6f 20 70 72 65 76 65 6e 74 20 76 61 6c 67 72 69  o prevent valgri
92b0: 6e 64 20 66 72 6f 6d 20 72 65 70 6f 72 74 69 6e  nd from reportin
92c0: 67 0a 20 20 2a 2a 20 65 72 72 6f 72 73 2e 20 20  g.  ** errors.  
92d0: 54 68 65 20 72 65 70 6f 72 74 73 20 69 73 73 75  The reports issu
92e0: 65 64 20 62 79 20 76 61 6c 67 72 69 6e 64 20 61  ed by valgrind a
92f0: 72 65 20 69 6e 63 6f 72 72 65 63 74 20 2d 20 77  re incorrect - w
9300: 65 20 77 6f 75 6c 64 0a 20 20 2a 2a 20 70 72 65  e would.  ** pre
9310: 66 65 72 20 74 68 61 74 20 74 68 65 20 72 61 6e  fer that the ran
9320: 64 6f 6d 6e 65 73 73 20 62 65 20 69 6e 63 72 65  domness be incre
9330: 61 73 65 64 20 62 79 20 6d 61 6b 69 6e 67 20 75  ased by making u
9340: 73 65 20 6f 66 20 74 68 65 0a 20 20 2a 2a 20 75  se of the.  ** u
9350: 6e 69 6e 69 74 69 61 6c 69 7a 65 64 20 73 70 61  ninitialized spa
9360: 63 65 20 69 6e 20 7a 42 75 66 20 2d 20 62 75 74  ce in zBuf - but
9370: 20 76 61 6c 67 72 69 6e 64 20 65 72 72 6f 72 73   valgrind errors
9380: 20 74 65 6e 64 20 74 6f 20 77 6f 72 72 79 0a 20   tend to worry. 
9390: 20 2a 2a 20 73 6f 6d 65 20 75 73 65 72 73 2e 20   ** some users. 
93a0: 20 52 61 74 68 65 72 20 74 68 61 6e 20 61 72 67   Rather than arg
93b0: 75 65 2c 20 69 74 20 73 65 65 6d 73 20 65 61 73  ue, it seems eas
93c0: 69 65 72 20 6a 75 73 74 20 74 6f 20 69 6e 69 74  ier just to init
93d0: 69 61 6c 69 7a 65 0a 20 20 2a 2a 20 74 68 65 20  ialize.  ** the 
93e0: 77 68 6f 6c 65 20 61 72 72 61 79 20 61 6e 64 20  whole array and 
93f0: 73 69 6c 65 6e 63 65 20 76 61 6c 67 72 69 6e 64  silence valgrind
9400: 2c 20 65 76 65 6e 20 69 66 20 74 68 61 74 20 6d  , even if that m
9410: 65 61 6e 73 20 6c 65 73 73 20 72 61 6e 64 6f 6d  eans less random
9420: 6e 65 73 73 0a 20 20 2a 2a 20 69 6e 20 74 68 65  ness.  ** in the
9430: 20 72 61 6e 64 6f 6d 20 73 65 65 64 2e 0a 20 20   random seed..  
9440: 2a 2a 0a 20 20 2a 2a 20 57 68 65 6e 20 74 65 73  **.  ** When tes
9450: 74 69 6e 67 2c 20 69 6e 69 74 69 61 6c 69 7a 69  ting, initializi
9460: 6e 67 20 7a 42 75 66 5b 5d 20 74 6f 20 7a 65 72  ng zBuf[] to zer
9470: 6f 20 69 73 20 61 6c 6c 20 77 65 20 64 6f 2e 20  o is all we do. 
9480: 20 54 68 61 74 20 6d 65 61 6e 73 0a 20 20 2a 2a   That means.  **
9490: 20 74 68 61 74 20 77 65 20 61 6c 77 61 79 73 20   that we always 
94a0: 75 73 65 20 74 68 65 20 73 61 6d 65 20 72 61 6e  use the same ran
94b0: 64 6f 6d 20 6e 75 6d 62 65 72 20 73 65 71 75 65  dom number seque
94c0: 6e 63 65 2e 2a 20 54 68 69 73 20 6d 61 6b 65 73  nce.* This makes
94d0: 20 74 68 65 0a 20 20 2a 2a 20 74 65 73 74 73 20   the.  ** tests 
94e0: 72 65 70 65 61 74 61 62 6c 65 2e 0a 20 20 2a 2f  repeatable..  */
94f0: 0a 20 20 6d 65 6d 73 65 74 28 7a 42 75 66 2c 20  .  memset(zBuf, 
9500: 30 2c 20 32 35 36 29 3b 0a 23 69 66 20 21 64 65  0, 256);.#if !de
9510: 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 54 45 53  fined(SQLITE_TES
9520: 54 29 0a 20 20 7b 0a 20 20 20 20 69 6e 74 20 70  T).  {.    int p
9530: 69 64 2c 20 66 64 3b 0a 20 20 20 20 66 64 20 3d  id, fd;.    fd =
9540: 20 6f 70 65 6e 28 22 2f 64 65 76 2f 75 72 61 6e   open("/dev/uran
9550: 64 6f 6d 22 2c 20 4f 5f 52 44 4f 4e 4c 59 29 3b  dom", O_RDONLY);
9560: 0a 20 20 20 20 69 66 28 20 66 64 3c 30 20 29 7b  .    if( fd<0 ){
9570: 0a 20 20 20 20 20 20 74 69 6d 65 28 28 74 69 6d  .      time((tim
9580: 65 5f 74 2a 29 7a 42 75 66 29 3b 0a 20 20 20 20  e_t*)zBuf);.    
9590: 20 20 70 69 64 20 3d 20 67 65 74 70 69 64 28 29    pid = getpid()
95a0: 3b 0a 20 20 20 20 20 20 6d 65 6d 63 70 79 28 26  ;.      memcpy(&
95b0: 7a 42 75 66 5b 73 69 7a 65 6f 66 28 74 69 6d 65  zBuf[sizeof(time
95c0: 5f 74 29 5d 2c 20 26 70 69 64 2c 20 73 69 7a 65  _t)], &pid, size
95d0: 6f 66 28 70 69 64 29 29 3b 0a 20 20 20 20 7d 65  of(pid));.    }e
95e0: 6c 73 65 7b 0a 20 20 20 20 20 20 72 65 61 64 28  lse{.      read(
95f0: 66 64 2c 20 7a 42 75 66 2c 20 32 35 36 29 3b 0a  fd, zBuf, 256);.
9600: 20 20 20 20 20 20 63 6c 6f 73 65 28 66 64 29 3b        close(fd);
9610: 0a 20 20 20 20 7d 0a 20 20 7d 0a 23 65 6e 64 69  .    }.  }.#endi
9620: 66 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  f.  return SQLIT
9630: 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53  E_OK;.}../*.** S
9640: 6c 65 65 70 20 66 6f 72 20 61 20 6c 69 74 74 6c  leep for a littl
9650: 65 20 77 68 69 6c 65 2e 20 20 52 65 74 75 72 6e  e while.  Return
9660: 20 74 68 65 20 61 6d 6f 75 6e 74 20 6f 66 20 74   the amount of t
9670: 69 6d 65 20 73 6c 65 70 74 2e 0a 2a 2f 0a 69 6e  ime slept..*/.in
9680: 74 20 73 71 6c 69 74 65 33 4f 73 53 6c 65 65 70  t sqlite3OsSleep
9690: 28 69 6e 74 20 6d 73 29 7b 0a 23 69 66 20 64 65  (int ms){.#if de
96a0: 66 69 6e 65 64 28 48 41 56 45 5f 55 53 4c 45 45  fined(HAVE_USLEE
96b0: 50 29 20 26 26 20 48 41 56 45 5f 55 53 4c 45 45  P) && HAVE_USLEE
96c0: 50 0a 20 20 75 73 6c 65 65 70 28 6d 73 2a 31 30  P.  usleep(ms*10
96d0: 30 30 29 3b 0a 20 20 72 65 74 75 72 6e 20 6d 73  00);.  return ms
96e0: 3b 0a 23 65 6c 73 65 0a 20 20 73 6c 65 65 70 28  ;.#else.  sleep(
96f0: 28 6d 73 2b 39 39 39 29 2f 31 30 30 30 29 3b 0a  (ms+999)/1000);.
9700: 20 20 72 65 74 75 72 6e 20 31 30 30 30 2a 28 28    return 1000*((
9710: 6d 73 2b 39 39 39 29 2f 31 30 30 30 29 3b 0a 23  ms+999)/1000);.#
9720: 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53  endif.}../*.** S
9730: 74 61 74 69 63 20 76 61 72 69 61 62 6c 65 73 20  tatic variables 
9740: 75 73 65 64 20 66 6f 72 20 74 68 72 65 61 64 20  used for thread 
9750: 73 79 6e 63 68 72 6f 6e 69 7a 61 74 69 6f 6e 0a  synchronization.
9760: 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 69 6e  */.static int in
9770: 4d 75 74 65 78 20 3d 20 30 3b 0a 23 69 66 64 65  Mutex = 0;.#ifde
9780: 66 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f 54 48  f SQLITE_UNIX_TH
9790: 52 45 41 44 53 0a 73 74 61 74 69 63 20 70 74 68  READS.static pth
97a0: 72 65 61 64 5f 6d 75 74 65 78 5f 74 20 6d 75 74  read_mutex_t mut
97b0: 65 78 20 3d 20 50 54 48 52 45 41 44 5f 4d 55 54  ex = PTHREAD_MUT
97c0: 45 58 5f 49 4e 49 54 49 41 4c 49 5a 45 52 3b 0a  EX_INITIALIZER;.
97d0: 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 54 68  #endif../*.** Th
97e0: 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 70 61 69 72  e following pair
97f0: 20 6f 66 20 72 6f 75 74 69 6e 65 20 69 6d 70 6c   of routine impl
9800: 65 6d 65 6e 74 20 6d 75 74 75 61 6c 20 65 78 63  ement mutual exc
9810: 6c 75 73 69 6f 6e 20 66 6f 72 0a 2a 2a 20 6d 75  lusion for.** mu
9820: 6c 74 69 2d 74 68 72 65 61 64 65 64 20 70 72 6f  lti-threaded pro
9830: 63 65 73 73 65 73 2e 20 20 4f 6e 6c 79 20 61 20  cesses.  Only a 
9840: 73 69 6e 67 6c 65 20 74 68 72 65 61 64 20 69 73  single thread is
9850: 20 61 6c 6c 6f 77 65 64 20 74 6f 0a 2a 2a 20 65   allowed to.** e
9860: 78 65 63 75 74 65 64 20 63 6f 64 65 20 74 68 61  xecuted code tha
9870: 74 20 69 73 20 73 75 72 72 6f 75 6e 64 65 64 20  t is surrounded 
9880: 62 79 20 45 6e 74 65 72 4d 75 74 65 78 28 29 20  by EnterMutex() 
9890: 61 6e 64 20 4c 65 61 76 65 4d 75 74 65 78 28 29  and LeaveMutex()
98a0: 2e 0a 2a 2a 0a 2a 2a 20 53 51 4c 69 74 65 20 75  ..**.** SQLite u
98b0: 73 65 73 20 6f 6e 6c 79 20 61 20 73 69 6e 67 6c  ses only a singl
98c0: 65 20 4d 75 74 65 78 2e 20 20 54 68 65 72 65 20  e Mutex.  There 
98d0: 69 73 20 6e 6f 74 20 6d 75 63 68 20 63 72 69 74  is not much crit
98e0: 69 63 61 6c 0a 2a 2a 20 63 6f 64 65 20 61 6e 64  ical.** code and
98f0: 20 77 68 61 74 20 6c 69 74 74 6c 65 20 74 68 65   what little the
9900: 72 65 20 69 73 20 65 78 65 63 75 74 65 73 20 71  re is executes q
9910: 75 69 63 6b 6c 79 20 61 6e 64 20 77 69 74 68 6f  uickly and witho
9920: 75 74 20 62 6c 6f 63 6b 69 6e 67 2e 0a 2a 2f 0a  ut blocking..*/.
9930: 76 6f 69 64 20 73 71 6c 69 74 65 33 4f 73 45 6e  void sqlite3OsEn
9940: 74 65 72 4d 75 74 65 78 28 29 7b 0a 23 69 66 64  terMutex(){.#ifd
9950: 65 66 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f 54  ef SQLITE_UNIX_T
9960: 48 52 45 41 44 53 0a 20 20 70 74 68 72 65 61 64  HREADS.  pthread
9970: 5f 6d 75 74 65 78 5f 6c 6f 63 6b 28 26 6d 75 74  _mutex_lock(&mut
9980: 65 78 29 3b 0a 23 65 6e 64 69 66 0a 20 20 61 73  ex);.#endif.  as
9990: 73 65 72 74 28 20 21 69 6e 4d 75 74 65 78 20 29  sert( !inMutex )
99a0: 3b 0a 20 20 69 6e 4d 75 74 65 78 20 3d 20 31 3b  ;.  inMutex = 1;
99b0: 0a 7d 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 4f  .}.void sqlite3O
99c0: 73 4c 65 61 76 65 4d 75 74 65 78 28 29 7b 0a 20  sLeaveMutex(){. 
99d0: 20 61 73 73 65 72 74 28 20 69 6e 4d 75 74 65 78   assert( inMutex
99e0: 20 29 3b 0a 20 20 69 6e 4d 75 74 65 78 20 3d 20   );.  inMutex = 
99f0: 30 3b 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45  0;.#ifdef SQLITE
9a00: 5f 55 4e 49 58 5f 54 48 52 45 41 44 53 0a 20 20  _UNIX_THREADS.  
9a10: 70 74 68 72 65 61 64 5f 6d 75 74 65 78 5f 75 6e  pthread_mutex_un
9a20: 6c 6f 63 6b 28 26 6d 75 74 65 78 29 3b 0a 23 65  lock(&mutex);.#e
9a30: 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 75  ndif.}../*.** Tu
9a40: 72 6e 20 61 20 72 65 6c 61 74 69 76 65 20 70 61  rn a relative pa
9a50: 74 68 6e 61 6d 65 20 69 6e 74 6f 20 61 20 66 75  thname into a fu
9a60: 6c 6c 20 70 61 74 68 6e 61 6d 65 2e 20 20 52 65  ll pathname.  Re
9a70: 74 75 72 6e 20 61 20 70 6f 69 6e 74 65 72 0a 2a  turn a pointer.*
9a80: 2a 20 74 6f 20 74 68 65 20 66 75 6c 6c 20 70 61  * to the full pa
9a90: 74 68 6e 61 6d 65 20 73 74 6f 72 65 64 20 69 6e  thname stored in
9aa0: 20 73 70 61 63 65 20 6f 62 74 61 69 6e 65 64 20   space obtained 
9ab0: 66 72 6f 6d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f  from sqliteMallo
9ac0: 63 28 29 2e 0a 2a 2a 20 54 68 65 20 63 61 6c 6c  c()..** The call
9ad0: 69 6e 67 20 66 75 6e 63 74 69 6f 6e 20 69 73 20  ing function is 
9ae0: 72 65 73 70 6f 6e 73 69 62 6c 65 20 66 6f 72 20  responsible for 
9af0: 66 72 65 65 69 6e 67 20 74 68 69 73 20 73 70 61  freeing this spa
9b00: 63 65 20 6f 6e 63 65 20 69 74 0a 2a 2a 20 69 73  ce once it.** is
9b10: 20 6e 6f 20 6c 6f 6e 67 65 72 20 6e 65 65 64 65   no longer neede
9b20: 64 2e 0a 2a 2f 0a 63 68 61 72 20 2a 73 71 6c 69  d..*/.char *sqli
9b30: 74 65 33 4f 73 46 75 6c 6c 50 61 74 68 6e 61 6d  te3OsFullPathnam
9b40: 65 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 52  e(const char *zR
9b50: 65 6c 61 74 69 76 65 29 7b 0a 20 20 63 68 61 72  elative){.  char
9b60: 20 2a 7a 46 75 6c 6c 20 3d 20 30 3b 0a 20 20 69   *zFull = 0;.  i
9b70: 66 28 20 7a 52 65 6c 61 74 69 76 65 5b 30 5d 3d  f( zRelative[0]=
9b80: 3d 27 2f 27 20 29 7b 0a 20 20 20 20 73 71 6c 69  ='/' ){.    sqli
9b90: 74 65 33 53 65 74 53 74 72 69 6e 67 28 26 7a 46  te3SetString(&zF
9ba0: 75 6c 6c 2c 20 7a 52 65 6c 61 74 69 76 65 2c 20  ull, zRelative, 
9bb0: 28 63 68 61 72 2a 29 30 29 3b 0a 20 20 7d 65 6c  (char*)0);.  }el
9bc0: 73 65 7b 0a 20 20 20 20 63 68 61 72 20 7a 42 75  se{.    char zBu
9bd0: 66 5b 35 30 30 30 5d 3b 0a 20 20 20 20 73 71 6c  f[5000];.    sql
9be0: 69 74 65 33 53 65 74 53 74 72 69 6e 67 28 26 7a  ite3SetString(&z
9bf0: 46 75 6c 6c 2c 20 67 65 74 63 77 64 28 7a 42 75  Full, getcwd(zBu
9c00: 66 2c 20 73 69 7a 65 6f 66 28 7a 42 75 66 29 29  f, sizeof(zBuf))
9c10: 2c 20 22 2f 22 2c 20 7a 52 65 6c 61 74 69 76 65  , "/", zRelative
9c20: 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,.              
9c30: 20 20 20 20 20 20 28 63 68 61 72 2a 29 30 29 3b        (char*)0);
9c40: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 7a 46  .  }.  return zF
9c50: 75 6c 6c 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  ull;.}../*.** Th
9c60: 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 76 61 72 69  e following vari
9c70: 61 62 6c 65 2c 20 69 66 20 73 65 74 20 74 6f 20  able, if set to 
9c80: 61 20 6e 6f 6e 2d 7a 65 72 6f 20 76 61 6c 75 65  a non-zero value
9c90: 2c 20 62 65 63 6f 6d 65 73 20 74 68 65 20 72 65  , becomes the re
9ca0: 73 75 6c 74 0a 2a 2a 20 72 65 74 75 72 6e 65 64  sult.** returned
9cb0: 20 66 72 6f 6d 20 73 71 6c 69 74 65 33 4f 73 43   from sqlite3OsC
9cc0: 75 72 72 65 6e 74 54 69 6d 65 28 29 2e 20 20 54  urrentTime().  T
9cd0: 68 69 73 20 69 73 20 75 73 65 64 20 66 6f 72 20  his is used for 
9ce0: 74 65 73 74 69 6e 67 2e 0a 2a 2f 0a 23 69 66 64  testing..*/.#ifd
9cf0: 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 69  ef SQLITE_TEST.i
9d00: 6e 74 20 73 71 6c 69 74 65 33 5f 63 75 72 72 65  nt sqlite3_curre
9d10: 6e 74 5f 74 69 6d 65 20 3d 20 30 3b 0a 23 65 6e  nt_time = 0;.#en
9d20: 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 46 69 6e 64 20  dif../*.** Find 
9d30: 74 68 65 20 63 75 72 72 65 6e 74 20 74 69 6d 65  the current time
9d40: 20 28 69 6e 20 55 6e 69 76 65 72 73 61 6c 20 43   (in Universal C
9d50: 6f 6f 72 64 69 6e 61 74 65 64 20 54 69 6d 65 29  oordinated Time)
9d60: 2e 20 20 57 72 69 74 65 20 74 68 65 0a 2a 2a 20  .  Write the.** 
9d70: 63 75 72 72 65 6e 74 20 74 69 6d 65 20 61 6e 64  current time and
9d80: 20 64 61 74 65 20 61 73 20 61 20 4a 75 6c 69 61   date as a Julia
9d90: 6e 20 44 61 79 20 6e 75 6d 62 65 72 20 69 6e 74  n Day number int
9da0: 6f 20 2a 70 72 4e 6f 77 20 61 6e 64 0a 2a 2a 20  o *prNow and.** 
9db0: 72 65 74 75 72 6e 20 30 2e 20 20 52 65 74 75 72  return 0.  Retur
9dc0: 6e 20 31 20 69 66 20 74 68 65 20 74 69 6d 65 20  n 1 if the time 
9dd0: 61 6e 64 20 64 61 74 65 20 63 61 6e 6e 6f 74 20  and date cannot 
9de0: 62 65 20 66 6f 75 6e 64 2e 0a 2a 2f 0a 69 6e 74  be found..*/.int
9df0: 20 73 71 6c 69 74 65 33 4f 73 43 75 72 72 65 6e   sqlite3OsCurren
9e00: 74 54 69 6d 65 28 64 6f 75 62 6c 65 20 2a 70 72  tTime(double *pr
9e10: 4e 6f 77 29 7b 0a 20 20 74 69 6d 65 5f 74 20 74  Now){.  time_t t
9e20: 3b 0a 20 20 74 69 6d 65 28 26 74 29 3b 0a 20 20  ;.  time(&t);.  
9e30: 2a 70 72 4e 6f 77 20 3d 20 74 2f 38 36 34 30 30  *prNow = t/86400
9e40: 2e 30 20 2b 20 32 34 34 30 35 38 37 2e 35 3b 0a  .0 + 2440587.5;.
9e50: 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45  #ifdef SQLITE_TE
9e60: 53 54 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33  ST.  if( sqlite3
9e70: 5f 63 75 72 72 65 6e 74 5f 74 69 6d 65 20 29 7b  _current_time ){
9e80: 0a 20 20 20 20 2a 70 72 4e 6f 77 20 3d 20 73 71  .    *prNow = sq
9e90: 6c 69 74 65 33 5f 63 75 72 72 65 6e 74 5f 74 69  lite3_current_ti
9ea0: 6d 65 2f 38 36 34 30 30 2e 30 20 2b 20 32 34 34  me/86400.0 + 244
9eb0: 30 35 38 37 2e 35 3b 0a 20 20 7d 0a 23 65 6e 64  0587.5;.  }.#end
9ec0: 69 66 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d  if.  return 0;.}
9ed0: 0a 0a 23 69 66 20 30 20 2f 2a 20 4e 4f 54 20 55  ..#if 0 /* NOT U
9ee0: 53 45 44 20 2a 2f 0a 2f 2a 0a 2a 2a 20 46 69 6e  SED */./*.** Fin
9ef0: 64 20 74 68 65 20 74 69 6d 65 20 74 68 61 74 20  d the time that 
9f00: 74 68 65 20 66 69 6c 65 20 77 61 73 20 6c 61 73  the file was las
9f10: 74 20 6d 6f 64 69 66 69 65 64 2e 20 20 57 72 69  t modified.  Wri
9f20: 74 65 20 74 68 65 0a 2a 2a 20 6d 6f 64 69 66 69  te the.** modifi
9f30: 63 61 74 69 6f 6e 20 74 69 6d 65 20 61 6e 64 20  cation time and 
9f40: 64 61 74 65 20 61 73 20 61 20 4a 75 6c 69 61 6e  date as a Julian
9f50: 20 44 61 79 20 6e 75 6d 62 65 72 20 69 6e 74 6f   Day number into
9f60: 20 2a 70 72 4e 6f 77 20 61 6e 64 0a 2a 2a 20 72   *prNow and.** r
9f70: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 2e  eturn SQLITE_OK.
9f80: 20 20 52 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    Return SQLITE_
9f90: 45 52 52 4f 52 20 69 66 20 74 68 65 20 6d 6f 64  ERROR if the mod
9fa0: 69 66 69 63 61 74 69 6f 6e 0a 2a 2a 20 74 69 6d  ification.** tim
9fb0: 65 20 63 61 6e 6e 6f 74 20 62 65 20 66 6f 75 6e  e cannot be foun
9fc0: 64 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  d..*/.int sqlite
9fd0: 33 4f 73 46 69 6c 65 4d 6f 64 54 69 6d 65 28 4f  3OsFileModTime(O
9fe0: 73 46 69 6c 65 20 2a 69 64 2c 20 64 6f 75 62 6c  sFile *id, doubl
9ff0: 65 20 2a 70 72 4e 6f 77 29 7b 0a 20 20 69 6e 74  e *prNow){.  int
a000: 20 72 63 3b 0a 20 20 73 74 72 75 63 74 20 73 74   rc;.  struct st
a010: 61 74 20 73 74 61 74 62 75 66 3b 0a 20 20 69 66  at statbuf;.  if
a020: 28 20 66 73 74 61 74 28 69 64 2d 3e 68 2c 20 26  ( fstat(id->h, &
a030: 73 74 61 74 62 75 66 29 3d 3d 30 20 29 7b 0a 20  statbuf)==0 ){. 
a040: 20 20 20 2a 70 72 4e 6f 77 20 3d 20 73 74 61 74     *prNow = stat
a050: 62 75 66 2e 73 74 5f 6d 74 69 6d 65 2f 38 36 34  buf.st_mtime/864
a060: 30 30 2e 30 20 2b 20 32 34 34 30 35 38 37 2e 35  00.0 + 2440587.5
a070: 3b 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54  ;.    rc = SQLIT
a080: 45 5f 4f 4b 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20  E_OK;.  }else{. 
a090: 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 45     rc = SQLITE_E
a0a0: 52 52 4f 52 3b 0a 20 20 7d 0a 20 20 72 65 74 75  RROR;.  }.  retu
a0b0: 72 6e 20 72 63 3b 0a 7d 0a 23 65 6e 64 69 66 20  rn rc;.}.#endif 
a0c0: 2f 2a 20 4e 4f 54 20 55 53 45 44 20 2a 2f 0a 0a  /* NOT USED */..
a0d0: 23 65 6e 64 69 66 20 2f 2a 20 4f 53 5f 55 4e 49  #endif /* OS_UNI
a0e0: 58 20 2a 2f 0a                                   X */.