/ Hex Artifact Content
Login

Artifact 9cc40c5384baba4a85e160e67807645ca98ba3cc:


0000: 2f 2a 0a 2a 2a 20 32 30 30 31 20 53 65 70 74 65  /*.** 2001 Septe
0010: 6d 62 65 72 20 31 36 0a 2a 2a 0a 2a 2a 20 54 68  mber 16.**.** Th
0020: 65 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69  e author disclai
0030: 6d 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20  ms copyright to 
0040: 74 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65  this source code
0050: 2e 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a  .  In place of.*
0060: 2a 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65  * a legal notice
0070: 2c 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73  , here is a bles
0080: 73 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d  sing:.**.**    M
0090: 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61  ay you do good a
00a0: 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20  nd not evil..** 
00b0: 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20     May you find 
00c0: 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20  forgiveness for 
00d0: 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72  yourself and for
00e0: 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20  give others..** 
00f0: 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65     May you share
0100: 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74   freely, never t
0110: 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20  aking more than 
0120: 79 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a  you give..**.***
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 2a 2a 2a 2a 2a 2a 0a 2a 2a 0a 2a  ***********.**.*
0180: 2a 20 54 68 69 73 20 66 69 6c 65 20 63 6f 6e 74  * This file cont
0190: 61 69 6e 73 20 63 6f 64 65 20 74 68 61 74 20 69  ains code that i
01a0: 73 20 73 70 65 63 69 66 69 63 20 74 6f 20 70 61  s specific to pa
01b0: 72 74 69 63 75 6c 61 72 20 6f 70 65 72 61 74 69  rticular operati
01c0: 6e 67 0a 2a 2a 20 73 79 73 74 65 6d 73 2e 20 20  ng.** systems.  
01d0: 54 68 65 20 70 75 72 70 6f 73 65 20 6f 66 20 74  The purpose of t
01e0: 68 69 73 20 66 69 6c 65 20 69 73 20 74 6f 20 70  his file is to p
01f0: 72 6f 76 69 64 65 20 61 20 75 6e 69 66 6f 72 6d  rovide a uniform
0200: 20 61 62 73 74 72 61 63 74 69 6f 6e 0a 2a 2a 20   abstraction.** 
0210: 6f 6e 20 77 68 69 63 68 20 74 68 65 20 72 65 73  on which the res
0220: 74 20 6f 66 20 53 51 4c 69 74 65 20 63 61 6e 20  t of SQLite can 
0230: 6f 70 65 72 61 74 65 2e 0a 2a 2f 0a 23 69 6e 63  operate..*/.#inc
0240: 6c 75 64 65 20 22 73 71 6c 69 74 65 49 6e 74 2e  lude "sqliteInt.
0250: 68 22 0a 23 69 6e 63 6c 75 64 65 20 22 6f 73 2e  h".#include "os.
0260: 68 22 0a 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a  h"..#if OS_UNIX.
0270: 23 20 69 6e 63 6c 75 64 65 20 3c 75 6e 69 73 74  # include <unist
0280: 64 2e 68 3e 0a 23 20 69 6e 63 6c 75 64 65 20 3c  d.h>.# include <
0290: 66 63 6e 74 6c 2e 68 3e 0a 23 20 69 6e 63 6c 75  fcntl.h>.# inclu
02a0: 64 65 20 3c 73 79 73 2f 73 74 61 74 2e 68 3e 0a  de <sys/stat.h>.
02b0: 23 20 69 6e 63 6c 75 64 65 20 3c 74 69 6d 65 2e  # include <time.
02c0: 68 3e 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53  h>.#endif.#if OS
02d0: 5f 57 49 4e 0a 23 20 69 6e 63 6c 75 64 65 20 3c  _WIN.# include <
02e0: 77 69 6e 62 61 73 65 2e 68 3e 0a 23 65 6e 64 69  winbase.h>.#endi
02f0: 66 0a 0a 2f 2a 0a 2a 2a 20 4d 61 63 72 6f 73 20  f../*.** Macros 
0300: 66 6f 72 20 70 65 72 66 6f 72 6d 61 6e 63 65 20  for performance 
0310: 74 72 61 63 69 6e 67 2e 20 20 4e 6f 72 6d 61 6c  tracing.  Normal
0320: 6c 79 20 74 75 72 6e 65 64 20 6f 66 66 0a 2a 2f  ly turned off.*/
0330: 0a 23 69 66 20 30 0a 73 74 61 74 69 63 20 69 6e  .#if 0.static in
0340: 74 20 6c 61 73 74 5f 70 61 67 65 20 3d 20 30 3b  t last_page = 0;
0350: 0a 23 64 65 66 69 6e 65 20 53 45 45 4b 28 58 29  .#define SEEK(X)
0360: 20 20 20 20 20 6c 61 73 74 5f 70 61 67 65 3d 28       last_page=(
0370: 58 29 0a 23 64 65 66 69 6e 65 20 54 52 41 43 45  X).#define TRACE
0380: 31 28 58 29 20 20 20 66 70 72 69 6e 74 66 28 73  1(X)   fprintf(s
0390: 74 64 65 72 72 2c 58 29 0a 23 64 65 66 69 6e 65  tderr,X).#define
03a0: 20 54 52 41 43 45 32 28 58 2c 59 29 20 66 70 72   TRACE2(X,Y) fpr
03b0: 69 6e 74 66 28 73 74 64 65 72 72 2c 58 2c 59 29  intf(stderr,X,Y)
03c0: 0a 23 65 6c 73 65 0a 23 64 65 66 69 6e 65 20 53  .#else.#define S
03d0: 45 45 4b 28 58 29 0a 23 64 65 66 69 6e 65 20 54  EEK(X).#define T
03e0: 52 41 43 45 31 28 58 29 0a 23 64 65 66 69 6e 65  RACE1(X).#define
03f0: 20 54 52 41 43 45 32 28 58 2c 59 29 0a 23 65 6e   TRACE2(X,Y).#en
0400: 64 69 66 0a 0a 0a 23 69 66 20 4f 53 5f 55 4e 49  dif...#if OS_UNI
0410: 58 0a 2f 2a 0a 2a 2a 20 48 65 72 65 20 69 73 20  X./*.** Here is 
0420: 74 68 65 20 64 69 72 74 20 6f 6e 20 50 4f 53 49  the dirt on POSI
0430: 58 20 61 64 76 69 73 6f 72 79 20 6c 6f 63 6b 73  X advisory locks
0440: 3a 20 20 41 4e 53 49 20 53 54 44 20 31 30 30 33  :  ANSI STD 1003
0450: 2e 31 20 28 31 39 39 36 29 0a 2a 2a 20 73 65 63  .1 (1996).** sec
0460: 74 69 6f 6e 20 36 2e 35 2e 32 2e 32 20 6c 69 6e  tion 6.5.2.2 lin
0470: 65 73 20 34 38 33 20 74 68 72 6f 75 67 68 20 34  es 483 through 4
0480: 39 30 20 73 70 65 63 69 66 79 20 74 68 61 74 20  90 specify that 
0490: 77 68 65 6e 20 61 20 70 72 6f 63 65 73 73 0a 2a  when a process.*
04a0: 2a 20 73 65 74 73 20 6f 72 20 63 6c 65 61 72 73  * sets or clears
04b0: 20 61 20 6c 6f 63 6b 2c 20 74 68 61 74 20 6f 70   a lock, that op
04c0: 65 72 61 74 69 6f 6e 20 6f 76 65 72 72 69 64 65  eration override
04d0: 73 20 61 6e 79 20 70 72 69 6f 72 20 6c 6f 63 6b  s any prior lock
04e0: 73 20 73 65 74 0a 2a 2a 20 62 79 20 74 68 65 20  s set.** by the 
04f0: 73 61 6d 65 20 70 72 6f 63 65 73 73 2e 20 20 49  same process.  I
0500: 74 20 64 6f 65 73 20 6e 6f 74 20 65 78 70 6c 69  t does not expli
0510: 63 69 74 6c 79 20 73 61 79 20 73 6f 2c 20 62 75  citly say so, bu
0520: 74 20 74 68 69 73 20 69 6d 70 6c 69 65 73 0a 2a  t this implies.*
0530: 2a 20 74 68 61 74 20 69 74 20 6f 76 65 72 72 69  * that it overri
0540: 64 65 73 20 6c 6f 63 6b 73 20 73 65 74 20 62 79  des locks set by
0550: 20 74 68 65 20 73 61 6d 65 20 70 72 6f 63 65 73   the same proces
0560: 73 20 75 73 69 6e 67 20 61 20 64 69 66 66 65 72  s using a differ
0570: 65 6e 74 0a 2a 2a 20 66 69 6c 65 20 64 65 73 63  ent.** file desc
0580: 72 69 70 74 6f 72 2e 20 20 43 6f 6e 73 69 64 65  riptor.  Conside
0590: 72 20 74 68 69 73 20 74 65 73 74 20 63 61 73 65  r this test case
05a0: 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 69 6e  :.**.**       in
05b0: 74 20 66 64 31 20 3d 20 6f 70 65 6e 28 22 2e 2f  t fd1 = open("./
05c0: 66 69 6c 65 31 22 2c 20 4f 5f 52 44 57 52 7c 4f  file1", O_RDWR|O
05d0: 5f 43 52 45 41 54 2c 20 30 36 34 34 29 3b 0a 2a  _CREAT, 0644);.*
05e0: 2a 20 20 20 20 20 20 20 69 6e 74 20 66 64 32 20  *       int fd2 
05f0: 3d 20 6f 70 65 6e 28 22 2e 2f 66 69 6c 65 32 22  = open("./file2"
0600: 2c 20 4f 5f 52 44 57 52 7c 4f 5f 43 52 45 41 54  , O_RDWR|O_CREAT
0610: 2c 20 30 36 34 34 29 3b 0a 2a 2a 0a 2a 2a 20 53  , 0644);.**.** S
0620: 75 70 70 6f 73 65 20 2e 2f 66 69 6c 65 31 20 61  uppose ./file1 a
0630: 6e 64 20 2e 2f 66 69 6c 65 32 20 61 72 65 20 72  nd ./file2 are r
0640: 65 61 6c 6c 79 20 62 65 20 74 68 65 20 73 61 6d  eally be the sam
0650: 65 20 66 69 6c 65 20 28 62 65 63 61 75 73 65 0a  e file (because.
0660: 2a 2a 20 6f 6e 65 20 69 73 20 61 20 68 61 72 64  ** one is a hard
0670: 20 6f 72 20 73 79 6d 62 6f 6c 69 63 20 6c 69 6e   or symbolic lin
0680: 6b 20 74 6f 20 74 68 65 20 6f 74 68 65 72 29 20  k to the other) 
0690: 74 68 65 6e 20 69 66 20 79 6f 75 20 73 65 74 0a  then if you set.
06a0: 2a 2a 20 61 6e 20 65 78 63 6c 75 73 69 76 65 20  ** an exclusive 
06b0: 6c 6f 63 6b 20 6f 6e 20 66 64 31 2c 20 74 68 65  lock on fd1, the
06c0: 6e 20 74 72 79 20 74 6f 20 67 65 74 20 61 6e 20  n try to get an 
06d0: 65 78 63 6c 75 73 69 76 65 20 6c 6f 63 6b 0a 2a  exclusive lock.*
06e0: 2a 20 6f 6e 20 66 64 32 2c 20 69 74 20 77 6f 72  * on fd2, it wor
06f0: 6b 73 2e 20 20 49 20 77 6f 75 6c 64 20 68 61 76  ks.  I would hav
0700: 65 20 65 78 70 65 63 74 65 64 20 74 68 65 20 73  e expected the s
0710: 65 63 6f 6e 64 20 6c 6f 63 6b 20 74 6f 0a 2a 2a  econd lock to.**
0720: 20 66 61 69 6c 20 73 69 6e 63 65 20 74 68 65 72   fail since ther
0730: 65 20 77 61 73 20 61 6c 72 65 61 64 79 20 61 20  e was already a 
0740: 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 66 69 6c 65  lock on the file
0750: 20 64 75 65 20 74 6f 20 66 64 31 2e 0a 2a 2a 20   due to fd1..** 
0760: 42 75 74 20 6e 6f 74 20 73 6f 2e 20 20 53 69 6e  But not so.  Sin
0770: 63 65 20 62 6f 74 68 20 6c 6f 63 6b 73 20 63 61  ce both locks ca
0780: 6d 65 20 66 72 6f 6d 20 74 68 65 20 73 61 6d 65  me from the same
0790: 20 70 72 6f 63 65 73 73 2c 20 74 68 65 0a 2a 2a   process, the.**
07a0: 20 73 65 63 6f 6e 64 20 6f 76 65 72 72 69 64 65   second override
07b0: 73 20 74 68 65 20 66 69 72 73 74 2c 20 65 76 65  s the first, eve
07c0: 6e 20 74 68 6f 75 67 68 20 74 68 65 79 20 77 65  n though they we
07d0: 72 65 20 6f 6e 20 64 69 66 66 65 72 65 6e 74 0a  re on different.
07e0: 2a 2a 20 66 69 6c 65 20 64 65 73 63 72 69 70 74  ** file descript
07f0: 6f 72 73 20 6f 70 65 6e 65 64 20 6f 6e 20 64 69  ors opened on di
0800: 66 66 65 72 65 6e 74 20 66 69 6c 65 20 6e 61 6d  fferent file nam
0810: 65 73 2e 0a 2a 2a 0a 2a 2a 20 42 75 6d 6d 65 72  es..**.** Bummer
0820: 2e 20 20 49 66 20 79 6f 75 20 61 73 6b 20 6d 65  .  If you ask me
0830: 2c 20 74 68 69 73 20 69 73 20 62 72 6f 6b 65 6e  , this is broken
0840: 2e 20 20 42 61 64 6c 79 20 62 72 6f 6b 65 6e 2e  .  Badly broken.
0850: 20 20 49 74 20 6d 65 61 6e 73 0a 2a 2a 20 74 68    It means.** th
0860: 61 74 20 77 65 20 63 61 6e 6e 6f 74 20 75 73 65  at we cannot use
0870: 20 50 4f 53 49 58 20 6c 6f 63 6b 73 20 74 6f 20   POSIX locks to 
0880: 73 79 6e 63 68 72 6f 6e 69 7a 65 20 66 69 6c 65  synchronize file
0890: 20 61 63 63 65 73 73 20 61 6d 6f 6e 67 0a 2a 2a   access among.**
08a0: 20 63 6f 6d 70 65 74 69 6e 67 20 74 68 72 65 61   competing threa
08b0: 64 73 20 6f 66 20 74 68 65 20 73 61 6d 65 20 70  ds of the same p
08c0: 72 6f 63 65 73 73 2e 20 20 50 4f 53 49 58 20 6c  rocess.  POSIX l
08d0: 6f 63 6b 73 20 77 69 6c 6c 20 77 6f 72 6b 20 66  ocks will work f
08e0: 69 6e 65 0a 2a 2a 20 74 6f 20 73 79 6e 63 68 72  ine.** to synchr
08f0: 6f 6e 69 7a 65 20 61 63 63 65 73 73 20 66 6f 72  onize access for
0900: 20 74 68 72 65 61 64 73 20 69 6e 20 73 65 70 61   threads in sepa
0910: 72 61 74 65 20 70 72 6f 63 65 73 73 65 73 2c 20  rate processes, 
0920: 62 75 74 20 6e 6f 74 0a 2a 2a 20 74 68 72 65 61  but not.** threa
0930: 64 73 20 77 69 74 68 69 6e 20 74 68 65 20 73 61  ds within the sa
0940: 6d 65 20 70 72 6f 63 65 73 73 2e 0a 2a 2a 0a 2a  me process..**.*
0950: 2a 20 54 6f 20 77 6f 72 6b 20 61 72 6f 75 6e 64  * To work around
0960: 20 74 68 65 20 70 72 6f 62 6c 65 6d 2c 20 53 51   the problem, SQ
0970: 4c 69 74 65 20 68 61 73 20 74 6f 20 6d 61 6e 61  Lite has to mana
0980: 67 65 20 66 69 6c 65 20 6c 6f 63 6b 73 20 69 6e  ge file locks in
0990: 74 65 72 6e 61 6c 6c 79 0a 2a 2a 20 6f 6e 20 69  ternally.** on i
09a0: 74 73 20 6f 77 6e 2e 20 20 57 68 65 6e 65 76 65  ts own.  Wheneve
09b0: 72 20 61 20 6e 65 77 20 64 61 74 61 62 61 73 65  r a new database
09c0: 20 69 73 20 6f 70 65 6e 65 64 2c 20 77 65 20 68   is opened, we h
09d0: 61 76 65 20 74 6f 20 66 69 6e 64 20 74 68 65 0a  ave to find the.
09e0: 2a 2a 20 73 70 65 63 69 66 69 63 20 69 6e 6f 64  ** specific inod
09f0: 65 20 6f 66 20 74 68 65 20 64 61 74 61 62 61 73  e of the databas
0a00: 65 20 66 69 6c 65 20 28 74 68 65 20 69 6e 6f 64  e file (the inod
0a10: 65 20 69 73 20 64 65 74 65 72 6d 69 6e 65 64 20  e is determined 
0a20: 62 79 20 74 68 65 0a 2a 2a 20 73 74 5f 64 65 76  by the.** st_dev
0a30: 20 61 6e 64 20 73 74 5f 69 6e 6f 20 66 69 65 6c   and st_ino fiel
0a40: 64 73 20 6f 66 20 74 68 65 20 73 74 61 74 20 73  ds of the stat s
0a50: 74 72 75 63 74 75 72 65 20 74 68 61 74 20 66 73  tructure that fs
0a60: 74 61 74 28 29 20 66 69 6c 6c 73 20 69 6e 29 0a  tat() fills in).
0a70: 2a 2a 20 61 6e 64 20 63 68 65 63 6b 20 66 6f 72  ** and check for
0a80: 20 6c 6f 63 6b 73 20 61 6c 72 65 61 64 79 20 65   locks already e
0a90: 78 69 73 74 69 6e 67 20 6f 6e 20 74 68 61 74 20  xisting on that 
0aa0: 69 6e 6f 64 65 2e 20 20 57 68 65 6e 20 6c 6f 63  inode.  When loc
0ab0: 6b 73 20 61 72 65 0a 2a 2a 20 63 72 65 61 74 65  ks are.** create
0ac0: 64 20 6f 72 20 72 65 6d 6f 76 65 64 2c 20 77 65  d or removed, we
0ad0: 20 68 61 76 65 20 74 6f 20 6c 6f 6f 6b 20 61 74   have to look at
0ae0: 20 6f 75 72 20 6f 77 6e 20 69 6e 74 65 72 6e 61   our own interna
0af0: 6c 20 72 65 63 6f 72 64 20 6f 66 20 74 68 65 0a  l record of the.
0b00: 2a 2a 20 6c 6f 63 6b 73 20 74 6f 20 73 65 65 20  ** locks to see 
0b10: 69 66 20 61 6e 6f 74 68 65 72 20 74 68 72 65 61  if another threa
0b20: 64 20 68 61 73 20 70 72 65 76 69 6f 75 73 6c 79  d has previously
0b30: 20 73 65 74 20 61 20 6c 6f 63 6b 20 6f 6e 20 74   set a lock on t
0b40: 68 61 74 20 73 61 6d 65 0a 2a 2a 20 69 6e 6f 64  hat same.** inod
0b50: 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 4f 73 46  e..**.** The OsF
0b60: 69 6c 65 20 73 74 72 75 63 74 75 72 65 20 66 6f  ile structure fo
0b70: 72 20 50 4f 53 49 58 20 69 73 20 6e 6f 20 6c 6f  r POSIX is no lo
0b80: 6e 67 65 72 20 6a 75 73 74 20 61 6e 20 69 6e 74  nger just an int
0b90: 65 67 65 72 20 66 69 6c 65 0a 2a 2a 20 64 65 73  eger file.** des
0ba0: 63 72 69 70 74 6f 72 2e 20 20 49 74 20 69 73 20  criptor.  It is 
0bb0: 6e 6f 77 20 61 20 73 74 72 75 63 74 75 72 65 20  now a structure 
0bc0: 74 68 61 74 20 68 6f 6c 64 73 20 74 68 65 20 69  that holds the i
0bd0: 6e 74 65 67 65 72 20 66 69 6c 65 0a 2a 2a 20 64  nteger file.** d
0be0: 65 73 63 72 69 70 74 6f 72 20 61 6e 64 20 61 20  escriptor and a 
0bf0: 70 6f 69 6e 74 65 72 20 74 6f 20 61 20 73 74 72  pointer to a str
0c00: 75 63 74 75 72 65 20 74 68 61 74 20 64 65 73 63  ucture that desc
0c10: 72 69 62 65 73 20 74 68 65 20 69 6e 74 65 72 6e  ribes the intern
0c20: 61 6c 0a 2a 2a 20 6c 6f 63 6b 73 20 6f 6e 20 74  al.** locks on t
0c30: 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67  he corresponding
0c40: 20 69 6e 6f 64 65 2e 20 20 54 68 65 72 65 20 69   inode.  There i
0c50: 73 20 6f 6e 65 20 6c 6f 63 6b 69 6e 67 20 73 74  s one locking st
0c60: 72 75 63 74 75 72 65 0a 2a 2a 20 70 65 72 20 69  ructure.** per i
0c70: 6e 6f 64 65 2c 20 73 6f 20 69 66 20 74 68 65 20  node, so if the 
0c80: 73 61 6d 65 20 69 6e 6f 64 65 20 69 73 20 6f 70  same inode is op
0c90: 65 6e 65 64 20 74 77 69 63 65 2c 20 62 6f 74 68  ened twice, both
0ca0: 20 4f 73 46 69 6c 65 20 73 74 72 75 63 74 75 72   OsFile structur
0cb0: 65 73 0a 2a 2a 20 70 6f 69 6e 74 20 74 6f 20 74  es.** point to t
0cc0: 68 65 20 73 61 6d 65 20 6c 6f 63 6b 69 6e 67 20  he same locking 
0cd0: 73 74 72 75 63 74 75 72 65 2e 20 20 54 68 65 20  structure.  The 
0ce0: 6c 6f 63 6b 69 6e 67 20 73 74 72 75 63 74 75 72  locking structur
0cf0: 65 20 6b 65 65 70 73 0a 2a 2a 20 61 20 72 65 66  e keeps.** a ref
0d00: 65 72 65 6e 63 65 20 63 6f 75 6e 74 20 28 73 6f  erence count (so
0d10: 20 77 65 20 77 69 6c 6c 20 6b 6e 6f 77 20 77 68   we will know wh
0d20: 65 6e 20 74 6f 20 64 65 6c 65 74 65 20 69 74 29  en to delete it)
0d30: 20 61 6e 64 20 61 20 22 63 6e 74 22 0a 2a 2a 20   and a "cnt".** 
0d40: 66 69 65 6c 64 20 74 68 61 74 20 74 65 6c 6c 73  field that tells
0d50: 20 75 73 20 69 74 73 20 69 6e 74 65 72 6e 61 6c   us its internal
0d60: 20 6c 6f 63 6b 20 73 74 61 74 75 73 2e 20 20 63   lock status.  c
0d70: 6e 74 3d 3d 30 20 6d 65 61 6e 73 20 74 68 65 0a  nt==0 means the.
0d80: 2a 2a 20 66 69 6c 65 20 69 73 20 75 6e 6c 6f 63  ** file is unloc
0d90: 6b 65 64 2e 20 20 63 6e 74 3d 3d 2d 31 20 6d 65  ked.  cnt==-1 me
0da0: 61 6e 73 20 74 68 65 20 66 69 6c 65 20 68 61 73  ans the file has
0db0: 20 61 6e 20 65 78 63 6c 75 73 69 76 65 20 6c 6f   an exclusive lo
0dc0: 63 6b 2e 0a 2a 2a 20 63 6e 74 3e 30 20 6d 65 61  ck..** cnt>0 mea
0dd0: 6e 73 20 74 68 65 72 65 20 61 72 65 20 63 6e 74  ns there are cnt
0de0: 20 73 68 61 72 65 64 20 6c 6f 63 6b 73 20 6f 6e   shared locks on
0df0: 20 74 68 65 20 66 69 6c 65 2e 0a 2a 2a 0a 2a 2a   the file..**.**
0e00: 20 41 6e 79 20 61 74 74 65 6d 70 74 20 74 6f 20   Any attempt to 
0e10: 6c 6f 63 6b 20 6f 72 20 75 6e 6c 6f 63 6b 20 61  lock or unlock a
0e20: 20 66 69 6c 65 20 66 69 72 73 74 20 63 68 65 63   file first chec
0e30: 6b 73 20 74 68 65 20 6c 6f 63 6b 69 6e 67 0a 2a  ks the locking.*
0e40: 2a 20 73 74 72 75 63 74 75 72 65 2e 20 20 54 68  * structure.  Th
0e50: 65 20 66 63 6e 74 6c 28 29 20 73 79 73 74 65 6d  e fcntl() system
0e60: 20 63 61 6c 6c 20 69 73 20 6f 6e 6c 79 20 69 6e   call is only in
0e70: 76 6f 6b 65 64 20 74 6f 20 73 65 74 20 61 20 0a  voked to set a .
0e80: 2a 2a 20 50 4f 53 49 58 20 6c 6f 63 6b 20 69 66  ** POSIX lock if
0e90: 20 74 68 65 20 69 6e 74 65 72 6e 61 6c 20 6c 6f   the internal lo
0ea0: 63 6b 20 73 74 72 75 63 74 75 72 65 20 74 72 61  ck structure tra
0eb0: 6e 73 69 74 69 6f 6e 73 20 62 65 74 77 65 65 6e  nsitions between
0ec0: 0a 2a 2a 20 61 20 6c 6f 63 6b 65 64 20 61 6e 64  .** a locked and
0ed0: 20 61 6e 20 75 6e 6c 6f 63 6b 65 64 20 73 74 61   an unlocked sta
0ee0: 74 65 2e 0a 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 41 6e  te..*/../*.** An
0ef0: 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68 65   instance of the
0f00: 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63   following struc
0f10: 74 75 72 65 20 73 65 72 76 65 73 20 61 73 20 74  ture serves as t
0f20: 68 65 20 6b 65 79 20 75 73 65 64 0a 2a 2a 20 74  he key used.** t
0f30: 6f 20 6c 6f 63 61 74 65 20 61 20 70 61 72 74 69  o locate a parti
0f40: 63 75 6c 61 72 20 6c 6f 63 6b 49 6e 66 6f 20 73  cular lockInfo s
0f50: 74 72 75 63 74 75 72 65 20 67 69 76 65 6e 20 69  tructure given i
0f60: 74 73 20 69 6e 6f 64 65 2e 20 0a 2a 2f 0a 73 74  ts inode. .*/.st
0f70: 72 75 63 74 20 69 6e 6f 64 65 4b 65 79 20 7b 0a  ruct inodeKey {.
0f80: 20 20 64 65 76 5f 74 20 64 65 76 3b 20 20 20 2f    dev_t dev;   /
0f90: 2a 20 44 65 76 69 63 65 20 6e 75 6d 62 65 72 20  * Device number 
0fa0: 2a 2f 0a 20 20 69 6e 6f 5f 74 20 69 6e 6f 3b 20  */.  ino_t ino; 
0fb0: 20 20 2f 2a 20 49 6e 6f 64 65 20 6e 75 6d 62 65    /* Inode numbe
0fc0: 72 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 41  r */.};../*.** A
0fd0: 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68  n instance of th
0fe0: 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 74 72 75  e following stru
0ff0: 63 74 75 72 65 20 69 73 20 61 6c 6c 6f 63 61 74  cture is allocat
1000: 65 64 20 66 6f 72 20 65 61 63 68 20 69 6e 6f 64  ed for each inod
1010: 65 2e 0a 2a 2a 20 41 20 73 69 6e 67 6c 65 20 69  e..** A single i
1020: 6e 6f 64 65 20 63 61 6e 20 68 61 76 65 20 6d 75  node can have mu
1030: 6c 74 69 70 6c 65 20 66 69 6c 65 20 64 65 73 63  ltiple file desc
1040: 72 69 70 74 6f 72 73 2c 20 73 6f 20 65 61 63 68  riptors, so each
1050: 20 4f 73 46 69 6c 65 0a 2a 2a 20 73 74 72 75 63   OsFile.** struc
1060: 74 75 72 65 20 63 6f 6e 74 61 69 6e 73 20 61 20  ture contains a 
1070: 70 6f 69 6e 74 65 72 20 74 6f 20 61 6e 20 69 6e  pointer to an in
1080: 73 74 61 6e 63 65 20 6f 66 20 74 68 69 73 20 6f  stance of this o
1090: 62 6a 65 63 74 20 61 6e 64 20 74 68 69 73 0a 2a  bject and this.*
10a0: 2a 20 6f 62 6a 65 63 74 20 6b 65 65 70 73 20 61  * object keeps a
10b0: 20 63 6f 75 6e 74 20 6f 66 20 74 68 65 20 6e 75   count of the nu
10c0: 6d 62 65 72 20 6f 66 20 4f 73 46 69 6c 65 73 20  mber of OsFiles 
10d0: 70 6f 69 6e 74 69 6e 67 20 74 6f 20 69 74 2e 0a  pointing to it..
10e0: 2a 2f 0a 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e  */.struct lockIn
10f0: 66 6f 20 7b 0a 20 20 73 74 72 75 63 74 20 69 6e  fo {.  struct in
1100: 6f 64 65 4b 65 79 20 6b 65 79 3b 20 20 2f 2a 20  odeKey key;  /* 
1110: 54 68 65 20 6c 6f 6f 6b 75 70 20 6b 65 79 20 2a  The lookup key *
1120: 2f 0a 20 20 69 6e 74 20 63 6e 74 3b 20 20 20 20  /.  int cnt;    
1130: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 30 3a 20            /* 0: 
1140: 75 6e 6c 6f 63 6b 65 64 2e 20 20 2d 31 3a 20 77  unlocked.  -1: w
1150: 72 69 74 65 20 6c 6f 63 6b 2e 20 20 31 2e 2e 2e  rite lock.  1...
1160: 3a 20 72 65 61 64 20 6c 6f 63 6b 2e 20 2a 2f 0a  : read lock. */.
1170: 20 20 69 6e 74 20 6e 52 65 66 3b 20 20 20 20 20    int nRef;     
1180: 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65          /* Numbe
1190: 72 20 6f 66 20 70 6f 69 6e 74 65 72 73 20 74 6f  r of pointers to
11a0: 20 74 68 69 73 20 73 74 72 75 63 74 75 72 65 20   this structure 
11b0: 2a 2f 0a 7d 3b 0a 0a 2f 2a 20 0a 2a 2a 20 54 68  */.};../* .** Th
11c0: 69 73 20 68 61 73 68 20 74 61 62 6c 65 20 6d 61  is hash table ma
11d0: 70 73 20 69 6e 6f 64 65 73 20 28 69 6e 20 74 68  ps inodes (in th
11e0: 65 20 66 6f 72 6d 20 6f 66 20 69 6e 6f 64 65 4b  e form of inodeK
11f0: 65 79 20 73 74 72 75 63 74 75 72 65 73 29 20 69  ey structures) i
1200: 6e 74 6f 0a 2a 2a 20 70 6f 69 6e 74 65 72 73 20  nto.** pointers 
1210: 74 6f 20 6c 6f 63 6b 49 6e 66 6f 20 73 74 72 75  to lockInfo stru
1220: 63 74 75 72 65 73 2e 0a 2a 2f 0a 73 74 61 74 69  ctures..*/.stati
1230: 63 20 48 61 73 68 20 6c 6f 63 6b 48 61 73 68 20  c Hash lockHash 
1240: 3d 20 7b 20 53 51 4c 49 54 45 5f 48 41 53 48 5f  = { SQLITE_HASH_
1250: 42 49 4e 41 52 59 2c 20 30 2c 20 30 2c 20 30 2c  BINARY, 0, 0, 0,
1260: 20 30 2c 20 30 20 7d 3b 0a 0a 2f 2a 0a 2a 2a 20   0, 0 };../*.** 
1270: 47 69 76 65 6e 20 61 20 66 69 6c 65 20 64 65 73  Given a file des
1280: 63 72 69 70 74 6f 72 2c 20 6c 6f 63 61 74 65 20  criptor, locate 
1290: 61 20 6c 6f 63 6b 49 6e 66 6f 20 73 74 72 75 63  a lockInfo struc
12a0: 74 75 72 65 20 74 68 61 74 20 64 65 73 63 72 69  ture that descri
12b0: 62 65 73 0a 2a 2a 20 74 68 61 74 20 66 69 6c 65  bes.** that file
12c0: 20 64 65 73 63 72 69 70 74 6f 72 2e 20 20 43 72   descriptor.  Cr
12d0: 65 61 74 65 20 61 20 6e 65 77 20 6f 6e 65 20 69  eate a new one i
12e0: 66 20 6e 65 63 65 73 73 61 72 79 2e 20 20 4e 55  f necessary.  NU
12f0: 4c 4c 20 6d 69 67 68 74 0a 2a 2a 20 62 65 20 72  LL might.** be r
1300: 65 74 75 72 6e 65 64 20 69 66 20 6d 61 6c 6c 6f  eturned if mallo
1310: 63 28 29 20 66 61 69 6c 73 2e 0a 2a 2f 0a 73 74  c() fails..*/.st
1320: 61 74 69 63 20 73 74 72 75 63 74 20 6c 6f 63 6b  atic struct lock
1330: 49 6e 66 6f 20 2a 66 69 6e 64 4c 6f 63 6b 49 6e  Info *findLockIn
1340: 66 6f 28 69 6e 74 20 66 64 29 7b 0a 20 20 69 6e  fo(int fd){.  in
1350: 74 20 72 63 3b 0a 20 20 73 74 72 75 63 74 20 69  t rc;.  struct i
1360: 6e 6f 64 65 4b 65 79 20 6b 65 79 3b 0a 20 20 73  nodeKey key;.  s
1370: 74 72 75 63 74 20 73 74 61 74 20 73 74 61 74 62  truct stat statb
1380: 75 66 3b 0a 20 20 73 74 72 75 63 74 20 6c 6f 63  uf;.  struct loc
1390: 6b 49 6e 66 6f 20 2a 70 49 6e 66 6f 3b 0a 20 20  kInfo *pInfo;.  
13a0: 72 63 20 3d 20 66 73 74 61 74 28 66 64 2c 20 26  rc = fstat(fd, &
13b0: 73 74 61 74 62 75 66 29 3b 0a 20 20 69 66 28 20  statbuf);.  if( 
13c0: 72 63 21 3d 30 20 29 20 72 65 74 75 72 6e 20 30  rc!=0 ) return 0
13d0: 3b 0a 20 20 6d 65 6d 73 65 74 28 26 6b 65 79 2c  ;.  memset(&key,
13e0: 20 30 2c 20 73 69 7a 65 6f 66 28 6b 65 79 29 29   0, sizeof(key))
13f0: 3b 0a 20 20 6b 65 79 2e 64 65 76 20 3d 20 73 74  ;.  key.dev = st
1400: 61 74 62 75 66 2e 73 74 5f 64 65 76 3b 0a 20 20  atbuf.st_dev;.  
1410: 6b 65 79 2e 69 6e 6f 20 3d 20 73 74 61 74 62 75  key.ino = statbu
1420: 66 2e 73 74 5f 69 6e 6f 3b 0a 20 20 70 49 6e 66  f.st_ino;.  pInf
1430: 6f 20 3d 20 28 73 74 72 75 63 74 20 6c 6f 63 6b  o = (struct lock
1440: 49 6e 66 6f 2a 29 73 71 6c 69 74 65 48 61 73 68  Info*)sqliteHash
1450: 46 69 6e 64 28 26 6c 6f 63 6b 48 61 73 68 2c 20  Find(&lockHash, 
1460: 26 6b 65 79 2c 20 73 69 7a 65 6f 66 28 6b 65 79  &key, sizeof(key
1470: 29 29 3b 0a 20 20 69 66 28 20 70 49 6e 66 6f 3d  ));.  if( pInfo=
1480: 3d 30 20 29 7b 0a 20 20 20 20 73 74 72 75 63 74  =0 ){.    struct
1490: 20 6c 6f 63 6b 49 6e 66 6f 20 2a 70 4f 6c 64 3b   lockInfo *pOld;
14a0: 0a 20 20 20 20 70 49 6e 66 6f 20 3d 20 73 71 6c  .    pInfo = sql
14b0: 69 74 65 4d 61 6c 6c 6f 63 28 20 73 69 7a 65 6f  iteMalloc( sizeo
14c0: 66 28 2a 70 49 6e 66 6f 29 20 29 3b 0a 20 20 20  f(*pInfo) );.   
14d0: 20 69 66 28 20 70 49 6e 66 6f 3d 3d 30 20 29 20   if( pInfo==0 ) 
14e0: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 70 49  return 0;.    pI
14f0: 6e 66 6f 2d 3e 6b 65 79 20 3d 20 6b 65 79 3b 0a  nfo->key = key;.
1500: 20 20 20 20 70 49 6e 66 6f 2d 3e 6e 52 65 66 20      pInfo->nRef 
1510: 3d 20 31 3b 0a 20 20 20 20 70 49 6e 66 6f 2d 3e  = 1;.    pInfo->
1520: 63 6e 74 20 3d 20 30 3b 0a 20 20 20 20 70 4f 6c  cnt = 0;.    pOl
1530: 64 20 3d 20 73 71 6c 69 74 65 48 61 73 68 49 6e  d = sqliteHashIn
1540: 73 65 72 74 28 26 6c 6f 63 6b 48 61 73 68 2c 20  sert(&lockHash, 
1550: 26 70 49 6e 66 6f 2d 3e 6b 65 79 2c 20 73 69 7a  &pInfo->key, siz
1560: 65 6f 66 28 6b 65 79 29 2c 20 70 49 6e 66 6f 29  eof(key), pInfo)
1570: 3b 0a 20 20 20 20 69 66 28 20 70 4f 6c 64 21 3d  ;.    if( pOld!=
1580: 30 20 29 7b 0a 20 20 20 20 20 20 61 73 73 65 72  0 ){.      asser
1590: 74 28 20 70 4f 6c 64 3d 3d 70 49 6e 66 6f 20 29  t( pOld==pInfo )
15a0: 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 46 72  ;.      sqliteFr
15b0: 65 65 28 70 49 6e 66 6f 29 3b 0a 20 20 20 20 20  ee(pInfo);.     
15c0: 20 70 49 6e 66 6f 20 3d 20 30 3b 0a 20 20 20 20   pInfo = 0;.    
15d0: 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 70  }.  }else{.    p
15e0: 49 6e 66 6f 2d 3e 6e 52 65 66 2b 2b 3b 0a 20 20  Info->nRef++;.  
15f0: 7d 0a 20 20 72 65 74 75 72 6e 20 70 49 6e 66 6f  }.  return pInfo
1600: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 6c 65 61  ;.}../*.** Relea
1610: 73 65 20 61 20 6c 6f 63 6b 49 6e 66 6f 20 73 74  se a lockInfo st
1620: 72 75 63 74 75 72 65 20 70 72 65 76 69 6f 75 73  ructure previous
1630: 6c 79 20 61 6c 6c 6f 63 61 74 65 64 20 62 79 20  ly allocated by 
1640: 66 69 6e 64 4c 6f 63 6b 49 6e 66 6f 28 29 2e 0a  findLockInfo()..
1650: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72  */.static void r
1660: 65 6c 65 61 73 65 4c 6f 63 6b 49 6e 66 6f 28 73  eleaseLockInfo(s
1670: 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20 2a  truct lockInfo *
1680: 70 49 6e 66 6f 29 7b 0a 20 20 70 49 6e 66 6f 2d  pInfo){.  pInfo-
1690: 3e 6e 52 65 66 2d 2d 3b 0a 20 20 69 66 28 20 70  >nRef--;.  if( p
16a0: 49 6e 66 6f 2d 3e 6e 52 65 66 3d 3d 30 20 29 7b  Info->nRef==0 ){
16b0: 0a 20 20 20 20 73 71 6c 69 74 65 48 61 73 68 49  .    sqliteHashI
16c0: 6e 73 65 72 74 28 26 6c 6f 63 6b 48 61 73 68 2c  nsert(&lockHash,
16d0: 20 26 70 49 6e 66 6f 2d 3e 6b 65 79 2c 20 73 69   &pInfo->key, si
16e0: 7a 65 6f 66 28 70 49 6e 66 6f 2d 3e 6b 65 79 29  zeof(pInfo->key)
16f0: 2c 20 30 29 3b 0a 20 20 20 20 73 71 6c 69 74 65  , 0);.    sqlite
1700: 46 72 65 65 28 70 49 6e 66 6f 29 3b 0a 20 20 7d  Free(pInfo);.  }
1710: 0a 7d 0a 23 65 6e 64 69 66 20 20 2f 2a 2a 20 50  .}.#endif  /** P
1720: 4f 53 49 58 20 61 64 76 69 73 6f 72 79 20 6c 6f  OSIX advisory lo
1730: 63 6b 20 77 6f 72 6b 2d 61 72 6f 75 6e 64 20 2a  ck work-around *
1740: 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 49 66 20 77 65 20  */../*.** If we 
1750: 63 6f 6d 70 69 6c 65 20 77 69 74 68 20 74 68 65  compile with the
1760: 20 53 51 4c 49 54 45 5f 54 45 53 54 20 6d 61 63   SQLITE_TEST mac
1770: 72 6f 20 73 65 74 2c 20 74 68 65 6e 20 74 68 65  ro set, then the
1780: 20 66 6f 6c 6c 6f 77 69 6e 67 20 62 6c 6f 63 6b   following block
1790: 0a 2a 2a 20 6f 66 20 63 6f 64 65 20 77 69 6c 6c  .** of code will
17a0: 20 67 69 76 65 20 75 73 20 74 68 65 20 61 62 69   give us the abi
17b0: 6c 69 74 79 20 74 6f 20 73 69 6d 75 6c 61 74 65  lity to simulate
17c0: 20 61 20 64 69 73 6b 20 49 2f 4f 20 65 72 72 6f   a disk I/O erro
17d0: 72 2e 20 20 54 68 69 73 0a 2a 2a 20 69 73 20 75  r.  This.** is u
17e0: 73 65 64 20 66 6f 72 20 74 65 73 74 69 6e 67 20  sed for testing 
17f0: 74 68 65 20 49 2f 4f 20 72 65 63 6f 76 65 72 79  the I/O recovery
1800: 20 6c 6f 67 69 63 2e 0a 2a 2f 0a 23 69 66 64 65   logic..*/.#ifde
1810: 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 69 6e  f SQLITE_TEST.in
1820: 74 20 73 71 6c 69 74 65 5f 69 6f 5f 65 72 72 6f  t sqlite_io_erro
1830: 72 5f 70 65 6e 64 69 6e 67 20 3d 20 30 3b 0a 23  r_pending = 0;.#
1840: 64 65 66 69 6e 65 20 53 69 6d 75 6c 61 74 65 49  define SimulateI
1850: 4f 45 72 72 6f 72 28 41 29 20 20 5c 0a 20 20 20  OError(A)  \.   
1860: 69 66 28 20 73 71 6c 69 74 65 5f 69 6f 5f 65 72  if( sqlite_io_er
1870: 72 6f 72 5f 70 65 6e 64 69 6e 67 20 29 20 5c 0a  ror_pending ) \.
1880: 20 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 5f       if( sqlite_
1890: 69 6f 5f 65 72 72 6f 72 5f 70 65 6e 64 69 6e 67  io_error_pending
18a0: 2d 2d 20 3d 3d 20 31 20 29 7b 20 6c 6f 63 61 6c  -- == 1 ){ local
18b0: 5f 69 6f 65 72 72 28 29 3b 20 72 65 74 75 72 6e  _ioerr(); return
18c0: 20 41 3b 20 7d 0a 73 74 61 74 69 63 20 76 6f 69   A; }.static voi
18d0: 64 20 6c 6f 63 61 6c 5f 69 6f 65 72 72 28 29 7b  d local_ioerr(){
18e0: 0a 20 20 73 71 6c 69 74 65 5f 69 6f 5f 65 72 72  .  sqlite_io_err
18f0: 6f 72 5f 70 65 6e 64 69 6e 67 20 3d 20 30 3b 20  or_pending = 0; 
1900: 20 2f 2a 20 52 65 61 6c 6c 79 20 6a 75 73 74 20   /* Really just 
1910: 61 20 70 6c 61 63 65 20 74 6f 20 73 65 74 20 61  a place to set a
1920: 20 62 72 65 61 6b 70 6f 69 6e 74 20 2a 2f 0a 7d   breakpoint */.}
1930: 0a 23 65 6c 73 65 0a 23 64 65 66 69 6e 65 20 53  .#else.#define S
1940: 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 41  imulateIOError(A
1950: 29 0a 23 65 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a  ).#endif.../*.**
1960: 20 44 65 6c 65 74 65 20 74 68 65 20 6e 61 6d 65   Delete the name
1970: 64 20 66 69 6c 65 0a 2a 2f 0a 69 6e 74 20 73 71  d file.*/.int sq
1980: 6c 69 74 65 4f 73 44 65 6c 65 74 65 28 63 6f 6e  liteOsDelete(con
1990: 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61  st char *zFilena
19a0: 6d 65 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58  me){.#if OS_UNIX
19b0: 0a 20 20 75 6e 6c 69 6e 6b 28 7a 46 69 6c 65 6e  .  unlink(zFilen
19c0: 61 6d 65 29 3b 0a 23 65 6e 64 69 66 0a 23 69 66  ame);.#endif.#if
19d0: 20 4f 53 5f 57 49 4e 0a 20 20 44 65 6c 65 74 65   OS_WIN.  Delete
19e0: 46 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65 29 3b  File(zFilename);
19f0: 0a 23 65 6e 64 69 66 0a 20 20 72 65 74 75 72 6e  .#endif.  return
1a00: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f   SQLITE_OK;.}../
1a10: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52 55 45  *.** Return TRUE
1a20: 20 69 66 20 74 68 65 20 6e 61 6d 65 64 20 66 69   if the named fi
1a30: 6c 65 20 65 78 69 73 74 73 2e 0a 2a 2f 0a 69 6e  le exists..*/.in
1a40: 74 20 73 71 6c 69 74 65 4f 73 46 69 6c 65 45 78  t sqliteOsFileEx
1a50: 69 73 74 73 28 63 6f 6e 73 74 20 63 68 61 72 20  ists(const char 
1a60: 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b 0a 23 69 66  *zFilename){.#if
1a70: 20 4f 53 5f 55 4e 49 58 0a 20 20 72 65 74 75 72   OS_UNIX.  retur
1a80: 6e 20 61 63 63 65 73 73 28 7a 46 69 6c 65 6e 61  n access(zFilena
1a90: 6d 65 2c 20 30 29 3d 3d 30 3b 0a 23 65 6e 64 69  me, 0)==0;.#endi
1aa0: 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 72  f.#if OS_WIN.  r
1ab0: 65 74 75 72 6e 20 47 65 74 46 69 6c 65 41 74 74  eturn GetFileAtt
1ac0: 72 69 62 75 74 65 73 28 7a 46 69 6c 65 6e 61 6d  ributes(zFilenam
1ad0: 65 29 20 21 3d 20 30 78 66 66 66 66 66 66 66 66  e) != 0xffffffff
1ae0: 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a 0a 2f 2a 0a  ;.#endif.}.../*.
1af0: 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f 20 6f 70  ** Attempt to op
1b00: 65 6e 20 61 20 66 69 6c 65 20 66 6f 72 20 62 6f  en a file for bo
1b10: 74 68 20 72 65 61 64 69 6e 67 20 61 6e 64 20 77  th reading and w
1b20: 72 69 74 69 6e 67 2e 20 20 49 66 20 74 68 61 74  riting.  If that
1b30: 0a 2a 2a 20 66 61 69 6c 73 2c 20 74 72 79 20 6f  .** fails, try o
1b40: 70 65 6e 69 6e 67 20 69 74 20 72 65 61 64 2d 6f  pening it read-o
1b50: 6e 6c 79 2e 20 20 49 66 20 74 68 65 20 66 69 6c  nly.  If the fil
1b60: 65 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74  e does not exist
1b70: 2c 0a 2a 2a 20 74 72 79 20 74 6f 20 63 72 65 61  ,.** try to crea
1b80: 74 65 20 69 74 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20  te it..**.** On 
1b90: 73 75 63 63 65 73 73 2c 20 61 20 68 61 6e 64 6c  success, a handl
1ba0: 65 20 66 6f 72 20 74 68 65 20 6f 70 65 6e 20 66  e for the open f
1bb0: 69 6c 65 20 69 73 20 77 72 69 74 74 65 6e 20 74  ile is written t
1bc0: 6f 20 2a 69 64 0a 2a 2a 20 61 6e 64 20 2a 70 52  o *id.** and *pR
1bd0: 65 61 64 6f 6e 6c 79 20 69 73 20 73 65 74 20 74  eadonly is set t
1be0: 6f 20 30 20 69 66 20 74 68 65 20 66 69 6c 65 20  o 0 if the file 
1bf0: 77 61 73 20 6f 70 65 6e 65 64 20 66 6f 72 20 72  was opened for r
1c00: 65 61 64 69 6e 67 20 61 6e 64 0a 2a 2a 20 77 72  eading and.** wr
1c10: 69 74 69 6e 67 20 6f 72 20 31 20 69 66 20 74 68  iting or 1 if th
1c20: 65 20 66 69 6c 65 20 77 61 73 20 6f 70 65 6e 65  e file was opene
1c30: 64 20 72 65 61 64 2d 6f 6e 6c 79 2e 20 20 54 68  d read-only.  Th
1c40: 65 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72  e function retur
1c50: 6e 73 0a 2a 2a 20 53 51 4c 49 54 45 5f 4f 4b 2e  ns.** SQLITE_OK.
1c60: 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66 61 69 6c 75 72  .**.** On failur
1c70: 65 2c 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20  e, the function 
1c80: 72 65 74 75 72 6e 73 20 53 51 4c 49 54 45 5f 43  returns SQLITE_C
1c90: 41 4e 54 4f 50 45 4e 20 61 6e 64 20 6c 65 61 76  ANTOPEN and leav
1ca0: 65 73 0a 2a 2a 20 2a 70 52 65 73 75 6c 73 74 20  es.** *pResulst 
1cb0: 61 6e 64 20 2a 70 52 65 61 64 6f 6e 6c 79 20 75  and *pReadonly u
1cc0: 6e 63 68 61 6e 67 65 64 2e 0a 2a 2f 0a 69 6e 74  nchanged..*/.int
1cd0: 20 73 71 6c 69 74 65 4f 73 4f 70 65 6e 52 65 61   sqliteOsOpenRea
1ce0: 64 57 72 69 74 65 28 0a 20 20 63 6f 6e 73 74 20  dWrite(.  const 
1cf0: 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 2c  char *zFilename,
1d00: 0a 20 20 4f 73 46 69 6c 65 20 2a 69 64 2c 0a 20  .  OsFile *id,. 
1d10: 20 69 6e 74 20 2a 70 52 65 61 64 6f 6e 6c 79 0a   int *pReadonly.
1d20: 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20  ){.#if OS_UNIX. 
1d30: 20 69 64 2d 3e 66 64 20 3d 20 6f 70 65 6e 28 7a   id->fd = open(z
1d40: 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44 57 52  Filename, O_RDWR
1d50: 7c 4f 5f 43 52 45 41 54 2c 20 30 36 34 34 29 3b  |O_CREAT, 0644);
1d60: 0a 20 20 69 66 28 20 69 64 2d 3e 66 64 3c 30 20  .  if( id->fd<0 
1d70: 29 7b 0a 20 20 20 20 69 64 2d 3e 66 64 20 3d 20  ){.    id->fd = 
1d80: 6f 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c 20  open(zFilename, 
1d90: 4f 5f 52 44 4f 4e 4c 59 29 3b 0a 20 20 20 20 69  O_RDONLY);.    i
1da0: 66 28 20 69 64 2d 3e 66 64 3c 30 20 29 7b 0a 20  f( id->fd<0 ){. 
1db0: 20 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49       return SQLI
1dc0: 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 20 0a 20 20  TE_CANTOPEN; .  
1dd0: 20 20 7d 0a 20 20 20 20 2a 70 52 65 61 64 6f 6e    }.    *pReadon
1de0: 6c 79 20 3d 20 31 3b 0a 20 20 7d 65 6c 73 65 7b  ly = 1;.  }else{
1df0: 0a 20 20 20 20 2a 70 52 65 61 64 6f 6e 6c 79 20  .    *pReadonly 
1e00: 3d 20 30 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74  = 0;.  }.  sqlit
1e10: 65 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b  eOsEnterMutex();
1e20: 0a 20 20 69 64 2d 3e 70 4c 6f 63 6b 20 3d 20 66  .  id->pLock = f
1e30: 69 6e 64 4c 6f 63 6b 49 6e 66 6f 28 69 64 2d 3e  indLockInfo(id->
1e40: 66 64 29 3b 0a 20 20 73 71 6c 69 74 65 4f 73 4c  fd);.  sqliteOsL
1e50: 65 61 76 65 4d 75 74 65 78 28 29 3b 0a 20 20 69  eaveMutex();.  i
1e60: 66 28 20 69 64 2d 3e 70 4c 6f 63 6b 3d 3d 30 20  f( id->pLock==0 
1e70: 29 7b 0a 20 20 20 20 63 6c 6f 73 65 28 69 64 2d  ){.    close(id-
1e80: 3e 66 64 29 3b 0a 20 20 20 20 72 65 74 75 72 6e  >fd);.    return
1e90: 20 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20   SQLITE_NOMEM;. 
1ea0: 20 7d 0a 20 20 69 64 2d 3e 6c 6f 63 6b 65 64 20   }.  id->locked 
1eb0: 3d 20 30 3b 0a 20 20 72 65 74 75 72 6e 20 53 51  = 0;.  return SQ
1ec0: 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a  LITE_OK;.#endif.
1ed0: 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 48 41 4e  #if OS_WIN.  HAN
1ee0: 44 4c 45 20 68 20 3d 20 43 72 65 61 74 65 46 69  DLE h = CreateFi
1ef0: 6c 65 28 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20 20  le(zFilename,.  
1f00: 20 20 20 47 45 4e 45 52 49 43 5f 52 45 41 44 20     GENERIC_READ 
1f10: 7c 20 47 45 4e 45 52 49 43 5f 57 52 49 54 45 2c  | GENERIC_WRITE,
1f20: 0a 20 20 20 20 20 46 49 4c 45 5f 53 48 41 52 45  .     FILE_SHARE
1f30: 5f 52 45 41 44 20 7c 20 46 49 4c 45 5f 53 48 41  _READ | FILE_SHA
1f40: 52 45 5f 57 52 49 54 45 2c 0a 20 20 20 20 20 4e  RE_WRITE,.     N
1f50: 55 4c 4c 2c 0a 20 20 20 20 20 4f 50 45 4e 5f 41  ULL,.     OPEN_A
1f60: 4c 57 41 59 53 2c 0a 20 20 20 20 20 46 49 4c 45  LWAYS,.     FILE
1f70: 5f 41 54 54 52 49 42 55 54 45 5f 4e 4f 52 4d 41  _ATTRIBUTE_NORMA
1f80: 4c 20 7c 20 46 49 4c 45 5f 46 4c 41 47 5f 52 41  L | FILE_FLAG_RA
1f90: 4e 44 4f 4d 5f 41 43 43 45 53 53 2c 0a 20 20 20  NDOM_ACCESS,.   
1fa0: 20 20 4e 55 4c 4c 0a 20 20 29 3b 0a 20 20 69 66    NULL.  );.  if
1fb0: 28 20 68 3d 3d 49 4e 56 41 4c 49 44 5f 48 41 4e  ( h==INVALID_HAN
1fc0: 44 4c 45 5f 56 41 4c 55 45 20 29 7b 0a 20 20 20  DLE_VALUE ){.   
1fd0: 20 68 20 3d 20 43 72 65 61 74 65 46 69 6c 65 28   h = CreateFile(
1fe0: 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20 20 20 20 20  zFilename,.     
1ff0: 20 20 47 45 4e 45 52 49 43 5f 52 45 41 44 2c 0a    GENERIC_READ,.
2000: 20 20 20 20 20 20 20 46 49 4c 45 5f 53 48 41 52         FILE_SHAR
2010: 45 5f 52 45 41 44 2c 0a 20 20 20 20 20 20 20 4e  E_READ,.       N
2020: 55 4c 4c 2c 0a 20 20 20 20 20 20 20 4f 50 45 4e  ULL,.       OPEN
2030: 5f 41 4c 57 41 59 53 2c 0a 20 20 20 20 20 20 20  _ALWAYS,.       
2040: 46 49 4c 45 5f 41 54 54 52 49 42 55 54 45 5f 4e  FILE_ATTRIBUTE_N
2050: 4f 52 4d 41 4c 20 7c 20 46 49 4c 45 5f 46 4c 41  ORMAL | FILE_FLA
2060: 47 5f 52 41 4e 44 4f 4d 5f 41 43 43 45 53 53 2c  G_RANDOM_ACCESS,
2070: 0a 20 20 20 20 20 20 20 4e 55 4c 4c 0a 20 20 20  .       NULL.   
2080: 20 29 3b 0a 20 20 20 20 69 66 28 20 68 3d 3d 49   );.    if( h==I
2090: 4e 56 41 4c 49 44 5f 48 41 4e 44 4c 45 5f 56 41  NVALID_HANDLE_VA
20a0: 4c 55 45 20 29 7b 0a 20 20 20 20 20 20 72 65 74  LUE ){.      ret
20b0: 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f  urn SQLITE_CANTO
20c0: 50 45 4e 3b 0a 20 20 20 20 7d 0a 20 20 20 20 2a  PEN;.    }.    *
20d0: 70 52 65 61 64 6f 6e 6c 79 20 3d 20 31 3b 0a 20  pReadonly = 1;. 
20e0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 2a 70 52 65   }else{.    *pRe
20f0: 61 64 6f 6e 6c 79 20 3d 20 30 3b 0a 20 20 7d 0a  adonly = 0;.  }.
2100: 20 20 69 64 2d 3e 68 20 3d 20 68 3b 0a 20 20 69    id->h = h;.  i
2110: 64 2d 3e 6c 6f 63 6b 65 64 20 3d 20 30 3b 0a 20  d->locked = 0;. 
2120: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f   return SQLITE_O
2130: 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a 0a 2f 2a  K;.#endif.}.../*
2140: 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f 20 6f  .** Attempt to o
2150: 70 65 6e 20 61 20 6e 65 77 20 66 69 6c 65 20 66  pen a new file f
2160: 6f 72 20 65 78 63 6c 75 73 69 76 65 20 61 63 63  or exclusive acc
2170: 65 73 73 20 62 79 20 74 68 69 73 20 70 72 6f 63  ess by this proc
2180: 65 73 73 2e 0a 2a 2a 20 54 68 65 20 66 69 6c 65  ess..** The file
2190: 20 77 69 6c 6c 20 62 65 20 6f 70 65 6e 65 64 20   will be opened 
21a0: 66 6f 72 20 62 6f 74 68 20 72 65 61 64 69 6e 67  for both reading
21b0: 20 61 6e 64 20 77 72 69 74 69 6e 67 2e 20 20 54   and writing.  T
21c0: 6f 20 61 76 6f 69 64 0a 2a 2a 20 61 20 70 6f 74  o avoid.** a pot
21d0: 65 6e 74 69 61 6c 20 73 65 63 75 72 69 74 79 20  ential security 
21e0: 70 72 6f 62 6c 65 6d 2c 20 77 65 20 64 6f 20 6e  problem, we do n
21f0: 6f 74 20 61 6c 6c 6f 77 20 74 68 65 20 66 69 6c  ot allow the fil
2200: 65 20 74 6f 20 68 61 76 65 0a 2a 2a 20 70 72 65  e to have.** pre
2210: 76 69 6f 75 73 6c 79 20 65 78 69 73 74 65 64 2e  viously existed.
2220: 20 20 4e 6f 72 20 64 6f 20 77 65 20 61 6c 6c 6f    Nor do we allo
2230: 77 20 74 68 65 20 66 69 6c 65 20 74 6f 20 62 65  w the file to be
2240: 20 61 20 73 79 6d 62 6f 6c 69 63 0a 2a 2a 20 6c   a symbolic.** l
2250: 69 6e 6b 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 64 65  ink..**.** If de
2260: 6c 46 6c 61 67 20 69 73 20 74 72 75 65 2c 20 74  lFlag is true, t
2270: 68 65 6e 20 6d 61 6b 65 20 61 72 72 61 6e 67 65  hen make arrange
2280: 6d 65 6e 74 73 20 74 6f 20 61 75 74 6f 6d 61 74  ments to automat
2290: 69 63 61 6c 6c 79 20 64 65 6c 65 74 65 0a 2a 2a  ically delete.**
22a0: 20 74 68 65 20 66 69 6c 65 20 77 68 65 6e 20 69   the file when i
22b0: 74 20 69 73 20 63 6c 6f 73 65 64 2e 0a 2a 2a 0a  t is closed..**.
22c0: 2a 2a 20 4f 6e 20 73 75 63 63 65 73 73 2c 20 77  ** On success, w
22d0: 72 69 74 65 20 74 68 65 20 66 69 6c 65 20 68 61  rite the file ha
22e0: 6e 64 6c 65 20 69 6e 74 6f 20 2a 69 64 20 61 6e  ndle into *id an
22f0: 64 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f  d return SQLITE_
2300: 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66 61 69  OK..**.** On fai
2310: 6c 75 72 65 2c 20 72 65 74 75 72 6e 20 53 51 4c  lure, return SQL
2320: 49 54 45 5f 43 41 4e 54 4f 50 45 4e 2e 0a 2a 2f  ITE_CANTOPEN..*/
2330: 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 4f 70 65  .int sqliteOsOpe
2340: 6e 45 78 63 6c 75 73 69 76 65 28 63 6f 6e 73 74  nExclusive(const
2350: 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65   char *zFilename
2360: 2c 20 4f 73 46 69 6c 65 20 2a 69 64 2c 20 69 6e  , OsFile *id, in
2370: 74 20 64 65 6c 46 6c 61 67 29 7b 0a 23 69 66 20  t delFlag){.#if 
2380: 4f 53 5f 55 4e 49 58 0a 20 20 69 66 28 20 61 63  OS_UNIX.  if( ac
2390: 63 65 73 73 28 7a 46 69 6c 65 6e 61 6d 65 2c 20  cess(zFilename, 
23a0: 30 29 3d 3d 30 20 29 7b 0a 20 20 20 20 72 65 74  0)==0 ){.    ret
23b0: 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f  urn SQLITE_CANTO
23c0: 50 45 4e 3b 0a 20 20 7d 0a 23 69 66 6e 64 65 66  PEN;.  }.#ifndef
23d0: 20 4f 5f 4e 4f 46 4f 4c 4c 4f 57 0a 23 20 64 65   O_NOFOLLOW.# de
23e0: 66 69 6e 65 20 4f 5f 4e 4f 46 4f 4c 4c 4f 57 20  fine O_NOFOLLOW 
23f0: 30 0a 23 65 6e 64 69 66 0a 20 20 69 64 2d 3e 66  0.#endif.  id->f
2400: 64 20 3d 20 6f 70 65 6e 28 7a 46 69 6c 65 6e 61  d = open(zFilena
2410: 6d 65 2c 20 4f 5f 52 44 57 52 7c 4f 5f 43 52 45  me, O_RDWR|O_CRE
2420: 41 54 7c 4f 5f 45 58 43 4c 7c 4f 5f 4e 4f 46 4f  AT|O_EXCL|O_NOFO
2430: 4c 4c 4f 57 2c 20 30 36 30 30 29 3b 0a 20 20 69  LLOW, 0600);.  i
2440: 66 28 20 69 64 2d 3e 66 64 3c 30 20 29 7b 0a 20  f( id->fd<0 ){. 
2450: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45     return SQLITE
2460: 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20  _CANTOPEN;.  }. 
2470: 20 73 71 6c 69 74 65 4f 73 45 6e 74 65 72 4d 75   sqliteOsEnterMu
2480: 74 65 78 28 29 3b 0a 20 20 69 64 2d 3e 70 4c 6f  tex();.  id->pLo
2490: 63 6b 20 3d 20 66 69 6e 64 4c 6f 63 6b 49 6e 66  ck = findLockInf
24a0: 6f 28 69 64 2d 3e 66 64 29 3b 0a 20 20 73 71 6c  o(id->fd);.  sql
24b0: 69 74 65 4f 73 4c 65 61 76 65 4d 75 74 65 78 28  iteOsLeaveMutex(
24c0: 29 3b 0a 20 20 69 66 28 20 69 64 2d 3e 70 4c 6f  );.  if( id->pLo
24d0: 63 6b 3d 3d 30 20 29 7b 0a 20 20 20 20 63 6c 6f  ck==0 ){.    clo
24e0: 73 65 28 69 64 2d 3e 66 64 29 3b 0a 20 20 20 20  se(id->fd);.    
24f0: 75 6e 6c 69 6e 6b 28 7a 46 69 6c 65 6e 61 6d 65  unlink(zFilename
2500: 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51  );.    return SQ
2510: 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d 0a  LITE_NOMEM;.  }.
2520: 20 20 69 64 2d 3e 6c 6f 63 6b 65 64 20 3d 20 30    id->locked = 0
2530: 3b 0a 20 20 69 66 28 20 64 65 6c 46 6c 61 67 20  ;.  if( delFlag 
2540: 29 7b 0a 20 20 20 20 75 6e 6c 69 6e 6b 28 7a 46  ){.    unlink(zF
2550: 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20  ilename);.  }.  
2560: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b  return SQLITE_OK
2570: 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53 5f  ;.#endif.#if OS_
2580: 57 49 4e 0a 20 20 48 41 4e 44 4c 45 20 68 3b 0a  WIN.  HANDLE h;.
2590: 20 20 69 6e 74 20 66 69 6c 65 66 6c 61 67 73 3b    int fileflags;
25a0: 0a 20 20 69 66 28 20 64 65 6c 46 6c 61 67 20 29  .  if( delFlag )
25b0: 7b 0a 20 20 20 20 66 69 6c 65 66 6c 61 67 73 20  {.    fileflags 
25c0: 3d 20 46 49 4c 45 5f 41 54 54 52 49 42 55 54 45  = FILE_ATTRIBUTE
25d0: 5f 54 45 4d 50 4f 52 41 52 59 20 7c 20 46 49 4c  _TEMPORARY | FIL
25e0: 45 5f 46 4c 41 47 5f 52 41 4e 44 4f 4d 5f 41 43  E_FLAG_RANDOM_AC
25f0: 43 45 53 53 20 0a 20 20 20 20 20 20 20 20 20 20  CESS .          
2600: 20 20 20 20 20 20 20 20 20 20 20 7c 20 46 49 4c             | FIL
2610: 45 5f 46 4c 41 47 5f 44 45 4c 45 54 45 5f 4f 4e  E_FLAG_DELETE_ON
2620: 5f 43 4c 4f 53 45 3b 0a 20 20 7d 65 6c 73 65 7b  _CLOSE;.  }else{
2630: 0a 20 20 20 20 66 69 6c 65 66 6c 61 67 73 20 3d  .    fileflags =
2640: 20 46 49 4c 45 5f 46 4c 41 47 5f 52 41 4e 44 4f   FILE_FLAG_RANDO
2650: 4d 5f 41 43 43 45 53 53 3b 0a 20 20 7d 0a 20 20  M_ACCESS;.  }.  
2660: 68 20 3d 20 43 72 65 61 74 65 46 69 6c 65 28 7a  h = CreateFile(z
2670: 46 69 6c 65 6e 61 6d 65 2c 0a 20 20 20 20 20 47  Filename,.     G
2680: 45 4e 45 52 49 43 5f 52 45 41 44 20 7c 20 47 45  ENERIC_READ | GE
2690: 4e 45 52 49 43 5f 57 52 49 54 45 2c 0a 20 20 20  NERIC_WRITE,.   
26a0: 20 20 30 2c 0a 20 20 20 20 20 4e 55 4c 4c 2c 0a    0,.     NULL,.
26b0: 20 20 20 20 20 43 52 45 41 54 45 5f 41 4c 57 41       CREATE_ALWA
26c0: 59 53 2c 0a 20 20 20 20 20 66 69 6c 65 66 6c 61  YS,.     filefla
26d0: 67 73 2c 0a 20 20 20 20 20 4e 55 4c 4c 0a 20 20  gs,.     NULL.  
26e0: 29 3b 0a 20 20 69 66 28 20 68 3d 3d 49 4e 56 41  );.  if( h==INVA
26f0: 4c 49 44 5f 48 41 4e 44 4c 45 5f 56 41 4c 55 45  LID_HANDLE_VALUE
2700: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53   ){.    return S
2710: 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a  QLITE_CANTOPEN;.
2720: 20 20 7d 0a 20 20 69 64 2d 3e 68 20 3d 20 68 3b    }.  id->h = h;
2730: 0a 20 20 69 64 2d 3e 6c 6f 63 6b 65 64 20 3d 20  .  id->locked = 
2740: 30 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49  0;.  return SQLI
2750: 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a  TE_OK;.#endif.}.
2760: 0a 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74  ./*.** Attempt t
2770: 6f 20 6f 70 65 6e 20 61 20 6e 65 77 20 66 69 6c  o open a new fil
2780: 65 20 66 6f 72 20 72 65 61 64 2d 6f 6e 6c 79 20  e for read-only 
2790: 61 63 63 65 73 73 2e 0a 2a 2a 0a 2a 2a 20 4f 6e  access..**.** On
27a0: 20 73 75 63 63 65 73 73 2c 20 77 72 69 74 65 20   success, write 
27b0: 74 68 65 20 66 69 6c 65 20 68 61 6e 64 6c 65 20  the file handle 
27c0: 69 6e 74 6f 20 2a 69 64 20 61 6e 64 20 72 65 74  into *id and ret
27d0: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a 2a  urn SQLITE_OK..*
27e0: 2a 0a 2a 2a 20 4f 6e 20 66 61 69 6c 75 72 65 2c  *.** On failure,
27f0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43   return SQLITE_C
2800: 41 4e 54 4f 50 45 4e 2e 0a 2a 2f 0a 69 6e 74 20  ANTOPEN..*/.int 
2810: 73 71 6c 69 74 65 4f 73 4f 70 65 6e 52 65 61 64  sqliteOsOpenRead
2820: 4f 6e 6c 79 28 63 6f 6e 73 74 20 63 68 61 72 20  Only(const char 
2830: 2a 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 73 46 69  *zFilename, OsFi
2840: 6c 65 20 2a 69 64 29 7b 0a 23 69 66 20 4f 53 5f  le *id){.#if OS_
2850: 55 4e 49 58 0a 20 20 69 64 2d 3e 66 64 20 3d 20  UNIX.  id->fd = 
2860: 6f 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c 20  open(zFilename, 
2870: 4f 5f 52 44 4f 4e 4c 59 29 3b 0a 20 20 69 66 28  O_RDONLY);.  if(
2880: 20 69 64 2d 3e 66 64 3c 30 20 29 7b 0a 20 20 20   id->fd<0 ){.   
2890: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43   return SQLITE_C
28a0: 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 20 73  ANTOPEN;.  }.  s
28b0: 71 6c 69 74 65 4f 73 45 6e 74 65 72 4d 75 74 65  qliteOsEnterMute
28c0: 78 28 29 3b 0a 20 20 69 64 2d 3e 70 4c 6f 63 6b  x();.  id->pLock
28d0: 20 3d 20 66 69 6e 64 4c 6f 63 6b 49 6e 66 6f 28   = findLockInfo(
28e0: 69 64 2d 3e 66 64 29 3b 0a 20 20 73 71 6c 69 74  id->fd);.  sqlit
28f0: 65 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b  eOsLeaveMutex();
2900: 0a 20 20 69 66 28 20 69 64 2d 3e 70 4c 6f 63 6b  .  if( id->pLock
2910: 3d 3d 30 20 29 7b 0a 20 20 20 20 63 6c 6f 73 65  ==0 ){.    close
2920: 28 69 64 2d 3e 66 64 29 3b 0a 20 20 20 20 72 65  (id->fd);.    re
2930: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d 45  turn SQLITE_NOME
2940: 4d 3b 0a 20 20 7d 0a 20 20 69 64 2d 3e 6c 6f 63  M;.  }.  id->loc
2950: 6b 65 64 20 3d 20 30 3b 0a 20 20 72 65 74 75 72  ked = 0;.  retur
2960: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e  n SQLITE_OK;.#en
2970: 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20  dif.#if OS_WIN. 
2980: 20 48 41 4e 44 4c 45 20 68 20 3d 20 43 72 65 61   HANDLE h = Crea
2990: 74 65 46 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65  teFile(zFilename
29a0: 2c 0a 20 20 20 20 20 47 45 4e 45 52 49 43 5f 52  ,.     GENERIC_R
29b0: 45 41 44 2c 0a 20 20 20 20 20 30 2c 0a 20 20 20  EAD,.     0,.   
29c0: 20 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 4f 50 45    NULL,.     OPE
29d0: 4e 5f 45 58 49 53 54 49 4e 47 2c 0a 20 20 20 20  N_EXISTING,.    
29e0: 20 46 49 4c 45 5f 41 54 54 52 49 42 55 54 45 5f   FILE_ATTRIBUTE_
29f0: 4e 4f 52 4d 41 4c 20 7c 20 46 49 4c 45 5f 46 4c  NORMAL | FILE_FL
2a00: 41 47 5f 52 41 4e 44 4f 4d 5f 41 43 43 45 53 53  AG_RANDOM_ACCESS
2a10: 2c 0a 20 20 20 20 20 4e 55 4c 4c 0a 20 20 29 3b  ,.     NULL.  );
2a20: 0a 20 20 69 66 28 20 68 3d 3d 49 4e 56 41 4c 49  .  if( h==INVALI
2a30: 44 5f 48 41 4e 44 4c 45 5f 56 41 4c 55 45 20 29  D_HANDLE_VALUE )
2a40: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c  {.    return SQL
2a50: 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20  ITE_CANTOPEN;.  
2a60: 7d 0a 20 20 69 64 2d 3e 68 20 3d 20 68 3b 0a 20  }.  id->h = h;. 
2a70: 20 69 64 2d 3e 6c 6f 63 6b 65 64 20 3d 20 30 3b   id->locked = 0;
2a80: 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  .  return SQLITE
2a90: 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f  _OK;.#endif.}../
2aa0: 2a 0a 2a 2a 20 43 72 65 61 74 65 20 61 20 74 65  *.** Create a te
2ab0: 6d 70 6f 72 61 72 79 20 66 69 6c 65 20 6e 61 6d  mporary file nam
2ac0: 65 20 69 6e 20 7a 42 75 66 2e 20 20 7a 42 75 66  e in zBuf.  zBuf
2ad0: 20 6d 75 73 74 20 62 65 20 62 69 67 20 65 6e 6f   must be big eno
2ae0: 75 67 68 20 74 6f 0a 2a 2a 20 68 6f 6c 64 20 61  ugh to.** hold a
2af0: 74 20 6c 65 61 73 74 20 53 51 4c 49 54 45 5f 54  t least SQLITE_T
2b00: 45 4d 50 4e 41 4d 45 5f 53 49 5a 45 20 63 68 61  EMPNAME_SIZE cha
2b10: 72 61 63 74 65 72 73 2e 0a 2a 2f 0a 69 6e 74 20  racters..*/.int 
2b20: 73 71 6c 69 74 65 4f 73 54 65 6d 70 46 69 6c 65  sqliteOsTempFile
2b30: 4e 61 6d 65 28 63 68 61 72 20 2a 7a 42 75 66 29  Name(char *zBuf)
2b40: 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20  {.#if OS_UNIX.  
2b50: 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61  static const cha
2b60: 72 20 2a 61 7a 44 69 72 73 5b 5d 20 3d 20 7b 0a  r *azDirs[] = {.
2b70: 20 20 20 20 20 22 2e 22 2c 0a 20 20 20 20 20 22       ".",.     "
2b80: 2f 76 61 72 2f 74 6d 70 22 2c 0a 20 20 20 20 20  /var/tmp",.     
2b90: 22 2f 75 73 72 2f 74 6d 70 22 2c 0a 20 20 20 20  "/usr/tmp",.    
2ba0: 20 22 2f 74 6d 70 22 2c 0a 20 20 7d 3b 0a 20 20   "/tmp",.  };.  
2bb0: 73 74 61 74 69 63 20 63 68 61 72 20 7a 43 68 61  static char zCha
2bc0: 72 73 5b 5d 20 3d 0a 20 20 20 20 22 61 62 63 64  rs[] =.    "abcd
2bd0: 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74  efghijklmnopqrst
2be0: 75 76 77 78 79 7a 22 0a 20 20 20 20 22 41 42 43  uvwxyz".    "ABC
2bf0: 44 45 46 47 48 49 4a 4b 4c 4d 4e 4f 50 51 52 53  DEFGHIJKLMNOPQRS
2c00: 54 55 56 57 58 59 5a 22 0a 20 20 20 20 22 30 31  TUVWXYZ".    "01
2c10: 32 33 34 35 36 37 38 39 22 3b 0a 20 20 69 6e 74  23456789";.  int
2c20: 20 69 2c 20 6a 3b 0a 20 20 73 74 72 75 63 74 20   i, j;.  struct 
2c30: 73 74 61 74 20 62 75 66 3b 0a 20 20 63 6f 6e 73  stat buf;.  cons
2c40: 74 20 63 68 61 72 20 2a 7a 44 69 72 20 3d 20 22  t char *zDir = "
2c50: 2e 22 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69  .";.  for(i=0; i
2c60: 3c 73 69 7a 65 6f 66 28 61 7a 44 69 72 73 29 2f  <sizeof(azDirs)/
2c70: 73 69 7a 65 6f 66 28 61 7a 44 69 72 73 5b 30 5d  sizeof(azDirs[0]
2c80: 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28  ); i++){.    if(
2c90: 20 73 74 61 74 28 61 7a 44 69 72 73 5b 69 5d 2c   stat(azDirs[i],
2ca0: 20 26 62 75 66 29 20 29 20 63 6f 6e 74 69 6e 75   &buf) ) continu
2cb0: 65 3b 0a 20 20 20 20 69 66 28 20 21 53 5f 49 53  e;.    if( !S_IS
2cc0: 44 49 52 28 62 75 66 2e 73 74 5f 6d 6f 64 65 29  DIR(buf.st_mode)
2cd0: 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20   ) continue;.   
2ce0: 20 69 66 28 20 61 63 63 65 73 73 28 61 7a 44 69   if( access(azDi
2cf0: 72 73 5b 69 5d 2c 20 30 37 29 20 29 20 63 6f 6e  rs[i], 07) ) con
2d00: 74 69 6e 75 65 3b 0a 20 20 20 20 7a 44 69 72 20  tinue;.    zDir 
2d10: 3d 20 61 7a 44 69 72 73 5b 69 5d 3b 0a 20 20 20  = azDirs[i];.   
2d20: 20 62 72 65 61 6b 3b 0a 20 20 7d 0a 20 20 64 6f   break;.  }.  do
2d30: 7b 0a 20 20 20 20 73 70 72 69 6e 74 66 28 7a 42  {.    sprintf(zB
2d40: 75 66 2c 20 22 25 73 2f 73 71 6c 69 74 65 5f 22  uf, "%s/sqlite_"
2d50: 2c 20 7a 44 69 72 29 3b 0a 20 20 20 20 6a 20 3d  , zDir);.    j =
2d60: 20 73 74 72 6c 65 6e 28 7a 42 75 66 29 3b 0a 20   strlen(zBuf);. 
2d70: 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 31 35     for(i=0; i<15
2d80: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 6e  ; i++){.      in
2d90: 74 20 6e 20 3d 20 73 71 6c 69 74 65 52 61 6e 64  t n = sqliteRand
2da0: 6f 6d 42 79 74 65 28 29 20 25 20 28 73 69 7a 65  omByte() % (size
2db0: 6f 66 28 7a 43 68 61 72 73 29 2d 31 29 3b 0a 20  of(zChars)-1);. 
2dc0: 20 20 20 20 20 7a 42 75 66 5b 6a 2b 2b 5d 20 3d       zBuf[j++] =
2dd0: 20 7a 43 68 61 72 73 5b 6e 5d 3b 0a 20 20 20 20   zChars[n];.    
2de0: 7d 0a 20 20 20 20 7a 42 75 66 5b 6a 5d 20 3d 20  }.    zBuf[j] = 
2df0: 30 3b 0a 20 20 7d 77 68 69 6c 65 28 20 61 63 63  0;.  }while( acc
2e00: 65 73 73 28 7a 42 75 66 2c 30 29 3d 3d 30 20 29  ess(zBuf,0)==0 )
2e10: 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53 5f  ;.#endif.#if OS_
2e20: 57 49 4e 0a 20 20 73 74 61 74 69 63 20 63 68 61  WIN.  static cha
2e30: 72 20 7a 43 68 61 72 73 5b 5d 20 3d 0a 20 20 20  r zChars[] =.   
2e40: 20 22 61 62 63 64 65 66 67 68 69 6a 6b 6c 6d 6e   "abcdefghijklmn
2e50: 6f 70 71 72 73 74 75 76 77 78 79 7a 22 0a 20 20  opqrstuvwxyz".  
2e60: 20 20 22 41 42 43 44 45 46 47 48 49 4a 4b 4c 4d    "ABCDEFGHIJKLM
2e70: 4e 4f 50 51 52 53 54 55 56 57 58 59 5a 22 0a 20  NOPQRSTUVWXYZ". 
2e80: 20 20 20 22 30 31 32 33 34 35 36 37 38 39 22 3b     "0123456789";
2e90: 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a 20 20 63  .  int i, j;.  c
2ea0: 68 61 72 20 7a 54 65 6d 70 50 61 74 68 5b 53 51  har zTempPath[SQ
2eb0: 4c 49 54 45 5f 54 45 4d 50 4e 41 4d 45 5f 53 49  LITE_TEMPNAME_SI
2ec0: 5a 45 5d 3b 0a 20 20 47 65 74 54 65 6d 70 50 61  ZE];.  GetTempPa
2ed0: 74 68 28 53 51 4c 49 54 45 5f 54 45 4d 50 4e 41  th(SQLITE_TEMPNA
2ee0: 4d 45 5f 53 49 5a 45 2d 33 30 2c 20 7a 54 65 6d  ME_SIZE-30, zTem
2ef0: 70 50 61 74 68 29 3b 0a 20 20 66 6f 72 28 69 3d  pPath);.  for(i=
2f00: 73 74 72 6c 65 6e 28 7a 54 65 6d 70 50 61 74 68  strlen(zTempPath
2f10: 29 3b 20 69 3e 30 20 26 26 20 7a 54 65 6d 70 50  ); i>0 && zTempP
2f20: 61 74 68 5b 69 2d 31 5d 3d 3d 27 5c 5c 27 3b 20  ath[i-1]=='\\'; 
2f30: 69 2d 2d 29 7b 7d 0a 20 20 7a 54 65 6d 70 50 61  i--){}.  zTempPa
2f40: 74 68 5b 69 5d 20 3d 20 30 3b 0a 20 20 66 6f 72  th[i] = 0;.  for
2f50: 28 3b 3b 29 7b 0a 20 20 20 20 73 70 72 69 6e 74  (;;){.    sprint
2f60: 66 28 7a 42 75 66 2c 20 22 25 73 5c 5c 73 71 6c  f(zBuf, "%s\\sql
2f70: 69 74 65 5f 22 2c 20 7a 54 65 6d 70 50 61 74 68  ite_", zTempPath
2f80: 29 3b 0a 20 20 20 20 6a 20 3d 20 73 74 72 6c 65  );.    j = strle
2f90: 6e 28 7a 42 75 66 29 3b 0a 20 20 20 20 66 6f 72  n(zBuf);.    for
2fa0: 28 69 3d 30 3b 20 69 3c 31 35 3b 20 69 2b 2b 29  (i=0; i<15; i++)
2fb0: 7b 0a 20 20 20 20 20 20 69 6e 74 20 6e 20 3d 20  {.      int n = 
2fc0: 73 71 6c 69 74 65 52 61 6e 64 6f 6d 42 79 74 65  sqliteRandomByte
2fd0: 28 29 20 25 20 73 69 7a 65 6f 66 28 7a 43 68 61  () % sizeof(zCha
2fe0: 72 73 29 3b 0a 20 20 20 20 20 20 7a 42 75 66 5b  rs);.      zBuf[
2ff0: 6a 2b 2b 5d 20 3d 20 7a 43 68 61 72 73 5b 6e 5d  j++] = zChars[n]
3000: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a 42 75 66  ;.    }.    zBuf
3010: 5b 6a 5d 20 3d 20 30 3b 0a 20 20 20 20 69 66 28  [j] = 0;.    if(
3020: 20 21 73 71 6c 69 74 65 4f 73 46 69 6c 65 45 78   !sqliteOsFileEx
3030: 69 73 74 73 28 7a 42 75 66 29 20 29 20 62 72 65  ists(zBuf) ) bre
3040: 61 6b 3b 0a 20 20 7d 0a 23 65 6e 64 69 66 0a 20  ak;.  }.#endif. 
3050: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f   return SQLITE_O
3060: 4b 3b 20 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6c 6f  K; .}../*.** Clo
3070: 73 65 20 61 20 66 69 6c 65 0a 2a 2f 0a 69 6e 74  se a file.*/.int
3080: 20 73 71 6c 69 74 65 4f 73 43 6c 6f 73 65 28 4f   sqliteOsClose(O
3090: 73 46 69 6c 65 20 2a 69 64 29 7b 0a 23 69 66 20  sFile *id){.#if 
30a0: 4f 53 5f 55 4e 49 58 0a 20 20 63 6c 6f 73 65 28  OS_UNIX.  close(
30b0: 69 64 2d 3e 66 64 29 3b 0a 20 20 73 71 6c 69 74  id->fd);.  sqlit
30c0: 65 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b  eOsEnterMutex();
30d0: 0a 20 20 72 65 6c 65 61 73 65 4c 6f 63 6b 49 6e  .  releaseLockIn
30e0: 66 6f 28 69 64 2d 3e 70 4c 6f 63 6b 29 3b 0a 20  fo(id->pLock);. 
30f0: 20 73 71 6c 69 74 65 4f 73 4c 65 61 76 65 4d 75   sqliteOsLeaveMu
3100: 74 65 78 28 29 3b 0a 20 20 72 65 74 75 72 6e 20  tex();.  return 
3110: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69  SQLITE_OK;.#endi
3120: 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 43  f.#if OS_WIN.  C
3130: 6c 6f 73 65 48 61 6e 64 6c 65 28 69 64 2d 3e 68  loseHandle(id->h
3140: 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49  );.  return SQLI
3150: 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a  TE_OK;.#endif.}.
3160: 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 64 61 74 61  ./*.** Read data
3170: 20 66 72 6f 6d 20 61 20 66 69 6c 65 20 69 6e 74   from a file int
3180: 6f 20 61 20 62 75 66 66 65 72 2e 20 20 52 65 74  o a buffer.  Ret
3190: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 20 69 66  urn SQLITE_OK if
31a0: 20 61 6c 6c 0a 2a 2a 20 62 79 74 65 73 20 77 65   all.** bytes we
31b0: 72 65 20 72 65 61 64 20 73 75 63 63 65 73 73 66  re read successf
31c0: 75 6c 6c 79 20 61 6e 64 20 53 51 4c 49 54 45 5f  ully and SQLITE_
31d0: 49 4f 45 52 52 20 69 66 20 61 6e 79 74 68 69 6e  IOERR if anythin
31e0: 67 20 67 6f 65 73 0a 2a 2a 20 77 72 6f 6e 67 2e  g goes.** wrong.
31f0: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73  .*/.int sqliteOs
3200: 52 65 61 64 28 4f 73 46 69 6c 65 20 2a 69 64 2c  Read(OsFile *id,
3210: 20 76 6f 69 64 20 2a 70 42 75 66 2c 20 69 6e 74   void *pBuf, int
3220: 20 61 6d 74 29 7b 0a 23 69 66 20 4f 53 5f 55 4e   amt){.#if OS_UN
3230: 49 58 0a 20 20 69 6e 74 20 67 6f 74 3b 0a 20 20  IX.  int got;.  
3240: 53 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28  SimulateIOError(
3250: 53 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20  SQLITE_IOERR);. 
3260: 20 54 52 41 43 45 32 28 22 52 45 41 44 20 25 64   TRACE2("READ %d
3270: 5c 6e 22 2c 20 6c 61 73 74 5f 70 61 67 65 29 3b  \n", last_page);
3280: 0a 20 20 67 6f 74 20 3d 20 72 65 61 64 28 69 64  .  got = read(id
3290: 2d 3e 66 64 2c 20 70 42 75 66 2c 20 61 6d 74 29  ->fd, pBuf, amt)
32a0: 3b 0a 20 20 69 66 28 20 67 6f 74 3c 30 20 29 20  ;.  if( got<0 ) 
32b0: 67 6f 74 20 3d 20 30 3b 0a 20 20 72 65 74 75 72  got = 0;.  retur
32c0: 6e 20 67 6f 74 3d 3d 61 6d 74 20 3f 20 53 51 4c  n got==amt ? SQL
32d0: 49 54 45 5f 4f 4b 20 3a 20 53 51 4c 49 54 45 5f  ITE_OK : SQLITE_
32e0: 49 4f 45 52 52 3b 0a 23 65 6e 64 69 66 0a 23 69  IOERR;.#endif.#i
32f0: 66 20 4f 53 5f 57 49 4e 0a 20 20 44 57 4f 52 44  f OS_WIN.  DWORD
3300: 20 67 6f 74 3b 0a 20 20 53 69 6d 75 6c 61 74 65   got;.  Simulate
3310: 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f 49  IOError(SQLITE_I
3320: 4f 45 52 52 29 3b 0a 20 20 69 66 28 20 21 52 65  OERR);.  if( !Re
3330: 61 64 46 69 6c 65 28 69 64 2d 3e 68 2c 20 70 42  adFile(id->h, pB
3340: 75 66 2c 20 61 6d 74 2c 20 26 67 6f 74 2c 20 30  uf, amt, &got, 0
3350: 29 20 29 7b 0a 20 20 20 20 67 6f 74 20 3d 20 30  ) ){.    got = 0
3360: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 67  ;.  }.  return g
3370: 6f 74 3d 3d 61 6d 74 20 3f 20 53 51 4c 49 54 45  ot==amt ? SQLITE
3380: 5f 4f 4b 20 3a 20 53 51 4c 49 54 45 5f 49 4f 45  _OK : SQLITE_IOE
3390: 52 52 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a  RR;.#endif.}../*
33a0: 0a 2a 2a 20 57 72 69 74 65 20 64 61 74 61 20 66  .** Write data f
33b0: 72 6f 6d 20 61 20 62 75 66 66 65 72 20 69 6e 74  rom a buffer int
33c0: 6f 20 61 20 66 69 6c 65 2e 20 20 52 65 74 75 72  o a file.  Retur
33d0: 6e 20 53 51 4c 49 54 45 5f 4f 4b 20 6f 6e 20 73  n SQLITE_OK on s
33e0: 75 63 63 65 73 73 0a 2a 2a 20 6f 72 20 73 6f 6d  uccess.** or som
33f0: 65 20 6f 74 68 65 72 20 65 72 72 6f 72 20 63 6f  e other error co
3400: 64 65 20 6f 6e 20 66 61 69 6c 75 72 65 2e 0a 2a  de on failure..*
3410: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 57 72  /.int sqliteOsWr
3420: 69 74 65 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20  ite(OsFile *id, 
3430: 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 42 75 66  const void *pBuf
3440: 2c 20 69 6e 74 20 61 6d 74 29 7b 0a 23 69 66 20  , int amt){.#if 
3450: 4f 53 5f 55 4e 49 58 0a 20 20 69 6e 74 20 77 72  OS_UNIX.  int wr
3460: 6f 74 65 3b 0a 20 20 53 69 6d 75 6c 61 74 65 49  ote;.  SimulateI
3470: 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f 49 4f  OError(SQLITE_IO
3480: 45 52 52 29 3b 0a 20 20 54 52 41 43 45 32 28 22  ERR);.  TRACE2("
3490: 57 52 49 54 45 20 25 64 5c 6e 22 2c 20 6c 61 73  WRITE %d\n", las
34a0: 74 5f 70 61 67 65 29 3b 0a 20 20 77 72 6f 74 65  t_page);.  wrote
34b0: 20 3d 20 77 72 69 74 65 28 69 64 2d 3e 66 64 2c   = write(id->fd,
34c0: 20 70 42 75 66 2c 20 61 6d 74 29 3b 0a 20 20 69   pBuf, amt);.  i
34d0: 66 28 20 77 72 6f 74 65 3c 61 6d 74 20 29 20 72  f( wrote<amt ) r
34e0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 46 55 4c  eturn SQLITE_FUL
34f0: 4c 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49  L;.  return SQLI
3500: 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 23 69  TE_OK;.#endif.#i
3510: 66 20 4f 53 5f 57 49 4e 0a 20 20 44 57 4f 52 44  f OS_WIN.  DWORD
3520: 20 77 72 6f 74 65 3b 0a 20 20 53 69 6d 75 6c 61   wrote;.  Simula
3530: 74 65 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45  teIOError(SQLITE
3540: 5f 49 4f 45 52 52 29 3b 0a 20 20 69 66 28 20 21  _IOERR);.  if( !
3550: 57 72 69 74 65 46 69 6c 65 28 69 64 2d 3e 68 2c  WriteFile(id->h,
3560: 20 70 42 75 66 2c 20 61 6d 74 2c 20 26 77 72 6f   pBuf, amt, &wro
3570: 74 65 2c 20 30 29 20 7c 7c 20 28 69 6e 74 29 77  te, 0) || (int)w
3580: 72 6f 74 65 3c 61 6d 74 20 29 7b 0a 20 20 20 20  rote<amt ){.    
3590: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 46 55  return SQLITE_FU
35a0: 4c 4c 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e  LL;.  }.  return
35b0: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64   SQLITE_OK;.#end
35c0: 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4d 6f 76 65  if.}../*.** Move
35d0: 20 74 68 65 20 72 65 61 64 2f 77 72 69 74 65 20   the read/write 
35e0: 70 6f 69 6e 74 65 72 20 69 6e 20 61 20 66 69 6c  pointer in a fil
35f0: 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  e..*/.int sqlite
3600: 4f 73 53 65 65 6b 28 4f 73 46 69 6c 65 20 2a 69  OsSeek(OsFile *i
3610: 64 2c 20 69 6e 74 20 6f 66 66 73 65 74 29 7b 0a  d, int offset){.
3620: 20 20 53 45 45 4b 28 6f 66 66 73 65 74 2f 31 30    SEEK(offset/10
3630: 32 34 20 2b 20 31 29 3b 0a 23 69 66 20 4f 53 5f  24 + 1);.#if OS_
3640: 55 4e 49 58 0a 20 20 6c 73 65 65 6b 28 69 64 2d  UNIX.  lseek(id-
3650: 3e 66 64 2c 20 6f 66 66 73 65 74 2c 20 53 45 45  >fd, offset, SEE
3660: 4b 5f 53 45 54 29 3b 0a 20 20 72 65 74 75 72 6e  K_SET);.  return
3670: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64   SQLITE_OK;.#end
3680: 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20  if.#if OS_WIN.  
3690: 53 65 74 46 69 6c 65 50 6f 69 6e 74 65 72 28 69  SetFilePointer(i
36a0: 64 2d 3e 68 2c 20 6f 66 66 73 65 74 2c 20 30 2c  d->h, offset, 0,
36b0: 20 46 49 4c 45 5f 42 45 47 49 4e 29 3b 0a 20 20   FILE_BEGIN);.  
36c0: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b  return SQLITE_OK
36d0: 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a  ;.#endif.}../*.*
36e0: 2a 20 4d 61 6b 65 20 73 75 72 65 20 61 6c 6c 20  * Make sure all 
36f0: 77 72 69 74 65 73 20 74 6f 20 61 20 70 61 72 74  writes to a part
3700: 69 63 75 6c 61 72 20 66 69 6c 65 20 61 72 65 20  icular file are 
3710: 63 6f 6d 6d 69 74 74 65 64 20 74 6f 20 64 69 73  committed to dis
3720: 6b 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  k..*/.int sqlite
3730: 4f 73 53 79 6e 63 28 4f 73 46 69 6c 65 20 2a 69  OsSync(OsFile *i
3740: 64 29 7b 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f  d){.  SimulateIO
3750: 45 72 72 6f 72 28 53 51 4c 49 54 45 5f 49 4f 45  Error(SQLITE_IOE
3760: 52 52 29 3b 0a 20 20 54 52 41 43 45 31 28 22 53  RR);.  TRACE1("S
3770: 59 4e 43 5c 6e 22 29 3b 0a 23 69 66 20 4f 53 5f  YNC\n");.#if OS_
3780: 55 4e 49 58 0a 20 20 72 65 74 75 72 6e 20 66 73  UNIX.  return fs
3790: 79 6e 63 28 69 64 2d 3e 66 64 29 3d 3d 30 20 3f  ync(id->fd)==0 ?
37a0: 20 53 51 4c 49 54 45 5f 4f 4b 20 3a 20 53 51 4c   SQLITE_OK : SQL
37b0: 49 54 45 5f 49 4f 45 52 52 3b 0a 23 65 6e 64 69  ITE_IOERR;.#endi
37c0: 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 72  f.#if OS_WIN.  r
37d0: 65 74 75 72 6e 20 46 6c 75 73 68 46 69 6c 65 42  eturn FlushFileB
37e0: 75 66 66 65 72 73 28 69 64 2d 3e 68 29 20 3f 20  uffers(id->h) ? 
37f0: 53 51 4c 49 54 45 5f 4f 4b 20 3a 20 53 51 4c 49  SQLITE_OK : SQLI
3800: 54 45 5f 49 4f 45 52 52 3b 0a 23 65 6e 64 69 66  TE_IOERR;.#endif
3810: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 72 75 6e 63 61  .}../*.** Trunca
3820: 74 65 20 61 6e 20 6f 70 65 6e 20 66 69 6c 65 20  te an open file 
3830: 74 6f 20 61 20 73 70 65 63 69 66 69 65 64 20 73  to a specified s
3840: 69 7a 65 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74  ize.*/.int sqlit
3850: 65 4f 73 54 72 75 6e 63 61 74 65 28 4f 73 46 69  eOsTruncate(OsFi
3860: 6c 65 20 2a 69 64 2c 20 69 6e 74 20 6e 42 79 74  le *id, int nByt
3870: 65 29 7b 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f  e){.  SimulateIO
3880: 45 72 72 6f 72 28 53 51 4c 49 54 45 5f 49 4f 45  Error(SQLITE_IOE
3890: 52 52 29 3b 0a 23 69 66 20 4f 53 5f 55 4e 49 58  RR);.#if OS_UNIX
38a0: 0a 20 20 72 65 74 75 72 6e 20 66 74 72 75 6e 63  .  return ftrunc
38b0: 61 74 65 28 69 64 2d 3e 66 64 2c 20 6e 42 79 74  ate(id->fd, nByt
38c0: 65 29 3d 3d 30 20 3f 20 53 51 4c 49 54 45 5f 4f  e)==0 ? SQLITE_O
38d0: 4b 20 3a 20 53 51 4c 49 54 45 5f 49 4f 45 52 52  K : SQLITE_IOERR
38e0: 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53 5f  ;.#endif.#if OS_
38f0: 57 49 4e 0a 20 20 53 65 74 46 69 6c 65 50 6f 69  WIN.  SetFilePoi
3900: 6e 74 65 72 28 69 64 2d 3e 68 2c 20 6e 42 79 74  nter(id->h, nByt
3910: 65 2c 20 30 2c 20 46 49 4c 45 5f 42 45 47 49 4e  e, 0, FILE_BEGIN
3920: 29 3b 0a 20 20 53 65 74 45 6e 64 4f 66 46 69 6c  );.  SetEndOfFil
3930: 65 28 69 64 2d 3e 68 29 3b 0a 20 20 72 65 74 75  e(id->h);.  retu
3940: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65  rn SQLITE_OK;.#e
3950: 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 44 65  ndif.}../*.** De
3960: 74 65 72 6d 69 6e 65 20 74 68 65 20 63 75 72 72  termine the curr
3970: 65 6e 74 20 73 69 7a 65 20 6f 66 20 61 20 66 69  ent size of a fi
3980: 6c 65 20 69 6e 20 62 79 74 65 73 0a 2a 2f 0a 69  le in bytes.*/.i
3990: 6e 74 20 73 71 6c 69 74 65 4f 73 46 69 6c 65 53  nt sqliteOsFileS
39a0: 69 7a 65 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20  ize(OsFile *id, 
39b0: 69 6e 74 20 2a 70 53 69 7a 65 29 7b 0a 23 69 66  int *pSize){.#if
39c0: 20 4f 53 5f 55 4e 49 58 0a 20 20 73 74 72 75 63   OS_UNIX.  struc
39d0: 74 20 73 74 61 74 20 62 75 66 3b 0a 20 20 53 69  t stat buf;.  Si
39e0: 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53 51  mulateIOError(SQ
39f0: 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20 69  LITE_IOERR);.  i
3a00: 66 28 20 66 73 74 61 74 28 69 64 2d 3e 66 64 2c  f( fstat(id->fd,
3a10: 20 26 62 75 66 29 21 3d 30 20 29 7b 0a 20 20 20   &buf)!=0 ){.   
3a20: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 49   return SQLITE_I
3a30: 4f 45 52 52 3b 0a 20 20 7d 0a 20 20 2a 70 53 69  OERR;.  }.  *pSi
3a40: 7a 65 20 3d 20 62 75 66 2e 73 74 5f 73 69 7a 65  ze = buf.st_size
3a50: 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  ;.  return SQLIT
3a60: 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 23 69 66  E_OK;.#endif.#if
3a70: 20 4f 53 5f 57 49 4e 0a 20 20 53 69 6d 75 6c 61   OS_WIN.  Simula
3a80: 74 65 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45  teIOError(SQLITE
3a90: 5f 49 4f 45 52 52 29 3b 0a 20 20 2a 70 53 69 7a  _IOERR);.  *pSiz
3aa0: 65 20 3d 20 47 65 74 46 69 6c 65 53 69 7a 65 28  e = GetFileSize(
3ab0: 69 64 2d 3e 68 2c 20 30 29 3b 0a 20 20 72 65 74  id->h, 0);.  ret
3ac0: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23  urn SQLITE_OK;.#
3ad0: 65 6e 64 69 66 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20  endif.}.../*.** 
3ae0: 43 68 61 6e 67 65 20 74 68 65 20 73 74 61 74 75  Change the statu
3af0: 73 20 6f 66 20 74 68 65 20 6c 6f 63 6b 20 6f 6e  s of the lock on
3b00: 20 74 68 65 20 66 69 6c 65 20 22 69 64 22 20 74   the file "id" t
3b10: 6f 20 62 65 20 61 20 72 65 61 64 6c 6f 63 6b 2e  o be a readlock.
3b20: 0a 2a 2a 20 49 66 20 74 68 65 20 66 69 6c 65 20  .** If the file 
3b30: 77 61 73 20 77 72 69 74 65 20 6c 6f 63 6b 65 64  was write locked
3b40: 2c 20 74 68 65 6e 20 74 68 69 73 20 72 65 64 75  , then this redu
3b50: 63 65 73 20 74 68 65 20 6c 6f 63 6b 20 74 6f 20  ces the lock to 
3b60: 61 20 72 65 61 64 2e 0a 2a 2a 20 49 66 20 74 68  a read..** If th
3b70: 65 20 66 69 6c 65 20 77 61 73 20 72 65 61 64 20  e file was read 
3b80: 6c 6f 63 6b 65 64 2c 20 74 68 65 6e 20 74 68 69  locked, then thi
3b90: 73 20 61 63 71 75 69 72 65 73 20 61 20 6e 65 77  s acquires a new
3ba0: 20 72 65 61 64 20 6c 6f 63 6b 2e 0a 2a 2a 0a 2a   read lock..**.*
3bb0: 2a 20 52 65 74 75 72 6e 20 53 51 4c 49 54 45 5f  * Return SQLITE_
3bc0: 4f 4b 20 6f 6e 20 73 75 63 63 65 73 73 20 61 6e  OK on success an
3bd0: 64 20 53 51 4c 49 54 45 5f 42 55 53 59 20 6f 6e  d SQLITE_BUSY on
3be0: 20 66 61 69 6c 75 72 65 2e 0a 2a 2f 0a 69 6e 74   failure..*/.int
3bf0: 20 73 71 6c 69 74 65 4f 73 52 65 61 64 4c 6f 63   sqliteOsReadLoc
3c00: 6b 28 4f 73 46 69 6c 65 20 2a 69 64 29 7b 0a 23  k(OsFile *id){.#
3c10: 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 69 6e 74  if OS_UNIX.  int
3c20: 20 72 63 3b 0a 20 20 73 71 6c 69 74 65 4f 73 45   rc;.  sqliteOsE
3c30: 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a 20 20 69  nterMutex();.  i
3c40: 66 28 20 69 64 2d 3e 70 4c 6f 63 6b 2d 3e 63 6e  f( id->pLock->cn
3c50: 74 3e 30 20 29 7b 0a 20 20 20 20 69 66 28 20 21  t>0 ){.    if( !
3c60: 69 64 2d 3e 6c 6f 63 6b 65 64 20 29 7b 0a 20 20  id->locked ){.  
3c70: 20 20 20 20 69 64 2d 3e 70 4c 6f 63 6b 2d 3e 63      id->pLock->c
3c80: 6e 74 2b 2b 3b 0a 20 20 20 20 20 20 69 64 2d 3e  nt++;.      id->
3c90: 6c 6f 63 6b 65 64 20 3d 20 31 3b 0a 20 20 20 20  locked = 1;.    
3ca0: 7d 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54  }.    rc = SQLIT
3cb0: 45 5f 4f 4b 3b 0a 20 20 7d 65 6c 73 65 20 69 66  E_OK;.  }else if
3cc0: 28 20 69 64 2d 3e 6c 6f 63 6b 65 64 20 7c 7c 20  ( id->locked || 
3cd0: 69 64 2d 3e 70 4c 6f 63 6b 2d 3e 63 6e 74 3d 3d  id->pLock->cnt==
3ce0: 30 20 29 7b 0a 20 20 20 20 73 74 72 75 63 74 20  0 ){.    struct 
3cf0: 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 0a 20 20 20 20  flock lock;.    
3d00: 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d 20 46 5f  lock.l_type = F_
3d10: 52 44 4c 43 4b 3b 0a 20 20 20 20 6c 6f 63 6b 2e  RDLCK;.    lock.
3d20: 6c 5f 77 68 65 6e 63 65 20 3d 20 53 45 45 4b 5f  l_whence = SEEK_
3d30: 53 45 54 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f  SET;.    lock.l_
3d40: 73 74 61 72 74 20 3d 20 6c 6f 63 6b 2e 6c 5f 6c  start = lock.l_l
3d50: 65 6e 20 3d 20 30 4c 3b 0a 20 20 20 20 69 66 28  en = 0L;.    if(
3d60: 20 66 63 6e 74 6c 28 69 64 2d 3e 66 64 2c 20 46   fcntl(id->fd, F
3d70: 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 21 3d  _SETLK, &lock)!=
3d80: 30 20 29 7b 0a 20 20 20 20 20 20 72 63 20 3d 20  0 ){.      rc = 
3d90: 53 51 4c 49 54 45 5f 42 55 53 59 3b 0a 20 20 20  SQLITE_BUSY;.   
3da0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 72 63   }else{.      rc
3db0: 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20   = SQLITE_OK;.  
3dc0: 20 20 20 20 69 64 2d 3e 70 4c 6f 63 6b 2d 3e 63      id->pLock->c
3dd0: 6e 74 20 3d 20 31 3b 0a 20 20 20 20 20 20 69 64  nt = 1;.      id
3de0: 2d 3e 6c 6f 63 6b 65 64 20 3d 20 31 3b 0a 20 20  ->locked = 1;.  
3df0: 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20    }.  }else{.   
3e00: 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 42 55 53   rc = SQLITE_BUS
3e10: 59 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 4f  Y;.  }.  sqliteO
3e20: 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b 0a 20  sLeaveMutex();. 
3e30: 20 72 65 74 75 72 6e 20 72 63 3b 0a 23 65 6e 64   return rc;.#end
3e40: 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20  if.#if OS_WIN.  
3e50: 69 6e 74 20 72 63 3b 0a 20 20 69 66 28 20 69 64  int rc;.  if( id
3e60: 2d 3e 6c 6f 63 6b 65 64 20 29 7b 0a 20 20 20 20  ->locked ){.    
3e70: 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  rc = SQLITE_OK;.
3e80: 20 20 7d 65 6c 73 65 20 69 66 28 20 4c 6f 63 6b    }else if( Lock
3e90: 46 69 6c 65 28 69 64 2d 3e 68 2c 20 30 2c 20 30  File(id->h, 0, 0
3ea0: 2c 20 31 30 32 34 2c 20 30 29 20 29 7b 0a 20 20  , 1024, 0) ){.  
3eb0: 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b    rc = SQLITE_OK
3ec0: 3b 0a 20 20 20 20 69 64 2d 3e 6c 6f 63 6b 65 64  ;.    id->locked
3ed0: 20 3d 20 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20   = 1;.  }else{. 
3ee0: 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 42     rc = SQLITE_B
3ef0: 55 53 59 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72  USY;.  }.  retur
3f00: 6e 20 72 63 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a  n rc;.#endif.}..
3f10: 2f 2a 0a 2a 2a 20 43 68 61 6e 67 65 20 74 68 65  /*.** Change the
3f20: 20 6c 6f 63 6b 20 73 74 61 74 75 73 20 74 6f 20   lock status to 
3f30: 62 65 20 61 6e 20 65 78 63 6c 75 73 69 76 65 20  be an exclusive 
3f40: 6f 72 20 77 72 69 74 65 20 6c 6f 63 6b 2e 20 20  or write lock.  
3f50: 52 65 74 75 72 6e 0a 2a 2a 20 53 51 4c 49 54 45  Return.** SQLITE
3f60: 5f 4f 4b 20 6f 6e 20 73 75 63 63 65 73 73 20 61  _OK on success a
3f70: 6e 64 20 53 51 4c 49 54 45 5f 42 55 53 59 20 6f  nd SQLITE_BUSY o
3f80: 6e 20 61 20 66 61 69 6c 75 72 65 2e 0a 2a 2f 0a  n a failure..*/.
3f90: 69 6e 74 20 73 71 6c 69 74 65 4f 73 57 72 69 74  int sqliteOsWrit
3fa0: 65 4c 6f 63 6b 28 4f 73 46 69 6c 65 20 2a 69 64  eLock(OsFile *id
3fb0: 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20  ){.#if OS_UNIX. 
3fc0: 20 69 6e 74 20 72 63 3b 0a 20 20 73 71 6c 69 74   int rc;.  sqlit
3fd0: 65 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b  eOsEnterMutex();
3fe0: 0a 20 20 69 66 28 20 69 64 2d 3e 70 4c 6f 63 6b  .  if( id->pLock
3ff0: 2d 3e 63 6e 74 3d 3d 30 20 7c 7c 20 28 69 64 2d  ->cnt==0 || (id-
4000: 3e 70 4c 6f 63 6b 2d 3e 63 6e 74 3d 3d 31 20 26  >pLock->cnt==1 &
4010: 26 20 69 64 2d 3e 6c 6f 63 6b 65 64 3d 3d 31 29  & id->locked==1)
4020: 20 29 7b 0a 20 20 20 20 73 74 72 75 63 74 20 66   ){.    struct f
4030: 6c 6f 63 6b 20 6c 6f 63 6b 3b 0a 20 20 20 20 6c  lock lock;.    l
4040: 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d 20 46 5f 57  ock.l_type = F_W
4050: 52 4c 43 4b 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c  RLCK;.    lock.l
4060: 5f 77 68 65 6e 63 65 20 3d 20 53 45 45 4b 5f 53  _whence = SEEK_S
4070: 45 54 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73  ET;.    lock.l_s
4080: 74 61 72 74 20 3d 20 6c 6f 63 6b 2e 6c 5f 6c 65  tart = lock.l_le
4090: 6e 20 3d 20 30 4c 3b 0a 20 20 20 20 69 66 28 20  n = 0L;.    if( 
40a0: 66 63 6e 74 6c 28 69 64 2d 3e 66 64 2c 20 46 5f  fcntl(id->fd, F_
40b0: 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 21 3d 30  SETLK, &lock)!=0
40c0: 20 29 7b 0a 20 20 20 20 20 20 72 63 20 3d 20 53   ){.      rc = S
40d0: 51 4c 49 54 45 5f 42 55 53 59 3b 0a 20 20 20 20  QLITE_BUSY;.    
40e0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 72 63 20  }else{.      rc 
40f0: 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 20  = SQLITE_OK;.   
4100: 20 20 20 69 64 2d 3e 70 4c 6f 63 6b 2d 3e 63 6e     id->pLock->cn
4110: 74 20 3d 20 2d 31 3b 0a 20 20 20 20 20 20 69 64  t = -1;.      id
4120: 2d 3e 6c 6f 63 6b 65 64 20 3d 20 31 3b 0a 20 20  ->locked = 1;.  
4130: 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20    }.  }else{.   
4140: 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 42 55 53   rc = SQLITE_BUS
4150: 59 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 4f  Y;.  }.  sqliteO
4160: 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b 0a 20  sLeaveMutex();. 
4170: 20 72 65 74 75 72 6e 20 72 63 3b 0a 23 65 6e 64   return rc;.#end
4180: 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20  if.#if OS_WIN.  
4190: 69 6e 74 20 72 63 3b 0a 20 20 69 66 28 20 69 64  int rc;.  if( id
41a0: 2d 3e 6c 6f 63 6b 65 64 20 29 7b 0a 20 20 20 20  ->locked ){.    
41b0: 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  rc = SQLITE_OK;.
41c0: 20 20 7d 65 6c 73 65 20 69 66 28 20 4c 6f 63 6b    }else if( Lock
41d0: 46 69 6c 65 28 69 64 2d 3e 68 2c 20 30 2c 20 30  File(id->h, 0, 0
41e0: 2c 20 31 30 32 34 2c 20 30 29 20 29 7b 0a 20 20  , 1024, 0) ){.  
41f0: 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b    rc = SQLITE_OK
4200: 3b 0a 20 20 20 20 69 64 2d 3e 6c 6f 63 6b 65 64  ;.    id->locked
4210: 20 3d 20 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20   = 1;.  }else{. 
4220: 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 42     rc = SQLITE_B
4230: 55 53 59 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72  USY;.  }.  retur
4240: 6e 20 72 63 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a  n rc;.#endif.}..
4250: 2f 2a 0a 2a 2a 20 55 6e 6c 6f 63 6b 20 74 68 65  /*.** Unlock the
4260: 20 67 69 76 65 6e 20 66 69 6c 65 20 64 65 73 63   given file desc
4270: 72 69 70 74 6f 72 2e 20 20 49 66 20 74 68 65 20  riptor.  If the 
4280: 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20  file descriptor 
4290: 77 61 73 0a 2a 2a 20 6e 6f 74 20 70 72 65 76 69  was.** not previ
42a0: 6f 75 73 6c 79 20 6c 6f 63 6b 65 64 2c 20 74 68  ously locked, th
42b0: 65 6e 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20  en this routine 
42c0: 69 73 20 61 20 6e 6f 2d 6f 70 2e 0a 2a 2f 0a 69  is a no-op..*/.i
42d0: 6e 74 20 73 71 6c 69 74 65 4f 73 55 6e 6c 6f 63  nt sqliteOsUnloc
42e0: 6b 28 4f 73 46 69 6c 65 20 2a 69 64 29 7b 0a 23  k(OsFile *id){.#
42f0: 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 69 6e 74  if OS_UNIX.  int
4300: 20 72 63 3b 0a 20 20 69 66 28 20 21 69 64 2d 3e   rc;.  if( !id->
4310: 6c 6f 63 6b 65 64 20 29 20 72 65 74 75 72 6e 20  locked ) return 
4320: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 73 71 6c  SQLITE_OK;.  sql
4330: 69 74 65 4f 73 45 6e 74 65 72 4d 75 74 65 78 28  iteOsEnterMutex(
4340: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 69 64 2d  );.  assert( id-
4350: 3e 70 4c 6f 63 6b 2d 3e 63 6e 74 21 3d 30 20 29  >pLock->cnt!=0 )
4360: 3b 0a 20 20 69 66 28 20 69 64 2d 3e 70 4c 6f 63  ;.  if( id->pLoc
4370: 6b 2d 3e 63 6e 74 3e 31 20 29 7b 0a 20 20 20 20  k->cnt>1 ){.    
4380: 69 64 2d 3e 70 4c 6f 63 6b 2d 3e 63 6e 74 2d 2d  id->pLock->cnt--
4390: 3b 0a 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54  ;.    rc = SQLIT
43a0: 45 5f 4f 4b 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20  E_OK;.  }else{. 
43b0: 20 20 20 73 74 72 75 63 74 20 66 6c 6f 63 6b 20     struct flock 
43c0: 6c 6f 63 6b 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c  lock;.    lock.l
43d0: 5f 74 79 70 65 20 3d 20 46 5f 55 4e 4c 43 4b 3b  _type = F_UNLCK;
43e0: 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e  .    lock.l_when
43f0: 63 65 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 20  ce = SEEK_SET;. 
4400: 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20     lock.l_start 
4410: 3d 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 30  = lock.l_len = 0
4420: 4c 3b 0a 20 20 20 20 69 66 28 20 66 63 6e 74 6c  L;.    if( fcntl
4430: 28 69 64 2d 3e 66 64 2c 20 46 5f 53 45 54 4c 4b  (id->fd, F_SETLK
4440: 2c 20 26 6c 6f 63 6b 29 21 3d 30 20 29 7b 0a 20  , &lock)!=0 ){. 
4450: 20 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45       rc = SQLITE
4460: 5f 42 55 53 59 3b 0a 20 20 20 20 7d 65 6c 73 65  _BUSY;.    }else
4470: 7b 0a 20 20 20 20 20 20 72 63 20 3d 20 53 51 4c  {.      rc = SQL
4480: 49 54 45 5f 4f 4b 3b 0a 20 20 20 20 20 20 69 64  ITE_OK;.      id
4490: 2d 3e 70 4c 6f 63 6b 2d 3e 63 6e 74 20 3d 20 30  ->pLock->cnt = 0
44a0: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 73 71  ;.    }.  }.  sq
44b0: 6c 69 74 65 4f 73 4c 65 61 76 65 4d 75 74 65 78  liteOsLeaveMutex
44c0: 28 29 3b 0a 20 20 69 64 2d 3e 6c 6f 63 6b 65 64  ();.  id->locked
44d0: 20 3d 20 30 3b 0a 20 20 72 65 74 75 72 6e 20 72   = 0;.  return r
44e0: 63 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53  c;.#endif.#if OS
44f0: 5f 57 49 4e 0a 20 20 69 6e 74 20 72 63 3b 0a 20  _WIN.  int rc;. 
4500: 20 69 66 28 20 21 69 64 2d 3e 6c 6f 63 6b 65 64   if( !id->locked
4510: 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 53 51 4c   ){.    rc = SQL
4520: 49 54 45 5f 4f 4b 3b 0a 20 20 7d 65 6c 73 65 20  ITE_OK;.  }else 
4530: 69 66 28 20 55 6e 6c 6f 63 6b 46 69 6c 65 28 69  if( UnlockFile(i
4540: 64 2d 3e 68 2c 20 30 2c 20 30 2c 20 31 30 32 34  d->h, 0, 0, 1024
4550: 2c 20 30 29 20 29 7b 0a 20 20 20 20 72 63 20 3d  , 0) ){.    rc =
4560: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 20 20   SQLITE_OK;.    
4570: 69 64 2d 3e 6c 6f 63 6b 65 64 20 3d 20 30 3b 0a  id->locked = 0;.
4580: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63 20    }else{.    rc 
4590: 3d 20 53 51 4c 49 54 45 5f 42 55 53 59 3b 0a 20  = SQLITE_BUSY;. 
45a0: 20 7d 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a   }.  return rc;.
45b0: 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  #endif.}../*.** 
45c0: 47 65 74 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20  Get information 
45d0: 74 6f 20 73 65 65 64 20 74 68 65 20 72 61 6e 64  to seed the rand
45e0: 6f 6d 20 6e 75 6d 62 65 72 20 67 65 6e 65 72 61  om number genera
45f0: 74 6f 72 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  tor..*/.int sqli
4600: 74 65 4f 73 52 61 6e 64 6f 6d 53 65 65 64 28 63  teOsRandomSeed(c
4610: 68 61 72 20 2a 7a 42 75 66 29 7b 0a 20 20 73 74  har *zBuf){.  st
4620: 61 74 69 63 20 69 6e 74 20 6f 6e 63 65 20 3d 20  atic int once = 
4630: 31 3b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20  1;.#if OS_UNIX. 
4640: 20 69 6e 74 20 70 69 64 3b 0a 20 20 74 69 6d 65   int pid;.  time
4650: 28 28 74 69 6d 65 5f 74 2a 29 7a 42 75 66 29 3b  ((time_t*)zBuf);
4660: 0a 20 20 70 69 64 20 3d 20 67 65 74 70 69 64 28  .  pid = getpid(
4670: 29 3b 0a 20 20 6d 65 6d 63 70 79 28 26 7a 42 75  );.  memcpy(&zBu
4680: 66 5b 73 69 7a 65 6f 66 28 74 69 6d 65 5f 74 29  f[sizeof(time_t)
4690: 5d 2c 20 26 70 69 64 2c 20 73 69 7a 65 6f 66 28  ], &pid, sizeof(
46a0: 70 69 64 29 29 3b 0a 23 65 6e 64 69 66 0a 23 69  pid));.#endif.#i
46b0: 66 20 4f 53 5f 57 49 4e 0a 20 20 47 65 74 53 79  f OS_WIN.  GetSy
46c0: 73 74 65 6d 54 69 6d 65 28 28 4c 50 53 59 53 54  stemTime((LPSYST
46d0: 45 4d 54 49 4d 45 29 7a 42 75 66 29 3b 0a 23 65  EMTIME)zBuf);.#e
46e0: 6e 64 69 66 0a 20 20 69 66 28 20 6f 6e 63 65 20  ndif.  if( once 
46f0: 29 7b 0a 20 20 20 20 69 6e 74 20 73 65 65 64 3b  ){.    int seed;
4700: 0a 20 20 20 20 6d 65 6d 63 70 79 28 26 73 65 65  .    memcpy(&see
4710: 64 2c 20 7a 42 75 66 2c 20 73 69 7a 65 6f 66 28  d, zBuf, sizeof(
4720: 73 65 65 64 29 29 3b 0a 20 20 20 20 73 72 61 6e  seed));.    sran
4730: 64 28 73 65 65 64 29 3b 0a 20 20 20 20 6f 6e 63  d(seed);.    onc
4740: 65 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 72 65 74  e = 0;.  }.  ret
4750: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d  urn SQLITE_OK;.}
4760: 0a 0a 2f 2a 0a 2a 2a 20 53 6c 65 65 70 20 66 6f  ../*.** Sleep fo
4770: 72 20 61 20 6c 69 74 74 6c 65 20 77 68 69 6c 65  r a little while
4780: 2e 20 20 52 65 74 75 72 6e 20 74 68 65 20 61 6d  .  Return the am
4790: 6f 75 6e 74 20 6f 66 20 74 69 6d 65 20 73 6c 65  ount of time sle
47a0: 70 74 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74  pt..*/.int sqlit
47b0: 65 4f 73 53 6c 65 65 70 28 69 6e 74 20 6d 73 29  eOsSleep(int ms)
47c0: 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 23 69  {.#if OS_UNIX.#i
47d0: 66 20 64 65 66 69 6e 65 64 28 48 41 56 45 5f 55  f defined(HAVE_U
47e0: 53 4c 45 45 50 29 20 26 26 20 48 41 56 45 5f 55  SLEEP) && HAVE_U
47f0: 53 4c 45 45 50 0a 20 20 75 73 6c 65 65 70 28 6d  SLEEP.  usleep(m
4800: 73 2a 31 30 30 30 29 3b 0a 20 20 72 65 74 75 72  s*1000);.  retur
4810: 6e 20 6d 73 3b 0a 23 65 6c 73 65 0a 20 20 73 6c  n ms;.#else.  sl
4820: 65 65 70 28 28 6d 73 2b 39 39 39 29 2f 31 30 30  eep((ms+999)/100
4830: 30 29 3b 0a 20 20 72 65 74 75 72 6e 20 31 30 30  0);.  return 100
4840: 30 2a 28 28 6d 73 2b 39 39 39 29 2f 31 30 30 30  0*((ms+999)/1000
4850: 29 3b 0a 23 65 6e 64 69 66 0a 23 65 6e 64 69 66  );.#endif.#endif
4860: 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 53 6c  .#if OS_WIN.  Sl
4870: 65 65 70 28 6d 73 29 3b 0a 20 20 72 65 74 75 72  eep(ms);.  retur
4880: 6e 20 6d 73 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a  n ms;.#endif.}..
4890: 2f 2a 0a 2a 2a 20 4d 61 63 72 6f 73 20 75 73 65  /*.** Macros use
48a0: 64 20 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 77  d to determine w
48b0: 68 65 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 6f  hether or not to
48c0: 20 75 73 65 20 74 68 72 65 61 64 73 2e 20 20 54   use threads.  T
48d0: 68 65 0a 2a 2a 20 53 51 4c 49 54 45 5f 55 4e 49  he.** SQLITE_UNI
48e0: 58 5f 54 48 52 45 41 44 53 20 6d 61 63 72 6f 20  X_THREADS macro 
48f0: 69 73 20 64 65 66 69 6e 65 64 20 69 66 20 77 65  is defined if we
4900: 20 61 72 65 20 73 79 6e 63 68 72 6f 6e 69 7a 69   are synchronizi
4910: 6e 67 20 66 6f 72 0a 2a 2a 20 50 6f 73 69 78 20  ng for.** Posix 
4920: 74 68 72 65 61 64 73 20 61 6e 64 20 53 51 4c 49  threads and SQLI
4930: 54 45 5f 57 33 32 5f 54 48 52 45 41 44 53 20 69  TE_W32_THREADS i
4940: 73 20 64 65 66 69 6e 65 64 20 69 66 20 77 65 20  s defined if we 
4950: 61 72 65 0a 2a 2a 20 73 79 6e 63 68 72 6f 6e 69  are.** synchroni
4960: 7a 69 6e 67 20 75 73 69 6e 67 20 57 69 6e 33 32  zing using Win32
4970: 20 74 68 72 65 61 64 73 2e 0a 2a 2f 0a 23 69 66   threads..*/.#if
4980: 20 4f 53 5f 55 4e 49 58 20 26 26 20 64 65 66 69   OS_UNIX && defi
4990: 6e 65 64 28 54 48 52 45 41 44 53 41 46 45 29 20  ned(THREADSAFE) 
49a0: 26 26 20 54 48 52 45 41 44 53 41 46 45 0a 23 20  && THREADSAFE.# 
49b0: 69 6e 63 6c 75 64 65 20 3c 70 74 68 72 65 61 64  include <pthread
49c0: 2e 68 3e 0a 23 20 64 65 66 69 6e 65 20 53 51 4c  .h>.# define SQL
49d0: 49 54 45 5f 55 4e 49 58 5f 54 48 52 45 41 44 53  ITE_UNIX_THREADS
49e0: 20 31 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53   1.#endif.#if OS
49f0: 5f 57 49 4e 20 26 26 20 64 65 66 69 6e 65 64 28  _WIN && defined(
4a00: 54 48 52 45 41 44 53 41 46 45 29 20 26 26 20 54  THREADSAFE) && T
4a10: 48 52 45 41 44 53 41 46 45 0a 23 20 64 65 66 69  HREADSAFE.# defi
4a20: 6e 65 20 53 51 4c 49 54 45 5f 57 33 32 5f 54 48  ne SQLITE_W32_TH
4a30: 52 45 41 44 53 20 31 0a 23 65 6e 64 69 66 0a 0a  READS 1.#endif..
4a40: 2f 2a 0a 2a 2a 20 53 74 61 74 69 63 20 76 61 72  /*.** Static var
4a50: 69 61 62 6c 65 73 20 75 73 65 64 20 66 6f 72 20  iables used for 
4a60: 74 68 72 65 61 64 20 73 79 6e 63 68 72 6f 6e 69  thread synchroni
4a70: 7a 61 74 69 6f 6e 0a 2a 2f 0a 73 74 61 74 69 63  zation.*/.static
4a80: 20 69 6e 74 20 69 6e 4d 75 74 65 78 20 3d 20 30   int inMutex = 0
4a90: 3b 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f  ;.#ifdef SQLITE_
4aa0: 55 4e 49 58 5f 54 48 52 45 41 44 53 0a 20 20 73  UNIX_THREADS.  s
4ab0: 74 61 74 69 63 20 70 74 68 72 65 61 64 5f 6d 75  tatic pthread_mu
4ac0: 74 65 78 5f 74 20 6d 75 74 65 78 20 3d 20 50 54  tex_t mutex = PT
4ad0: 48 52 45 41 44 5f 4d 55 54 45 58 5f 49 4e 49 54  HREAD_MUTEX_INIT
4ae0: 49 41 4c 49 5a 45 52 3b 0a 23 65 6e 64 69 66 0a  IALIZER;.#endif.
4af0: 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 57 33  #ifdef SQLITE_W3
4b00: 32 5f 54 48 52 45 41 44 53 0a 20 20 73 74 61 74  2_THREADS.  stat
4b10: 69 63 20 43 52 49 54 49 43 41 4c 5f 53 45 43 54  ic CRITICAL_SECT
4b20: 49 4f 4e 20 63 73 3b 0a 23 65 6e 64 69 66 0a 0a  ION cs;.#endif..
4b30: 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77  /*.** The follow
4b40: 69 6e 67 20 70 61 69 72 20 6f 66 20 72 6f 75 74  ing pair of rout
4b50: 69 6e 65 20 69 6d 70 6c 65 6d 65 6e 74 20 6d 75  ine implement mu
4b60: 74 75 61 6c 20 65 78 63 6c 75 73 69 6f 6e 20 66  tual exclusion f
4b70: 6f 72 0a 2a 2a 20 6d 75 6c 74 69 2d 74 68 72 65  or.** multi-thre
4b80: 61 64 65 64 20 70 72 6f 63 65 73 73 65 73 2e 20  aded processes. 
4b90: 20 4f 6e 6c 79 20 61 20 73 69 6e 67 6c 65 20 74   Only a single t
4ba0: 68 72 65 61 64 20 69 73 20 61 6c 6c 6f 77 65 64  hread is allowed
4bb0: 20 74 6f 0a 2a 2a 20 65 78 65 63 75 74 65 64 20   to.** executed 
4bc0: 63 6f 64 65 20 74 68 61 74 20 69 73 20 73 75 72  code that is sur
4bd0: 72 6f 75 6e 64 65 64 20 62 79 20 45 6e 74 65 72  rounded by Enter
4be0: 4d 75 74 65 78 28 29 20 61 6e 64 20 4c 65 61 76  Mutex() and Leav
4bf0: 65 4d 75 74 65 78 28 29 2e 0a 2a 2a 0a 2a 2a 20  eMutex()..**.** 
4c00: 53 51 4c 69 74 65 20 75 73 65 73 20 6f 6e 6c 79  SQLite uses only
4c10: 20 61 20 73 69 6e 67 6c 65 20 4d 75 74 65 78 2e   a single Mutex.
4c20: 20 20 54 68 65 72 65 20 69 73 20 6e 6f 74 20 6d    There is not m
4c30: 75 63 68 20 63 72 69 74 69 63 61 6c 0a 2a 2a 20  uch critical.** 
4c40: 63 6f 64 65 20 61 6e 64 20 77 68 61 74 20 6c 69  code and what li
4c50: 74 74 6c 65 20 74 68 65 72 65 20 69 73 20 65 78  ttle there is ex
4c60: 65 63 75 74 65 73 20 71 75 69 63 6b 6c 79 20 61  ecutes quickly a
4c70: 6e 64 20 77 69 74 68 6f 75 74 20 62 6c 6f 63 6b  nd without block
4c80: 69 6e 67 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c  ing..*/.void sql
4c90: 69 74 65 4f 73 45 6e 74 65 72 4d 75 74 65 78 28  iteOsEnterMutex(
4ca0: 29 7b 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45  ){.#ifdef SQLITE
4cb0: 5f 55 4e 49 58 5f 54 48 52 45 41 44 53 0a 20 20  _UNIX_THREADS.  
4cc0: 70 74 68 72 65 61 64 5f 6d 75 74 65 78 5f 6c 6f  pthread_mutex_lo
4cd0: 63 6b 28 26 6d 75 74 65 78 29 3b 0a 23 65 6e 64  ck(&mutex);.#end
4ce0: 69 66 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45  if.#ifdef SQLITE
4cf0: 5f 57 33 32 5f 54 48 52 45 41 44 53 0a 20 20 73  _W32_THREADS.  s
4d00: 74 61 74 69 63 20 69 6e 74 20 69 73 49 6e 69 74  tatic int isInit
4d10: 20 3d 20 30 3b 0a 20 20 77 68 69 6c 65 28 20 21   = 0;.  while( !
4d20: 69 73 49 6e 69 74 20 29 7b 0a 20 20 20 20 73 74  isInit ){.    st
4d30: 61 74 69 63 20 6c 6f 6e 67 20 6c 6f 63 6b 20 3d  atic long lock =
4d40: 20 30 3b 0a 20 20 20 20 69 66 28 20 49 6e 74 65   0;.    if( Inte
4d50: 72 6c 6f 63 6b 65 64 49 6e 63 72 65 6d 65 6e 74  rlockedIncrement
4d60: 28 26 6c 6f 63 6b 29 3d 3d 31 20 29 7b 0a 20 20  (&lock)==1 ){.  
4d70: 20 20 20 20 49 6e 69 74 69 61 6c 69 7a 65 43 72      InitializeCr
4d80: 69 74 69 63 61 6c 53 65 63 74 69 6f 6e 28 26 63  iticalSection(&c
4d90: 73 29 3b 0a 20 20 20 20 20 20 69 73 49 6e 69 74  s);.      isInit
4da0: 20 3d 20 31 3b 0a 20 20 20 20 7d 65 6c 73 65 7b   = 1;.    }else{
4db0: 0a 20 20 20 20 20 20 53 6c 65 65 70 28 31 29 3b  .      Sleep(1);
4dc0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 45 6e 74  .    }.  }.  Ent
4dd0: 65 72 43 72 69 74 69 63 61 6c 53 65 63 74 69 6f  erCriticalSectio
4de0: 6e 28 26 63 73 29 3b 0a 23 65 6e 64 69 66 0a 20  n(&cs);.#endif. 
4df0: 20 61 73 73 65 72 74 28 20 21 69 6e 4d 75 74 65   assert( !inMute
4e00: 78 20 29 3b 0a 20 20 69 6e 4d 75 74 65 78 20 3d  x );.  inMutex =
4e10: 20 31 3b 0a 7d 0a 76 6f 69 64 20 73 71 6c 69 74   1;.}.void sqlit
4e20: 65 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 7b  eOsLeaveMutex(){
4e30: 0a 20 20 61 73 73 65 72 74 28 20 69 6e 4d 75 74  .  assert( inMut
4e40: 65 78 20 29 3b 0a 20 20 69 6e 4d 75 74 65 78 20  ex );.  inMutex 
4e50: 3d 20 30 3b 0a 23 69 66 64 65 66 20 53 51 4c 49  = 0;.#ifdef SQLI
4e60: 54 45 5f 55 4e 49 58 5f 54 48 52 45 41 44 53 0a  TE_UNIX_THREADS.
4e70: 20 20 70 74 68 72 65 61 64 5f 6d 75 74 65 78 5f    pthread_mutex_
4e80: 75 6e 6c 6f 63 6b 28 26 6d 75 74 65 78 29 3b 0a  unlock(&mutex);.
4e90: 23 65 6e 64 69 66 0a 23 69 66 64 65 66 20 53 51  #endif.#ifdef SQ
4ea0: 4c 49 54 45 5f 57 33 32 5f 54 48 52 45 41 44 53  LITE_W32_THREADS
4eb0: 0a 20 20 4c 65 61 76 65 43 72 69 74 69 63 61 6c  .  LeaveCritical
4ec0: 53 65 63 74 69 6f 6e 28 26 63 73 29 3b 0a 23 65  Section(&cs);.#e
4ed0: 6e 64 69 66 0a 7d 0a                             ndif.}.