/ Hex Artifact Content
Login

Artifact 2a501026a66416292a30ab5b0988ec75783340ae:


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 6e 64 65 66 20 4f 53 5f 55  h"..#ifndef OS_U
0270: 4e 49 58 0a 23 20 69 66 6e 64 65 66 20 4f 53 5f  NIX.# ifndef OS_
0280: 57 49 4e 0a 23 20 20 64 65 66 69 6e 65 20 4f 53  WIN.#  define OS
0290: 5f 55 4e 49 58 20 31 0a 23 20 65 6c 73 65 0a 23  _UNIX 1.# else.#
02a0: 20 20 64 65 66 69 6e 65 20 4f 53 5f 55 4e 49 58    define OS_UNIX
02b0: 20 30 0a 23 20 65 6e 64 69 66 0a 23 65 6e 64 69   0.# endif.#endi
02c0: 66 0a 23 69 66 6e 64 65 66 20 4f 53 5f 57 49 4e  f.#ifndef OS_WIN
02d0: 0a 23 20 64 65 66 69 6e 65 20 4f 53 5f 57 49 4e  .# define OS_WIN
02e0: 20 30 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53   0.#endif.#if OS
02f0: 5f 55 4e 49 58 0a 23 20 69 6e 63 6c 75 64 65 20  _UNIX.# include 
0300: 3c 75 6e 69 73 74 64 2e 68 3e 0a 23 20 69 6e 63  <unistd.h>.# inc
0310: 6c 75 64 65 20 3c 66 63 6e 74 6c 2e 68 3e 0a 23  lude <fcntl.h>.#
0320: 20 69 6e 63 6c 75 64 65 20 3c 73 79 73 2f 73 74   include <sys/st
0330: 61 74 2e 68 3e 0a 23 20 69 6e 63 6c 75 64 65 20  at.h>.# include 
0340: 3c 74 69 6d 65 2e 68 3e 0a 23 65 6e 64 69 66 0a  <time.h>.#endif.
0350: 23 69 66 20 4f 53 5f 57 49 4e 0a 23 20 69 6e 63  #if OS_WIN.# inc
0360: 6c 75 64 65 20 3c 77 69 6e 62 61 73 65 2e 68 3e  lude <winbase.h>
0370: 0a 23 65 6e 64 69 66 0a 0a 0a 23 69 66 20 4f 53  .#endif...#if OS
0380: 5f 55 4e 49 58 0a 2f 2a 0a 2a 2a 20 48 65 72 65  _UNIX./*.** Here
0390: 20 69 73 20 74 68 65 20 64 69 72 74 20 6f 6e 20   is the dirt on 
03a0: 50 4f 53 49 58 20 61 64 76 69 73 6f 72 79 20 6c  POSIX advisory l
03b0: 6f 63 6b 73 3a 20 20 41 4e 53 49 20 53 54 44 20  ocks:  ANSI STD 
03c0: 31 30 30 33 2e 31 20 28 31 39 39 36 29 0a 2a 2a  1003.1 (1996).**
03d0: 20 73 65 63 74 69 6f 6e 20 36 2e 35 2e 32 2e 32   section 6.5.2.2
03e0: 20 6c 69 6e 65 73 20 34 38 33 20 74 68 72 6f 75   lines 483 throu
03f0: 67 68 20 34 39 30 20 73 70 65 63 69 66 79 20 74  gh 490 specify t
0400: 68 61 74 20 77 68 65 6e 20 61 20 70 72 6f 63 65  hat when a proce
0410: 73 73 0a 2a 2a 20 73 65 74 73 20 6f 72 20 63 6c  ss.** sets or cl
0420: 65 61 72 73 20 61 20 6c 6f 63 6b 2c 20 74 68 61  ears a lock, tha
0430: 74 20 6f 70 65 72 61 74 69 6f 6e 20 6f 76 65 72  t operation over
0440: 72 69 64 65 73 20 61 6e 79 20 70 72 69 6f 72 20  rides any prior 
0450: 6c 6f 63 6b 73 20 73 65 74 0a 2a 2a 20 62 79 20  locks set.** by 
0460: 74 68 65 20 73 61 6d 65 20 70 72 6f 63 65 73 73  the same process
0470: 2e 20 20 49 74 20 64 6f 65 73 20 6e 6f 74 20 65  .  It does not e
0480: 78 70 6c 69 63 69 74 6c 79 20 73 61 79 20 73 6f  xplicitly say so
0490: 2c 20 62 75 74 20 74 68 69 73 20 69 6d 70 6c 69  , but this impli
04a0: 65 73 0a 2a 2a 20 74 68 61 74 20 69 74 20 6f 76  es.** that it ov
04b0: 65 72 72 69 64 65 73 20 6c 6f 63 6b 73 20 73 65  errides locks se
04c0: 74 20 62 79 20 74 68 65 20 73 61 6d 65 20 70 72  t by the same pr
04d0: 6f 63 65 73 73 20 75 73 69 6e 67 20 61 20 64 69  ocess using a di
04e0: 66 66 65 72 65 6e 74 0a 2a 2a 20 66 69 6c 65 20  fferent.** file 
04f0: 64 65 73 63 72 69 70 74 6f 72 2e 20 20 43 6f 6e  descriptor.  Con
0500: 73 69 64 65 72 20 74 68 69 73 20 74 65 73 74 20  sider this test 
0510: 63 61 73 65 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20  case:.**.**     
0520: 20 20 69 6e 74 20 66 64 31 20 3d 20 6f 70 65 6e    int fd1 = open
0530: 28 22 2e 2f 66 69 6c 65 31 22 2c 20 4f 5f 52 44  ("./file1", O_RD
0540: 57 52 7c 4f 5f 43 52 45 41 54 2c 20 30 36 34 34  WR|O_CREAT, 0644
0550: 29 3b 0a 2a 2a 20 20 20 20 20 20 20 69 6e 74 20  );.**       int 
0560: 66 64 32 20 3d 20 6f 70 65 6e 28 22 2e 2f 66 69  fd2 = open("./fi
0570: 6c 65 32 22 2c 20 4f 5f 52 44 57 52 7c 4f 5f 43  le2", O_RDWR|O_C
0580: 52 45 41 54 2c 20 30 36 34 34 29 3b 0a 2a 2a 0a  REAT, 0644);.**.
0590: 2a 2a 20 53 75 70 70 6f 73 65 20 2e 2f 66 69 6c  ** Suppose ./fil
05a0: 65 31 20 61 6e 64 20 2e 2f 66 69 6c 65 32 20 61  e1 and ./file2 a
05b0: 72 65 20 72 65 61 6c 6c 79 20 62 65 20 74 68 65  re really be the
05c0: 20 73 61 6d 65 20 66 69 6c 65 20 28 62 65 63 61   same file (beca
05d0: 75 73 65 0a 2a 2a 20 6f 6e 65 20 69 73 20 61 20  use.** one is a 
05e0: 68 61 72 64 20 6f 72 20 73 79 6d 62 6f 6c 69 63  hard or symbolic
05f0: 20 6c 69 6e 6b 20 74 6f 20 74 68 65 20 6f 74 68   link to the oth
0600: 65 72 29 20 74 68 65 6e 20 69 66 20 79 6f 75 20  er) then if you 
0610: 73 65 74 0a 2a 2a 20 61 6e 20 65 78 63 6c 75 73  set.** an exclus
0620: 69 76 65 20 6c 6f 63 6b 20 6f 6e 20 66 64 31 2c  ive lock on fd1,
0630: 20 74 68 65 6e 20 74 72 79 20 74 6f 20 67 65 74   then try to get
0640: 20 61 6e 20 65 78 63 6c 75 73 69 76 65 20 6c 6f   an exclusive lo
0650: 63 6b 0a 2a 2a 20 6f 6e 20 66 64 32 2c 20 69 74  ck.** on fd2, it
0660: 20 77 6f 72 6b 73 2e 20 20 49 20 77 6f 75 6c 64   works.  I would
0670: 20 68 61 76 65 20 65 78 70 65 63 74 65 64 20 74   have expected t
0680: 68 65 20 73 65 63 6f 6e 64 20 6c 6f 63 6b 20 74  he second lock t
0690: 6f 0a 2a 2a 20 66 61 69 6c 20 73 69 6e 63 65 20  o.** fail since 
06a0: 74 68 65 72 65 20 77 61 73 20 61 6c 72 65 61 64  there was alread
06b0: 79 20 61 20 6c 6f 63 6b 20 6f 6e 20 74 68 65 20  y a lock on the 
06c0: 66 69 6c 65 20 64 75 65 20 74 6f 20 66 64 31 2e  file due to fd1.
06d0: 0a 2a 2a 20 42 75 74 20 6e 6f 74 20 73 6f 2e 20  .** But not so. 
06e0: 20 53 69 6e 63 65 20 62 6f 74 68 20 6c 6f 63 6b   Since both lock
06f0: 73 20 63 61 6d 65 20 66 72 6f 6d 20 74 68 65 20  s came from the 
0700: 73 61 6d 65 20 70 72 6f 63 65 73 73 2c 20 74 68  same process, th
0710: 65 0a 2a 2a 20 73 65 63 6f 6e 64 20 6f 76 65 72  e.** second over
0720: 72 69 64 65 73 20 74 68 65 20 66 69 72 73 74 2c  rides the first,
0730: 20 65 76 65 6e 20 74 68 6f 75 67 68 20 74 68 65   even though the
0740: 79 20 77 65 72 65 20 6f 6e 20 64 69 66 66 65 72  y were on differ
0750: 65 6e 74 0a 2a 2a 20 66 69 6c 65 20 64 65 73 63  ent.** file desc
0760: 72 69 70 74 6f 72 73 20 6f 70 65 6e 65 64 20 6f  riptors opened o
0770: 6e 20 64 69 66 66 65 72 65 6e 74 20 66 69 6c 65  n different file
0780: 20 6e 61 6d 65 73 2e 0a 2a 2a 0a 2a 2a 20 42 75   names..**.** Bu
0790: 6d 6d 65 72 2e 20 20 49 66 20 79 6f 75 20 61 73  mmer.  If you as
07a0: 6b 20 6d 65 2c 20 74 68 69 73 20 69 73 20 62 72  k me, this is br
07b0: 6f 6b 65 6e 2e 20 20 42 61 64 6c 79 20 62 72 6f  oken.  Badly bro
07c0: 6b 65 6e 2e 20 20 49 74 20 6d 65 61 6e 73 0a 2a  ken.  It means.*
07d0: 2a 20 74 68 61 74 20 77 65 20 63 61 6e 6e 6f 74  * that we cannot
07e0: 20 75 73 65 20 50 4f 53 49 58 20 6c 6f 63 6b 73   use POSIX locks
07f0: 20 74 6f 20 73 79 6e 63 68 72 6f 6e 69 7a 65 20   to synchronize 
0800: 66 69 6c 65 20 61 63 63 65 73 73 20 61 6d 6f 6e  file access amon
0810: 67 0a 2a 2a 20 63 6f 6d 70 65 74 69 6e 67 20 74  g.** competing t
0820: 68 72 65 61 64 73 20 6f 66 20 74 68 65 20 73 61  hreads of the sa
0830: 6d 65 20 70 72 6f 63 65 73 73 2e 20 20 50 4f 53  me process.  POS
0840: 49 58 20 6c 6f 63 6b 73 20 77 69 6c 6c 20 77 6f  IX locks will wo
0850: 72 6b 20 66 69 6e 65 0a 2a 2a 20 74 6f 20 73 79  rk fine.** to sy
0860: 6e 63 68 72 6f 6e 69 7a 65 20 61 63 63 65 73 73  nchronize access
0870: 20 66 6f 72 20 74 68 72 65 61 64 73 20 69 6e 20   for threads in 
0880: 73 65 70 61 72 61 74 65 20 70 72 6f 63 65 73 73  separate process
0890: 65 73 2c 20 62 75 74 20 6e 6f 74 0a 2a 2a 20 74  es, but not.** t
08a0: 68 72 65 61 64 73 20 77 69 74 68 69 6e 20 74 68  hreads within th
08b0: 65 20 73 61 6d 65 20 70 72 6f 63 65 73 73 2e 0a  e same process..
08c0: 2a 2a 0a 2a 2a 20 54 6f 20 77 6f 72 6b 20 61 72  **.** To work ar
08d0: 6f 75 6e 64 20 74 68 65 20 70 72 6f 62 6c 65 6d  ound the problem
08e0: 2c 20 53 51 4c 69 74 65 20 68 61 73 20 74 6f 20  , SQLite has to 
08f0: 6d 61 6e 61 67 65 20 66 69 6c 65 20 6c 6f 63 6b  manage file lock
0900: 73 20 69 6e 74 65 72 6e 61 6c 6c 79 0a 2a 2a 20  s internally.** 
0910: 6f 6e 20 69 74 73 20 6f 77 6e 2e 20 20 57 68 65  on its own.  Whe
0920: 6e 65 76 65 72 20 61 20 6e 65 77 20 64 61 74 61  never a new data
0930: 62 61 73 65 20 69 73 20 6f 70 65 6e 65 64 2c 20  base is opened, 
0940: 77 65 20 68 61 76 65 20 74 6f 20 66 69 6e 64 20  we have to find 
0950: 74 68 65 0a 2a 2a 20 73 70 65 63 69 66 69 63 20  the.** specific 
0960: 69 6e 6f 64 65 20 6f 66 20 74 68 65 20 64 61 74  inode of the dat
0970: 61 62 61 73 65 20 66 69 6c 65 20 28 74 68 65 20  abase file (the 
0980: 69 6e 6f 64 65 20 69 73 20 64 65 74 65 72 6d 69  inode is determi
0990: 6e 65 64 20 62 79 20 74 68 65 0a 2a 2a 20 73 74  ned by the.** st
09a0: 5f 64 65 76 20 61 6e 64 20 73 74 5f 69 6e 6f 20  _dev and st_ino 
09b0: 66 69 65 6c 64 73 20 6f 66 20 74 68 65 20 73 74  fields of the st
09c0: 61 74 20 73 74 72 75 63 74 75 72 65 20 74 68 61  at structure tha
09d0: 74 20 66 73 74 61 74 28 29 20 66 69 6c 6c 73 20  t fstat() fills 
09e0: 69 6e 29 0a 2a 2a 20 61 6e 64 20 63 68 65 63 6b  in).** and check
09f0: 20 66 6f 72 20 6c 6f 63 6b 73 20 61 6c 72 65 61   for locks alrea
0a00: 64 79 20 65 78 69 73 74 69 6e 67 20 6f 6e 20 74  dy existing on t
0a10: 68 61 74 20 69 6e 6f 64 65 2e 20 20 57 68 65 6e  hat inode.  When
0a20: 20 6c 6f 63 6b 73 20 61 72 65 0a 2a 2a 20 63 72   locks are.** cr
0a30: 65 61 74 65 64 20 6f 72 20 72 65 6d 6f 76 65 64  eated or removed
0a40: 2c 20 77 65 20 68 61 76 65 20 74 6f 20 6c 6f 6f  , we have to loo
0a50: 6b 20 61 74 20 6f 75 72 20 6f 77 6e 20 69 6e 74  k at our own int
0a60: 65 72 6e 61 6c 20 72 65 63 6f 72 64 20 6f 66 20  ernal record of 
0a70: 74 68 65 0a 2a 2a 20 6c 6f 63 6b 73 20 74 6f 20  the.** locks to 
0a80: 73 65 65 20 69 66 20 61 6e 6f 74 68 65 72 20 74  see if another t
0a90: 68 72 65 61 64 20 68 61 73 20 70 72 65 76 69 6f  hread has previo
0aa0: 75 73 6c 79 20 73 65 74 20 61 20 6c 6f 63 6b 20  usly set a lock 
0ab0: 6f 6e 20 74 68 61 74 20 73 61 6d 65 0a 2a 2a 20  on that same.** 
0ac0: 69 6e 6f 64 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 65  inode..**.** The
0ad0: 20 4f 73 46 69 6c 65 20 73 74 72 75 63 74 75 72   OsFile structur
0ae0: 65 20 66 6f 72 20 50 4f 53 49 58 20 69 73 20 6e  e for POSIX is n
0af0: 6f 20 6c 6f 6e 67 65 72 20 6a 75 73 74 20 61 6e  o longer just an
0b00: 20 69 6e 74 65 67 65 72 20 66 69 6c 65 0a 2a 2a   integer file.**
0b10: 20 64 65 73 63 72 69 70 74 6f 72 2e 20 20 49 74   descriptor.  It
0b20: 20 69 73 20 6e 6f 77 20 61 20 73 74 72 75 63 74   is now a struct
0b30: 75 72 65 20 74 68 61 74 20 68 6f 6c 64 73 20 74  ure that holds t
0b40: 68 65 20 69 6e 74 65 67 65 72 20 66 69 6c 65 0a  he integer file.
0b50: 2a 2a 20 64 65 73 63 72 69 70 74 6f 72 20 61 6e  ** descriptor an
0b60: 64 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 61  d a pointer to a
0b70: 20 73 74 72 75 63 74 75 72 65 20 74 68 61 74 20   structure that 
0b80: 64 65 73 63 72 69 62 65 73 20 74 68 65 20 69 6e  describes the in
0b90: 74 65 72 6e 61 6c 0a 2a 2a 20 6c 6f 63 6b 73 20  ternal.** locks 
0ba0: 6f 6e 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e  on the correspon
0bb0: 64 69 6e 67 20 69 6e 6f 64 65 2e 20 20 54 68 65  ding inode.  The
0bc0: 72 65 20 69 73 20 6f 6e 65 20 6c 6f 63 6b 69 6e  re is one lockin
0bd0: 67 20 73 74 72 75 63 74 75 72 65 0a 2a 2a 20 70  g structure.** p
0be0: 65 72 20 69 6e 6f 64 65 2c 20 73 6f 20 69 66 20  er inode, so if 
0bf0: 74 68 65 20 73 61 6d 65 20 69 6e 6f 64 65 20 69  the same inode i
0c00: 73 20 6f 70 65 6e 65 64 20 74 77 69 63 65 2c 20  s opened twice, 
0c10: 62 6f 74 68 20 4f 73 46 69 6c 65 20 73 74 72 75  both OsFile stru
0c20: 63 74 75 72 65 73 0a 2a 2a 20 70 6f 69 6e 74 20  ctures.** point 
0c30: 74 6f 20 74 68 65 20 73 61 6d 65 20 6c 6f 63 6b  to the same lock
0c40: 69 6e 67 20 73 74 72 75 63 74 75 72 65 2e 20 20  ing structure.  
0c50: 54 68 65 20 6c 6f 63 6b 69 6e 67 20 73 74 72 75  The locking stru
0c60: 63 74 75 72 65 20 6b 65 65 70 73 0a 2a 2a 20 61  cture keeps.** a
0c70: 20 72 65 66 65 72 65 6e 63 65 20 63 6f 75 6e 74   reference count
0c80: 20 28 73 6f 20 77 65 20 77 69 6c 6c 20 6b 6e 6f   (so we will kno
0c90: 77 20 77 68 65 6e 20 74 6f 20 64 65 6c 65 74 65  w when to delete
0ca0: 20 69 74 29 20 61 6e 64 20 61 20 22 63 6e 74 22   it) and a "cnt"
0cb0: 0a 2a 2a 20 66 69 65 6c 64 20 74 68 61 74 20 74  .** field that t
0cc0: 65 6c 6c 73 20 75 73 20 69 74 73 20 69 6e 74 65  ells us its inte
0cd0: 72 6e 61 6c 20 6c 6f 63 6b 20 73 74 61 74 75 73  rnal lock status
0ce0: 2e 20 20 63 6e 74 3d 3d 30 20 6d 65 61 6e 73 20  .  cnt==0 means 
0cf0: 74 68 65 0a 2a 2a 20 66 69 6c 65 20 69 73 20 75  the.** file is u
0d00: 6e 6c 6f 63 6b 65 64 2e 20 20 63 6e 74 3d 3d 2d  nlocked.  cnt==-
0d10: 31 20 6d 65 61 6e 73 20 74 68 65 20 66 69 6c 65  1 means the file
0d20: 20 68 61 73 20 61 6e 20 65 78 63 6c 75 73 69 76   has an exclusiv
0d30: 65 20 6c 6f 63 6b 2e 0a 2a 2a 20 63 6e 74 3e 30  e lock..** cnt>0
0d40: 20 6d 65 61 6e 73 20 74 68 65 72 65 20 61 72 65   means there are
0d50: 20 63 6e 74 20 73 68 61 72 65 64 20 6c 6f 63 6b   cnt shared lock
0d60: 73 20 6f 6e 20 74 68 65 20 66 69 6c 65 2e 0a 2a  s on the file..*
0d70: 2a 0a 2a 2a 20 41 6e 79 20 61 74 74 65 6d 70 74  *.** Any attempt
0d80: 20 74 6f 20 6c 6f 63 6b 20 6f 72 20 75 6e 6c 6f   to lock or unlo
0d90: 63 6b 20 61 20 66 69 6c 65 20 66 69 72 73 74 20  ck a file first 
0da0: 63 68 65 63 6b 73 20 74 68 65 20 6c 6f 63 6b 69  checks the locki
0db0: 6e 67 0a 2a 2a 20 73 74 72 75 63 74 75 72 65 2e  ng.** structure.
0dc0: 20 20 54 68 65 20 66 63 6e 74 6c 28 29 20 73 79    The fcntl() sy
0dd0: 73 74 65 6d 20 63 61 6c 6c 20 69 73 20 6f 6e 6c  stem call is onl
0de0: 79 20 69 6e 76 6f 6b 65 64 20 74 6f 20 73 65 74  y invoked to set
0df0: 20 61 20 0a 2a 2a 20 50 4f 53 49 58 20 6c 6f 63   a .** POSIX loc
0e00: 6b 20 69 66 20 74 68 65 20 69 6e 74 65 72 6e 61  k if the interna
0e10: 6c 20 6c 6f 63 6b 20 73 74 72 75 63 74 75 72 65  l lock structure
0e20: 20 74 72 61 6e 73 69 74 69 6f 6e 73 20 62 65 74   transitions bet
0e30: 77 65 65 6e 0a 2a 2a 20 61 20 6c 6f 63 6b 65 64  ween.** a locked
0e40: 20 61 6e 64 20 61 6e 20 75 6e 6c 6f 63 6b 65 64   and an unlocked
0e50: 20 73 74 61 74 65 2e 0a 2a 2f 0a 0a 2f 2a 0a 2a   state..*/../*.*
0e60: 2a 20 41 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66  * An instance of
0e70: 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73   the following s
0e80: 74 72 75 63 74 75 72 65 20 73 65 72 76 65 73 20  tructure serves 
0e90: 61 73 20 74 68 65 20 6b 65 79 20 75 73 65 64 0a  as the key used.
0ea0: 2a 2a 20 74 6f 20 6c 6f 63 61 74 65 20 61 20 70  ** to locate a p
0eb0: 61 72 74 69 63 75 6c 61 72 20 6c 6f 63 6b 49 6e  articular lockIn
0ec0: 66 6f 20 73 74 72 75 63 74 75 72 65 20 67 69 76  fo structure giv
0ed0: 65 6e 20 69 74 73 20 69 6e 6f 64 65 2e 20 0a 2a  en its inode. .*
0ee0: 2f 0a 73 74 72 75 63 74 20 69 6e 6f 64 65 4b 65  /.struct inodeKe
0ef0: 79 20 7b 0a 20 20 64 65 76 5f 74 20 64 65 76 3b  y {.  dev_t dev;
0f00: 20 20 20 2f 2a 20 44 65 76 69 63 65 20 6e 75 6d     /* Device num
0f10: 62 65 72 20 2a 2f 0a 20 20 69 6e 6f 5f 74 20 69  ber */.  ino_t i
0f20: 6e 6f 3b 20 20 20 2f 2a 20 49 6e 6f 64 65 20 6e  no;   /* Inode n
0f30: 75 6d 62 65 72 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a  umber */.};../*.
0f40: 2a 2a 20 41 6e 20 69 6e 73 74 61 6e 63 65 20 6f  ** An instance o
0f50: 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20  f the following 
0f60: 73 74 72 75 63 74 75 72 65 20 69 73 20 61 6c 6c  structure is all
0f70: 6f 63 61 74 65 64 20 66 6f 72 20 65 61 63 68 20  ocated for each 
0f80: 69 6e 6f 64 65 2e 0a 2a 2a 20 41 20 73 69 6e 67  inode..** A sing
0f90: 6c 65 20 69 6e 6f 64 65 20 63 61 6e 20 68 61 76  le inode can hav
0fa0: 65 20 6d 75 6c 74 69 70 6c 65 20 66 69 6c 65 20  e multiple file 
0fb0: 64 65 73 63 72 69 70 74 6f 72 73 2c 20 73 6f 20  descriptors, so 
0fc0: 65 61 63 68 20 4f 73 46 69 6c 65 0a 2a 2a 20 73  each OsFile.** s
0fd0: 74 72 75 63 74 75 72 65 20 63 6f 6e 74 61 69 6e  tructure contain
0fe0: 73 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 61  s a pointer to a
0ff0: 6e 20 69 6e 73 74 61 6e 63 65 20 6f 66 20 74 68  n instance of th
1000: 69 73 20 6f 62 6a 65 63 74 20 61 6e 64 20 74 68  is object and th
1010: 69 73 0a 2a 2a 20 6f 62 6a 65 63 74 20 6b 65 65  is.** object kee
1020: 70 73 20 61 20 63 6f 75 6e 74 20 6f 66 20 74 68  ps a count of th
1030: 65 20 6e 75 6d 62 65 72 20 6f 66 20 4f 73 46 69  e number of OsFi
1040: 6c 65 73 20 70 6f 69 6e 74 69 6e 67 20 74 6f 20  les pointing to 
1050: 69 74 2e 0a 2a 2f 0a 73 74 72 75 63 74 20 6c 6f  it..*/.struct lo
1060: 63 6b 49 6e 66 6f 20 7b 0a 20 20 73 74 72 75 63  ckInfo {.  struc
1070: 74 20 69 6e 6f 64 65 4b 65 79 20 6b 65 79 3b 20  t inodeKey key; 
1080: 20 2f 2a 20 54 68 65 20 6c 6f 6f 6b 75 70 20 6b   /* The lookup k
1090: 65 79 20 2a 2f 0a 20 20 69 6e 74 20 63 6e 74 3b  ey */.  int cnt;
10a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
10b0: 20 30 3a 20 75 6e 6c 6f 63 6b 65 64 2e 20 20 2d   0: unlocked.  -
10c0: 31 3a 20 77 72 69 74 65 20 6c 6f 63 6b 2e 20 20  1: write lock.  
10d0: 3e 3d 31 3a 20 72 65 61 64 20 6c 6f 63 6b 20 2a  >=1: read lock *
10e0: 2f 0a 20 20 69 6e 74 20 6e 52 65 66 3b 20 20 20  /.  int nRef;   
10f0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d            /* Num
1100: 62 65 72 20 6f 66 20 70 6f 69 6e 74 65 72 73 20  ber of pointers 
1110: 74 6f 20 74 68 69 73 20 73 74 72 75 63 74 75 72  to this structur
1120: 65 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 20 0a 2a 2a 20  e */.};../* .** 
1130: 54 68 69 73 20 68 61 73 68 20 74 61 62 6c 65 20  This hash table 
1140: 6d 61 70 73 20 69 6e 6f 64 65 73 20 28 69 6e 20  maps inodes (in 
1150: 74 68 65 20 66 6f 72 6d 20 6f 66 20 69 6e 6f 64  the form of inod
1160: 65 4b 65 79 20 73 74 72 75 63 74 75 72 65 73 29  eKey structures)
1170: 20 69 6e 74 6f 0a 2a 2a 20 70 6f 69 6e 74 65 72   into.** pointer
1180: 73 20 74 6f 20 6c 6f 63 6b 49 6e 66 6f 20 73 74  s to lockInfo st
1190: 72 75 63 74 75 72 65 73 2e 0a 2a 2f 0a 73 74 61  ructures..*/.sta
11a0: 74 69 63 20 48 61 73 68 20 6c 6f 63 6b 48 61 73  tic Hash lockHas
11b0: 68 20 3d 20 7b 20 53 51 4c 49 54 45 5f 48 41 53  h = { SQLITE_HAS
11c0: 48 5f 42 49 4e 41 52 59 2c 20 30 2c 20 30 2c 20  H_BINARY, 0, 0, 
11d0: 30 2c 20 30 2c 20 30 20 7d 3b 0a 0a 2f 2a 0a 2a  0, 0, 0 };../*.*
11e0: 2a 20 47 69 76 65 6e 20 61 20 66 69 6c 65 20 64  * Given a file d
11f0: 65 73 63 72 69 70 74 6f 72 2c 20 6c 6f 63 61 74  escriptor, locat
1200: 65 20 61 20 6c 6f 63 6b 49 6e 66 6f 20 73 74 72  e a lockInfo str
1210: 75 63 74 75 72 65 20 74 68 61 74 20 64 65 73 63  ucture that desc
1220: 72 69 62 65 73 0a 2a 2a 20 74 68 61 74 20 66 69  ribes.** that fi
1230: 6c 65 20 64 65 73 63 72 69 70 74 6f 72 2e 20 20  le descriptor.  
1240: 43 72 65 61 74 65 20 61 20 6e 65 77 20 6f 6e 65  Create a new one
1250: 20 69 66 20 6e 65 63 65 73 73 61 72 79 2e 20 20   if necessary.  
1260: 4e 55 4c 4c 20 6d 69 67 68 74 0a 2a 2a 20 62 65  NULL might.** be
1270: 20 72 65 74 75 72 6e 65 64 20 69 66 20 6d 61 6c   returned if mal
1280: 6c 6f 63 28 29 20 66 61 69 6c 73 2e 0a 2a 2f 0a  loc() fails..*/.
1290: 73 74 61 74 69 63 20 73 74 72 75 63 74 20 6c 6f  static struct lo
12a0: 63 6b 49 6e 66 6f 20 2a 66 69 6e 64 4c 6f 63 6b  ckInfo *findLock
12b0: 49 6e 66 6f 28 69 6e 74 20 66 64 29 7b 0a 20 20  Info(int fd){.  
12c0: 69 6e 74 20 72 63 3b 0a 20 20 73 74 72 75 63 74  int rc;.  struct
12d0: 20 69 6e 6f 64 65 4b 65 79 20 6b 65 79 3b 0a 20   inodeKey key;. 
12e0: 20 73 74 72 75 63 74 20 73 74 61 74 20 73 74 61   struct stat sta
12f0: 74 62 75 66 3b 0a 20 20 73 74 72 75 63 74 20 6c  tbuf;.  struct l
1300: 6f 63 6b 49 6e 66 6f 20 2a 70 49 6e 66 6f 3b 0a  ockInfo *pInfo;.
1310: 20 20 72 63 20 3d 20 66 73 74 61 74 28 66 64 2c    rc = fstat(fd,
1320: 20 26 73 74 61 74 62 75 66 29 3b 0a 20 20 69 66   &statbuf);.  if
1330: 28 20 72 63 21 3d 30 20 29 20 72 65 74 75 72 6e  ( rc!=0 ) return
1340: 20 30 3b 0a 20 20 6b 65 79 2e 64 65 76 20 3d 20   0;.  key.dev = 
1350: 73 74 61 74 62 75 66 2e 73 74 5f 64 65 76 3b 0a  statbuf.st_dev;.
1360: 20 20 6b 65 79 2e 69 6e 6f 20 3d 20 73 74 61 74    key.ino = stat
1370: 62 75 66 2e 73 74 5f 69 6e 6f 3b 0a 20 20 70 49  buf.st_ino;.  pI
1380: 6e 66 6f 20 3d 20 28 73 74 72 75 63 74 20 6c 6f  nfo = (struct lo
1390: 63 6b 49 6e 66 6f 2a 29 73 71 6c 69 74 65 48 61  ckInfo*)sqliteHa
13a0: 73 68 46 69 6e 64 28 26 6c 6f 63 6b 48 61 73 68  shFind(&lockHash
13b0: 2c 20 26 6b 65 79 2c 20 73 69 7a 65 6f 66 28 6b  , &key, sizeof(k
13c0: 65 79 29 29 3b 0a 20 20 69 66 28 20 70 49 6e 66  ey));.  if( pInf
13d0: 6f 3d 3d 30 20 29 7b 0a 20 20 20 20 70 49 6e 66  o==0 ){.    pInf
13e0: 6f 20 3d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63  o = sqliteMalloc
13f0: 28 20 73 69 7a 65 6f 66 28 2a 70 49 6e 66 6f 29  ( sizeof(*pInfo)
1400: 20 29 3b 0a 20 20 20 20 69 66 28 20 70 49 6e 66   );.    if( pInf
1410: 6f 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30 3b  o==0 ) return 0;
1420: 0a 20 20 20 20 70 49 6e 66 6f 2d 3e 6b 65 79 20  .    pInfo->key 
1430: 3d 20 6b 65 79 3b 0a 20 20 20 20 70 49 6e 66 6f  = key;.    pInfo
1440: 2d 3e 6e 52 65 66 20 3d 20 31 3b 0a 20 20 20 20  ->nRef = 1;.    
1450: 70 49 6e 66 6f 2d 3e 63 6e 74 20 3d 20 30 3b 0a  pInfo->cnt = 0;.
1460: 20 20 20 20 73 71 6c 69 74 65 48 61 73 68 49 6e      sqliteHashIn
1470: 73 65 72 74 28 26 6c 6f 63 6b 48 61 73 68 2c 20  sert(&lockHash, 
1480: 26 70 49 6e 66 6f 2d 3e 6b 65 79 2c 20 73 69 7a  &pInfo->key, siz
1490: 65 6f 66 28 6b 65 79 29 2c 20 70 49 6e 66 6f 29  eof(key), pInfo)
14a0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 70  ;.  }else{.    p
14b0: 49 6e 66 6f 2d 3e 6e 52 65 66 2b 2b 3b 0a 20 20  Info->nRef++;.  
14c0: 7d 0a 20 20 72 65 74 75 72 6e 20 70 49 6e 66 6f  }.  return pInfo
14d0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 6c 65 61  ;.}../*.** Relea
14e0: 73 65 20 61 20 6c 6f 63 6b 49 6e 66 6f 20 73 74  se a lockInfo st
14f0: 72 75 63 74 75 72 65 20 70 72 65 76 69 6f 75 73  ructure previous
1500: 6c 79 20 61 6c 6c 6f 63 61 74 65 64 20 62 79 20  ly allocated by 
1510: 66 69 6e 64 4c 6f 63 6b 49 6e 66 6f 28 29 2e 0a  findLockInfo()..
1520: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 72  */.static void r
1530: 65 6c 65 61 73 65 4c 6f 63 6b 49 6e 66 6f 28 73  eleaseLockInfo(s
1540: 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f 20 2a  truct lockInfo *
1550: 70 49 6e 66 6f 29 7b 0a 20 20 70 49 6e 66 6f 2d  pInfo){.  pInfo-
1560: 3e 6e 52 65 66 2d 2d 3b 0a 20 20 69 66 28 20 70  >nRef--;.  if( p
1570: 49 6e 66 6f 2d 3e 6e 52 65 66 3d 3d 30 20 29 7b  Info->nRef==0 ){
1580: 0a 20 20 20 20 73 71 6c 69 74 65 48 61 73 68 49  .    sqliteHashI
1590: 6e 73 65 72 74 28 26 6c 6f 63 6b 48 61 73 68 2c  nsert(&lockHash,
15a0: 20 26 70 49 6e 66 6f 2d 3e 6b 65 79 2c 20 73 69   &pInfo->key, si
15b0: 7a 65 6f 66 28 70 49 6e 66 6f 2d 3e 6b 65 79 29  zeof(pInfo->key)
15c0: 2c 20 30 29 3b 0a 20 20 20 20 73 71 6c 69 74 65  , 0);.    sqlite
15d0: 46 72 65 65 28 70 49 6e 66 6f 29 3b 0a 20 20 7d  Free(pInfo);.  }
15e0: 0a 7d 0a 23 65 6e 64 69 66 20 20 2f 2a 2a 20 50  .}.#endif  /** P
15f0: 4f 53 49 58 20 61 64 76 69 73 6f 72 79 20 6c 6f  OSIX advisory lo
1600: 63 6b 20 77 6f 72 6b 2d 61 72 6f 75 6e 64 20 2a  ck work-around *
1610: 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 49 66 20 77 65 20  */../*.** If we 
1620: 63 6f 6d 70 69 6c 65 20 77 69 74 68 20 74 68 65  compile with the
1630: 20 53 51 4c 49 54 45 5f 54 45 53 54 20 6d 61 63   SQLITE_TEST mac
1640: 72 6f 20 73 65 74 2c 20 74 68 65 6e 20 74 68 65  ro set, then the
1650: 20 66 6f 6c 6c 6f 77 69 6e 67 20 62 6c 6f 63 6b   following block
1660: 0a 2a 2a 20 6f 66 20 63 6f 64 65 20 77 69 6c 6c  .** of code will
1670: 20 67 69 76 65 20 75 73 20 74 68 65 20 61 62 69   give us the abi
1680: 6c 69 74 79 20 74 6f 20 73 69 6d 75 6c 61 74 65  lity to simulate
1690: 20 61 20 64 69 73 6b 20 49 2f 4f 20 65 72 72 6f   a disk I/O erro
16a0: 72 2e 20 20 54 68 69 73 0a 2a 2a 20 69 73 20 75  r.  This.** is u
16b0: 73 65 64 20 66 6f 72 20 74 65 73 74 69 6e 67 20  sed for testing 
16c0: 74 68 65 20 49 2f 4f 20 72 65 63 6f 76 65 72 79  the I/O recovery
16d0: 20 6c 6f 67 69 63 2e 0a 2a 2f 0a 23 69 66 64 65   logic..*/.#ifde
16e0: 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a 69 6e  f SQLITE_TEST.in
16f0: 74 20 73 71 6c 69 74 65 5f 69 6f 5f 65 72 72 6f  t sqlite_io_erro
1700: 72 5f 70 65 6e 64 69 6e 67 20 3d 20 30 3b 0a 23  r_pending = 0;.#
1710: 64 65 66 69 6e 65 20 53 69 6d 75 6c 61 74 65 49  define SimulateI
1720: 4f 45 72 72 6f 72 28 41 29 20 20 5c 0a 20 20 20  OError(A)  \.   
1730: 69 66 28 20 73 71 6c 69 74 65 5f 69 6f 5f 65 72  if( sqlite_io_er
1740: 72 6f 72 5f 70 65 6e 64 69 6e 67 20 29 20 5c 0a  ror_pending ) \.
1750: 20 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 5f       if( sqlite_
1760: 69 6f 5f 65 72 72 6f 72 5f 70 65 6e 64 69 6e 67  io_error_pending
1770: 2d 2d 20 3d 3d 20 31 20 29 7b 20 6c 6f 63 61 6c  -- == 1 ){ local
1780: 5f 69 6f 65 72 72 28 29 3b 20 72 65 74 75 72 6e  _ioerr(); return
1790: 20 41 3b 20 7d 0a 73 74 61 74 69 63 20 76 6f 69   A; }.static voi
17a0: 64 20 6c 6f 63 61 6c 5f 69 6f 65 72 72 28 29 7b  d local_ioerr(){
17b0: 0a 20 20 73 71 6c 69 74 65 5f 69 6f 5f 65 72 72  .  sqlite_io_err
17c0: 6f 72 5f 70 65 6e 64 69 6e 67 20 3d 20 30 3b 20  or_pending = 0; 
17d0: 20 2f 2a 20 52 65 61 6c 6c 79 20 6a 75 73 74 20   /* Really just 
17e0: 61 20 70 6c 61 63 65 20 74 6f 20 73 65 74 20 61  a place to set a
17f0: 20 62 72 65 61 6b 70 6f 69 6e 74 20 2a 2f 0a 7d   breakpoint */.}
1800: 0a 23 65 6c 73 65 0a 23 64 65 66 69 6e 65 20 53  .#else.#define S
1810: 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 41  imulateIOError(A
1820: 29 0a 23 65 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a  ).#endif.../*.**
1830: 20 44 65 6c 65 74 65 20 74 68 65 20 6e 61 6d 65   Delete the name
1840: 64 20 66 69 6c 65 0a 2a 2f 0a 69 6e 74 20 73 71  d file.*/.int sq
1850: 6c 69 74 65 4f 73 44 65 6c 65 74 65 28 63 6f 6e  liteOsDelete(con
1860: 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61  st char *zFilena
1870: 6d 65 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58  me){.#if OS_UNIX
1880: 0a 20 20 75 6e 6c 69 6e 6b 28 7a 46 69 6c 65 6e  .  unlink(zFilen
1890: 61 6d 65 29 3b 0a 23 65 6e 64 69 66 0a 23 69 66  ame);.#endif.#if
18a0: 20 4f 53 5f 57 49 4e 0a 20 20 44 65 6c 65 74 65   OS_WIN.  Delete
18b0: 46 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65 29 3b  File(zFilename);
18c0: 0a 23 65 6e 64 69 66 0a 20 20 72 65 74 75 72 6e  .#endif.  return
18d0: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f   SQLITE_OK;.}../
18e0: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52 55 45  *.** Return TRUE
18f0: 20 69 66 20 74 68 65 20 6e 61 6d 65 64 20 66 69   if the named fi
1900: 6c 65 20 65 78 69 73 74 73 2e 0a 2a 2f 0a 69 6e  le exists..*/.in
1910: 74 20 73 71 6c 69 74 65 4f 73 46 69 6c 65 45 78  t sqliteOsFileEx
1920: 69 73 74 73 28 63 6f 6e 73 74 20 63 68 61 72 20  ists(const char 
1930: 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b 0a 23 69 66  *zFilename){.#if
1940: 20 4f 53 5f 55 4e 49 58 0a 20 20 72 65 74 75 72   OS_UNIX.  retur
1950: 6e 20 61 63 63 65 73 73 28 7a 46 69 6c 65 6e 61  n access(zFilena
1960: 6d 65 2c 20 30 29 3d 3d 30 3b 0a 23 65 6e 64 69  me, 0)==0;.#endi
1970: 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 48  f.#if OS_WIN.  H
1980: 41 4e 44 4c 45 20 68 3b 0a 20 20 68 20 3d 20 43  ANDLE h;.  h = C
1990: 72 65 61 74 65 46 69 6c 65 28 7a 46 69 6c 65 6e  reateFile(zFilen
19a0: 61 6d 65 2c 0a 20 20 20 20 47 45 4e 45 52 49 43  ame,.    GENERIC
19b0: 5f 52 45 41 44 2c 0a 20 20 20 20 30 2c 0a 20 20  _READ,.    0,.  
19c0: 20 20 4e 55 4c 4c 2c 0a 20 20 20 20 4f 50 45 4e    NULL,.    OPEN
19d0: 5f 45 58 49 53 54 49 4e 47 2c 0a 20 20 20 20 46  _EXISTING,.    F
19e0: 49 4c 45 5f 41 54 54 52 49 42 55 54 45 5f 4e 4f  ILE_ATTRIBUTE_NO
19f0: 52 4d 41 4c 20 7c 20 46 49 4c 45 5f 46 4c 41 47  RMAL | FILE_FLAG
1a00: 5f 52 41 4e 44 4f 4d 5f 41 43 43 45 53 53 2c 0a  _RANDOM_ACCESS,.
1a10: 20 20 20 20 4e 55 4c 4c 0a 20 20 29 3b 0a 20 20      NULL.  );.  
1a20: 69 66 28 20 68 21 3d 49 4e 56 41 4c 49 44 5f 48  if( h!=INVALID_H
1a30: 41 4e 44 4c 45 5f 56 41 4c 55 45 20 29 7b 0a 20  ANDLE_VALUE ){. 
1a40: 20 20 20 43 6c 6f 73 65 48 61 6e 64 6c 65 28 68     CloseHandle(h
1a50: 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 31 3b  );.    return 1;
1a60: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 30 3b  .  }.  return 0;
1a70: 0a 23 65 6e 64 69 66 0a 7d 0a 0a 0a 2f 2a 0a 2a  .#endif.}.../*.*
1a80: 2a 20 41 74 74 65 6d 70 74 20 74 6f 20 6f 70 65  * Attempt to ope
1a90: 6e 20 61 20 66 69 6c 65 20 66 6f 72 20 62 6f 74  n a file for bot
1aa0: 68 20 72 65 61 64 69 6e 67 20 61 6e 64 20 77 72  h reading and wr
1ab0: 69 74 69 6e 67 2e 20 20 49 66 20 74 68 61 74 0a  iting.  If that.
1ac0: 2a 2a 20 66 61 69 6c 73 2c 20 74 72 79 20 6f 70  ** fails, try op
1ad0: 65 6e 69 6e 67 20 69 74 20 72 65 61 64 2d 6f 6e  ening it read-on
1ae0: 6c 79 2e 20 20 49 66 20 74 68 65 20 66 69 6c 65  ly.  If the file
1af0: 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 2c   does not exist,
1b00: 0a 2a 2a 20 74 72 79 20 74 6f 20 63 72 65 61 74  .** try to creat
1b10: 65 20 69 74 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 73  e it..**.** On s
1b20: 75 63 63 65 73 73 2c 20 61 20 68 61 6e 64 6c 65  uccess, a handle
1b30: 20 66 6f 72 20 74 68 65 20 6f 70 65 6e 20 66 69   for the open fi
1b40: 6c 65 20 69 73 20 77 72 69 74 74 65 6e 20 74 6f  le is written to
1b50: 20 2a 70 52 65 73 75 6c 74 0a 2a 2a 20 61 6e 64   *pResult.** and
1b60: 20 2a 70 52 65 61 64 6f 6e 6c 79 20 69 73 20 73   *pReadonly is s
1b70: 65 74 20 74 6f 20 30 20 69 66 20 74 68 65 20 66  et to 0 if the f
1b80: 69 6c 65 20 77 61 73 20 6f 70 65 6e 65 64 20 66  ile was opened f
1b90: 6f 72 20 72 65 61 64 69 6e 67 20 61 6e 64 0a 2a  or reading and.*
1ba0: 2a 20 77 72 69 74 69 6e 67 20 6f 72 20 31 20 69  * writing or 1 i
1bb0: 66 20 74 68 65 20 66 69 6c 65 20 77 61 73 20 6f  f the file was o
1bc0: 70 65 6e 65 64 20 72 65 61 64 2d 6f 6e 6c 79 2e  pened read-only.
1bd0: 20 20 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 72    The function r
1be0: 65 74 75 72 6e 73 0a 2a 2a 20 53 51 4c 49 54 45  eturns.** SQLITE
1bf0: 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66 61  _OK..**.** On fa
1c00: 69 6c 75 72 65 2c 20 74 68 65 20 66 75 6e 63 74  ilure, the funct
1c10: 69 6f 6e 20 72 65 74 75 72 6e 73 20 53 51 4c 49  ion returns SQLI
1c20: 54 45 5f 43 41 4e 54 4f 50 45 4e 20 61 6e 64 20  TE_CANTOPEN and 
1c30: 6c 65 61 76 65 73 0a 2a 2a 20 2a 70 52 65 73 75  leaves.** *pResu
1c40: 6c 73 74 20 61 6e 64 20 2a 70 52 65 61 64 6f 6e  lst and *pReadon
1c50: 6c 79 20 75 6e 63 68 61 6e 67 65 64 2e 0a 2a 2f  ly unchanged..*/
1c60: 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 4f 70 65  .int sqliteOsOpe
1c70: 6e 52 65 61 64 57 72 69 74 65 28 0a 20 20 63 6f  nReadWrite(.  co
1c80: 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e  nst char *zFilen
1c90: 61 6d 65 2c 0a 20 20 4f 73 46 69 6c 65 20 2a 70  ame,.  OsFile *p
1ca0: 52 65 73 75 6c 74 2c 0a 20 20 69 6e 74 20 2a 70  Result,.  int *p
1cb0: 52 65 61 64 6f 6e 6c 79 0a 29 7b 0a 23 69 66 20  Readonly.){.#if 
1cc0: 4f 53 5f 55 4e 49 58 0a 20 20 4f 73 46 69 6c 65  OS_UNIX.  OsFile
1cd0: 20 73 3b 0a 20 20 73 2e 66 64 20 3d 20 6f 70 65   s;.  s.fd = ope
1ce0: 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52  n(zFilename, O_R
1cf0: 44 57 52 7c 4f 5f 43 52 45 41 54 2c 20 30 36 34  DWR|O_CREAT, 064
1d00: 34 29 3b 0a 20 20 69 66 28 20 73 2e 66 64 3c 30  4);.  if( s.fd<0
1d10: 20 29 7b 0a 20 20 20 20 73 2e 66 64 20 3d 20 6f   ){.    s.fd = o
1d20: 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f  pen(zFilename, O
1d30: 5f 52 44 4f 4e 4c 59 29 3b 0a 20 20 20 20 69 66  _RDONLY);.    if
1d40: 28 20 73 2e 66 64 3c 30 20 29 7b 0a 20 20 20 20  ( s.fd<0 ){.    
1d50: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
1d60: 43 41 4e 54 4f 50 45 4e 3b 20 0a 20 20 20 20 7d  CANTOPEN; .    }
1d70: 0a 20 20 20 20 2a 70 52 65 61 64 6f 6e 6c 79 20  .    *pReadonly 
1d80: 3d 20 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  = 1;.  }else{.  
1d90: 20 20 2a 70 52 65 61 64 6f 6e 6c 79 20 3d 20 30    *pReadonly = 0
1da0: 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 4f 73  ;.  }.  sqliteOs
1db0: 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a 20 20  EnterMutex();.  
1dc0: 73 2e 70 4c 6f 63 6b 20 3d 20 66 69 6e 64 4c 6f  s.pLock = findLo
1dd0: 63 6b 49 6e 66 6f 28 73 2e 66 64 29 3b 0a 20 20  ckInfo(s.fd);.  
1de0: 73 71 6c 69 74 65 4f 73 4c 65 61 76 65 4d 75 74  sqliteOsLeaveMut
1df0: 65 78 28 29 3b 0a 20 20 69 66 28 20 73 2e 70 4c  ex();.  if( s.pL
1e00: 6f 63 6b 3d 3d 30 20 29 7b 0a 20 20 20 20 63 6c  ock==0 ){.    cl
1e10: 6f 73 65 28 73 2e 66 64 29 3b 0a 20 20 20 20 72  ose(s.fd);.    r
1e20: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d  eturn SQLITE_NOM
1e30: 45 4d 3b 0a 20 20 7d 0a 20 20 2a 70 52 65 73 75  EM;.  }.  *pResu
1e40: 6c 74 20 3d 20 73 3b 0a 20 20 72 65 74 75 72 6e  lt = s;.  return
1e50: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64   SQLITE_OK;.#end
1e60: 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20  if.#if OS_WIN.  
1e70: 48 41 4e 44 4c 45 20 68 20 3d 20 43 72 65 61 74  HANDLE h = Creat
1e80: 65 46 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65 2c  eFile(zFilename,
1e90: 0a 20 20 20 20 20 47 45 4e 45 52 49 43 5f 52 45  .     GENERIC_RE
1ea0: 41 44 20 7c 20 47 45 4e 45 52 49 43 5f 57 52 49  AD | GENERIC_WRI
1eb0: 54 45 2c 0a 20 20 20 20 20 46 49 4c 45 5f 53 48  TE,.     FILE_SH
1ec0: 41 52 45 5f 52 45 41 44 20 7c 20 46 49 4c 45 5f  ARE_READ | FILE_
1ed0: 53 48 41 52 45 5f 57 52 49 54 45 2c 0a 20 20 20  SHARE_WRITE,.   
1ee0: 20 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 4f 50 45    NULL,.     OPE
1ef0: 4e 5f 41 4c 57 41 59 53 2c 0a 20 20 20 20 20 46  N_ALWAYS,.     F
1f00: 49 4c 45 5f 41 54 54 52 49 42 55 54 45 5f 4e 4f  ILE_ATTRIBUTE_NO
1f10: 52 4d 41 4c 20 7c 20 46 49 4c 45 5f 46 4c 41 47  RMAL | FILE_FLAG
1f20: 5f 52 41 4e 44 4f 4d 5f 41 43 43 45 53 53 2c 0a  _RANDOM_ACCESS,.
1f30: 20 20 20 20 20 4e 55 4c 4c 0a 20 20 29 3b 0a 20       NULL.  );. 
1f40: 20 69 66 28 20 68 3d 3d 49 4e 56 41 4c 49 44 5f   if( h==INVALID_
1f50: 48 41 4e 44 4c 45 5f 56 41 4c 55 45 20 29 7b 0a  HANDLE_VALUE ){.
1f60: 20 20 20 20 68 20 3d 20 43 72 65 61 74 65 46 69      h = CreateFi
1f70: 6c 65 28 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20 20  le(zFilename,.  
1f80: 20 20 20 20 20 47 45 4e 45 52 49 43 5f 52 45 41       GENERIC_REA
1f90: 44 2c 0a 20 20 20 20 20 20 20 46 49 4c 45 5f 53  D,.       FILE_S
1fa0: 48 41 52 45 5f 52 45 41 44 2c 0a 20 20 20 20 20  HARE_READ,.     
1fb0: 20 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20 4f    NULL,.       O
1fc0: 50 45 4e 5f 41 4c 57 41 59 53 2c 0a 20 20 20 20  PEN_ALWAYS,.    
1fd0: 20 20 20 46 49 4c 45 5f 41 54 54 52 49 42 55 54     FILE_ATTRIBUT
1fe0: 45 5f 4e 4f 52 4d 41 4c 20 7c 20 46 49 4c 45 5f  E_NORMAL | FILE_
1ff0: 46 4c 41 47 5f 52 41 4e 44 4f 4d 5f 41 43 43 45  FLAG_RANDOM_ACCE
2000: 53 53 2c 0a 20 20 20 20 20 20 20 4e 55 4c 4c 0a  SS,.       NULL.
2010: 20 20 20 20 29 3b 0a 20 20 20 20 69 66 28 20 68      );.    if( h
2020: 3d 3d 49 4e 56 41 4c 49 44 5f 48 41 4e 44 4c 45  ==INVALID_HANDLE
2030: 5f 56 41 4c 55 45 20 29 7b 0a 20 20 20 20 20 20  _VALUE ){.      
2040: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41  return SQLITE_CA
2050: 4e 54 4f 50 45 4e 3b 0a 20 20 20 20 7d 0a 20 20  NTOPEN;.    }.  
2060: 20 20 2a 70 52 65 61 64 6f 6e 6c 79 20 3d 20 31    *pReadonly = 1
2070: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 2a  ;.  }else{.    *
2080: 70 52 65 61 64 6f 6e 6c 79 20 3d 20 30 3b 0a 20  pReadonly = 0;. 
2090: 20 7d 0a 20 20 2a 70 52 65 73 75 6c 74 20 3d 20   }.  *pResult = 
20a0: 68 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49  h;.  return SQLI
20b0: 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a  TE_OK;.#endif.}.
20c0: 0a 0a 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20  ../*.** Attempt 
20d0: 74 6f 20 6f 70 65 6e 20 61 20 6e 65 77 20 66 69  to open a new fi
20e0: 6c 65 20 66 6f 72 20 65 78 63 6c 75 73 69 76 65  le for exclusive
20f0: 20 61 63 63 65 73 73 20 62 79 20 74 68 69 73 20   access by this 
2100: 70 72 6f 63 65 73 73 2e 0a 2a 2a 20 54 68 65 20  process..** The 
2110: 66 69 6c 65 20 77 69 6c 6c 20 62 65 20 6f 70 65  file will be ope
2120: 6e 65 64 20 66 6f 72 20 62 6f 74 68 20 72 65 61  ned for both rea
2130: 64 69 6e 67 20 61 6e 64 20 77 72 69 74 69 6e 67  ding and writing
2140: 2e 20 20 54 6f 20 61 76 6f 69 64 0a 2a 2a 20 61  .  To avoid.** a
2150: 20 70 6f 74 65 6e 74 69 61 6c 20 73 65 63 75 72   potential secur
2160: 69 74 79 20 70 72 6f 62 6c 65 6d 2c 20 77 65 20  ity problem, we 
2170: 64 6f 20 6e 6f 74 20 61 6c 6c 6f 77 20 74 68 65  do not allow the
2180: 20 66 69 6c 65 20 74 6f 20 68 61 76 65 0a 2a 2a   file to have.**
2190: 20 70 72 65 76 69 6f 75 73 6c 79 20 65 78 69 73   previously exis
21a0: 74 65 64 2e 20 20 4e 6f 72 20 64 6f 20 77 65 20  ted.  Nor do we 
21b0: 61 6c 6c 6f 77 20 74 68 65 20 66 69 6c 65 20 74  allow the file t
21c0: 6f 20 62 65 20 61 20 73 79 6d 62 6f 6c 69 63 0a  o be a symbolic.
21d0: 2a 2a 20 6c 69 6e 6b 2e 0a 2a 2a 0a 2a 2a 20 4f  ** link..**.** O
21e0: 6e 20 73 75 63 63 65 73 73 2c 20 77 72 69 74 65  n success, write
21f0: 20 74 68 65 20 66 69 6c 65 20 68 61 6e 64 6c 65   the file handle
2200: 20 69 6e 74 6f 20 2a 70 52 65 73 75 6c 74 20 61   into *pResult a
2210: 6e 64 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  nd return SQLITE
2220: 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66 61  _OK..**.** On fa
2230: 69 6c 75 72 65 2c 20 72 65 74 75 72 6e 20 53 51  ilure, return SQ
2240: 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 2e 0a 2a  LITE_CANTOPEN..*
2250: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 4f 70  /.int sqliteOsOp
2260: 65 6e 45 78 63 6c 75 73 69 76 65 28 63 6f 6e 73  enExclusive(cons
2270: 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d  t char *zFilenam
2280: 65 2c 20 4f 73 46 69 6c 65 20 2a 70 52 65 73 75  e, OsFile *pResu
2290: 6c 74 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58  lt){.#if OS_UNIX
22a0: 0a 20 20 4f 73 46 69 6c 65 20 73 3b 0a 20 20 69  .  OsFile s;.  i
22b0: 66 28 20 61 63 63 65 73 73 28 7a 46 69 6c 65 6e  f( access(zFilen
22c0: 61 6d 65 2c 20 30 29 3d 3d 30 20 29 7b 0a 20 20  ame, 0)==0 ){.  
22d0: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
22e0: 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a 23 69  CANTOPEN;.  }.#i
22f0: 66 6e 64 65 66 20 4f 5f 4e 4f 46 4f 4c 4c 4f 57  fndef O_NOFOLLOW
2300: 0a 23 20 64 65 66 69 6e 65 20 4f 5f 4e 4f 46 4f  .# define O_NOFO
2310: 4c 4c 4f 57 20 30 0a 23 65 6e 64 69 66 0a 20 20  LLOW 0.#endif.  
2320: 73 2e 66 64 20 3d 20 6f 70 65 6e 28 7a 46 69 6c  s.fd = open(zFil
2330: 65 6e 61 6d 65 2c 20 4f 5f 52 44 57 52 7c 4f 5f  ename, O_RDWR|O_
2340: 43 52 45 41 54 7c 4f 5f 45 58 43 4c 7c 4f 5f 4e  CREAT|O_EXCL|O_N
2350: 4f 46 4f 4c 4c 4f 57 2c 20 30 36 30 30 29 3b 0a  OFOLLOW, 0600);.
2360: 20 20 69 66 28 20 73 2e 66 64 3c 30 20 29 7b 0a    if( s.fd<0 ){.
2370: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54      return SQLIT
2380: 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a  E_CANTOPEN;.  }.
2390: 20 20 73 71 6c 69 74 65 4f 73 45 6e 74 65 72 4d    sqliteOsEnterM
23a0: 75 74 65 78 28 29 3b 0a 20 20 73 2e 70 4c 6f 63  utex();.  s.pLoc
23b0: 6b 20 3d 20 66 69 6e 64 4c 6f 63 6b 49 6e 66 6f  k = findLockInfo
23c0: 28 73 2e 66 64 29 3b 0a 20 20 73 71 6c 69 74 65  (s.fd);.  sqlite
23d0: 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b 0a  OsLeaveMutex();.
23e0: 20 20 69 66 28 20 73 2e 70 4c 6f 63 6b 3d 3d 30    if( s.pLock==0
23f0: 20 29 7b 0a 20 20 20 20 63 6c 6f 73 65 28 73 2e   ){.    close(s.
2400: 66 64 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20  fd);.    return 
2410: 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20  SQLITE_NOMEM;.  
2420: 7d 0a 20 20 2a 70 52 65 73 75 6c 74 20 3d 20 73  }.  *pResult = s
2430: 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  ;.  return SQLIT
2440: 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 23 69 66  E_OK;.#endif.#if
2450: 20 4f 53 5f 57 49 4e 0a 20 20 48 41 4e 44 4c 45   OS_WIN.  HANDLE
2460: 20 68 20 3d 20 43 72 65 61 74 65 46 69 6c 65 28   h = CreateFile(
2470: 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20 20 20 20 20  zFilename,.     
2480: 47 45 4e 45 52 49 43 5f 52 45 41 44 20 7c 20 47  GENERIC_READ | G
2490: 45 4e 45 52 49 43 5f 57 52 49 54 45 2c 0a 20 20  ENERIC_WRITE,.  
24a0: 20 20 20 30 2c 0a 20 20 20 20 20 4e 55 4c 4c 2c     0,.     NULL,
24b0: 0a 20 20 20 20 20 43 52 45 41 54 45 5f 41 4c 57  .     CREATE_ALW
24c0: 41 59 53 2c 0a 20 20 20 20 20 46 49 4c 45 5f 41  AYS,.     FILE_A
24d0: 54 54 52 49 42 55 54 45 5f 4e 4f 52 4d 41 4c 20  TTRIBUTE_NORMAL 
24e0: 7c 20 46 49 4c 45 5f 46 4c 41 47 5f 52 41 4e 44  | FILE_FLAG_RAND
24f0: 4f 4d 5f 41 43 43 45 53 53 2c 0a 20 20 20 20 20  OM_ACCESS,.     
2500: 4e 55 4c 4c 0a 20 20 29 3b 0a 20 20 69 66 28 20  NULL.  );.  if( 
2510: 68 3d 3d 49 4e 56 41 4c 49 44 5f 48 41 4e 44 4c  h==INVALID_HANDL
2520: 45 5f 56 41 4c 55 45 20 29 7b 0a 20 20 20 20 72  E_VALUE ){.    r
2530: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e  eturn SQLITE_CAN
2540: 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 20 2a 70 52  TOPEN;.  }.  *pR
2550: 65 73 75 6c 74 20 3d 20 68 3b 0a 20 20 72 65 74  esult = h;.  ret
2560: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23  urn SQLITE_OK;.#
2570: 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41  endif.}../*.** A
2580: 74 74 65 6d 70 74 20 74 6f 20 6f 70 65 6e 20 61  ttempt to open a
2590: 20 6e 65 77 20 66 69 6c 65 20 66 6f 72 20 72 65   new file for re
25a0: 61 64 2d 6f 6e 6c 79 20 61 63 63 65 73 73 2e 0a  ad-only access..
25b0: 2a 2a 0a 2a 2a 20 4f 6e 20 73 75 63 63 65 73 73  **.** On success
25c0: 2c 20 77 72 69 74 65 20 74 68 65 20 66 69 6c 65  , write the file
25d0: 20 68 61 6e 64 6c 65 20 69 6e 74 6f 20 2a 70 52   handle into *pR
25e0: 65 73 75 6c 74 20 61 6e 64 20 72 65 74 75 72 6e  esult and return
25f0: 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a 2a 2a 0a 2a   SQLITE_OK..**.*
2600: 2a 20 4f 6e 20 66 61 69 6c 75 72 65 2c 20 72 65  * On failure, re
2610: 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54  turn SQLITE_CANT
2620: 4f 50 45 4e 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c  OPEN..*/.int sql
2630: 69 74 65 4f 73 4f 70 65 6e 52 65 61 64 4f 6e 6c  iteOsOpenReadOnl
2640: 79 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46  y(const char *zF
2650: 69 6c 65 6e 61 6d 65 2c 20 4f 73 46 69 6c 65 20  ilename, OsFile 
2660: 2a 70 52 65 73 75 6c 74 29 7b 0a 23 69 66 20 4f  *pResult){.#if O
2670: 53 5f 55 4e 49 58 0a 20 20 4f 73 46 69 6c 65 20  S_UNIX.  OsFile 
2680: 73 3b 0a 20 20 73 2e 66 64 20 3d 20 6f 70 65 6e  s;.  s.fd = open
2690: 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44  (zFilename, O_RD
26a0: 4f 4e 4c 59 29 3b 0a 20 20 69 66 28 20 73 2e 66  ONLY);.  if( s.f
26b0: 64 3c 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72  d<0 ){.    retur
26c0: 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45  n SQLITE_CANTOPE
26d0: 4e 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 4f  N;.  }.  sqliteO
26e0: 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a 20  sEnterMutex();. 
26f0: 20 73 2e 70 4c 6f 63 6b 20 3d 20 66 69 6e 64 4c   s.pLock = findL
2700: 6f 63 6b 49 6e 66 6f 28 73 2e 66 64 29 3b 0a 20  ockInfo(s.fd);. 
2710: 20 73 71 6c 69 74 65 4f 73 4c 65 61 76 65 4d 75   sqliteOsLeaveMu
2720: 74 65 78 28 29 3b 0a 20 20 69 66 28 20 73 2e 70  tex();.  if( s.p
2730: 4c 6f 63 6b 3d 3d 30 20 29 7b 0a 20 20 20 20 63  Lock==0 ){.    c
2740: 6c 6f 73 65 28 73 2e 66 64 29 3b 0a 20 20 20 20  lose(s.fd);.    
2750: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e 4f  return SQLITE_NO
2760: 4d 45 4d 3b 0a 20 20 7d 0a 20 20 2a 70 52 65 73  MEM;.  }.  *pRes
2770: 75 6c 74 20 3d 20 73 3b 0a 20 20 72 65 74 75 72  ult = s;.  retur
2780: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e  n SQLITE_OK;.#en
2790: 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20  dif.#if OS_WIN. 
27a0: 20 48 41 4e 44 4c 45 20 68 20 3d 20 43 72 65 61   HANDLE h = Crea
27b0: 74 65 46 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65  teFile(zFilename
27c0: 2c 0a 20 20 20 20 20 47 45 4e 45 52 49 43 5f 52  ,.     GENERIC_R
27d0: 45 41 44 2c 0a 20 20 20 20 20 30 2c 0a 20 20 20  EAD,.     0,.   
27e0: 20 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 4f 50 45    NULL,.     OPE
27f0: 4e 5f 45 58 49 53 54 49 4e 47 2c 0a 20 20 20 20  N_EXISTING,.    
2800: 20 46 49 4c 45 5f 41 54 54 52 49 42 55 54 45 5f   FILE_ATTRIBUTE_
2810: 4e 4f 52 4d 41 4c 20 7c 20 46 49 4c 45 5f 46 4c  NORMAL | FILE_FL
2820: 41 47 5f 52 41 4e 44 4f 4d 5f 41 43 43 45 53 53  AG_RANDOM_ACCESS
2830: 2c 0a 20 20 20 20 20 4e 55 4c 4c 0a 20 20 29 3b  ,.     NULL.  );
2840: 0a 20 20 69 66 28 20 68 3d 3d 49 4e 56 41 4c 49  .  if( h==INVALI
2850: 44 5f 48 41 4e 44 4c 45 5f 56 41 4c 55 45 20 29  D_HANDLE_VALUE )
2860: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c  {.    return SQL
2870: 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20  ITE_CANTOPEN;.  
2880: 7d 0a 20 20 2a 70 52 65 73 75 6c 74 20 3d 20 68  }.  *pResult = h
2890: 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  ;.  return SQLIT
28a0: 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a  E_OK;.#endif.}..
28b0: 2f 2a 0a 2a 2a 20 43 72 65 61 74 65 20 61 20 74  /*.** Create a t
28c0: 65 6d 70 6f 72 61 72 79 20 66 69 6c 65 20 6e 61  emporary file na
28d0: 6d 65 20 69 6e 20 7a 42 75 66 2e 20 20 7a 42 75  me in zBuf.  zBu
28e0: 66 20 6d 75 73 74 20 62 65 20 62 69 67 20 65 6e  f must be big en
28f0: 6f 75 67 68 20 74 6f 0a 2a 2a 20 68 6f 6c 64 20  ough to.** hold 
2900: 61 74 20 6c 65 61 73 74 20 53 51 4c 49 54 45 5f  at least SQLITE_
2910: 54 45 4d 50 4e 41 4d 45 5f 53 49 5a 45 20 63 68  TEMPNAME_SIZE ch
2920: 61 72 61 63 74 65 72 73 2e 0a 2a 2f 0a 69 6e 74  aracters..*/.int
2930: 20 73 71 6c 69 74 65 4f 73 54 65 6d 70 46 69 6c   sqliteOsTempFil
2940: 65 4e 61 6d 65 28 63 68 61 72 20 2a 7a 42 75 66  eName(char *zBuf
2950: 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20  ){.#if OS_UNIX. 
2960: 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68   static const ch
2970: 61 72 20 2a 61 7a 44 69 72 73 5b 5d 20 3d 20 7b  ar *azDirs[] = {
2980: 0a 20 20 20 20 20 22 2e 22 2c 0a 20 20 20 20 20  .     ".",.     
2990: 22 2f 76 61 72 2f 74 6d 70 22 2c 0a 20 20 20 20  "/var/tmp",.    
29a0: 20 22 2f 75 73 72 2f 74 6d 70 22 2c 0a 20 20 20   "/usr/tmp",.   
29b0: 20 20 22 2f 74 6d 70 22 2c 0a 20 20 7d 3b 0a 20    "/tmp",.  };. 
29c0: 20 73 74 61 74 69 63 20 63 68 61 72 20 7a 43 68   static char zCh
29d0: 61 72 73 5b 5d 20 3d 0a 20 20 20 20 22 61 62 63  ars[] =.    "abc
29e0: 64 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73  defghijklmnopqrs
29f0: 74 75 76 77 78 79 7a 22 0a 20 20 20 20 22 41 42  tuvwxyz".    "AB
2a00: 43 44 45 46 47 48 49 4a 4b 4c 4d 4e 4f 50 51 52  CDEFGHIJKLMNOPQR
2a10: 53 54 55 56 57 58 59 5a 22 0a 20 20 20 20 22 30  STUVWXYZ".    "0
2a20: 31 32 33 34 35 36 37 38 39 22 3b 0a 20 20 69 6e  123456789";.  in
2a30: 74 20 69 2c 20 6a 3b 0a 20 20 73 74 72 75 63 74  t i, j;.  struct
2a40: 20 73 74 61 74 20 62 75 66 3b 0a 20 20 63 6f 6e   stat buf;.  con
2a50: 73 74 20 63 68 61 72 20 2a 7a 44 69 72 20 3d 20  st char *zDir = 
2a60: 22 2e 22 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20  ".";.  for(i=0; 
2a70: 69 3c 73 69 7a 65 6f 66 28 61 7a 44 69 72 73 29  i<sizeof(azDirs)
2a80: 2f 73 69 7a 65 6f 66 28 61 7a 44 69 72 73 5b 30  /sizeof(azDirs[0
2a90: 5d 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66  ]); i++){.    if
2aa0: 28 20 73 74 61 74 28 61 7a 44 69 72 73 5b 69 5d  ( stat(azDirs[i]
2ab0: 2c 20 26 62 75 66 29 20 29 20 63 6f 6e 74 69 6e  , &buf) ) contin
2ac0: 75 65 3b 0a 20 20 20 20 69 66 28 20 21 53 5f 49  ue;.    if( !S_I
2ad0: 53 44 49 52 28 62 75 66 2e 73 74 5f 6d 6f 64 65  SDIR(buf.st_mode
2ae0: 29 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20  ) ) continue;.  
2af0: 20 20 69 66 28 20 61 63 63 65 73 73 28 61 7a 44    if( access(azD
2b00: 69 72 73 5b 69 5d 2c 20 30 37 29 20 29 20 63 6f  irs[i], 07) ) co
2b10: 6e 74 69 6e 75 65 3b 0a 20 20 20 20 7a 44 69 72  ntinue;.    zDir
2b20: 20 3d 20 61 7a 44 69 72 73 5b 69 5d 3b 0a 20 20   = azDirs[i];.  
2b30: 20 20 62 72 65 61 6b 3b 0a 20 20 7d 0a 20 20 64    break;.  }.  d
2b40: 6f 7b 0a 20 20 20 20 73 70 72 69 6e 74 66 28 7a  o{.    sprintf(z
2b50: 42 75 66 2c 20 22 25 73 2f 73 71 6c 69 74 65 5f  Buf, "%s/sqlite_
2b60: 22 2c 20 7a 44 69 72 29 3b 0a 20 20 20 20 6a 20  ", zDir);.    j 
2b70: 3d 20 73 74 72 6c 65 6e 28 7a 42 75 66 29 3b 0a  = strlen(zBuf);.
2b80: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 31      for(i=0; i<1
2b90: 35 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69  5; i++){.      i
2ba0: 6e 74 20 6e 20 3d 20 73 71 6c 69 74 65 52 61 6e  nt n = sqliteRan
2bb0: 64 6f 6d 42 79 74 65 28 29 20 25 20 28 73 69 7a  domByte() % (siz
2bc0: 65 6f 66 28 7a 43 68 61 72 73 29 2d 31 29 3b 0a  eof(zChars)-1);.
2bd0: 20 20 20 20 20 20 7a 42 75 66 5b 6a 2b 2b 5d 20        zBuf[j++] 
2be0: 3d 20 7a 43 68 61 72 73 5b 6e 5d 3b 0a 20 20 20  = zChars[n];.   
2bf0: 20 7d 0a 20 20 20 20 7a 42 75 66 5b 6a 5d 20 3d   }.    zBuf[j] =
2c00: 20 30 3b 0a 20 20 7d 77 68 69 6c 65 28 20 61 63   0;.  }while( ac
2c10: 63 65 73 73 28 7a 42 75 66 2c 30 29 3d 3d 30 20  cess(zBuf,0)==0 
2c20: 29 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53  );.#endif.#if OS
2c30: 5f 57 49 4e 0a 20 20 73 74 61 74 69 63 20 63 68  _WIN.  static ch
2c40: 61 72 20 7a 43 68 61 72 73 5b 5d 20 3d 0a 20 20  ar zChars[] =.  
2c50: 20 20 22 61 62 63 64 65 66 67 68 69 6a 6b 6c 6d    "abcdefghijklm
2c60: 6e 6f 70 71 72 73 74 75 76 77 78 79 7a 22 0a 20  nopqrstuvwxyz". 
2c70: 20 20 20 22 41 42 43 44 45 46 47 48 49 4a 4b 4c     "ABCDEFGHIJKL
2c80: 4d 4e 4f 50 51 52 53 54 55 56 57 58 59 5a 22 0a  MNOPQRSTUVWXYZ".
2c90: 20 20 20 20 22 30 31 32 33 34 35 36 37 38 39 22      "0123456789"
2ca0: 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a 20 20  ;.  int i, j;.  
2cb0: 63 68 61 72 20 7a 54 65 6d 70 50 61 74 68 5b 53  char zTempPath[S
2cc0: 51 4c 49 54 45 5f 54 45 4d 50 4e 41 4d 45 5f 53  QLITE_TEMPNAME_S
2cd0: 49 5a 45 5d 3b 0a 20 20 47 65 74 54 65 6d 70 50  IZE];.  GetTempP
2ce0: 61 74 68 28 53 51 4c 49 54 45 5f 54 45 4d 50 4e  ath(SQLITE_TEMPN
2cf0: 41 4d 45 5f 53 49 5a 45 2d 33 30 2c 20 7a 54 65  AME_SIZE-30, zTe
2d00: 6d 70 50 61 74 68 29 3b 0a 20 20 66 6f 72 28 3b  mpPath);.  for(;
2d10: 3b 29 7b 0a 20 20 20 20 73 70 72 69 6e 74 66 28  ;){.    sprintf(
2d20: 7a 42 75 66 2c 20 22 25 73 2f 73 71 6c 69 74 65  zBuf, "%s/sqlite
2d30: 5f 22 2c 20 7a 54 65 6d 70 50 61 74 68 29 3b 0a  _", zTempPath);.
2d40: 20 20 20 20 6a 20 3d 20 73 74 72 6c 65 6e 28 7a      j = strlen(z
2d50: 42 75 66 29 3b 0a 20 20 20 20 66 6f 72 28 69 3d  Buf);.    for(i=
2d60: 30 3b 20 69 3c 31 35 3b 20 69 2b 2b 29 7b 0a 20  0; i<15; i++){. 
2d70: 20 20 20 20 20 69 6e 74 20 6e 20 3d 20 73 71 6c       int n = sql
2d80: 69 74 65 52 61 6e 64 6f 6d 42 79 74 65 28 29 20  iteRandomByte() 
2d90: 25 20 73 69 7a 65 6f 66 28 7a 43 68 61 72 73 29  % sizeof(zChars)
2da0: 3b 0a 20 20 20 20 20 20 7a 42 75 66 5b 6a 2b 2b  ;.      zBuf[j++
2db0: 5d 20 3d 20 7a 43 68 61 72 73 5b 6e 5d 3b 0a 20  ] = zChars[n];. 
2dc0: 20 20 20 7d 0a 20 20 20 20 7a 42 75 66 5b 6a 5d     }.    zBuf[j]
2dd0: 20 3d 20 30 3b 0a 20 20 20 20 69 66 28 20 21 73   = 0;.    if( !s
2de0: 71 6c 69 74 65 4f 73 46 69 6c 65 45 78 69 73 74  qliteOsFileExist
2df0: 73 28 7a 42 75 66 29 20 29 20 62 72 65 61 6b 3b  s(zBuf) ) break;
2e00: 0a 20 20 7d 0a 23 65 6e 64 69 66 0a 20 20 72 65  .  }.#endif.  re
2e10: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 20  turn SQLITE_OK; 
2e20: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6c 6f 73 65 20  .}../*.** Close 
2e30: 61 20 66 69 6c 65 0a 2a 2f 0a 69 6e 74 20 73 71  a file.*/.int sq
2e40: 6c 69 74 65 4f 73 43 6c 6f 73 65 28 4f 73 46 69  liteOsClose(OsFi
2e50: 6c 65 20 69 64 29 7b 0a 23 69 66 20 4f 53 5f 55  le id){.#if OS_U
2e60: 4e 49 58 0a 20 20 63 6c 6f 73 65 28 69 64 2e 66  NIX.  close(id.f
2e70: 64 29 3b 0a 20 20 73 71 6c 69 74 65 4f 73 45 6e  d);.  sqliteOsEn
2e80: 74 65 72 4d 75 74 65 78 28 29 3b 0a 20 20 72 65  terMutex();.  re
2e90: 6c 65 61 73 65 4c 6f 63 6b 49 6e 66 6f 28 69 64  leaseLockInfo(id
2ea0: 2e 70 4c 6f 63 6b 29 3b 0a 20 20 73 71 6c 69 74  .pLock);.  sqlit
2eb0: 65 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b  eOsLeaveMutex();
2ec0: 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  .  return SQLITE
2ed0: 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20  _OK;.#endif.#if 
2ee0: 4f 53 5f 57 49 4e 0a 20 20 43 6c 6f 73 65 48 61  OS_WIN.  CloseHa
2ef0: 6e 64 6c 65 28 69 64 29 3b 0a 20 20 72 65 74 75  ndle(id);.  retu
2f00: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65  rn SQLITE_OK;.#e
2f10: 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65  ndif.}../*.** Re
2f20: 61 64 20 64 61 74 61 20 66 72 6f 6d 20 61 20 66  ad data from a f
2f30: 69 6c 65 20 69 6e 74 6f 20 61 20 62 75 66 66 65  ile into a buffe
2f40: 72 2e 20 20 52 65 74 75 72 6e 20 74 68 65 20 6e  r.  Return the n
2f50: 75 6d 62 65 72 20 6f 66 0a 2a 2a 20 62 79 74 65  umber of.** byte
2f60: 73 20 61 63 74 75 61 6c 6c 79 20 72 65 61 64 2e  s actually read.
2f70: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73  .*/.int sqliteOs
2f80: 52 65 61 64 28 4f 73 46 69 6c 65 20 69 64 2c 20  Read(OsFile id, 
2f90: 76 6f 69 64 20 2a 70 42 75 66 2c 20 69 6e 74 20  void *pBuf, int 
2fa0: 61 6d 74 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49  amt){.#if OS_UNI
2fb0: 58 0a 20 20 69 6e 74 20 67 6f 74 3b 0a 20 20 53  X.  int got;.  S
2fc0: 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53  imulateIOError(S
2fd0: 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20  QLITE_IOERR);.  
2fe0: 67 6f 74 20 3d 20 72 65 61 64 28 69 64 2e 66 64  got = read(id.fd
2ff0: 2c 20 70 42 75 66 2c 20 61 6d 74 29 3b 0a 20 20  , pBuf, amt);.  
3000: 69 66 28 20 67 6f 74 3c 30 20 29 20 67 6f 74 20  if( got<0 ) got 
3010: 3d 20 30 3b 0a 20 20 72 65 74 75 72 6e 20 67 6f  = 0;.  return go
3020: 74 3d 3d 61 6d 74 20 3f 20 53 51 4c 49 54 45 5f  t==amt ? SQLITE_
3030: 4f 4b 20 3a 20 53 51 4c 49 54 45 5f 49 4f 45 52  OK : SQLITE_IOER
3040: 52 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53  R;.#endif.#if OS
3050: 5f 57 49 4e 0a 20 20 44 57 4f 52 44 20 67 6f 74  _WIN.  DWORD got
3060: 3b 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f 45 72  ;.  SimulateIOEr
3070: 72 6f 72 28 53 51 4c 49 54 45 5f 49 4f 45 52 52  ror(SQLITE_IOERR
3080: 29 3b 0a 20 20 69 66 28 20 21 52 65 61 64 46 69  );.  if( !ReadFi
3090: 6c 65 28 69 64 2c 20 70 42 75 66 2c 20 61 6d 74  le(id, pBuf, amt
30a0: 2c 20 26 67 6f 74 2c 20 30 29 20 29 7b 0a 20 20  , &got, 0) ){.  
30b0: 20 20 67 6f 74 20 3d 20 30 3b 0a 20 20 7d 0a 20    got = 0;.  }. 
30c0: 20 72 65 74 75 72 6e 20 67 6f 74 3d 3d 61 6d 74   return got==amt
30d0: 20 3f 20 53 51 4c 49 54 45 5f 4f 4b 20 3a 20 53   ? SQLITE_OK : S
30e0: 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 23 65 6e  QLITE_IOERR;.#en
30f0: 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 72 69  dif.}../*.** Wri
3100: 74 65 20 64 61 74 61 20 66 72 6f 6d 20 61 20 62  te data from a b
3110: 75 66 66 65 72 20 69 6e 74 6f 20 61 20 66 69 6c  uffer into a fil
3120: 65 2e 20 20 52 65 74 75 72 6e 20 53 51 4c 49 54  e.  Return SQLIT
3130: 45 5f 4f 4b 20 6f 6e 20 73 75 63 63 65 73 73 0a  E_OK on success.
3140: 2a 2a 20 6f 72 20 73 6f 6d 65 20 6f 74 68 65 72  ** or some other
3150: 20 65 72 72 6f 72 20 63 6f 64 65 20 6f 6e 20 66   error code on f
3160: 61 69 6c 75 72 65 2e 0a 2a 2f 0a 69 6e 74 20 73  ailure..*/.int s
3170: 71 6c 69 74 65 4f 73 57 72 69 74 65 28 4f 73 46  qliteOsWrite(OsF
3180: 69 6c 65 20 69 64 2c 20 63 6f 6e 73 74 20 76 6f  ile id, const vo
3190: 69 64 20 2a 70 42 75 66 2c 20 69 6e 74 20 61 6d  id *pBuf, int am
31a0: 74 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a  t){.#if OS_UNIX.
31b0: 20 20 69 6e 74 20 77 72 6f 74 65 3b 0a 20 20 53    int wrote;.  S
31c0: 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53  imulateIOError(S
31d0: 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20  QLITE_IOERR);.  
31e0: 77 72 6f 74 65 20 3d 20 77 72 69 74 65 28 69 64  wrote = write(id
31f0: 2e 66 64 2c 20 70 42 75 66 2c 20 61 6d 74 29 3b  .fd, pBuf, amt);
3200: 0a 20 20 69 66 28 20 77 72 6f 74 65 3c 61 6d 74  .  if( wrote<amt
3210: 20 29 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45   ) return SQLITE
3220: 5f 46 55 4c 4c 3b 0a 20 20 72 65 74 75 72 6e 20  _FULL;.  return 
3230: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69  SQLITE_OK;.#endi
3240: 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 44  f.#if OS_WIN.  D
3250: 57 4f 52 44 20 77 72 6f 74 65 3b 0a 20 20 53 69  WORD wrote;.  Si
3260: 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53 51  mulateIOError(SQ
3270: 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20 69  LITE_IOERR);.  i
3280: 66 28 20 21 57 72 69 74 65 46 69 6c 65 28 69 64  f( !WriteFile(id
3290: 2c 20 70 42 75 66 2c 20 61 6d 74 2c 20 26 77 72  , pBuf, amt, &wr
32a0: 6f 74 65 2c 20 30 29 20 7c 7c 20 77 72 6f 74 65  ote, 0) || wrote
32b0: 3c 61 6d 74 20 29 7b 0a 20 20 20 20 72 65 74 75  <amt ){.    retu
32c0: 72 6e 20 53 51 4c 49 54 45 5f 46 55 4c 4c 3b 0a  rn SQLITE_FULL;.
32d0: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 53 51 4c    }.  return SQL
32e0: 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d  ITE_OK;.#endif.}
32f0: 0a 0a 2f 2a 0a 2a 2a 20 4d 6f 76 65 20 74 68 65  ../*.** Move the
3300: 20 72 65 61 64 2f 77 72 69 74 65 20 70 6f 69 6e   read/write poin
3310: 74 65 72 20 69 6e 20 61 20 66 69 6c 65 2e 0a 2a  ter in a file..*
3320: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 53 65  /.int sqliteOsSe
3330: 65 6b 28 4f 73 46 69 6c 65 20 69 64 2c 20 69 6e  ek(OsFile id, in
3340: 74 20 6f 66 66 73 65 74 29 7b 0a 23 69 66 20 4f  t offset){.#if O
3350: 53 5f 55 4e 49 58 0a 20 20 6c 73 65 65 6b 28 69  S_UNIX.  lseek(i
3360: 64 2e 66 64 2c 20 6f 66 66 73 65 74 2c 20 53 45  d.fd, offset, SE
3370: 45 4b 5f 53 45 54 29 3b 0a 20 20 72 65 74 75 72  EK_SET);.  retur
3380: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e  n SQLITE_OK;.#en
3390: 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20  dif.#if OS_WIN. 
33a0: 20 53 65 74 46 69 6c 65 50 6f 69 6e 74 65 72 28   SetFilePointer(
33b0: 69 64 2c 20 6f 66 66 73 65 74 2c 20 30 2c 20 46  id, offset, 0, F
33c0: 49 4c 45 5f 42 45 47 49 4e 29 3b 0a 20 20 72 65  ILE_BEGIN);.  re
33d0: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  turn SQLITE_OK;.
33e0: 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  #endif.}../*.** 
33f0: 4d 61 6b 65 20 73 75 72 65 20 61 6c 6c 20 77 72  Make sure all wr
3400: 69 74 65 73 20 74 6f 20 61 20 70 61 72 74 69 63  ites to a partic
3410: 75 6c 61 72 20 66 69 6c 65 20 61 72 65 20 63 6f  ular file are co
3420: 6d 6d 69 74 74 65 64 20 74 6f 20 64 69 73 6b 2e  mmitted to disk.
3430: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73  .*/.int sqliteOs
3440: 53 79 6e 63 28 4f 73 46 69 6c 65 20 69 64 29 7b  Sync(OsFile id){
3450: 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f 45 72 72  .  SimulateIOErr
3460: 6f 72 28 53 51 4c 49 54 45 5f 49 4f 45 52 52 29  or(SQLITE_IOERR)
3470: 3b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20  ;.#if OS_UNIX.  
3480: 72 65 74 75 72 6e 20 66 73 79 6e 63 28 69 64 2e  return fsync(id.
3490: 66 64 29 3d 3d 30 20 3f 20 53 51 4c 49 54 45 5f  fd)==0 ? SQLITE_
34a0: 4f 4b 20 3a 20 53 51 4c 49 54 45 5f 49 4f 45 52  OK : SQLITE_IOER
34b0: 52 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53  R;.#endif.#if OS
34c0: 5f 57 49 4e 0a 20 20 72 65 74 75 72 6e 20 46 6c  _WIN.  return Fl
34d0: 75 73 68 46 69 6c 65 42 75 66 66 65 72 73 28 69  ushFileBuffers(i
34e0: 64 29 20 3f 20 53 51 4c 49 54 45 5f 4f 4b 20 3a  d) ? SQLITE_OK :
34f0: 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 23   SQLITE_IOERR;.#
3500: 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  endif.}../*.** T
3510: 72 75 6e 63 61 74 65 20 61 6e 20 6f 70 65 6e 20  runcate an open 
3520: 66 69 6c 65 20 74 6f 20 61 20 73 70 65 63 69 66  file to a specif
3530: 69 65 64 20 73 69 7a 65 0a 2a 2f 0a 69 6e 74 20  ied size.*/.int 
3540: 73 71 6c 69 74 65 4f 73 54 72 75 6e 63 61 74 65  sqliteOsTruncate
3550: 28 4f 73 46 69 6c 65 20 69 64 2c 20 69 6e 74 20  (OsFile id, int 
3560: 6e 42 79 74 65 29 7b 0a 20 20 53 69 6d 75 6c 61  nByte){.  Simula
3570: 74 65 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45  teIOError(SQLITE
3580: 5f 49 4f 45 52 52 29 3b 0a 23 69 66 20 4f 53 5f  _IOERR);.#if OS_
3590: 55 4e 49 58 0a 20 20 72 65 74 75 72 6e 20 66 74  UNIX.  return ft
35a0: 72 75 6e 63 61 74 65 28 69 64 2e 66 64 2c 20 6e  runcate(id.fd, n
35b0: 42 79 74 65 29 3d 3d 30 20 3f 20 53 51 4c 49 54  Byte)==0 ? SQLIT
35c0: 45 5f 4f 4b 20 3a 20 53 51 4c 49 54 45 5f 49 4f  E_OK : SQLITE_IO
35d0: 45 52 52 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20  ERR;.#endif.#if 
35e0: 4f 53 5f 57 49 4e 0a 20 20 53 65 74 46 69 6c 65  OS_WIN.  SetFile
35f0: 50 6f 69 6e 74 65 72 28 69 64 2c 20 6e 42 79 74  Pointer(id, nByt
3600: 65 2c 20 30 2c 20 46 49 4c 45 5f 42 45 47 49 4e  e, 0, FILE_BEGIN
3610: 29 3b 0a 20 20 53 65 74 45 6e 64 4f 66 46 69 6c  );.  SetEndOfFil
3620: 65 28 69 64 29 3b 0a 20 20 72 65 74 75 72 6e 20  e(id);.  return 
3630: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69  SQLITE_OK;.#endi
3640: 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 44 65 74 65 72  f.}../*.** Deter
3650: 6d 69 6e 65 20 74 68 65 20 63 75 72 72 65 6e 74  mine the current
3660: 20 73 69 7a 65 20 6f 66 20 61 20 66 69 6c 65 20   size of a file 
3670: 69 6e 20 62 79 74 65 73 0a 2a 2f 0a 69 6e 74 20  in bytes.*/.int 
3680: 73 71 6c 69 74 65 4f 73 46 69 6c 65 53 69 7a 65  sqliteOsFileSize
3690: 28 4f 73 46 69 6c 65 20 69 64 2c 20 69 6e 74 20  (OsFile id, int 
36a0: 2a 70 53 69 7a 65 29 7b 0a 23 69 66 20 4f 53 5f  *pSize){.#if OS_
36b0: 55 4e 49 58 0a 20 20 73 74 72 75 63 74 20 73 74  UNIX.  struct st
36c0: 61 74 20 62 75 66 3b 0a 20 20 53 69 6d 75 6c 61  at buf;.  Simula
36d0: 74 65 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45  teIOError(SQLITE
36e0: 5f 49 4f 45 52 52 29 3b 0a 20 20 69 66 28 20 66  _IOERR);.  if( f
36f0: 73 74 61 74 28 69 64 2e 66 64 2c 20 26 62 75 66  stat(id.fd, &buf
3700: 29 21 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75  )!=0 ){.    retu
3710: 72 6e 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b  rn SQLITE_IOERR;
3720: 0a 20 20 7d 0a 20 20 2a 70 53 69 7a 65 20 3d 20  .  }.  *pSize = 
3730: 62 75 66 2e 73 74 5f 73 69 7a 65 3b 0a 20 20 72  buf.st_size;.  r
3740: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b  eturn SQLITE_OK;
3750: 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53 5f 57  .#endif.#if OS_W
3760: 49 4e 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f 45  IN.  SimulateIOE
3770: 72 72 6f 72 28 53 51 4c 49 54 45 5f 49 4f 45 52  rror(SQLITE_IOER
3780: 52 29 3b 0a 20 20 2a 70 53 69 7a 65 20 3d 20 47  R);.  *pSize = G
3790: 65 74 46 69 6c 65 53 69 7a 65 28 69 64 2c 20 30  etFileSize(id, 0
37a0: 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49  );.  return SQLI
37b0: 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a  TE_OK;.#endif.}.
37c0: 0a 0a 2f 2a 0a 2a 2a 20 47 65 74 20 61 20 72 65  ../*.** Get a re
37d0: 61 64 20 6f 72 20 77 72 69 74 65 20 6c 6f 63 6b  ad or write lock
37e0: 20 6f 6e 20 61 20 66 69 6c 65 2e 0a 2a 2f 0a 69   on a file..*/.i
37f0: 6e 74 20 73 71 6c 69 74 65 4f 73 4c 6f 63 6b 28  nt sqliteOsLock(
3800: 4f 73 46 69 6c 65 20 69 64 2c 20 69 6e 74 20 77  OsFile id, int w
3810: 72 6c 6f 63 6b 29 7b 0a 23 69 66 20 4f 53 5f 55  rlock){.#if OS_U
3820: 4e 49 58 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20  NIX.  int rc;.  
3830: 69 6e 74 20 6e 65 65 64 53 79 73 4c 6f 63 6b 3b  int needSysLock;
3840: 0a 20 20 73 71 6c 69 74 65 4f 73 45 6e 74 65 72  .  sqliteOsEnter
3850: 4d 75 74 65 78 28 29 3b 0a 20 20 69 66 28 20 77  Mutex();.  if( w
3860: 72 6c 6f 63 6b 20 29 7b 0a 20 20 20 20 69 66 28  rlock ){.    if(
3870: 20 69 64 2e 70 4c 6f 63 6b 2d 3e 63 6e 74 21 3d   id.pLock->cnt!=
3880: 30 20 29 7b 0a 20 20 20 20 20 20 72 63 20 3d 20  0 ){.      rc = 
3890: 53 51 4c 49 54 45 5f 42 55 53 59 3b 0a 20 20 20  SQLITE_BUSY;.   
38a0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 72 63   }else{.      rc
38b0: 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20   = SQLITE_OK;.  
38c0: 20 20 20 20 69 64 2e 70 4c 6f 63 6b 2d 3e 63 6e      id.pLock->cn
38d0: 74 20 3d 20 2d 31 3b 0a 20 20 20 20 20 20 6e 65  t = -1;.      ne
38e0: 65 64 53 79 73 4c 6f 63 6b 20 3d 20 31 3b 0a 20  edSysLock = 1;. 
38f0: 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20     }.  }else{.  
3900: 20 20 69 66 28 20 69 64 2e 70 4c 6f 63 6b 2d 3e    if( id.pLock->
3910: 63 6e 74 3c 30 20 29 7b 0a 20 20 20 20 20 20 72  cnt<0 ){.      r
3920: 63 20 3d 20 53 51 4c 49 54 45 5f 42 55 53 59 3b  c = SQLITE_BUSY;
3930: 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  .    }else{.    
3940: 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b    rc = SQLITE_OK
3950: 3b 0a 20 20 20 20 20 20 6e 65 65 64 53 79 73 4c  ;.      needSysL
3960: 6f 63 6b 20 3d 20 69 64 2e 70 4c 6f 63 6b 2d 3e  ock = id.pLock->
3970: 63 6e 74 3d 3d 30 3b 0a 20 20 20 20 20 20 69 64  cnt==0;.      id
3980: 2e 70 4c 6f 63 6b 2d 3e 63 6e 74 2b 2b 3b 0a 20  .pLock->cnt++;. 
3990: 20 20 20 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74     }.  }.  sqlit
39a0: 65 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b  eOsLeaveMutex();
39b0: 20 20 20 20 20 20 0a 20 20 69 66 28 20 72 63 3d        .  if( rc=
39c0: 3d 53 51 4c 49 54 45 5f 4f 4b 20 26 26 20 6e 65  =SQLITE_OK && ne
39d0: 65 64 53 79 73 4c 6f 63 6b 20 29 7b 20 0a 20 20  edSysLock ){ .  
39e0: 20 20 73 74 72 75 63 74 20 66 6c 6f 63 6b 20 6c    struct flock l
39f0: 6f 63 6b 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f  ock;.    lock.l_
3a00: 74 79 70 65 20 3d 20 77 72 6c 6f 63 6b 20 3f 20  type = wrlock ? 
3a10: 46 5f 57 52 4c 43 4b 20 3a 20 46 5f 52 44 4c 43  F_WRLCK : F_RDLC
3a20: 4b 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 77 68  K;.    lock.l_wh
3a30: 65 6e 63 65 20 3d 20 53 45 45 4b 5f 53 45 54 3b  ence = SEEK_SET;
3a40: 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 73 74 61 72  .    lock.l_star
3a50: 74 20 3d 20 6c 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d  t = lock.l_len =
3a60: 20 30 4c 3b 0a 20 20 20 20 72 63 20 3d 20 66 63   0L;.    rc = fc
3a70: 6e 74 6c 28 69 64 2e 66 64 2c 20 46 5f 53 45 54  ntl(id.fd, F_SET
3a80: 4c 4b 2c 20 26 6c 6f 63 6b 29 3d 3d 30 20 3f 20  LK, &lock)==0 ? 
3a90: 53 51 4c 49 54 45 5f 4f 4b 20 3a 20 53 51 4c 49  SQLITE_OK : SQLI
3aa0: 54 45 5f 42 55 53 59 3b 0a 20 20 7d 0a 20 20 72  TE_BUSY;.  }.  r
3ab0: 65 74 75 72 6e 20 72 63 3b 0a 23 65 6e 64 69 66  eturn rc;.#endif
3ac0: 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 69 66  .#if OS_WIN.  if
3ad0: 28 20 21 4c 6f 63 6b 46 69 6c 65 28 69 64 2c 20  ( !LockFile(id, 
3ae0: 30 2c 20 30 2c 20 31 30 32 34 2c 20 30 29 20 29  0, 0, 1024, 0) )
3af0: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c  {.    return SQL
3b00: 49 54 45 5f 42 55 53 59 3b 0a 20 20 7d 0a 20 20  ITE_BUSY;.  }.  
3b10: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b  return SQLITE_OK
3b20: 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a  ;.#endif.}../*.*
3b30: 2a 20 52 65 6c 65 61 73 65 20 74 68 65 20 72 65  * Release the re
3b40: 61 64 20 6f 72 20 77 72 69 74 65 20 6c 6f 63 6b  ad or write lock
3b50: 20 66 72 6f 6d 20 61 20 66 69 6c 65 2e 0a 2a 2f   from a file..*/
3b60: 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 55 6e 6c  .int sqliteOsUnl
3b70: 6f 63 6b 28 4f 73 46 69 6c 65 20 69 64 29 7b 0a  ock(OsFile id){.
3b80: 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 69 6e  #if OS_UNIX.  in
3b90: 74 20 72 63 3b 0a 20 20 69 6e 74 20 6e 65 65 64  t rc;.  int need
3ba0: 53 79 73 55 6e 6c 6f 63 6b 3b 0a 0a 20 20 73 71  SysUnlock;..  sq
3bb0: 6c 69 74 65 4f 73 45 6e 74 65 72 4d 75 74 65 78  liteOsEnterMutex
3bc0: 28 29 3b 0a 20 20 69 66 28 20 69 64 2e 70 4c 6f  ();.  if( id.pLo
3bd0: 63 6b 2d 3e 63 6e 74 3c 30 20 29 7b 0a 20 20 20  ck->cnt<0 ){.   
3be0: 20 6e 65 65 64 53 79 73 55 6e 6c 6f 63 6b 20 3d   needSysUnlock =
3bf0: 20 31 3b 0a 20 20 20 20 69 64 2e 70 4c 6f 63 6b   1;.    id.pLock
3c00: 2d 3e 63 6e 74 20 3d 20 30 3b 0a 20 20 7d 65 6c  ->cnt = 0;.  }el
3c10: 73 65 20 69 66 28 20 69 64 2e 70 4c 6f 63 6b 2d  se if( id.pLock-
3c20: 3e 63 6e 74 3e 30 20 29 7b 0a 20 20 20 20 69 64  >cnt>0 ){.    id
3c30: 2e 70 4c 6f 63 6b 2d 3e 63 6e 74 2d 2d 3b 0a 20  .pLock->cnt--;. 
3c40: 20 20 20 6e 65 65 64 53 79 73 55 6e 6c 6f 63 6b     needSysUnlock
3c50: 20 3d 20 69 64 2e 70 4c 6f 63 6b 2d 3e 63 6e 74   = id.pLock->cnt
3c60: 3d 3d 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  ==0;.  }else{.  
3c70: 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b    rc = SQLITE_OK
3c80: 3b 0a 20 20 20 20 6e 65 65 64 53 79 73 55 6e 6c  ;.    needSysUnl
3c90: 6f 63 6b 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 73  ock = 0;.  }.  s
3ca0: 71 6c 69 74 65 4f 73 4c 65 61 76 65 4d 75 74 65  qliteOsLeaveMute
3cb0: 78 28 29 3b 0a 20 20 69 66 28 20 6e 65 65 64 53  x();.  if( needS
3cc0: 79 73 55 6e 6c 6f 63 6b 20 29 7b 0a 20 20 20 20  ysUnlock ){.    
3cd0: 73 74 72 75 63 74 20 66 6c 6f 63 6b 20 6c 6f 63  struct flock loc
3ce0: 6b 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f 74 79  k;.    lock.l_ty
3cf0: 70 65 20 3d 20 46 5f 55 4e 4c 43 4b 3b 0a 20 20  pe = F_UNLCK;.  
3d00: 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65 20    lock.l_whence 
3d10: 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 20 20 20 20  = SEEK_SET;.    
3d20: 6c 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 6c  lock.l_start = l
3d30: 6f 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 30 4c 3b 0a  ock.l_len = 0L;.
3d40: 20 20 20 20 72 63 20 3d 20 66 63 6e 74 6c 28 69      rc = fcntl(i
3d50: 64 2e 66 64 2c 20 46 5f 53 45 54 4c 4b 2c 20 26  d.fd, F_SETLK, &
3d60: 6c 6f 63 6b 29 3d 3d 30 20 3f 20 53 51 4c 49 54  lock)==0 ? SQLIT
3d70: 45 5f 4f 4b 20 3a 20 53 51 4c 49 54 45 5f 49 4f  E_OK : SQLITE_IO
3d80: 45 52 52 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72  ERR;.  }.  retur
3d90: 6e 20 72 63 3b 0a 23 65 6e 64 69 66 0a 23 69 66  n rc;.#endif.#if
3da0: 20 4f 53 5f 57 49 4e 0a 20 20 72 65 74 75 72 6e   OS_WIN.  return
3db0: 20 55 6e 6c 6f 63 6b 46 69 6c 65 28 69 64 2c 20   UnlockFile(id, 
3dc0: 30 2c 20 30 2c 20 31 30 32 34 2c 20 30 29 20 3f  0, 0, 1024, 0) ?
3dd0: 20 53 51 4c 49 54 45 5f 4f 4b 20 3a 20 53 51 4c   SQLITE_OK : SQL
3de0: 49 54 45 5f 49 4f 45 52 52 3b 0a 23 65 6e 64 69  ITE_IOERR;.#endi
3df0: 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 65 74 20 69  f.}../*.** Get i
3e00: 6e 66 6f 72 6d 61 74 69 6f 6e 20 74 6f 20 73 65  nformation to se
3e10: 65 64 20 74 68 65 20 72 61 6e 64 6f 6d 20 6e 75  ed the random nu
3e20: 6d 62 65 72 20 67 65 6e 65 72 61 74 6f 72 2e 0a  mber generator..
3e30: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 52  */.int sqliteOsR
3e40: 61 6e 64 6f 6d 53 65 65 64 28 63 68 61 72 20 2a  andomSeed(char *
3e50: 7a 42 75 66 29 7b 0a 20 20 73 74 61 74 69 63 20  zBuf){.  static 
3e60: 69 6e 74 20 6f 6e 63 65 20 3d 20 31 3b 0a 23 69  int once = 1;.#i
3e70: 66 20 4f 53 5f 55 4e 49 58 0a 20 20 69 6e 74 20  f OS_UNIX.  int 
3e80: 70 69 64 3b 0a 20 20 74 69 6d 65 28 28 74 69 6d  pid;.  time((tim
3e90: 65 5f 74 2a 29 7a 42 75 66 29 3b 0a 20 20 70 69  e_t*)zBuf);.  pi
3ea0: 64 20 3d 20 67 65 74 70 69 64 28 29 3b 0a 20 20  d = getpid();.  
3eb0: 6d 65 6d 63 70 79 28 26 7a 42 75 66 5b 73 69 7a  memcpy(&zBuf[siz
3ec0: 65 6f 66 28 74 69 6d 65 5f 74 29 5d 2c 20 26 70  eof(time_t)], &p
3ed0: 69 64 2c 20 73 69 7a 65 6f 66 28 70 69 64 29 29  id, sizeof(pid))
3ee0: 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53 5f  ;.#endif.#if OS_
3ef0: 57 49 4e 0a 20 20 47 65 74 53 79 73 74 65 6d 54  WIN.  GetSystemT
3f00: 69 6d 65 28 28 4c 50 53 59 53 54 45 4d 54 49 4d  ime((LPSYSTEMTIM
3f10: 45 29 7a 42 75 66 29 3b 0a 23 65 6e 64 69 66 0a  E)zBuf);.#endif.
3f20: 20 20 69 66 28 20 6f 6e 63 65 20 29 7b 0a 20 20    if( once ){.  
3f30: 20 20 69 6e 74 20 73 65 65 64 3b 0a 20 20 20 20    int seed;.    
3f40: 6d 65 6d 63 70 79 28 26 73 65 65 64 2c 20 7a 42  memcpy(&seed, zB
3f50: 75 66 2c 20 73 69 7a 65 6f 66 28 73 65 65 64 29  uf, sizeof(seed)
3f60: 29 3b 0a 20 20 20 20 73 72 61 6e 64 28 73 65 65  );.    srand(see
3f70: 64 29 3b 0a 20 20 20 20 6f 6e 63 65 20 3d 20 30  d);.    once = 0
3f80: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 53  ;.  }.  return S
3f90: 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a  QLITE_OK;.}../*.
3fa0: 2a 2a 20 53 6c 65 65 70 20 66 6f 72 20 61 20 6c  ** Sleep for a l
3fb0: 69 74 74 6c 65 20 77 68 69 6c 65 2e 20 20 52 65  ittle while.  Re
3fc0: 74 75 72 6e 20 74 68 65 20 61 6d 6f 75 6e 74 20  turn the amount 
3fd0: 6f 66 20 74 69 6d 65 20 73 6c 65 70 74 2e 0a 2a  of time slept..*
3fe0: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 53 6c  /.int sqliteOsSl
3ff0: 65 65 70 28 69 6e 74 20 6d 73 29 7b 0a 23 69 66  eep(int ms){.#if
4000: 20 4f 53 5f 55 4e 49 58 0a 23 69 66 20 64 65 66   OS_UNIX.#if def
4010: 69 6e 65 64 28 48 41 56 45 5f 55 53 4c 45 45 50  ined(HAVE_USLEEP
4020: 29 20 26 26 20 48 41 56 45 5f 55 53 4c 45 45 50  ) && HAVE_USLEEP
4030: 0a 20 20 75 73 6c 65 65 70 28 6d 73 2a 31 30 30  .  usleep(ms*100
4040: 30 29 3b 0a 20 20 72 65 74 75 72 6e 20 6d 73 3b  0);.  return ms;
4050: 0a 23 65 6c 73 65 0a 20 20 73 6c 65 65 70 28 28  .#else.  sleep((
4060: 6d 73 2b 39 39 39 29 2f 31 30 30 30 29 3b 0a 20  ms+999)/1000);. 
4070: 20 72 65 74 75 72 6e 20 31 30 30 30 2a 28 28 6d   return 1000*((m
4080: 73 2b 39 39 39 29 2f 31 30 30 30 29 3b 0a 23 65  s+999)/1000);.#e
4090: 6e 64 69 66 0a 23 65 6e 64 69 66 0a 23 69 66 20  ndif.#endif.#if 
40a0: 4f 53 5f 57 49 4e 0a 20 20 53 6c 65 65 70 28 6d  OS_WIN.  Sleep(m
40b0: 73 29 3b 0a 20 20 72 65 74 75 72 6e 20 6d 73 3b  s);.  return ms;
40c0: 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a  .#endif.}../*.**
40d0: 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 70   The following p
40e0: 61 69 72 20 6f 66 20 72 6f 75 74 69 6e 65 20 69  air of routine i
40f0: 6d 70 6c 65 6d 65 6e 74 20 6d 75 74 75 61 6c 20  mplement mutual 
4100: 65 78 63 6c 75 73 69 6f 6e 20 66 6f 72 0a 2a 2a  exclusion for.**
4110: 20 6d 75 6c 74 69 2d 74 68 72 65 61 64 65 64 20   multi-threaded 
4120: 70 72 6f 63 65 73 73 65 73 2e 20 20 4f 6e 6c 79  processes.  Only
4130: 20 61 20 73 69 6e 67 6c 65 20 74 68 72 65 61 64   a single thread
4140: 20 69 73 20 61 6c 6c 6f 77 65 64 20 74 6f 0a 2a   is allowed to.*
4150: 2a 20 65 78 65 63 75 74 65 64 20 63 6f 64 65 20  * executed code 
4160: 74 68 61 74 20 69 73 20 73 75 72 72 6f 75 6e 64  that is surround
4170: 65 64 20 62 79 20 45 6e 74 65 72 4d 75 74 65 78  ed by EnterMutex
4180: 28 29 20 61 6e 64 20 4c 65 61 76 65 4d 75 74 65  () and LeaveMute
4190: 78 28 29 2e 0a 2a 2a 0a 2a 2a 20 53 51 4c 69 74  x()..**.** SQLit
41a0: 65 20 75 73 65 73 20 6f 6e 6c 79 20 61 20 73 69  e uses only a si
41b0: 6e 67 6c 65 20 4d 75 74 65 78 2e 20 20 54 68 65  ngle Mutex.  The
41c0: 72 65 20 69 73 20 6e 6f 74 20 6d 75 63 68 20 63  re is not much c
41d0: 72 69 74 69 63 61 6c 0a 2a 2a 20 63 6f 64 65 20  ritical.** code 
41e0: 61 6e 64 20 77 68 61 74 20 6c 69 74 74 6c 65 20  and what little 
41f0: 74 68 65 72 65 20 69 73 20 65 78 65 63 75 74 65  there is execute
4200: 73 20 71 75 69 63 6b 6c 79 20 61 6e 64 20 77 69  s quickly and wi
4210: 74 68 6f 75 74 20 62 6c 6f 63 6b 69 6e 67 2e 0a  thout blocking..
4220: 2a 2a 0a 2a 2a 2a 2a 2a 2a 20 54 42 44 3a 20 20  **.****** TBD:  
4230: 54 68 65 20 6d 75 74 65 78 20 69 73 20 63 75 72  The mutex is cur
4240: 72 65 6e 74 6c 79 20 75 6e 69 6d 70 6c 65 6d 65  rently unimpleme
4250: 6e 74 65 64 2e 20 20 55 6e 74 69 6c 20 69 74 20  nted.  Until it 
4260: 69 73 0a 2a 2a 2a 2a 2a 2a 20 69 6d 70 6c 65 6d  is.****** implem
4270: 65 6e 74 65 64 2c 20 53 51 4c 69 74 65 20 69 73  ented, SQLite is
4280: 20 6e 6f 74 20 74 68 72 65 61 64 73 61 66 65 2e   not threadsafe.
4290: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 69  .*/.static int i
42a0: 6e 4d 75 74 65 78 20 3d 20 30 3b 0a 76 6f 69 64  nMutex = 0;.void
42b0: 20 73 71 6c 69 74 65 4f 73 45 6e 74 65 72 4d 75   sqliteOsEnterMu
42c0: 74 65 78 28 29 7b 0a 20 20 61 73 73 65 72 74 28  tex(){.  assert(
42d0: 20 21 69 6e 4d 75 74 65 78 20 29 3b 0a 20 20 69   !inMutex );.  i
42e0: 6e 4d 75 74 65 78 20 3d 20 31 3b 0a 7d 0a 76 6f  nMutex = 1;.}.vo
42f0: 69 64 20 73 71 6c 69 74 65 4f 73 4c 65 61 76 65  id sqliteOsLeave
4300: 4d 75 74 65 78 28 29 7b 0a 20 20 61 73 73 65 72  Mutex(){.  asser
4310: 74 28 20 69 6e 4d 75 74 65 78 20 29 3b 0a 20 20  t( inMutex );.  
4320: 69 6e 4d 75 74 65 78 20 3d 20 30 3b 0a 7d 0a     inMutex = 0;.}.