/ Hex Artifact Content
Login

Artifact d1c5c12bcc52ac28cc4d62f442d84f54a33241bc:


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 6d 65 6d 73 65 74 28 26 6b 65   0;.  memset(&ke
1350: 79 2c 20 30 2c 20 73 69 7a 65 6f 66 28 6b 65 79  y, 0, sizeof(key
1360: 29 29 3b 0a 20 20 6b 65 79 2e 64 65 76 20 3d 20  ));.  key.dev = 
1370: 73 74 61 74 62 75 66 2e 73 74 5f 64 65 76 3b 0a  statbuf.st_dev;.
1380: 20 20 6b 65 79 2e 69 6e 6f 20 3d 20 73 74 61 74    key.ino = stat
1390: 62 75 66 2e 73 74 5f 69 6e 6f 3b 0a 20 20 70 49  buf.st_ino;.  pI
13a0: 6e 66 6f 20 3d 20 28 73 74 72 75 63 74 20 6c 6f  nfo = (struct lo
13b0: 63 6b 49 6e 66 6f 2a 29 73 71 6c 69 74 65 48 61  ckInfo*)sqliteHa
13c0: 73 68 46 69 6e 64 28 26 6c 6f 63 6b 48 61 73 68  shFind(&lockHash
13d0: 2c 20 26 6b 65 79 2c 20 73 69 7a 65 6f 66 28 6b  , &key, sizeof(k
13e0: 65 79 29 29 3b 0a 20 20 69 66 28 20 70 49 6e 66  ey));.  if( pInf
13f0: 6f 3d 3d 30 20 29 7b 0a 20 20 20 20 73 74 72 75  o==0 ){.    stru
1400: 63 74 20 6c 6f 63 6b 49 6e 66 6f 20 2a 70 4f 6c  ct lockInfo *pOl
1410: 64 3b 0a 20 20 20 20 70 49 6e 66 6f 20 3d 20 73  d;.    pInfo = s
1420: 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 20 73 69 7a  qliteMalloc( siz
1430: 65 6f 66 28 2a 70 49 6e 66 6f 29 20 29 3b 0a 20  eof(*pInfo) );. 
1440: 20 20 20 69 66 28 20 70 49 6e 66 6f 3d 3d 30 20     if( pInfo==0 
1450: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20  ) return 0;.    
1460: 70 49 6e 66 6f 2d 3e 6b 65 79 20 3d 20 6b 65 79  pInfo->key = key
1470: 3b 0a 20 20 20 20 70 49 6e 66 6f 2d 3e 6e 52 65  ;.    pInfo->nRe
1480: 66 20 3d 20 31 3b 0a 20 20 20 20 70 49 6e 66 6f  f = 1;.    pInfo
1490: 2d 3e 63 6e 74 20 3d 20 30 3b 0a 20 20 20 20 70  ->cnt = 0;.    p
14a0: 4f 6c 64 20 3d 20 73 71 6c 69 74 65 48 61 73 68  Old = sqliteHash
14b0: 49 6e 73 65 72 74 28 26 6c 6f 63 6b 48 61 73 68  Insert(&lockHash
14c0: 2c 20 26 70 49 6e 66 6f 2d 3e 6b 65 79 2c 20 73  , &pInfo->key, s
14d0: 69 7a 65 6f 66 28 6b 65 79 29 2c 20 70 49 6e 66  izeof(key), pInf
14e0: 6f 29 3b 0a 20 20 20 20 69 66 28 20 70 4f 6c 64  o);.    if( pOld
14f0: 21 3d 30 20 29 7b 0a 20 20 20 20 20 20 61 73 73  !=0 ){.      ass
1500: 65 72 74 28 20 70 4f 6c 64 3d 3d 70 49 6e 66 6f  ert( pOld==pInfo
1510: 20 29 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65   );.      sqlite
1520: 46 72 65 65 28 70 49 6e 66 6f 29 3b 0a 20 20 20  Free(pInfo);.   
1530: 20 20 20 70 49 6e 66 6f 20 3d 20 30 3b 0a 20 20     pInfo = 0;.  
1540: 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20    }.  }else{.   
1550: 20 70 49 6e 66 6f 2d 3e 6e 52 65 66 2b 2b 3b 0a   pInfo->nRef++;.
1560: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 70 49 6e    }.  return pIn
1570: 66 6f 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 6c  fo;.}../*.** Rel
1580: 65 61 73 65 20 61 20 6c 6f 63 6b 49 6e 66 6f 20  ease a lockInfo 
1590: 73 74 72 75 63 74 75 72 65 20 70 72 65 76 69 6f  structure previo
15a0: 75 73 6c 79 20 61 6c 6c 6f 63 61 74 65 64 20 62  usly allocated b
15b0: 79 20 66 69 6e 64 4c 6f 63 6b 49 6e 66 6f 28 29  y findLockInfo()
15c0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
15d0: 20 72 65 6c 65 61 73 65 4c 6f 63 6b 49 6e 66 6f   releaseLockInfo
15e0: 28 73 74 72 75 63 74 20 6c 6f 63 6b 49 6e 66 6f  (struct lockInfo
15f0: 20 2a 70 49 6e 66 6f 29 7b 0a 20 20 70 49 6e 66   *pInfo){.  pInf
1600: 6f 2d 3e 6e 52 65 66 2d 2d 3b 0a 20 20 69 66 28  o->nRef--;.  if(
1610: 20 70 49 6e 66 6f 2d 3e 6e 52 65 66 3d 3d 30 20   pInfo->nRef==0 
1620: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 48 61 73  ){.    sqliteHas
1630: 68 49 6e 73 65 72 74 28 26 6c 6f 63 6b 48 61 73  hInsert(&lockHas
1640: 68 2c 20 26 70 49 6e 66 6f 2d 3e 6b 65 79 2c 20  h, &pInfo->key, 
1650: 73 69 7a 65 6f 66 28 70 49 6e 66 6f 2d 3e 6b 65  sizeof(pInfo->ke
1660: 79 29 2c 20 30 29 3b 0a 20 20 20 20 73 71 6c 69  y), 0);.    sqli
1670: 74 65 46 72 65 65 28 70 49 6e 66 6f 29 3b 0a 20  teFree(pInfo);. 
1680: 20 7d 0a 7d 0a 23 65 6e 64 69 66 20 20 2f 2a 2a   }.}.#endif  /**
1690: 20 50 4f 53 49 58 20 61 64 76 69 73 6f 72 79 20   POSIX advisory 
16a0: 6c 6f 63 6b 20 77 6f 72 6b 2d 61 72 6f 75 6e 64  lock work-around
16b0: 20 2a 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 49 66 20 77   **/../*.** If w
16c0: 65 20 63 6f 6d 70 69 6c 65 20 77 69 74 68 20 74  e compile with t
16d0: 68 65 20 53 51 4c 49 54 45 5f 54 45 53 54 20 6d  he SQLITE_TEST m
16e0: 61 63 72 6f 20 73 65 74 2c 20 74 68 65 6e 20 74  acro set, then t
16f0: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 62 6c 6f  he following blo
1700: 63 6b 0a 2a 2a 20 6f 66 20 63 6f 64 65 20 77 69  ck.** of code wi
1710: 6c 6c 20 67 69 76 65 20 75 73 20 74 68 65 20 61  ll give us the a
1720: 62 69 6c 69 74 79 20 74 6f 20 73 69 6d 75 6c 61  bility to simula
1730: 74 65 20 61 20 64 69 73 6b 20 49 2f 4f 20 65 72  te a disk I/O er
1740: 72 6f 72 2e 20 20 54 68 69 73 0a 2a 2a 20 69 73  ror.  This.** is
1750: 20 75 73 65 64 20 66 6f 72 20 74 65 73 74 69 6e   used for testin
1760: 67 20 74 68 65 20 49 2f 4f 20 72 65 63 6f 76 65  g the I/O recove
1770: 72 79 20 6c 6f 67 69 63 2e 0a 2a 2f 0a 23 69 66  ry logic..*/.#if
1780: 64 65 66 20 53 51 4c 49 54 45 5f 54 45 53 54 0a  def SQLITE_TEST.
1790: 69 6e 74 20 73 71 6c 69 74 65 5f 69 6f 5f 65 72  int sqlite_io_er
17a0: 72 6f 72 5f 70 65 6e 64 69 6e 67 20 3d 20 30 3b  ror_pending = 0;
17b0: 0a 23 64 65 66 69 6e 65 20 53 69 6d 75 6c 61 74  .#define Simulat
17c0: 65 49 4f 45 72 72 6f 72 28 41 29 20 20 5c 0a 20  eIOError(A)  \. 
17d0: 20 20 69 66 28 20 73 71 6c 69 74 65 5f 69 6f 5f    if( sqlite_io_
17e0: 65 72 72 6f 72 5f 70 65 6e 64 69 6e 67 20 29 20  error_pending ) 
17f0: 5c 0a 20 20 20 20 20 69 66 28 20 73 71 6c 69 74  \.     if( sqlit
1800: 65 5f 69 6f 5f 65 72 72 6f 72 5f 70 65 6e 64 69  e_io_error_pendi
1810: 6e 67 2d 2d 20 3d 3d 20 31 20 29 7b 20 6c 6f 63  ng-- == 1 ){ loc
1820: 61 6c 5f 69 6f 65 72 72 28 29 3b 20 72 65 74 75  al_ioerr(); retu
1830: 72 6e 20 41 3b 20 7d 0a 73 74 61 74 69 63 20 76  rn A; }.static v
1840: 6f 69 64 20 6c 6f 63 61 6c 5f 69 6f 65 72 72 28  oid local_ioerr(
1850: 29 7b 0a 20 20 73 71 6c 69 74 65 5f 69 6f 5f 65  ){.  sqlite_io_e
1860: 72 72 6f 72 5f 70 65 6e 64 69 6e 67 20 3d 20 30  rror_pending = 0
1870: 3b 20 20 2f 2a 20 52 65 61 6c 6c 79 20 6a 75 73  ;  /* Really jus
1880: 74 20 61 20 70 6c 61 63 65 20 74 6f 20 73 65 74  t a place to set
1890: 20 61 20 62 72 65 61 6b 70 6f 69 6e 74 20 2a 2f   a breakpoint */
18a0: 0a 7d 0a 23 65 6c 73 65 0a 23 64 65 66 69 6e 65  .}.#else.#define
18b0: 20 53 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72   SimulateIOError
18c0: 28 41 29 0a 23 65 6e 64 69 66 0a 0a 0a 2f 2a 0a  (A).#endif.../*.
18d0: 2a 2a 20 44 65 6c 65 74 65 20 74 68 65 20 6e 61  ** Delete the na
18e0: 6d 65 64 20 66 69 6c 65 0a 2a 2f 0a 69 6e 74 20  med file.*/.int 
18f0: 73 71 6c 69 74 65 4f 73 44 65 6c 65 74 65 28 63  sqliteOsDelete(c
1900: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65  onst char *zFile
1910: 6e 61 6d 65 29 7b 0a 23 69 66 20 4f 53 5f 55 4e  name){.#if OS_UN
1920: 49 58 0a 20 20 75 6e 6c 69 6e 6b 28 7a 46 69 6c  IX.  unlink(zFil
1930: 65 6e 61 6d 65 29 3b 0a 23 65 6e 64 69 66 0a 23  ename);.#endif.#
1940: 69 66 20 4f 53 5f 57 49 4e 0a 20 20 44 65 6c 65  if OS_WIN.  Dele
1950: 74 65 46 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65  teFile(zFilename
1960: 29 3b 0a 23 65 6e 64 69 66 0a 20 20 72 65 74 75  );.#endif.  retu
1970: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a  rn SQLITE_OK;.}.
1980: 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52  ./*.** Return TR
1990: 55 45 20 69 66 20 74 68 65 20 6e 61 6d 65 64 20  UE if the named 
19a0: 66 69 6c 65 20 65 78 69 73 74 73 2e 0a 2a 2f 0a  file exists..*/.
19b0: 69 6e 74 20 73 71 6c 69 74 65 4f 73 46 69 6c 65  int sqliteOsFile
19c0: 45 78 69 73 74 73 28 63 6f 6e 73 74 20 63 68 61  Exists(const cha
19d0: 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b 0a 23  r *zFilename){.#
19e0: 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 72 65 74  if OS_UNIX.  ret
19f0: 75 72 6e 20 61 63 63 65 73 73 28 7a 46 69 6c 65  urn access(zFile
1a00: 6e 61 6d 65 2c 20 30 29 3d 3d 30 3b 0a 23 65 6e  name, 0)==0;.#en
1a10: 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20  dif.#if OS_WIN. 
1a20: 20 48 41 4e 44 4c 45 20 68 3b 0a 20 20 68 20 3d   HANDLE h;.  h =
1a30: 20 43 72 65 61 74 65 46 69 6c 65 28 7a 46 69 6c   CreateFile(zFil
1a40: 65 6e 61 6d 65 2c 0a 20 20 20 20 47 45 4e 45 52  ename,.    GENER
1a50: 49 43 5f 52 45 41 44 2c 0a 20 20 20 20 30 2c 0a  IC_READ,.    0,.
1a60: 20 20 20 20 4e 55 4c 4c 2c 0a 20 20 20 20 4f 50      NULL,.    OP
1a70: 45 4e 5f 45 58 49 53 54 49 4e 47 2c 0a 20 20 20  EN_EXISTING,.   
1a80: 20 46 49 4c 45 5f 41 54 54 52 49 42 55 54 45 5f   FILE_ATTRIBUTE_
1a90: 4e 4f 52 4d 41 4c 20 7c 20 46 49 4c 45 5f 46 4c  NORMAL | FILE_FL
1aa0: 41 47 5f 52 41 4e 44 4f 4d 5f 41 43 43 45 53 53  AG_RANDOM_ACCESS
1ab0: 2c 0a 20 20 20 20 4e 55 4c 4c 0a 20 20 29 3b 0a  ,.    NULL.  );.
1ac0: 20 20 69 66 28 20 68 21 3d 49 4e 56 41 4c 49 44    if( h!=INVALID
1ad0: 5f 48 41 4e 44 4c 45 5f 56 41 4c 55 45 20 29 7b  _HANDLE_VALUE ){
1ae0: 0a 20 20 20 20 43 6c 6f 73 65 48 61 6e 64 6c 65  .    CloseHandle
1af0: 28 68 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20  (h);.    return 
1b00: 31 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20  1;.  }.  return 
1b10: 30 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a 0a 2f 2a  0;.#endif.}.../*
1b20: 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f 20 6f  .** Attempt to o
1b30: 70 65 6e 20 61 20 66 69 6c 65 20 66 6f 72 20 62  pen a file for b
1b40: 6f 74 68 20 72 65 61 64 69 6e 67 20 61 6e 64 20  oth reading and 
1b50: 77 72 69 74 69 6e 67 2e 20 20 49 66 20 74 68 61  writing.  If tha
1b60: 74 0a 2a 2a 20 66 61 69 6c 73 2c 20 74 72 79 20  t.** fails, try 
1b70: 6f 70 65 6e 69 6e 67 20 69 74 20 72 65 61 64 2d  opening it read-
1b80: 6f 6e 6c 79 2e 20 20 49 66 20 74 68 65 20 66 69  only.  If the fi
1b90: 6c 65 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73  le does not exis
1ba0: 74 2c 0a 2a 2a 20 74 72 79 20 74 6f 20 63 72 65  t,.** try to cre
1bb0: 61 74 65 20 69 74 2e 0a 2a 2a 0a 2a 2a 20 4f 6e  ate it..**.** On
1bc0: 20 73 75 63 63 65 73 73 2c 20 61 20 68 61 6e 64   success, a hand
1bd0: 6c 65 20 66 6f 72 20 74 68 65 20 6f 70 65 6e 20  le for the open 
1be0: 66 69 6c 65 20 69 73 20 77 72 69 74 74 65 6e 20  file is written 
1bf0: 74 6f 20 2a 70 52 65 73 75 6c 74 0a 2a 2a 20 61  to *pResult.** a
1c00: 6e 64 20 2a 70 52 65 61 64 6f 6e 6c 79 20 69 73  nd *pReadonly is
1c10: 20 73 65 74 20 74 6f 20 30 20 69 66 20 74 68 65   set to 0 if the
1c20: 20 66 69 6c 65 20 77 61 73 20 6f 70 65 6e 65 64   file was opened
1c30: 20 66 6f 72 20 72 65 61 64 69 6e 67 20 61 6e 64   for reading and
1c40: 0a 2a 2a 20 77 72 69 74 69 6e 67 20 6f 72 20 31  .** writing or 1
1c50: 20 69 66 20 74 68 65 20 66 69 6c 65 20 77 61 73   if the file was
1c60: 20 6f 70 65 6e 65 64 20 72 65 61 64 2d 6f 6e 6c   opened read-onl
1c70: 79 2e 20 20 54 68 65 20 66 75 6e 63 74 69 6f 6e  y.  The function
1c80: 20 72 65 74 75 72 6e 73 0a 2a 2a 20 53 51 4c 49   returns.** SQLI
1c90: 54 45 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20  TE_OK..**.** On 
1ca0: 66 61 69 6c 75 72 65 2c 20 74 68 65 20 66 75 6e  failure, the fun
1cb0: 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 53 51  ction returns SQ
1cc0: 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 20 61 6e  LITE_CANTOPEN an
1cd0: 64 20 6c 65 61 76 65 73 0a 2a 2a 20 2a 70 52 65  d leaves.** *pRe
1ce0: 73 75 6c 73 74 20 61 6e 64 20 2a 70 52 65 61 64  sulst and *pRead
1cf0: 6f 6e 6c 79 20 75 6e 63 68 61 6e 67 65 64 2e 0a  only unchanged..
1d00: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 4f  */.int sqliteOsO
1d10: 70 65 6e 52 65 61 64 57 72 69 74 65 28 0a 20 20  penReadWrite(.  
1d20: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c  const char *zFil
1d30: 65 6e 61 6d 65 2c 0a 20 20 4f 73 46 69 6c 65 20  ename,.  OsFile 
1d40: 2a 70 52 65 73 75 6c 74 2c 0a 20 20 69 6e 74 20  *pResult,.  int 
1d50: 2a 70 52 65 61 64 6f 6e 6c 79 0a 29 7b 0a 23 69  *pReadonly.){.#i
1d60: 66 20 4f 53 5f 55 4e 49 58 0a 20 20 4f 73 46 69  f OS_UNIX.  OsFi
1d70: 6c 65 20 73 3b 0a 20 20 73 2e 66 64 20 3d 20 6f  le s;.  s.fd = o
1d80: 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f  pen(zFilename, O
1d90: 5f 52 44 57 52 7c 4f 5f 43 52 45 41 54 2c 20 30  _RDWR|O_CREAT, 0
1da0: 36 34 34 29 3b 0a 20 20 69 66 28 20 73 2e 66 64  644);.  if( s.fd
1db0: 3c 30 20 29 7b 0a 20 20 20 20 73 2e 66 64 20 3d  <0 ){.    s.fd =
1dc0: 20 6f 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c   open(zFilename,
1dd0: 20 4f 5f 52 44 4f 4e 4c 59 29 3b 0a 20 20 20 20   O_RDONLY);.    
1de0: 69 66 28 20 73 2e 66 64 3c 30 20 29 7b 0a 20 20  if( s.fd<0 ){.  
1df0: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54      return SQLIT
1e00: 45 5f 43 41 4e 54 4f 50 45 4e 3b 20 0a 20 20 20  E_CANTOPEN; .   
1e10: 20 7d 0a 20 20 20 20 2a 70 52 65 61 64 6f 6e 6c   }.    *pReadonl
1e20: 79 20 3d 20 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a  y = 1;.  }else{.
1e30: 20 20 20 20 2a 70 52 65 61 64 6f 6e 6c 79 20 3d      *pReadonly =
1e40: 20 30 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65   0;.  }.  sqlite
1e50: 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a  OsEnterMutex();.
1e60: 20 20 73 2e 70 4c 6f 63 6b 20 3d 20 66 69 6e 64    s.pLock = find
1e70: 4c 6f 63 6b 49 6e 66 6f 28 73 2e 66 64 29 3b 0a  LockInfo(s.fd);.
1e80: 20 20 73 71 6c 69 74 65 4f 73 4c 65 61 76 65 4d    sqliteOsLeaveM
1e90: 75 74 65 78 28 29 3b 0a 20 20 69 66 28 20 73 2e  utex();.  if( s.
1ea0: 70 4c 6f 63 6b 3d 3d 30 20 29 7b 0a 20 20 20 20  pLock==0 ){.    
1eb0: 63 6c 6f 73 65 28 73 2e 66 64 29 3b 0a 20 20 20  close(s.fd);.   
1ec0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e   return SQLITE_N
1ed0: 4f 4d 45 4d 3b 0a 20 20 7d 0a 20 20 2a 70 52 65  OMEM;.  }.  *pRe
1ee0: 73 75 6c 74 20 3d 20 73 3b 0a 20 20 72 65 74 75  sult = s;.  retu
1ef0: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65  rn SQLITE_OK;.#e
1f00: 6e 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a  ndif.#if OS_WIN.
1f10: 20 20 48 41 4e 44 4c 45 20 68 20 3d 20 43 72 65    HANDLE h = Cre
1f20: 61 74 65 46 69 6c 65 28 7a 46 69 6c 65 6e 61 6d  ateFile(zFilenam
1f30: 65 2c 0a 20 20 20 20 20 47 45 4e 45 52 49 43 5f  e,.     GENERIC_
1f40: 52 45 41 44 20 7c 20 47 45 4e 45 52 49 43 5f 57  READ | GENERIC_W
1f50: 52 49 54 45 2c 0a 20 20 20 20 20 46 49 4c 45 5f  RITE,.     FILE_
1f60: 53 48 41 52 45 5f 52 45 41 44 20 7c 20 46 49 4c  SHARE_READ | FIL
1f70: 45 5f 53 48 41 52 45 5f 57 52 49 54 45 2c 0a 20  E_SHARE_WRITE,. 
1f80: 20 20 20 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 4f      NULL,.     O
1f90: 50 45 4e 5f 41 4c 57 41 59 53 2c 0a 20 20 20 20  PEN_ALWAYS,.    
1fa0: 20 46 49 4c 45 5f 41 54 54 52 49 42 55 54 45 5f   FILE_ATTRIBUTE_
1fb0: 4e 4f 52 4d 41 4c 20 7c 20 46 49 4c 45 5f 46 4c  NORMAL | FILE_FL
1fc0: 41 47 5f 52 41 4e 44 4f 4d 5f 41 43 43 45 53 53  AG_RANDOM_ACCESS
1fd0: 2c 0a 20 20 20 20 20 4e 55 4c 4c 0a 20 20 29 3b  ,.     NULL.  );
1fe0: 0a 20 20 69 66 28 20 68 3d 3d 49 4e 56 41 4c 49  .  if( h==INVALI
1ff0: 44 5f 48 41 4e 44 4c 45 5f 56 41 4c 55 45 20 29  D_HANDLE_VALUE )
2000: 7b 0a 20 20 20 20 68 20 3d 20 43 72 65 61 74 65  {.    h = Create
2010: 46 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65 2c 0a  File(zFilename,.
2020: 20 20 20 20 20 20 20 47 45 4e 45 52 49 43 5f 52         GENERIC_R
2030: 45 41 44 2c 0a 20 20 20 20 20 20 20 46 49 4c 45  EAD,.       FILE
2040: 5f 53 48 41 52 45 5f 52 45 41 44 2c 0a 20 20 20  _SHARE_READ,.   
2050: 20 20 20 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20      NULL,.      
2060: 20 4f 50 45 4e 5f 41 4c 57 41 59 53 2c 0a 20 20   OPEN_ALWAYS,.  
2070: 20 20 20 20 20 46 49 4c 45 5f 41 54 54 52 49 42       FILE_ATTRIB
2080: 55 54 45 5f 4e 4f 52 4d 41 4c 20 7c 20 46 49 4c  UTE_NORMAL | FIL
2090: 45 5f 46 4c 41 47 5f 52 41 4e 44 4f 4d 5f 41 43  E_FLAG_RANDOM_AC
20a0: 43 45 53 53 2c 0a 20 20 20 20 20 20 20 4e 55 4c  CESS,.       NUL
20b0: 4c 0a 20 20 20 20 29 3b 0a 20 20 20 20 69 66 28  L.    );.    if(
20c0: 20 68 3d 3d 49 4e 56 41 4c 49 44 5f 48 41 4e 44   h==INVALID_HAND
20d0: 4c 45 5f 56 41 4c 55 45 20 29 7b 0a 20 20 20 20  LE_VALUE ){.    
20e0: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
20f0: 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 20 20 7d 0a  CANTOPEN;.    }.
2100: 20 20 20 20 2a 70 52 65 61 64 6f 6e 6c 79 20 3d      *pReadonly =
2110: 20 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20   1;.  }else{.   
2120: 20 2a 70 52 65 61 64 6f 6e 6c 79 20 3d 20 30 3b   *pReadonly = 0;
2130: 0a 20 20 7d 0a 20 20 2a 70 52 65 73 75 6c 74 20  .  }.  *pResult 
2140: 3d 20 68 3b 0a 20 20 72 65 74 75 72 6e 20 53 51  = h;.  return SQ
2150: 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a  LITE_OK;.#endif.
2160: 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70  }.../*.** Attemp
2170: 74 20 74 6f 20 6f 70 65 6e 20 61 20 6e 65 77 20  t to open a new 
2180: 66 69 6c 65 20 66 6f 72 20 65 78 63 6c 75 73 69  file for exclusi
2190: 76 65 20 61 63 63 65 73 73 20 62 79 20 74 68 69  ve access by thi
21a0: 73 20 70 72 6f 63 65 73 73 2e 0a 2a 2a 20 54 68  s process..** Th
21b0: 65 20 66 69 6c 65 20 77 69 6c 6c 20 62 65 20 6f  e file will be o
21c0: 70 65 6e 65 64 20 66 6f 72 20 62 6f 74 68 20 72  pened for both r
21d0: 65 61 64 69 6e 67 20 61 6e 64 20 77 72 69 74 69  eading and writi
21e0: 6e 67 2e 20 20 54 6f 20 61 76 6f 69 64 0a 2a 2a  ng.  To avoid.**
21f0: 20 61 20 70 6f 74 65 6e 74 69 61 6c 20 73 65 63   a potential sec
2200: 75 72 69 74 79 20 70 72 6f 62 6c 65 6d 2c 20 77  urity problem, w
2210: 65 20 64 6f 20 6e 6f 74 20 61 6c 6c 6f 77 20 74  e do not allow t
2220: 68 65 20 66 69 6c 65 20 74 6f 20 68 61 76 65 0a  he file to have.
2230: 2a 2a 20 70 72 65 76 69 6f 75 73 6c 79 20 65 78  ** previously ex
2240: 69 73 74 65 64 2e 20 20 4e 6f 72 20 64 6f 20 77  isted.  Nor do w
2250: 65 20 61 6c 6c 6f 77 20 74 68 65 20 66 69 6c 65  e allow the file
2260: 20 74 6f 20 62 65 20 61 20 73 79 6d 62 6f 6c 69   to be a symboli
2270: 63 0a 2a 2a 20 6c 69 6e 6b 2e 0a 2a 2a 0a 2a 2a  c.** link..**.**
2280: 20 4f 6e 20 73 75 63 63 65 73 73 2c 20 77 72 69   On success, wri
2290: 74 65 20 74 68 65 20 66 69 6c 65 20 68 61 6e 64  te the file hand
22a0: 6c 65 20 69 6e 74 6f 20 2a 70 52 65 73 75 6c 74  le into *pResult
22b0: 20 61 6e 64 20 72 65 74 75 72 6e 20 53 51 4c 49   and return SQLI
22c0: 54 45 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20  TE_OK..**.** On 
22d0: 66 61 69 6c 75 72 65 2c 20 72 65 74 75 72 6e 20  failure, return 
22e0: 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 2e  SQLITE_CANTOPEN.
22f0: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73  .*/.int sqliteOs
2300: 4f 70 65 6e 45 78 63 6c 75 73 69 76 65 28 63 6f  OpenExclusive(co
2310: 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e  nst char *zFilen
2320: 61 6d 65 2c 20 4f 73 46 69 6c 65 20 2a 70 52 65  ame, OsFile *pRe
2330: 73 75 6c 74 29 7b 0a 23 69 66 20 4f 53 5f 55 4e  sult){.#if OS_UN
2340: 49 58 0a 20 20 4f 73 46 69 6c 65 20 73 3b 0a 20  IX.  OsFile s;. 
2350: 20 69 66 28 20 61 63 63 65 73 73 28 7a 46 69 6c   if( access(zFil
2360: 65 6e 61 6d 65 2c 20 30 29 3d 3d 30 20 29 7b 0a  ename, 0)==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: 23 69 66 6e 64 65 66 20 4f 5f 4e 4f 46 4f 4c 4c  #ifndef O_NOFOLL
23a0: 4f 57 0a 23 20 64 65 66 69 6e 65 20 4f 5f 4e 4f  OW.# define O_NO
23b0: 46 4f 4c 4c 4f 57 20 30 0a 23 65 6e 64 69 66 0a  FOLLOW 0.#endif.
23c0: 20 20 73 2e 66 64 20 3d 20 6f 70 65 6e 28 7a 46    s.fd = open(zF
23d0: 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44 57 52 7c  ilename, O_RDWR|
23e0: 4f 5f 43 52 45 41 54 7c 4f 5f 45 58 43 4c 7c 4f  O_CREAT|O_EXCL|O
23f0: 5f 4e 4f 46 4f 4c 4c 4f 57 2c 20 30 36 30 30 29  _NOFOLLOW, 0600)
2400: 3b 0a 20 20 69 66 28 20 73 2e 66 64 3c 30 20 29  ;.  if( s.fd<0 )
2410: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c  {.    return SQL
2420: 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20  ITE_CANTOPEN;.  
2430: 7d 0a 20 20 73 71 6c 69 74 65 4f 73 45 6e 74 65  }.  sqliteOsEnte
2440: 72 4d 75 74 65 78 28 29 3b 0a 20 20 73 2e 70 4c  rMutex();.  s.pL
2450: 6f 63 6b 20 3d 20 66 69 6e 64 4c 6f 63 6b 49 6e  ock = findLockIn
2460: 66 6f 28 73 2e 66 64 29 3b 0a 20 20 73 71 6c 69  fo(s.fd);.  sqli
2470: 74 65 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29  teOsLeaveMutex()
2480: 3b 0a 20 20 69 66 28 20 73 2e 70 4c 6f 63 6b 3d  ;.  if( s.pLock=
2490: 3d 30 20 29 7b 0a 20 20 20 20 63 6c 6f 73 65 28  =0 ){.    close(
24a0: 73 2e 66 64 29 3b 0a 20 20 20 20 75 6e 6c 69 6e  s.fd);.    unlin
24b0: 6b 28 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 20  k(zFilename);.  
24c0: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
24d0: 4e 4f 4d 45 4d 3b 0a 20 20 7d 0a 20 20 2a 70 52  NOMEM;.  }.  *pR
24e0: 65 73 75 6c 74 20 3d 20 73 3b 0a 20 20 72 65 74  esult = s;.  ret
24f0: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23  urn SQLITE_OK;.#
2500: 65 6e 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e  endif.#if OS_WIN
2510: 0a 20 20 48 41 4e 44 4c 45 20 68 20 3d 20 43 72  .  HANDLE h = Cr
2520: 65 61 74 65 46 69 6c 65 28 7a 46 69 6c 65 6e 61  eateFile(zFilena
2530: 6d 65 2c 0a 20 20 20 20 20 47 45 4e 45 52 49 43  me,.     GENERIC
2540: 5f 52 45 41 44 20 7c 20 47 45 4e 45 52 49 43 5f  _READ | GENERIC_
2550: 57 52 49 54 45 2c 0a 20 20 20 20 20 30 2c 0a 20  WRITE,.     0,. 
2560: 20 20 20 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 43      NULL,.     C
2570: 52 45 41 54 45 5f 41 4c 57 41 59 53 2c 0a 20 20  REATE_ALWAYS,.  
2580: 20 20 20 46 49 4c 45 5f 41 54 54 52 49 42 55 54     FILE_ATTRIBUT
2590: 45 5f 4e 4f 52 4d 41 4c 20 7c 20 46 49 4c 45 5f  E_NORMAL | FILE_
25a0: 46 4c 41 47 5f 52 41 4e 44 4f 4d 5f 41 43 43 45  FLAG_RANDOM_ACCE
25b0: 53 53 2c 0a 20 20 20 20 20 4e 55 4c 4c 0a 20 20  SS,.     NULL.  
25c0: 29 3b 0a 20 20 69 66 28 20 68 3d 3d 49 4e 56 41  );.  if( h==INVA
25d0: 4c 49 44 5f 48 41 4e 44 4c 45 5f 56 41 4c 55 45  LID_HANDLE_VALUE
25e0: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53   ){.    return S
25f0: 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a  QLITE_CANTOPEN;.
2600: 20 20 7d 0a 20 20 2a 70 52 65 73 75 6c 74 20 3d    }.  *pResult =
2610: 20 68 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c   h;.  return SQL
2620: 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d  ITE_OK;.#endif.}
2630: 0a 0a 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20  ../*.** Attempt 
2640: 74 6f 20 6f 70 65 6e 20 61 20 6e 65 77 20 66 69  to open a new fi
2650: 6c 65 20 66 6f 72 20 72 65 61 64 2d 6f 6e 6c 79  le for read-only
2660: 20 61 63 63 65 73 73 2e 0a 2a 2a 0a 2a 2a 20 4f   access..**.** O
2670: 6e 20 73 75 63 63 65 73 73 2c 20 77 72 69 74 65  n success, write
2680: 20 74 68 65 20 66 69 6c 65 20 68 61 6e 64 6c 65   the file handle
2690: 20 69 6e 74 6f 20 2a 70 52 65 73 75 6c 74 20 61   into *pResult a
26a0: 6e 64 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  nd return SQLITE
26b0: 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66 61  _OK..**.** On fa
26c0: 69 6c 75 72 65 2c 20 72 65 74 75 72 6e 20 53 51  ilure, return SQ
26d0: 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 2e 0a 2a  LITE_CANTOPEN..*
26e0: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 4f 70  /.int sqliteOsOp
26f0: 65 6e 52 65 61 64 4f 6e 6c 79 28 63 6f 6e 73 74  enReadOnly(const
2700: 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65   char *zFilename
2710: 2c 20 4f 73 46 69 6c 65 20 2a 70 52 65 73 75 6c  , OsFile *pResul
2720: 74 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a  t){.#if OS_UNIX.
2730: 20 20 4f 73 46 69 6c 65 20 73 3b 0a 20 20 73 2e    OsFile s;.  s.
2740: 66 64 20 3d 20 6f 70 65 6e 28 7a 46 69 6c 65 6e  fd = open(zFilen
2750: 61 6d 65 2c 20 4f 5f 52 44 4f 4e 4c 59 29 3b 0a  ame, O_RDONLY);.
2760: 20 20 69 66 28 20 73 2e 66 64 3c 30 20 29 7b 0a    if( s.fd<0 ){.
2770: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54      return SQLIT
2780: 45 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a  E_CANTOPEN;.  }.
2790: 20 20 73 71 6c 69 74 65 4f 73 45 6e 74 65 72 4d    sqliteOsEnterM
27a0: 75 74 65 78 28 29 3b 0a 20 20 73 2e 70 4c 6f 63  utex();.  s.pLoc
27b0: 6b 20 3d 20 66 69 6e 64 4c 6f 63 6b 49 6e 66 6f  k = findLockInfo
27c0: 28 73 2e 66 64 29 3b 0a 20 20 73 71 6c 69 74 65  (s.fd);.  sqlite
27d0: 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29 3b 0a  OsLeaveMutex();.
27e0: 20 20 69 66 28 20 73 2e 70 4c 6f 63 6b 3d 3d 30    if( s.pLock==0
27f0: 20 29 7b 0a 20 20 20 20 63 6c 6f 73 65 28 73 2e   ){.    close(s.
2800: 66 64 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20  fd);.    return 
2810: 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20  SQLITE_NOMEM;.  
2820: 7d 0a 20 20 2a 70 52 65 73 75 6c 74 20 3d 20 73  }.  *pResult = s
2830: 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  ;.  return SQLIT
2840: 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 23 69 66  E_OK;.#endif.#if
2850: 20 4f 53 5f 57 49 4e 0a 20 20 48 41 4e 44 4c 45   OS_WIN.  HANDLE
2860: 20 68 20 3d 20 43 72 65 61 74 65 46 69 6c 65 28   h = CreateFile(
2870: 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20 20 20 20 20  zFilename,.     
2880: 47 45 4e 45 52 49 43 5f 52 45 41 44 2c 0a 20 20  GENERIC_READ,.  
2890: 20 20 20 30 2c 0a 20 20 20 20 20 4e 55 4c 4c 2c     0,.     NULL,
28a0: 0a 20 20 20 20 20 4f 50 45 4e 5f 45 58 49 53 54  .     OPEN_EXIST
28b0: 49 4e 47 2c 0a 20 20 20 20 20 46 49 4c 45 5f 41  ING,.     FILE_A
28c0: 54 54 52 49 42 55 54 45 5f 4e 4f 52 4d 41 4c 20  TTRIBUTE_NORMAL 
28d0: 7c 20 46 49 4c 45 5f 46 4c 41 47 5f 52 41 4e 44  | FILE_FLAG_RAND
28e0: 4f 4d 5f 41 43 43 45 53 53 2c 0a 20 20 20 20 20  OM_ACCESS,.     
28f0: 4e 55 4c 4c 0a 20 20 29 3b 0a 20 20 69 66 28 20  NULL.  );.  if( 
2900: 68 3d 3d 49 4e 56 41 4c 49 44 5f 48 41 4e 44 4c  h==INVALID_HANDL
2910: 45 5f 56 41 4c 55 45 20 29 7b 0a 20 20 20 20 72  E_VALUE ){.    r
2920: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e  eturn SQLITE_CAN
2930: 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 20 2a 70 52  TOPEN;.  }.  *pR
2940: 65 73 75 6c 74 20 3d 20 68 3b 0a 20 20 72 65 74  esult = h;.  ret
2950: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23  urn SQLITE_OK;.#
2960: 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43  endif.}../*.** C
2970: 72 65 61 74 65 20 61 20 74 65 6d 70 6f 72 61 72  reate a temporar
2980: 79 20 66 69 6c 65 20 6e 61 6d 65 20 69 6e 20 7a  y file name in z
2990: 42 75 66 2e 20 20 7a 42 75 66 20 6d 75 73 74 20  Buf.  zBuf must 
29a0: 62 65 20 62 69 67 20 65 6e 6f 75 67 68 20 74 6f  be big enough to
29b0: 0a 2a 2a 20 68 6f 6c 64 20 61 74 20 6c 65 61 73  .** hold at leas
29c0: 74 20 53 51 4c 49 54 45 5f 54 45 4d 50 4e 41 4d  t SQLITE_TEMPNAM
29d0: 45 5f 53 49 5a 45 20 63 68 61 72 61 63 74 65 72  E_SIZE character
29e0: 73 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  s..*/.int sqlite
29f0: 4f 73 54 65 6d 70 46 69 6c 65 4e 61 6d 65 28 63  OsTempFileName(c
2a00: 68 61 72 20 2a 7a 42 75 66 29 7b 0a 23 69 66 20  har *zBuf){.#if 
2a10: 4f 53 5f 55 4e 49 58 0a 20 20 73 74 61 74 69 63  OS_UNIX.  static
2a20: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 61 7a 44   const char *azD
2a30: 69 72 73 5b 5d 20 3d 20 7b 0a 20 20 20 20 20 22  irs[] = {.     "
2a40: 2e 22 2c 0a 20 20 20 20 20 22 2f 76 61 72 2f 74  .",.     "/var/t
2a50: 6d 70 22 2c 0a 20 20 20 20 20 22 2f 75 73 72 2f  mp",.     "/usr/
2a60: 74 6d 70 22 2c 0a 20 20 20 20 20 22 2f 74 6d 70  tmp",.     "/tmp
2a70: 22 2c 0a 20 20 7d 3b 0a 20 20 73 74 61 74 69 63  ",.  };.  static
2a80: 20 63 68 61 72 20 7a 43 68 61 72 73 5b 5d 20 3d   char zChars[] =
2a90: 0a 20 20 20 20 22 61 62 63 64 65 66 67 68 69 6a  .    "abcdefghij
2aa0: 6b 6c 6d 6e 6f 70 71 72 73 74 75 76 77 78 79 7a  klmnopqrstuvwxyz
2ab0: 22 0a 20 20 20 20 22 41 42 43 44 45 46 47 48 49  ".    "ABCDEFGHI
2ac0: 4a 4b 4c 4d 4e 4f 50 51 52 53 54 55 56 57 58 59  JKLMNOPQRSTUVWXY
2ad0: 5a 22 0a 20 20 20 20 22 30 31 32 33 34 35 36 37  Z".    "01234567
2ae0: 38 39 22 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b  89";.  int i, j;
2af0: 0a 20 20 73 74 72 75 63 74 20 73 74 61 74 20 62  .  struct stat b
2b00: 75 66 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  uf;.  const char
2b10: 20 2a 7a 44 69 72 20 3d 20 22 2e 22 3b 0a 20 20   *zDir = ".";.  
2b20: 66 6f 72 28 69 3d 30 3b 20 69 3c 73 69 7a 65 6f  for(i=0; i<sizeo
2b30: 66 28 61 7a 44 69 72 73 29 2f 73 69 7a 65 6f 66  f(azDirs)/sizeof
2b40: 28 61 7a 44 69 72 73 5b 30 5d 29 3b 20 69 2b 2b  (azDirs[0]); i++
2b50: 29 7b 0a 20 20 20 20 69 66 28 20 73 74 61 74 28  ){.    if( stat(
2b60: 61 7a 44 69 72 73 5b 69 5d 2c 20 26 62 75 66 29  azDirs[i], &buf)
2b70: 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20   ) continue;.   
2b80: 20 69 66 28 20 21 53 5f 49 53 44 49 52 28 62 75   if( !S_ISDIR(bu
2b90: 66 2e 73 74 5f 6d 6f 64 65 29 20 29 20 63 6f 6e  f.st_mode) ) con
2ba0: 74 69 6e 75 65 3b 0a 20 20 20 20 69 66 28 20 61  tinue;.    if( a
2bb0: 63 63 65 73 73 28 61 7a 44 69 72 73 5b 69 5d 2c  ccess(azDirs[i],
2bc0: 20 30 37 29 20 29 20 63 6f 6e 74 69 6e 75 65 3b   07) ) continue;
2bd0: 0a 20 20 20 20 7a 44 69 72 20 3d 20 61 7a 44 69  .    zDir = azDi
2be0: 72 73 5b 69 5d 3b 0a 20 20 20 20 62 72 65 61 6b  rs[i];.    break
2bf0: 3b 0a 20 20 7d 0a 20 20 64 6f 7b 0a 20 20 20 20  ;.  }.  do{.    
2c00: 73 70 72 69 6e 74 66 28 7a 42 75 66 2c 20 22 25  sprintf(zBuf, "%
2c10: 73 2f 73 71 6c 69 74 65 5f 22 2c 20 7a 44 69 72  s/sqlite_", zDir
2c20: 29 3b 0a 20 20 20 20 6a 20 3d 20 73 74 72 6c 65  );.    j = strle
2c30: 6e 28 7a 42 75 66 29 3b 0a 20 20 20 20 66 6f 72  n(zBuf);.    for
2c40: 28 69 3d 30 3b 20 69 3c 31 35 3b 20 69 2b 2b 29  (i=0; i<15; i++)
2c50: 7b 0a 20 20 20 20 20 20 69 6e 74 20 6e 20 3d 20  {.      int n = 
2c60: 73 71 6c 69 74 65 52 61 6e 64 6f 6d 42 79 74 65  sqliteRandomByte
2c70: 28 29 20 25 20 28 73 69 7a 65 6f 66 28 7a 43 68  () % (sizeof(zCh
2c80: 61 72 73 29 2d 31 29 3b 0a 20 20 20 20 20 20 7a  ars)-1);.      z
2c90: 42 75 66 5b 6a 2b 2b 5d 20 3d 20 7a 43 68 61 72  Buf[j++] = zChar
2ca0: 73 5b 6e 5d 3b 0a 20 20 20 20 7d 0a 20 20 20 20  s[n];.    }.    
2cb0: 7a 42 75 66 5b 6a 5d 20 3d 20 30 3b 0a 20 20 7d  zBuf[j] = 0;.  }
2cc0: 77 68 69 6c 65 28 20 61 63 63 65 73 73 28 7a 42  while( access(zB
2cd0: 75 66 2c 30 29 3d 3d 30 20 29 3b 0a 23 65 6e 64  uf,0)==0 );.#end
2ce0: 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20  if.#if OS_WIN.  
2cf0: 73 74 61 74 69 63 20 63 68 61 72 20 7a 43 68 61  static char zCha
2d00: 72 73 5b 5d 20 3d 0a 20 20 20 20 22 61 62 63 64  rs[] =.    "abcd
2d10: 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74  efghijklmnopqrst
2d20: 75 76 77 78 79 7a 22 0a 20 20 20 20 22 41 42 43  uvwxyz".    "ABC
2d30: 44 45 46 47 48 49 4a 4b 4c 4d 4e 4f 50 51 52 53  DEFGHIJKLMNOPQRS
2d40: 54 55 56 57 58 59 5a 22 0a 20 20 20 20 22 30 31  TUVWXYZ".    "01
2d50: 32 33 34 35 36 37 38 39 22 3b 0a 20 20 69 6e 74  23456789";.  int
2d60: 20 69 2c 20 6a 3b 0a 20 20 63 68 61 72 20 7a 54   i, j;.  char zT
2d70: 65 6d 70 50 61 74 68 5b 53 51 4c 49 54 45 5f 54  empPath[SQLITE_T
2d80: 45 4d 50 4e 41 4d 45 5f 53 49 5a 45 5d 3b 0a 20  EMPNAME_SIZE];. 
2d90: 20 47 65 74 54 65 6d 70 50 61 74 68 28 53 51 4c   GetTempPath(SQL
2da0: 49 54 45 5f 54 45 4d 50 4e 41 4d 45 5f 53 49 5a  ITE_TEMPNAME_SIZ
2db0: 45 2d 33 30 2c 20 7a 54 65 6d 70 50 61 74 68 29  E-30, zTempPath)
2dc0: 3b 0a 20 20 66 6f 72 28 3b 3b 29 7b 0a 20 20 20  ;.  for(;;){.   
2dd0: 20 73 70 72 69 6e 74 66 28 7a 42 75 66 2c 20 22   sprintf(zBuf, "
2de0: 25 73 2f 73 71 6c 69 74 65 5f 22 2c 20 7a 54 65  %s/sqlite_", zTe
2df0: 6d 70 50 61 74 68 29 3b 0a 20 20 20 20 6a 20 3d  mpPath);.    j =
2e00: 20 73 74 72 6c 65 6e 28 7a 42 75 66 29 3b 0a 20   strlen(zBuf);. 
2e10: 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 31 35     for(i=0; i<15
2e20: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 6e  ; i++){.      in
2e30: 74 20 6e 20 3d 20 73 71 6c 69 74 65 52 61 6e 64  t n = sqliteRand
2e40: 6f 6d 42 79 74 65 28 29 20 25 20 73 69 7a 65 6f  omByte() % sizeo
2e50: 66 28 7a 43 68 61 72 73 29 3b 0a 20 20 20 20 20  f(zChars);.     
2e60: 20 7a 42 75 66 5b 6a 2b 2b 5d 20 3d 20 7a 43 68   zBuf[j++] = zCh
2e70: 61 72 73 5b 6e 5d 3b 0a 20 20 20 20 7d 0a 20 20  ars[n];.    }.  
2e80: 20 20 7a 42 75 66 5b 6a 5d 20 3d 20 30 3b 0a 20    zBuf[j] = 0;. 
2e90: 20 20 20 69 66 28 20 21 73 71 6c 69 74 65 4f 73     if( !sqliteOs
2ea0: 46 69 6c 65 45 78 69 73 74 73 28 7a 42 75 66 29  FileExists(zBuf)
2eb0: 20 29 20 62 72 65 61 6b 3b 0a 20 20 7d 0a 23 65   ) break;.  }.#e
2ec0: 6e 64 69 66 0a 20 20 72 65 74 75 72 6e 20 53 51  ndif.  return SQ
2ed0: 4c 49 54 45 5f 4f 4b 3b 20 0a 7d 0a 0a 2f 2a 0a  LITE_OK; .}../*.
2ee0: 2a 2a 20 43 6c 6f 73 65 20 61 20 66 69 6c 65 0a  ** Close a file.
2ef0: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 43  */.int sqliteOsC
2f00: 6c 6f 73 65 28 4f 73 46 69 6c 65 20 69 64 29 7b  lose(OsFile id){
2f10: 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 63  .#if OS_UNIX.  c
2f20: 6c 6f 73 65 28 69 64 2e 66 64 29 3b 0a 20 20 73  lose(id.fd);.  s
2f30: 71 6c 69 74 65 4f 73 45 6e 74 65 72 4d 75 74 65  qliteOsEnterMute
2f40: 78 28 29 3b 0a 20 20 72 65 6c 65 61 73 65 4c 6f  x();.  releaseLo
2f50: 63 6b 49 6e 66 6f 28 69 64 2e 70 4c 6f 63 6b 29  ckInfo(id.pLock)
2f60: 3b 0a 20 20 73 71 6c 69 74 65 4f 73 4c 65 61 76  ;.  sqliteOsLeav
2f70: 65 4d 75 74 65 78 28 29 3b 0a 20 20 72 65 74 75  eMutex();.  retu
2f80: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65  rn SQLITE_OK;.#e
2f90: 6e 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a  ndif.#if OS_WIN.
2fa0: 20 20 43 6c 6f 73 65 48 61 6e 64 6c 65 28 69 64    CloseHandle(id
2fb0: 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49  );.  return SQLI
2fc0: 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a  TE_OK;.#endif.}.
2fd0: 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 64 61 74 61  ./*.** Read data
2fe0: 20 66 72 6f 6d 20 61 20 66 69 6c 65 20 69 6e 74   from a file int
2ff0: 6f 20 61 20 62 75 66 66 65 72 2e 20 20 52 65 74  o a buffer.  Ret
3000: 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 72 20 6f  urn the number o
3010: 66 0a 2a 2a 20 62 79 74 65 73 20 61 63 74 75 61  f.** bytes actua
3020: 6c 6c 79 20 72 65 61 64 2e 0a 2a 2f 0a 69 6e 74  lly read..*/.int
3030: 20 73 71 6c 69 74 65 4f 73 52 65 61 64 28 4f 73   sqliteOsRead(Os
3040: 46 69 6c 65 20 69 64 2c 20 76 6f 69 64 20 2a 70  File id, void *p
3050: 42 75 66 2c 20 69 6e 74 20 61 6d 74 29 7b 0a 23  Buf, int amt){.#
3060: 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 69 6e 74  if OS_UNIX.  int
3070: 20 67 6f 74 3b 0a 20 20 53 69 6d 75 6c 61 74 65   got;.  Simulate
3080: 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f 49  IOError(SQLITE_I
3090: 4f 45 52 52 29 3b 0a 20 20 67 6f 74 20 3d 20 72  OERR);.  got = r
30a0: 65 61 64 28 69 64 2e 66 64 2c 20 70 42 75 66 2c  ead(id.fd, pBuf,
30b0: 20 61 6d 74 29 3b 0a 20 20 69 66 28 20 67 6f 74   amt);.  if( got
30c0: 3c 30 20 29 20 67 6f 74 20 3d 20 30 3b 0a 20 20  <0 ) got = 0;.  
30d0: 72 65 74 75 72 6e 20 67 6f 74 3d 3d 61 6d 74 20  return got==amt 
30e0: 3f 20 53 51 4c 49 54 45 5f 4f 4b 20 3a 20 53 51  ? SQLITE_OK : SQ
30f0: 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 23 65 6e 64  LITE_IOERR;.#end
3100: 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20  if.#if OS_WIN.  
3110: 44 57 4f 52 44 20 67 6f 74 3b 0a 20 20 53 69 6d  DWORD got;.  Sim
3120: 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53 51 4c  ulateIOError(SQL
3130: 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20 69 66  ITE_IOERR);.  if
3140: 28 20 21 52 65 61 64 46 69 6c 65 28 69 64 2c 20  ( !ReadFile(id, 
3150: 70 42 75 66 2c 20 61 6d 74 2c 20 26 67 6f 74 2c  pBuf, amt, &got,
3160: 20 30 29 20 29 7b 0a 20 20 20 20 67 6f 74 20 3d   0) ){.    got =
3170: 20 30 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e   0;.  }.  return
3180: 20 67 6f 74 3d 3d 61 6d 74 20 3f 20 53 51 4c 49   got==amt ? SQLI
3190: 54 45 5f 4f 4b 20 3a 20 53 51 4c 49 54 45 5f 49  TE_OK : SQLITE_I
31a0: 4f 45 52 52 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a  OERR;.#endif.}..
31b0: 2f 2a 0a 2a 2a 20 57 72 69 74 65 20 64 61 74 61  /*.** Write data
31c0: 20 66 72 6f 6d 20 61 20 62 75 66 66 65 72 20 69   from a buffer i
31d0: 6e 74 6f 20 61 20 66 69 6c 65 2e 20 20 52 65 74  nto a file.  Ret
31e0: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 20 6f 6e  urn SQLITE_OK on
31f0: 20 73 75 63 63 65 73 73 0a 2a 2a 20 6f 72 20 73   success.** or s
3200: 6f 6d 65 20 6f 74 68 65 72 20 65 72 72 6f 72 20  ome other error 
3210: 63 6f 64 65 20 6f 6e 20 66 61 69 6c 75 72 65 2e  code on failure.
3220: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73  .*/.int sqliteOs
3230: 57 72 69 74 65 28 4f 73 46 69 6c 65 20 69 64 2c  Write(OsFile id,
3240: 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 70 42 75   const void *pBu
3250: 66 2c 20 69 6e 74 20 61 6d 74 29 7b 0a 23 69 66  f, int amt){.#if
3260: 20 4f 53 5f 55 4e 49 58 0a 20 20 69 6e 74 20 77   OS_UNIX.  int w
3270: 72 6f 74 65 3b 0a 20 20 53 69 6d 75 6c 61 74 65  rote;.  Simulate
3280: 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f 49  IOError(SQLITE_I
3290: 4f 45 52 52 29 3b 0a 20 20 77 72 6f 74 65 20 3d  OERR);.  wrote =
32a0: 20 77 72 69 74 65 28 69 64 2e 66 64 2c 20 70 42   write(id.fd, pB
32b0: 75 66 2c 20 61 6d 74 29 3b 0a 20 20 69 66 28 20  uf, amt);.  if( 
32c0: 77 72 6f 74 65 3c 61 6d 74 20 29 20 72 65 74 75  wrote<amt ) retu
32d0: 72 6e 20 53 51 4c 49 54 45 5f 46 55 4c 4c 3b 0a  rn SQLITE_FULL;.
32e0: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
32f0: 4f 4b 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f  OK;.#endif.#if O
3300: 53 5f 57 49 4e 0a 20 20 44 57 4f 52 44 20 77 72  S_WIN.  DWORD wr
3310: 6f 74 65 3b 0a 20 20 53 69 6d 75 6c 61 74 65 49  ote;.  SimulateI
3320: 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f 49 4f  OError(SQLITE_IO
3330: 45 52 52 29 3b 0a 20 20 69 66 28 20 21 57 72 69  ERR);.  if( !Wri
3340: 74 65 46 69 6c 65 28 69 64 2c 20 70 42 75 66 2c  teFile(id, pBuf,
3350: 20 61 6d 74 2c 20 26 77 72 6f 74 65 2c 20 30 29   amt, &wrote, 0)
3360: 20 7c 7c 20 77 72 6f 74 65 3c 61 6d 74 20 29 7b   || wrote<amt ){
3370: 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49  .    return SQLI
3380: 54 45 5f 46 55 4c 4c 3b 0a 20 20 7d 0a 20 20 72  TE_FULL;.  }.  r
3390: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b  eturn SQLITE_OK;
33a0: 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a  .#endif.}../*.**
33b0: 20 4d 6f 76 65 20 74 68 65 20 72 65 61 64 2f 77   Move the read/w
33c0: 72 69 74 65 20 70 6f 69 6e 74 65 72 20 69 6e 20  rite pointer in 
33d0: 61 20 66 69 6c 65 2e 0a 2a 2f 0a 69 6e 74 20 73  a file..*/.int s
33e0: 71 6c 69 74 65 4f 73 53 65 65 6b 28 4f 73 46 69  qliteOsSeek(OsFi
33f0: 6c 65 20 69 64 2c 20 69 6e 74 20 6f 66 66 73 65  le id, int offse
3400: 74 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a  t){.#if OS_UNIX.
3410: 20 20 6c 73 65 65 6b 28 69 64 2e 66 64 2c 20 6f    lseek(id.fd, o
3420: 66 66 73 65 74 2c 20 53 45 45 4b 5f 53 45 54 29  ffset, SEEK_SET)
3430: 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  ;.  return SQLIT
3440: 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 23 69 66  E_OK;.#endif.#if
3450: 20 4f 53 5f 57 49 4e 0a 20 20 53 65 74 46 69 6c   OS_WIN.  SetFil
3460: 65 50 6f 69 6e 74 65 72 28 69 64 2c 20 6f 66 66  ePointer(id, off
3470: 73 65 74 2c 20 30 2c 20 46 49 4c 45 5f 42 45 47  set, 0, FILE_BEG
3480: 49 4e 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51  IN);.  return SQ
3490: 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a  LITE_OK;.#endif.
34a0: 7d 0a 0a 2f 2a 0a 2a 2a 20 4d 61 6b 65 20 73 75  }../*.** Make su
34b0: 72 65 20 61 6c 6c 20 77 72 69 74 65 73 20 74 6f  re all writes to
34c0: 20 61 20 70 61 72 74 69 63 75 6c 61 72 20 66 69   a particular fi
34d0: 6c 65 20 61 72 65 20 63 6f 6d 6d 69 74 74 65 64  le are committed
34e0: 20 74 6f 20 64 69 73 6b 2e 0a 2a 2f 0a 69 6e 74   to disk..*/.int
34f0: 20 73 71 6c 69 74 65 4f 73 53 79 6e 63 28 4f 73   sqliteOsSync(Os
3500: 46 69 6c 65 20 69 64 29 7b 0a 20 20 53 69 6d 75  File id){.  Simu
3510: 6c 61 74 65 49 4f 45 72 72 6f 72 28 53 51 4c 49  lateIOError(SQLI
3520: 54 45 5f 49 4f 45 52 52 29 3b 0a 23 69 66 20 4f  TE_IOERR);.#if O
3530: 53 5f 55 4e 49 58 0a 20 20 72 65 74 75 72 6e 20  S_UNIX.  return 
3540: 66 73 79 6e 63 28 69 64 2e 66 64 29 3d 3d 30 20  fsync(id.fd)==0 
3550: 3f 20 53 51 4c 49 54 45 5f 4f 4b 20 3a 20 53 51  ? SQLITE_OK : SQ
3560: 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 23 65 6e 64  LITE_IOERR;.#end
3570: 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20  if.#if OS_WIN.  
3580: 72 65 74 75 72 6e 20 46 6c 75 73 68 46 69 6c 65  return FlushFile
3590: 42 75 66 66 65 72 73 28 69 64 29 20 3f 20 53 51  Buffers(id) ? SQ
35a0: 4c 49 54 45 5f 4f 4b 20 3a 20 53 51 4c 49 54 45  LITE_OK : SQLITE
35b0: 5f 49 4f 45 52 52 3b 0a 23 65 6e 64 69 66 0a 7d  _IOERR;.#endif.}
35c0: 0a 0a 2f 2a 0a 2a 2a 20 54 72 75 6e 63 61 74 65  ../*.** Truncate
35d0: 20 61 6e 20 6f 70 65 6e 20 66 69 6c 65 20 74 6f   an open file to
35e0: 20 61 20 73 70 65 63 69 66 69 65 64 20 73 69 7a   a specified siz
35f0: 65 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f  e.*/.int sqliteO
3600: 73 54 72 75 6e 63 61 74 65 28 4f 73 46 69 6c 65  sTruncate(OsFile
3610: 20 69 64 2c 20 69 6e 74 20 6e 42 79 74 65 29 7b   id, int nByte){
3620: 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f 45 72 72  .  SimulateIOErr
3630: 6f 72 28 53 51 4c 49 54 45 5f 49 4f 45 52 52 29  or(SQLITE_IOERR)
3640: 3b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20  ;.#if OS_UNIX.  
3650: 72 65 74 75 72 6e 20 66 74 72 75 6e 63 61 74 65  return ftruncate
3660: 28 69 64 2e 66 64 2c 20 6e 42 79 74 65 29 3d 3d  (id.fd, nByte)==
3670: 30 20 3f 20 53 51 4c 49 54 45 5f 4f 4b 20 3a 20  0 ? SQLITE_OK : 
3680: 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 23 65  SQLITE_IOERR;.#e
3690: 6e 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a  ndif.#if OS_WIN.
36a0: 20 20 53 65 74 46 69 6c 65 50 6f 69 6e 74 65 72    SetFilePointer
36b0: 28 69 64 2c 20 6e 42 79 74 65 2c 20 30 2c 20 46  (id, nByte, 0, F
36c0: 49 4c 45 5f 42 45 47 49 4e 29 3b 0a 20 20 53 65  ILE_BEGIN);.  Se
36d0: 74 45 6e 64 4f 66 46 69 6c 65 28 69 64 29 3b 0a  tEndOfFile(id);.
36e0: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
36f0: 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a  OK;.#endif.}../*
3700: 0a 2a 2a 20 44 65 74 65 72 6d 69 6e 65 20 74 68  .** Determine th
3710: 65 20 63 75 72 72 65 6e 74 20 73 69 7a 65 20 6f  e current size o
3720: 66 20 61 20 66 69 6c 65 20 69 6e 20 62 79 74 65  f a file in byte
3730: 73 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f  s.*/.int sqliteO
3740: 73 46 69 6c 65 53 69 7a 65 28 4f 73 46 69 6c 65  sFileSize(OsFile
3750: 20 69 64 2c 20 69 6e 74 20 2a 70 53 69 7a 65 29   id, int *pSize)
3760: 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20  {.#if OS_UNIX.  
3770: 73 74 72 75 63 74 20 73 74 61 74 20 62 75 66 3b  struct stat buf;
3780: 0a 20 20 53 69 6d 75 6c 61 74 65 49 4f 45 72 72  .  SimulateIOErr
3790: 6f 72 28 53 51 4c 49 54 45 5f 49 4f 45 52 52 29  or(SQLITE_IOERR)
37a0: 3b 0a 20 20 69 66 28 20 66 73 74 61 74 28 69 64  ;.  if( fstat(id
37b0: 2e 66 64 2c 20 26 62 75 66 29 21 3d 30 20 29 7b  .fd, &buf)!=0 ){
37c0: 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49  .    return SQLI
37d0: 54 45 5f 49 4f 45 52 52 3b 0a 20 20 7d 0a 20 20  TE_IOERR;.  }.  
37e0: 2a 70 53 69 7a 65 20 3d 20 62 75 66 2e 73 74 5f  *pSize = buf.st_
37f0: 73 69 7a 65 3b 0a 20 20 72 65 74 75 72 6e 20 53  size;.  return S
3800: 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66  QLITE_OK;.#endif
3810: 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 53 69  .#if OS_WIN.  Si
3820: 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53 51  mulateIOError(SQ
3830: 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20 2a  LITE_IOERR);.  *
3840: 70 53 69 7a 65 20 3d 20 47 65 74 46 69 6c 65 53  pSize = GetFileS
3850: 69 7a 65 28 69 64 2c 20 30 29 3b 0a 20 20 72 65  ize(id, 0);.  re
3860: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  turn SQLITE_OK;.
3870: 23 65 6e 64 69 66 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a  #endif.}.../*.**
3880: 20 47 65 74 20 61 20 72 65 61 64 20 6f 72 20 77   Get a read or w
3890: 72 69 74 65 20 6c 6f 63 6b 20 6f 6e 20 61 20 66  rite lock on a f
38a0: 69 6c 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  ile..*/.int sqli
38b0: 74 65 4f 73 4c 6f 63 6b 28 4f 73 46 69 6c 65 20  teOsLock(OsFile 
38c0: 69 64 2c 20 69 6e 74 20 77 72 6c 6f 63 6b 29 7b  id, int wrlock){
38d0: 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 69  .#if OS_UNIX.  i
38e0: 6e 74 20 72 63 3b 0a 20 20 69 6e 74 20 6e 65 65  nt rc;.  int nee
38f0: 64 53 79 73 4c 6f 63 6b 3b 0a 20 20 73 71 6c 69  dSysLock;.  sqli
3900: 74 65 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29  teOsEnterMutex()
3910: 3b 0a 20 20 69 66 28 20 77 72 6c 6f 63 6b 20 29  ;.  if( wrlock )
3920: 7b 0a 20 20 20 20 69 66 28 20 69 64 2e 70 4c 6f  {.    if( id.pLo
3930: 63 6b 2d 3e 63 6e 74 21 3d 30 20 29 7b 0a 20 20  ck->cnt!=0 ){.  
3940: 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f      rc = SQLITE_
3950: 42 55 53 59 3b 0a 20 20 20 20 7d 65 6c 73 65 7b  BUSY;.    }else{
3960: 0a 20 20 20 20 20 20 72 63 20 3d 20 53 51 4c 49  .      rc = SQLI
3970: 54 45 5f 4f 4b 3b 0a 20 20 20 20 20 20 69 64 2e  TE_OK;.      id.
3980: 70 4c 6f 63 6b 2d 3e 63 6e 74 20 3d 20 2d 31 3b  pLock->cnt = -1;
3990: 0a 20 20 20 20 20 20 6e 65 65 64 53 79 73 4c 6f  .      needSysLo
39a0: 63 6b 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20  ck = 1;.    }.  
39b0: 7d 65 6c 73 65 7b 0a 20 20 20 20 69 66 28 20 69  }else{.    if( i
39c0: 64 2e 70 4c 6f 63 6b 2d 3e 63 6e 74 3c 30 20 29  d.pLock->cnt<0 )
39d0: 7b 0a 20 20 20 20 20 20 72 63 20 3d 20 53 51 4c  {.      rc = SQL
39e0: 49 54 45 5f 42 55 53 59 3b 0a 20 20 20 20 7d 65  ITE_BUSY;.    }e
39f0: 6c 73 65 7b 0a 20 20 20 20 20 20 72 63 20 3d 20  lse{.      rc = 
3a00: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 20 20 20  SQLITE_OK;.     
3a10: 20 6e 65 65 64 53 79 73 4c 6f 63 6b 20 3d 20 69   needSysLock = i
3a20: 64 2e 70 4c 6f 63 6b 2d 3e 63 6e 74 3d 3d 30 3b  d.pLock->cnt==0;
3a30: 0a 20 20 20 20 20 20 69 64 2e 70 4c 6f 63 6b 2d  .      id.pLock-
3a40: 3e 63 6e 74 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20  >cnt++;.    }.  
3a50: 7d 0a 20 20 73 71 6c 69 74 65 4f 73 4c 65 61 76  }.  sqliteOsLeav
3a60: 65 4d 75 74 65 78 28 29 3b 20 20 20 20 20 20 0a  eMutex();      .
3a70: 20 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45    if( rc==SQLITE
3a80: 5f 4f 4b 20 26 26 20 6e 65 65 64 53 79 73 4c 6f  _OK && needSysLo
3a90: 63 6b 20 29 7b 20 0a 20 20 20 20 73 74 72 75 63  ck ){ .    struc
3aa0: 74 20 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 0a 20 20  t flock lock;.  
3ab0: 20 20 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d 20    lock.l_type = 
3ac0: 77 72 6c 6f 63 6b 20 3f 20 46 5f 57 52 4c 43 4b  wrlock ? F_WRLCK
3ad0: 20 3a 20 46 5f 52 44 4c 43 4b 3b 0a 20 20 20 20   : F_RDLCK;.    
3ae0: 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65 20 3d 20  lock.l_whence = 
3af0: 53 45 45 4b 5f 53 45 54 3b 0a 20 20 20 20 6c 6f  SEEK_SET;.    lo
3b00: 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 6c 6f 63  ck.l_start = loc
3b10: 6b 2e 6c 5f 6c 65 6e 20 3d 20 30 4c 3b 0a 20 20  k.l_len = 0L;.  
3b20: 20 20 72 63 20 3d 20 66 63 6e 74 6c 28 69 64 2e    rc = fcntl(id.
3b30: 66 64 2c 20 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f  fd, F_SETLK, &lo
3b40: 63 6b 29 3d 3d 30 20 3f 20 53 51 4c 49 54 45 5f  ck)==0 ? SQLITE_
3b50: 4f 4b 20 3a 20 53 51 4c 49 54 45 5f 42 55 53 59  OK : SQLITE_BUSY
3b60: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 72  ;.  }.  return r
3b70: 63 3b 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53  c;.#endif.#if OS
3b80: 5f 57 49 4e 0a 20 20 69 66 28 20 21 4c 6f 63 6b  _WIN.  if( !Lock
3b90: 46 69 6c 65 28 69 64 2c 20 30 2c 20 30 2c 20 31  File(id, 0, 0, 1
3ba0: 30 32 34 2c 20 30 29 20 29 7b 0a 20 20 20 20 72  024, 0) ){.    r
3bb0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 42 55 53  eturn SQLITE_BUS
3bc0: 59 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20  Y;.  }.  return 
3bd0: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69  SQLITE_OK;.#endi
3be0: 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 6c 65 61  f.}../*.** Relea
3bf0: 73 65 20 74 68 65 20 72 65 61 64 20 6f 72 20 77  se the read or w
3c00: 72 69 74 65 20 6c 6f 63 6b 20 66 72 6f 6d 20 61  rite lock from a
3c10: 20 66 69 6c 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71   file..*/.int sq
3c20: 6c 69 74 65 4f 73 55 6e 6c 6f 63 6b 28 4f 73 46  liteOsUnlock(OsF
3c30: 69 6c 65 20 69 64 29 7b 0a 23 69 66 20 4f 53 5f  ile id){.#if OS_
3c40: 55 4e 49 58 0a 20 20 69 6e 74 20 72 63 3b 0a 20  UNIX.  int rc;. 
3c50: 20 69 6e 74 20 6e 65 65 64 53 79 73 55 6e 6c 6f   int needSysUnlo
3c60: 63 6b 3b 0a 0a 20 20 73 71 6c 69 74 65 4f 73 45  ck;..  sqliteOsE
3c70: 6e 74 65 72 4d 75 74 65 78 28 29 3b 0a 20 20 69  nterMutex();.  i
3c80: 66 28 20 69 64 2e 70 4c 6f 63 6b 2d 3e 63 6e 74  f( id.pLock->cnt
3c90: 3c 30 20 29 7b 0a 20 20 20 20 6e 65 65 64 53 79  <0 ){.    needSy
3ca0: 73 55 6e 6c 6f 63 6b 20 3d 20 31 3b 0a 20 20 20  sUnlock = 1;.   
3cb0: 20 69 64 2e 70 4c 6f 63 6b 2d 3e 63 6e 74 20 3d   id.pLock->cnt =
3cc0: 20 30 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20   0;.  }else if( 
3cd0: 69 64 2e 70 4c 6f 63 6b 2d 3e 63 6e 74 3e 30 20  id.pLock->cnt>0 
3ce0: 29 7b 0a 20 20 20 20 69 64 2e 70 4c 6f 63 6b 2d  ){.    id.pLock-
3cf0: 3e 63 6e 74 2d 2d 3b 0a 20 20 20 20 6e 65 65 64  >cnt--;.    need
3d00: 53 79 73 55 6e 6c 6f 63 6b 20 3d 20 69 64 2e 70  SysUnlock = id.p
3d10: 4c 6f 63 6b 2d 3e 63 6e 74 3d 3d 30 3b 0a 20 20  Lock->cnt==0;.  
3d20: 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63 20 3d 20  }else{.    rc = 
3d30: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 20 20 6e  SQLITE_OK;.    n
3d40: 65 65 64 53 79 73 55 6e 6c 6f 63 6b 20 3d 20 30  eedSysUnlock = 0
3d50: 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 4f 73  ;.  }.  sqliteOs
3d60: 4c 65 61 76 65 4d 75 74 65 78 28 29 3b 0a 20 20  LeaveMutex();.  
3d70: 69 66 28 20 6e 65 65 64 53 79 73 55 6e 6c 6f 63  if( needSysUnloc
3d80: 6b 20 29 7b 0a 20 20 20 20 73 74 72 75 63 74 20  k ){.    struct 
3d90: 66 6c 6f 63 6b 20 6c 6f 63 6b 3b 0a 20 20 20 20  flock lock;.    
3da0: 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d 20 46 5f  lock.l_type = F_
3db0: 55 4e 4c 43 4b 3b 0a 20 20 20 20 6c 6f 63 6b 2e  UNLCK;.    lock.
3dc0: 6c 5f 77 68 65 6e 63 65 20 3d 20 53 45 45 4b 5f  l_whence = SEEK_
3dd0: 53 45 54 3b 0a 20 20 20 20 6c 6f 63 6b 2e 6c 5f  SET;.    lock.l_
3de0: 73 74 61 72 74 20 3d 20 6c 6f 63 6b 2e 6c 5f 6c  start = lock.l_l
3df0: 65 6e 20 3d 20 30 4c 3b 0a 20 20 20 20 72 63 20  en = 0L;.    rc 
3e00: 3d 20 66 63 6e 74 6c 28 69 64 2e 66 64 2c 20 46  = fcntl(id.fd, F
3e10: 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3d 3d  _SETLK, &lock)==
3e20: 30 20 3f 20 53 51 4c 49 54 45 5f 4f 4b 20 3a 20  0 ? SQLITE_OK : 
3e30: 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 20 20  SQLITE_IOERR;.  
3e40: 7d 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 23  }.  return rc;.#
3e50: 65 6e 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e  endif.#if OS_WIN
3e60: 0a 20 20 72 65 74 75 72 6e 20 55 6e 6c 6f 63 6b  .  return Unlock
3e70: 46 69 6c 65 28 69 64 2c 20 30 2c 20 30 2c 20 31  File(id, 0, 0, 1
3e80: 30 32 34 2c 20 30 29 20 3f 20 53 51 4c 49 54 45  024, 0) ? SQLITE
3e90: 5f 4f 4b 20 3a 20 53 51 4c 49 54 45 5f 49 4f 45  _OK : SQLITE_IOE
3ea0: 52 52 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a  RR;.#endif.}../*
3eb0: 0a 2a 2a 20 47 65 74 20 69 6e 66 6f 72 6d 61 74  .** Get informat
3ec0: 69 6f 6e 20 74 6f 20 73 65 65 64 20 74 68 65 20  ion to seed the 
3ed0: 72 61 6e 64 6f 6d 20 6e 75 6d 62 65 72 20 67 65  random number ge
3ee0: 6e 65 72 61 74 6f 72 2e 0a 2a 2f 0a 69 6e 74 20  nerator..*/.int 
3ef0: 73 71 6c 69 74 65 4f 73 52 61 6e 64 6f 6d 53 65  sqliteOsRandomSe
3f00: 65 64 28 63 68 61 72 20 2a 7a 42 75 66 29 7b 0a  ed(char *zBuf){.
3f10: 20 20 73 74 61 74 69 63 20 69 6e 74 20 6f 6e 63    static int onc
3f20: 65 20 3d 20 31 3b 0a 23 69 66 20 4f 53 5f 55 4e  e = 1;.#if OS_UN
3f30: 49 58 0a 20 20 69 6e 74 20 70 69 64 3b 0a 20 20  IX.  int pid;.  
3f40: 74 69 6d 65 28 28 74 69 6d 65 5f 74 2a 29 7a 42  time((time_t*)zB
3f50: 75 66 29 3b 0a 20 20 70 69 64 20 3d 20 67 65 74  uf);.  pid = get
3f60: 70 69 64 28 29 3b 0a 20 20 6d 65 6d 63 70 79 28  pid();.  memcpy(
3f70: 26 7a 42 75 66 5b 73 69 7a 65 6f 66 28 74 69 6d  &zBuf[sizeof(tim
3f80: 65 5f 74 29 5d 2c 20 26 70 69 64 2c 20 73 69 7a  e_t)], &pid, siz
3f90: 65 6f 66 28 70 69 64 29 29 3b 0a 23 65 6e 64 69  eof(pid));.#endi
3fa0: 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 47  f.#if OS_WIN.  G
3fb0: 65 74 53 79 73 74 65 6d 54 69 6d 65 28 28 4c 50  etSystemTime((LP
3fc0: 53 59 53 54 45 4d 54 49 4d 45 29 7a 42 75 66 29  SYSTEMTIME)zBuf)
3fd0: 3b 0a 23 65 6e 64 69 66 0a 20 20 69 66 28 20 6f  ;.#endif.  if( o
3fe0: 6e 63 65 20 29 7b 0a 20 20 20 20 69 6e 74 20 73  nce ){.    int s
3ff0: 65 65 64 3b 0a 20 20 20 20 6d 65 6d 63 70 79 28  eed;.    memcpy(
4000: 26 73 65 65 64 2c 20 7a 42 75 66 2c 20 73 69 7a  &seed, zBuf, siz
4010: 65 6f 66 28 73 65 65 64 29 29 3b 0a 20 20 20 20  eof(seed));.    
4020: 73 72 61 6e 64 28 73 65 65 64 29 3b 0a 20 20 20  srand(seed);.   
4030: 20 6f 6e 63 65 20 3d 20 30 3b 0a 20 20 7d 0a 20   once = 0;.  }. 
4040: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f   return SQLITE_O
4050: 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 6c 65 65  K;.}../*.** Slee
4060: 70 20 66 6f 72 20 61 20 6c 69 74 74 6c 65 20 77  p for a little w
4070: 68 69 6c 65 2e 20 20 52 65 74 75 72 6e 20 74 68  hile.  Return th
4080: 65 20 61 6d 6f 75 6e 74 20 6f 66 20 74 69 6d 65  e amount of time
4090: 20 73 6c 65 70 74 2e 0a 2a 2f 0a 69 6e 74 20 73   slept..*/.int s
40a0: 71 6c 69 74 65 4f 73 53 6c 65 65 70 28 69 6e 74  qliteOsSleep(int
40b0: 20 6d 73 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49   ms){.#if OS_UNI
40c0: 58 0a 23 69 66 20 64 65 66 69 6e 65 64 28 48 41  X.#if defined(HA
40d0: 56 45 5f 55 53 4c 45 45 50 29 20 26 26 20 48 41  VE_USLEEP) && HA
40e0: 56 45 5f 55 53 4c 45 45 50 0a 20 20 75 73 6c 65  VE_USLEEP.  usle
40f0: 65 70 28 6d 73 2a 31 30 30 30 29 3b 0a 20 20 72  ep(ms*1000);.  r
4100: 65 74 75 72 6e 20 6d 73 3b 0a 23 65 6c 73 65 0a  eturn ms;.#else.
4110: 20 20 73 6c 65 65 70 28 28 6d 73 2b 39 39 39 29    sleep((ms+999)
4120: 2f 31 30 30 30 29 3b 0a 20 20 72 65 74 75 72 6e  /1000);.  return
4130: 20 31 30 30 30 2a 28 28 6d 73 2b 39 39 39 29 2f   1000*((ms+999)/
4140: 31 30 30 30 29 3b 0a 23 65 6e 64 69 66 0a 23 65  1000);.#endif.#e
4150: 6e 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a  ndif.#if OS_WIN.
4160: 20 20 53 6c 65 65 70 28 6d 73 29 3b 0a 20 20 72    Sleep(ms);.  r
4170: 65 74 75 72 6e 20 6d 73 3b 0a 23 65 6e 64 69 66  eturn ms;.#endif
4180: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f  .}../*.** The fo
4190: 6c 6c 6f 77 69 6e 67 20 70 61 69 72 20 6f 66 20  llowing pair of 
41a0: 72 6f 75 74 69 6e 65 20 69 6d 70 6c 65 6d 65 6e  routine implemen
41b0: 74 20 6d 75 74 75 61 6c 20 65 78 63 6c 75 73 69  t mutual exclusi
41c0: 6f 6e 20 66 6f 72 0a 2a 2a 20 6d 75 6c 74 69 2d  on for.** multi-
41d0: 74 68 72 65 61 64 65 64 20 70 72 6f 63 65 73 73  threaded process
41e0: 65 73 2e 20 20 4f 6e 6c 79 20 61 20 73 69 6e 67  es.  Only a sing
41f0: 6c 65 20 74 68 72 65 61 64 20 69 73 20 61 6c 6c  le thread is all
4200: 6f 77 65 64 20 74 6f 0a 2a 2a 20 65 78 65 63 75  owed to.** execu
4210: 74 65 64 20 63 6f 64 65 20 74 68 61 74 20 69 73  ted code that is
4220: 20 73 75 72 72 6f 75 6e 64 65 64 20 62 79 20 45   surrounded by E
4230: 6e 74 65 72 4d 75 74 65 78 28 29 20 61 6e 64 20  nterMutex() and 
4240: 4c 65 61 76 65 4d 75 74 65 78 28 29 2e 0a 2a 2a  LeaveMutex()..**
4250: 0a 2a 2a 20 53 51 4c 69 74 65 20 75 73 65 73 20  .** SQLite uses 
4260: 6f 6e 6c 79 20 61 20 73 69 6e 67 6c 65 20 4d 75  only a single Mu
4270: 74 65 78 2e 20 20 54 68 65 72 65 20 69 73 20 6e  tex.  There is n
4280: 6f 74 20 6d 75 63 68 20 63 72 69 74 69 63 61 6c  ot much critical
4290: 0a 2a 2a 20 63 6f 64 65 20 61 6e 64 20 77 68 61  .** code and wha
42a0: 74 20 6c 69 74 74 6c 65 20 74 68 65 72 65 20 69  t little there i
42b0: 73 20 65 78 65 63 75 74 65 73 20 71 75 69 63 6b  s executes quick
42c0: 6c 79 20 61 6e 64 20 77 69 74 68 6f 75 74 20 62  ly and without b
42d0: 6c 6f 63 6b 69 6e 67 2e 0a 2a 2a 0a 2a 2a 2a 2a  locking..**.****
42e0: 2a 2a 20 54 42 44 3a 20 20 54 68 65 20 6d 75 74  ** TBD:  The mut
42f0: 65 78 20 69 73 20 63 75 72 72 65 6e 74 6c 79 20  ex is currently 
4300: 75 6e 69 6d 70 6c 65 6d 65 6e 74 65 64 2e 20 20  unimplemented.  
4310: 55 6e 74 69 6c 20 69 74 20 69 73 0a 2a 2a 2a 2a  Until it is.****
4320: 2a 2a 20 69 6d 70 6c 65 6d 65 6e 74 65 64 2c 20  ** implemented, 
4330: 53 51 4c 69 74 65 20 69 73 20 6e 6f 74 20 74 68  SQLite is not th
4340: 72 65 61 64 73 61 66 65 2e 0a 2a 2f 0a 73 74 61  readsafe..*/.sta
4350: 74 69 63 20 69 6e 74 20 69 6e 4d 75 74 65 78 20  tic int inMutex 
4360: 3d 20 30 3b 0a 76 6f 69 64 20 73 71 6c 69 74 65  = 0;.void sqlite
4370: 4f 73 45 6e 74 65 72 4d 75 74 65 78 28 29 7b 0a  OsEnterMutex(){.
4380: 20 20 61 73 73 65 72 74 28 20 21 69 6e 4d 75 74    assert( !inMut
4390: 65 78 20 29 3b 0a 20 20 69 6e 4d 75 74 65 78 20  ex );.  inMutex 
43a0: 3d 20 31 3b 0a 7d 0a 76 6f 69 64 20 73 71 6c 69  = 1;.}.void sqli
43b0: 74 65 4f 73 4c 65 61 76 65 4d 75 74 65 78 28 29  teOsLeaveMutex()
43c0: 7b 0a 20 20 61 73 73 65 72 74 28 20 69 6e 4d 75  {.  assert( inMu
43d0: 74 65 78 20 29 3b 0a 20 20 69 6e 4d 75 74 65 78  tex );.  inMutex
43e0: 20 3d 20 30 3b 0a 7d 0a                           = 0;.}.