/ Hex Artifact Content
Login

Artifact 7dca8d07ac1d6e2b589eda6d536a4d143160a0f3:


0000: 2f 2a 0a 2a 2a 20 32 30 30 34 20 4d 61 79 20 32  /*.** 2004 May 2
0010: 32 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 75 74 68  2.**.** The auth
0020: 6f 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70  or disclaims cop
0030: 79 72 69 67 68 74 20 74 6f 20 74 68 69 73 20 73  yright to this s
0040: 6f 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20  ource code.  In 
0050: 70 6c 61 63 65 20 6f 66 0a 2a 2a 20 61 20 6c 65  place of.** a le
0060: 67 61 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72 65  gal notice, here
0070: 20 69 73 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a   is a blessing:.
0080: 2a 2a 0a 2a 2a 20 20 20 20 4d 61 79 20 79 6f 75  **.**    May you
0090: 20 64 6f 20 67 6f 6f 64 20 61 6e 64 20 6e 6f 74   do good and not
00a0: 20 65 76 69 6c 2e 0a 2a 2a 20 20 20 20 4d 61 79   evil..**    May
00b0: 20 79 6f 75 20 66 69 6e 64 20 66 6f 72 67 69 76   you find forgiv
00c0: 65 6e 65 73 73 20 66 6f 72 20 79 6f 75 72 73 65  eness for yourse
00d0: 6c 66 20 61 6e 64 20 66 6f 72 67 69 76 65 20 6f  lf and forgive o
00e0: 74 68 65 72 73 2e 0a 2a 2a 20 20 20 20 4d 61 79  thers..**    May
00f0: 20 79 6f 75 20 73 68 61 72 65 20 66 72 65 65 6c   you share freel
0100: 79 2c 20 6e 65 76 65 72 20 74 61 6b 69 6e 67 20  y, never taking 
0110: 6d 6f 72 65 20 74 68 61 6e 20 79 6f 75 20 67 69  more than you gi
0120: 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ve..**.*********
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0170: 2a 2a 2a 2a 2a 0a 2a 2a 0a 2a 2a 20 54 68 69 73  *****.**.** This
0180: 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 63   file contains c
0190: 6f 64 65 20 74 68 61 74 20 69 73 20 73 70 65 63  ode that is spec
01a0: 69 66 69 63 20 74 6f 20 55 6e 69 78 20 73 79 73  ific to Unix sys
01b0: 74 65 6d 73 2e 0a 2a 2f 0a 23 69 6e 63 6c 75 64  tems..*/.#includ
01c0: 65 20 22 6f 73 2e 68 22 20 20 20 20 20 20 20 20  e "os.h"        
01d0: 20 20 2f 2a 20 4d 75 73 74 20 62 65 20 66 69 72    /* Must be fir
01e0: 73 74 20 74 6f 20 65 6e 61 62 6c 65 20 6c 61 72  st to enable lar
01f0: 67 65 20 66 69 6c 65 20 73 75 70 70 6f 72 74 20  ge file support 
0200: 2a 2f 0a 23 69 66 20 4f 53 5f 55 4e 49 58 20 20  */.#if OS_UNIX  
0210: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54              /* T
0220: 68 69 73 20 66 69 6c 65 20 69 73 20 75 73 65 64  his file is used
0230: 20 6f 6e 20 75 6e 69 78 20 6f 6e 6c 79 20 2a 2f   on unix only */
0240: 0a 23 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74  .#include "sqlit
0250: 65 49 6e 74 2e 68 22 0a 0a 0a 23 69 6e 63 6c 75  eInt.h"...#inclu
0260: 64 65 20 3c 74 69 6d 65 2e 68 3e 0a 23 69 6e 63  de <time.h>.#inc
0270: 6c 75 64 65 20 3c 65 72 72 6e 6f 2e 68 3e 0a 23  lude <errno.h>.#
0280: 69 6e 63 6c 75 64 65 20 3c 75 6e 69 73 74 64 2e  include <unistd.
0290: 68 3e 0a 23 69 66 6e 64 65 66 20 4f 5f 4c 41 52  h>.#ifndef O_LAR
02a0: 47 45 46 49 4c 45 0a 23 20 64 65 66 69 6e 65 20  GEFILE.# define 
02b0: 4f 5f 4c 41 52 47 45 46 49 4c 45 20 30 0a 23 65  O_LARGEFILE 0.#e
02c0: 6e 64 69 66 0a 23 69 66 64 65 66 20 53 51 4c 49  ndif.#ifdef SQLI
02d0: 54 45 5f 44 49 53 41 42 4c 45 5f 4c 46 53 0a 23  TE_DISABLE_LFS.#
02e0: 20 75 6e 64 65 66 20 4f 5f 4c 41 52 47 45 46 49   undef O_LARGEFI
02f0: 4c 45 0a 23 20 64 65 66 69 6e 65 20 4f 5f 4c 41  LE.# define O_LA
0300: 52 47 45 46 49 4c 45 20 30 0a 23 65 6e 64 69 66  RGEFILE 0.#endif
0310: 0a 23 69 66 6e 64 65 66 20 4f 5f 4e 4f 46 4f 4c  .#ifndef O_NOFOL
0320: 4c 4f 57 0a 23 20 64 65 66 69 6e 65 20 4f 5f 4e  LOW.# define O_N
0330: 4f 46 4f 4c 4c 4f 57 20 30 0a 23 65 6e 64 69 66  OFOLLOW 0.#endif
0340: 0a 23 69 66 6e 64 65 66 20 4f 5f 42 49 4e 41 52  .#ifndef O_BINAR
0350: 59 0a 23 20 64 65 66 69 6e 65 20 4f 5f 42 49 4e  Y.# define O_BIN
0360: 41 52 59 20 30 0a 23 65 6e 64 69 66 0a 0a 2f 2a  ARY 0.#endif../*
0370: 0a 2a 2a 20 54 68 65 20 44 4a 47 50 50 20 63 6f  .** The DJGPP co
0380: 6d 70 69 6c 65 72 20 65 6e 76 69 72 6f 6e 6d 65  mpiler environme
0390: 6e 74 20 6c 6f 6f 6b 73 20 6d 6f 73 74 6c 79 20  nt looks mostly 
03a0: 6c 69 6b 65 20 55 6e 69 78 2c 20 62 75 74 20 69  like Unix, but i
03b0: 74 0a 2a 2a 20 6c 61 63 6b 73 20 74 68 65 20 66  t.** lacks the f
03c0: 63 6e 74 6c 28 29 20 73 79 73 74 65 6d 20 63 61  cntl() system ca
03d0: 6c 6c 2e 20 20 53 6f 20 72 65 64 65 66 69 6e 65  ll.  So redefine
03e0: 20 66 63 6e 74 6c 28 29 20 74 6f 20 62 65 20 73   fcntl() to be s
03f0: 6f 6d 65 74 68 69 6e 67 0a 2a 2a 20 74 68 61 74  omething.** that
0400: 20 61 6c 77 61 79 73 20 73 75 63 63 65 65 64 73   always succeeds
0410: 2e 20 20 54 68 69 73 20 6d 65 61 6e 73 20 74 68  .  This means th
0420: 61 74 20 6c 6f 63 6b 69 6e 67 20 64 6f 65 73 20  at locking does 
0430: 6e 6f 74 20 6f 63 63 75 72 20 75 6e 64 65 72 0a  not occur under.
0440: 2a 2a 20 44 4a 47 50 50 2e 20 20 42 75 74 20 69  ** DJGPP.  But i
0450: 74 73 20 44 4f 53 20 2d 20 77 68 61 74 20 64 69  ts DOS - what di
0460: 64 20 79 6f 75 20 65 78 70 65 63 74 3f 0a 2a 2f  d you expect?.*/
0470: 0a 23 69 66 64 65 66 20 5f 5f 44 4a 47 50 50 5f  .#ifdef __DJGPP_
0480: 5f 0a 23 20 64 65 66 69 6e 65 20 66 63 6e 74 6c  _.# define fcntl
0490: 28 41 2c 42 2c 43 29 20 30 0a 23 65 6e 64 69 66  (A,B,C) 0.#endif
04a0: 0a 0a 2f 2a 0a 2a 2a 20 4d 61 63 72 6f 73 20 75  ../*.** Macros u
04b0: 73 65 64 20 74 6f 20 64 65 74 65 72 6d 69 6e 65  sed to determine
04c0: 20 77 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20   whether or not 
04d0: 74 6f 20 75 73 65 20 74 68 72 65 61 64 73 2e 20  to use threads. 
04e0: 20 54 68 65 0a 2a 2a 20 53 51 4c 49 54 45 5f 55   The.** SQLITE_U
04f0: 4e 49 58 5f 54 48 52 45 41 44 53 20 6d 61 63 72  NIX_THREADS macr
0500: 6f 20 69 73 20 64 65 66 69 6e 65 64 20 69 66 20  o is defined if 
0510: 77 65 20 61 72 65 20 73 79 6e 63 68 72 6f 6e 69  we are synchroni
0520: 7a 69 6e 67 20 66 6f 72 0a 2a 2a 20 50 6f 73 69  zing for.** Posi
0530: 78 20 74 68 72 65 61 64 73 20 61 6e 64 20 53 51  x threads and SQ
0540: 4c 49 54 45 5f 57 33 32 5f 54 48 52 45 41 44 53  LITE_W32_THREADS
0550: 20 69 73 20 64 65 66 69 6e 65 64 20 69 66 20 77   is defined if w
0560: 65 20 61 72 65 0a 2a 2a 20 73 79 6e 63 68 72 6f  e are.** synchro
0570: 6e 69 7a 69 6e 67 20 75 73 69 6e 67 20 57 69 6e  nizing using Win
0580: 33 32 20 74 68 72 65 61 64 73 2e 0a 2a 2f 0a 23  32 threads..*/.#
0590: 69 66 20 64 65 66 69 6e 65 64 28 54 48 52 45 41  if defined(THREA
05a0: 44 53 41 46 45 29 20 26 26 20 54 48 52 45 41 44  DSAFE) && THREAD
05b0: 53 41 46 45 0a 23 20 69 6e 63 6c 75 64 65 20 3c  SAFE.# include <
05c0: 70 74 68 72 65 61 64 2e 68 3e 0a 23 20 64 65 66  pthread.h>.# def
05d0: 69 6e 65 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f  ine SQLITE_UNIX_
05e0: 54 48 52 45 41 44 53 20 31 0a 23 65 6e 64 69 66  THREADS 1.#endif
05f0: 0a 0a 0a 2f 2a 0a 2a 2a 20 49 6e 63 6c 75 64 65  .../*.** Include
0600: 20 63 6f 64 65 20 74 68 61 74 20 69 73 20 63 6f   code that is co
0610: 6d 6d 6f 6e 20 74 6f 20 61 6c 6c 20 6f 73 5f 2a  mmon to all os_*
0620: 2e 63 20 66 69 6c 65 73 0a 2a 2f 0a 23 69 6e 63  .c files.*/.#inc
0630: 6c 75 64 65 20 22 6f 73 5f 63 6f 6d 6d 6f 6e 2e  lude "os_common.
0640: 68 22 0a 0a 23 69 66 20 64 65 66 69 6e 65 64 28  h"..#if defined(
0650: 54 48 52 45 41 44 53 41 46 45 29 20 26 26 20 64  THREADSAFE) && d
0660: 65 66 69 6e 65 64 28 5f 5f 6c 69 6e 75 78 5f 5f  efined(__linux__
0670: 29 0a 23 64 65 66 69 6e 65 20 67 65 74 70 69 64  ).#define getpid
0680: 20 70 74 68 72 65 61 64 5f 73 65 6c 66 0a 23 65   pthread_self.#e
0690: 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 48 65 72 65  ndif../*.** Here
06a0: 20 69 73 20 74 68 65 20 64 69 72 74 20 6f 6e 20   is the dirt on 
06b0: 50 4f 53 49 58 20 61 64 76 69 73 6f 72 79 20 6c  POSIX advisory l
06c0: 6f 63 6b 73 3a 20 20 41 4e 53 49 20 53 54 44 20  ocks:  ANSI STD 
06d0: 31 30 30 33 2e 31 20 28 31 39 39 36 29 0a 2a 2a  1003.1 (1996).**
06e0: 20 73 65 63 74 69 6f 6e 20 36 2e 35 2e 32 2e 32   section 6.5.2.2
06f0: 20 6c 69 6e 65 73 20 34 38 33 20 74 68 72 6f 75   lines 483 throu
0700: 67 68 20 34 39 30 20 73 70 65 63 69 66 79 20 74  gh 490 specify t
0710: 68 61 74 20 77 68 65 6e 20 61 20 70 72 6f 63 65  hat when a proce
0720: 73 73 0a 2a 2a 20 73 65 74 73 20 6f 72 20 63 6c  ss.** sets or cl
0730: 65 61 72 73 20 61 20 6c 6f 63 6b 2c 20 74 68 61  ears a lock, tha
0740: 74 20 6f 70 65 72 61 74 69 6f 6e 20 6f 76 65 72  t operation over
0750: 72 69 64 65 73 20 61 6e 79 20 70 72 69 6f 72 20  rides any prior 
0760: 6c 6f 63 6b 73 20 73 65 74 0a 2a 2a 20 62 79 20  locks set.** by 
0770: 74 68 65 20 73 61 6d 65 20 70 72 6f 63 65 73 73  the same process
0780: 2e 20 20 49 74 20 64 6f 65 73 20 6e 6f 74 20 65  .  It does not e
0790: 78 70 6c 69 63 69 74 6c 79 20 73 61 79 20 73 6f  xplicitly say so
07a0: 2c 20 62 75 74 20 74 68 69 73 20 69 6d 70 6c 69  , but this impli
07b0: 65 73 0a 2a 2a 20 74 68 61 74 20 69 74 20 6f 76  es.** that it ov
07c0: 65 72 72 69 64 65 73 20 6c 6f 63 6b 73 20 73 65  errides locks se
07d0: 74 20 62 79 20 74 68 65 20 73 61 6d 65 20 70 72  t by the same pr
07e0: 6f 63 65 73 73 20 75 73 69 6e 67 20 61 20 64 69  ocess using a di
07f0: 66 66 65 72 65 6e 74 0a 2a 2a 20 66 69 6c 65 20  fferent.** file 
0800: 64 65 73 63 72 69 70 74 6f 72 2e 20 20 43 6f 6e  descriptor.  Con
0810: 73 69 64 65 72 20 74 68 69 73 20 74 65 73 74 20  sider this test 
0820: 63 61 73 65 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20  case:.**.**     
0830: 20 20 69 6e 74 20 66 64 31 20 3d 20 6f 70 65 6e    int fd1 = open
0840: 28 22 2e 2f 66 69 6c 65 31 22 2c 20 4f 5f 52 44  ("./file1", O_RD
0850: 57 52 7c 4f 5f 43 52 45 41 54 2c 20 30 36 34 34  WR|O_CREAT, 0644
0860: 29 3b 0a 2a 2a 20 20 20 20 20 20 20 69 6e 74 20  );.**       int 
0870: 66 64 32 20 3d 20 6f 70 65 6e 28 22 2e 2f 66 69  fd2 = open("./fi
0880: 6c 65 32 22 2c 20 4f 5f 52 44 57 52 7c 4f 5f 43  le2", O_RDWR|O_C
0890: 52 45 41 54 2c 20 30 36 34 34 29 3b 0a 2a 2a 0a  REAT, 0644);.**.
08a0: 2a 2a 20 53 75 70 70 6f 73 65 20 2e 2f 66 69 6c  ** Suppose ./fil
08b0: 65 31 20 61 6e 64 20 2e 2f 66 69 6c 65 32 20 61  e1 and ./file2 a
08c0: 72 65 20 72 65 61 6c 6c 79 20 74 68 65 20 73 61  re really the sa
08d0: 6d 65 20 66 69 6c 65 20 28 62 65 63 61 75 73 65  me file (because
08e0: 0a 2a 2a 20 6f 6e 65 20 69 73 20 61 20 68 61 72  .** one is a har
08f0: 64 20 6f 72 20 73 79 6d 62 6f 6c 69 63 20 6c 69  d or symbolic li
0900: 6e 6b 20 74 6f 20 74 68 65 20 6f 74 68 65 72 29  nk to the other)
0910: 20 74 68 65 6e 20 69 66 20 79 6f 75 20 73 65 74   then if you set
0920: 0a 2a 2a 20 61 6e 20 65 78 63 6c 75 73 69 76 65  .** an exclusive
0930: 20 6c 6f 63 6b 20 6f 6e 20 66 64 31 2c 20 74 68   lock on fd1, th
0940: 65 6e 20 74 72 79 20 74 6f 20 67 65 74 20 61 6e  en try to get an
0950: 20 65 78 63 6c 75 73 69 76 65 20 6c 6f 63 6b 0a   exclusive lock.
0960: 2a 2a 20 6f 6e 20 66 64 32 2c 20 69 74 20 77 6f  ** on fd2, it wo
0970: 72 6b 73 2e 20 20 49 20 77 6f 75 6c 64 20 68 61  rks.  I would ha
0980: 76 65 20 65 78 70 65 63 74 65 64 20 74 68 65 20  ve expected the 
0990: 73 65 63 6f 6e 64 20 6c 6f 63 6b 20 74 6f 0a 2a  second lock to.*
09a0: 2a 20 66 61 69 6c 20 73 69 6e 63 65 20 74 68 65  * fail since the
09b0: 72 65 20 77 61 73 20 61 6c 72 65 61 64 79 20 61  re was already a
09c0: 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 66 69 6c   lock on the fil
09d0: 65 20 64 75 65 20 74 6f 20 66 64 31 2e 0a 2a 2a  e due to fd1..**
09e0: 20 42 75 74 20 6e 6f 74 20 73 6f 2e 20 20 53 69   But not so.  Si
09f0: 6e 63 65 20 62 6f 74 68 20 6c 6f 63 6b 73 20 63  nce both locks c
0a00: 61 6d 65 20 66 72 6f 6d 20 74 68 65 20 73 61 6d  ame from the sam
0a10: 65 20 70 72 6f 63 65 73 73 2c 20 74 68 65 0a 2a  e process, the.*
0a20: 2a 20 73 65 63 6f 6e 64 20 6f 76 65 72 72 69 64  * second overrid
0a30: 65 73 20 74 68 65 20 66 69 72 73 74 2c 20 65 76  es the first, ev
0a40: 65 6e 20 74 68 6f 75 67 68 20 74 68 65 79 20 77  en though they w
0a50: 65 72 65 20 6f 6e 20 64 69 66 66 65 72 65 6e 74  ere on different
0a60: 0a 2a 2a 20 66 69 6c 65 20 64 65 73 63 72 69 70  .** file descrip
0a70: 74 6f 72 73 20 6f 70 65 6e 65 64 20 6f 6e 20 64  tors opened on d
0a80: 69 66 66 65 72 65 6e 74 20 66 69 6c 65 20 6e 61  ifferent file na
0a90: 6d 65 73 2e 0a 2a 2a 0a 2a 2a 20 42 75 6d 6d 65  mes..**.** Bumme
0aa0: 72 2e 20 20 49 66 20 79 6f 75 20 61 73 6b 20 6d  r.  If you ask m
0ab0: 65 2c 20 74 68 69 73 20 69 73 20 62 72 6f 6b 65  e, this is broke
0ac0: 6e 2e 20 20 42 61 64 6c 79 20 62 72 6f 6b 65 6e  n.  Badly broken
0ad0: 2e 20 20 49 74 20 6d 65 61 6e 73 0a 2a 2a 20 74  .  It means.** t
0ae0: 68 61 74 20 77 65 20 63 61 6e 6e 6f 74 20 75 73  hat we cannot us
0af0: 65 20 50 4f 53 49 58 20 6c 6f 63 6b 73 20 74 6f  e POSIX locks to
0b00: 20 73 79 6e 63 68 72 6f 6e 69 7a 65 20 66 69 6c   synchronize fil
0b10: 65 20 61 63 63 65 73 73 20 61 6d 6f 6e 67 0a 2a  e access among.*
0b20: 2a 20 63 6f 6d 70 65 74 69 6e 67 20 74 68 72 65  * competing thre
0b30: 61 64 73 20 6f 66 20 74 68 65 20 73 61 6d 65 20  ads of the same 
0b40: 70 72 6f 63 65 73 73 2e 20 20 50 4f 53 49 58 20  process.  POSIX 
0b50: 6c 6f 63 6b 73 20 77 69 6c 6c 20 77 6f 72 6b 20  locks will work 
0b60: 66 69 6e 65 0a 2a 2a 20 74 6f 20 73 79 6e 63 68  fine.** to synch
0b70: 72 6f 6e 69 7a 65 20 61 63 63 65 73 73 20 66 6f  ronize access fo
0b80: 72 20 74 68 72 65 61 64 73 20 69 6e 20 73 65 70  r threads in sep
0b90: 61 72 61 74 65 20 70 72 6f 63 65 73 73 65 73 2c  arate processes,
0ba0: 20 62 75 74 20 6e 6f 74 0a 2a 2a 20 74 68 72 65   but not.** thre
0bb0: 61 64 73 20 77 69 74 68 69 6e 20 74 68 65 20 73  ads within the s
0bc0: 61 6d 65 20 70 72 6f 63 65 73 73 2e 0a 2a 2a 0a  ame process..**.
0bd0: 2a 2a 20 54 6f 20 77 6f 72 6b 20 61 72 6f 75 6e  ** To work aroun
0be0: 64 20 74 68 65 20 70 72 6f 62 6c 65 6d 2c 20 53  d the problem, S
0bf0: 51 4c 69 74 65 20 68 61 73 20 74 6f 20 6d 61 6e  QLite has to man
0c00: 61 67 65 20 66 69 6c 65 20 6c 6f 63 6b 73 20 69  age file locks i
0c10: 6e 74 65 72 6e 61 6c 6c 79 0a 2a 2a 20 6f 6e 20  nternally.** on 
0c20: 69 74 73 20 6f 77 6e 2e 20 20 57 68 65 6e 65 76  its own.  Whenev
0c30: 65 72 20 61 20 6e 65 77 20 64 61 74 61 62 61 73  er a new databas
0c40: 65 20 69 73 20 6f 70 65 6e 65 64 2c 20 77 65 20  e is opened, we 
0c50: 68 61 76 65 20 74 6f 20 66 69 6e 64 20 74 68 65  have to find the
0c60: 0a 2a 2a 20 73 70 65 63 69 66 69 63 20 69 6e 6f  .** specific ino
0c70: 64 65 20 6f 66 20 74 68 65 20 64 61 74 61 62 61  de of the databa
0c80: 73 65 20 66 69 6c 65 20 28 74 68 65 20 69 6e 6f  se file (the ino
0c90: 64 65 20 69 73 20 64 65 74 65 72 6d 69 6e 65 64  de is determined
0ca0: 20 62 79 20 74 68 65 0a 2a 2a 20 73 74 5f 64 65   by the.** st_de
0cb0: 76 20 61 6e 64 20 73 74 5f 69 6e 6f 20 66 69 65  v and st_ino fie
0cc0: 6c 64 73 20 6f 66 20 74 68 65 20 73 74 61 74 20  lds of the stat 
0cd0: 73 74 72 75 63 74 75 72 65 20 74 68 61 74 20 66  structure that f
0ce0: 73 74 61 74 28 29 20 66 69 6c 6c 73 20 69 6e 29  stat() fills in)
0cf0: 0a 2a 2a 20 61 6e 64 20 63 68 65 63 6b 20 66 6f  .** and check fo
0d00: 72 20 6c 6f 63 6b 73 20 61 6c 72 65 61 64 79 20  r locks already 
0d10: 65 78 69 73 74 69 6e 67 20 6f 6e 20 74 68 61 74  existing on that
0d20: 20 69 6e 6f 64 65 2e 20 20 57 68 65 6e 20 6c 6f   inode.  When lo
0d30: 63 6b 73 20 61 72 65 0a 2a 2a 20 63 72 65 61 74  cks are.** creat
0d40: 65 64 20 6f 72 20 72 65 6d 6f 76 65 64 2c 20 77  ed or removed, w
0d50: 65 20 68 61 76 65 20 74 6f 20 6c 6f 6f 6b 20 61  e have to look a
0d60: 74 20 6f 75 72 20 6f 77 6e 20 69 6e 74 65 72 6e  t our own intern
0d70: 61 6c 20 72 65 63 6f 72 64 20 6f 66 20 74 68 65  al record of the
0d80: 0a 2a 2a 20 6c 6f 63 6b 73 20 74 6f 20 73 65 65  .** locks to see
0d90: 20 69 66 20 61 6e 6f 74 68 65 72 20 74 68 72 65   if another thre
0da0: 61 64 20 68 61 73 20 70 72 65 76 69 6f 75 73 6c  ad has previousl
0db0: 79 20 73 65 74 20 61 20 6c 6f 63 6b 20 6f 6e 20  y set a lock on 
0dc0: 74 68 61 74 20 73 61 6d 65 0a 2a 2a 20 69 6e 6f  that same.** ino
0dd0: 64 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 4f 73  de..**.** The Os
0de0: 46 69 6c 65 20 73 74 72 75 63 74 75 72 65 20 66  File structure f
0df0: 6f 72 20 50 4f 53 49 58 20 69 73 20 6e 6f 20 6c  or POSIX is no l
0e00: 6f 6e 67 65 72 20 6a 75 73 74 20 61 6e 20 69 6e  onger just an in
0e10: 74 65 67 65 72 20 66 69 6c 65 0a 2a 2a 20 64 65  teger file.** de
0e20: 73 63 72 69 70 74 6f 72 2e 20 20 49 74 20 69 73  scriptor.  It is
0e30: 20 6e 6f 77 20 61 20 73 74 72 75 63 74 75 72 65   now a structure
0e40: 20 74 68 61 74 20 68 6f 6c 64 73 20 74 68 65 20   that holds the 
0e50: 69 6e 74 65 67 65 72 20 66 69 6c 65 0a 2a 2a 20  integer file.** 
0e60: 64 65 73 63 72 69 70 74 6f 72 20 61 6e 64 20 61  descriptor and a
0e70: 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 20 73 74   pointer to a st
0e80: 72 75 63 74 75 72 65 20 74 68 61 74 20 64 65 73  ructure that des
0e90: 63 72 69 62 65 73 20 74 68 65 20 69 6e 74 65 72  cribes the inter
0ea0: 6e 61 6c 0a 2a 2a 20 6c 6f 63 6b 73 20 6f 6e 20  nal.** locks on 
0eb0: 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e  the correspondin
0ec0: 67 20 69 6e 6f 64 65 2e 20 20 54 68 65 72 65 20  g inode.  There 
0ed0: 69 73 20 6f 6e 65 20 6c 6f 63 6b 69 6e 67 20 73  is one locking s
0ee0: 74 72 75 63 74 75 72 65 0a 2a 2a 20 70 65 72 20  tructure.** per 
0ef0: 69 6e 6f 64 65 2c 20 73 6f 20 69 66 20 74 68 65  inode, so if the
0f00: 20 73 61 6d 65 20 69 6e 6f 64 65 20 69 73 20 6f   same inode is o
0f10: 70 65 6e 65 64 20 74 77 69 63 65 2c 20 62 6f 74  pened twice, bot
0f20: 68 20 4f 73 46 69 6c 65 20 73 74 72 75 63 74 75  h OsFile structu
0f30: 72 65 73 0a 2a 2a 20 70 6f 69 6e 74 20 74 6f 20  res.** point to 
0f40: 74 68 65 20 73 61 6d 65 20 6c 6f 63 6b 69 6e 67  the same locking
0f50: 20 73 74 72 75 63 74 75 72 65 2e 20 20 54 68 65   structure.  The
0f60: 20 6c 6f 63 6b 69 6e 67 20 73 74 72 75 63 74 75   locking structu
0f70: 72 65 20 6b 65 65 70 73 0a 2a 2a 20 61 20 72 65  re keeps.** a re
0f80: 66 65 72 65 6e 63 65 20 63 6f 75 6e 74 20 28 73  ference count (s
0f90: 6f 20 77 65 20 77 69 6c 6c 20 6b 6e 6f 77 20 77  o we will know w
0fa0: 68 65 6e 20 74 6f 20 64 65 6c 65 74 65 20 69 74  hen to delete it
0fb0: 29 20 61 6e 64 20 61 20 22 63 6e 74 22 0a 2a 2a  ) and a "cnt".**
0fc0: 20 66 69 65 6c 64 20 74 68 61 74 20 74 65 6c 6c   field that tell
0fd0: 73 20 75 73 20 69 74 73 20 69 6e 74 65 72 6e 61  s us its interna
0fe0: 6c 20 6c 6f 63 6b 20 73 74 61 74 75 73 2e 20 20  l lock status.  
0ff0: 63 6e 74 3d 3d 30 20 6d 65 61 6e 73 20 74 68 65  cnt==0 means the
1000: 0a 2a 2a 20 66 69 6c 65 20 69 73 20 75 6e 6c 6f  .** file is unlo
1010: 63 6b 65 64 2e 20 20 63 6e 74 3d 3d 2d 31 20 6d  cked.  cnt==-1 m
1020: 65 61 6e 73 20 74 68 65 20 66 69 6c 65 20 68 61  eans the file ha
1030: 73 20 61 6e 20 65 78 63 6c 75 73 69 76 65 20 6c  s an exclusive l
1040: 6f 63 6b 2e 0a 2a 2a 20 63 6e 74 3e 30 20 6d 65  ock..** cnt>0 me
1050: 61 6e 73 20 74 68 65 72 65 20 61 72 65 20 63 6e  ans there are cn
1060: 74 20 73 68 61 72 65 64 20 6c 6f 63 6b 73 20 6f  t shared locks o
1070: 6e 20 74 68 65 20 66 69 6c 65 2e 0a 2a 2a 0a 2a  n the file..**.*
1080: 2a 20 41 6e 79 20 61 74 74 65 6d 70 74 20 74 6f  * Any attempt to
1090: 20 6c 6f 63 6b 20 6f 72 20 75 6e 6c 6f 63 6b 20   lock or unlock 
10a0: 61 20 66 69 6c 65 20 66 69 72 73 74 20 63 68 65  a file first che
10b0: 63 6b 73 20 74 68 65 20 6c 6f 63 6b 69 6e 67 0a  cks the locking.
10c0: 2a 2a 20 73 74 72 75 63 74 75 72 65 2e 20 20 54  ** structure.  T
10d0: 68 65 20 66 63 6e 74 6c 28 29 20 73 79 73 74 65  he fcntl() syste
10e0: 6d 20 63 61 6c 6c 20 69 73 20 6f 6e 6c 79 20 69  m call is only i
10f0: 6e 76 6f 6b 65 64 20 74 6f 20 73 65 74 20 61 20  nvoked to set a 
1100: 0a 2a 2a 20 50 4f 53 49 58 20 6c 6f 63 6b 20 69  .** POSIX lock i
1110: 66 20 74 68 65 20 69 6e 74 65 72 6e 61 6c 20 6c  f the internal l
1120: 6f 63 6b 20 73 74 72 75 63 74 75 72 65 20 74 72  ock structure tr
1130: 61 6e 73 69 74 69 6f 6e 73 20 62 65 74 77 65 65  ansitions betwee
1140: 6e 0a 2a 2a 20 61 20 6c 6f 63 6b 65 64 20 61 6e  n.** a locked an
1150: 64 20 61 6e 20 75 6e 6c 6f 63 6b 65 64 20 73 74  d an unlocked st
1160: 61 74 65 2e 0a 2a 2a 0a 2a 2a 20 32 30 30 34 2d  ate..**.** 2004-
1170: 4a 61 6e 2d 31 31 3a 0a 2a 2a 20 4d 6f 72 65 20  Jan-11:.** More 
1180: 72 65 63 65 6e 74 20 64 69 73 63 6f 76 65 72 69  recent discoveri
1190: 65 73 20 61 62 6f 75 74 20 50 4f 53 49 58 20 61  es about POSIX a
11a0: 64 76 69 73 6f 72 79 20 6c 6f 63 6b 73 2e 20 20  dvisory locks.  
11b0: 28 54 68 65 20 6d 6f 72 65 0a 2a 2a 20 49 20 64  (The more.** I d
11c0: 69 73 63 6f 76 65 72 2c 20 74 68 65 20 6d 6f 72  iscover, the mor
11d0: 65 20 49 20 72 65 61 6c 69 7a 65 20 74 68 65 20  e I realize the 
11e0: 61 20 50 4f 53 49 58 20 61 64 76 69 73 6f 72 79  a POSIX advisory
11f0: 20 6c 6f 63 6b 73 20 61 72 65 0a 2a 2a 20 61 6e   locks are.** an
1200: 20 61 62 6f 6d 69 6e 61 74 69 6f 6e 2e 29 0a 2a   abomination.).*
1210: 2a 0a 2a 2a 20 49 66 20 79 6f 75 20 63 6c 6f 73  *.** If you clos
1220: 65 20 61 20 66 69 6c 65 20 64 65 73 63 72 69 70  e a file descrip
1230: 74 6f 72 20 74 68 61 74 20 70 6f 69 6e 74 73 20  tor that points 
1240: 74 6f 20 61 20 66 69 6c 65 20 74 68 61 74 20 68  to a file that h
1250: 61 73 20 6c 6f 63 6b 73 2c 0a 2a 2a 20 61 6c 6c  as locks,.** all
1260: 20 6c 6f 63 6b 73 20 6f 6e 20 74 68 61 74 20 66   locks on that f
1270: 69 6c 65 20 74 68 61 74 20 61 72 65 20 6f 77 6e  ile that are own
1280: 65 64 20 62 79 20 74 68 65 20 63 75 72 72 65 6e  ed by the curren
1290: 74 20 70 72 6f 63 65 73 73 20 61 72 65 0a 2a 2a  t process are.**
12a0: 20 72 65 6c 65 61 73 65 64 2e 20 20 54 6f 20 77   released.  To w
12b0: 6f 72 6b 20 61 72 6f 75 6e 64 20 74 68 69 73 20  ork around this 
12c0: 70 72 6f 62 6c 65 6d 2c 20 65 61 63 68 20 4f 73  problem, each Os
12d0: 46 69 6c 65 20 73 74 72 75 63 74 75 72 65 20 63  File structure c
12e0: 6f 6e 74 61 69 6e 73 0a 2a 2a 20 61 20 70 6f 69  ontains.** a poi
12f0: 6e 74 65 72 20 74 6f 20 61 6e 20 6f 70 65 6e 43  nter to an openC
1300: 6e 74 20 73 74 72 75 63 74 75 72 65 2e 20 20 54  nt structure.  T
1310: 68 65 72 65 20 69 73 20 6f 6e 65 20 6f 70 65 6e  here is one open
1320: 43 6e 74 20 73 74 72 75 63 74 75 72 65 0a 2a 2a  Cnt structure.**
1330: 20 70 65 72 20 6f 70 65 6e 20 69 6e 6f 64 65 2c   per open inode,
1340: 20 77 68 69 63 68 20 6d 65 61 6e 73 20 74 68 61   which means tha
1350: 74 20 6d 75 6c 74 69 70 6c 65 20 4f 73 46 69 6c  t multiple OsFil
1360: 65 73 20 63 61 6e 20 70 6f 69 6e 74 20 74 6f 20  es can point to 
1370: 61 20 73 69 6e 67 6c 65 0a 2a 2a 20 6f 70 65 6e  a single.** open
1380: 43 6e 74 2e 20 20 57 68 65 6e 20 61 6e 20 61 74  Cnt.  When an at
1390: 74 65 6d 70 74 20 69 73 20 6d 61 64 65 20 74 6f  tempt is made to
13a0: 20 63 6c 6f 73 65 20 61 6e 20 4f 73 46 69 6c 65   close an OsFile
13b0: 2c 20 69 66 20 74 68 65 72 65 20 61 72 65 0a 2a  , if there are.*
13c0: 2a 20 6f 74 68 65 72 20 4f 73 46 69 6c 65 73 20  * other OsFiles 
13d0: 6f 70 65 6e 20 6f 6e 20 74 68 65 20 73 61 6d 65  open on the same
13e0: 20 69 6e 6f 64 65 20 74 68 61 74 20 61 72 65 20   inode that are 
13f0: 68 6f 6c 64 69 6e 67 20 6c 6f 63 6b 73 2c 20 74  holding locks, t
1400: 68 65 20 63 61 6c 6c 0a 2a 2a 20 74 6f 20 63 6c  he call.** to cl
1410: 6f 73 65 28 29 20 74 68 65 20 66 69 6c 65 20 64  ose() the file d
1420: 65 73 63 72 69 70 74 6f 72 20 69 73 20 64 65 66  escriptor is def
1430: 65 72 72 65 64 20 75 6e 74 69 6c 20 61 6c 6c 20  erred until all 
1440: 6f 66 20 74 68 65 20 6c 6f 63 6b 73 20 63 6c 65  of the locks cle
1450: 61 72 2e 0a 2a 2a 20 54 68 65 20 6f 70 65 6e 43  ar..** The openC
1460: 6e 74 20 73 74 72 75 63 74 75 72 65 20 6b 65 65  nt structure kee
1470: 70 73 20 61 20 6c 69 73 74 20 6f 66 20 66 69 6c  ps a list of fil
1480: 65 20 64 65 73 63 72 69 70 74 6f 72 73 20 74 68  e descriptors th
1490: 61 74 20 6e 65 65 64 20 74 6f 0a 2a 2a 20 62 65  at need to.** be
14a0: 20 63 6c 6f 73 65 64 20 61 6e 64 20 74 68 61 74   closed and that
14b0: 20 6c 69 73 74 20 69 73 20 77 61 6c 6b 65 64 20   list is walked 
14c0: 28 61 6e 64 20 63 6c 65 61 72 65 64 29 20 77 68  (and cleared) wh
14d0: 65 6e 20 74 68 65 20 6c 61 73 74 20 6c 6f 63 6b  en the last lock
14e0: 0a 2a 2a 20 63 6c 65 61 72 73 2e 0a 2a 2a 0a 2a  .** clears..**.*
14f0: 2a 20 46 69 72 73 74 2c 20 75 6e 64 65 72 20 4c  * First, under L
1500: 69 6e 75 78 20 74 68 72 65 61 64 73 2c 20 62 65  inux threads, be
1510: 63 61 75 73 65 20 65 61 63 68 20 74 68 72 65 61  cause each threa
1520: 64 20 68 61 73 20 61 20 73 65 70 61 72 61 74 65  d has a separate
1530: 0a 2a 2a 20 70 72 6f 63 65 73 73 20 49 44 2c 20  .** process ID, 
1540: 6c 6f 63 6b 20 6f 70 65 72 61 74 69 6f 6e 73 20  lock operations 
1550: 69 6e 20 6f 6e 65 20 74 68 72 65 61 64 20 64 6f  in one thread do
1560: 20 6e 6f 74 20 6f 76 65 72 72 69 64 65 20 6c 6f   not override lo
1570: 63 6b 73 0a 2a 2a 20 74 6f 20 74 68 65 20 73 61  cks.** to the sa
1580: 6d 65 20 66 69 6c 65 20 69 6e 20 6f 74 68 65 72  me file in other
1590: 20 74 68 72 65 61 64 73 2e 20 20 4c 69 6e 75 78   threads.  Linux
15a0: 20 74 68 72 65 61 64 73 20 62 65 68 61 76 65 20   threads behave 
15b0: 6c 69 6b 65 0a 2a 2a 20 73 65 70 61 72 61 74 65  like.** separate
15c0: 20 70 72 6f 63 65 73 73 65 73 20 69 6e 20 74 68   processes in th
15d0: 69 73 20 72 65 73 70 65 63 74 2e 20 20 42 75 74  is respect.  But
15e0: 2c 20 69 66 20 79 6f 75 20 63 6c 6f 73 65 20 61  , if you close a
15f0: 20 66 69 6c 65 0a 2a 2a 20 64 65 73 63 72 69 70   file.** descrip
1600: 74 6f 72 20 69 6e 20 6c 69 6e 75 78 20 74 68 72  tor in linux thr
1610: 65 61 64 73 2c 20 61 6c 6c 20 6c 6f 63 6b 73 20  eads, all locks 
1620: 61 72 65 20 63 6c 65 61 72 65 64 2c 20 65 76 65  are cleared, eve
1630: 6e 20 6c 6f 63 6b 73 0a 2a 2a 20 6f 6e 20 6f 74  n locks.** on ot
1640: 68 65 72 20 74 68 72 65 61 64 73 20 61 6e 64 20  her threads and 
1650: 65 76 65 6e 20 74 68 6f 75 67 68 20 74 68 65 20  even though the 
1660: 6f 74 68 65 72 20 74 68 72 65 61 64 73 20 68 61  other threads ha
1670: 76 65 20 64 69 66 66 65 72 65 6e 74 0a 2a 2a 20  ve different.** 
1680: 70 72 6f 63 65 73 73 20 49 44 73 2e 20 20 4c 69  process IDs.  Li
1690: 6e 75 78 20 74 68 72 65 61 64 73 20 69 73 20 69  nux threads is i
16a0: 6e 63 6f 6e 73 69 73 74 65 6e 74 20 69 6e 20 74  nconsistent in t
16b0: 68 69 73 20 72 65 73 70 65 63 74 2e 0a 2a 2a 20  his respect..** 
16c0: 28 49 27 6d 20 62 65 67 69 6e 6e 69 6e 67 20 74  (I'm beginning t
16d0: 6f 20 74 68 69 6e 6b 20 74 68 61 74 20 6c 69 6e  o think that lin
16e0: 75 78 20 74 68 72 65 61 64 73 20 69 73 20 61 6e  ux threads is an
16f0: 20 61 62 6f 6d 69 6e 61 74 69 6f 6e 20 74 6f 6f   abomination too
1700: 2e 29 0a 2a 2a 20 54 68 65 20 63 6f 6e 73 65 71  .).** The conseq
1710: 75 65 6e 63 65 20 6f 66 20 74 68 69 73 20 61 6c  uence of this al
1720: 6c 20 69 73 20 74 68 61 74 20 74 68 65 20 68 61  l is that the ha
1730: 73 68 20 74 61 62 6c 65 20 66 6f 72 20 74 68 65  sh table for the
1740: 20 6c 6f 63 6b 49 6e 66 6f 0a 2a 2a 20 73 74 72   lockInfo.** str
1750: 75 63 74 75 72 65 20 68 61 73 20 74 6f 20 69 6e  ucture has to in
1760: 63 6c 75 64 65 20 74 68 65 20 70 72 6f 63 65 73  clude the proces
1770: 73 20 69 64 20 61 73 20 70 61 72 74 20 6f 66 20  s id as part of 
1780: 69 74 73 20 6b 65 79 20 62 65 63 61 75 73 65 0a  its key because.
1790: 2a 2a 20 6c 6f 63 6b 73 20 69 6e 20 64 69 66 66  ** locks in diff
17a0: 65 72 65 6e 74 20 74 68 72 65 61 64 73 20 61 72  erent threads ar
17b0: 65 20 74 72 65 61 74 65 64 20 61 73 20 64 69 73  e treated as dis
17c0: 74 69 6e 63 74 2e 20 20 42 75 74 20 74 68 65 20  tinct.  But the 
17d0: 0a 2a 2a 20 6f 70 65 6e 43 6e 74 20 73 74 72 75  .** openCnt stru
17e0: 63 74 75 72 65 20 73 68 6f 75 6c 64 20 6e 6f 74  cture should not
17f0: 20 69 6e 63 6c 75 64 65 20 74 68 65 20 70 72 6f   include the pro
1800: 63 65 73 73 20 69 64 20 69 6e 20 69 74 73 0a 2a  cess id in its.*
1810: 2a 20 6b 65 79 20 62 65 63 61 75 73 65 20 63 6c  * key because cl
1820: 6f 73 65 28 29 20 63 6c 65 61 72 73 20 6c 6f 63  ose() clears loc
1830: 6b 20 6f 6e 20 61 6c 6c 20 74 68 72 65 61 64 73  k on all threads
1840: 2c 20 6e 6f 74 20 6a 75 73 74 20 74 68 65 20 63  , not just the c
1850: 75 72 72 65 6e 74 0a 2a 2a 20 74 68 72 65 61 64  urrent.** thread
1860: 2e 20 20 57 65 72 65 20 69 74 20 6e 6f 74 20 66  .  Were it not f
1870: 6f 72 20 74 68 69 73 20 67 6f 6f 66 69 6e 65 73  or this goofines
1880: 73 20 69 6e 20 6c 69 6e 75 78 20 74 68 72 65 61  s in linux threa
1890: 64 73 2c 20 77 65 20 63 6f 75 6c 64 0a 2a 2a 20  ds, we could.** 
18a0: 63 6f 6d 62 69 6e 65 20 74 68 65 20 6c 6f 63 6b  combine the lock
18b0: 49 6e 66 6f 20 61 6e 64 20 6f 70 65 6e 43 6e 74  Info and openCnt
18c0: 20 73 74 72 75 63 74 75 72 65 73 20 69 6e 74 6f   structures into
18d0: 20 61 20 73 69 6e 67 6c 65 20 73 74 72 75 63 74   a single struct
18e0: 75 72 65 2e 0a 2a 2a 0a 2a 2a 20 32 30 30 34 2d  ure..**.** 2004-
18f0: 4a 75 6e 2d 32 38 3a 0a 2a 2a 20 4f 6e 20 73 6f  Jun-28:.** On so
1900: 6d 65 20 76 65 72 73 69 6f 6e 73 20 6f 66 20 6c  me versions of l
1910: 69 6e 75 78 2c 20 74 68 72 65 61 64 73 20 63 61  inux, threads ca
1920: 6e 20 6f 76 65 72 72 69 64 65 20 65 61 63 68 20  n override each 
1930: 6f 74 68 65 72 73 20 6c 6f 63 6b 73 2e 0a 2a 2a  others locks..**
1940: 20 4f 6e 20 6f 74 68 65 72 73 20 6e 6f 74 2e 20   On others not. 
1950: 20 53 6f 6d 65 74 69 6d 65 73 20 79 6f 75 20 63   Sometimes you c
1960: 61 6e 20 63 68 61 6e 67 65 20 74 68 65 20 62 65  an change the be
1970: 68 61 76 69 6f 72 20 6f 6e 20 74 68 65 20 73 61  havior on the sa
1980: 6d 65 0a 2a 2a 20 73 79 73 74 65 6d 20 62 79 20  me.** system by 
1990: 73 65 74 74 69 6e 67 20 74 68 65 20 4c 44 5f 41  setting the LD_A
19a0: 53 53 55 4d 45 5f 4b 45 52 4e 45 4c 20 65 6e 76  SSUME_KERNEL env
19b0: 69 72 6f 6e 6d 65 6e 74 20 76 61 72 69 61 62 6c  ironment variabl
19c0: 65 2e 20 20 54 68 65 0a 2a 2a 20 50 4f 53 49 58  e.  The.** POSIX
19d0: 20 73 74 61 6e 64 61 72 64 20 69 73 20 73 69 6c   standard is sil
19e0: 65 6e 74 20 61 73 20 74 6f 20 77 68 69 63 68 20  ent as to which 
19f0: 62 65 68 61 76 69 6f 72 20 69 73 20 63 6f 72 72  behavior is corr
1a00: 65 63 74 2c 20 61 73 20 66 61 72 0a 2a 2a 20 61  ect, as far.** a
1a10: 73 20 49 20 63 61 6e 20 74 65 6c 6c 2c 20 73 6f  s I can tell, so
1a20: 20 6f 74 68 65 72 20 76 65 72 73 69 6f 6e 73 20   other versions 
1a30: 6f 66 20 75 6e 69 78 20 6d 69 67 68 74 20 73 68  of unix might sh
1a40: 6f 77 20 74 68 65 20 73 61 6d 65 0a 2a 2a 20 69  ow the same.** i
1a50: 6e 63 6f 6e 73 69 73 74 65 6e 63 79 2e 20 20 54  nconsistency.  T
1a60: 68 65 72 65 20 69 73 20 6e 6f 20 6c 69 74 74 6c  here is no littl
1a70: 65 20 64 6f 75 62 74 20 69 6e 20 6d 79 20 6d 69  e doubt in my mi
1a80: 6e 64 20 74 68 61 74 20 70 6f 73 69 78 0a 2a 2a  nd that posix.**
1a90: 20 61 64 76 69 73 6f 72 79 20 6c 6f 63 6b 73 20   advisory locks 
1aa0: 61 6e 64 20 6c 69 6e 75 78 20 74 68 72 65 61 64  and linux thread
1ab0: 73 20 61 72 65 20 70 72 6f 66 6f 75 6e 64 6c 79  s are profoundly
1ac0: 20 62 72 6f 6b 65 6e 2e 0a 2a 2a 0a 2a 2a 20 54   broken..**.** T
1ad0: 6f 20 77 6f 72 6b 20 61 72 6f 75 6e 64 20 74 68  o work around th
1ae0: 65 20 69 6e 63 6f 6e 73 69 73 74 65 6e 63 69 65  e inconsistencie
1af0: 73 2c 20 77 65 20 68 61 76 65 20 74 6f 20 74 65  s, we have to te
1b00: 73 74 20 61 74 20 72 75 6e 74 69 6d 65 20 0a 2a  st at runtime .*
1b10: 2a 20 77 68 65 74 68 65 72 20 6f 72 20 6e 6f 74  * whether or not
1b20: 20 74 68 72 65 61 64 73 20 63 61 6e 20 6f 76 65   threads can ove
1b30: 72 72 69 64 65 20 65 61 63 68 20 6f 74 68 65 72  rride each other
1b40: 73 20 6c 6f 63 6b 73 2e 20 20 54 68 69 73 20 74  s locks.  This t
1b50: 65 73 74 0a 2a 2a 20 69 73 20 72 75 6e 20 6f 6e  est.** is run on
1b60: 63 65 2c 20 74 68 65 20 66 69 72 73 74 20 74 69  ce, the first ti
1b70: 6d 65 20 61 6e 79 20 6c 6f 63 6b 20 69 73 20 61  me any lock is a
1b80: 74 74 65 6d 70 74 65 64 2e 20 20 41 20 73 74 61  ttempted.  A sta
1b90: 74 69 63 20 0a 2a 2a 20 76 61 72 69 61 62 6c 65  tic .** variable
1ba0: 20 69 73 20 73 65 74 20 74 6f 20 72 65 63 6f 72   is set to recor
1bb0: 64 20 74 68 65 20 72 65 73 75 6c 74 73 20 6f 66  d the results of
1bc0: 20 74 68 69 73 20 74 65 73 74 20 66 6f 72 20 66   this test for f
1bd0: 75 74 75 72 65 0a 2a 2a 20 75 73 65 2e 0a 2a 2f  uture.** use..*/
1be0: 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20 69 6e 73 74 61  ../*.** An insta
1bf0: 6e 63 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f  nce of the follo
1c00: 77 69 6e 67 20 73 74 72 75 63 74 75 72 65 20 73  wing structure s
1c10: 65 72 76 65 73 20 61 73 20 74 68 65 20 6b 65 79  erves as the key
1c20: 20 75 73 65 64 0a 2a 2a 20 74 6f 20 6c 6f 63 61   used.** to loca
1c30: 74 65 20 61 20 70 61 72 74 69 63 75 6c 61 72 20  te a particular 
1c40: 6c 6f 63 6b 49 6e 66 6f 20 73 74 72 75 63 74 75  lockInfo structu
1c50: 72 65 20 67 69 76 65 6e 20 69 74 73 20 69 6e 6f  re given its ino
1c60: 64 65 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68 72  de..**.** If thr
1c70: 65 61 64 73 20 63 61 6e 6e 6f 74 20 6f 76 65 72  eads cannot over
1c80: 72 69 64 65 20 65 61 63 68 20 6f 74 68 65 72 73  ride each others
1c90: 20 6c 6f 63 6b 73 2c 20 74 68 65 6e 20 77 65 20   locks, then we 
1ca0: 73 65 74 20 74 68 65 0a 2a 2a 20 6c 6f 63 6b 4b  set the.** lockK
1cb0: 65 79 2e 74 69 64 20 66 69 65 6c 64 20 74 6f 20  ey.tid field to 
1cc0: 74 68 65 20 74 68 72 65 61 64 20 49 44 2e 20 20  the thread ID.  
1cd0: 49 66 20 74 68 72 65 61 64 73 20 63 61 6e 20 6f  If threads can o
1ce0: 76 65 72 72 69 64 65 0a 2a 2a 20 65 61 63 68 20  verride.** each 
1cf0: 6f 74 68 65 72 73 20 6c 6f 63 6b 73 20 74 68 65  others locks the
1d00: 6e 20 74 69 64 20 69 73 20 61 6c 77 61 79 73 20  n tid is always 
1d10: 73 65 74 20 74 6f 20 7a 65 72 6f 2e 20 20 74 69  set to zero.  ti
1d20: 64 20 69 73 20 61 6c 73 6f 0a 2a 2a 20 73 65 74  d is also.** set
1d30: 20 74 6f 20 7a 65 72 6f 20 69 66 20 77 65 20 63   to zero if we c
1d40: 6f 6d 70 69 6c 65 20 77 69 74 68 6f 75 74 20 74  ompile without t
1d50: 68 72 65 61 64 69 6e 67 20 73 75 70 70 6f 72 74  hreading support
1d60: 2e 0a 2a 2f 0a 73 74 72 75 63 74 20 6c 6f 63 6b  ..*/.struct lock
1d70: 4b 65 79 20 7b 0a 20 20 64 65 76 5f 74 20 64 65  Key {.  dev_t de
1d80: 76 3b 20 20 20 20 20 20 20 2f 2a 20 44 65 76 69  v;       /* Devi
1d90: 63 65 20 6e 75 6d 62 65 72 20 2a 2f 0a 20 20 69  ce number */.  i
1da0: 6e 6f 5f 74 20 69 6e 6f 3b 20 20 20 20 20 20 20  no_t ino;       
1db0: 2f 2a 20 49 6e 6f 64 65 20 6e 75 6d 62 65 72 20  /* Inode number 
1dc0: 2a 2f 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45  */.#ifdef SQLITE
1dd0: 5f 55 4e 49 58 5f 54 48 52 45 41 44 53 0a 20 20  _UNIX_THREADS.  
1de0: 70 74 68 72 65 61 64 5f 74 20 74 69 64 3b 20 20  pthread_t tid;  
1df0: 20 2f 2a 20 54 68 72 65 61 64 20 49 44 20 6f 72   /* Thread ID or
1e00: 20 7a 65 72 6f 20 69 66 20 74 68 72 65 61 64 73   zero if threads
1e10: 20 63 61 6e 6e 6f 74 20 6f 76 65 72 72 69 64 65   cannot override
1e20: 20 65 61 63 68 20 6f 74 68 65 72 20 2a 2f 0a 23   each other */.#
1e30: 65 6e 64 69 66 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20  endif.};../*.** 
1e40: 41 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74  An instance of t
1e50: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72  he following str
1e60: 75 63 74 75 72 65 20 69 73 20 61 6c 6c 6f 63 61  ucture is alloca
1e70: 74 65 64 20 66 6f 72 20 65 61 63 68 20 6f 70 65  ted for each ope
1e80: 6e 0a 2a 2a 20 69 6e 6f 64 65 20 6f 6e 20 65 61  n.** inode on ea
1e90: 63 68 20 74 68 72 65 61 64 20 77 69 74 68 20 61  ch thread with a
1ea0: 20 64 69 66 66 65 72 65 6e 74 20 70 72 6f 63 65   different proce
1eb0: 73 73 20 49 44 2e 20 20 28 54 68 72 65 61 64 73  ss ID.  (Threads
1ec0: 20 68 61 76 65 0a 2a 2a 20 64 69 66 66 65 72 65   have.** differe
1ed0: 6e 74 20 70 72 6f 63 65 73 73 20 49 44 73 20 6f  nt process IDs o
1ee0: 6e 20 6c 69 6e 75 78 2c 20 62 75 74 20 6e 6f 74  n linux, but not
1ef0: 20 6f 6e 20 6d 6f 73 74 20 6f 74 68 65 72 20 75   on most other u
1f00: 6e 69 78 65 73 2e 29 0a 2a 2a 0a 2a 2a 20 41 20  nixes.).**.** A 
1f10: 73 69 6e 67 6c 65 20 69 6e 6f 64 65 20 63 61 6e  single inode can
1f20: 20 68 61 76 65 20 6d 75 6c 74 69 70 6c 65 20 66   have multiple f
1f30: 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 73 2c  ile descriptors,
1f40: 20 73 6f 20 65 61 63 68 20 4f 73 46 69 6c 65 0a   so each OsFile.
1f50: 2a 2a 20 73 74 72 75 63 74 75 72 65 20 63 6f 6e  ** structure con
1f60: 74 61 69 6e 73 20 61 20 70 6f 69 6e 74 65 72 20  tains a pointer 
1f70: 74 6f 20 61 6e 20 69 6e 73 74 61 6e 63 65 20 6f  to an instance o
1f80: 66 20 74 68 69 73 20 6f 62 6a 65 63 74 20 61 6e  f this object an
1f90: 64 20 74 68 69 73 0a 2a 2a 20 6f 62 6a 65 63 74  d this.** object
1fa0: 20 6b 65 65 70 73 20 61 20 63 6f 75 6e 74 20 6f   keeps a count o
1fb0: 66 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20  f the number of 
1fc0: 4f 73 46 69 6c 65 73 20 70 6f 69 6e 74 69 6e 67  OsFiles pointing
1fd0: 20 74 6f 20 69 74 2e 0a 2a 2f 0a 73 74 72 75 63   to it..*/.struc
1fe0: 74 20 6c 6f 63 6b 49 6e 66 6f 20 7b 0a 20 20 73  t lockInfo {.  s
1ff0: 74 72 75 63 74 20 6c 6f 63 6b 4b 65 79 20 6b 65  truct lockKey ke
2000: 79 3b 20 20 2f 2a 20 54 68 65 20 6c 6f 6f 6b 75  y;  /* The looku
2010: 70 20 6b 65 79 20 2a 2f 0a 20 20 69 6e 74 20 63  p key */.  int c
2020: 6e 74 3b 20 20 20 20 20 20 20 20 20 20 20 20 20  nt;             
2030: 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 53 48 41  /* Number of SHA
2040: 52 45 44 20 6c 6f 63 6b 73 20 68 65 6c 64 20 2a  RED locks held *
2050: 2f 0a 20 20 69 6e 74 20 6c 6f 63 6b 74 79 70 65  /.  int locktype
2060: 3b 20 20 20 20 20 20 20 20 2f 2a 20 4f 6e 65 20  ;        /* One 
2070: 6f 66 20 53 48 41 52 45 44 5f 4c 4f 43 4b 2c 20  of SHARED_LOCK, 
2080: 52 45 53 45 52 56 45 44 5f 4c 4f 43 4b 20 65 74  RESERVED_LOCK et
2090: 63 2e 20 2a 2f 0a 20 20 69 6e 74 20 6e 52 65 66  c. */.  int nRef
20a0: 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20  ;            /* 
20b0: 4e 75 6d 62 65 72 20 6f 66 20 70 6f 69 6e 74 65  Number of pointe
20c0: 72 73 20 74 6f 20 74 68 69 73 20 73 74 72 75 63  rs to this struc
20d0: 74 75 72 65 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a  ture */.};../*.*
20e0: 2a 20 41 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66  * An instance of
20f0: 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73   the following s
2100: 74 72 75 63 74 75 72 65 20 73 65 72 76 65 73 20  tructure serves 
2110: 61 73 20 74 68 65 20 6b 65 79 20 75 73 65 64 0a  as the key used.
2120: 2a 2a 20 74 6f 20 6c 6f 63 61 74 65 20 61 20 70  ** to locate a p
2130: 61 72 74 69 63 75 6c 61 72 20 6f 70 65 6e 43 6e  articular openCn
2140: 74 20 73 74 72 75 63 74 75 72 65 20 67 69 76 65  t structure give
2150: 6e 20 69 74 73 20 69 6e 6f 64 65 2e 20 20 54 68  n its inode.  Th
2160: 69 73 0a 2a 2a 20 69 73 20 74 68 65 20 73 61 6d  is.** is the sam
2170: 65 20 61 73 20 74 68 65 20 6c 6f 63 6b 4b 65 79  e as the lockKey
2180: 20 65 78 63 65 70 74 20 74 68 61 74 20 74 68 65   except that the
2190: 20 74 68 72 65 61 64 20 49 44 20 69 73 20 6f 6d   thread ID is om
21a0: 69 74 74 65 64 2e 0a 2a 2f 0a 73 74 72 75 63 74  itted..*/.struct
21b0: 20 6f 70 65 6e 4b 65 79 20 7b 0a 20 20 64 65 76   openKey {.  dev
21c0: 5f 74 20 64 65 76 3b 20 20 20 2f 2a 20 44 65 76  _t dev;   /* Dev
21d0: 69 63 65 20 6e 75 6d 62 65 72 20 2a 2f 0a 20 20  ice number */.  
21e0: 69 6e 6f 5f 74 20 69 6e 6f 3b 20 20 20 2f 2a 20  ino_t ino;   /* 
21f0: 49 6e 6f 64 65 20 6e 75 6d 62 65 72 20 2a 2f 0a  Inode number */.
2200: 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 41 6e 20 69 6e 73  };../*.** An ins
2210: 74 61 6e 63 65 20 6f 66 20 74 68 65 20 66 6f 6c  tance of the fol
2220: 6c 6f 77 69 6e 67 20 73 74 72 75 63 74 75 72 65  lowing structure
2230: 20 69 73 20 61 6c 6c 6f 63 61 74 65 64 20 66 6f   is allocated fo
2240: 72 20 65 61 63 68 20 6f 70 65 6e 0a 2a 2a 20 69  r each open.** i
2250: 6e 6f 64 65 2e 20 20 54 68 69 73 20 73 74 72 75  node.  This stru
2260: 63 74 75 72 65 20 6b 65 65 70 73 20 74 72 61 63  cture keeps trac
2270: 6b 20 6f 66 20 74 68 65 20 6e 75 6d 62 65 72 20  k of the number 
2280: 6f 66 20 6c 6f 63 6b 73 20 6f 6e 20 74 68 61 74  of locks on that
2290: 0a 2a 2a 20 69 6e 6f 64 65 2e 20 20 49 66 20 61  .** inode.  If a
22a0: 20 63 6c 6f 73 65 20 69 73 20 61 74 74 65 6d 70   close is attemp
22b0: 74 65 64 20 61 67 61 69 6e 73 74 20 61 6e 20 69  ted against an i
22c0: 6e 6f 64 65 20 74 68 61 74 20 69 73 20 68 6f 6c  node that is hol
22d0: 64 69 6e 67 0a 2a 2a 20 6c 6f 63 6b 73 2c 20 74  ding.** locks, t
22e0: 68 65 20 63 6c 6f 73 65 20 69 73 20 64 65 66 65  he close is defe
22f0: 72 72 65 64 20 75 6e 74 69 6c 20 61 6c 6c 20 6c  rred until all l
2300: 6f 63 6b 73 20 63 6c 65 61 72 20 62 79 20 61 64  ocks clear by ad
2310: 64 69 6e 67 20 74 68 65 0a 2a 2a 20 66 69 6c 65  ding the.** file
2320: 20 64 65 73 63 72 69 70 74 6f 72 20 74 6f 20 62   descriptor to b
2330: 65 20 63 6c 6f 73 65 64 20 74 6f 20 74 68 65 20  e closed to the 
2340: 70 65 6e 64 69 6e 67 20 6c 69 73 74 2e 0a 2a 2f  pending list..*/
2350: 0a 73 74 72 75 63 74 20 6f 70 65 6e 43 6e 74 20  .struct openCnt 
2360: 7b 0a 20 20 73 74 72 75 63 74 20 6f 70 65 6e 4b  {.  struct openK
2370: 65 79 20 6b 65 79 3b 20 20 20 2f 2a 20 54 68 65  ey key;   /* The
2380: 20 6c 6f 6f 6b 75 70 20 6b 65 79 20 2a 2f 0a 20   lookup key */. 
2390: 20 69 6e 74 20 6e 52 65 66 3b 20 20 20 20 20 20   int nRef;      
23a0: 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72         /* Number
23b0: 20 6f 66 20 70 6f 69 6e 74 65 72 73 20 74 6f 20   of pointers to 
23c0: 74 68 69 73 20 73 74 72 75 63 74 75 72 65 20 2a  this structure *
23d0: 2f 0a 20 20 69 6e 74 20 6e 4c 6f 63 6b 3b 20 20  /.  int nLock;  
23e0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d            /* Num
23f0: 62 65 72 20 6f 66 20 6f 75 74 73 74 61 6e 64 69  ber of outstandi
2400: 6e 67 20 6c 6f 63 6b 73 20 2a 2f 0a 20 20 69 6e  ng locks */.  in
2410: 74 20 6e 50 65 6e 64 69 6e 67 3b 20 20 20 20 20  t nPending;     
2420: 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66      /* Number of
2430: 20 70 65 6e 64 69 6e 67 20 63 6c 6f 73 65 28 29   pending close()
2440: 20 6f 70 65 72 61 74 69 6f 6e 73 20 2a 2f 0a 20   operations */. 
2450: 20 69 6e 74 20 2a 61 50 65 6e 64 69 6e 67 3b 20   int *aPending; 
2460: 20 20 20 20 20 20 20 2f 2a 20 4d 61 6c 6c 6f 63         /* Malloc
2470: 65 64 20 73 70 61 63 65 20 68 6f 6c 64 69 6e 67  ed space holding
2480: 20 66 64 27 73 20 61 77 61 69 74 69 6e 67 20 61   fd's awaiting a
2490: 20 63 6c 6f 73 65 28 29 20 2a 2f 0a 7d 3b 0a 0a   close() */.};..
24a0: 2f 2a 20 0a 2a 2a 20 54 68 65 73 65 20 68 61 73  /* .** These has
24b0: 68 20 74 61 62 6c 65 20 6d 61 70 73 20 69 6e 6f  h table maps ino
24c0: 64 65 73 20 61 6e 64 20 70 72 6f 63 65 73 73 20  des and process 
24d0: 49 44 73 20 69 6e 74 6f 20 6c 6f 63 6b 49 6e 66  IDs into lockInf
24e0: 6f 20 61 6e 64 20 6f 70 65 6e 43 6e 74 0a 2a 2a  o and openCnt.**
24f0: 20 73 74 72 75 63 74 75 72 65 73 2e 20 20 41 63   structures.  Ac
2500: 63 65 73 73 20 74 6f 20 74 68 65 73 65 20 68 61  cess to these ha
2510: 73 68 20 74 61 62 6c 65 73 20 6d 75 73 74 20 62  sh tables must b
2520: 65 20 70 72 6f 74 65 63 74 65 64 20 62 79 20 61  e protected by a
2530: 20 6d 75 74 65 78 2e 0a 2a 2f 0a 73 74 61 74 69   mutex..*/.stati
2540: 63 20 48 61 73 68 20 6c 6f 63 6b 48 61 73 68 20  c Hash lockHash 
2550: 3d 20 7b 20 53 51 4c 49 54 45 5f 48 41 53 48 5f  = { SQLITE_HASH_
2560: 42 49 4e 41 52 59 2c 20 30 2c 20 30 2c 20 30 2c  BINARY, 0, 0, 0,
2570: 20 30 2c 20 30 20 7d 3b 0a 73 74 61 74 69 63 20   0, 0 };.static 
2580: 48 61 73 68 20 6f 70 65 6e 48 61 73 68 20 3d 20  Hash openHash = 
2590: 7b 20 53 51 4c 49 54 45 5f 48 41 53 48 5f 42 49  { SQLITE_HASH_BI
25a0: 4e 41 52 59 2c 20 30 2c 20 30 2c 20 30 2c 20 30  NARY, 0, 0, 0, 0
25b0: 2c 20 30 20 7d 3b 0a 0a 0a 23 69 66 64 65 66 20  , 0 };...#ifdef 
25c0: 53 51 4c 49 54 45 5f 55 4e 49 58 5f 54 48 52 45  SQLITE_UNIX_THRE
25d0: 41 44 53 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 76  ADS./*.** This v
25e0: 61 72 69 61 62 6c 65 20 72 65 63 6f 72 64 73 20  ariable records 
25f0: 77 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74  whether or not t
2600: 68 72 65 61 64 73 20 63 61 6e 20 6f 76 65 72 72  hreads can overr
2610: 69 64 65 20 65 61 63 68 20 6f 74 68 65 72 73 0a  ide each others.
2620: 2a 2a 20 6c 6f 63 6b 73 2e 0a 2a 2a 0a 2a 2a 20  ** locks..**.** 
2630: 20 20 20 30 3a 20 20 4e 6f 2e 20 20 54 68 72 65     0:  No.  Thre
2640: 61 64 73 20 63 61 6e 6e 6f 74 20 6f 76 65 72 72  ads cannot overr
2650: 69 64 65 20 65 61 63 68 20 6f 74 68 65 72 73 20  ide each others 
2660: 6c 6f 63 6b 73 2e 0a 2a 2a 20 20 20 20 31 3a 20  locks..**    1: 
2670: 20 59 65 73 2e 20 20 54 68 72 65 61 64 73 20 63   Yes.  Threads c
2680: 61 6e 20 6f 76 65 72 72 69 64 65 20 65 61 63 68  an override each
2690: 20 6f 74 68 65 72 73 20 6c 6f 63 6b 73 2e 0a 2a   others locks..*
26a0: 2a 20 20 20 2d 31 3a 20 20 57 65 20 64 6f 6e 27  *   -1:  We don'
26b0: 74 20 6b 6e 6f 77 20 79 65 74 2e 0a 2a 2f 0a 73  t know yet..*/.s
26c0: 74 61 74 69 63 20 69 6e 74 20 74 68 72 65 61 64  tatic int thread
26d0: 73 4f 76 65 72 72 69 64 65 45 61 63 68 4f 74 68  sOverrideEachOth
26e0: 65 72 73 4c 6f 63 6b 73 20 3d 20 2d 31 3b 0a 0a  ersLocks = -1;..
26f0: 2f 2a 0a 2a 2a 20 54 68 69 73 20 73 74 72 75 63  /*.** This struc
2700: 74 75 72 65 20 68 6f 6c 64 73 20 69 6e 66 6f 72  ture holds infor
2710: 6d 61 74 69 6f 6e 20 70 61 73 73 65 64 20 69 6e  mation passed in
2720: 74 6f 20 69 6e 64 69 76 69 64 75 61 6c 20 74 65  to individual te
2730: 73 74 0a 2a 2a 20 74 68 72 65 61 64 73 20 62 79  st.** threads by
2740: 20 74 68 65 20 74 65 73 74 54 68 72 65 61 64 4c   the testThreadL
2750: 6f 63 6b 69 6e 67 42 65 68 61 76 69 6f 72 28 29  ockingBehavior()
2760: 20 72 6f 75 74 69 6e 65 2e 0a 2a 2f 0a 73 74 72   routine..*/.str
2770: 75 63 74 20 74 68 72 65 61 64 54 65 73 74 44 61  uct threadTestDa
2780: 74 61 20 7b 0a 20 20 69 6e 74 20 66 64 3b 20 20  ta {.  int fd;  
2790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
27a0: 20 46 69 6c 65 20 74 6f 20 62 65 20 6c 6f 63 6b   File to be lock
27b0: 65 64 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 66  ed */.  struct f
27c0: 6c 6f 63 6b 20 6c 6f 63 6b 3b 20 20 20 20 20 2f  lock lock;     /
27d0: 2a 20 54 68 65 20 6c 6f 63 6b 69 6e 67 20 6f 70  * The locking op
27e0: 65 72 61 74 69 6f 6e 20 2a 2f 0a 20 20 69 6e 74  eration */.  int
27f0: 20 72 65 73 75 6c 74 3b 20 20 20 20 20 20 20 20   result;        
2800: 20 20 20 20 2f 2a 20 52 65 73 75 6c 74 20 6f 66      /* Result of
2810: 20 74 68 65 20 6c 6f 63 6b 69 6e 67 20 6f 70 65   the locking ope
2820: 72 61 74 69 6f 6e 20 2a 2f 0a 7d 3b 0a 0a 2f 2a  ration */.};../*
2830: 0a 2a 2a 20 54 68 65 20 74 65 73 74 54 68 72 65  .** The testThre
2840: 61 64 4c 6f 63 6b 69 6e 67 42 65 68 61 76 69 6f  adLockingBehavio
2850: 72 28 29 20 72 6f 75 74 69 6e 65 20 6c 61 75 6e  r() routine laun
2860: 63 68 65 73 20 74 77 6f 20 73 65 70 61 72 61 74  ches two separat
2870: 65 0a 2a 2a 20 74 68 72 65 61 64 73 20 6f 6e 20  e.** threads on 
2880: 74 68 69 73 20 72 6f 75 74 69 6e 65 2e 20 20 54  this routine.  T
2890: 68 69 73 20 72 6f 75 74 69 6e 65 20 61 74 74 65  his routine atte
28a0: 6d 70 74 73 20 74 6f 20 6c 6f 63 6b 20 61 20 66  mpts to lock a f
28b0: 69 6c 65 0a 2a 2a 20 64 65 73 63 72 69 70 74 6f  ile.** descripto
28c0: 72 20 74 68 65 6e 20 72 65 74 75 72 6e 73 2e 20  r then returns. 
28d0: 20 54 68 65 20 73 75 63 63 65 73 73 20 6f 72 20   The success or 
28e0: 66 61 69 6c 75 72 65 20 6f 66 20 74 68 61 74 20  failure of that 
28f0: 61 74 74 65 6d 70 74 0a 2a 2a 20 61 6c 6c 6f 77  attempt.** allow
2900: 73 20 74 68 65 20 74 65 73 74 54 68 72 65 61 64  s the testThread
2910: 4c 6f 63 6b 69 6e 67 42 65 68 61 76 69 6f 72 28  LockingBehavior(
2920: 29 20 70 72 6f 63 65 64 75 72 65 20 74 6f 20 64  ) procedure to d
2930: 65 74 65 72 6d 69 6e 65 0a 2a 2a 20 77 68 65 74  etermine.** whet
2940: 68 65 72 20 6f 72 20 6e 6f 74 20 74 68 72 65 61  her or not threa
2950: 64 73 20 63 61 6e 20 6f 76 65 72 72 69 64 65 20  ds can override 
2960: 65 61 63 68 20 6f 74 68 65 72 73 20 6c 6f 63 6b  each others lock
2970: 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  s..*/.static voi
2980: 64 20 2a 74 68 72 65 61 64 4c 6f 63 6b 69 6e 67  d *threadLocking
2990: 54 65 73 74 28 76 6f 69 64 20 2a 70 41 72 67 29  Test(void *pArg)
29a0: 7b 0a 20 20 73 74 72 75 63 74 20 74 68 72 65 61  {.  struct threa
29b0: 64 54 65 73 74 44 61 74 61 20 2a 70 44 61 74 61  dTestData *pData
29c0: 20 3d 20 28 73 74 72 75 63 74 20 74 68 72 65 61   = (struct threa
29d0: 64 54 65 73 74 44 61 74 61 2a 29 70 41 72 67 3b  dTestData*)pArg;
29e0: 0a 20 20 70 44 61 74 61 2d 3e 72 65 73 75 6c 74  .  pData->result
29f0: 20 3d 20 66 63 6e 74 6c 28 70 44 61 74 61 2d 3e   = fcntl(pData->
2a00: 66 64 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 70 44  fd, F_SETLK, &pD
2a10: 61 74 61 2d 3e 6c 6f 63 6b 29 3b 0a 20 20 72 65  ata->lock);.  re
2a20: 74 75 72 6e 20 70 41 72 67 3b 0a 7d 0a 0a 2f 2a  turn pArg;.}../*
2a30: 0a 2a 2a 20 54 68 69 73 20 70 72 6f 63 65 64 75  .** This procedu
2a40: 72 65 20 61 74 74 65 6d 70 74 73 20 74 6f 20 64  re attempts to d
2a50: 65 74 65 72 6d 69 6e 65 20 77 68 65 74 68 65 72  etermine whether
2a60: 20 6f 72 20 6e 6f 74 20 74 68 72 65 61 64 73 0a   or not threads.
2a70: 2a 2a 20 63 61 6e 20 6f 76 65 72 72 69 64 65 20  ** can override 
2a80: 65 61 63 68 20 6f 74 68 65 72 73 20 6c 6f 63 6b  each others lock
2a90: 73 20 74 68 65 6e 20 73 65 74 73 20 74 68 65 20  s then sets the 
2aa0: 0a 2a 2a 20 74 68 72 65 61 64 73 4f 76 65 72 72  .** threadsOverr
2ab0: 69 64 65 45 61 63 68 4f 74 68 65 72 73 4c 6f 63  ideEachOthersLoc
2ac0: 6b 73 20 76 61 72 69 61 62 6c 65 20 61 70 70 72  ks variable appr
2ad0: 6f 70 72 69 61 74 65 6c 79 2e 0a 2a 2f 0a 73 74  opriately..*/.st
2ae0: 61 74 69 63 20 76 6f 69 64 20 74 65 73 74 54 68  atic void testTh
2af0: 72 65 61 64 4c 6f 63 6b 69 6e 67 42 65 68 61 76  readLockingBehav
2b00: 69 6f 72 28 66 64 5f 6f 72 69 67 29 7b 0a 20 20  ior(fd_orig){.  
2b10: 69 6e 74 20 66 64 3b 0a 20 20 73 74 72 75 63 74  int fd;.  struct
2b20: 20 74 68 72 65 61 64 54 65 73 74 44 61 74 61 20   threadTestData 
2b30: 64 5b 32 5d 3b 0a 20 20 70 74 68 72 65 61 64 5f  d[2];.  pthread_
2b40: 74 20 74 5b 32 5d 3b 0a 0a 20 20 66 64 20 3d 20  t t[2];..  fd = 
2b50: 64 75 70 28 66 64 5f 6f 72 69 67 29 3b 0a 20 20  dup(fd_orig);.  
2b60: 69 66 28 20 66 64 3c 30 20 29 20 72 65 74 75 72  if( fd<0 ) retur
2b70: 6e 3b 0a 20 20 6d 65 6d 73 65 74 28 64 2c 20 30  n;.  memset(d, 0
2b80: 2c 20 73 69 7a 65 6f 66 28 64 29 29 3b 0a 20 20  , sizeof(d));.  
2b90: 64 5b 30 5d 2e 66 64 20 3d 20 66 64 3b 0a 20 20  d[0].fd = fd;.  
2ba0: 64 5b 30 5d 2e 6c 6f 63 6b 2e 6c 5f 74 79 70 65  d[0].lock.l_type
2bb0: 20 3d 20 46 5f 52 44 4c 43 4b 3b 0a 20 20 64 5b   = F_RDLCK;.  d[
2bc0: 30 5d 2e 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20  0].lock.l_len = 
2bd0: 31 3b 0a 20 20 64 5b 30 5d 2e 6c 6f 63 6b 2e 6c  1;.  d[0].lock.l
2be0: 5f 73 74 61 72 74 20 3d 20 30 3b 0a 20 20 64 5b  _start = 0;.  d[
2bf0: 30 5d 2e 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65  0].lock.l_whence
2c00: 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 20 20 64   = SEEK_SET;.  d
2c10: 5b 31 5d 20 3d 20 64 5b 30 5d 3b 0a 20 20 64 5b  [1] = d[0];.  d[
2c20: 31 5d 2e 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d  1].lock.l_type =
2c30: 20 46 5f 57 52 4c 43 4b 3b 0a 20 20 70 74 68 72   F_WRLCK;.  pthr
2c40: 65 61 64 5f 63 72 65 61 74 65 28 26 74 5b 30 5d  ead_create(&t[0]
2c50: 2c 20 30 2c 20 74 68 72 65 61 64 4c 6f 63 6b 69  , 0, threadLocki
2c60: 6e 67 54 65 73 74 2c 20 26 64 5b 30 5d 29 3b 0a  ngTest, &d[0]);.
2c70: 20 20 70 74 68 72 65 61 64 5f 63 72 65 61 74 65    pthread_create
2c80: 28 26 74 5b 31 5d 2c 20 30 2c 20 74 68 72 65 61  (&t[1], 0, threa
2c90: 64 4c 6f 63 6b 69 6e 67 54 65 73 74 2c 20 26 64  dLockingTest, &d
2ca0: 5b 31 5d 29 3b 0a 20 20 70 74 68 72 65 61 64 5f  [1]);.  pthread_
2cb0: 6a 6f 69 6e 28 74 5b 30 5d 2c 20 30 29 3b 0a 20  join(t[0], 0);. 
2cc0: 20 70 74 68 72 65 61 64 5f 6a 6f 69 6e 28 74 5b   pthread_join(t[
2cd0: 31 5d 2c 20 30 29 3b 0a 20 20 63 6c 6f 73 65 28  1], 0);.  close(
2ce0: 66 64 29 3b 0a 20 20 74 68 72 65 61 64 73 4f 76  fd);.  threadsOv
2cf0: 65 72 72 69 64 65 45 61 63 68 4f 74 68 65 72 73  errideEachOthers
2d00: 4c 6f 63 6b 73 20 3d 20 20 64 5b 30 5d 2e 72 65  Locks =  d[0].re
2d10: 73 75 6c 74 3d 3d 30 20 26 26 20 64 5b 31 5d 2e  sult==0 && d[1].
2d20: 72 65 73 75 6c 74 3d 3d 30 3b 0a 7d 0a 23 65 6e  result==0;.}.#en
2d30: 64 69 66 20 2f 2a 20 53 51 4c 49 54 45 5f 55 4e  dif /* SQLITE_UN
2d40: 49 58 5f 54 48 52 45 41 44 53 20 2a 2f 0a 0a 2f  IX_THREADS */../
2d50: 2a 0a 2a 2a 20 52 65 6c 65 61 73 65 20 61 20 6c  *.** Release a l
2d60: 6f 63 6b 49 6e 66 6f 20 73 74 72 75 63 74 75 72  ockInfo structur
2d70: 65 20 70 72 65 76 69 6f 75 73 6c 79 20 61 6c 6c  e previously all
2d80: 6f 63 61 74 65 64 20 62 79 20 66 69 6e 64 4c 6f  ocated by findLo
2d90: 63 6b 49 6e 66 6f 28 29 2e 0a 2a 2f 0a 73 74 61  ckInfo()..*/.sta
2da0: 74 69 63 20 76 6f 69 64 20 72 65 6c 65 61 73 65  tic void release
2db0: 4c 6f 63 6b 49 6e 66 6f 28 73 74 72 75 63 74 20  LockInfo(struct 
2dc0: 6c 6f 63 6b 49 6e 66 6f 20 2a 70 4c 6f 63 6b 29  lockInfo *pLock)
2dd0: 7b 0a 20 20 70 4c 6f 63 6b 2d 3e 6e 52 65 66 2d  {.  pLock->nRef-
2de0: 2d 3b 0a 20 20 69 66 28 20 70 4c 6f 63 6b 2d 3e  -;.  if( pLock->
2df0: 6e 52 65 66 3d 3d 30 20 29 7b 0a 20 20 20 20 73  nRef==0 ){.    s
2e00: 71 6c 69 74 65 33 48 61 73 68 49 6e 73 65 72 74  qlite3HashInsert
2e10: 28 26 6c 6f 63 6b 48 61 73 68 2c 20 26 70 4c 6f  (&lockHash, &pLo
2e20: 63 6b 2d 3e 6b 65 79 2c 20 73 69 7a 65 6f 66 28  ck->key, sizeof(
2e30: 70 4c 6f 63 6b 2d 3e 6b 65 79 29 2c 20 30 29 3b  pLock->key), 0);
2e40: 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 65 28  .    sqliteFree(
2e50: 70 4c 6f 63 6b 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f  pLock);.  }.}../
2e60: 2a 0a 2a 2a 20 52 65 6c 65 61 73 65 20 61 20 6f  *.** Release a o
2e70: 70 65 6e 43 6e 74 20 73 74 72 75 63 74 75 72 65  penCnt structure
2e80: 20 70 72 65 76 69 6f 75 73 6c 79 20 61 6c 6c 6f   previously allo
2e90: 63 61 74 65 64 20 62 79 20 66 69 6e 64 4c 6f 63  cated by findLoc
2ea0: 6b 49 6e 66 6f 28 29 2e 0a 2a 2f 0a 73 74 61 74  kInfo()..*/.stat
2eb0: 69 63 20 76 6f 69 64 20 72 65 6c 65 61 73 65 4f  ic void releaseO
2ec0: 70 65 6e 43 6e 74 28 73 74 72 75 63 74 20 6f 70  penCnt(struct op
2ed0: 65 6e 43 6e 74 20 2a 70 4f 70 65 6e 29 7b 0a 20  enCnt *pOpen){. 
2ee0: 20 70 4f 70 65 6e 2d 3e 6e 52 65 66 2d 2d 3b 0a   pOpen->nRef--;.
2ef0: 20 20 69 66 28 20 70 4f 70 65 6e 2d 3e 6e 52 65    if( pOpen->nRe
2f00: 66 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c 69  f==0 ){.    sqli
2f10: 74 65 33 48 61 73 68 49 6e 73 65 72 74 28 26 6f  te3HashInsert(&o
2f20: 70 65 6e 48 61 73 68 2c 20 26 70 4f 70 65 6e 2d  penHash, &pOpen-
2f30: 3e 6b 65 79 2c 20 73 69 7a 65 6f 66 28 70 4f 70  >key, sizeof(pOp
2f40: 65 6e 2d 3e 6b 65 79 29 2c 20 30 29 3b 0a 20 20  en->key), 0);.  
2f50: 20 20 73 71 6c 69 74 65 46 72 65 65 28 70 4f 70    sqliteFree(pOp
2f60: 65 6e 2d 3e 61 50 65 6e 64 69 6e 67 29 3b 0a 20  en->aPending);. 
2f70: 20 20 20 73 71 6c 69 74 65 46 72 65 65 28 70 4f     sqliteFree(pO
2f80: 70 65 6e 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a  pen);.  }.}../*.
2f90: 2a 2a 20 47 69 76 65 6e 20 61 20 66 69 6c 65 20  ** Given a file 
2fa0: 64 65 73 63 72 69 70 74 6f 72 2c 20 6c 6f 63 61  descriptor, loca
2fb0: 74 65 20 6c 6f 63 6b 49 6e 66 6f 20 61 6e 64 20  te lockInfo and 
2fc0: 6f 70 65 6e 43 6e 74 20 73 74 72 75 63 74 75 72  openCnt structur
2fd0: 65 73 20 74 68 61 74 0a 2a 2a 20 64 65 73 63 72  es that.** descr
2fe0: 69 62 65 73 20 74 68 61 74 20 66 69 6c 65 20 64  ibes that file d
2ff0: 65 73 63 72 69 70 74 6f 72 2e 20 20 43 72 65 61  escriptor.  Crea
3000: 74 65 20 61 20 6e 65 77 20 6f 6e 65 73 20 69 66  te a new ones if
3010: 20 6e 65 63 65 73 73 61 72 79 2e 20 20 54 68 65   necessary.  The
3020: 0a 2a 2a 20 72 65 74 75 72 6e 20 76 61 6c 75 65  .** return value
3030: 73 20 6d 69 67 68 74 20 62 65 20 75 6e 73 65 74  s might be unset
3040: 20 69 66 20 61 6e 20 65 72 72 6f 72 20 6f 63 63   if an error occ
3050: 75 72 73 2e 0a 2a 2a 0a 2a 2a 20 52 65 74 75 72  urs..**.** Retur
3060: 6e 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20  n the number of 
3070: 65 72 72 6f 72 73 2e 0a 2a 2f 0a 73 74 61 74 69  errors..*/.stati
3080: 63 20 69 6e 74 20 66 69 6e 64 4c 6f 63 6b 49 6e  c int findLockIn
3090: 66 6f 28 0a 20 20 69 6e 74 20 66 64 2c 20 20 20  fo(.  int fd,   
30a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
30b0: 20 20 20 2f 2a 20 54 68 65 20 66 69 6c 65 20 64     /* The file d
30c0: 65 73 63 72 69 70 74 6f 72 20 75 73 65 64 20 69  escriptor used i
30d0: 6e 20 74 68 65 20 6b 65 79 20 2a 2f 0a 20 20 73  n the key */.  s
30e0: 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20 2a  truct lockInfo *
30f0: 2a 70 70 4c 6f 63 6b 2c 20 20 20 20 2f 2a 20 52  *ppLock,    /* R
3100: 65 74 75 72 6e 20 74 68 65 20 6c 6f 63 6b 49 6e  eturn the lockIn
3110: 66 6f 20 73 74 72 75 63 74 75 72 65 20 68 65 72  fo structure her
3120: 65 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 6f 70  e */.  struct op
3130: 65 6e 43 6e 74 20 2a 2a 70 70 4f 70 65 6e 20 20  enCnt **ppOpen  
3140: 20 20 20 20 2f 2a 20 52 65 74 75 72 6e 20 74 68      /* Return th
3150: 65 20 6f 70 65 6e 43 6e 74 20 73 74 72 75 63 74  e openCnt struct
3160: 75 72 65 20 68 65 72 65 20 2a 2f 0a 29 7b 0a 20  ure here */.){. 
3170: 20 69 6e 74 20 72 63 3b 0a 20 20 73 74 72 75 63   int rc;.  struc
3180: 74 20 6c 6f 63 6b 4b 65 79 20 6b 65 79 31 3b 0a  t lockKey key1;.
3190: 20 20 73 74 72 75 63 74 20 6f 70 65 6e 4b 65 79    struct openKey
31a0: 20 6b 65 79 32 3b 0a 20 20 73 74 72 75 63 74 20   key2;.  struct 
31b0: 73 74 61 74 20 73 74 61 74 62 75 66 3b 0a 20 20  stat statbuf;.  
31c0: 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20  struct lockInfo 
31d0: 2a 70 4c 6f 63 6b 3b 0a 20 20 73 74 72 75 63 74  *pLock;.  struct
31e0: 20 6f 70 65 6e 43 6e 74 20 2a 70 4f 70 65 6e 3b   openCnt *pOpen;
31f0: 0a 20 20 72 63 20 3d 20 66 73 74 61 74 28 66 64  .  rc = fstat(fd
3200: 2c 20 26 73 74 61 74 62 75 66 29 3b 0a 20 20 69  , &statbuf);.  i
3210: 66 28 20 72 63 21 3d 30 20 29 20 72 65 74 75 72  f( rc!=0 ) retur
3220: 6e 20 31 3b 0a 20 20 6d 65 6d 73 65 74 28 26 6b  n 1;.  memset(&k
3230: 65 79 31 2c 20 30 2c 20 73 69 7a 65 6f 66 28 6b  ey1, 0, sizeof(k
3240: 65 79 31 29 29 3b 0a 20 20 6b 65 79 31 2e 64 65  ey1));.  key1.de
3250: 76 20 3d 20 73 74 61 74 62 75 66 2e 73 74 5f 64  v = statbuf.st_d
3260: 65 76 3b 0a 20 20 6b 65 79 31 2e 69 6e 6f 20 3d  ev;.  key1.ino =
3270: 20 73 74 61 74 62 75 66 2e 73 74 5f 69 6e 6f 3b   statbuf.st_ino;
3280: 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 55  .#ifdef SQLITE_U
3290: 4e 49 58 5f 54 48 52 45 41 44 53 0a 20 20 69 66  NIX_THREADS.  if
32a0: 28 20 74 68 72 65 61 64 73 4f 76 65 72 72 69 64  ( threadsOverrid
32b0: 65 45 61 63 68 4f 74 68 65 72 73 4c 6f 63 6b 73  eEachOthersLocks
32c0: 3c 30 20 29 7b 0a 20 20 20 20 74 65 73 74 54 68  <0 ){.    testTh
32d0: 72 65 61 64 4c 6f 63 6b 69 6e 67 42 65 68 61 76  readLockingBehav
32e0: 69 6f 72 28 66 64 29 3b 0a 20 20 7d 0a 20 20 6b  ior(fd);.  }.  k
32f0: 65 79 31 2e 74 69 64 20 3d 20 74 68 72 65 61 64  ey1.tid = thread
3300: 73 4f 76 65 72 72 69 64 65 45 61 63 68 4f 74 68  sOverrideEachOth
3310: 65 72 73 4c 6f 63 6b 73 20 3f 20 30 20 3a 20 70  ersLocks ? 0 : p
3320: 74 68 72 65 61 64 5f 73 65 6c 66 28 29 3b 0a 23  thread_self();.#
3330: 65 6e 64 69 66 0a 20 20 6d 65 6d 73 65 74 28 26  endif.  memset(&
3340: 6b 65 79 32 2c 20 30 2c 20 73 69 7a 65 6f 66 28  key2, 0, sizeof(
3350: 6b 65 79 32 29 29 3b 0a 20 20 6b 65 79 32 2e 64  key2));.  key2.d
3360: 65 76 20 3d 20 73 74 61 74 62 75 66 2e 73 74 5f  ev = statbuf.st_
3370: 64 65 76 3b 0a 20 20 6b 65 79 32 2e 69 6e 6f 20  dev;.  key2.ino 
3380: 3d 20 73 74 61 74 62 75 66 2e 73 74 5f 69 6e 6f  = statbuf.st_ino
3390: 3b 0a 20 20 70 4c 6f 63 6b 20 3d 20 28 73 74 72  ;.  pLock = (str
33a0: 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 2a 29 73 71  uct lockInfo*)sq
33b0: 6c 69 74 65 33 48 61 73 68 46 69 6e 64 28 26 6c  lite3HashFind(&l
33c0: 6f 63 6b 48 61 73 68 2c 20 26 6b 65 79 31 2c 20  ockHash, &key1, 
33d0: 73 69 7a 65 6f 66 28 6b 65 79 31 29 29 3b 0a 20  sizeof(key1));. 
33e0: 20 69 66 28 20 70 4c 6f 63 6b 3d 3d 30 20 29 7b   if( pLock==0 ){
33f0: 0a 20 20 20 20 73 74 72 75 63 74 20 6c 6f 63 6b  .    struct lock
3400: 49 6e 66 6f 20 2a 70 4f 6c 64 3b 0a 20 20 20 20  Info *pOld;.    
3410: 70 4c 6f 63 6b 20 3d 20 73 71 6c 69 74 65 4d 61  pLock = sqliteMa
3420: 6c 6c 6f 63 52 61 77 28 20 73 69 7a 65 6f 66 28  llocRaw( sizeof(
3430: 2a 70 4c 6f 63 6b 29 20 29 3b 0a 20 20 20 20 69  *pLock) );.    i
3440: 66 28 20 70 4c 6f 63 6b 3d 3d 30 20 29 20 72 65  f( pLock==0 ) re
3450: 74 75 72 6e 20 31 3b 0a 20 20 20 20 70 4c 6f 63  turn 1;.    pLoc
3460: 6b 2d 3e 6b 65 79 20 3d 20 6b 65 79 31 3b 0a 20  k->key = key1;. 
3470: 20 20 20 70 4c 6f 63 6b 2d 3e 6e 52 65 66 20 3d     pLock->nRef =
3480: 20 31 3b 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e 63   1;.    pLock->c
3490: 6e 74 20 3d 20 30 3b 0a 20 20 20 20 70 4c 6f 63  nt = 0;.    pLoc
34a0: 6b 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 30 3b  k->locktype = 0;
34b0: 0a 20 20 20 20 70 4f 6c 64 20 3d 20 73 71 6c 69  .    pOld = sqli
34c0: 74 65 33 48 61 73 68 49 6e 73 65 72 74 28 26 6c  te3HashInsert(&l
34d0: 6f 63 6b 48 61 73 68 2c 20 26 70 4c 6f 63 6b 2d  ockHash, &pLock-
34e0: 3e 6b 65 79 2c 20 73 69 7a 65 6f 66 28 6b 65 79  >key, sizeof(key
34f0: 31 29 2c 20 70 4c 6f 63 6b 29 3b 0a 20 20 20 20  1), pLock);.    
3500: 69 66 28 20 70 4f 6c 64 21 3d 30 20 29 7b 0a 20  if( pOld!=0 ){. 
3510: 20 20 20 20 20 61 73 73 65 72 74 28 20 70 4f 6c       assert( pOl
3520: 64 3d 3d 70 4c 6f 63 6b 20 29 3b 0a 20 20 20 20  d==pLock );.    
3530: 20 20 73 71 6c 69 74 65 46 72 65 65 28 70 4c 6f    sqliteFree(pLo
3540: 63 6b 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72  ck);.      retur
3550: 6e 20 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c  n 1;.    }.  }el
3560: 73 65 7b 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e 6e  se{.    pLock->n
3570: 52 65 66 2b 2b 3b 0a 20 20 7d 0a 20 20 2a 70 70  Ref++;.  }.  *pp
3580: 4c 6f 63 6b 20 3d 20 70 4c 6f 63 6b 3b 0a 20 20  Lock = pLock;.  
3590: 70 4f 70 65 6e 20 3d 20 28 73 74 72 75 63 74 20  pOpen = (struct 
35a0: 6f 70 65 6e 43 6e 74 2a 29 73 71 6c 69 74 65 33  openCnt*)sqlite3
35b0: 48 61 73 68 46 69 6e 64 28 26 6f 70 65 6e 48 61  HashFind(&openHa
35c0: 73 68 2c 20 26 6b 65 79 32 2c 20 73 69 7a 65 6f  sh, &key2, sizeo
35d0: 66 28 6b 65 79 32 29 29 3b 0a 20 20 69 66 28 20  f(key2));.  if( 
35e0: 70 4f 70 65 6e 3d 3d 30 20 29 7b 0a 20 20 20 20  pOpen==0 ){.    
35f0: 73 74 72 75 63 74 20 6f 70 65 6e 43 6e 74 20 2a  struct openCnt *
3600: 70 4f 6c 64 3b 0a 20 20 20 20 70 4f 70 65 6e 20  pOld;.    pOpen 
3610: 3d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 52 61  = sqliteMallocRa
3620: 77 28 20 73 69 7a 65 6f 66 28 2a 70 4f 70 65 6e  w( sizeof(*pOpen
3630: 29 20 29 3b 0a 20 20 20 20 69 66 28 20 70 4f 70  ) );.    if( pOp
3640: 65 6e 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 72  en==0 ){.      r
3650: 65 6c 65 61 73 65 4c 6f 63 6b 49 6e 66 6f 28 70  eleaseLockInfo(p
3660: 4c 6f 63 6b 29 3b 0a 20 20 20 20 20 20 72 65 74  Lock);.      ret
3670: 75 72 6e 20 31 3b 0a 20 20 20 20 7d 0a 20 20 20  urn 1;.    }.   
3680: 20 70 4f 70 65 6e 2d 3e 6b 65 79 20 3d 20 6b 65   pOpen->key = ke
3690: 79 32 3b 0a 20 20 20 20 70 4f 70 65 6e 2d 3e 6e  y2;.    pOpen->n
36a0: 52 65 66 20 3d 20 31 3b 0a 20 20 20 20 70 4f 70  Ref = 1;.    pOp
36b0: 65 6e 2d 3e 6e 4c 6f 63 6b 20 3d 20 30 3b 0a 20  en->nLock = 0;. 
36c0: 20 20 20 70 4f 70 65 6e 2d 3e 6e 50 65 6e 64 69     pOpen->nPendi
36d0: 6e 67 20 3d 20 30 3b 0a 20 20 20 20 70 4f 70 65  ng = 0;.    pOpe
36e0: 6e 2d 3e 61 50 65 6e 64 69 6e 67 20 3d 20 30 3b  n->aPending = 0;
36f0: 0a 20 20 20 20 70 4f 6c 64 20 3d 20 73 71 6c 69  .    pOld = sqli
3700: 74 65 33 48 61 73 68 49 6e 73 65 72 74 28 26 6f  te3HashInsert(&o
3710: 70 65 6e 48 61 73 68 2c 20 26 70 4f 70 65 6e 2d  penHash, &pOpen-
3720: 3e 6b 65 79 2c 20 73 69 7a 65 6f 66 28 6b 65 79  >key, sizeof(key
3730: 32 29 2c 20 70 4f 70 65 6e 29 3b 0a 20 20 20 20  2), pOpen);.    
3740: 69 66 28 20 70 4f 6c 64 21 3d 30 20 29 7b 0a 20  if( pOld!=0 ){. 
3750: 20 20 20 20 20 61 73 73 65 72 74 28 20 70 4f 6c       assert( pOl
3760: 64 3d 3d 70 4f 70 65 6e 20 29 3b 0a 20 20 20 20  d==pOpen );.    
3770: 20 20 73 71 6c 69 74 65 46 72 65 65 28 70 4f 70    sqliteFree(pOp
3780: 65 6e 29 3b 0a 20 20 20 20 20 20 72 65 6c 65 61  en);.      relea
3790: 73 65 4c 6f 63 6b 49 6e 66 6f 28 70 4c 6f 63 6b  seLockInfo(pLock
37a0: 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20  );.      return 
37b0: 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65  1;.    }.  }else
37c0: 7b 0a 20 20 20 20 70 4f 70 65 6e 2d 3e 6e 52 65  {.    pOpen->nRe
37d0: 66 2b 2b 3b 0a 20 20 7d 0a 20 20 2a 70 70 4f 70  f++;.  }.  *ppOp
37e0: 65 6e 20 3d 20 70 4f 70 65 6e 3b 0a 20 20 72 65  en = pOpen;.  re
37f0: 74 75 72 6e 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  turn 0;.}../*.**
3800: 20 44 65 6c 65 74 65 20 74 68 65 20 6e 61 6d 65   Delete the name
3810: 64 20 66 69 6c 65 0a 2a 2f 0a 69 6e 74 20 73 71  d file.*/.int sq
3820: 6c 69 74 65 33 4f 73 44 65 6c 65 74 65 28 63 6f  lite3OsDelete(co
3830: 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e  nst char *zFilen
3840: 61 6d 65 29 7b 0a 20 20 75 6e 6c 69 6e 6b 28 7a  ame){.  unlink(z
3850: 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 72 65 74  Filename);.  ret
3860: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d  urn SQLITE_OK;.}
3870: 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54  ../*.** Return T
3880: 52 55 45 20 69 66 20 74 68 65 20 6e 61 6d 65 64  RUE if the named
3890: 20 66 69 6c 65 20 65 78 69 73 74 73 2e 0a 2a 2f   file exists..*/
38a0: 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 46 69  .int sqlite3OsFi
38b0: 6c 65 45 78 69 73 74 73 28 63 6f 6e 73 74 20 63  leExists(const c
38c0: 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b  har *zFilename){
38d0: 0a 20 20 72 65 74 75 72 6e 20 61 63 63 65 73 73  .  return access
38e0: 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 30 29 3d 3d  (zFilename, 0)==
38f0: 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 74 74 65  0;.}../*.** Atte
3900: 6d 70 74 20 74 6f 20 6f 70 65 6e 20 61 20 66 69  mpt to open a fi
3910: 6c 65 20 66 6f 72 20 62 6f 74 68 20 72 65 61 64  le for both read
3920: 69 6e 67 20 61 6e 64 20 77 72 69 74 69 6e 67 2e  ing and writing.
3930: 20 20 49 66 20 74 68 61 74 0a 2a 2a 20 66 61 69    If that.** fai
3940: 6c 73 2c 20 74 72 79 20 6f 70 65 6e 69 6e 67 20  ls, try opening 
3950: 69 74 20 72 65 61 64 2d 6f 6e 6c 79 2e 20 20 49  it read-only.  I
3960: 66 20 74 68 65 20 66 69 6c 65 20 64 6f 65 73 20  f the file does 
3970: 6e 6f 74 20 65 78 69 73 74 2c 0a 2a 2a 20 74 72  not exist,.** tr
3980: 79 20 74 6f 20 63 72 65 61 74 65 20 69 74 2e 0a  y to create it..
3990: 2a 2a 0a 2a 2a 20 4f 6e 20 73 75 63 63 65 73 73  **.** On success
39a0: 2c 20 61 20 68 61 6e 64 6c 65 20 66 6f 72 20 74  , a handle for t
39b0: 68 65 20 6f 70 65 6e 20 66 69 6c 65 20 69 73 20  he open file is 
39c0: 77 72 69 74 74 65 6e 20 74 6f 20 2a 69 64 0a 2a  written to *id.*
39d0: 2a 20 61 6e 64 20 2a 70 52 65 61 64 6f 6e 6c 79  * and *pReadonly
39e0: 20 69 73 20 73 65 74 20 74 6f 20 30 20 69 66 20   is set to 0 if 
39f0: 74 68 65 20 66 69 6c 65 20 77 61 73 20 6f 70 65  the file was ope
3a00: 6e 65 64 20 66 6f 72 20 72 65 61 64 69 6e 67 20  ned for reading 
3a10: 61 6e 64 0a 2a 2a 20 77 72 69 74 69 6e 67 20 6f  and.** writing o
3a20: 72 20 31 20 69 66 20 74 68 65 20 66 69 6c 65 20  r 1 if the file 
3a30: 77 61 73 20 6f 70 65 6e 65 64 20 72 65 61 64 2d  was opened read-
3a40: 6f 6e 6c 79 2e 20 20 54 68 65 20 66 75 6e 63 74  only.  The funct
3a50: 69 6f 6e 20 72 65 74 75 72 6e 73 0a 2a 2a 20 53  ion returns.** S
3a60: 51 4c 49 54 45 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20  QLITE_OK..**.** 
3a70: 4f 6e 20 66 61 69 6c 75 72 65 2c 20 74 68 65 20  On failure, the 
3a80: 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73  function returns
3a90: 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e   SQLITE_CANTOPEN
3aa0: 20 61 6e 64 20 6c 65 61 76 65 73 0a 2a 2a 20 2a   and leaves.** *
3ab0: 69 64 20 61 6e 64 20 2a 70 52 65 61 64 6f 6e 6c  id and *pReadonl
3ac0: 79 20 75 6e 63 68 61 6e 67 65 64 2e 0a 2a 2f 0a  y unchanged..*/.
3ad0: 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 4f 70 65  int sqlite3OsOpe
3ae0: 6e 52 65 61 64 57 72 69 74 65 28 0a 20 20 63 6f  nReadWrite(.  co
3af0: 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e  nst char *zFilen
3b00: 61 6d 65 2c 0a 20 20 4f 73 46 69 6c 65 20 2a 69  ame,.  OsFile *i
3b10: 64 2c 0a 20 20 69 6e 74 20 2a 70 52 65 61 64 6f  d,.  int *pReado
3b20: 6e 6c 79 0a 29 7b 0a 20 20 69 6e 74 20 72 63 3b  nly.){.  int rc;
3b30: 0a 20 20 61 73 73 65 72 74 28 20 21 69 64 2d 3e  .  assert( !id->
3b40: 69 73 4f 70 65 6e 20 29 3b 0a 20 20 69 64 2d 3e  isOpen );.  id->
3b50: 64 69 72 66 64 20 3d 20 2d 31 3b 0a 20 20 69 64  dirfd = -1;.  id
3b60: 2d 3e 68 20 3d 20 6f 70 65 6e 28 7a 46 69 6c 65  ->h = open(zFile
3b70: 6e 61 6d 65 2c 20 4f 5f 52 44 57 52 7c 4f 5f 43  name, O_RDWR|O_C
3b80: 52 45 41 54 7c 4f 5f 4c 41 52 47 45 46 49 4c 45  REAT|O_LARGEFILE
3b90: 7c 4f 5f 42 49 4e 41 52 59 2c 20 30 36 34 34 29  |O_BINARY, 0644)
3ba0: 3b 0a 20 20 69 66 28 20 69 64 2d 3e 68 3c 30 20  ;.  if( id->h<0 
3bb0: 29 7b 0a 20 20 20 20 69 64 2d 3e 68 20 3d 20 6f  ){.    id->h = o
3bc0: 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f  pen(zFilename, O
3bd0: 5f 52 44 4f 4e 4c 59 7c 4f 5f 4c 41 52 47 45 46  _RDONLY|O_LARGEF
3be0: 49 4c 45 7c 4f 5f 42 49 4e 41 52 59 29 3b 0a 20  ILE|O_BINARY);. 
3bf0: 20 20 20 69 66 28 20 69 64 2d 3e 68 3c 30 20 29     if( id->h<0 )
3c00: 7b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 53  {.      return S
3c10: 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 20  QLITE_CANTOPEN; 
3c20: 0a 20 20 20 20 7d 0a 20 20 20 20 2a 70 52 65 61  .    }.    *pRea
3c30: 64 6f 6e 6c 79 20 3d 20 31 3b 0a 20 20 7d 65 6c  donly = 1;.  }el
3c40: 73 65 7b 0a 20 20 20 20 2a 70 52 65 61 64 6f 6e  se{.    *pReadon
3c50: 6c 79 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 73 71  ly = 0;.  }.  sq
3c60: 6c 69 74 65 33 4f 73 45 6e 74 65 72 4d 75 74 65  lite3OsEnterMute
3c70: 78 28 29 3b 0a 20 20 72 63 20 3d 20 66 69 6e 64  x();.  rc = find
3c80: 4c 6f 63 6b 49 6e 66 6f 28 69 64 2d 3e 68 2c 20  LockInfo(id->h, 
3c90: 26 69 64 2d 3e 70 4c 6f 63 6b 2c 20 26 69 64 2d  &id->pLock, &id-
3ca0: 3e 70 4f 70 65 6e 29 3b 0a 20 20 73 71 6c 69 74  >pOpen);.  sqlit
3cb0: 65 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29  e3OsLeaveMutex()
3cc0: 3b 0a 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20  ;.  if( rc ){.  
3cd0: 20 20 63 6c 6f 73 65 28 69 64 2d 3e 68 29 3b 0a    close(id->h);.
3ce0: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54      return SQLIT
3cf0: 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d 0a 20 20 69  E_NOMEM;.  }.  i
3d00: 64 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 30 3b  d->locktype = 0;
3d10: 0a 20 20 69 64 2d 3e 69 73 4f 70 65 6e 20 3d 20  .  id->isOpen = 
3d20: 31 3b 0a 20 20 54 52 41 43 45 33 28 22 4f 50 45  1;.  TRACE3("OPE
3d30: 4e 20 20 20 20 25 2d 33 64 20 25 73 5c 6e 22 2c  N    %-3d %s\n",
3d40: 20 69 64 2d 3e 68 2c 20 7a 46 69 6c 65 6e 61 6d   id->h, zFilenam
3d50: 65 29 3b 0a 20 20 4f 70 65 6e 43 6f 75 6e 74 65  e);.  OpenCounte
3d60: 72 28 2b 31 29 3b 0a 20 20 72 65 74 75 72 6e 20  r(+1);.  return 
3d70: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 0a 2f  SQLITE_OK;.}.../
3d80: 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f 20  *.** Attempt to 
3d90: 6f 70 65 6e 20 61 20 6e 65 77 20 66 69 6c 65 20  open a new file 
3da0: 66 6f 72 20 65 78 63 6c 75 73 69 76 65 20 61 63  for exclusive ac
3db0: 63 65 73 73 20 62 79 20 74 68 69 73 20 70 72 6f  cess by this pro
3dc0: 63 65 73 73 2e 0a 2a 2a 20 54 68 65 20 66 69 6c  cess..** The fil
3dd0: 65 20 77 69 6c 6c 20 62 65 20 6f 70 65 6e 65 64  e will be opened
3de0: 20 66 6f 72 20 62 6f 74 68 20 72 65 61 64 69 6e   for both readin
3df0: 67 20 61 6e 64 20 77 72 69 74 69 6e 67 2e 20 20  g and writing.  
3e00: 54 6f 20 61 76 6f 69 64 0a 2a 2a 20 61 20 70 6f  To avoid.** a po
3e10: 74 65 6e 74 69 61 6c 20 73 65 63 75 72 69 74 79  tential security
3e20: 20 70 72 6f 62 6c 65 6d 2c 20 77 65 20 64 6f 20   problem, we do 
3e30: 6e 6f 74 20 61 6c 6c 6f 77 20 74 68 65 20 66 69  not allow the fi
3e40: 6c 65 20 74 6f 20 68 61 76 65 0a 2a 2a 20 70 72  le to have.** pr
3e50: 65 76 69 6f 75 73 6c 79 20 65 78 69 73 74 65 64  eviously existed
3e60: 2e 20 20 4e 6f 72 20 64 6f 20 77 65 20 61 6c 6c  .  Nor do we all
3e70: 6f 77 20 74 68 65 20 66 69 6c 65 20 74 6f 20 62  ow the file to b
3e80: 65 20 61 20 73 79 6d 62 6f 6c 69 63 0a 2a 2a 20  e a symbolic.** 
3e90: 6c 69 6e 6b 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 64  link..**.** If d
3ea0: 65 6c 46 6c 61 67 20 69 73 20 74 72 75 65 2c 20  elFlag is true, 
3eb0: 74 68 65 6e 20 6d 61 6b 65 20 61 72 72 61 6e 67  then make arrang
3ec0: 65 6d 65 6e 74 73 20 74 6f 20 61 75 74 6f 6d 61  ements to automa
3ed0: 74 69 63 61 6c 6c 79 20 64 65 6c 65 74 65 0a 2a  tically delete.*
3ee0: 2a 20 74 68 65 20 66 69 6c 65 20 77 68 65 6e 20  * the file when 
3ef0: 69 74 20 69 73 20 63 6c 6f 73 65 64 2e 0a 2a 2a  it is closed..**
3f00: 0a 2a 2a 20 4f 6e 20 73 75 63 63 65 73 73 2c 20  .** On success, 
3f10: 77 72 69 74 65 20 74 68 65 20 66 69 6c 65 20 68  write the file h
3f20: 61 6e 64 6c 65 20 69 6e 74 6f 20 2a 69 64 20 61  andle into *id a
3f30: 6e 64 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  nd return SQLITE
3f40: 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66 61  _OK..**.** On fa
3f50: 69 6c 75 72 65 2c 20 72 65 74 75 72 6e 20 53 51  ilure, return SQ
3f60: 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 2e 0a 2a  LITE_CANTOPEN..*
3f70: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 4f  /.int sqlite3OsO
3f80: 70 65 6e 45 78 63 6c 75 73 69 76 65 28 63 6f 6e  penExclusive(con
3f90: 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61  st char *zFilena
3fa0: 6d 65 2c 20 4f 73 46 69 6c 65 20 2a 69 64 2c 20  me, OsFile *id, 
3fb0: 69 6e 74 20 64 65 6c 46 6c 61 67 29 7b 0a 20 20  int delFlag){.  
3fc0: 69 6e 74 20 72 63 3b 0a 20 20 61 73 73 65 72 74  int rc;.  assert
3fd0: 28 20 21 69 64 2d 3e 69 73 4f 70 65 6e 20 29 3b  ( !id->isOpen );
3fe0: 0a 20 20 69 66 28 20 61 63 63 65 73 73 28 7a 46  .  if( access(zF
3ff0: 69 6c 65 6e 61 6d 65 2c 20 30 29 3d 3d 30 20 29  ilename, 0)==0 )
4000: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c  {.    return SQL
4010: 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20  ITE_CANTOPEN;.  
4020: 7d 0a 20 20 69 64 2d 3e 64 69 72 66 64 20 3d 20  }.  id->dirfd = 
4030: 2d 31 3b 0a 20 20 69 64 2d 3e 68 20 3d 20 6f 70  -1;.  id->h = op
4040: 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20 20  en(zFilename,.  
4050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 5f                O_
4060: 52 44 57 52 7c 4f 5f 43 52 45 41 54 7c 4f 5f 45  RDWR|O_CREAT|O_E
4070: 58 43 4c 7c 4f 5f 4e 4f 46 4f 4c 4c 4f 57 7c 4f  XCL|O_NOFOLLOW|O
4080: 5f 4c 41 52 47 45 46 49 4c 45 7c 4f 5f 42 49 4e  _LARGEFILE|O_BIN
4090: 41 52 59 2c 20 30 36 30 30 29 3b 0a 20 20 69 66  ARY, 0600);.  if
40a0: 28 20 69 64 2d 3e 68 3c 30 20 29 7b 0a 20 20 20  ( id->h<0 ){.   
40b0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43   return SQLITE_C
40c0: 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 20 73  ANTOPEN;.  }.  s
40d0: 71 6c 69 74 65 33 4f 73 45 6e 74 65 72 4d 75 74  qlite3OsEnterMut
40e0: 65 78 28 29 3b 0a 20 20 72 63 20 3d 20 66 69 6e  ex();.  rc = fin
40f0: 64 4c 6f 63 6b 49 6e 66 6f 28 69 64 2d 3e 68 2c  dLockInfo(id->h,
4100: 20 26 69 64 2d 3e 70 4c 6f 63 6b 2c 20 26 69 64   &id->pLock, &id
4110: 2d 3e 70 4f 70 65 6e 29 3b 0a 20 20 73 71 6c 69  ->pOpen);.  sqli
4120: 74 65 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28  te3OsLeaveMutex(
4130: 29 3b 0a 20 20 69 66 28 20 72 63 20 29 7b 0a 20  );.  if( rc ){. 
4140: 20 20 20 63 6c 6f 73 65 28 69 64 2d 3e 68 29 3b     close(id->h);
4150: 0a 20 20 20 20 75 6e 6c 69 6e 6b 28 7a 46 69 6c  .    unlink(zFil
4160: 65 6e 61 6d 65 29 3b 0a 20 20 20 20 72 65 74 75  ename);.    retu
4170: 72 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b  rn SQLITE_NOMEM;
4180: 0a 20 20 7d 0a 20 20 69 64 2d 3e 6c 6f 63 6b 74  .  }.  id->lockt
4190: 79 70 65 20 3d 20 30 3b 0a 20 20 69 64 2d 3e 69  ype = 0;.  id->i
41a0: 73 4f 70 65 6e 20 3d 20 31 3b 0a 20 20 69 66 28  sOpen = 1;.  if(
41b0: 20 64 65 6c 46 6c 61 67 20 29 7b 0a 20 20 20 20   delFlag ){.    
41c0: 75 6e 6c 69 6e 6b 28 7a 46 69 6c 65 6e 61 6d 65  unlink(zFilename
41d0: 29 3b 0a 20 20 7d 0a 20 20 54 52 41 43 45 33 28  );.  }.  TRACE3(
41e0: 22 4f 50 45 4e 2d 45 58 20 25 2d 33 64 20 25 73  "OPEN-EX %-3d %s
41f0: 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20 7a 46 69 6c  \n", id->h, zFil
4200: 65 6e 61 6d 65 29 3b 0a 20 20 4f 70 65 6e 43 6f  ename);.  OpenCo
4210: 75 6e 74 65 72 28 2b 31 29 3b 0a 20 20 72 65 74  unter(+1);.  ret
4220: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d  urn SQLITE_OK;.}
4230: 0a 0a 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20  ../*.** Attempt 
4240: 74 6f 20 6f 70 65 6e 20 61 20 6e 65 77 20 66 69  to open a new fi
4250: 6c 65 20 66 6f 72 20 72 65 61 64 2d 6f 6e 6c 79  le for read-only
4260: 20 61 63 63 65 73 73 2e 0a 2a 2a 0a 2a 2a 20 4f   access..**.** O
4270: 6e 20 73 75 63 63 65 73 73 2c 20 77 72 69 74 65  n success, write
4280: 20 74 68 65 20 66 69 6c 65 20 68 61 6e 64 6c 65   the file handle
4290: 20 69 6e 74 6f 20 2a 69 64 20 61 6e 64 20 72 65   into *id and re
42a0: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a  turn SQLITE_OK..
42b0: 2a 2a 0a 2a 2a 20 4f 6e 20 66 61 69 6c 75 72 65  **.** On failure
42c0: 2c 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f  , return SQLITE_
42d0: 43 41 4e 54 4f 50 45 4e 2e 0a 2a 2f 0a 69 6e 74  CANTOPEN..*/.int
42e0: 20 73 71 6c 69 74 65 33 4f 73 4f 70 65 6e 52 65   sqlite3OsOpenRe
42f0: 61 64 4f 6e 6c 79 28 63 6f 6e 73 74 20 63 68 61  adOnly(const cha
4300: 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 73  r *zFilename, Os
4310: 46 69 6c 65 20 2a 69 64 29 7b 0a 20 20 69 6e 74  File *id){.  int
4320: 20 72 63 3b 0a 20 20 61 73 73 65 72 74 28 20 21   rc;.  assert( !
4330: 69 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20  id->isOpen );.  
4340: 69 64 2d 3e 64 69 72 66 64 20 3d 20 2d 31 3b 0a  id->dirfd = -1;.
4350: 20 20 69 64 2d 3e 68 20 3d 20 6f 70 65 6e 28 7a    id->h = open(z
4360: 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44 4f 4e  Filename, O_RDON
4370: 4c 59 7c 4f 5f 4c 41 52 47 45 46 49 4c 45 7c 4f  LY|O_LARGEFILE|O
4380: 5f 42 49 4e 41 52 59 29 3b 0a 20 20 69 66 28 20  _BINARY);.  if( 
4390: 69 64 2d 3e 68 3c 30 20 29 7b 0a 20 20 20 20 72  id->h<0 ){.    r
43a0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e  eturn SQLITE_CAN
43b0: 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 20 73 71 6c  TOPEN;.  }.  sql
43c0: 69 74 65 33 4f 73 45 6e 74 65 72 4d 75 74 65 78  ite3OsEnterMutex
43d0: 28 29 3b 0a 20 20 72 63 20 3d 20 66 69 6e 64 4c  ();.  rc = findL
43e0: 6f 63 6b 49 6e 66 6f 28 69 64 2d 3e 68 2c 20 26  ockInfo(id->h, &
43f0: 69 64 2d 3e 70 4c 6f 63 6b 2c 20 26 69 64 2d 3e  id->pLock, &id->
4400: 70 4f 70 65 6e 29 3b 0a 20 20 73 71 6c 69 74 65  pOpen);.  sqlite
4410: 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b  3OsLeaveMutex();
4420: 0a 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20 20  .  if( rc ){.   
4430: 20 63 6c 6f 73 65 28 69 64 2d 3e 68 29 3b 0a 20   close(id->h);. 
4440: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45     return SQLITE
4450: 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d 0a 20 20 69 64  _NOMEM;.  }.  id
4460: 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 30 3b 0a  ->locktype = 0;.
4470: 20 20 69 64 2d 3e 69 73 4f 70 65 6e 20 3d 20 31    id->isOpen = 1
4480: 3b 0a 20 20 54 52 41 43 45 33 28 22 4f 50 45 4e  ;.  TRACE3("OPEN
4490: 2d 52 4f 20 25 2d 33 64 20 25 73 5c 6e 22 2c 20  -RO %-3d %s\n", 
44a0: 69 64 2d 3e 68 2c 20 7a 46 69 6c 65 6e 61 6d 65  id->h, zFilename
44b0: 29 3b 0a 20 20 4f 70 65 6e 43 6f 75 6e 74 65 72  );.  OpenCounter
44c0: 28 2b 31 29 3b 0a 20 20 72 65 74 75 72 6e 20 53  (+1);.  return S
44d0: 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a  QLITE_OK;.}../*.
44e0: 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f 20 6f 70  ** Attempt to op
44f0: 65 6e 20 61 20 66 69 6c 65 20 64 65 73 63 72 69  en a file descri
4500: 70 74 6f 72 20 66 6f 72 20 74 68 65 20 64 69 72  ptor for the dir
4510: 65 63 74 6f 72 79 20 74 68 61 74 20 63 6f 6e 74  ectory that cont
4520: 61 69 6e 73 20 61 0a 2a 2a 20 66 69 6c 65 2e 20  ains a.** file. 
4530: 20 54 68 69 73 20 66 69 6c 65 20 64 65 73 63 72   This file descr
4540: 69 70 74 6f 72 20 63 61 6e 20 62 65 20 75 73 65  iptor can be use
4550: 64 20 74 6f 20 66 73 79 6e 63 28 29 20 74 68 65  d to fsync() the
4560: 20 64 69 72 65 63 74 6f 72 79 0a 2a 2a 20 69 6e   directory.** in
4570: 20 6f 72 64 65 72 20 74 6f 20 6d 61 6b 65 20 73   order to make s
4580: 75 72 65 20 74 68 65 20 63 72 65 61 74 69 6f 6e  ure the creation
4590: 20 6f 66 20 61 20 6e 65 77 20 66 69 6c 65 20 69   of a new file i
45a0: 73 20 61 63 74 75 61 6c 6c 79 20 77 72 69 74 74  s actually writt
45b0: 65 6e 0a 2a 2a 20 74 6f 20 64 69 73 6b 2e 0a 2a  en.** to disk..*
45c0: 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e  *.** This routin
45d0: 65 20 69 73 20 6f 6e 6c 79 20 6d 65 61 6e 69 6e  e is only meanin
45e0: 67 66 75 6c 20 66 6f 72 20 55 6e 69 78 2e 20 20  gful for Unix.  
45f0: 49 74 20 69 73 20 61 20 6e 6f 2d 6f 70 20 75 6e  It is a no-op un
4600: 64 65 72 0a 2a 2a 20 77 69 6e 64 6f 77 73 20 73  der.** windows s
4610: 69 6e 63 65 20 77 69 6e 64 6f 77 73 20 64 6f 65  ince windows doe
4620: 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 20 68 61  s not support ha
4630: 72 64 20 6c 69 6e 6b 73 2e 0a 2a 2a 0a 2a 2a 20  rd links..**.** 
4640: 4f 6e 20 73 75 63 63 65 73 73 2c 20 61 20 68 61  On success, a ha
4650: 6e 64 6c 65 20 66 6f 72 20 61 20 70 72 65 76 69  ndle for a previ
4660: 6f 75 73 6c 79 20 6f 70 65 6e 20 66 69 6c 65 20  ously open file 
4670: 69 73 20 61 74 20 2a 69 64 20 69 73 0a 2a 2a 20  is at *id is.** 
4680: 75 70 64 61 74 65 64 20 77 69 74 68 20 74 68 65  updated with the
4690: 20 6e 65 77 20 64 69 72 65 63 74 6f 72 79 20 66   new directory f
46a0: 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20 61  ile descriptor a
46b0: 6e 64 20 53 51 4c 49 54 45 5f 4f 4b 20 69 73 0a  nd SQLITE_OK is.
46c0: 2a 2a 20 72 65 74 75 72 6e 65 64 2e 0a 2a 2a 0a  ** returned..**.
46d0: 2a 2a 20 4f 6e 20 66 61 69 6c 75 72 65 2c 20 74  ** On failure, t
46e0: 68 65 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75  he function retu
46f0: 72 6e 73 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f  rns SQLITE_CANTO
4700: 50 45 4e 20 61 6e 64 20 6c 65 61 76 65 73 0a 2a  PEN and leaves.*
4710: 2a 20 2a 69 64 20 75 6e 63 68 61 6e 67 65 64 2e  * *id unchanged.
4720: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f  .*/.int sqlite3O
4730: 73 4f 70 65 6e 44 69 72 65 63 74 6f 72 79 28 0a  sOpenDirectory(.
4740: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 44    const char *zD
4750: 69 72 6e 61 6d 65 2c 0a 20 20 4f 73 46 69 6c 65  irname,.  OsFile
4760: 20 2a 69 64 0a 29 7b 0a 20 20 69 66 28 20 21 69   *id.){.  if( !i
4770: 64 2d 3e 69 73 4f 70 65 6e 20 29 7b 0a 20 20 20  d->isOpen ){.   
4780: 20 2f 2a 20 44 6f 20 6e 6f 74 20 6f 70 65 6e 20   /* Do not open 
4790: 74 68 65 20 64 69 72 65 63 74 6f 72 79 20 69 66  the directory if
47a0: 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69   the correspondi
47b0: 6e 67 20 66 69 6c 65 20 69 73 20 6e 6f 74 20 61  ng file is not a
47c0: 6c 72 65 61 64 79 0a 20 20 20 20 2a 2a 20 6f 70  lready.    ** op
47d0: 65 6e 2e 20 2a 2f 0a 20 20 20 20 72 65 74 75 72  en. */.    retur
47e0: 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45  n SQLITE_CANTOPE
47f0: 4e 3b 0a 20 20 7d 0a 20 20 61 73 73 65 72 74 28  N;.  }.  assert(
4800: 20 69 64 2d 3e 64 69 72 66 64 3c 30 20 29 3b 0a   id->dirfd<0 );.
4810: 20 20 69 64 2d 3e 64 69 72 66 64 20 3d 20 6f 70    id->dirfd = op
4820: 65 6e 28 7a 44 69 72 6e 61 6d 65 2c 20 4f 5f 52  en(zDirname, O_R
4830: 44 4f 4e 4c 59 7c 4f 5f 42 49 4e 41 52 59 2c 20  DONLY|O_BINARY, 
4840: 30 36 34 34 29 3b 0a 20 20 69 66 28 20 69 64 2d  0644);.  if( id-
4850: 3e 64 69 72 66 64 3c 30 20 29 7b 0a 20 20 20 20  >dirfd<0 ){.    
4860: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41  return SQLITE_CA
4870: 4e 54 4f 50 45 4e 3b 20 0a 20 20 7d 0a 20 20 54  NTOPEN; .  }.  T
4880: 52 41 43 45 33 28 22 4f 50 45 4e 44 49 52 20 25  RACE3("OPENDIR %
4890: 2d 33 64 20 25 73 5c 6e 22 2c 20 69 64 2d 3e 64  -3d %s\n", id->d
48a0: 69 72 66 64 2c 20 7a 44 69 72 6e 61 6d 65 29 3b  irfd, zDirname);
48b0: 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  .  return SQLITE
48c0: 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 72  _OK;.}../*.** Cr
48d0: 65 61 74 65 20 61 20 74 65 6d 70 6f 72 61 72 79  eate a temporary
48e0: 20 66 69 6c 65 20 6e 61 6d 65 20 69 6e 20 7a 42   file name in zB
48f0: 75 66 2e 20 20 7a 42 75 66 20 6d 75 73 74 20 62  uf.  zBuf must b
4900: 65 20 62 69 67 20 65 6e 6f 75 67 68 20 74 6f 0a  e big enough to.
4910: 2a 2a 20 68 6f 6c 64 20 61 74 20 6c 65 61 73 74  ** hold at least
4920: 20 53 51 4c 49 54 45 5f 54 45 4d 50 4e 41 4d 45   SQLITE_TEMPNAME
4930: 5f 53 49 5a 45 20 63 68 61 72 61 63 74 65 72 73  _SIZE characters
4940: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33  ..*/.int sqlite3
4950: 4f 73 54 65 6d 70 46 69 6c 65 4e 61 6d 65 28 63  OsTempFileName(c
4960: 68 61 72 20 2a 7a 42 75 66 29 7b 0a 20 20 73 74  har *zBuf){.  st
4970: 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20  atic const char 
4980: 2a 61 7a 44 69 72 73 5b 5d 20 3d 20 7b 0a 20 20  *azDirs[] = {.  
4990: 20 20 20 22 2f 76 61 72 2f 74 6d 70 22 2c 0a 20     "/var/tmp",. 
49a0: 20 20 20 20 22 2f 75 73 72 2f 74 6d 70 22 2c 0a      "/usr/tmp",.
49b0: 20 20 20 20 20 22 2f 74 6d 70 22 2c 0a 20 20 20       "/tmp",.   
49c0: 20 20 22 2e 22 2c 0a 20 20 7d 3b 0a 20 20 73 74    ".",.  };.  st
49d0: 61 74 69 63 20 75 6e 73 69 67 6e 65 64 20 63 68  atic unsigned ch
49e0: 61 72 20 7a 43 68 61 72 73 5b 5d 20 3d 0a 20 20  ar zChars[] =.  
49f0: 20 20 22 61 62 63 64 65 66 67 68 69 6a 6b 6c 6d    "abcdefghijklm
4a00: 6e 6f 70 71 72 73 74 75 76 77 78 79 7a 22 0a 20  nopqrstuvwxyz". 
4a10: 20 20 20 22 41 42 43 44 45 46 47 48 49 4a 4b 4c     "ABCDEFGHIJKL
4a20: 4d 4e 4f 50 51 52 53 54 55 56 57 58 59 5a 22 0a  MNOPQRSTUVWXYZ".
4a30: 20 20 20 20 22 30 31 32 33 34 35 36 37 38 39 22      "0123456789"
4a40: 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a 20 20  ;.  int i, j;.  
4a50: 73 74 72 75 63 74 20 73 74 61 74 20 62 75 66 3b  struct stat buf;
4a60: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
4a70: 44 69 72 20 3d 20 22 2e 22 3b 0a 20 20 66 6f 72  Dir = ".";.  for
4a80: 28 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61  (i=0; i<sizeof(a
4a90: 7a 44 69 72 73 29 2f 73 69 7a 65 6f 66 28 61 7a  zDirs)/sizeof(az
4aa0: 44 69 72 73 5b 30 5d 29 3b 20 69 2b 2b 29 7b 0a  Dirs[0]); i++){.
4ab0: 20 20 20 20 69 66 28 20 73 74 61 74 28 61 7a 44      if( stat(azD
4ac0: 69 72 73 5b 69 5d 2c 20 26 62 75 66 29 20 29 20  irs[i], &buf) ) 
4ad0: 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 69 66  continue;.    if
4ae0: 28 20 21 53 5f 49 53 44 49 52 28 62 75 66 2e 73  ( !S_ISDIR(buf.s
4af0: 74 5f 6d 6f 64 65 29 20 29 20 63 6f 6e 74 69 6e  t_mode) ) contin
4b00: 75 65 3b 0a 20 20 20 20 69 66 28 20 61 63 63 65  ue;.    if( acce
4b10: 73 73 28 61 7a 44 69 72 73 5b 69 5d 2c 20 30 37  ss(azDirs[i], 07
4b20: 29 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20  ) ) continue;.  
4b30: 20 20 7a 44 69 72 20 3d 20 61 7a 44 69 72 73 5b    zDir = azDirs[
4b40: 69 5d 3b 0a 20 20 20 20 62 72 65 61 6b 3b 0a 20  i];.    break;. 
4b50: 20 7d 0a 20 20 64 6f 7b 0a 20 20 20 20 73 70 72   }.  do{.    spr
4b60: 69 6e 74 66 28 7a 42 75 66 2c 20 22 25 73 2f 22  intf(zBuf, "%s/"
4b70: 54 45 4d 50 5f 46 49 4c 45 5f 50 52 45 46 49 58  TEMP_FILE_PREFIX
4b80: 2c 20 7a 44 69 72 29 3b 0a 20 20 20 20 6a 20 3d  , zDir);.    j =
4b90: 20 73 74 72 6c 65 6e 28 7a 42 75 66 29 3b 0a 20   strlen(zBuf);. 
4ba0: 20 20 20 73 71 6c 69 74 65 33 52 61 6e 64 6f 6d     sqlite3Random
4bb0: 6e 65 73 73 28 31 35 2c 20 26 7a 42 75 66 5b 6a  ness(15, &zBuf[j
4bc0: 5d 29 3b 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b  ]);.    for(i=0;
4bd0: 20 69 3c 31 35 3b 20 69 2b 2b 2c 20 6a 2b 2b 29   i<15; i++, j++)
4be0: 7b 0a 20 20 20 20 20 20 7a 42 75 66 5b 6a 5d 20  {.      zBuf[j] 
4bf0: 3d 20 28 63 68 61 72 29 7a 43 68 61 72 73 5b 20  = (char)zChars[ 
4c00: 28 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 29  ((unsigned char)
4c10: 7a 42 75 66 5b 6a 5d 29 25 28 73 69 7a 65 6f 66  zBuf[j])%(sizeof
4c20: 28 7a 43 68 61 72 73 29 2d 31 29 20 5d 3b 0a 20  (zChars)-1) ];. 
4c30: 20 20 20 7d 0a 20 20 20 20 7a 42 75 66 5b 6a 5d     }.    zBuf[j]
4c40: 20 3d 20 30 3b 0a 20 20 7d 77 68 69 6c 65 28 20   = 0;.  }while( 
4c50: 61 63 63 65 73 73 28 7a 42 75 66 2c 30 29 3d 3d  access(zBuf,0)==
4c60: 30 20 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51  0 );.  return SQ
4c70: 4c 49 54 45 5f 4f 4b 3b 20 0a 7d 0a 0a 2f 2a 0a  LITE_OK; .}../*.
4c80: 2a 2a 20 52 65 61 64 20 64 61 74 61 20 66 72 6f  ** Read data fro
4c90: 6d 20 61 20 66 69 6c 65 20 69 6e 74 6f 20 61 20  m a file into a 
4ca0: 62 75 66 66 65 72 2e 20 20 52 65 74 75 72 6e 20  buffer.  Return 
4cb0: 53 51 4c 49 54 45 5f 4f 4b 20 69 66 20 61 6c 6c  SQLITE_OK if all
4cc0: 0a 2a 2a 20 62 79 74 65 73 20 77 65 72 65 20 72  .** bytes were r
4cd0: 65 61 64 20 73 75 63 63 65 73 73 66 75 6c 6c 79  ead successfully
4ce0: 20 61 6e 64 20 53 51 4c 49 54 45 5f 49 4f 45 52   and SQLITE_IOER
4cf0: 52 20 69 66 20 61 6e 79 74 68 69 6e 67 20 67 6f  R if anything go
4d00: 65 73 0a 2a 2a 20 77 72 6f 6e 67 2e 0a 2a 2f 0a  es.** wrong..*/.
4d10: 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 52 65 61  int sqlite3OsRea
4d20: 64 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20 76 6f  d(OsFile *id, vo
4d30: 69 64 20 2a 70 42 75 66 2c 20 69 6e 74 20 61 6d  id *pBuf, int am
4d40: 74 29 7b 0a 20 20 69 6e 74 20 67 6f 74 3b 0a 20  t){.  int got;. 
4d50: 20 61 73 73 65 72 74 28 20 69 64 2d 3e 69 73 4f   assert( id->isO
4d60: 70 65 6e 20 29 3b 0a 20 20 53 69 6d 75 6c 61 74  pen );.  Simulat
4d70: 65 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f  eIOError(SQLITE_
4d80: 49 4f 45 52 52 29 3b 0a 20 20 54 49 4d 45 52 5f  IOERR);.  TIMER_
4d90: 53 54 41 52 54 3b 0a 20 20 67 6f 74 20 3d 20 72  START;.  got = r
4da0: 65 61 64 28 69 64 2d 3e 68 2c 20 70 42 75 66 2c  ead(id->h, pBuf,
4db0: 20 61 6d 74 29 3b 0a 20 20 54 49 4d 45 52 5f 45   amt);.  TIMER_E
4dc0: 4e 44 3b 0a 20 20 54 52 41 43 45 34 28 22 52 45  ND;.  TRACE4("RE
4dd0: 41 44 20 20 20 20 25 2d 33 64 20 25 37 64 20 25  AD    %-3d %7d %
4de0: 64 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20 6c 61 73  d\n", id->h, las
4df0: 74 5f 70 61 67 65 2c 20 65 6c 61 70 73 65 29 3b  t_page, elapse);
4e00: 0a 20 20 53 45 45 4b 28 30 29 3b 0a 20 20 2f 2a  .  SEEK(0);.  /*
4e10: 20 69 66 28 20 67 6f 74 3c 30 20 29 20 67 6f 74   if( got<0 ) got
4e20: 20 3d 20 30 3b 20 2a 2f 0a 20 20 69 66 28 20 67   = 0; */.  if( g
4e30: 6f 74 3d 3d 61 6d 74 20 29 7b 0a 20 20 20 20 72  ot==amt ){.    r
4e40: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b  eturn SQLITE_OK;
4e50: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 65  .  }else{.    re
4e60: 74 75 72 6e 20 53 51 4c 49 54 45 5f 49 4f 45 52  turn SQLITE_IOER
4e70: 52 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  R;.  }.}../*.** 
4e80: 57 72 69 74 65 20 64 61 74 61 20 66 72 6f 6d 20  Write data from 
4e90: 61 20 62 75 66 66 65 72 20 69 6e 74 6f 20 61 20  a buffer into a 
4ea0: 66 69 6c 65 2e 20 20 52 65 74 75 72 6e 20 53 51  file.  Return SQ
4eb0: 4c 49 54 45 5f 4f 4b 20 6f 6e 20 73 75 63 63 65  LITE_OK on succe
4ec0: 73 73 0a 2a 2a 20 6f 72 20 73 6f 6d 65 20 6f 74  ss.** or some ot
4ed0: 68 65 72 20 65 72 72 6f 72 20 63 6f 64 65 20 6f  her error code o
4ee0: 6e 20 66 61 69 6c 75 72 65 2e 0a 2a 2f 0a 69 6e  n failure..*/.in
4ef0: 74 20 73 71 6c 69 74 65 33 4f 73 57 72 69 74 65  t sqlite3OsWrite
4f00: 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20 63 6f 6e  (OsFile *id, con
4f10: 73 74 20 76 6f 69 64 20 2a 70 42 75 66 2c 20 69  st void *pBuf, i
4f20: 6e 74 20 61 6d 74 29 7b 0a 20 20 69 6e 74 20 77  nt amt){.  int w
4f30: 72 6f 74 65 20 3d 20 30 3b 0a 20 20 61 73 73 65  rote = 0;.  asse
4f40: 72 74 28 20 69 64 2d 3e 69 73 4f 70 65 6e 20 29  rt( id->isOpen )
4f50: 3b 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f 45 72  ;.  SimulateIOEr
4f60: 72 6f 72 28 53 51 4c 49 54 45 5f 49 4f 45 52 52  ror(SQLITE_IOERR
4f70: 29 3b 0a 20 20 54 49 4d 45 52 5f 53 54 41 52 54  );.  TIMER_START
4f80: 3b 0a 20 20 77 68 69 6c 65 28 20 61 6d 74 3e 30  ;.  while( amt>0
4f90: 20 26 26 20 28 77 72 6f 74 65 20 3d 20 77 72 69   && (wrote = wri
4fa0: 74 65 28 69 64 2d 3e 68 2c 20 70 42 75 66 2c 20  te(id->h, pBuf, 
4fb0: 61 6d 74 29 29 3e 30 20 29 7b 0a 20 20 20 20 61  amt))>0 ){.    a
4fc0: 6d 74 20 2d 3d 20 77 72 6f 74 65 3b 0a 20 20 20  mt -= wrote;.   
4fd0: 20 70 42 75 66 20 3d 20 26 28 28 63 68 61 72 2a   pBuf = &((char*
4fe0: 29 70 42 75 66 29 5b 77 72 6f 74 65 5d 3b 0a 20  )pBuf)[wrote];. 
4ff0: 20 7d 0a 20 20 54 49 4d 45 52 5f 45 4e 44 3b 0a   }.  TIMER_END;.
5000: 20 20 54 52 41 43 45 34 28 22 57 52 49 54 45 20    TRACE4("WRITE 
5010: 20 20 25 2d 33 64 20 25 37 64 20 25 64 5c 6e 22    %-3d %7d %d\n"
5020: 2c 20 69 64 2d 3e 68 2c 20 6c 61 73 74 5f 70 61  , id->h, last_pa
5030: 67 65 2c 20 65 6c 61 70 73 65 29 3b 0a 20 20 53  ge, elapse);.  S
5040: 45 45 4b 28 30 29 3b 0a 20 20 69 66 28 20 61 6d  EEK(0);.  if( am
5050: 74 3e 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72  t>0 ){.    retur
5060: 6e 20 53 51 4c 49 54 45 5f 46 55 4c 4c 3b 0a 20  n SQLITE_FULL;. 
5070: 20 7d 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49   }.  return SQLI
5080: 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  TE_OK;.}../*.** 
5090: 4d 6f 76 65 20 74 68 65 20 72 65 61 64 2f 77 72  Move the read/wr
50a0: 69 74 65 20 70 6f 69 6e 74 65 72 20 69 6e 20 61  ite pointer in a
50b0: 20 66 69 6c 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71   file..*/.int sq
50c0: 6c 69 74 65 33 4f 73 53 65 65 6b 28 4f 73 46 69  lite3OsSeek(OsFi
50d0: 6c 65 20 2a 69 64 2c 20 6f 66 66 5f 74 20 6f 66  le *id, off_t of
50e0: 66 73 65 74 29 7b 0a 20 20 61 73 73 65 72 74 28  fset){.  assert(
50f0: 20 69 64 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20   id->isOpen );. 
5100: 20 53 45 45 4b 28 6f 66 66 73 65 74 2f 31 30 32   SEEK(offset/102
5110: 34 20 2b 20 31 29 3b 0a 20 20 6c 73 65 65 6b 28  4 + 1);.  lseek(
5120: 69 64 2d 3e 68 2c 20 6f 66 66 73 65 74 2c 20 53  id->h, offset, S
5130: 45 45 4b 5f 53 45 54 29 3b 0a 20 20 72 65 74 75  EEK_SET);.  retu
5140: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a  rn SQLITE_OK;.}.
5150: 0a 2f 2a 0a 2a 2a 20 54 68 65 20 66 73 79 6e 63  ./*.** The fsync
5160: 28 29 20 73 79 73 74 65 6d 20 63 61 6c 6c 20 64  () system call d
5170: 6f 65 73 20 6e 6f 74 20 77 6f 72 6b 20 61 73 20  oes not work as 
5180: 61 64 76 65 72 74 69 73 65 64 20 6f 6e 20 6d 61  advertised on ma
5190: 6e 79 0a 2a 2a 20 75 6e 69 78 20 73 79 73 74 65  ny.** unix syste
51a0: 6d 73 2e 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69  ms.  The followi
51b0: 6e 67 20 70 72 6f 63 65 64 75 72 65 20 69 73 20  ng procedure is 
51c0: 61 6e 20 61 74 74 65 6d 70 74 20 74 6f 20 6d 61  an attempt to ma
51d0: 6b 65 0a 2a 2a 20 69 74 20 77 6f 72 6b 20 62 65  ke.** it work be
51e0: 74 74 65 72 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  tter..*/.static 
51f0: 69 6e 74 20 66 75 6c 6c 5f 66 73 79 6e 63 28 69  int full_fsync(i
5200: 6e 74 20 66 64 29 7b 0a 20 20 69 6e 74 20 72 63  nt fd){.  int rc
5210: 3b 0a 23 69 66 64 65 66 20 46 5f 46 55 4c 4c 46  ;.#ifdef F_FULLF
5220: 53 59 4e 43 0a 20 20 72 63 20 3d 20 66 63 6e 74  SYNC.  rc = fcnt
5230: 6c 28 66 64 2c 20 46 5f 46 55 4c 4c 46 53 59 4e  l(fd, F_FULLFSYN
5240: 43 2c 20 30 29 3b 0a 20 20 69 66 28 20 72 63 20  C, 0);.  if( rc 
5250: 29 20 72 63 20 3d 20 66 73 79 6e 63 28 66 64 29  ) rc = fsync(fd)
5260: 3b 0a 23 65 6c 73 65 0a 20 20 72 63 20 3d 20 66  ;.#else.  rc = f
5270: 73 79 6e 63 28 66 64 29 3b 0a 23 65 6e 64 69 66  sync(fd);.#endif
5280: 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a  .  return rc;.}.
5290: 0a 2f 2a 0a 2a 2a 20 4d 61 6b 65 20 73 75 72 65  ./*.** Make sure
52a0: 20 61 6c 6c 20 77 72 69 74 65 73 20 74 6f 20 61   all writes to a
52b0: 20 70 61 72 74 69 63 75 6c 61 72 20 66 69 6c 65   particular file
52c0: 20 61 72 65 20 63 6f 6d 6d 69 74 74 65 64 20 74   are committed t
52d0: 6f 20 64 69 73 6b 2e 0a 2a 2a 0a 2a 2a 20 55 6e  o disk..**.** Un
52e0: 64 65 72 20 55 6e 69 78 2c 20 61 6c 73 6f 20 6d  der Unix, also m
52f0: 61 6b 65 20 73 75 72 65 20 74 68 61 74 20 74 68  ake sure that th
5300: 65 20 64 69 72 65 63 74 6f 72 79 20 65 6e 74 72  e directory entr
5310: 79 20 66 6f 72 20 74 68 65 20 66 69 6c 65 0a 2a  y for the file.*
5320: 2a 20 68 61 73 20 62 65 65 6e 20 63 72 65 61 74  * has been creat
5330: 65 64 20 62 79 20 66 73 79 6e 63 2d 69 6e 67 20  ed by fsync-ing 
5340: 74 68 65 20 64 69 72 65 63 74 6f 72 79 20 74 68  the directory th
5350: 61 74 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20  at contains the 
5360: 66 69 6c 65 2e 0a 2a 2a 20 49 66 20 77 65 20 64  file..** If we d
5370: 6f 20 6e 6f 74 20 64 6f 20 74 68 69 73 20 61 6e  o not do this an
5380: 64 20 77 65 20 65 6e 63 6f 75 6e 74 65 72 20 61  d we encounter a
5390: 20 70 6f 77 65 72 20 66 61 69 6c 75 72 65 2c 20   power failure, 
53a0: 74 68 65 20 64 69 72 65 63 74 6f 72 79 0a 2a 2a  the directory.**
53b0: 20 65 6e 74 72 79 20 66 6f 72 20 74 68 65 20 6a   entry for the j
53c0: 6f 75 72 6e 61 6c 20 6d 69 67 68 74 20 6e 6f 74  ournal might not
53d0: 20 65 78 69 73 74 20 61 66 74 65 72 20 77 65 20   exist after we 
53e0: 72 65 62 6f 6f 74 2e 20 20 54 68 65 20 6e 65 78  reboot.  The nex
53f0: 74 0a 2a 2a 20 53 51 4c 69 74 65 20 74 6f 20 61  t.** SQLite to a
5400: 63 63 65 73 73 20 74 68 65 20 66 69 6c 65 20 77  ccess the file w
5410: 69 6c 6c 20 6e 6f 74 20 6b 6e 6f 77 20 74 68 61  ill not know tha
5420: 74 20 74 68 65 20 6a 6f 75 72 6e 61 6c 20 65 78  t the journal ex
5430: 69 73 74 73 20 28 62 65 63 61 75 73 65 0a 2a 2a  ists (because.**
5440: 20 74 68 65 20 64 69 72 65 63 74 6f 72 79 20 65   the directory e
5450: 6e 74 72 79 20 66 6f 72 20 74 68 65 20 6a 6f 75  ntry for the jou
5460: 72 6e 61 6c 20 77 61 73 20 6e 65 76 65 72 20 63  rnal was never c
5470: 72 65 61 74 65 64 29 20 61 6e 64 20 74 68 65 20  reated) and the 
5480: 74 72 61 6e 73 61 63 74 69 6f 6e 0a 2a 2a 20 77  transaction.** w
5490: 69 6c 6c 20 6e 6f 74 20 72 6f 6c 6c 20 62 61 63  ill not roll bac
54a0: 6b 20 2d 20 70 6f 73 73 69 62 6c 79 20 6c 65 61  k - possibly lea
54b0: 64 69 6e 67 20 74 6f 20 64 61 74 61 62 61 73 65  ding to database
54c0: 20 63 6f 72 72 75 70 74 69 6f 6e 2e 0a 2a 2f 0a   corruption..*/.
54d0: 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 53 79 6e  int sqlite3OsSyn
54e0: 63 28 4f 73 46 69 6c 65 20 2a 69 64 29 7b 0a 20  c(OsFile *id){. 
54f0: 20 61 73 73 65 72 74 28 20 69 64 2d 3e 69 73 4f   assert( id->isO
5500: 70 65 6e 20 29 3b 0a 20 20 53 69 6d 75 6c 61 74  pen );.  Simulat
5510: 65 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f  eIOError(SQLITE_
5520: 49 4f 45 52 52 29 3b 0a 20 20 54 52 41 43 45 32  IOERR);.  TRACE2
5530: 28 22 53 59 4e 43 20 20 20 20 25 2d 33 64 5c 6e  ("SYNC    %-3d\n
5540: 22 2c 20 69 64 2d 3e 68 29 3b 0a 20 20 69 66 28  ", id->h);.  if(
5550: 20 66 75 6c 6c 5f 66 73 79 6e 63 28 69 64 2d 3e   full_fsync(id->
5560: 68 29 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  h) ){.    return
5570: 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 20   SQLITE_IOERR;. 
5580: 20 7d 0a 20 20 69 66 28 20 69 64 2d 3e 64 69 72   }.  if( id->dir
5590: 66 64 3e 3d 30 20 29 7b 0a 20 20 20 20 54 52 41  fd>=0 ){.    TRA
55a0: 43 45 32 28 22 44 49 52 53 59 4e 43 20 25 2d 33  CE2("DIRSYNC %-3
55b0: 64 5c 6e 22 2c 20 69 64 2d 3e 64 69 72 66 64 29  d\n", id->dirfd)
55c0: 3b 0a 20 20 20 20 66 75 6c 6c 5f 66 73 79 6e 63  ;.    full_fsync
55d0: 28 69 64 2d 3e 64 69 72 66 64 29 3b 0a 20 20 20  (id->dirfd);.   
55e0: 20 63 6c 6f 73 65 28 69 64 2d 3e 64 69 72 66 64   close(id->dirfd
55f0: 29 3b 20 20 2f 2a 20 4f 6e 6c 79 20 6e 65 65 64  );  /* Only need
5600: 20 74 6f 20 73 79 6e 63 20 6f 6e 63 65 2c 20 73   to sync once, s
5610: 6f 20 63 6c 6f 73 65 20 74 68 65 20 64 69 72 65  o close the dire
5620: 63 74 6f 72 79 20 2a 2f 0a 20 20 20 20 69 64 2d  ctory */.    id-
5630: 3e 64 69 72 66 64 20 3d 20 2d 31 3b 20 20 20 20  >dirfd = -1;    
5640: 2f 2a 20 77 68 65 6e 20 77 65 20 61 72 65 20 64  /* when we are d
5650: 6f 6e 65 2e 20 2a 2f 0a 20 20 7d 0a 20 20 72 65  one. */.  }.  re
5660: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  turn SQLITE_OK;.
5670: 7d 0a 0a 2f 2a 0a 2a 2a 20 53 79 6e 63 20 74 68  }../*.** Sync th
5680: 65 20 64 69 72 65 63 74 6f 72 79 20 7a 44 69 72  e directory zDir
5690: 6e 61 6d 65 2e 20 54 68 69 73 20 69 73 20 61 20  name. This is a 
56a0: 6e 6f 2d 6f 70 20 6f 6e 20 6f 70 65 72 61 74 69  no-op on operati
56b0: 6e 67 20 73 79 73 74 65 6d 73 20 6f 74 68 65 72  ng systems other
56c0: 0a 2a 2a 20 74 68 61 6e 20 55 4e 49 58 2e 0a 2a  .** than UNIX..*
56d0: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 53  /.int sqlite3OsS
56e0: 79 6e 63 44 69 72 65 63 74 6f 72 79 28 63 6f 6e  yncDirectory(con
56f0: 73 74 20 63 68 61 72 20 2a 7a 44 69 72 6e 61 6d  st char *zDirnam
5700: 65 29 7b 0a 20 20 69 6e 74 20 66 64 3b 0a 20 20  e){.  int fd;.  
5710: 69 6e 74 20 72 3b 0a 20 20 53 69 6d 75 6c 61 74  int r;.  Simulat
5720: 65 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f  eIOError(SQLITE_
5730: 49 4f 45 52 52 29 3b 0a 20 20 66 64 20 3d 20 6f  IOERR);.  fd = o
5740: 70 65 6e 28 7a 44 69 72 6e 61 6d 65 2c 20 4f 5f  pen(zDirname, O_
5750: 52 44 4f 4e 4c 59 7c 4f 5f 42 49 4e 41 52 59 2c  RDONLY|O_BINARY,
5760: 20 30 36 34 34 29 3b 0a 20 20 54 52 41 43 45 33   0644);.  TRACE3
5770: 28 22 44 49 52 53 59 4e 43 20 25 2d 33 64 20 28  ("DIRSYNC %-3d (
5780: 25 73 29 5c 6e 22 2c 20 66 64 2c 20 7a 44 69 72  %s)\n", fd, zDir
5790: 6e 61 6d 65 29 3b 0a 20 20 69 66 28 20 66 64 3c  name);.  if( fd<
57a0: 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20  0 ){.    return 
57b0: 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b  SQLITE_CANTOPEN;
57c0: 20 0a 20 20 7d 0a 20 20 72 20 3d 20 66 73 79 6e   .  }.  r = fsyn
57d0: 63 28 66 64 29 3b 0a 20 20 63 6c 6f 73 65 28 66  c(fd);.  close(f
57e0: 64 29 3b 0a 20 20 72 65 74 75 72 6e 20 28 28 72  d);.  return ((r
57f0: 3d 3d 30 29 3f 53 51 4c 49 54 45 5f 4f 4b 3a 53  ==0)?SQLITE_OK:S
5800: 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a 7d 0a  QLITE_IOERR);.}.
5810: 0a 2f 2a 0a 2a 2a 20 54 72 75 6e 63 61 74 65 20  ./*.** Truncate 
5820: 61 6e 20 6f 70 65 6e 20 66 69 6c 65 20 74 6f 20  an open file to 
5830: 61 20 73 70 65 63 69 66 69 65 64 20 73 69 7a 65  a specified size
5840: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f  .*/.int sqlite3O
5850: 73 54 72 75 6e 63 61 74 65 28 4f 73 46 69 6c 65  sTruncate(OsFile
5860: 20 2a 69 64 2c 20 6f 66 66 5f 74 20 6e 42 79 74   *id, off_t nByt
5870: 65 29 7b 0a 20 20 61 73 73 65 72 74 28 20 69 64  e){.  assert( id
5880: 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20 53 69  ->isOpen );.  Si
5890: 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53 51  mulateIOError(SQ
58a0: 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20 72  LITE_IOERR);.  r
58b0: 65 74 75 72 6e 20 66 74 72 75 6e 63 61 74 65 28  eturn ftruncate(
58c0: 69 64 2d 3e 68 2c 20 6e 42 79 74 65 29 3d 3d 30  id->h, nByte)==0
58d0: 20 3f 20 53 51 4c 49 54 45 5f 4f 4b 20 3a 20 53   ? SQLITE_OK : S
58e0: 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 7d 0a 0a  QLITE_IOERR;.}..
58f0: 2f 2a 0a 2a 2a 20 44 65 74 65 72 6d 69 6e 65 20  /*.** Determine 
5900: 74 68 65 20 63 75 72 72 65 6e 74 20 73 69 7a 65  the current size
5910: 20 6f 66 20 61 20 66 69 6c 65 20 69 6e 20 62 79   of a file in by
5920: 74 65 73 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74  tes.*/.int sqlit
5930: 65 33 4f 73 46 69 6c 65 53 69 7a 65 28 4f 73 46  e3OsFileSize(OsF
5940: 69 6c 65 20 2a 69 64 2c 20 6f 66 66 5f 74 20 2a  ile *id, off_t *
5950: 70 53 69 7a 65 29 7b 0a 20 20 73 74 72 75 63 74  pSize){.  struct
5960: 20 73 74 61 74 20 62 75 66 3b 0a 20 20 61 73 73   stat buf;.  ass
5970: 65 72 74 28 20 69 64 2d 3e 69 73 4f 70 65 6e 20  ert( id->isOpen 
5980: 29 3b 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f 45  );.  SimulateIOE
5990: 72 72 6f 72 28 53 51 4c 49 54 45 5f 49 4f 45 52  rror(SQLITE_IOER
59a0: 52 29 3b 0a 20 20 69 66 28 20 66 73 74 61 74 28  R);.  if( fstat(
59b0: 69 64 2d 3e 68 2c 20 26 62 75 66 29 21 3d 30 20  id->h, &buf)!=0 
59c0: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51  ){.    return SQ
59d0: 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 20 20 7d 0a  LITE_IOERR;.  }.
59e0: 20 20 2a 70 53 69 7a 65 20 3d 20 62 75 66 2e 73    *pSize = buf.s
59f0: 74 5f 73 69 7a 65 3b 0a 20 20 72 65 74 75 72 6e  t_size;.  return
5a00: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f   SQLITE_OK;.}../
5a10: 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e  *.** This routin
5a20: 65 20 63 68 65 63 6b 73 20 69 66 20 74 68 65 72  e checks if ther
5a30: 65 20 69 73 20 61 20 52 45 53 45 52 56 45 44 20  e is a RESERVED 
5a40: 6c 6f 63 6b 20 68 65 6c 64 20 6f 6e 20 74 68 65  lock held on the
5a50: 20 73 70 65 63 69 66 69 65 64 0a 2a 2a 20 66 69   specified.** fi
5a60: 6c 65 20 62 79 20 74 68 69 73 20 6f 72 20 61 6e  le by this or an
5a70: 79 20 6f 74 68 65 72 20 70 72 6f 63 65 73 73 2e  y other process.
5a80: 20 49 66 20 73 75 63 68 20 61 20 6c 6f 63 6b 20   If such a lock 
5a90: 69 73 20 68 65 6c 64 2c 20 72 65 74 75 72 6e 0a  is held, return.
5aa0: 2a 2a 20 6e 6f 6e 2d 7a 65 72 6f 2e 20 20 49 66  ** non-zero.  If
5ab0: 20 74 68 65 20 66 69 6c 65 20 69 73 20 75 6e 6c   the file is unl
5ac0: 6f 63 6b 65 64 20 6f 72 20 68 6f 6c 64 73 20 6f  ocked or holds o
5ad0: 6e 6c 79 20 53 48 41 52 45 44 20 6c 6f 63 6b 73  nly SHARED locks
5ae0: 2c 20 74 68 65 6e 0a 2a 2a 20 72 65 74 75 72 6e  , then.** return
5af0: 20 7a 65 72 6f 2e 0a 2a 2f 0a 69 6e 74 20 73 71   zero..*/.int sq
5b00: 6c 69 74 65 33 4f 73 43 68 65 63 6b 52 65 73 65  lite3OsCheckRese
5b10: 72 76 65 64 4c 6f 63 6b 28 4f 73 46 69 6c 65 20  rvedLock(OsFile 
5b20: 2a 69 64 29 7b 0a 20 20 69 6e 74 20 72 20 3d 20  *id){.  int r = 
5b30: 30 3b 0a 0a 20 20 61 73 73 65 72 74 28 20 69 64  0;..  assert( id
5b40: 2d 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20 73 71  ->isOpen );.  sq
5b50: 6c 69 74 65 33 4f 73 45 6e 74 65 72 4d 75 74 65  lite3OsEnterMute
5b60: 78 28 29 3b 20 2f 2a 20 4e 65 65 64 65 64 20 62  x(); /* Needed b
5b70: 65 63 61 75 73 65 20 69 64 2d 3e 70 4c 6f 63 6b  ecause id->pLock
5b80: 20 69 73 20 73 68 61 72 65 64 20 61 63 72 6f 73   is shared acros
5b90: 73 20 74 68 72 65 61 64 73 20 2a 2f 0a 0a 20 20  s threads */..  
5ba0: 2f 2a 20 43 68 65 63 6b 20 69 66 20 61 20 74 68  /* Check if a th
5bb0: 72 65 61 64 20 69 6e 20 74 68 69 73 20 70 72 6f  read in this pro
5bc0: 63 65 73 73 20 68 6f 6c 64 73 20 73 75 63 68 20  cess holds such 
5bd0: 61 20 6c 6f 63 6b 20 2a 2f 0a 20 20 69 66 28 20  a lock */.  if( 
5be0: 69 64 2d 3e 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74  id->pLock->lockt
5bf0: 79 70 65 3e 53 48 41 52 45 44 5f 4c 4f 43 4b 20  ype>SHARED_LOCK 
5c00: 29 7b 0a 20 20 20 20 72 20 3d 20 31 3b 0a 20 20  ){.    r = 1;.  
5c10: 7d 0a 0a 20 20 2f 2a 20 4f 74 68 65 72 77 69 73  }..  /* Otherwis
5c20: 65 20 73 65 65 20 69 66 20 73 6f 6d 65 20 6f 74  e see if some ot
5c30: 68 65 72 20 70 72 6f 63 65 73 73 20 68 6f 6c 64  her process hold
5c40: 73 20 69 74 2e 0a 20 20 2a 2f 0a 20 20 69 66 28  s it..  */.  if(
5c50: 20 21 72 20 29 7b 0a 20 20 20 20 73 74 72 75 63   !r ){.    struc
5c60: 74 20 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 0a 20 20  t flock lock;.  
5c70: 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65 20    lock.l_whence 
5c80: 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 20 20 20 20  = SEEK_SET;.    
5c90: 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 52  lock.l_start = R
5ca0: 45 53 45 52 56 45 44 5f 42 59 54 45 3b 0a 20 20  ESERVED_BYTE;.  
5cb0: 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 31    lock.l_len = 1
5cc0: 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 74 79 70  ;.    lock.l_typ
5cd0: 65 20 3d 20 46 5f 57 52 4c 43 4b 3b 0a 20 20 20  e = F_WRLCK;.   
5ce0: 20 66 63 6e 74 6c 28 69 64 2d 3e 68 2c 20 46 5f   fcntl(id->h, F_
5cf0: 47 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b 0a 20  GETLK, &lock);. 
5d00: 20 20 20 69 66 28 20 6c 6f 63 6b 2e 6c 5f 74 79     if( lock.l_ty
5d10: 70 65 21 3d 46 5f 55 4e 4c 43 4b 20 29 7b 0a 20  pe!=F_UNLCK ){. 
5d20: 20 20 20 20 20 72 20 3d 20 31 3b 0a 20 20 20 20       r = 1;.    
5d30: 7d 0a 20 20 7d 0a 20 20 0a 20 20 73 71 6c 69 74  }.  }.  .  sqlit
5d40: 65 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29  e3OsLeaveMutex()
5d50: 3b 0a 20 20 54 52 41 43 45 33 28 22 54 45 53 54  ;.  TRACE3("TEST
5d60: 20 57 52 2d 4c 4f 43 4b 20 25 64 20 25 64 5c 6e   WR-LOCK %d %d\n
5d70: 22 2c 20 69 64 2d 3e 68 2c 20 72 29 3b 0a 0a 20  ", id->h, r);.. 
5d80: 20 72 65 74 75 72 6e 20 72 3b 0a 7d 0a 0a 23 69   return r;.}..#i
5d90: 66 64 65 66 20 53 51 4c 49 54 45 5f 44 45 42 55  fdef SQLITE_DEBU
5da0: 47 0a 2f 2a 0a 2a 2a 20 48 65 6c 70 65 72 20 66  G./*.** Helper f
5db0: 75 6e 63 74 69 6f 6e 20 66 6f 72 20 70 72 69 6e  unction for prin
5dc0: 74 69 6e 67 20 6f 75 74 20 74 72 61 63 65 20 69  ting out trace i
5dd0: 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 72 6f 6d 20  nformation from 
5de0: 64 65 62 75 67 67 69 6e 67 0a 2a 2a 20 62 69 6e  debugging.** bin
5df0: 61 72 69 65 73 2e 20 54 68 69 73 20 72 65 74 75  aries. This retu
5e00: 72 6e 73 20 74 68 65 20 73 74 72 69 6e 67 20 72  rns the string r
5e10: 65 70 72 65 73 65 74 61 74 69 6f 6e 20 6f 66 20  epresetation of 
5e20: 74 68 65 20 73 75 70 70 6c 69 65 64 0a 2a 2a 20  the supplied.** 
5e30: 69 6e 74 65 67 65 72 20 6c 6f 63 6b 2d 74 79 70  integer lock-typ
5e40: 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 63 6f 6e  e..*/.static con
5e50: 73 74 20 63 68 61 72 20 2a 20 6c 6f 63 6b 74 79  st char * lockty
5e60: 70 65 4e 61 6d 65 28 69 6e 74 20 6c 6f 63 6b 74  peName(int lockt
5e70: 79 70 65 29 7b 0a 20 20 73 77 69 74 63 68 28 20  ype){.  switch( 
5e80: 6c 6f 63 6b 74 79 70 65 20 29 7b 0a 20 20 63 61  locktype ){.  ca
5e90: 73 65 20 4e 4f 5f 4c 4f 43 4b 3a 20 72 65 74 75  se NO_LOCK: retu
5ea0: 72 6e 20 22 4e 4f 4e 45 22 3b 0a 20 20 63 61 73  rn "NONE";.  cas
5eb0: 65 20 53 48 41 52 45 44 5f 4c 4f 43 4b 3a 20 72  e SHARED_LOCK: r
5ec0: 65 74 75 72 6e 20 22 53 48 41 52 45 44 22 3b 0a  eturn "SHARED";.
5ed0: 20 20 63 61 73 65 20 52 45 53 45 52 56 45 44 5f    case RESERVED_
5ee0: 4c 4f 43 4b 3a 20 72 65 74 75 72 6e 20 22 52 45  LOCK: return "RE
5ef0: 53 45 52 56 45 44 22 3b 0a 20 20 63 61 73 65 20  SERVED";.  case 
5f00: 50 45 4e 44 49 4e 47 5f 4c 4f 43 4b 3a 20 72 65  PENDING_LOCK: re
5f10: 74 75 72 6e 20 22 50 45 4e 44 49 4e 47 22 3b 0a  turn "PENDING";.
5f20: 20 20 63 61 73 65 20 45 58 43 4c 55 53 49 56 45    case EXCLUSIVE
5f30: 5f 4c 4f 43 4b 3a 20 72 65 74 75 72 6e 20 22 45  _LOCK: return "E
5f40: 58 43 4c 55 53 49 56 45 22 3b 0a 20 20 7d 0a 20  XCLUSIVE";.  }. 
5f50: 20 72 65 74 75 72 6e 20 22 45 52 52 4f 52 22 3b   return "ERROR";
5f60: 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a  .}.#endif../*.**
5f70: 20 4c 6f 63 6b 20 74 68 65 20 66 69 6c 65 20 77   Lock the file w
5f80: 69 74 68 20 74 68 65 20 6c 6f 63 6b 20 73 70 65  ith the lock spe
5f90: 63 69 66 69 65 64 20 62 79 20 70 61 72 61 6d 65  cified by parame
5fa0: 74 65 72 20 6c 6f 63 6b 74 79 70 65 20 2d 20 6f  ter locktype - o
5fb0: 6e 65 0a 2a 2a 20 6f 66 20 74 68 65 20 66 6f 6c  ne.** of the fol
5fc0: 6c 6f 77 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20  lowing:.**.**   
5fd0: 20 20 28 31 29 20 53 48 41 52 45 44 5f 4c 4f 43    (1) SHARED_LOC
5fe0: 4b 0a 2a 2a 20 20 20 20 20 28 32 29 20 52 45 53  K.**     (2) RES
5ff0: 45 52 56 45 44 5f 4c 4f 43 4b 0a 2a 2a 20 20 20  ERVED_LOCK.**   
6000: 20 20 28 33 29 20 50 45 4e 44 49 4e 47 5f 4c 4f    (3) PENDING_LO
6010: 43 4b 0a 2a 2a 20 20 20 20 20 28 34 29 20 45 58  CK.**     (4) EX
6020: 43 4c 55 53 49 56 45 5f 4c 4f 43 4b 0a 2a 2a 0a  CLUSIVE_LOCK.**.
6030: 2a 2a 20 53 6f 6d 65 74 69 6d 65 73 20 77 68 65  ** Sometimes whe
6040: 6e 20 72 65 71 75 65 73 74 69 6e 67 20 6f 6e 65  n requesting one
6050: 20 6c 6f 63 6b 20 73 74 61 74 65 2c 20 61 64 64   lock state, add
6060: 69 74 69 6f 6e 61 6c 20 6c 6f 63 6b 20 73 74 61  itional lock sta
6070: 74 65 73 0a 2a 2a 20 61 72 65 20 69 6e 73 65 72  tes.** are inser
6080: 74 65 64 20 69 6e 20 62 65 74 77 65 65 6e 2e 20  ted in between. 
6090: 20 54 68 65 20 6c 6f 63 6b 69 6e 67 20 6d 69 67   The locking mig
60a0: 68 74 20 66 61 69 6c 20 6f 6e 20 6f 6e 65 20 6f  ht fail on one o
60b0: 66 20 74 68 65 20 6c 61 74 65 72 0a 2a 2a 20 74  f the later.** t
60c0: 72 61 6e 73 69 74 69 6f 6e 73 20 6c 65 61 76 69  ransitions leavi
60d0: 6e 67 20 74 68 65 20 6c 6f 63 6b 20 73 74 61 74  ng the lock stat
60e0: 65 20 64 69 66 66 65 72 65 6e 74 20 66 72 6f 6d  e different from
60f0: 20 77 68 61 74 20 69 74 20 73 74 61 72 74 65 64   what it started
6100: 20 62 75 74 0a 2a 2a 20 73 74 69 6c 6c 20 73 68   but.** still sh
6110: 6f 72 74 20 6f 66 20 69 74 73 20 67 6f 61 6c 2e  ort of its goal.
6120: 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20    The following 
6130: 63 68 61 72 74 20 73 68 6f 77 73 20 74 68 65 20  chart shows the 
6140: 61 6c 6c 6f 77 65 64 0a 2a 2a 20 74 72 61 6e 73  allowed.** trans
6150: 69 74 69 6f 6e 73 20 61 6e 64 20 74 68 65 20 69  itions and the i
6160: 6e 73 65 72 74 65 64 20 69 6e 74 65 72 6d 65 64  nserted intermed
6170: 69 61 74 65 20 73 74 61 74 65 73 3a 0a 2a 2a 0a  iate states:.**.
6180: 2a 2a 20 20 20 20 55 4e 4c 4f 43 4b 45 44 20 2d  **    UNLOCKED -
6190: 3e 20 53 48 41 52 45 44 0a 2a 2a 20 20 20 20 53  > SHARED.**    S
61a0: 48 41 52 45 44 20 2d 3e 20 52 45 53 45 52 56 45  HARED -> RESERVE
61b0: 44 0a 2a 2a 20 20 20 20 53 48 41 52 45 44 20 2d  D.**    SHARED -
61c0: 3e 20 28 50 45 4e 44 49 4e 47 29 20 2d 3e 20 45  > (PENDING) -> E
61d0: 58 43 4c 55 53 49 56 45 0a 2a 2a 20 20 20 20 52  XCLUSIVE.**    R
61e0: 45 53 45 52 56 45 44 20 2d 3e 20 28 50 45 4e 44  ESERVED -> (PEND
61f0: 49 4e 47 29 20 2d 3e 20 45 58 43 4c 55 53 49 56  ING) -> EXCLUSIV
6200: 45 0a 2a 2a 20 20 20 20 50 45 4e 44 49 4e 47 20  E.**    PENDING 
6210: 2d 3e 20 45 58 43 4c 55 53 49 56 45 0a 2a 2a 0a  -> EXCLUSIVE.**.
6220: 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20  ** This routine 
6230: 77 69 6c 6c 20 6f 6e 6c 79 20 69 6e 63 72 65 61  will only increa
6240: 73 65 20 61 20 6c 6f 63 6b 2e 20 20 55 73 65 20  se a lock.  Use 
6250: 74 68 65 20 73 71 6c 69 74 65 33 4f 73 55 6e 6c  the sqlite3OsUnl
6260: 6f 63 6b 28 29 0a 2a 2a 20 72 6f 75 74 69 6e 65  ock().** routine
6270: 20 74 6f 20 6c 6f 77 65 72 20 61 20 6c 6f 63 6b   to lower a lock
6280: 69 6e 67 20 6c 65 76 65 6c 2e 0a 2a 2f 0a 69 6e  ing level..*/.in
6290: 74 20 73 71 6c 69 74 65 33 4f 73 4c 6f 63 6b 28  t sqlite3OsLock(
62a0: 4f 73 46 69 6c 65 20 2a 69 64 2c 20 69 6e 74 20  OsFile *id, int 
62b0: 6c 6f 63 6b 74 79 70 65 29 7b 0a 20 20 2f 2a 20  locktype){.  /* 
62c0: 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 64 65  The following de
62d0: 73 63 72 69 62 65 73 20 74 68 65 20 69 6d 70 6c  scribes the impl
62e0: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
62f0: 65 20 76 61 72 69 6f 75 73 20 6c 6f 63 6b 73 20  e various locks 
6300: 61 6e 64 0a 20 20 2a 2a 20 6c 6f 63 6b 20 74 72  and.  ** lock tr
6310: 61 6e 73 69 74 69 6f 6e 73 20 69 6e 20 74 65 72  ansitions in ter
6320: 6d 73 20 6f 66 20 74 68 65 20 50 4f 53 49 58 20  ms of the POSIX 
6330: 61 64 76 69 73 6f 72 79 20 73 68 61 72 65 64 20  advisory shared 
6340: 61 6e 64 20 65 78 63 6c 75 73 69 76 65 0a 20 20  and exclusive.  
6350: 2a 2a 20 6c 6f 63 6b 20 70 72 69 6d 69 74 69 76  ** lock primitiv
6360: 65 73 20 28 63 61 6c 6c 65 64 20 72 65 61 64 2d  es (called read-
6370: 6c 6f 63 6b 73 20 61 6e 64 20 77 72 69 74 65 2d  locks and write-
6380: 6c 6f 63 6b 73 20 62 65 6c 6f 77 2c 20 74 6f 20  locks below, to 
6390: 61 76 6f 69 64 0a 20 20 2a 2a 20 63 6f 6e 66 75  avoid.  ** confu
63a0: 73 69 6f 6e 20 77 69 74 68 20 53 51 4c 69 74 65  sion with SQLite
63b0: 20 6c 6f 63 6b 20 6e 61 6d 65 73 29 2e 20 54 68   lock names). Th
63c0: 65 20 61 6c 67 6f 72 69 74 68 6d 73 20 61 72 65  e algorithms are
63d0: 20 63 6f 6d 70 6c 69 63 61 74 65 64 0a 20 20 2a   complicated.  *
63e0: 2a 20 73 6c 69 67 68 74 6c 79 20 69 6e 20 6f 72  * slightly in or
63f0: 64 65 72 20 74 6f 20 62 65 20 63 6f 6d 70 61 74  der to be compat
6400: 69 62 6c 65 20 77 69 74 68 20 77 69 6e 64 6f 77  ible with window
6410: 73 20 73 79 73 74 65 6d 73 20 73 69 6d 75 6c 74  s systems simult
6420: 61 6e 65 6f 75 73 6c 79 0a 20 20 2a 2a 20 61 63  aneously.  ** ac
6430: 63 65 73 73 69 6e 67 20 74 68 65 20 73 61 6d 65  cessing the same
6440: 20 64 61 74 61 62 61 73 65 20 66 69 6c 65 2c 20   database file, 
6450: 69 6e 20 63 61 73 65 20 74 68 61 74 20 69 73 20  in case that is 
6460: 65 76 65 72 20 72 65 71 75 69 72 65 64 2e 0a 20  ever required.. 
6470: 20 2a 2a 0a 20 20 2a 2a 20 53 79 6d 62 6f 6c 73   **.  ** Symbols
6480: 20 64 65 66 69 6e 65 64 20 69 6e 20 6f 73 2e 68   defined in os.h
6490: 20 69 6e 64 65 6e 74 69 66 79 20 74 68 65 20 27   indentify the '
64a0: 70 65 6e 64 69 6e 67 20 62 79 74 65 27 20 61 6e  pending byte' an
64b0: 64 20 74 68 65 20 27 72 65 73 65 72 76 65 64 0a  d the 'reserved.
64c0: 20 20 2a 2a 20 62 79 74 65 27 2c 20 65 61 63 68    ** byte', each
64d0: 20 73 69 6e 67 6c 65 20 62 79 74 65 73 20 61 74   single bytes at
64e0: 20 77 65 6c 6c 20 6b 6e 6f 77 6e 20 6f 66 66 73   well known offs
64f0: 65 74 73 2c 20 61 6e 64 20 74 68 65 20 27 73 68  ets, and the 'sh
6500: 61 72 65 64 20 62 79 74 65 0a 20 20 2a 2a 20 72  ared byte.  ** r
6510: 61 6e 67 65 27 2c 20 61 20 72 61 6e 67 65 20 6f  ange', a range o
6520: 66 20 35 31 30 20 62 79 74 65 73 20 61 74 20 61  f 510 bytes at a
6530: 20 77 65 6c 6c 20 6b 6e 6f 77 6e 20 6f 66 66 73   well known offs
6540: 65 74 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 54 6f  et..  **.  ** To
6550: 20 6f 62 74 61 69 6e 20 61 20 53 48 41 52 45 44   obtain a SHARED
6560: 20 6c 6f 63 6b 2c 20 61 20 72 65 61 64 2d 6c 6f   lock, a read-lo
6570: 63 6b 20 69 73 20 6f 62 74 61 69 6e 65 64 20 6f  ck is obtained o
6580: 6e 20 74 68 65 20 27 70 65 6e 64 69 6e 67 0a 20  n the 'pending. 
6590: 20 2a 2a 20 62 79 74 65 27 2e 20 20 49 66 20 74   ** byte'.  If t
65a0: 68 69 73 20 69 73 20 73 75 63 63 65 73 73 66 75  his is successfu
65b0: 6c 2c 20 61 20 72 61 6e 64 6f 6d 20 62 79 74 65  l, a random byte
65c0: 20 66 72 6f 6d 20 74 68 65 20 27 73 68 61 72 65   from the 'share
65d0: 64 20 62 79 74 65 0a 20 20 2a 2a 20 72 61 6e 67  d byte.  ** rang
65e0: 65 27 20 69 73 20 72 65 61 64 2d 6c 6f 63 6b 65  e' is read-locke
65f0: 64 20 61 6e 64 20 74 68 65 20 6c 6f 63 6b 20 6f  d and the lock o
6600: 6e 20 74 68 65 20 27 70 65 6e 64 69 6e 67 20 62  n the 'pending b
6610: 79 74 65 27 20 72 65 6c 65 61 73 65 64 2e 0a 20  yte' released.. 
6620: 20 2a 2a 0a 20 20 2a 2a 20 41 20 70 72 6f 63 65   **.  ** A proce
6630: 73 73 20 6d 61 79 20 6f 6e 6c 79 20 6f 62 74 61  ss may only obta
6640: 69 6e 20 61 20 52 45 53 45 52 56 45 44 20 6c 6f  in a RESERVED lo
6650: 63 6b 20 61 66 74 65 72 20 69 74 20 68 61 73 20  ck after it has 
6660: 61 20 53 48 41 52 45 44 20 6c 6f 63 6b 2e 0a 20  a SHARED lock.. 
6670: 20 2a 2a 20 41 20 52 45 53 45 52 56 45 44 20 6c   ** A RESERVED l
6680: 6f 63 6b 20 69 73 20 69 6d 70 6c 65 6d 65 6e 74  ock is implement
6690: 65 64 20 62 79 20 67 72 61 62 62 69 6e 67 20 61  ed by grabbing a
66a0: 20 77 72 69 74 65 2d 6c 6f 63 6b 20 6f 6e 20 74   write-lock on t
66b0: 68 65 0a 20 20 2a 2a 20 27 72 65 73 65 72 76 65  he.  ** 'reserve
66c0: 64 20 62 79 74 65 27 2e 20 0a 20 20 2a 2a 0a 20  d byte'. .  **. 
66d0: 20 2a 2a 20 41 20 70 72 6f 63 65 73 73 20 6d 61   ** A process ma
66e0: 79 20 6f 6e 6c 79 20 6f 62 74 61 69 6e 20 61 20  y only obtain a 
66f0: 50 45 4e 44 49 4e 47 20 6c 6f 63 6b 20 61 66 74  PENDING lock aft
6700: 65 72 20 69 74 20 68 61 73 20 6f 62 74 61 69 6e  er it has obtain
6710: 65 64 20 61 0a 20 20 2a 2a 20 53 48 41 52 45 44  ed a.  ** SHARED
6720: 20 6c 6f 63 6b 2e 20 41 20 50 45 4e 44 49 4e 47   lock. A PENDING
6730: 20 6c 6f 63 6b 20 69 73 20 69 6d 70 6c 65 6d 65   lock is impleme
6740: 6e 74 65 64 20 62 79 20 6f 62 74 61 69 6e 69 6e  nted by obtainin
6750: 67 20 61 20 77 72 69 74 65 2d 6c 6f 63 6b 0a 20  g a write-lock. 
6760: 20 2a 2a 20 6f 6e 20 74 68 65 20 27 70 65 6e 64   ** on the 'pend
6770: 69 6e 67 20 62 79 74 65 27 2e 20 54 68 69 73 20  ing byte'. This 
6780: 65 6e 73 75 72 65 73 20 74 68 61 74 20 6e 6f 20  ensures that no 
6790: 6e 65 77 20 53 48 41 52 45 44 20 6c 6f 63 6b 73  new SHARED locks
67a0: 20 63 61 6e 20 62 65 0a 20 20 2a 2a 20 6f 62 74   can be.  ** obt
67b0: 61 69 6e 65 64 2c 20 62 75 74 20 65 78 69 73 74  ained, but exist
67c0: 69 6e 67 20 53 48 41 52 45 44 20 6c 6f 63 6b 73  ing SHARED locks
67d0: 20 61 72 65 20 61 6c 6c 6f 77 65 64 20 74 6f 20   are allowed to 
67e0: 70 65 72 73 69 73 74 2e 20 41 20 70 72 6f 63 65  persist. A proce
67f0: 73 73 0a 20 20 2a 2a 20 64 6f 65 73 20 6e 6f 74  ss.  ** does not
6800: 20 68 61 76 65 20 74 6f 20 6f 62 74 61 69 6e 20   have to obtain 
6810: 61 20 52 45 53 45 52 56 45 44 20 6c 6f 63 6b 20  a RESERVED lock 
6820: 6f 6e 20 74 68 65 20 77 61 79 20 74 6f 20 61 20  on the way to a 
6830: 50 45 4e 44 49 4e 47 20 6c 6f 63 6b 2e 0a 20 20  PENDING lock..  
6840: 2a 2a 20 54 68 69 73 20 70 72 6f 70 65 72 74 79  ** This property
6850: 20 69 73 20 75 73 65 64 20 62 79 20 74 68 65 20   is used by the 
6860: 61 6c 67 6f 72 69 74 68 6d 20 66 6f 72 20 72 6f  algorithm for ro
6870: 6c 6c 69 6e 67 20 62 61 63 6b 20 61 20 6a 6f 75  lling back a jou
6880: 72 6e 61 6c 20 66 69 6c 65 0a 20 20 2a 2a 20 61  rnal file.  ** a
6890: 66 74 65 72 20 61 20 63 72 61 73 68 2e 0a 20 20  fter a crash..  
68a0: 2a 2a 0a 20 20 2a 2a 20 41 6e 20 45 58 43 4c 55  **.  ** An EXCLU
68b0: 53 49 56 45 20 6c 6f 63 6b 2c 20 6f 62 74 61 69  SIVE lock, obtai
68c0: 6e 65 64 20 61 66 74 65 72 20 61 20 50 45 4e 44  ned after a PEND
68d0: 49 4e 47 20 6c 6f 63 6b 20 69 73 20 68 65 6c 64  ING lock is held
68e0: 2c 20 69 73 0a 20 20 2a 2a 20 69 6d 70 6c 65 6d  , is.  ** implem
68f0: 65 6e 74 65 64 20 62 79 20 6f 62 74 61 69 6e 69  ented by obtaini
6900: 6e 67 20 61 20 77 72 69 74 65 2d 6c 6f 63 6b 20  ng a write-lock 
6910: 6f 6e 20 74 68 65 20 65 6e 74 69 72 65 20 27 73  on the entire 's
6920: 68 61 72 65 64 20 62 79 74 65 0a 20 20 2a 2a 20  hared byte.  ** 
6930: 72 61 6e 67 65 27 2e 20 53 69 6e 63 65 20 61 6c  range'. Since al
6940: 6c 20 6f 74 68 65 72 20 6c 6f 63 6b 73 20 72 65  l other locks re
6950: 71 75 69 72 65 20 61 20 72 65 61 64 2d 6c 6f 63  quire a read-loc
6960: 6b 20 6f 6e 20 6f 6e 65 20 6f 66 20 74 68 65 20  k on one of the 
6970: 62 79 74 65 73 0a 20 20 2a 2a 20 77 69 74 68 69  bytes.  ** withi
6980: 6e 20 74 68 69 73 20 72 61 6e 67 65 2c 20 74 68  n this range, th
6990: 69 73 20 65 6e 73 75 72 65 73 20 74 68 61 74 20  is ensures that 
69a0: 6e 6f 20 6f 74 68 65 72 20 6c 6f 63 6b 73 20 61  no other locks a
69b0: 72 65 20 68 65 6c 64 20 6f 6e 20 74 68 65 0a 20  re held on the. 
69c0: 20 2a 2a 20 64 61 74 61 62 61 73 65 2e 20 0a 20   ** database. . 
69d0: 20 2a 2a 0a 20 20 2a 2a 20 54 68 65 20 72 65 61   **.  ** The rea
69e0: 73 6f 6e 20 61 20 73 69 6e 67 6c 65 20 62 79 74  son a single byt
69f0: 65 20 63 61 6e 6e 6f 74 20 62 65 20 75 73 65 64  e cannot be used
6a00: 20 69 6e 73 74 65 61 64 20 6f 66 20 74 68 65 20   instead of the 
6a10: 27 73 68 61 72 65 64 20 62 79 74 65 0a 20 20 2a  'shared byte.  *
6a20: 2a 20 72 61 6e 67 65 27 20 69 73 20 74 68 61 74  * range' is that
6a30: 20 73 6f 6d 65 20 76 65 72 73 69 6f 6e 73 20 6f   some versions o
6a40: 66 20 77 69 6e 64 6f 77 73 20 64 6f 20 6e 6f 74  f windows do not
6a50: 20 73 75 70 70 6f 72 74 20 72 65 61 64 2d 6c 6f   support read-lo
6a60: 63 6b 73 2e 20 42 79 0a 20 20 2a 2a 20 6c 6f 63  cks. By.  ** loc
6a70: 6b 69 6e 67 20 61 20 72 61 6e 64 6f 6d 20 62 79  king a random by
6a80: 74 65 20 66 72 6f 6d 20 61 20 72 61 6e 67 65 2c  te from a range,
6a90: 20 63 6f 6e 63 75 72 72 65 6e 74 20 53 48 41 52   concurrent SHAR
6aa0: 45 44 20 6c 6f 63 6b 73 20 6d 61 79 20 65 78 69  ED locks may exi
6ab0: 73 74 0a 20 20 2a 2a 20 65 76 65 6e 20 69 66 20  st.  ** even if 
6ac0: 74 68 65 20 6c 6f 63 6b 69 6e 67 20 70 72 69 6d  the locking prim
6ad0: 69 74 69 76 65 20 75 73 65 64 20 69 73 20 61 6c  itive used is al
6ae0: 77 61 79 73 20 61 20 77 72 69 74 65 2d 6c 6f 63  ways a write-loc
6af0: 6b 2e 0a 20 20 2a 2f 0a 20 20 69 6e 74 20 72 63  k..  */.  int rc
6b00: 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20   = SQLITE_OK;.  
6b10: 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20  struct lockInfo 
6b20: 2a 70 4c 6f 63 6b 20 3d 20 69 64 2d 3e 70 4c 6f  *pLock = id->pLo
6b30: 63 6b 3b 0a 20 20 73 74 72 75 63 74 20 66 6c 6f  ck;.  struct flo
6b40: 63 6b 20 6c 6f 63 6b 3b 0a 20 20 69 6e 74 20 73  ck lock;.  int s
6b50: 3b 0a 0a 20 20 61 73 73 65 72 74 28 20 69 64 2d  ;..  assert( id-
6b60: 3e 69 73 4f 70 65 6e 20 29 3b 0a 20 20 54 52 41  >isOpen );.  TRA
6b70: 43 45 37 28 22 4c 4f 43 4b 20 25 64 20 25 73 20  CE7("LOCK %d %s 
6b80: 77 61 73 20 25 73 28 25 73 2c 25 64 29 20 70 69  was %s(%s,%d) pi
6b90: 64 3d 25 64 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20  d=%d\n", id->h, 
6ba0: 6c 6f 63 6b 74 79 70 65 4e 61 6d 65 28 6c 6f 63  locktypeName(loc
6bb0: 6b 74 79 70 65 29 2c 20 0a 20 20 20 20 20 20 6c  ktype), .      l
6bc0: 6f 63 6b 74 79 70 65 4e 61 6d 65 28 69 64 2d 3e  ocktypeName(id->
6bd0: 6c 6f 63 6b 74 79 70 65 29 2c 20 6c 6f 63 6b 74  locktype), lockt
6be0: 79 70 65 4e 61 6d 65 28 70 4c 6f 63 6b 2d 3e 6c  ypeName(pLock->l
6bf0: 6f 63 6b 74 79 70 65 29 2c 20 70 4c 6f 63 6b 2d  ocktype), pLock-
6c00: 3e 63 6e 74 0a 20 20 20 20 20 20 2c 67 65 74 70  >cnt.      ,getp
6c10: 69 64 28 29 20 29 3b 0a 0a 20 20 2f 2a 20 49 66  id() );..  /* If
6c20: 20 74 68 65 72 65 20 69 73 20 61 6c 72 65 61 64   there is alread
6c30: 79 20 61 20 6c 6f 63 6b 20 6f 66 20 74 68 69 73  y a lock of this
6c40: 20 74 79 70 65 20 6f 72 20 6d 6f 72 65 20 72 65   type or more re
6c50: 73 74 72 69 63 74 69 76 65 20 6f 6e 20 74 68 65  strictive on the
6c60: 0a 20 20 2a 2a 20 4f 73 46 69 6c 65 2c 20 64 6f  .  ** OsFile, do
6c70: 20 6e 6f 74 68 69 6e 67 2e 20 44 6f 6e 27 74 20   nothing. Don't 
6c80: 75 73 65 20 74 68 65 20 65 6e 64 5f 6c 6f 63 6b  use the end_lock
6c90: 3a 20 65 78 69 74 20 70 61 74 68 2c 20 61 73 0a  : exit path, as.
6ca0: 20 20 2a 2a 20 73 71 6c 69 74 65 33 4f 73 45 6e    ** sqlite3OsEn
6cb0: 74 65 72 4d 75 74 65 78 28 29 20 68 61 73 6e 27  terMutex() hasn'
6cc0: 74 20 62 65 65 6e 20 63 61 6c 6c 65 64 20 79 65  t been called ye
6cd0: 74 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 69 64  t..  */.  if( id
6ce0: 2d 3e 6c 6f 63 6b 74 79 70 65 3e 3d 6c 6f 63 6b  ->locktype>=lock
6cf0: 74 79 70 65 20 29 7b 0a 20 20 20 20 54 52 41 43  type ){.    TRAC
6d00: 45 33 28 22 4c 4f 43 4b 20 25 64 20 25 73 20 6f  E3("LOCK %d %s o
6d10: 6b 20 28 61 6c 72 65 61 64 79 20 68 65 6c 64 29  k (already held)
6d20: 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20 6c 6f 63 6b  \n", id->h, lock
6d30: 74 79 70 65 4e 61 6d 65 28 6c 6f 63 6b 74 79 70  typeName(locktyp
6d40: 65 29 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20  e));.    return 
6d50: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 7d 0a 0a  SQLITE_OK;.  }..
6d60: 20 20 2f 2a 20 4d 61 6b 65 20 73 75 72 65 20 74    /* Make sure t
6d70: 68 65 20 6c 6f 63 6b 69 6e 67 20 73 65 71 75 65  he locking seque
6d80: 6e 63 65 20 69 73 20 63 6f 72 72 65 63 74 0a 20  nce is correct. 
6d90: 20 2a 2f 0a 20 20 61 73 73 65 72 74 28 20 69 64   */.  assert( id
6da0: 2d 3e 6c 6f 63 6b 74 79 70 65 21 3d 4e 4f 5f 4c  ->locktype!=NO_L
6db0: 4f 43 4b 20 7c 7c 20 6c 6f 63 6b 74 79 70 65 3d  OCK || locktype=
6dc0: 3d 53 48 41 52 45 44 5f 4c 4f 43 4b 20 29 3b 0a  =SHARED_LOCK );.
6dd0: 20 20 61 73 73 65 72 74 28 20 6c 6f 63 6b 74 79    assert( lockty
6de0: 70 65 21 3d 50 45 4e 44 49 4e 47 5f 4c 4f 43 4b  pe!=PENDING_LOCK
6df0: 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 6c 6f   );.  assert( lo
6e00: 63 6b 74 79 70 65 21 3d 52 45 53 45 52 56 45 44  cktype!=RESERVED
6e10: 5f 4c 4f 43 4b 20 7c 7c 20 69 64 2d 3e 6c 6f 63  _LOCK || id->loc
6e20: 6b 74 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f  ktype==SHARED_LO
6e30: 43 4b 20 29 3b 0a 0a 20 20 2f 2a 20 54 68 69 73  CK );..  /* This
6e40: 20 6d 75 74 65 78 20 69 73 20 6e 65 65 64 65 64   mutex is needed
6e50: 20 62 65 63 61 75 73 65 20 69 64 2d 3e 70 4c 6f   because id->pLo
6e60: 63 6b 20 69 73 20 73 68 61 72 65 64 20 61 63 72  ck is shared acr
6e70: 6f 73 73 20 74 68 72 65 61 64 73 0a 20 20 2a 2f  oss threads.  */
6e80: 0a 20 20 73 71 6c 69 74 65 33 4f 73 45 6e 74 65  .  sqlite3OsEnte
6e90: 72 4d 75 74 65 78 28 29 3b 0a 0a 20 20 2f 2a 20  rMutex();..  /* 
6ea0: 49 66 20 73 6f 6d 65 20 74 68 72 65 61 64 20 75  If some thread u
6eb0: 73 69 6e 67 20 74 68 69 73 20 50 49 44 20 68 61  sing this PID ha
6ec0: 73 20 61 20 6c 6f 63 6b 20 76 69 61 20 61 20 64  s a lock via a d
6ed0: 69 66 66 65 72 65 6e 74 20 4f 73 46 69 6c 65 2a  ifferent OsFile*
6ee0: 0a 20 20 2a 2a 20 68 61 6e 64 6c 65 20 74 68 61  .  ** handle tha
6ef0: 74 20 70 72 65 63 6c 75 64 65 73 20 74 68 65 20  t precludes the 
6f00: 72 65 71 75 65 73 74 65 64 20 6c 6f 63 6b 2c 20  requested lock, 
6f10: 72 65 74 75 72 6e 20 42 55 53 59 2e 0a 20 20 2a  return BUSY..  *
6f20: 2f 0a 20 20 69 66 28 20 28 69 64 2d 3e 6c 6f 63  /.  if( (id->loc
6f30: 6b 74 79 70 65 21 3d 70 4c 6f 63 6b 2d 3e 6c 6f  ktype!=pLock->lo
6f40: 63 6b 74 79 70 65 20 26 26 20 0a 20 20 20 20 20  cktype && .     
6f50: 20 20 20 20 20 28 70 4c 6f 63 6b 2d 3e 6c 6f 63       (pLock->loc
6f60: 6b 74 79 70 65 3e 3d 50 45 4e 44 49 4e 47 5f 4c  ktype>=PENDING_L
6f70: 4f 43 4b 20 7c 7c 20 6c 6f 63 6b 74 79 70 65 3e  OCK || locktype>
6f80: 53 48 41 52 45 44 5f 4c 4f 43 4b 29 29 0a 20 20  SHARED_LOCK)).  
6f90: 29 7b 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49  ){.    rc = SQLI
6fa0: 54 45 5f 42 55 53 59 3b 0a 20 20 20 20 67 6f 74  TE_BUSY;.    got
6fb0: 6f 20 65 6e 64 5f 6c 6f 63 6b 3b 0a 20 20 7d 0a  o end_lock;.  }.
6fc0: 0a 20 20 2f 2a 20 49 66 20 61 20 53 48 41 52 45  .  /* If a SHARE
6fd0: 44 20 6c 6f 63 6b 20 69 73 20 72 65 71 75 65 73  D lock is reques
6fe0: 74 65 64 2c 20 61 6e 64 20 73 6f 6d 65 20 74 68  ted, and some th
6ff0: 72 65 61 64 20 75 73 69 6e 67 20 74 68 69 73 20  read using this 
7000: 50 49 44 20 61 6c 72 65 61 64 79 0a 20 20 2a 2a  PID already.  **
7010: 20 68 61 73 20 61 20 53 48 41 52 45 44 20 6f 72   has a SHARED or
7020: 20 52 45 53 45 52 56 45 44 20 6c 6f 63 6b 2c 20   RESERVED lock, 
7030: 74 68 65 6e 20 69 6e 63 72 65 6d 65 6e 74 20 72  then increment r
7040: 65 66 65 72 65 6e 63 65 20 63 6f 75 6e 74 73 20  eference counts 
7050: 61 6e 64 0a 20 20 2a 2a 20 72 65 74 75 72 6e 20  and.  ** return 
7060: 53 51 4c 49 54 45 5f 4f 4b 2e 0a 20 20 2a 2f 0a  SQLITE_OK..  */.
7070: 20 20 69 66 28 20 6c 6f 63 6b 74 79 70 65 3d 3d    if( locktype==
7080: 53 48 41 52 45 44 5f 4c 4f 43 4b 20 26 26 20 0a  SHARED_LOCK && .
7090: 20 20 20 20 20 20 28 70 4c 6f 63 6b 2d 3e 6c 6f        (pLock->lo
70a0: 63 6b 74 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c  cktype==SHARED_L
70b0: 4f 43 4b 20 7c 7c 20 70 4c 6f 63 6b 2d 3e 6c 6f  OCK || pLock->lo
70c0: 63 6b 74 79 70 65 3d 3d 52 45 53 45 52 56 45 44  cktype==RESERVED
70d0: 5f 4c 4f 43 4b 29 20 29 7b 0a 20 20 20 20 61 73  _LOCK) ){.    as
70e0: 73 65 72 74 28 20 6c 6f 63 6b 74 79 70 65 3d 3d  sert( locktype==
70f0: 53 48 41 52 45 44 5f 4c 4f 43 4b 20 29 3b 0a 20  SHARED_LOCK );. 
7100: 20 20 20 61 73 73 65 72 74 28 20 69 64 2d 3e 6c     assert( id->l
7110: 6f 63 6b 74 79 70 65 3d 3d 30 20 29 3b 0a 20 20  ocktype==0 );.  
7120: 20 20 61 73 73 65 72 74 28 20 70 4c 6f 63 6b 2d    assert( pLock-
7130: 3e 63 6e 74 3e 30 20 29 3b 0a 20 20 20 20 69 64  >cnt>0 );.    id
7140: 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 53 48 41  ->locktype = SHA
7150: 52 45 44 5f 4c 4f 43 4b 3b 0a 20 20 20 20 70 4c  RED_LOCK;.    pL
7160: 6f 63 6b 2d 3e 63 6e 74 2b 2b 3b 0a 20 20 20 20  ock->cnt++;.    
7170: 69 64 2d 3e 70 4f 70 65 6e 2d 3e 6e 4c 6f 63 6b  id->pOpen->nLock
7180: 2b 2b 3b 0a 20 20 20 20 67 6f 74 6f 20 65 6e 64  ++;.    goto end
7190: 5f 6c 6f 63 6b 3b 0a 20 20 7d 0a 0a 20 20 6c 6f  _lock;.  }..  lo
71a0: 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 31 4c 3b 0a 20  ck.l_len = 1L;. 
71b0: 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65 20 3d   lock.l_whence =
71c0: 20 53 45 45 4b 5f 53 45 54 3b 0a 0a 20 20 2f 2a   SEEK_SET;..  /*
71d0: 20 41 20 50 45 4e 44 49 4e 47 20 6c 6f 63 6b 20   A PENDING lock 
71e0: 69 73 20 6e 65 65 64 65 64 20 62 65 66 6f 72 65  is needed before
71f0: 20 61 63 71 75 69 72 69 6e 67 20 61 20 53 48 41   acquiring a SHA
7200: 52 45 44 20 6c 6f 63 6b 20 61 6e 64 20 62 65 66  RED lock and bef
7210: 6f 72 65 0a 20 20 2a 2a 20 61 63 71 75 69 72 69  ore.  ** acquiri
7220: 6e 67 20 61 6e 20 45 58 43 4c 55 53 49 56 45 20  ng an EXCLUSIVE 
7230: 6c 6f 63 6b 2e 20 20 46 6f 72 20 74 68 65 20 53  lock.  For the S
7240: 48 41 52 45 44 20 6c 6f 63 6b 2c 20 74 68 65 20  HARED lock, the 
7250: 50 45 4e 44 49 4e 47 20 77 69 6c 6c 0a 20 20 2a  PENDING will.  *
7260: 2a 20 62 65 20 72 65 6c 65 61 73 65 64 2e 0a 20  * be released.. 
7270: 20 2a 2f 0a 20 20 69 66 28 20 6c 6f 63 6b 74 79   */.  if( lockty
7280: 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43 4b 20  pe==SHARED_LOCK 
7290: 0a 20 20 20 20 20 20 7c 7c 20 28 6c 6f 63 6b 74  .      || (lockt
72a0: 79 70 65 3d 3d 45 58 43 4c 55 53 49 56 45 5f 4c  ype==EXCLUSIVE_L
72b0: 4f 43 4b 20 26 26 20 69 64 2d 3e 6c 6f 63 6b 74  OCK && id->lockt
72c0: 79 70 65 3c 50 45 4e 44 49 4e 47 5f 4c 4f 43 4b  ype<PENDING_LOCK
72d0: 29 0a 20 20 29 7b 0a 20 20 20 20 6c 6f 63 6b 2e  ).  ){.    lock.
72e0: 6c 5f 74 79 70 65 20 3d 20 28 6c 6f 63 6b 74 79  l_type = (lockty
72f0: 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43 4b 3f  pe==SHARED_LOCK?
7300: 46 5f 52 44 4c 43 4b 3a 46 5f 57 52 4c 43 4b 29  F_RDLCK:F_WRLCK)
7310: 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61  ;.    lock.l_sta
7320: 72 74 20 3d 20 50 45 4e 44 49 4e 47 5f 42 59 54  rt = PENDING_BYT
7330: 45 3b 0a 20 20 20 20 73 20 3d 20 66 63 6e 74 6c  E;.    s = fcntl
7340: 28 69 64 2d 3e 68 2c 20 46 5f 53 45 54 4c 4b 2c  (id->h, F_SETLK,
7350: 20 26 6c 6f 63 6b 29 3b 0a 20 20 20 20 69 66 28   &lock);.    if(
7360: 20 73 20 29 7b 0a 20 20 20 20 20 20 72 63 20 3d   s ){.      rc =
7370: 20 28 65 72 72 6e 6f 3d 3d 45 49 4e 56 41 4c 29   (errno==EINVAL)
7380: 20 3f 20 53 51 4c 49 54 45 5f 4e 4f 4c 46 53 20   ? SQLITE_NOLFS 
7390: 3a 20 53 51 4c 49 54 45 5f 42 55 53 59 3b 0a 20  : SQLITE_BUSY;. 
73a0: 20 20 20 20 20 67 6f 74 6f 20 65 6e 64 5f 6c 6f       goto end_lo
73b0: 63 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 0a  ck;.    }.  }...
73c0: 20 20 2f 2a 20 49 66 20 63 6f 6e 74 72 6f 6c 20    /* If control 
73d0: 67 65 74 73 20 74 6f 20 74 68 69 73 20 70 6f 69  gets to this poi
73e0: 6e 74 2c 20 74 68 65 6e 20 61 63 74 75 61 6c 6c  nt, then actuall
73f0: 79 20 67 6f 20 61 68 65 61 64 20 61 6e 64 20 6d  y go ahead and m
7400: 61 6b 65 0a 20 20 2a 2a 20 6f 70 65 72 61 74 69  ake.  ** operati
7410: 6e 67 20 73 79 73 74 65 6d 20 63 61 6c 6c 73 20  ng system calls 
7420: 66 6f 72 20 74 68 65 20 73 70 65 63 69 66 69 65  for the specifie
7430: 64 20 6c 6f 63 6b 2e 0a 20 20 2a 2f 0a 20 20 69  d lock..  */.  i
7440: 66 28 20 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41  f( locktype==SHA
7450: 52 45 44 5f 4c 4f 43 4b 20 29 7b 0a 20 20 20 20  RED_LOCK ){.    
7460: 61 73 73 65 72 74 28 20 70 4c 6f 63 6b 2d 3e 63  assert( pLock->c
7470: 6e 74 3d 3d 30 20 29 3b 0a 20 20 20 20 61 73 73  nt==0 );.    ass
7480: 65 72 74 28 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b  ert( pLock->lock
7490: 74 79 70 65 3d 3d 30 20 29 3b 0a 0a 20 20 20 20  type==0 );..    
74a0: 2f 2a 20 4e 6f 77 20 67 65 74 20 74 68 65 20 72  /* Now get the r
74b0: 65 61 64 2d 6c 6f 63 6b 20 2a 2f 0a 20 20 20 20  ead-lock */.    
74c0: 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 53  lock.l_start = S
74d0: 48 41 52 45 44 5f 46 49 52 53 54 3b 0a 20 20 20  HARED_FIRST;.   
74e0: 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 53 48   lock.l_len = SH
74f0: 41 52 45 44 5f 53 49 5a 45 3b 0a 20 20 20 20 73  ARED_SIZE;.    s
7500: 20 3d 20 66 63 6e 74 6c 28 69 64 2d 3e 68 2c 20   = fcntl(id->h, 
7510: 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b  F_SETLK, &lock);
7520: 0a 0a 20 20 20 20 2f 2a 20 44 72 6f 70 20 74 68  ..    /* Drop th
7530: 65 20 74 65 6d 70 6f 72 61 72 79 20 50 45 4e 44  e temporary PEND
7540: 49 4e 47 20 6c 6f 63 6b 20 2a 2f 0a 20 20 20 20  ING lock */.    
7550: 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 50  lock.l_start = P
7560: 45 4e 44 49 4e 47 5f 42 59 54 45 3b 0a 20 20 20  ENDING_BYTE;.   
7570: 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 31 4c   lock.l_len = 1L
7580: 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 74 79 70  ;.    lock.l_typ
7590: 65 20 3d 20 46 5f 55 4e 4c 43 4b 3b 0a 20 20 20  e = F_UNLCK;.   
75a0: 20 66 63 6e 74 6c 28 69 64 2d 3e 68 2c 20 46 5f   fcntl(id->h, F_
75b0: 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b 0a 20  SETLK, &lock);. 
75c0: 20 20 20 69 66 28 20 73 20 29 7b 0a 20 20 20 20     if( s ){.    
75d0: 20 20 72 63 20 3d 20 28 65 72 72 6e 6f 3d 3d 45    rc = (errno==E
75e0: 49 4e 56 41 4c 29 20 3f 20 53 51 4c 49 54 45 5f  INVAL) ? SQLITE_
75f0: 4e 4f 4c 46 53 20 3a 20 53 51 4c 49 54 45 5f 42  NOLFS : SQLITE_B
7600: 55 53 59 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a  USY;.    }else{.
7610: 20 20 20 20 20 20 69 64 2d 3e 6c 6f 63 6b 74 79        id->lockty
7620: 70 65 20 3d 20 53 48 41 52 45 44 5f 4c 4f 43 4b  pe = SHARED_LOCK
7630: 3b 0a 20 20 20 20 20 20 69 64 2d 3e 70 4f 70 65  ;.      id->pOpe
7640: 6e 2d 3e 6e 4c 6f 63 6b 2b 2b 3b 0a 20 20 20 20  n->nLock++;.    
7650: 20 20 70 4c 6f 63 6b 2d 3e 63 6e 74 20 3d 20 31    pLock->cnt = 1
7660: 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 20  ;.    }.  }else 
7670: 69 66 28 20 6c 6f 63 6b 74 79 70 65 3d 3d 45 58  if( locktype==EX
7680: 43 4c 55 53 49 56 45 5f 4c 4f 43 4b 20 26 26 20  CLUSIVE_LOCK && 
7690: 70 4c 6f 63 6b 2d 3e 63 6e 74 3e 31 20 29 7b 0a  pLock->cnt>1 ){.
76a0: 20 20 20 20 2f 2a 20 57 65 20 61 72 65 20 74 72      /* We are tr
76b0: 79 69 6e 67 20 66 6f 72 20 61 6e 20 65 78 63 6c  ying for an excl
76c0: 75 73 69 76 65 20 6c 6f 63 6b 20 62 75 74 20 61  usive lock but a
76d0: 6e 6f 74 68 65 72 20 74 68 72 65 61 64 20 69 6e  nother thread in
76e0: 20 74 68 69 73 0a 20 20 20 20 2a 2a 20 73 61 6d   this.    ** sam
76f0: 65 20 70 72 6f 63 65 73 73 20 69 73 20 73 74 69  e process is sti
7700: 6c 6c 20 68 6f 6c 64 69 6e 67 20 61 20 73 68 61  ll holding a sha
7710: 72 65 64 20 6c 6f 63 6b 2e 20 2a 2f 0a 20 20 20  red lock. */.   
7720: 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 42 55 53   rc = SQLITE_BUS
7730: 59 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  Y;.  }else{.    
7740: 2f 2a 20 54 68 65 20 72 65 71 75 65 73 74 20 77  /* The request w
7750: 61 73 20 66 6f 72 20 61 20 52 45 53 45 52 56 45  as for a RESERVE
7760: 44 20 6f 72 20 45 58 43 4c 55 53 49 56 45 20 6c  D or EXCLUSIVE l
7770: 6f 63 6b 2e 20 20 49 74 20 69 73 0a 20 20 20 20  ock.  It is.    
7780: 2a 2a 20 61 73 73 75 6d 65 64 20 74 68 61 74 20  ** assumed that 
7790: 74 68 65 72 65 20 69 73 20 61 20 53 48 41 52 45  there is a SHARE
77a0: 44 20 6f 72 20 67 72 65 61 74 65 72 20 6c 6f 63  D or greater loc
77b0: 6b 20 6f 6e 20 74 68 65 20 66 69 6c 65 0a 20 20  k on the file.  
77c0: 20 20 2a 2a 20 61 6c 72 65 61 64 79 2e 0a 20 20    ** already..  
77d0: 20 20 2a 2f 0a 20 20 20 20 61 73 73 65 72 74 28    */.    assert(
77e0: 20 30 21 3d 69 64 2d 3e 6c 6f 63 6b 74 79 70 65   0!=id->locktype
77f0: 20 29 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 74   );.    lock.l_t
7800: 79 70 65 20 3d 20 46 5f 57 52 4c 43 4b 3b 0a 20  ype = F_WRLCK;. 
7810: 20 20 20 73 77 69 74 63 68 28 20 6c 6f 63 6b 74     switch( lockt
7820: 79 70 65 20 29 7b 0a 20 20 20 20 20 20 63 61 73  ype ){.      cas
7830: 65 20 52 45 53 45 52 56 45 44 5f 4c 4f 43 4b 3a  e RESERVED_LOCK:
7840: 0a 20 20 20 20 20 20 20 20 6c 6f 63 6b 2e 6c 5f  .        lock.l_
7850: 73 74 61 72 74 20 3d 20 52 45 53 45 52 56 45 44  start = RESERVED
7860: 5f 42 59 54 45 3b 0a 20 20 20 20 20 20 20 20 62  _BYTE;.        b
7870: 72 65 61 6b 3b 0a 20 20 20 20 20 20 63 61 73 65  reak;.      case
7880: 20 45 58 43 4c 55 53 49 56 45 5f 4c 4f 43 4b 3a   EXCLUSIVE_LOCK:
7890: 0a 20 20 20 20 20 20 20 20 6c 6f 63 6b 2e 6c 5f  .        lock.l_
78a0: 73 74 61 72 74 20 3d 20 53 48 41 52 45 44 5f 46  start = SHARED_F
78b0: 49 52 53 54 3b 0a 20 20 20 20 20 20 20 20 6c 6f  IRST;.        lo
78c0: 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 53 48 41 52 45  ck.l_len = SHARE
78d0: 44 5f 53 49 5a 45 3b 0a 20 20 20 20 20 20 20 20  D_SIZE;.        
78e0: 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 64 65 66  break;.      def
78f0: 61 75 6c 74 3a 0a 20 20 20 20 20 20 20 20 61 73  ault:.        as
7900: 73 65 72 74 28 30 29 3b 0a 20 20 20 20 7d 0a 20  sert(0);.    }. 
7910: 20 20 20 73 20 3d 20 66 63 6e 74 6c 28 69 64 2d     s = fcntl(id-
7920: 3e 68 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f  >h, F_SETLK, &lo
7930: 63 6b 29 3b 0a 20 20 20 20 69 66 28 20 73 20 29  ck);.    if( s )
7940: 7b 0a 20 20 20 20 20 20 72 63 20 3d 20 28 65 72  {.      rc = (er
7950: 72 6e 6f 3d 3d 45 49 4e 56 41 4c 29 20 3f 20 53  rno==EINVAL) ? S
7960: 51 4c 49 54 45 5f 4e 4f 4c 46 53 20 3a 20 53 51  QLITE_NOLFS : SQ
7970: 4c 49 54 45 5f 42 55 53 59 3b 0a 20 20 20 20 7d  LITE_BUSY;.    }
7980: 0a 20 20 7d 0a 20 20 0a 20 20 69 66 28 20 72 63  .  }.  .  if( rc
7990: 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20  ==SQLITE_OK ){. 
79a0: 20 20 20 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 20     id->locktype 
79b0: 3d 20 6c 6f 63 6b 74 79 70 65 3b 0a 20 20 20 20  = locktype;.    
79c0: 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 79 70 65 20  pLock->locktype 
79d0: 3d 20 6c 6f 63 6b 74 79 70 65 3b 0a 20 20 7d 65  = locktype;.  }e
79e0: 6c 73 65 20 69 66 28 20 6c 6f 63 6b 74 79 70 65  lse if( locktype
79f0: 3d 3d 45 58 43 4c 55 53 49 56 45 5f 4c 4f 43 4b  ==EXCLUSIVE_LOCK
7a00: 20 29 7b 0a 20 20 20 20 69 64 2d 3e 6c 6f 63 6b   ){.    id->lock
7a10: 74 79 70 65 20 3d 20 50 45 4e 44 49 4e 47 5f 4c  type = PENDING_L
7a20: 4f 43 4b 3b 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e  OCK;.    pLock->
7a30: 6c 6f 63 6b 74 79 70 65 20 3d 20 50 45 4e 44 49  locktype = PENDI
7a40: 4e 47 5f 4c 4f 43 4b 3b 0a 20 20 7d 0a 0a 65 6e  NG_LOCK;.  }..en
7a50: 64 5f 6c 6f 63 6b 3a 0a 20 20 73 71 6c 69 74 65  d_lock:.  sqlite
7a60: 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b  3OsLeaveMutex();
7a70: 0a 20 20 54 52 41 43 45 34 28 22 4c 4f 43 4b 20  .  TRACE4("LOCK 
7a80: 25 64 20 25 73 20 25 73 5c 6e 22 2c 20 69 64 2d  %d %s %s\n", id-
7a90: 3e 68 2c 20 6c 6f 63 6b 74 79 70 65 4e 61 6d 65  >h, locktypeName
7aa0: 28 6c 6f 63 6b 74 79 70 65 29 2c 20 0a 20 20 20  (locktype), .   
7ab0: 20 20 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b     rc==SQLITE_OK
7ac0: 20 3f 20 22 6f 6b 22 20 3a 20 22 66 61 69 6c 65   ? "ok" : "faile
7ad0: 64 22 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 63  d");.  return rc
7ae0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4c 6f 77 65 72  ;.}../*.** Lower
7af0: 20 74 68 65 20 6c 6f 63 6b 69 6e 67 20 6c 65 76   the locking lev
7b00: 65 6c 20 6f 6e 20 66 69 6c 65 20 64 65 73 63 72  el on file descr
7b10: 69 70 74 6f 72 20 69 64 20 74 6f 20 6c 6f 63 6b  iptor id to lock
7b20: 74 79 70 65 2e 20 20 6c 6f 63 6b 74 79 70 65 0a  type.  locktype.
7b30: 2a 2a 20 6d 75 73 74 20 62 65 20 65 69 74 68 65  ** must be eithe
7b40: 72 20 4e 4f 5f 4c 4f 43 4b 20 6f 72 20 53 48 41  r NO_LOCK or SHA
7b50: 52 45 44 5f 4c 4f 43 4b 2e 0a 2a 2a 0a 2a 2a 20  RED_LOCK..**.** 
7b60: 49 66 20 74 68 65 20 6c 6f 63 6b 69 6e 67 20 6c  If the locking l
7b70: 65 76 65 6c 20 6f 66 20 74 68 65 20 66 69 6c 65  evel of the file
7b80: 20 64 65 73 63 72 69 70 74 6f 72 20 69 73 20 61   descriptor is a
7b90: 6c 72 65 61 64 79 20 61 74 20 6f 72 20 62 65 6c  lready at or bel
7ba0: 6f 77 0a 2a 2a 20 74 68 65 20 72 65 71 75 65 73  ow.** the reques
7bb0: 74 65 64 20 6c 6f 63 6b 69 6e 67 20 6c 65 76 65  ted locking leve
7bc0: 6c 2c 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20  l, this routine 
7bd0: 69 73 20 61 20 6e 6f 2d 6f 70 2e 0a 2a 2a 0a 2a  is a no-op..**.*
7be0: 2a 20 49 74 20 69 73 20 6e 6f 74 20 70 6f 73 73  * It is not poss
7bf0: 69 62 6c 65 20 66 6f 72 20 74 68 69 73 20 72 6f  ible for this ro
7c00: 75 74 69 6e 65 20 74 6f 20 66 61 69 6c 2e 0a 2a  utine to fail..*
7c10: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 55  /.int sqlite3OsU
7c20: 6e 6c 6f 63 6b 28 4f 73 46 69 6c 65 20 2a 69 64  nlock(OsFile *id
7c30: 2c 20 69 6e 74 20 6c 6f 63 6b 74 79 70 65 29 7b  , int locktype){
7c40: 0a 20 20 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e  .  struct lockIn
7c50: 66 6f 20 2a 70 4c 6f 63 6b 3b 0a 20 20 73 74 72  fo *pLock;.  str
7c60: 75 63 74 20 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 0a  uct flock lock;.
7c70: 0a 20 20 61 73 73 65 72 74 28 20 69 64 2d 3e 69  .  assert( id->i
7c80: 73 4f 70 65 6e 20 29 3b 0a 20 20 54 52 41 43 45  sOpen );.  TRACE
7c90: 37 28 22 55 4e 4c 4f 43 4b 20 25 64 20 25 64 20  7("UNLOCK %d %d 
7ca0: 77 61 73 20 25 64 28 25 64 2c 25 64 29 20 70 69  was %d(%d,%d) pi
7cb0: 64 3d 25 64 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20  d=%d\n", id->h, 
7cc0: 6c 6f 63 6b 74 79 70 65 2c 20 69 64 2d 3e 6c 6f  locktype, id->lo
7cd0: 63 6b 74 79 70 65 2c 20 0a 20 20 20 20 20 20 69  cktype, .      i
7ce0: 64 2d 3e 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74 79  d->pLock->lockty
7cf0: 70 65 2c 20 69 64 2d 3e 70 4c 6f 63 6b 2d 3e 63  pe, id->pLock->c
7d00: 6e 74 2c 20 67 65 74 70 69 64 28 29 29 3b 0a 0a  nt, getpid());..
7d10: 20 20 61 73 73 65 72 74 28 20 6c 6f 63 6b 74 79    assert( lockty
7d20: 70 65 3c 3d 53 48 41 52 45 44 5f 4c 4f 43 4b 20  pe<=SHARED_LOCK 
7d30: 29 3b 0a 20 20 69 66 28 20 69 64 2d 3e 6c 6f 63  );.  if( id->loc
7d40: 6b 74 79 70 65 3c 3d 6c 6f 63 6b 74 79 70 65 20  ktype<=locktype 
7d50: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51  ){.    return SQ
7d60: 4c 49 54 45 5f 4f 4b 3b 0a 20 20 7d 0a 20 20 73  LITE_OK;.  }.  s
7d70: 71 6c 69 74 65 33 4f 73 45 6e 74 65 72 4d 75 74  qlite3OsEnterMut
7d80: 65 78 28 29 3b 0a 20 20 70 4c 6f 63 6b 20 3d 20  ex();.  pLock = 
7d90: 69 64 2d 3e 70 4c 6f 63 6b 3b 0a 20 20 61 73 73  id->pLock;.  ass
7da0: 65 72 74 28 20 70 4c 6f 63 6b 2d 3e 63 6e 74 21  ert( pLock->cnt!
7db0: 3d 30 20 29 3b 0a 20 20 69 66 28 20 69 64 2d 3e  =0 );.  if( id->
7dc0: 6c 6f 63 6b 74 79 70 65 3e 53 48 41 52 45 44 5f  locktype>SHARED_
7dd0: 4c 4f 43 4b 20 29 7b 0a 20 20 20 20 61 73 73 65  LOCK ){.    asse
7de0: 72 74 28 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74  rt( pLock->lockt
7df0: 79 70 65 3d 3d 69 64 2d 3e 6c 6f 63 6b 74 79 70  ype==id->locktyp
7e00: 65 20 29 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f  e );.    lock.l_
7e10: 74 79 70 65 20 3d 20 46 5f 55 4e 4c 43 4b 3b 0a  type = F_UNLCK;.
7e20: 20 20 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63      lock.l_whenc
7e30: 65 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 20 20  e = SEEK_SET;.  
7e40: 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d    lock.l_start =
7e50: 20 50 45 4e 44 49 4e 47 5f 42 59 54 45 3b 0a 20   PENDING_BYTE;. 
7e60: 20 20 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20     lock.l_len = 
7e70: 32 4c 3b 20 20 61 73 73 65 72 74 28 20 50 45 4e  2L;  assert( PEN
7e80: 44 49 4e 47 5f 42 59 54 45 2b 31 3d 3d 52 45 53  DING_BYTE+1==RES
7e90: 45 52 56 45 44 5f 42 59 54 45 20 29 3b 0a 20 20  ERVED_BYTE );.  
7ea0: 20 20 66 63 6e 74 6c 28 69 64 2d 3e 68 2c 20 46    fcntl(id->h, F
7eb0: 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b 0a  _SETLK, &lock);.
7ec0: 20 20 20 20 70 4c 6f 63 6b 2d 3e 6c 6f 63 6b 74      pLock->lockt
7ed0: 79 70 65 20 3d 20 53 48 41 52 45 44 5f 4c 4f 43  ype = SHARED_LOC
7ee0: 4b 3b 0a 20 20 7d 0a 20 20 69 66 28 20 6c 6f 63  K;.  }.  if( loc
7ef0: 6b 74 79 70 65 3d 3d 4e 4f 5f 4c 4f 43 4b 20 29  ktype==NO_LOCK )
7f00: 7b 0a 20 20 20 20 73 74 72 75 63 74 20 6f 70 65  {.    struct ope
7f10: 6e 43 6e 74 20 2a 70 4f 70 65 6e 3b 0a 0a 20 20  nCnt *pOpen;..  
7f20: 20 20 2f 2a 20 44 65 63 72 65 6d 65 6e 74 20 74    /* Decrement t
7f30: 68 65 20 73 68 61 72 65 64 20 6c 6f 63 6b 20 63  he shared lock c
7f40: 6f 75 6e 74 65 72 2e 20 20 52 65 6c 65 61 73 65  ounter.  Release
7f50: 20 74 68 65 20 6c 6f 63 6b 20 75 73 69 6e 67 20   the lock using 
7f60: 61 6e 0a 20 20 20 20 2a 2a 20 4f 53 20 63 61 6c  an.    ** OS cal
7f70: 6c 20 6f 6e 6c 79 20 77 68 65 6e 20 61 6c 6c 20  l only when all 
7f80: 74 68 72 65 61 64 73 20 69 6e 20 74 68 69 73 20  threads in this 
7f90: 73 61 6d 65 20 70 72 6f 63 65 73 73 20 68 61 76  same process hav
7fa0: 65 20 72 65 6c 65 61 73 65 64 0a 20 20 20 20 2a  e released.    *
7fb0: 2a 20 74 68 65 20 6c 6f 63 6b 2e 0a 20 20 20 20  * the lock..    
7fc0: 2a 2f 0a 20 20 20 20 70 4c 6f 63 6b 2d 3e 63 6e  */.    pLock->cn
7fd0: 74 2d 2d 3b 0a 20 20 20 20 69 66 28 20 70 4c 6f  t--;.    if( pLo
7fe0: 63 6b 2d 3e 63 6e 74 3d 3d 30 20 29 7b 0a 20 20  ck->cnt==0 ){.  
7ff0: 20 20 20 20 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20      lock.l_type 
8000: 3d 20 46 5f 55 4e 4c 43 4b 3b 0a 20 20 20 20 20  = F_UNLCK;.     
8010: 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65 20 3d   lock.l_whence =
8020: 20 53 45 45 4b 5f 53 45 54 3b 0a 20 20 20 20 20   SEEK_SET;.     
8030: 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20   lock.l_start = 
8040: 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 30 4c 3b  lock.l_len = 0L;
8050: 0a 20 20 20 20 20 20 66 63 6e 74 6c 28 69 64 2d  .      fcntl(id-
8060: 3e 68 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f  >h, F_SETLK, &lo
8070: 63 6b 29 3b 0a 20 20 20 20 20 20 70 4c 6f 63 6b  ck);.      pLock
8080: 2d 3e 6c 6f 63 6b 74 79 70 65 20 3d 20 4e 4f 5f  ->locktype = NO_
8090: 4c 4f 43 4b 3b 0a 20 20 20 20 7d 0a 0a 20 20 20  LOCK;.    }..   
80a0: 20 2f 2a 20 44 65 63 72 65 6d 65 6e 74 20 74 68   /* Decrement th
80b0: 65 20 63 6f 75 6e 74 20 6f 66 20 6c 6f 63 6b 73  e count of locks
80c0: 20 61 67 61 69 6e 73 74 20 74 68 69 73 20 73 61   against this sa
80d0: 6d 65 20 66 69 6c 65 2e 20 20 57 68 65 6e 20 74  me file.  When t
80e0: 68 65 0a 20 20 20 20 2a 2a 20 63 6f 75 6e 74 20  he.    ** count 
80f0: 72 65 61 63 68 65 73 20 7a 65 72 6f 2c 20 63 6c  reaches zero, cl
8100: 6f 73 65 20 61 6e 79 20 6f 74 68 65 72 20 66 69  ose any other fi
8110: 6c 65 20 64 65 73 63 72 69 70 74 6f 72 73 20 77  le descriptors w
8120: 68 6f 73 65 20 63 6c 6f 73 65 0a 20 20 20 20 2a  hose close.    *
8130: 2a 20 77 61 73 20 64 65 66 65 72 72 65 64 20 62  * was deferred b
8140: 65 63 61 75 73 65 20 6f 66 20 6f 75 74 73 74 61  ecause of outsta
8150: 6e 64 69 6e 67 20 6c 6f 63 6b 73 2e 0a 20 20 20  nding locks..   
8160: 20 2a 2f 0a 20 20 20 20 70 4f 70 65 6e 20 3d 20   */.    pOpen = 
8170: 69 64 2d 3e 70 4f 70 65 6e 3b 0a 20 20 20 20 70  id->pOpen;.    p
8180: 4f 70 65 6e 2d 3e 6e 4c 6f 63 6b 2d 2d 3b 0a 20  Open->nLock--;. 
8190: 20 20 20 61 73 73 65 72 74 28 20 70 4f 70 65 6e     assert( pOpen
81a0: 2d 3e 6e 4c 6f 63 6b 3e 3d 30 20 29 3b 0a 20 20  ->nLock>=0 );.  
81b0: 20 20 69 66 28 20 70 4f 70 65 6e 2d 3e 6e 4c 6f    if( pOpen->nLo
81c0: 63 6b 3d 3d 30 20 26 26 20 70 4f 70 65 6e 2d 3e  ck==0 && pOpen->
81d0: 6e 50 65 6e 64 69 6e 67 3e 30 20 29 7b 0a 20 20  nPending>0 ){.  
81e0: 20 20 20 20 69 6e 74 20 69 3b 0a 20 20 20 20 20      int i;.     
81f0: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 70 4f 70 65   for(i=0; i<pOpe
8200: 6e 2d 3e 6e 50 65 6e 64 69 6e 67 3b 20 69 2b 2b  n->nPending; i++
8210: 29 7b 0a 20 20 20 20 20 20 20 20 63 6c 6f 73 65  ){.        close
8220: 28 70 4f 70 65 6e 2d 3e 61 50 65 6e 64 69 6e 67  (pOpen->aPending
8230: 5b 69 5d 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20  [i]);.      }.  
8240: 20 20 20 20 73 71 6c 69 74 65 46 72 65 65 28 70      sqliteFree(p
8250: 4f 70 65 6e 2d 3e 61 50 65 6e 64 69 6e 67 29 3b  Open->aPending);
8260: 0a 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e 6e 50  .      pOpen->nP
8270: 65 6e 64 69 6e 67 20 3d 20 30 3b 0a 20 20 20 20  ending = 0;.    
8280: 20 20 70 4f 70 65 6e 2d 3e 61 50 65 6e 64 69 6e    pOpen->aPendin
8290: 67 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d  g = 0;.    }.  }
82a0: 0a 20 20 73 71 6c 69 74 65 33 4f 73 4c 65 61 76  .  sqlite3OsLeav
82b0: 65 4d 75 74 65 78 28 29 3b 0a 20 20 69 64 2d 3e  eMutex();.  id->
82c0: 6c 6f 63 6b 74 79 70 65 20 3d 20 6c 6f 63 6b 74  locktype = lockt
82d0: 79 70 65 3b 0a 20 20 72 65 74 75 72 6e 20 53 51  ype;.  return SQ
82e0: 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a  LITE_OK;.}../*.*
82f0: 2a 20 43 6c 6f 73 65 20 61 20 66 69 6c 65 2e 0a  * Close a file..
8300: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f 73  */.int sqlite3Os
8310: 43 6c 6f 73 65 28 4f 73 46 69 6c 65 20 2a 69 64  Close(OsFile *id
8320: 29 7b 0a 20 20 69 66 28 20 21 69 64 2d 3e 69 73  ){.  if( !id->is
8330: 4f 70 65 6e 20 29 20 72 65 74 75 72 6e 20 53 51  Open ) return SQ
8340: 4c 49 54 45 5f 4f 4b 3b 0a 20 20 69 64 2d 3e 7a  LITE_OK;.  id->z
8350: 46 69 6c 65 6e 61 6d 65 20 3d 20 30 3b 0a 20 20  Filename = 0;.  
8360: 73 71 6c 69 74 65 33 4f 73 55 6e 6c 6f 63 6b 28  sqlite3OsUnlock(
8370: 69 64 2c 20 4e 4f 5f 4c 4f 43 4b 29 3b 0a 20 20  id, NO_LOCK);.  
8380: 69 66 28 20 69 64 2d 3e 64 69 72 66 64 3e 3d 30  if( id->dirfd>=0
8390: 20 29 20 63 6c 6f 73 65 28 69 64 2d 3e 64 69 72   ) close(id->dir
83a0: 66 64 29 3b 0a 20 20 69 64 2d 3e 64 69 72 66 64  fd);.  id->dirfd
83b0: 20 3d 20 2d 31 3b 0a 20 20 73 71 6c 69 74 65 33   = -1;.  sqlite3
83c0: 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a  OsEnterMutex();.
83d0: 20 20 69 66 28 20 69 64 2d 3e 70 4f 70 65 6e 2d    if( id->pOpen-
83e0: 3e 6e 4c 6f 63 6b 20 29 7b 0a 20 20 20 20 2f 2a  >nLock ){.    /*
83f0: 20 49 66 20 74 68 65 72 65 20 61 72 65 20 6f 75   If there are ou
8400: 74 73 74 61 6e 64 69 6e 67 20 6c 6f 63 6b 73 2c  tstanding locks,
8410: 20 64 6f 20 6e 6f 74 20 61 63 74 75 61 6c 6c 79   do not actually
8420: 20 63 6c 6f 73 65 20 74 68 65 20 66 69 6c 65 20   close the file 
8430: 6a 75 73 74 0a 20 20 20 20 2a 2a 20 79 65 74 20  just.    ** yet 
8440: 62 65 63 61 75 73 65 20 74 68 61 74 20 77 6f 75  because that wou
8450: 6c 64 20 63 6c 65 61 72 20 74 68 6f 73 65 20 6c  ld clear those l
8460: 6f 63 6b 73 2e 20 20 49 6e 73 74 65 61 64 2c 20  ocks.  Instead, 
8470: 61 64 64 20 74 68 65 20 66 69 6c 65 0a 20 20 20  add the file.   
8480: 20 2a 2a 20 64 65 73 63 72 69 70 74 6f 72 20 74   ** descriptor t
8490: 6f 20 70 4f 70 65 6e 2d 3e 61 50 65 6e 64 69 6e  o pOpen->aPendin
84a0: 67 2e 20 20 49 74 20 77 69 6c 6c 20 62 65 20 61  g.  It will be a
84b0: 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 63 6c 6f  utomatically clo
84c0: 73 65 64 20 77 68 65 6e 0a 20 20 20 20 2a 2a 20  sed when.    ** 
84d0: 74 68 65 20 6c 61 73 74 20 6c 6f 63 6b 20 69 73  the last lock is
84e0: 20 63 6c 65 61 72 65 64 2e 0a 20 20 20 20 2a 2f   cleared..    */
84f0: 0a 20 20 20 20 69 6e 74 20 2a 61 4e 65 77 3b 0a  .    int *aNew;.
8500: 20 20 20 20 73 74 72 75 63 74 20 6f 70 65 6e 43      struct openC
8510: 6e 74 20 2a 70 4f 70 65 6e 20 3d 20 69 64 2d 3e  nt *pOpen = id->
8520: 70 4f 70 65 6e 3b 0a 20 20 20 20 70 4f 70 65 6e  pOpen;.    pOpen
8530: 2d 3e 6e 50 65 6e 64 69 6e 67 2b 2b 3b 0a 20 20  ->nPending++;.  
8540: 20 20 61 4e 65 77 20 3d 20 73 71 6c 69 74 65 52    aNew = sqliteR
8550: 65 61 6c 6c 6f 63 28 20 70 4f 70 65 6e 2d 3e 61  ealloc( pOpen->a
8560: 50 65 6e 64 69 6e 67 2c 20 70 4f 70 65 6e 2d 3e  Pending, pOpen->
8570: 6e 50 65 6e 64 69 6e 67 2a 73 69 7a 65 6f 66 28  nPending*sizeof(
8580: 69 6e 74 29 20 29 3b 0a 20 20 20 20 69 66 28 20  int) );.    if( 
8590: 61 4e 65 77 3d 3d 30 20 29 7b 0a 20 20 20 20 20  aNew==0 ){.     
85a0: 20 2f 2a 20 49 66 20 61 20 6d 61 6c 6c 6f 63 20   /* If a malloc 
85b0: 66 61 69 6c 73 2c 20 6a 75 73 74 20 6c 65 61 6b  fails, just leak
85c0: 20 74 68 65 20 66 69 6c 65 20 64 65 73 63 72 69   the file descri
85d0: 70 74 6f 72 20 2a 2f 0a 20 20 20 20 7d 65 6c 73  ptor */.    }els
85e0: 65 7b 0a 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e  e{.      pOpen->
85f0: 61 50 65 6e 64 69 6e 67 20 3d 20 61 4e 65 77 3b  aPending = aNew;
8600: 0a 20 20 20 20 20 20 70 4f 70 65 6e 2d 3e 61 50  .      pOpen->aP
8610: 65 6e 64 69 6e 67 5b 70 4f 70 65 6e 2d 3e 6e 50  ending[pOpen->nP
8620: 65 6e 64 69 6e 67 2d 31 5d 20 3d 20 69 64 2d 3e  ending-1] = id->
8630: 68 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65  h;.    }.  }else
8640: 7b 0a 20 20 20 20 2f 2a 20 54 68 65 72 65 20 61  {.    /* There a
8650: 72 65 20 6e 6f 20 6f 75 74 73 74 61 6e 64 69 6e  re no outstandin
8660: 67 20 6c 6f 63 6b 73 20 73 6f 20 77 65 20 63 61  g locks so we ca
8670: 6e 20 63 6c 6f 73 65 20 74 68 65 20 66 69 6c 65  n close the file
8680: 20 69 6d 6d 65 64 69 61 74 65 6c 79 20 2a 2f 0a   immediately */.
8690: 20 20 20 20 63 6c 6f 73 65 28 69 64 2d 3e 68 29      close(id->h)
86a0: 3b 0a 20 20 7d 0a 20 20 72 65 6c 65 61 73 65 4c  ;.  }.  releaseL
86b0: 6f 63 6b 49 6e 66 6f 28 69 64 2d 3e 70 4c 6f 63  ockInfo(id->pLoc
86c0: 6b 29 3b 0a 20 20 72 65 6c 65 61 73 65 4f 70 65  k);.  releaseOpe
86d0: 6e 43 6e 74 28 69 64 2d 3e 70 4f 70 65 6e 29 3b  nCnt(id->pOpen);
86e0: 0a 20 20 73 71 6c 69 74 65 33 4f 73 4c 65 61 76  .  sqlite3OsLeav
86f0: 65 4d 75 74 65 78 28 29 3b 0a 20 20 69 64 2d 3e  eMutex();.  id->
8700: 69 73 4f 70 65 6e 20 3d 20 30 3b 0a 20 20 54 52  isOpen = 0;.  TR
8710: 41 43 45 32 28 22 43 4c 4f 53 45 20 20 20 25 2d  ACE2("CLOSE   %-
8720: 33 64 5c 6e 22 2c 20 69 64 2d 3e 68 29 3b 0a 20  3d\n", id->h);. 
8730: 20 4f 70 65 6e 43 6f 75 6e 74 65 72 28 2d 31 29   OpenCounter(-1)
8740: 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  ;.  return SQLIT
8750: 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47  E_OK;.}../*.** G
8760: 65 74 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 74  et information t
8770: 6f 20 73 65 65 64 20 74 68 65 20 72 61 6e 64 6f  o seed the rando
8780: 6d 20 6e 75 6d 62 65 72 20 67 65 6e 65 72 61 74  m number generat
8790: 6f 72 2e 20 20 54 68 65 20 73 65 65 64 0a 2a 2a  or.  The seed.**
87a0: 20 69 73 20 77 72 69 74 74 65 6e 20 69 6e 74 6f   is written into
87b0: 20 74 68 65 20 62 75 66 66 65 72 20 7a 42 75 66   the buffer zBuf
87c0: 5b 32 35 36 5d 2e 20 20 54 68 65 20 63 61 6c 6c  [256].  The call
87d0: 69 6e 67 20 66 75 6e 63 74 69 6f 6e 20 6d 75 73  ing function mus
87e0: 74 0a 2a 2a 20 73 75 70 70 6c 79 20 61 20 73 75  t.** supply a su
87f0: 66 66 69 63 69 65 6e 74 6c 79 20 6c 61 72 67 65  fficiently large
8800: 20 62 75 66 66 65 72 2e 0a 2a 2f 0a 69 6e 74 20   buffer..*/.int 
8810: 73 71 6c 69 74 65 33 4f 73 52 61 6e 64 6f 6d 53  sqlite3OsRandomS
8820: 65 65 64 28 63 68 61 72 20 2a 7a 42 75 66 29 7b  eed(char *zBuf){
8830: 0a 20 20 2f 2a 20 57 65 20 68 61 76 65 20 74 6f  .  /* We have to
8840: 20 69 6e 69 74 69 61 6c 69 7a 65 20 7a 42 75 66   initialize zBuf
8850: 20 74 6f 20 70 72 65 76 65 6e 74 20 76 61 6c 67   to prevent valg
8860: 72 69 6e 64 20 66 72 6f 6d 20 72 65 70 6f 72 74  rind from report
8870: 69 6e 67 0a 20 20 2a 2a 20 65 72 72 6f 72 73 2e  ing.  ** errors.
8880: 20 20 54 68 65 20 72 65 70 6f 72 74 73 20 69 73    The reports is
8890: 73 75 65 64 20 62 79 20 76 61 6c 67 72 69 6e 64  sued by valgrind
88a0: 20 61 72 65 20 69 6e 63 6f 72 72 65 63 74 20 2d   are incorrect -
88b0: 20 77 65 20 77 6f 75 6c 64 0a 20 20 2a 2a 20 70   we would.  ** p
88c0: 72 65 66 65 72 20 74 68 61 74 20 74 68 65 20 72  refer that the r
88d0: 61 6e 64 6f 6d 6e 65 73 73 20 62 65 20 69 6e 63  andomness be inc
88e0: 72 65 61 73 65 64 20 62 79 20 6d 61 6b 69 6e 67  reased by making
88f0: 20 75 73 65 20 6f 66 20 74 68 65 0a 20 20 2a 2a   use of the.  **
8900: 20 75 6e 69 6e 69 74 69 61 6c 69 7a 65 64 20 73   uninitialized s
8910: 70 61 63 65 20 69 6e 20 7a 42 75 66 20 2d 20 62  pace in zBuf - b
8920: 75 74 20 76 61 6c 67 72 69 6e 64 20 65 72 72 6f  ut valgrind erro
8930: 72 73 20 74 65 6e 64 20 74 6f 20 77 6f 72 72 79  rs tend to worry
8940: 0a 20 20 2a 2a 20 73 6f 6d 65 20 75 73 65 72 73  .  ** some users
8950: 2e 20 20 52 61 74 68 65 72 20 74 68 61 6e 20 61  .  Rather than a
8960: 72 67 75 65 2c 20 69 74 20 73 65 65 6d 73 20 65  rgue, it seems e
8970: 61 73 69 65 72 20 6a 75 73 74 20 74 6f 20 69 6e  asier just to in
8980: 69 74 69 61 6c 69 7a 65 0a 20 20 2a 2a 20 74 68  itialize.  ** th
8990: 65 20 77 68 6f 6c 65 20 61 72 72 61 79 20 61 6e  e whole array an
89a0: 64 20 73 69 6c 65 6e 63 65 20 76 61 6c 67 72 69  d silence valgri
89b0: 6e 64 2c 20 65 76 65 6e 20 69 66 20 74 68 61 74  nd, even if that
89c0: 20 6d 65 61 6e 73 20 6c 65 73 73 20 72 61 6e 64   means less rand
89d0: 6f 6d 6e 65 73 73 0a 20 20 2a 2a 20 69 6e 20 74  omness.  ** in t
89e0: 68 65 20 72 61 6e 64 6f 6d 20 73 65 65 64 2e 0a  he random seed..
89f0: 20 20 2a 2a 0a 20 20 2a 2a 20 57 68 65 6e 20 74    **.  ** When t
8a00: 65 73 74 69 6e 67 2c 20 69 6e 69 74 69 61 6c 69  esting, initiali
8a10: 7a 69 6e 67 20 7a 42 75 66 5b 5d 20 74 6f 20 7a  zing zBuf[] to z
8a20: 65 72 6f 20 69 73 20 61 6c 6c 20 77 65 20 64 6f  ero is all we do
8a30: 2e 20 20 54 68 61 74 20 6d 65 61 6e 73 0a 20 20  .  That means.  
8a40: 2a 2a 20 74 68 61 74 20 77 65 20 61 6c 77 61 79  ** that we alway
8a50: 73 20 75 73 65 20 74 68 65 20 73 61 6d 65 20 72  s use the same r
8a60: 61 6e 64 6f 6d 20 6e 75 6d 62 65 72 20 73 65 71  andom number seq
8a70: 75 65 6e 63 65 2e 2a 20 54 68 69 73 20 6d 61 6b  uence.* This mak
8a80: 65 73 20 74 68 65 0a 20 20 2a 2a 20 74 65 73 74  es the.  ** test
8a90: 73 20 72 65 70 65 61 74 61 62 6c 65 2e 0a 20 20  s repeatable..  
8aa0: 2a 2f 0a 20 20 6d 65 6d 73 65 74 28 7a 42 75 66  */.  memset(zBuf
8ab0: 2c 20 30 2c 20 32 35 36 29 3b 0a 23 69 66 20 21  , 0, 256);.#if !
8ac0: 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 54  defined(SQLITE_T
8ad0: 45 53 54 29 0a 20 20 7b 0a 20 20 20 20 69 6e 74  EST).  {.    int
8ae0: 20 70 69 64 3b 0a 20 20 20 20 74 69 6d 65 28 28   pid;.    time((
8af0: 74 69 6d 65 5f 74 2a 29 7a 42 75 66 29 3b 0a 20  time_t*)zBuf);. 
8b00: 20 20 20 70 69 64 20 3d 20 67 65 74 70 69 64 28     pid = getpid(
8b10: 29 3b 0a 20 20 20 20 6d 65 6d 63 70 79 28 26 7a  );.    memcpy(&z
8b20: 42 75 66 5b 73 69 7a 65 6f 66 28 74 69 6d 65 5f  Buf[sizeof(time_
8b30: 74 29 5d 2c 20 26 70 69 64 2c 20 73 69 7a 65 6f  t)], &pid, sizeo
8b40: 66 28 70 69 64 29 29 3b 0a 20 20 7d 0a 23 65 6e  f(pid));.  }.#en
8b50: 64 69 66 0a 20 20 72 65 74 75 72 6e 20 53 51 4c  dif.  return SQL
8b60: 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  ITE_OK;.}../*.**
8b70: 20 53 6c 65 65 70 20 66 6f 72 20 61 20 6c 69 74   Sleep for a lit
8b80: 74 6c 65 20 77 68 69 6c 65 2e 20 20 52 65 74 75  tle while.  Retu
8b90: 72 6e 20 74 68 65 20 61 6d 6f 75 6e 74 20 6f 66  rn the amount of
8ba0: 20 74 69 6d 65 20 73 6c 65 70 74 2e 0a 2a 2f 0a   time slept..*/.
8bb0: 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 53 6c 65  int sqlite3OsSle
8bc0: 65 70 28 69 6e 74 20 6d 73 29 7b 0a 23 69 66 20  ep(int ms){.#if 
8bd0: 64 65 66 69 6e 65 64 28 48 41 56 45 5f 55 53 4c  defined(HAVE_USL
8be0: 45 45 50 29 20 26 26 20 48 41 56 45 5f 55 53 4c  EEP) && HAVE_USL
8bf0: 45 45 50 0a 20 20 75 73 6c 65 65 70 28 6d 73 2a  EEP.  usleep(ms*
8c00: 31 30 30 30 29 3b 0a 20 20 72 65 74 75 72 6e 20  1000);.  return 
8c10: 6d 73 3b 0a 23 65 6c 73 65 0a 20 20 73 6c 65 65  ms;.#else.  slee
8c20: 70 28 28 6d 73 2b 39 39 39 29 2f 31 30 30 30 29  p((ms+999)/1000)
8c30: 3b 0a 20 20 72 65 74 75 72 6e 20 31 30 30 30 2a  ;.  return 1000*
8c40: 28 28 6d 73 2b 39 39 39 29 2f 31 30 30 30 29 3b  ((ms+999)/1000);
8c50: 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a  .#endif.}../*.**
8c60: 20 53 74 61 74 69 63 20 76 61 72 69 61 62 6c 65   Static variable
8c70: 73 20 75 73 65 64 20 66 6f 72 20 74 68 72 65 61  s used for threa
8c80: 64 20 73 79 6e 63 68 72 6f 6e 69 7a 61 74 69 6f  d synchronizatio
8c90: 6e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  n.*/.static int 
8ca0: 69 6e 4d 75 74 65 78 20 3d 20 30 3b 0a 23 69 66  inMutex = 0;.#if
8cb0: 64 65 66 20 53 51 4c 49 54 45 5f 55 4e 49 58 5f  def SQLITE_UNIX_
8cc0: 54 48 52 45 41 44 53 0a 73 74 61 74 69 63 20 70  THREADS.static p
8cd0: 74 68 72 65 61 64 5f 6d 75 74 65 78 5f 74 20 6d  thread_mutex_t m
8ce0: 75 74 65 78 20 3d 20 50 54 48 52 45 41 44 5f 4d  utex = PTHREAD_M
8cf0: 55 54 45 58 5f 49 4e 49 54 49 41 4c 49 5a 45 52  UTEX_INITIALIZER
8d00: 3b 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20  ;.#endif../*.** 
8d10: 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 70 61  The following pa
8d20: 69 72 20 6f 66 20 72 6f 75 74 69 6e 65 20 69 6d  ir of routine im
8d30: 70 6c 65 6d 65 6e 74 20 6d 75 74 75 61 6c 20 65  plement mutual e
8d40: 78 63 6c 75 73 69 6f 6e 20 66 6f 72 0a 2a 2a 20  xclusion for.** 
8d50: 6d 75 6c 74 69 2d 74 68 72 65 61 64 65 64 20 70  multi-threaded p
8d60: 72 6f 63 65 73 73 65 73 2e 20 20 4f 6e 6c 79 20  rocesses.  Only 
8d70: 61 20 73 69 6e 67 6c 65 20 74 68 72 65 61 64 20  a single thread 
8d80: 69 73 20 61 6c 6c 6f 77 65 64 20 74 6f 0a 2a 2a  is allowed to.**
8d90: 20 65 78 65 63 75 74 65 64 20 63 6f 64 65 20 74   executed code t
8da0: 68 61 74 20 69 73 20 73 75 72 72 6f 75 6e 64 65  hat is surrounde
8db0: 64 20 62 79 20 45 6e 74 65 72 4d 75 74 65 78 28  d by EnterMutex(
8dc0: 29 20 61 6e 64 20 4c 65 61 76 65 4d 75 74 65 78  ) and LeaveMutex
8dd0: 28 29 2e 0a 2a 2a 0a 2a 2a 20 53 51 4c 69 74 65  ()..**.** SQLite
8de0: 20 75 73 65 73 20 6f 6e 6c 79 20 61 20 73 69 6e   uses only a sin
8df0: 67 6c 65 20 4d 75 74 65 78 2e 20 20 54 68 65 72  gle Mutex.  Ther
8e00: 65 20 69 73 20 6e 6f 74 20 6d 75 63 68 20 63 72  e is not much cr
8e10: 69 74 69 63 61 6c 0a 2a 2a 20 63 6f 64 65 20 61  itical.** code a
8e20: 6e 64 20 77 68 61 74 20 6c 69 74 74 6c 65 20 74  nd what little t
8e30: 68 65 72 65 20 69 73 20 65 78 65 63 75 74 65 73  here is executes
8e40: 20 71 75 69 63 6b 6c 79 20 61 6e 64 20 77 69 74   quickly and wit
8e50: 68 6f 75 74 20 62 6c 6f 63 6b 69 6e 67 2e 0a 2a  hout blocking..*
8e60: 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 4f 73  /.void sqlite3Os
8e70: 45 6e 74 65 72 4d 75 74 65 78 28 29 7b 0a 23 69  EnterMutex(){.#i
8e80: 66 64 65 66 20 53 51 4c 49 54 45 5f 55 4e 49 58  fdef SQLITE_UNIX
8e90: 5f 54 48 52 45 41 44 53 0a 20 20 70 74 68 72 65  _THREADS.  pthre
8ea0: 61 64 5f 6d 75 74 65 78 5f 6c 6f 63 6b 28 26 6d  ad_mutex_lock(&m
8eb0: 75 74 65 78 29 3b 0a 23 65 6e 64 69 66 0a 20 20  utex);.#endif.  
8ec0: 61 73 73 65 72 74 28 20 21 69 6e 4d 75 74 65 78  assert( !inMutex
8ed0: 20 29 3b 0a 20 20 69 6e 4d 75 74 65 78 20 3d 20   );.  inMutex = 
8ee0: 31 3b 0a 7d 0a 76 6f 69 64 20 73 71 6c 69 74 65  1;.}.void sqlite
8ef0: 33 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 7b  3OsLeaveMutex(){
8f00: 0a 20 20 61 73 73 65 72 74 28 20 69 6e 4d 75 74  .  assert( inMut
8f10: 65 78 20 29 3b 0a 20 20 69 6e 4d 75 74 65 78 20  ex );.  inMutex 
8f20: 3d 20 30 3b 0a 23 69 66 64 65 66 20 53 51 4c 49  = 0;.#ifdef SQLI
8f30: 54 45 5f 55 4e 49 58 5f 54 48 52 45 41 44 53 0a  TE_UNIX_THREADS.
8f40: 20 20 70 74 68 72 65 61 64 5f 6d 75 74 65 78 5f    pthread_mutex_
8f50: 75 6e 6c 6f 63 6b 28 26 6d 75 74 65 78 29 3b 0a  unlock(&mutex);.
8f60: 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  #endif.}../*.** 
8f70: 54 75 72 6e 20 61 20 72 65 6c 61 74 69 76 65 20  Turn a relative 
8f80: 70 61 74 68 6e 61 6d 65 20 69 6e 74 6f 20 61 20  pathname into a 
8f90: 66 75 6c 6c 20 70 61 74 68 6e 61 6d 65 2e 20 20  full pathname.  
8fa0: 52 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 65 72  Return a pointer
8fb0: 0a 2a 2a 20 74 6f 20 74 68 65 20 66 75 6c 6c 20  .** to the full 
8fc0: 70 61 74 68 6e 61 6d 65 20 73 74 6f 72 65 64 20  pathname stored 
8fd0: 69 6e 20 73 70 61 63 65 20 6f 62 74 61 69 6e 65  in space obtaine
8fe0: 64 20 66 72 6f 6d 20 73 71 6c 69 74 65 4d 61 6c  d from sqliteMal
8ff0: 6c 6f 63 28 29 2e 0a 2a 2a 20 54 68 65 20 63 61  loc()..** The ca
9000: 6c 6c 69 6e 67 20 66 75 6e 63 74 69 6f 6e 20 69  lling function i
9010: 73 20 72 65 73 70 6f 6e 73 69 62 6c 65 20 66 6f  s responsible fo
9020: 72 20 66 72 65 65 69 6e 67 20 74 68 69 73 20 73  r freeing this s
9030: 70 61 63 65 20 6f 6e 63 65 20 69 74 0a 2a 2a 20  pace once it.** 
9040: 69 73 20 6e 6f 20 6c 6f 6e 67 65 72 20 6e 65 65  is no longer nee
9050: 64 65 64 2e 0a 2a 2f 0a 63 68 61 72 20 2a 73 71  ded..*/.char *sq
9060: 6c 69 74 65 33 4f 73 46 75 6c 6c 50 61 74 68 6e  lite3OsFullPathn
9070: 61 6d 65 28 63 6f 6e 73 74 20 63 68 61 72 20 2a  ame(const char *
9080: 7a 52 65 6c 61 74 69 76 65 29 7b 0a 20 20 63 68  zRelative){.  ch
9090: 61 72 20 2a 7a 46 75 6c 6c 20 3d 20 30 3b 0a 20  ar *zFull = 0;. 
90a0: 20 69 66 28 20 7a 52 65 6c 61 74 69 76 65 5b 30   if( zRelative[0
90b0: 5d 3d 3d 27 2f 27 20 29 7b 0a 20 20 20 20 73 71  ]=='/' ){.    sq
90c0: 6c 69 74 65 33 53 65 74 53 74 72 69 6e 67 28 26  lite3SetString(&
90d0: 7a 46 75 6c 6c 2c 20 7a 52 65 6c 61 74 69 76 65  zFull, zRelative
90e0: 2c 20 28 63 68 61 72 2a 29 30 29 3b 0a 20 20 7d  , (char*)0);.  }
90f0: 65 6c 73 65 7b 0a 20 20 20 20 63 68 61 72 20 7a  else{.    char z
9100: 42 75 66 5b 35 30 30 30 5d 3b 0a 20 20 20 20 73  Buf[5000];.    s
9110: 71 6c 69 74 65 33 53 65 74 53 74 72 69 6e 67 28  qlite3SetString(
9120: 26 7a 46 75 6c 6c 2c 20 67 65 74 63 77 64 28 7a  &zFull, getcwd(z
9130: 42 75 66 2c 20 73 69 7a 65 6f 66 28 7a 42 75 66  Buf, sizeof(zBuf
9140: 29 29 2c 20 22 2f 22 2c 20 7a 52 65 6c 61 74 69  )), "/", zRelati
9150: 76 65 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20  ve,.            
9160: 20 20 20 20 20 20 20 20 28 63 68 61 72 2a 29 30          (char*)0
9170: 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20  );.  }.  return 
9180: 7a 46 75 6c 6c 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  zFull;.}../*.** 
9190: 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 76 61  The following va
91a0: 72 69 61 62 6c 65 2c 20 69 66 20 73 65 74 20 74  riable, if set t
91b0: 6f 20 61 20 6e 6f 6e 2d 7a 65 72 6f 20 76 61 6c  o a non-zero val
91c0: 75 65 2c 20 62 65 63 6f 6d 65 73 20 74 68 65 20  ue, becomes the 
91d0: 72 65 73 75 6c 74 0a 2a 2a 20 72 65 74 75 72 6e  result.** return
91e0: 65 64 20 66 72 6f 6d 20 73 71 6c 69 74 65 33 4f  ed from sqlite3O
91f0: 73 43 75 72 72 65 6e 74 54 69 6d 65 28 29 2e 20  sCurrentTime(). 
9200: 20 54 68 69 73 20 69 73 20 75 73 65 64 20 66 6f   This is used fo
9210: 72 20 74 65 73 74 69 6e 67 2e 0a 2a 2f 0a 23 69  r testing..*/.#i
9220: 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54  fdef SQLITE_TEST
9230: 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 63 75 72  .int sqlite3_cur
9240: 72 65 6e 74 5f 74 69 6d 65 20 3d 20 30 3b 0a 23  rent_time = 0;.#
9250: 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 46 69 6e  endif../*.** Fin
9260: 64 20 74 68 65 20 63 75 72 72 65 6e 74 20 74 69  d the current ti
9270: 6d 65 20 28 69 6e 20 55 6e 69 76 65 72 73 61 6c  me (in Universal
9280: 20 43 6f 6f 72 64 69 6e 61 74 65 64 20 54 69 6d   Coordinated Tim
9290: 65 29 2e 20 20 57 72 69 74 65 20 74 68 65 0a 2a  e).  Write the.*
92a0: 2a 20 63 75 72 72 65 6e 74 20 74 69 6d 65 20 61  * current time a
92b0: 6e 64 20 64 61 74 65 20 61 73 20 61 20 4a 75 6c  nd date as a Jul
92c0: 69 61 6e 20 44 61 79 20 6e 75 6d 62 65 72 20 69  ian Day number i
92d0: 6e 74 6f 20 2a 70 72 4e 6f 77 20 61 6e 64 0a 2a  nto *prNow and.*
92e0: 2a 20 72 65 74 75 72 6e 20 30 2e 20 20 52 65 74  * return 0.  Ret
92f0: 75 72 6e 20 31 20 69 66 20 74 68 65 20 74 69 6d  urn 1 if the tim
9300: 65 20 61 6e 64 20 64 61 74 65 20 63 61 6e 6e 6f  e and date canno
9310: 74 20 62 65 20 66 6f 75 6e 64 2e 0a 2a 2f 0a 69  t be found..*/.i
9320: 6e 74 20 73 71 6c 69 74 65 33 4f 73 43 75 72 72  nt sqlite3OsCurr
9330: 65 6e 74 54 69 6d 65 28 64 6f 75 62 6c 65 20 2a  entTime(double *
9340: 70 72 4e 6f 77 29 7b 0a 20 20 74 69 6d 65 5f 74  prNow){.  time_t
9350: 20 74 3b 0a 20 20 74 69 6d 65 28 26 74 29 3b 0a   t;.  time(&t);.
9360: 20 20 2a 70 72 4e 6f 77 20 3d 20 74 2f 38 36 34    *prNow = t/864
9370: 30 30 2e 30 20 2b 20 32 34 34 30 35 38 37 2e 35  00.0 + 2440587.5
9380: 3b 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f  ;.#ifdef SQLITE_
9390: 54 45 53 54 0a 20 20 69 66 28 20 73 71 6c 69 74  TEST.  if( sqlit
93a0: 65 33 5f 63 75 72 72 65 6e 74 5f 74 69 6d 65 20  e3_current_time 
93b0: 29 7b 0a 20 20 20 20 2a 70 72 4e 6f 77 20 3d 20  ){.    *prNow = 
93c0: 73 71 6c 69 74 65 33 5f 63 75 72 72 65 6e 74 5f  sqlite3_current_
93d0: 74 69 6d 65 2f 38 36 34 30 30 2e 30 20 2b 20 32  time/86400.0 + 2
93e0: 34 34 30 35 38 37 2e 35 3b 0a 20 20 7d 0a 23 65  440587.5;.  }.#e
93f0: 6e 64 69 66 0a 20 20 72 65 74 75 72 6e 20 30 3b  ndif.  return 0;
9400: 0a 7d 0a 0a 23 69 66 20 30 20 2f 2a 20 4e 4f 54  .}..#if 0 /* NOT
9410: 20 55 53 45 44 20 2a 2f 0a 2f 2a 0a 2a 2a 20 46   USED */./*.** F
9420: 69 6e 64 20 74 68 65 20 74 69 6d 65 20 74 68 61  ind the time tha
9430: 74 20 74 68 65 20 66 69 6c 65 20 77 61 73 20 6c  t the file was l
9440: 61 73 74 20 6d 6f 64 69 66 69 65 64 2e 20 20 57  ast modified.  W
9450: 72 69 74 65 20 74 68 65 0a 2a 2a 20 6d 6f 64 69  rite the.** modi
9460: 66 69 63 61 74 69 6f 6e 20 74 69 6d 65 20 61 6e  fication time an
9470: 64 20 64 61 74 65 20 61 73 20 61 20 4a 75 6c 69  d date as a Juli
9480: 61 6e 20 44 61 79 20 6e 75 6d 62 65 72 20 69 6e  an Day number in
9490: 74 6f 20 2a 70 72 4e 6f 77 20 61 6e 64 0a 2a 2a  to *prNow and.**
94a0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f   return SQLITE_O
94b0: 4b 2e 20 20 52 65 74 75 72 6e 20 53 51 4c 49 54  K.  Return SQLIT
94c0: 45 5f 45 52 52 4f 52 20 69 66 20 74 68 65 20 6d  E_ERROR if the m
94d0: 6f 64 69 66 69 63 61 74 69 6f 6e 0a 2a 2a 20 74  odification.** t
94e0: 69 6d 65 20 63 61 6e 6e 6f 74 20 62 65 20 66 6f  ime cannot be fo
94f0: 75 6e 64 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  und..*/.int sqli
9500: 74 65 33 4f 73 46 69 6c 65 4d 6f 64 54 69 6d 65  te3OsFileModTime
9510: 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20 64 6f 75  (OsFile *id, dou
9520: 62 6c 65 20 2a 70 72 4e 6f 77 29 7b 0a 20 20 69  ble *prNow){.  i
9530: 6e 74 20 72 63 3b 0a 20 20 73 74 72 75 63 74 20  nt rc;.  struct 
9540: 73 74 61 74 20 73 74 61 74 62 75 66 3b 0a 20 20  stat statbuf;.  
9550: 69 66 28 20 66 73 74 61 74 28 69 64 2d 3e 68 2c  if( fstat(id->h,
9560: 20 26 73 74 61 74 62 75 66 29 3d 3d 30 20 29 7b   &statbuf)==0 ){
9570: 0a 20 20 20 20 2a 70 72 4e 6f 77 20 3d 20 73 74  .    *prNow = st
9580: 61 74 62 75 66 2e 73 74 5f 6d 74 69 6d 65 2f 38  atbuf.st_mtime/8
9590: 36 34 30 30 2e 30 20 2b 20 32 34 34 30 35 38 37  6400.0 + 2440587
95a0: 2e 35 3b 0a 20 20 20 20 72 63 20 3d 20 53 51 4c  .5;.    rc = SQL
95b0: 49 54 45 5f 4f 4b 3b 0a 20 20 7d 65 6c 73 65 7b  ITE_OK;.  }else{
95c0: 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45  .    rc = SQLITE
95d0: 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a 20 20 72 65  _ERROR;.  }.  re
95e0: 74 75 72 6e 20 72 63 3b 0a 7d 0a 23 65 6e 64 69  turn rc;.}.#endi
95f0: 66 20 2f 2a 20 4e 4f 54 20 55 53 45 44 20 2a 2f  f /* NOT USED */
9600: 0a 0a 23 65 6e 64 69 66 20 2f 2a 20 4f 53 5f 55  ..#endif /* OS_U
9610: 4e 49 58 20 2a 2f 0a                             NIX */.