/ Hex Artifact Content
Login

Artifact 6b8f9fcc683bb888e07fc485372803baa68faadb:


0000: 2f 2a 0a 2a 2a 20 32 30 30 34 20 4d 61 79 20 32  /*.** 2004 May 2
0010: 32 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 75 74 68  2.**.** The auth
0020: 6f 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70  or disclaims cop
0030: 79 72 69 67 68 74 20 74 6f 20 74 68 69 73 20 73  yright to this s
0040: 6f 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20  ource code.  In 
0050: 70 6c 61 63 65 20 6f 66 0a 2a 2a 20 61 20 6c 65  place of.** a le
0060: 67 61 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72 65  gal notice, here
0070: 20 69 73 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a   is a blessing:.
0080: 2a 2a 0a 2a 2a 20 20 20 20 4d 61 79 20 79 6f 75  **.**    May you
0090: 20 64 6f 20 67 6f 6f 64 20 61 6e 64 20 6e 6f 74   do good and not
00a0: 20 65 76 69 6c 2e 0a 2a 2a 20 20 20 20 4d 61 79   evil..**    May
00b0: 20 79 6f 75 20 66 69 6e 64 20 66 6f 72 67 69 76   you find forgiv
00c0: 65 6e 65 73 73 20 66 6f 72 20 79 6f 75 72 73 65  eness for yourse
00d0: 6c 66 20 61 6e 64 20 66 6f 72 67 69 76 65 20 6f  lf and forgive o
00e0: 74 68 65 72 73 2e 0a 2a 2a 20 20 20 20 4d 61 79  thers..**    May
00f0: 20 79 6f 75 20 73 68 61 72 65 20 66 72 65 65 6c   you share freel
0100: 79 2c 20 6e 65 76 65 72 20 74 61 6b 69 6e 67 20  y, never taking 
0110: 6d 6f 72 65 20 74 68 61 6e 20 79 6f 75 20 67 69  more than you gi
0120: 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ve..**.*********
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0170: 2a 2a 2a 2a 2a 0a 2a 2a 0a 2a 2a 20 54 68 69 73  *****.**.** This
0180: 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 63   file contains c
0190: 6f 64 65 20 74 68 61 74 20 69 73 20 73 70 65 63  ode that is spec
01a0: 69 66 69 63 20 74 6f 20 77 69 6e 64 6f 77 73 2e  ific to windows.
01b0: 0a 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 6f 73  .*/.#include "os
01c0: 2e 68 22 20 20 20 20 20 20 20 20 20 20 2f 2a 20  .h"          /* 
01d0: 4d 75 73 74 20 62 65 20 66 69 72 73 74 20 74 6f  Must be first to
01e0: 20 65 6e 61 62 6c 65 20 6c 61 72 67 65 20 66 69   enable large fi
01f0: 6c 65 20 73 75 70 70 6f 72 74 20 2a 2f 0a 23 69  le support */.#i
0200: 66 20 4f 53 5f 57 49 4e 20 20 20 20 20 20 20 20  f OS_WIN        
0210: 20 20 20 20 20 20 20 2f 2a 20 54 68 69 73 20 66         /* This f
0220: 69 6c 65 20 69 73 20 75 73 65 64 20 66 6f 72 20  ile is used for 
0230: 77 69 6e 64 6f 77 73 20 6f 6e 6c 79 20 2a 2f 0a  windows only */.
0240: 23 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65  #include "sqlite
0250: 49 6e 74 2e 68 22 0a 0a 23 69 6e 63 6c 75 64 65  Int.h"..#include
0260: 20 3c 77 69 6e 62 61 73 65 2e 68 3e 0a 0a 2f 2a   <winbase.h>../*
0270: 0a 2a 2a 20 4d 61 63 72 6f 73 20 75 73 65 64 20  .** Macros used 
0280: 74 6f 20 64 65 74 65 72 6d 69 6e 65 20 77 68 65  to determine whe
0290: 74 68 65 72 20 6f 72 20 6e 6f 74 20 74 6f 20 75  ther or not to u
02a0: 73 65 20 74 68 72 65 61 64 73 2e 0a 2a 2f 0a 23  se threads..*/.#
02b0: 69 66 20 64 65 66 69 6e 65 64 28 54 48 52 45 41  if defined(THREA
02c0: 44 53 41 46 45 29 20 26 26 20 54 48 52 45 41 44  DSAFE) && THREAD
02d0: 53 41 46 45 0a 23 20 64 65 66 69 6e 65 20 53 51  SAFE.# define SQ
02e0: 4c 49 54 45 5f 57 33 32 5f 54 48 52 45 41 44 53  LITE_W32_THREADS
02f0: 20 31 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a   1.#endif../*.**
0300: 20 49 6e 63 6c 75 64 65 20 63 6f 64 65 20 74 68   Include code th
0310: 61 74 20 69 73 20 63 6f 6d 6d 6f 6e 20 74 6f 20  at is common to 
0320: 61 6c 6c 20 6f 73 5f 2a 2e 63 20 66 69 6c 65 73  all os_*.c files
0330: 0a 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 6f 73  .*/.#include "os
0340: 5f 63 6f 6d 6d 6f 6e 2e 68 22 0a 0a 2f 2a 0a 2a  _common.h"../*.*
0350: 2a 20 44 65 6c 65 74 65 20 74 68 65 20 6e 61 6d  * Delete the nam
0360: 65 64 20 66 69 6c 65 0a 2a 2f 0a 69 6e 74 20 73  ed file.*/.int s
0370: 71 6c 69 74 65 33 4f 73 44 65 6c 65 74 65 28 63  qlite3OsDelete(c
0380: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65  onst char *zFile
0390: 6e 61 6d 65 29 7b 0a 20 20 44 65 6c 65 74 65 46  name){.  DeleteF
03a0: 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a  ile(zFilename);.
03b0: 20 20 54 52 41 43 45 32 28 22 44 45 4c 45 54 45    TRACE2("DELETE
03c0: 20 5c 22 25 73 5c 22 5c 6e 22 2c 20 7a 46 69 6c   \"%s\"\n", zFil
03d0: 65 6e 61 6d 65 29 3b 0a 20 20 72 65 74 75 72 6e  ename);.  return
03e0: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f   SQLITE_OK;.}../
03f0: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52 55 45  *.** Return TRUE
0400: 20 69 66 20 74 68 65 20 6e 61 6d 65 64 20 66 69   if the named fi
0410: 6c 65 20 65 78 69 73 74 73 2e 0a 2a 2f 0a 69 6e  le exists..*/.in
0420: 74 20 73 71 6c 69 74 65 33 4f 73 46 69 6c 65 45  t sqlite3OsFileE
0430: 78 69 73 74 73 28 63 6f 6e 73 74 20 63 68 61 72  xists(const char
0440: 20 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b 0a 20 20   *zFilename){.  
0450: 72 65 74 75 72 6e 20 47 65 74 46 69 6c 65 41 74  return GetFileAt
0460: 74 72 69 62 75 74 65 73 28 7a 46 69 6c 65 6e 61  tributes(zFilena
0470: 6d 65 29 20 21 3d 20 30 78 66 66 66 66 66 66 66  me) != 0xfffffff
0480: 66 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 74 74 65  f;.}../*.** Atte
0490: 6d 70 74 20 74 6f 20 6f 70 65 6e 20 61 20 66 69  mpt to open a fi
04a0: 6c 65 20 66 6f 72 20 62 6f 74 68 20 72 65 61 64  le for both read
04b0: 69 6e 67 20 61 6e 64 20 77 72 69 74 69 6e 67 2e  ing and writing.
04c0: 20 20 49 66 20 74 68 61 74 0a 2a 2a 20 66 61 69    If that.** fai
04d0: 6c 73 2c 20 74 72 79 20 6f 70 65 6e 69 6e 67 20  ls, try opening 
04e0: 69 74 20 72 65 61 64 2d 6f 6e 6c 79 2e 20 20 49  it read-only.  I
04f0: 66 20 74 68 65 20 66 69 6c 65 20 64 6f 65 73 20  f the file does 
0500: 6e 6f 74 20 65 78 69 73 74 2c 0a 2a 2a 20 74 72  not exist,.** tr
0510: 79 20 74 6f 20 63 72 65 61 74 65 20 69 74 2e 0a  y to create it..
0520: 2a 2a 0a 2a 2a 20 4f 6e 20 73 75 63 63 65 73 73  **.** On success
0530: 2c 20 61 20 68 61 6e 64 6c 65 20 66 6f 72 20 74  , a handle for t
0540: 68 65 20 6f 70 65 6e 20 66 69 6c 65 20 69 73 20  he open file is 
0550: 77 72 69 74 74 65 6e 20 74 6f 20 2a 69 64 0a 2a  written to *id.*
0560: 2a 20 61 6e 64 20 2a 70 52 65 61 64 6f 6e 6c 79  * and *pReadonly
0570: 20 69 73 20 73 65 74 20 74 6f 20 30 20 69 66 20   is set to 0 if 
0580: 74 68 65 20 66 69 6c 65 20 77 61 73 20 6f 70 65  the file was ope
0590: 6e 65 64 20 66 6f 72 20 72 65 61 64 69 6e 67 20  ned for reading 
05a0: 61 6e 64 0a 2a 2a 20 77 72 69 74 69 6e 67 20 6f  and.** writing o
05b0: 72 20 31 20 69 66 20 74 68 65 20 66 69 6c 65 20  r 1 if the file 
05c0: 77 61 73 20 6f 70 65 6e 65 64 20 72 65 61 64 2d  was opened read-
05d0: 6f 6e 6c 79 2e 20 20 54 68 65 20 66 75 6e 63 74  only.  The funct
05e0: 69 6f 6e 20 72 65 74 75 72 6e 73 0a 2a 2a 20 53  ion returns.** S
05f0: 51 4c 49 54 45 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20  QLITE_OK..**.** 
0600: 4f 6e 20 66 61 69 6c 75 72 65 2c 20 74 68 65 20  On failure, the 
0610: 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73  function returns
0620: 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e   SQLITE_CANTOPEN
0630: 20 61 6e 64 20 6c 65 61 76 65 73 0a 2a 2a 20 2a   and leaves.** *
0640: 69 64 20 61 6e 64 20 2a 70 52 65 61 64 6f 6e 6c  id and *pReadonl
0650: 79 20 75 6e 63 68 61 6e 67 65 64 2e 0a 2a 2f 0a  y unchanged..*/.
0660: 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 4f 70 65  int sqlite3OsOpe
0670: 6e 52 65 61 64 57 72 69 74 65 28 0a 20 20 63 6f  nReadWrite(.  co
0680: 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e  nst char *zFilen
0690: 61 6d 65 2c 0a 20 20 4f 73 46 69 6c 65 20 2a 69  ame,.  OsFile *i
06a0: 64 2c 0a 20 20 69 6e 74 20 2a 70 52 65 61 64 6f  d,.  int *pReado
06b0: 6e 6c 79 0a 29 7b 0a 20 20 48 41 4e 44 4c 45 20  nly.){.  HANDLE 
06c0: 68 20 3d 20 43 72 65 61 74 65 46 69 6c 65 28 7a  h = CreateFile(z
06d0: 46 69 6c 65 6e 61 6d 65 2c 0a 20 20 20 20 20 47  Filename,.     G
06e0: 45 4e 45 52 49 43 5f 52 45 41 44 20 7c 20 47 45  ENERIC_READ | GE
06f0: 4e 45 52 49 43 5f 57 52 49 54 45 2c 0a 20 20 20  NERIC_WRITE,.   
0700: 20 20 46 49 4c 45 5f 53 48 41 52 45 5f 52 45 41    FILE_SHARE_REA
0710: 44 20 7c 20 46 49 4c 45 5f 53 48 41 52 45 5f 57  D | FILE_SHARE_W
0720: 52 49 54 45 2c 0a 20 20 20 20 20 4e 55 4c 4c 2c  RITE,.     NULL,
0730: 0a 20 20 20 20 20 4f 50 45 4e 5f 41 4c 57 41 59  .     OPEN_ALWAY
0740: 53 2c 0a 20 20 20 20 20 46 49 4c 45 5f 41 54 54  S,.     FILE_ATT
0750: 52 49 42 55 54 45 5f 4e 4f 52 4d 41 4c 20 7c 20  RIBUTE_NORMAL | 
0760: 46 49 4c 45 5f 46 4c 41 47 5f 52 41 4e 44 4f 4d  FILE_FLAG_RANDOM
0770: 5f 41 43 43 45 53 53 2c 0a 20 20 20 20 20 4e 55  _ACCESS,.     NU
0780: 4c 4c 0a 20 20 29 3b 0a 20 20 69 66 28 20 68 3d  LL.  );.  if( h=
0790: 3d 49 4e 56 41 4c 49 44 5f 48 41 4e 44 4c 45 5f  =INVALID_HANDLE_
07a0: 56 41 4c 55 45 20 29 7b 0a 20 20 20 20 68 20 3d  VALUE ){.    h =
07b0: 20 43 72 65 61 74 65 46 69 6c 65 28 7a 46 69 6c   CreateFile(zFil
07c0: 65 6e 61 6d 65 2c 0a 20 20 20 20 20 20 20 47 45  ename,.       GE
07d0: 4e 45 52 49 43 5f 52 45 41 44 2c 0a 20 20 20 20  NERIC_READ,.    
07e0: 20 20 20 46 49 4c 45 5f 53 48 41 52 45 5f 52 45     FILE_SHARE_RE
07f0: 41 44 2c 0a 20 20 20 20 20 20 20 4e 55 4c 4c 2c  AD,.       NULL,
0800: 0a 20 20 20 20 20 20 20 4f 50 45 4e 5f 41 4c 57  .       OPEN_ALW
0810: 41 59 53 2c 0a 20 20 20 20 20 20 20 46 49 4c 45  AYS,.       FILE
0820: 5f 41 54 54 52 49 42 55 54 45 5f 4e 4f 52 4d 41  _ATTRIBUTE_NORMA
0830: 4c 20 7c 20 46 49 4c 45 5f 46 4c 41 47 5f 52 41  L | FILE_FLAG_RA
0840: 4e 44 4f 4d 5f 41 43 43 45 53 53 2c 0a 20 20 20  NDOM_ACCESS,.   
0850: 20 20 20 20 4e 55 4c 4c 0a 20 20 20 20 29 3b 0a      NULL.    );.
0860: 20 20 20 20 69 66 28 20 68 3d 3d 49 4e 56 41 4c      if( h==INVAL
0870: 49 44 5f 48 41 4e 44 4c 45 5f 56 41 4c 55 45 20  ID_HANDLE_VALUE 
0880: 29 7b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20  ){.      return 
0890: 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b  SQLITE_CANTOPEN;
08a0: 0a 20 20 20 20 7d 0a 20 20 20 20 2a 70 52 65 61  .    }.    *pRea
08b0: 64 6f 6e 6c 79 20 3d 20 31 3b 0a 20 20 7d 65 6c  donly = 1;.  }el
08c0: 73 65 7b 0a 20 20 20 20 2a 70 52 65 61 64 6f 6e  se{.    *pReadon
08d0: 6c 79 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 64  ly = 0;.  }.  id
08e0: 2d 3e 68 20 3d 20 68 3b 0a 20 20 69 64 2d 3e 6c  ->h = h;.  id->l
08f0: 6f 63 6b 74 79 70 65 20 3d 20 4e 4f 5f 4c 4f 43  ocktype = NO_LOC
0900: 4b 3b 0a 20 20 69 64 2d 3e 73 68 61 72 65 64 4c  K;.  id->sharedL
0910: 6f 63 6b 42 79 74 65 20 3d 20 30 3b 0a 20 20 4f  ockByte = 0;.  O
0920: 70 65 6e 43 6f 75 6e 74 65 72 28 2b 31 29 3b 0a  penCounter(+1);.
0930: 20 20 54 52 41 43 45 33 28 22 4f 50 45 4e 20 52    TRACE3("OPEN R
0940: 2f 57 20 25 64 20 5c 22 25 73 5c 22 5c 6e 22 2c  /W %d \"%s\"\n",
0950: 20 68 2c 20 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a   h, zFilename);.
0960: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
0970: 4f 4b 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 41 74  OK;.}.../*.** At
0980: 74 65 6d 70 74 20 74 6f 20 6f 70 65 6e 20 61 20  tempt to open a 
0990: 6e 65 77 20 66 69 6c 65 20 66 6f 72 20 65 78 63  new file for exc
09a0: 6c 75 73 69 76 65 20 61 63 63 65 73 73 20 62 79  lusive access by
09b0: 20 74 68 69 73 20 70 72 6f 63 65 73 73 2e 0a 2a   this process..*
09c0: 2a 20 54 68 65 20 66 69 6c 65 20 77 69 6c 6c 20  * The file will 
09d0: 62 65 20 6f 70 65 6e 65 64 20 66 6f 72 20 62 6f  be opened for bo
09e0: 74 68 20 72 65 61 64 69 6e 67 20 61 6e 64 20 77  th reading and w
09f0: 72 69 74 69 6e 67 2e 20 20 54 6f 20 61 76 6f 69  riting.  To avoi
0a00: 64 0a 2a 2a 20 61 20 70 6f 74 65 6e 74 69 61 6c  d.** a potential
0a10: 20 73 65 63 75 72 69 74 79 20 70 72 6f 62 6c 65   security proble
0a20: 6d 2c 20 77 65 20 64 6f 20 6e 6f 74 20 61 6c 6c  m, we do not all
0a30: 6f 77 20 74 68 65 20 66 69 6c 65 20 74 6f 20 68  ow the file to h
0a40: 61 76 65 0a 2a 2a 20 70 72 65 76 69 6f 75 73 6c  ave.** previousl
0a50: 79 20 65 78 69 73 74 65 64 2e 20 20 4e 6f 72 20  y existed.  Nor 
0a60: 64 6f 20 77 65 20 61 6c 6c 6f 77 20 74 68 65 20  do we allow the 
0a70: 66 69 6c 65 20 74 6f 20 62 65 20 61 20 73 79 6d  file to be a sym
0a80: 62 6f 6c 69 63 0a 2a 2a 20 6c 69 6e 6b 2e 0a 2a  bolic.** link..*
0a90: 2a 0a 2a 2a 20 49 66 20 64 65 6c 46 6c 61 67 20  *.** If delFlag 
0aa0: 69 73 20 74 72 75 65 2c 20 74 68 65 6e 20 6d 61  is true, then ma
0ab0: 6b 65 20 61 72 72 61 6e 67 65 6d 65 6e 74 73 20  ke arrangements 
0ac0: 74 6f 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79  to automatically
0ad0: 20 64 65 6c 65 74 65 0a 2a 2a 20 74 68 65 20 66   delete.** the f
0ae0: 69 6c 65 20 77 68 65 6e 20 69 74 20 69 73 20 63  ile when it is c
0af0: 6c 6f 73 65 64 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20  losed..**.** On 
0b00: 73 75 63 63 65 73 73 2c 20 77 72 69 74 65 20 74  success, write t
0b10: 68 65 20 66 69 6c 65 20 68 61 6e 64 6c 65 20 69  he file handle i
0b20: 6e 74 6f 20 2a 69 64 20 61 6e 64 20 72 65 74 75  nto *id and retu
0b30: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a 2a 2a  rn SQLITE_OK..**
0b40: 0a 2a 2a 20 4f 6e 20 66 61 69 6c 75 72 65 2c 20  .** On failure, 
0b50: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41  return SQLITE_CA
0b60: 4e 54 4f 50 45 4e 2e 0a 2a 2f 0a 69 6e 74 20 73  NTOPEN..*/.int s
0b70: 71 6c 69 74 65 33 4f 73 4f 70 65 6e 45 78 63 6c  qlite3OsOpenExcl
0b80: 75 73 69 76 65 28 63 6f 6e 73 74 20 63 68 61 72  usive(const char
0b90: 20 2a 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 73 46   *zFilename, OsF
0ba0: 69 6c 65 20 2a 69 64 2c 20 69 6e 74 20 64 65 6c  ile *id, int del
0bb0: 46 6c 61 67 29 7b 0a 20 20 48 41 4e 44 4c 45 20  Flag){.  HANDLE 
0bc0: 68 3b 0a 20 20 69 6e 74 20 66 69 6c 65 66 6c 61  h;.  int filefla
0bd0: 67 73 3b 0a 20 20 69 66 28 20 64 65 6c 46 6c 61  gs;.  if( delFla
0be0: 67 20 29 7b 0a 20 20 20 20 66 69 6c 65 66 6c 61  g ){.    filefla
0bf0: 67 73 20 3d 20 46 49 4c 45 5f 41 54 54 52 49 42  gs = FILE_ATTRIB
0c00: 55 54 45 5f 54 45 4d 50 4f 52 41 52 59 20 7c 20  UTE_TEMPORARY | 
0c10: 46 49 4c 45 5f 46 4c 41 47 5f 52 41 4e 44 4f 4d  FILE_FLAG_RANDOM
0c20: 5f 41 43 43 45 53 53 20 0a 20 20 20 20 20 20 20  _ACCESS .       
0c30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7c 20                | 
0c40: 46 49 4c 45 5f 46 4c 41 47 5f 44 45 4c 45 54 45  FILE_FLAG_DELETE
0c50: 5f 4f 4e 5f 43 4c 4f 53 45 3b 0a 20 20 7d 65 6c  _ON_CLOSE;.  }el
0c60: 73 65 7b 0a 20 20 20 20 66 69 6c 65 66 6c 61 67  se{.    fileflag
0c70: 73 20 3d 20 46 49 4c 45 5f 46 4c 41 47 5f 52 41  s = FILE_FLAG_RA
0c80: 4e 44 4f 4d 5f 41 43 43 45 53 53 3b 0a 20 20 7d  NDOM_ACCESS;.  }
0c90: 0a 20 20 68 20 3d 20 43 72 65 61 74 65 46 69 6c  .  h = CreateFil
0ca0: 65 28 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20 20 20  e(zFilename,.   
0cb0: 20 20 47 45 4e 45 52 49 43 5f 52 45 41 44 20 7c    GENERIC_READ |
0cc0: 20 47 45 4e 45 52 49 43 5f 57 52 49 54 45 2c 0a   GENERIC_WRITE,.
0cd0: 20 20 20 20 20 30 2c 0a 20 20 20 20 20 4e 55 4c       0,.     NUL
0ce0: 4c 2c 0a 20 20 20 20 20 43 52 45 41 54 45 5f 41  L,.     CREATE_A
0cf0: 4c 57 41 59 53 2c 0a 20 20 20 20 20 66 69 6c 65  LWAYS,.     file
0d00: 66 6c 61 67 73 2c 0a 20 20 20 20 20 4e 55 4c 4c  flags,.     NULL
0d10: 0a 20 20 29 3b 0a 20 20 69 66 28 20 68 3d 3d 49  .  );.  if( h==I
0d20: 4e 56 41 4c 49 44 5f 48 41 4e 44 4c 45 5f 56 41  NVALID_HANDLE_VA
0d30: 4c 55 45 20 29 7b 0a 20 20 20 20 72 65 74 75 72  LUE ){.    retur
0d40: 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45  n SQLITE_CANTOPE
0d50: 4e 3b 0a 20 20 7d 0a 20 20 69 64 2d 3e 68 20 3d  N;.  }.  id->h =
0d60: 20 68 3b 0a 20 20 69 64 2d 3e 6c 6f 63 6b 74 79   h;.  id->lockty
0d70: 70 65 20 3d 20 4e 4f 5f 4c 4f 43 4b 3b 0a 20 20  pe = NO_LOCK;.  
0d80: 69 64 2d 3e 73 68 61 72 65 64 4c 6f 63 6b 42 79  id->sharedLockBy
0d90: 74 65 20 3d 20 30 3b 0a 20 20 4f 70 65 6e 43 6f  te = 0;.  OpenCo
0da0: 75 6e 74 65 72 28 2b 31 29 3b 0a 20 20 54 52 41  unter(+1);.  TRA
0db0: 43 45 33 28 22 4f 50 45 4e 20 45 58 20 25 64 20  CE3("OPEN EX %d 
0dc0: 5c 22 25 73 5c 22 5c 6e 22 2c 20 68 2c 20 7a 46  \"%s\"\n", h, zF
0dd0: 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 72 65 74 75  ilename);.  retu
0de0: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a  rn SQLITE_OK;.}.
0df0: 0a 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74  ./*.** Attempt t
0e00: 6f 20 6f 70 65 6e 20 61 20 6e 65 77 20 66 69 6c  o open a new fil
0e10: 65 20 66 6f 72 20 72 65 61 64 2d 6f 6e 6c 79 20  e for read-only 
0e20: 61 63 63 65 73 73 2e 0a 2a 2a 0a 2a 2a 20 4f 6e  access..**.** On
0e30: 20 73 75 63 63 65 73 73 2c 20 77 72 69 74 65 20   success, write 
0e40: 74 68 65 20 66 69 6c 65 20 68 61 6e 64 6c 65 20  the file handle 
0e50: 69 6e 74 6f 20 2a 69 64 20 61 6e 64 20 72 65 74  into *id and ret
0e60: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a 2a  urn SQLITE_OK..*
0e70: 2a 0a 2a 2a 20 4f 6e 20 66 61 69 6c 75 72 65 2c  *.** On failure,
0e80: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43   return SQLITE_C
0e90: 41 4e 54 4f 50 45 4e 2e 0a 2a 2f 0a 69 6e 74 20  ANTOPEN..*/.int 
0ea0: 73 71 6c 69 74 65 33 4f 73 4f 70 65 6e 52 65 61  sqlite3OsOpenRea
0eb0: 64 4f 6e 6c 79 28 63 6f 6e 73 74 20 63 68 61 72  dOnly(const char
0ec0: 20 2a 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 73 46   *zFilename, OsF
0ed0: 69 6c 65 20 2a 69 64 29 7b 0a 20 20 48 41 4e 44  ile *id){.  HAND
0ee0: 4c 45 20 68 20 3d 20 43 72 65 61 74 65 46 69 6c  LE h = CreateFil
0ef0: 65 28 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20 20 20  e(zFilename,.   
0f00: 20 20 47 45 4e 45 52 49 43 5f 52 45 41 44 2c 0a    GENERIC_READ,.
0f10: 20 20 20 20 20 30 2c 0a 20 20 20 20 20 4e 55 4c       0,.     NUL
0f20: 4c 2c 0a 20 20 20 20 20 4f 50 45 4e 5f 45 58 49  L,.     OPEN_EXI
0f30: 53 54 49 4e 47 2c 0a 20 20 20 20 20 46 49 4c 45  STING,.     FILE
0f40: 5f 41 54 54 52 49 42 55 54 45 5f 4e 4f 52 4d 41  _ATTRIBUTE_NORMA
0f50: 4c 20 7c 20 46 49 4c 45 5f 46 4c 41 47 5f 52 41  L | FILE_FLAG_RA
0f60: 4e 44 4f 4d 5f 41 43 43 45 53 53 2c 0a 20 20 20  NDOM_ACCESS,.   
0f70: 20 20 4e 55 4c 4c 0a 20 20 29 3b 0a 20 20 69 66    NULL.  );.  if
0f80: 28 20 68 3d 3d 49 4e 56 41 4c 49 44 5f 48 41 4e  ( h==INVALID_HAN
0f90: 44 4c 45 5f 56 41 4c 55 45 20 29 7b 0a 20 20 20  DLE_VALUE ){.   
0fa0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43   return SQLITE_C
0fb0: 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 20 69  ANTOPEN;.  }.  i
0fc0: 64 2d 3e 68 20 3d 20 68 3b 0a 20 20 69 64 2d 3e  d->h = h;.  id->
0fd0: 6c 6f 63 6b 74 79 70 65 20 3d 20 4e 4f 5f 4c 4f  locktype = NO_LO
0fe0: 43 4b 3b 0a 20 20 69 64 2d 3e 73 68 61 72 65 64  CK;.  id->shared
0ff0: 4c 6f 63 6b 42 79 74 65 20 3d 20 30 3b 0a 20 20  LockByte = 0;.  
1000: 4f 70 65 6e 43 6f 75 6e 74 65 72 28 2b 31 29 3b  OpenCounter(+1);
1010: 0a 20 20 54 52 41 43 45 33 28 22 4f 50 45 4e 20  .  TRACE3("OPEN 
1020: 52 4f 20 25 64 20 5c 22 25 73 5c 22 5c 6e 22 2c  RO %d \"%s\"\n",
1030: 20 68 2c 20 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a   h, zFilename);.
1040: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
1050: 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 74 74  OK;.}../*.** Att
1060: 65 6d 70 74 20 74 6f 20 6f 70 65 6e 20 61 20 66  empt to open a f
1070: 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20 66  ile descriptor f
1080: 6f 72 20 74 68 65 20 64 69 72 65 63 74 6f 72 79  or the directory
1090: 20 74 68 61 74 20 63 6f 6e 74 61 69 6e 73 20 61   that contains a
10a0: 0a 2a 2a 20 66 69 6c 65 2e 20 20 54 68 69 73 20  .** file.  This 
10b0: 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20  file descriptor 
10c0: 63 61 6e 20 62 65 20 75 73 65 64 20 74 6f 20 66  can be used to f
10d0: 73 79 6e 63 28 29 20 74 68 65 20 64 69 72 65 63  sync() the direc
10e0: 74 6f 72 79 0a 2a 2a 20 69 6e 20 6f 72 64 65 72  tory.** in order
10f0: 20 74 6f 20 6d 61 6b 65 20 73 75 72 65 20 74 68   to make sure th
1100: 65 20 63 72 65 61 74 69 6f 6e 20 6f 66 20 61 20  e creation of a 
1110: 6e 65 77 20 66 69 6c 65 20 69 73 20 61 63 74 75  new file is actu
1120: 61 6c 6c 79 20 77 72 69 74 74 65 6e 0a 2a 2a 20  ally written.** 
1130: 74 6f 20 64 69 73 6b 2e 0a 2a 2a 0a 2a 2a 20 54  to disk..**.** T
1140: 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 6f  his routine is o
1150: 6e 6c 79 20 6d 65 61 6e 69 6e 67 66 75 6c 20 66  nly meaningful f
1160: 6f 72 20 55 6e 69 78 2e 20 20 49 74 20 69 73 20  or Unix.  It is 
1170: 61 20 6e 6f 2d 6f 70 20 75 6e 64 65 72 0a 2a 2a  a no-op under.**
1180: 20 77 69 6e 64 6f 77 73 20 73 69 6e 63 65 20 77   windows since w
1190: 69 6e 64 6f 77 73 20 64 6f 65 73 20 6e 6f 74 20  indows does not 
11a0: 73 75 70 70 6f 72 74 20 68 61 72 64 20 6c 69 6e  support hard lin
11b0: 6b 73 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 73 75 63  ks..**.** On suc
11c0: 63 65 73 73 2c 20 61 20 68 61 6e 64 6c 65 20 66  cess, a handle f
11d0: 6f 72 20 61 20 70 72 65 76 69 6f 75 73 6c 79 20  or a previously 
11e0: 6f 70 65 6e 20 66 69 6c 65 20 69 73 20 61 74 20  open file is at 
11f0: 2a 69 64 20 69 73 0a 2a 2a 20 75 70 64 61 74 65  *id is.** update
1200: 64 20 77 69 74 68 20 74 68 65 20 6e 65 77 20 64  d with the new d
1210: 69 72 65 63 74 6f 72 79 20 66 69 6c 65 20 64 65  irectory file de
1220: 73 63 72 69 70 74 6f 72 20 61 6e 64 20 53 51 4c  scriptor and SQL
1230: 49 54 45 5f 4f 4b 20 69 73 0a 2a 2a 20 72 65 74  ITE_OK is.** ret
1240: 75 72 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20  urned..**.** On 
1250: 66 61 69 6c 75 72 65 2c 20 74 68 65 20 66 75 6e  failure, the fun
1260: 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 53 51  ction returns SQ
1270: 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 20 61 6e  LITE_CANTOPEN an
1280: 64 20 6c 65 61 76 65 73 0a 2a 2a 20 2a 69 64 20  d leaves.** *id 
1290: 75 6e 63 68 61 6e 67 65 64 2e 0a 2a 2f 0a 69 6e  unchanged..*/.in
12a0: 74 20 73 71 6c 69 74 65 33 4f 73 4f 70 65 6e 44  t sqlite3OsOpenD
12b0: 69 72 65 63 74 6f 72 79 28 0a 20 20 63 6f 6e 73  irectory(.  cons
12c0: 74 20 63 68 61 72 20 2a 7a 44 69 72 6e 61 6d 65  t char *zDirname
12d0: 2c 0a 20 20 4f 73 46 69 6c 65 20 2a 69 64 0a 29  ,.  OsFile *id.)
12e0: 7b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  {.  return SQLIT
12f0: 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43  E_OK;.}../*.** C
1300: 72 65 61 74 65 20 61 20 74 65 6d 70 6f 72 61 72  reate a temporar
1310: 79 20 66 69 6c 65 20 6e 61 6d 65 20 69 6e 20 7a  y file name in z
1320: 42 75 66 2e 20 20 7a 42 75 66 20 6d 75 73 74 20  Buf.  zBuf must 
1330: 62 65 20 62 69 67 20 65 6e 6f 75 67 68 20 74 6f  be big enough to
1340: 0a 2a 2a 20 68 6f 6c 64 20 61 74 20 6c 65 61 73  .** hold at leas
1350: 74 20 53 51 4c 49 54 45 5f 54 45 4d 50 4e 41 4d  t SQLITE_TEMPNAM
1360: 45 5f 53 49 5a 45 20 63 68 61 72 61 63 74 65 72  E_SIZE character
1370: 73 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  s..*/.int sqlite
1380: 33 4f 73 54 65 6d 70 46 69 6c 65 4e 61 6d 65 28  3OsTempFileName(
1390: 63 68 61 72 20 2a 7a 42 75 66 29 7b 0a 20 20 73  char *zBuf){.  s
13a0: 74 61 74 69 63 20 63 68 61 72 20 7a 43 68 61 72  tatic char zChar
13b0: 73 5b 5d 20 3d 0a 20 20 20 20 22 61 62 63 64 65  s[] =.    "abcde
13c0: 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74 75  fghijklmnopqrstu
13d0: 76 77 78 79 7a 22 0a 20 20 20 20 22 41 42 43 44  vwxyz".    "ABCD
13e0: 45 46 47 48 49 4a 4b 4c 4d 4e 4f 50 51 52 53 54  EFGHIJKLMNOPQRST
13f0: 55 56 57 58 59 5a 22 0a 20 20 20 20 22 30 31 32  UVWXYZ".    "012
1400: 33 34 35 36 37 38 39 22 3b 0a 20 20 69 6e 74 20  3456789";.  int 
1410: 69 2c 20 6a 3b 0a 20 20 63 68 61 72 20 7a 54 65  i, j;.  char zTe
1420: 6d 70 50 61 74 68 5b 53 51 4c 49 54 45 5f 54 45  mpPath[SQLITE_TE
1430: 4d 50 4e 41 4d 45 5f 53 49 5a 45 5d 3b 0a 20 20  MPNAME_SIZE];.  
1440: 47 65 74 54 65 6d 70 50 61 74 68 28 53 51 4c 49  GetTempPath(SQLI
1450: 54 45 5f 54 45 4d 50 4e 41 4d 45 5f 53 49 5a 45  TE_TEMPNAME_SIZE
1460: 2d 33 30 2c 20 7a 54 65 6d 70 50 61 74 68 29 3b  -30, zTempPath);
1470: 0a 20 20 66 6f 72 28 69 3d 73 74 72 6c 65 6e 28  .  for(i=strlen(
1480: 7a 54 65 6d 70 50 61 74 68 29 3b 20 69 3e 30 20  zTempPath); i>0 
1490: 26 26 20 7a 54 65 6d 70 50 61 74 68 5b 69 2d 31  && zTempPath[i-1
14a0: 5d 3d 3d 27 5c 5c 27 3b 20 69 2d 2d 29 7b 7d 0a  ]=='\\'; i--){}.
14b0: 20 20 7a 54 65 6d 70 50 61 74 68 5b 69 5d 20 3d    zTempPath[i] =
14c0: 20 30 3b 0a 20 20 66 6f 72 28 3b 3b 29 7b 0a 20   0;.  for(;;){. 
14d0: 20 20 20 73 70 72 69 6e 74 66 28 7a 42 75 66 2c     sprintf(zBuf,
14e0: 20 22 25 73 5c 5c 22 54 45 4d 50 5f 46 49 4c 45   "%s\\"TEMP_FILE
14f0: 5f 50 52 45 46 49 58 2c 20 7a 54 65 6d 70 50 61  _PREFIX, zTempPa
1500: 74 68 29 3b 0a 20 20 20 20 6a 20 3d 20 73 74 72  th);.    j = str
1510: 6c 65 6e 28 7a 42 75 66 29 3b 0a 20 20 20 20 73  len(zBuf);.    s
1520: 71 6c 69 74 65 33 52 61 6e 64 6f 6d 6e 65 73 73  qlite3Randomness
1530: 28 31 35 2c 20 26 7a 42 75 66 5b 6a 5d 29 3b 0a  (15, &zBuf[j]);.
1540: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 31      for(i=0; i<1
1550: 35 3b 20 69 2b 2b 2c 20 6a 2b 2b 29 7b 0a 20 20  5; i++, j++){.  
1560: 20 20 20 20 7a 42 75 66 5b 6a 5d 20 3d 20 28 63      zBuf[j] = (c
1570: 68 61 72 29 7a 43 68 61 72 73 5b 20 28 28 75 6e  har)zChars[ ((un
1580: 73 69 67 6e 65 64 20 63 68 61 72 29 7a 42 75 66  signed char)zBuf
1590: 5b 6a 5d 29 25 28 73 69 7a 65 6f 66 28 7a 43 68  [j])%(sizeof(zCh
15a0: 61 72 73 29 2d 31 29 20 5d 3b 0a 20 20 20 20 7d  ars)-1) ];.    }
15b0: 0a 20 20 20 20 7a 42 75 66 5b 6a 5d 20 3d 20 30  .    zBuf[j] = 0
15c0: 3b 0a 20 20 20 20 69 66 28 20 21 73 71 6c 69 74  ;.    if( !sqlit
15d0: 65 33 4f 73 46 69 6c 65 45 78 69 73 74 73 28 7a  e3OsFileExists(z
15e0: 42 75 66 29 20 29 20 62 72 65 61 6b 3b 0a 20 20  Buf) ) break;.  
15f0: 7d 0a 20 20 54 52 41 43 45 32 28 22 54 45 4d 50  }.  TRACE2("TEMP
1600: 20 46 49 4c 45 4e 41 4d 45 3a 20 25 73 5c 6e 22   FILENAME: %s\n"
1610: 2c 20 7a 42 75 66 29 3b 0a 20 20 72 65 74 75 72  , zBuf);.  retur
1620: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 20 0a 7d 0a  n SQLITE_OK; .}.
1630: 0a 2f 2a 0a 2a 2a 20 43 6c 6f 73 65 20 61 20 66  ./*.** Close a f
1640: 69 6c 65 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  ile..*/.int sqli
1650: 74 65 33 4f 73 43 6c 6f 73 65 28 4f 73 46 69 6c  te3OsClose(OsFil
1660: 65 20 2a 69 64 29 7b 0a 20 20 54 52 41 43 45 32  e *id){.  TRACE2
1670: 28 22 43 4c 4f 53 45 20 25 64 5c 6e 22 2c 20 69  ("CLOSE %d\n", i
1680: 64 2d 3e 68 29 3b 0a 20 20 43 6c 6f 73 65 48 61  d->h);.  CloseHa
1690: 6e 64 6c 65 28 69 64 2d 3e 68 29 3b 0a 20 20 4f  ndle(id->h);.  O
16a0: 70 65 6e 43 6f 75 6e 74 65 72 28 2d 31 29 3b 0a  penCounter(-1);.
16b0: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
16c0: 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 61  OK;.}../*.** Rea
16d0: 64 20 64 61 74 61 20 66 72 6f 6d 20 61 20 66 69  d data from a fi
16e0: 6c 65 20 69 6e 74 6f 20 61 20 62 75 66 66 65 72  le into a buffer
16f0: 2e 20 20 52 65 74 75 72 6e 20 53 51 4c 49 54 45  .  Return SQLITE
1700: 5f 4f 4b 20 69 66 20 61 6c 6c 0a 2a 2a 20 62 79  _OK if all.** by
1710: 74 65 73 20 77 65 72 65 20 72 65 61 64 20 73 75  tes were read su
1720: 63 63 65 73 73 66 75 6c 6c 79 20 61 6e 64 20 53  ccessfully and S
1730: 51 4c 49 54 45 5f 49 4f 45 52 52 20 69 66 20 61  QLITE_IOERR if a
1740: 6e 79 74 68 69 6e 67 20 67 6f 65 73 0a 2a 2a 20  nything goes.** 
1750: 77 72 6f 6e 67 2e 0a 2a 2f 0a 69 6e 74 20 73 71  wrong..*/.int sq
1760: 6c 69 74 65 33 4f 73 52 65 61 64 28 4f 73 46 69  lite3OsRead(OsFi
1770: 6c 65 20 2a 69 64 2c 20 76 6f 69 64 20 2a 70 42  le *id, void *pB
1780: 75 66 2c 20 69 6e 74 20 61 6d 74 29 7b 0a 20 20  uf, int amt){.  
1790: 44 57 4f 52 44 20 67 6f 74 3b 0a 20 20 53 69 6d  DWORD got;.  Sim
17a0: 75 6c 61 74 65 49 4f 45 72 72 6f 72 28 53 51 4c  ulateIOError(SQL
17b0: 49 54 45 5f 49 4f 45 52 52 29 3b 0a 20 20 54 52  ITE_IOERR);.  TR
17c0: 41 43 45 33 28 22 52 45 41 44 20 25 64 20 6c 6f  ACE3("READ %d lo
17d0: 63 6b 3d 25 64 5c 6e 22 2c 20 69 64 2d 3e 68 2c  ck=%d\n", id->h,
17e0: 20 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 29 3b 0a   id->locktype);.
17f0: 20 20 69 66 28 20 21 52 65 61 64 46 69 6c 65 28    if( !ReadFile(
1800: 69 64 2d 3e 68 2c 20 70 42 75 66 2c 20 61 6d 74  id->h, pBuf, amt
1810: 2c 20 26 67 6f 74 2c 20 30 29 20 29 7b 0a 20 20  , &got, 0) ){.  
1820: 20 20 67 6f 74 20 3d 20 30 3b 0a 20 20 7d 0a 20    got = 0;.  }. 
1830: 20 69 66 28 20 67 6f 74 3d 3d 28 44 57 4f 52 44   if( got==(DWORD
1840: 29 61 6d 74 20 29 7b 0a 20 20 20 20 72 65 74 75  )amt ){.    retu
1850: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20  rn SQLITE_OK;.  
1860: 7d 65 6c 73 65 7b 0a 20 20 20 20 72 65 74 75 72  }else{.    retur
1870: 6e 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b 0a  n SQLITE_IOERR;.
1880: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 72 69    }.}../*.** Wri
1890: 74 65 20 64 61 74 61 20 66 72 6f 6d 20 61 20 62  te data from a b
18a0: 75 66 66 65 72 20 69 6e 74 6f 20 61 20 66 69 6c  uffer into a fil
18b0: 65 2e 20 20 52 65 74 75 72 6e 20 53 51 4c 49 54  e.  Return SQLIT
18c0: 45 5f 4f 4b 20 6f 6e 20 73 75 63 63 65 73 73 0a  E_OK on success.
18d0: 2a 2a 20 6f 72 20 73 6f 6d 65 20 6f 74 68 65 72  ** or some other
18e0: 20 65 72 72 6f 72 20 63 6f 64 65 20 6f 6e 20 66   error code on f
18f0: 61 69 6c 75 72 65 2e 0a 2a 2f 0a 69 6e 74 20 73  ailure..*/.int s
1900: 71 6c 69 74 65 33 4f 73 57 72 69 74 65 28 4f 73  qlite3OsWrite(Os
1910: 46 69 6c 65 20 2a 69 64 2c 20 63 6f 6e 73 74 20  File *id, const 
1920: 76 6f 69 64 20 2a 70 42 75 66 2c 20 69 6e 74 20  void *pBuf, int 
1930: 61 6d 74 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a  amt){.  int rc;.
1940: 20 20 44 57 4f 52 44 20 77 72 6f 74 65 3b 0a 20    DWORD wrote;. 
1950: 20 53 69 6d 75 6c 61 74 65 49 4f 45 72 72 6f 72   SimulateIOError
1960: 28 53 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a  (SQLITE_IOERR);.
1970: 20 20 54 52 41 43 45 33 28 22 57 52 49 54 45 20    TRACE3("WRITE 
1980: 25 64 20 6c 6f 63 6b 3d 25 64 5c 6e 22 2c 20 69  %d lock=%d\n", i
1990: 64 2d 3e 68 2c 20 69 64 2d 3e 6c 6f 63 6b 74 79  d->h, id->lockty
19a0: 70 65 29 3b 0a 20 20 77 68 69 6c 65 28 20 61 6d  pe);.  while( am
19b0: 74 3e 30 20 26 26 20 28 72 63 20 3d 20 57 72 69  t>0 && (rc = Wri
19c0: 74 65 46 69 6c 65 28 69 64 2d 3e 68 2c 20 70 42  teFile(id->h, pB
19d0: 75 66 2c 20 61 6d 74 2c 20 26 77 72 6f 74 65 2c  uf, amt, &wrote,
19e0: 20 30 29 29 21 3d 30 20 26 26 20 77 72 6f 74 65   0))!=0 && wrote
19f0: 3e 30 20 29 7b 0a 20 20 20 20 61 6d 74 20 2d 3d  >0 ){.    amt -=
1a00: 20 77 72 6f 74 65 3b 0a 20 20 20 20 70 42 75 66   wrote;.    pBuf
1a10: 20 3d 20 26 28 28 63 68 61 72 2a 29 70 42 75 66   = &((char*)pBuf
1a20: 29 5b 77 72 6f 74 65 5d 3b 0a 20 20 7d 0a 20 20  )[wrote];.  }.  
1a30: 69 66 28 20 21 72 63 20 7c 7c 20 61 6d 74 3e 28  if( !rc || amt>(
1a40: 69 6e 74 29 77 72 6f 74 65 20 29 7b 0a 20 20 20  int)wrote ){.   
1a50: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 46   return SQLITE_F
1a60: 55 4c 4c 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72  ULL;.  }.  retur
1a70: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a  n SQLITE_OK;.}..
1a80: 2f 2a 0a 2a 2a 20 4d 6f 76 65 20 74 68 65 20 72  /*.** Move the r
1a90: 65 61 64 2f 77 72 69 74 65 20 70 6f 69 6e 74 65  ead/write pointe
1aa0: 72 20 69 6e 20 61 20 66 69 6c 65 2e 0a 2a 2f 0a  r in a file..*/.
1ab0: 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 53 65 65  int sqlite3OsSee
1ac0: 6b 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20 6f 66  k(OsFile *id, of
1ad0: 66 5f 74 20 6f 66 66 73 65 74 29 7b 0a 20 20 4c  f_t offset){.  L
1ae0: 4f 4e 47 20 75 70 70 65 72 42 69 74 73 20 3d 20  ONG upperBits = 
1af0: 6f 66 66 73 65 74 3e 3e 33 32 3b 0a 20 20 4c 4f  offset>>32;.  LO
1b00: 4e 47 20 6c 6f 77 65 72 42 69 74 73 20 3d 20 6f  NG lowerBits = o
1b10: 66 66 73 65 74 20 26 20 30 78 66 66 66 66 66 66  ffset & 0xffffff
1b20: 66 66 3b 0a 20 20 44 57 4f 52 44 20 72 63 3b 0a  ff;.  DWORD rc;.
1b30: 20 20 53 45 45 4b 28 6f 66 66 73 65 74 2f 31 30    SEEK(offset/10
1b40: 32 34 20 2b 20 31 29 3b 0a 20 20 72 63 20 3d 20  24 + 1);.  rc = 
1b50: 53 65 74 46 69 6c 65 50 6f 69 6e 74 65 72 28 69  SetFilePointer(i
1b60: 64 2d 3e 68 2c 20 6c 6f 77 65 72 42 69 74 73 2c  d->h, lowerBits,
1b70: 20 26 75 70 70 65 72 42 69 74 73 2c 20 46 49 4c   &upperBits, FIL
1b80: 45 5f 42 45 47 49 4e 29 3b 0a 20 20 54 52 41 43  E_BEGIN);.  TRAC
1b90: 45 33 28 22 53 45 45 4b 20 25 64 20 25 6c 6c 64  E3("SEEK %d %lld
1ba0: 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20 6f 66 66 73  \n", id->h, offs
1bb0: 65 74 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51  et);.  return SQ
1bc0: 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a  LITE_OK;.}../*.*
1bd0: 2a 20 4d 61 6b 65 20 73 75 72 65 20 61 6c 6c 20  * Make sure all 
1be0: 77 72 69 74 65 73 20 74 6f 20 61 20 70 61 72 74  writes to a part
1bf0: 69 63 75 6c 61 72 20 66 69 6c 65 20 61 72 65 20  icular file are 
1c00: 63 6f 6d 6d 69 74 74 65 64 20 74 6f 20 64 69 73  committed to dis
1c10: 6b 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  k..*/.int sqlite
1c20: 33 4f 73 53 79 6e 63 28 4f 73 46 69 6c 65 20 2a  3OsSync(OsFile *
1c30: 69 64 29 7b 0a 20 20 54 52 41 43 45 33 28 22 53  id){.  TRACE3("S
1c40: 59 4e 43 20 25 64 20 6c 6f 63 6b 3d 25 64 5c 6e  YNC %d lock=%d\n
1c50: 22 2c 20 69 64 2d 3e 68 2c 20 69 64 2d 3e 6c 6f  ", id->h, id->lo
1c60: 63 6b 74 79 70 65 29 3b 0a 20 20 69 66 28 20 46  cktype);.  if( F
1c70: 6c 75 73 68 46 69 6c 65 42 75 66 66 65 72 73 28  lushFileBuffers(
1c80: 69 64 2d 3e 68 29 20 29 7b 0a 20 20 20 20 72 65  id->h) ){.    re
1c90: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  turn SQLITE_OK;.
1ca0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 65 74    }else{.    ret
1cb0: 75 72 6e 20 53 51 4c 49 54 45 5f 49 4f 45 52 52  urn SQLITE_IOERR
1cc0: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  ;.  }.}../*.** T
1cd0: 72 75 6e 63 61 74 65 20 61 6e 20 6f 70 65 6e 20  runcate an open 
1ce0: 66 69 6c 65 20 74 6f 20 61 20 73 70 65 63 69 66  file to a specif
1cf0: 69 65 64 20 73 69 7a 65 0a 2a 2f 0a 69 6e 74 20  ied size.*/.int 
1d00: 73 71 6c 69 74 65 33 4f 73 54 72 75 6e 63 61 74  sqlite3OsTruncat
1d10: 65 28 4f 73 46 69 6c 65 20 2a 69 64 2c 20 6f 66  e(OsFile *id, of
1d20: 66 5f 74 20 6e 42 79 74 65 29 7b 0a 20 20 4c 4f  f_t nByte){.  LO
1d30: 4e 47 20 75 70 70 65 72 42 69 74 73 20 3d 20 6e  NG upperBits = n
1d40: 42 79 74 65 3e 3e 33 32 3b 0a 20 20 54 52 41 43  Byte>>32;.  TRAC
1d50: 45 33 28 22 54 52 55 4e 43 41 54 45 20 25 64 20  E3("TRUNCATE %d 
1d60: 25 6c 6c 64 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20  %lld\n", id->h, 
1d70: 6e 42 79 74 65 29 3b 0a 20 20 53 69 6d 75 6c 61  nByte);.  Simula
1d80: 74 65 49 4f 45 72 72 6f 72 28 53 51 4c 49 54 45  teIOError(SQLITE
1d90: 5f 49 4f 45 52 52 29 3b 0a 20 20 53 65 74 46 69  _IOERR);.  SetFi
1da0: 6c 65 50 6f 69 6e 74 65 72 28 69 64 2d 3e 68 2c  lePointer(id->h,
1db0: 20 6e 42 79 74 65 2c 20 26 75 70 70 65 72 42 69   nByte, &upperBi
1dc0: 74 73 2c 20 46 49 4c 45 5f 42 45 47 49 4e 29 3b  ts, FILE_BEGIN);
1dd0: 0a 20 20 53 65 74 45 6e 64 4f 66 46 69 6c 65 28  .  SetEndOfFile(
1de0: 69 64 2d 3e 68 29 3b 0a 20 20 72 65 74 75 72 6e  id->h);.  return
1df0: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f   SQLITE_OK;.}../
1e00: 2a 0a 2a 2a 20 44 65 74 65 72 6d 69 6e 65 20 74  *.** Determine t
1e10: 68 65 20 63 75 72 72 65 6e 74 20 73 69 7a 65 20  he current size 
1e20: 6f 66 20 61 20 66 69 6c 65 20 69 6e 20 62 79 74  of a file in byt
1e30: 65 73 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  es.*/.int sqlite
1e40: 33 4f 73 46 69 6c 65 53 69 7a 65 28 4f 73 46 69  3OsFileSize(OsFi
1e50: 6c 65 20 2a 69 64 2c 20 6f 66 66 5f 74 20 2a 70  le *id, off_t *p
1e60: 53 69 7a 65 29 7b 0a 20 20 44 57 4f 52 44 20 75  Size){.  DWORD u
1e70: 70 70 65 72 42 69 74 73 2c 20 6c 6f 77 65 72 42  pperBits, lowerB
1e80: 69 74 73 3b 0a 20 20 53 69 6d 75 6c 61 74 65 49  its;.  SimulateI
1e90: 4f 45 72 72 6f 72 28 53 51 4c 49 54 45 5f 49 4f  OError(SQLITE_IO
1ea0: 45 52 52 29 3b 0a 20 20 6c 6f 77 65 72 42 69 74  ERR);.  lowerBit
1eb0: 73 20 3d 20 47 65 74 46 69 6c 65 53 69 7a 65 28  s = GetFileSize(
1ec0: 69 64 2d 3e 68 2c 20 26 75 70 70 65 72 42 69 74  id->h, &upperBit
1ed0: 73 29 3b 0a 20 20 2a 70 53 69 7a 65 20 3d 20 28  s);.  *pSize = (
1ee0: 28 28 6f 66 66 5f 74 29 75 70 70 65 72 42 69 74  ((off_t)upperBit
1ef0: 73 29 3c 3c 33 32 29 20 2b 20 6c 6f 77 65 72 42  s)<<32) + lowerB
1f00: 69 74 73 3b 0a 20 20 72 65 74 75 72 6e 20 53 51  its;.  return SQ
1f10: 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a  LITE_OK;.}../*.*
1f20: 2a 20 52 65 74 75 72 6e 20 74 72 75 65 20 28 6e  * Return true (n
1f30: 6f 6e 2d 7a 65 72 6f 29 20 69 66 20 77 65 20 61  on-zero) if we a
1f40: 72 65 20 72 75 6e 6e 69 6e 67 20 75 6e 64 65 72  re running under
1f50: 20 57 69 6e 4e 54 2c 20 57 69 6e 32 4b 20 6f 72   WinNT, Win2K or
1f60: 20 57 69 6e 58 50 2e 0a 2a 2a 20 52 65 74 75 72   WinXP..** Retur
1f70: 6e 20 66 61 6c 73 65 20 28 7a 65 72 6f 29 20 66  n false (zero) f
1f80: 6f 72 20 57 69 6e 39 35 2c 20 57 69 6e 39 38 2c  or Win95, Win98,
1f90: 20 6f 72 20 57 69 6e 4d 45 2e 0a 2a 2a 0a 2a 2a   or WinME..**.**
1fa0: 20 48 65 72 65 20 69 73 20 61 6e 20 69 6e 74 65   Here is an inte
1fb0: 72 65 73 74 69 6e 67 20 6f 62 73 65 72 76 61 74  resting observat
1fc0: 69 6f 6e 3a 20 20 57 69 6e 39 35 2c 20 57 69 6e  ion:  Win95, Win
1fd0: 39 38 2c 20 61 6e 64 20 57 69 6e 4d 45 20 6c 61  98, and WinME la
1fe0: 63 6b 0a 2a 2a 20 74 68 65 20 4c 6f 63 6b 46 69  ck.** the LockFi
1ff0: 6c 65 45 78 28 29 20 41 50 49 2e 20 20 42 75 74  leEx() API.  But
2000: 20 77 65 20 63 61 6e 20 73 74 69 6c 6c 20 73 74   we can still st
2010: 61 74 69 63 61 6c 6c 79 20 6c 69 6e 6b 20 61 67  atically link ag
2020: 61 69 6e 73 74 20 74 68 61 74 0a 2a 2a 20 41 50  ainst that.** AP
2030: 49 20 61 73 20 6c 6f 6e 67 20 61 73 20 77 65 20  I as long as we 
2040: 64 6f 6e 27 74 20 63 61 6c 6c 20 69 74 20 77 69  don't call it wi
2050: 6e 20 72 75 6e 6e 69 6e 67 20 57 69 6e 39 35 2f  n running Win95/
2060: 39 38 2f 4d 45 2e 20 20 41 20 63 61 6c 6c 20 74  98/ME.  A call t
2070: 6f 0a 2a 2a 20 74 68 69 73 20 72 6f 75 74 69 6e  o.** this routin
2080: 65 20 69 73 20 75 73 65 64 20 74 6f 20 64 65 74  e is used to det
2090: 65 72 6d 69 6e 65 20 69 66 20 74 68 65 20 68 6f  ermine if the ho
20a0: 73 74 20 69 73 20 57 69 6e 39 35 2f 39 38 2f 4d  st is Win95/98/M
20b0: 45 20 6f 72 0a 2a 2a 20 57 69 6e 4e 54 2f 32 4b  E or.** WinNT/2K
20c0: 2f 58 50 20 73 6f 20 74 68 61 74 20 77 65 20 77  /XP so that we w
20d0: 69 6c 6c 20 6b 6e 6f 77 20 77 68 65 74 68 65 72  ill know whether
20e0: 20 6f 72 20 6e 6f 74 20 77 65 20 63 61 6e 20 73   or not we can s
20f0: 61 66 65 6c 79 20 63 61 6c 6c 0a 2a 2a 20 74 68  afely call.** th
2100: 65 20 4c 6f 63 6b 46 69 6c 65 45 78 28 29 20 41  e LockFileEx() A
2110: 50 49 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e  PI..*/.static in
2120: 74 20 69 73 4e 54 28 76 6f 69 64 29 7b 0a 20 20  t isNT(void){.  
2130: 73 74 61 74 69 63 20 69 6e 74 20 6f 73 54 79 70  static int osTyp
2140: 65 20 3d 20 30 3b 20 20 20 2f 2a 20 30 3d 75 6e  e = 0;   /* 0=un
2150: 6b 6e 6f 77 6e 20 31 3d 77 69 6e 39 35 20 32 3d  known 1=win95 2=
2160: 77 69 6e 4e 54 20 2a 2f 0a 20 20 69 66 28 20 6f  winNT */.  if( o
2170: 73 54 79 70 65 3d 3d 30 20 29 7b 0a 20 20 20 20  sType==0 ){.    
2180: 4f 53 56 45 52 53 49 4f 4e 49 4e 46 4f 20 73 49  OSVERSIONINFO sI
2190: 6e 66 6f 3b 0a 20 20 20 20 73 49 6e 66 6f 2e 64  nfo;.    sInfo.d
21a0: 77 4f 53 56 65 72 73 69 6f 6e 49 6e 66 6f 53 69  wOSVersionInfoSi
21b0: 7a 65 20 3d 20 73 69 7a 65 6f 66 28 73 49 6e 66  ze = sizeof(sInf
21c0: 6f 29 3b 0a 20 20 20 20 47 65 74 56 65 72 73 69  o);.    GetVersi
21d0: 6f 6e 45 78 28 26 73 49 6e 66 6f 29 3b 0a 20 20  onEx(&sInfo);.  
21e0: 20 20 6f 73 54 79 70 65 20 3d 20 73 49 6e 66 6f    osType = sInfo
21f0: 2e 64 77 50 6c 61 74 66 6f 72 6d 49 64 3d 3d 56  .dwPlatformId==V
2200: 45 52 5f 50 4c 41 54 46 4f 52 4d 5f 57 49 4e 33  ER_PLATFORM_WIN3
2210: 32 5f 4e 54 20 3f 20 32 20 3a 20 31 3b 0a 20 20  2_NT ? 2 : 1;.  
2220: 7d 0a 20 20 72 65 74 75 72 6e 20 6f 73 54 79 70  }.  return osTyp
2230: 65 3d 3d 32 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41  e==2;.}../*.** A
2240: 63 71 75 69 72 65 20 61 20 72 65 61 64 65 72 20  cquire a reader 
2250: 6c 6f 63 6b 20 6f 6e 20 74 68 65 20 72 61 6e 67  lock on the rang
2260: 65 20 6f 66 20 62 79 74 65 73 20 66 72 6f 6d 20  e of bytes from 
2270: 69 42 79 74 65 2e 2e 2e 69 42 79 74 65 2b 6e 42  iByte...iByte+nB
2280: 79 74 65 2d 31 2e 0a 2a 2a 20 44 69 66 66 65 72  yte-1..** Differ
2290: 65 6e 74 20 41 50 49 20 72 6f 75 74 69 6e 65 73  ent API routines
22a0: 20 61 72 65 20 63 61 6c 6c 65 64 20 64 65 70 65   are called depe
22b0: 6e 64 69 6e 67 20 6f 6e 20 77 68 65 74 68 65 72  nding on whether
22c0: 20 6f 72 20 6e 6f 74 20 74 68 69 73 0a 2a 2a 20   or not this.** 
22d0: 69 73 20 57 69 6e 39 35 20 6f 72 20 57 69 6e 4e  is Win95 or WinN
22e0: 54 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74  T..*/.static int
22f0: 20 67 65 74 52 65 61 64 4c 6f 63 6b 28 48 41 4e   getReadLock(HAN
2300: 44 4c 45 20 68 2c 20 75 6e 73 69 67 6e 65 64 20  DLE h, unsigned 
2310: 69 6e 74 20 69 42 79 74 65 2c 20 75 6e 73 69 67  int iByte, unsig
2320: 6e 65 64 20 69 6e 74 20 6e 42 79 74 65 29 7b 0a  ned int nByte){.
2330: 20 20 69 6e 74 20 72 65 73 3b 0a 20 20 69 66 28    int res;.  if(
2340: 20 69 73 4e 54 28 29 20 29 7b 0a 20 20 20 20 4f   isNT() ){.    O
2350: 56 45 52 4c 41 50 50 45 44 20 6f 76 6c 70 3b 0a  VERLAPPED ovlp;.
2360: 20 20 20 20 6f 76 6c 70 2e 4f 66 66 73 65 74 20      ovlp.Offset 
2370: 3d 20 69 42 79 74 65 3b 0a 20 20 20 20 6f 76 6c  = iByte;.    ovl
2380: 70 2e 4f 66 66 73 65 74 48 69 67 68 20 3d 20 30  p.OffsetHigh = 0
2390: 3b 0a 20 20 20 20 6f 76 6c 70 2e 68 45 76 65 6e  ;.    ovlp.hEven
23a0: 74 20 3d 20 30 3b 0a 20 20 20 20 72 65 73 20 3d  t = 0;.    res =
23b0: 20 4c 6f 63 6b 46 69 6c 65 45 78 28 68 2c 20 4c   LockFileEx(h, L
23c0: 4f 43 4b 46 49 4c 45 5f 46 41 49 4c 5f 49 4d 4d  OCKFILE_FAIL_IMM
23d0: 45 44 49 41 54 45 4c 59 2c 20 30 2c 20 6e 42 79  EDIATELY, 0, nBy
23e0: 74 65 2c 20 30 2c 20 26 6f 76 6c 70 29 3b 0a 20  te, 0, &ovlp);. 
23f0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 65 73 20   }else{.    res 
2400: 3d 20 4c 6f 63 6b 46 69 6c 65 28 68 2c 20 69 42  = LockFile(h, iB
2410: 79 74 65 2c 20 30 2c 20 6e 42 79 74 65 2c 20 30  yte, 0, nByte, 0
2420: 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20  );.  }.  return 
2430: 72 65 73 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 55 6e  res;.}../*.** Un
2440: 64 6f 20 61 20 72 65 61 64 6c 6f 63 6b 0a 2a 2f  do a readlock.*/
2450: 0a 73 74 61 74 69 63 20 69 6e 74 20 75 6e 6c 6f  .static int unlo
2460: 63 6b 52 65 61 64 4c 6f 63 6b 28 4f 73 46 69 6c  ckReadLock(OsFil
2470: 65 20 2a 69 64 29 7b 0a 20 20 69 6e 74 20 72 65  e *id){.  int re
2480: 73 3b 0a 20 20 69 66 28 20 69 73 4e 54 28 29 20  s;.  if( isNT() 
2490: 29 7b 0a 20 20 20 20 72 65 73 20 3d 20 55 6e 6c  ){.    res = Unl
24a0: 6f 63 6b 46 69 6c 65 28 69 64 2d 3e 68 2c 20 53  ockFile(id->h, S
24b0: 48 41 52 45 44 5f 46 49 52 53 54 2c 20 30 2c 20  HARED_FIRST, 0, 
24c0: 53 48 41 52 45 44 5f 53 49 5a 45 2c 20 30 29 3b  SHARED_SIZE, 0);
24d0: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 65  .  }else{.    re
24e0: 73 20 3d 20 55 6e 6c 6f 63 6b 46 69 6c 65 28 69  s = UnlockFile(i
24f0: 64 2d 3e 68 2c 20 53 48 41 52 45 44 5f 46 49 52  d->h, SHARED_FIR
2500: 53 54 20 2b 20 69 64 2d 3e 73 68 61 72 65 64 4c  ST + id->sharedL
2510: 6f 63 6b 42 79 74 65 2c 20 30 2c 20 31 2c 20 30  ockByte, 0, 1, 0
2520: 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20  );.  }.  return 
2530: 72 65 73 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4c 6f  res;.}../*.** Lo
2540: 63 6b 20 74 68 65 20 66 69 6c 65 20 77 69 74 68  ck the file with
2550: 20 74 68 65 20 6c 6f 63 6b 20 73 70 65 63 69 66   the lock specif
2560: 69 65 64 20 62 79 20 70 61 72 61 6d 65 74 65 72  ied by parameter
2570: 20 6c 6f 63 6b 74 79 70 65 20 2d 20 6f 6e 65 0a   locktype - one.
2580: 2a 2a 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77  ** of the follow
2590: 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 28  ing:.**.**     (
25a0: 31 29 20 53 48 41 52 45 44 5f 4c 4f 43 4b 0a 2a  1) SHARED_LOCK.*
25b0: 2a 20 20 20 20 20 28 32 29 20 52 45 53 45 52 56  *     (2) RESERV
25c0: 45 44 5f 4c 4f 43 4b 0a 2a 2a 20 20 20 20 20 28  ED_LOCK.**     (
25d0: 33 29 20 50 45 4e 44 49 4e 47 5f 4c 4f 43 4b 0a  3) PENDING_LOCK.
25e0: 2a 2a 20 20 20 20 20 28 34 29 20 45 58 43 4c 55  **     (4) EXCLU
25f0: 53 49 56 45 5f 4c 4f 43 4b 0a 2a 2a 0a 2a 2a 20  SIVE_LOCK.**.** 
2600: 53 6f 6d 65 74 69 6d 65 73 20 77 68 65 6e 20 72  Sometimes when r
2610: 65 71 75 65 73 74 69 6e 67 20 6f 6e 65 20 6c 6f  equesting one lo
2620: 63 6b 20 73 74 61 74 65 2c 20 61 64 64 69 74 69  ck state, additi
2630: 6f 6e 61 6c 20 6c 6f 63 6b 20 73 74 61 74 65 73  onal lock states
2640: 0a 2a 2a 20 61 72 65 20 69 6e 73 65 72 74 65 64  .** are inserted
2650: 20 69 6e 20 62 65 74 77 65 65 6e 2e 20 20 54 68   in between.  Th
2660: 65 20 6c 6f 63 6b 69 6e 67 20 6d 69 67 68 74 20  e locking might 
2670: 66 61 69 6c 20 6f 6e 20 6f 6e 65 20 6f 66 20 74  fail on one of t
2680: 68 65 20 6c 61 74 65 72 0a 2a 2a 20 74 72 61 6e  he later.** tran
2690: 73 69 74 69 6f 6e 73 20 6c 65 61 76 69 6e 67 20  sitions leaving 
26a0: 74 68 65 20 6c 6f 63 6b 20 73 74 61 74 65 20 64  the lock state d
26b0: 69 66 66 65 72 65 6e 74 20 66 72 6f 6d 20 77 68  ifferent from wh
26c0: 61 74 20 69 74 20 73 74 61 72 74 65 64 20 62 75  at it started bu
26d0: 74 0a 2a 2a 20 73 74 69 6c 6c 20 73 68 6f 72 74  t.** still short
26e0: 20 6f 66 20 69 74 73 20 67 6f 61 6c 2e 20 20 54   of its goal.  T
26f0: 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 68 61  he following cha
2700: 72 74 20 73 68 6f 77 73 20 74 68 65 20 61 6c 6c  rt shows the all
2710: 6f 77 65 64 0a 2a 2a 20 74 72 61 6e 73 69 74 69  owed.** transiti
2720: 6f 6e 73 20 61 6e 64 20 74 68 65 20 69 6e 73 65  ons and the inse
2730: 72 74 65 64 20 69 6e 74 65 72 6d 65 64 69 61 74  rted intermediat
2740: 65 20 73 74 61 74 65 73 3a 0a 2a 2a 0a 2a 2a 20  e states:.**.** 
2750: 20 20 20 55 4e 4c 4f 43 4b 45 44 20 2d 3e 20 53     UNLOCKED -> S
2760: 48 41 52 45 44 0a 2a 2a 20 20 20 20 53 48 41 52  HARED.**    SHAR
2770: 45 44 20 2d 3e 20 52 45 53 45 52 56 45 44 0a 2a  ED -> RESERVED.*
2780: 2a 20 20 20 20 53 48 41 52 45 44 20 2d 3e 20 28  *    SHARED -> (
2790: 50 45 4e 44 49 4e 47 29 20 2d 3e 20 45 58 43 4c  PENDING) -> EXCL
27a0: 55 53 49 56 45 0a 2a 2a 20 20 20 20 52 45 53 45  USIVE.**    RESE
27b0: 52 56 45 44 20 2d 3e 20 28 50 45 4e 44 49 4e 47  RVED -> (PENDING
27c0: 29 20 2d 3e 20 45 58 43 4c 55 53 49 56 45 0a 2a  ) -> EXCLUSIVE.*
27d0: 2a 20 20 20 20 50 45 4e 44 49 4e 47 20 2d 3e 20  *    PENDING -> 
27e0: 45 58 43 4c 55 53 49 56 45 0a 2a 2a 0a 2a 2a 20  EXCLUSIVE.**.** 
27f0: 54 68 69 73 20 72 6f 75 74 69 6e 65 20 77 69 6c  This routine wil
2800: 6c 20 6f 6e 6c 79 20 69 6e 63 72 65 61 73 65 20  l only increase 
2810: 61 20 6c 6f 63 6b 2e 20 20 54 68 65 20 73 71 6c  a lock.  The sql
2820: 69 74 65 33 4f 73 55 6e 6c 6f 63 6b 28 29 20 72  ite3OsUnlock() r
2830: 6f 75 74 69 6e 65 0a 2a 2a 20 65 72 61 73 65 73  outine.** erases
2840: 20 61 6c 6c 20 6c 6f 63 6b 73 20 61 74 20 6f 6e   all locks at on
2850: 63 65 20 61 6e 64 20 72 65 74 75 72 6e 73 20 75  ce and returns u
2860: 73 20 69 6d 6d 65 64 69 61 74 65 6c 79 20 74 6f  s immediately to
2870: 20 6c 6f 63 6b 69 6e 67 20 6c 65 76 65 6c 20 30   locking level 0
2880: 2e 0a 2a 2a 20 49 74 20 69 73 20 6e 6f 74 20 70  ..** It is not p
2890: 6f 73 73 69 62 6c 65 20 74 6f 20 6c 6f 77 65 72  ossible to lower
28a0: 20 74 68 65 20 6c 6f 63 6b 69 6e 67 20 6c 65 76   the locking lev
28b0: 65 6c 20 6f 6e 65 20 73 74 65 70 20 61 74 20 61  el one step at a
28c0: 20 74 69 6d 65 2e 20 20 59 6f 75 0a 2a 2a 20 6d   time.  You.** m
28d0: 75 73 74 20 67 6f 20 73 74 72 61 69 67 68 74 20  ust go straight 
28e0: 74 6f 20 6c 6f 63 6b 69 6e 67 20 6c 65 76 65 6c  to locking level
28f0: 20 30 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74   0..*/.int sqlit
2900: 65 33 4f 73 4c 6f 63 6b 28 4f 73 46 69 6c 65 20  e3OsLock(OsFile 
2910: 2a 69 64 2c 20 69 6e 74 20 6c 6f 63 6b 74 79 70  *id, int locktyp
2920: 65 29 7b 0a 20 20 69 6e 74 20 72 63 20 3d 20 53  e){.  int rc = S
2930: 51 4c 49 54 45 5f 4f 4b 3b 20 20 20 20 2f 2a 20  QLITE_OK;    /* 
2940: 52 65 74 75 72 6e 20 63 6f 64 65 20 66 72 6f 6d  Return code from
2950: 20 73 75 62 72 6f 75 74 69 6e 65 73 20 2a 2f 0a   subroutines */.
2960: 20 20 69 6e 74 20 72 65 73 20 3d 20 31 3b 20 20    int res = 1;  
2970: 20 20 20 20 20 20 20 20 20 2f 2a 20 52 65 73 75           /* Resu
2980: 6c 74 20 6f 66 20 61 20 77 69 6e 64 6f 77 73 20  lt of a windows 
2990: 6c 6f 63 6b 20 63 61 6c 6c 20 2a 2f 0a 20 20 69  lock call */.  i
29a0: 6e 74 20 6e 65 77 4c 6f 63 6b 74 79 70 65 3b 20  nt newLocktype; 
29b0: 20 20 20 20 20 20 2f 2a 20 53 65 74 20 69 64 2d        /* Set id-
29c0: 3e 6c 6f 63 6b 74 79 70 65 20 74 6f 20 74 68 69  >locktype to thi
29d0: 73 20 76 61 6c 75 65 20 62 65 66 6f 72 65 20 65  s value before e
29e0: 78 69 74 69 6e 67 20 2a 2f 0a 20 20 69 6e 74 20  xiting */.  int 
29f0: 67 6f 74 50 65 6e 64 69 6e 67 4c 6f 63 6b 20 3d  gotPendingLock =
2a00: 20 30 3b 2f 2a 20 54 72 75 65 20 69 66 20 77 65   0;/* True if we
2a10: 20 61 63 71 75 69 72 65 64 20 61 20 50 45 4e 44   acquired a PEND
2a20: 49 4e 47 20 6c 6f 63 6b 20 74 68 69 73 20 74 69  ING lock this ti
2a30: 6d 65 20 2a 2f 0a 0a 20 20 54 52 41 43 45 35 28  me */..  TRACE5(
2a40: 22 4c 4f 43 4b 20 25 64 20 25 64 20 77 61 73 20  "LOCK %d %d was 
2a50: 25 64 28 25 64 29 5c 6e 22 2c 0a 20 20 20 20 20  %d(%d)\n",.     
2a60: 20 20 20 20 20 69 64 2d 3e 68 2c 20 6c 6f 63 6b       id->h, lock
2a70: 74 79 70 65 2c 20 69 64 2d 3e 6c 6f 63 6b 74 79  type, id->lockty
2a80: 70 65 2c 20 69 64 2d 3e 73 68 61 72 65 64 4c 6f  pe, id->sharedLo
2a90: 63 6b 42 79 74 65 29 3b 0a 0a 20 20 2f 2a 20 49  ckByte);..  /* I
2aa0: 66 20 74 68 65 72 65 20 69 73 20 61 6c 72 65 61  f there is alrea
2ab0: 64 79 20 61 20 6c 6f 63 6b 20 6f 66 20 74 68 69  dy a lock of thi
2ac0: 73 20 74 79 70 65 20 6f 72 20 6d 6f 72 65 20 72  s type or more r
2ad0: 65 73 74 72 69 63 74 69 76 65 20 6f 6e 20 74 68  estrictive on th
2ae0: 65 0a 20 20 2a 2a 20 4f 73 46 69 6c 65 2c 20 64  e.  ** OsFile, d
2af0: 6f 20 6e 6f 74 68 69 6e 67 2e 20 44 6f 6e 27 74  o nothing. Don't
2b00: 20 75 73 65 20 74 68 65 20 65 6e 64 5f 6c 6f 63   use the end_loc
2b10: 6b 3a 20 65 78 69 74 20 70 61 74 68 2c 20 61 73  k: exit path, as
2b20: 0a 20 20 2a 2a 20 73 71 6c 69 74 65 33 4f 73 45  .  ** sqlite3OsE
2b30: 6e 74 65 72 4d 75 74 65 78 28 29 20 68 61 73 6e  nterMutex() hasn
2b40: 27 74 20 62 65 65 6e 20 63 61 6c 6c 65 64 20 79  't been called y
2b50: 65 74 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 69  et..  */.  if( i
2b60: 64 2d 3e 6c 6f 63 6b 74 79 70 65 3e 3d 6c 6f 63  d->locktype>=loc
2b70: 6b 74 79 70 65 20 29 7b 0a 20 20 20 20 72 65 74  ktype ){.    ret
2b80: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20  urn SQLITE_OK;. 
2b90: 20 7d 0a 0a 20 20 2f 2a 20 4d 61 6b 65 20 73 75   }..  /* Make su
2ba0: 72 65 20 74 68 65 20 6c 6f 63 6b 69 6e 67 20 73  re the locking s
2bb0: 65 71 75 65 6e 63 65 20 69 73 20 63 6f 72 72 65  equence is corre
2bc0: 63 74 0a 20 20 2a 2f 0a 20 20 61 73 73 65 72 74  ct.  */.  assert
2bd0: 28 20 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 21 3d  ( id->locktype!=
2be0: 4e 4f 5f 4c 4f 43 4b 20 7c 7c 20 6c 6f 63 6b 74  NO_LOCK || lockt
2bf0: 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43 4b  ype==SHARED_LOCK
2c00: 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 6c 6f   );.  assert( lo
2c10: 63 6b 74 79 70 65 21 3d 50 45 4e 44 49 4e 47 5f  cktype!=PENDING_
2c20: 4c 4f 43 4b 20 29 3b 0a 20 20 61 73 73 65 72 74  LOCK );.  assert
2c30: 28 20 6c 6f 63 6b 74 79 70 65 21 3d 52 45 53 45  ( locktype!=RESE
2c40: 52 56 45 44 5f 4c 4f 43 4b 20 7c 7c 20 69 64 2d  RVED_LOCK || id-
2c50: 3e 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41 52 45  >locktype==SHARE
2c60: 44 5f 4c 4f 43 4b 20 29 3b 0a 0a 20 20 2f 2a 20  D_LOCK );..  /* 
2c70: 4c 6f 63 6b 20 74 68 65 20 50 45 4e 44 49 4e 47  Lock the PENDING
2c80: 5f 4c 4f 43 4b 20 62 79 74 65 20 69 66 20 77 65  _LOCK byte if we
2c90: 20 6e 65 65 64 20 74 6f 20 61 63 71 75 69 72 65   need to acquire
2ca0: 20 61 20 50 45 4e 44 49 4e 47 20 6c 6f 63 6b 20   a PENDING lock 
2cb0: 6f 72 0a 20 20 2a 2a 20 61 20 53 48 41 52 45 44  or.  ** a SHARED
2cc0: 20 6c 6f 63 6b 2e 20 20 49 66 20 77 65 20 61 72   lock.  If we ar
2cd0: 65 20 61 63 71 75 69 72 69 6e 67 20 61 20 53 48  e acquiring a SH
2ce0: 41 52 45 44 20 6c 6f 63 6b 2c 20 74 68 65 20 61  ARED lock, the a
2cf0: 63 71 75 69 73 69 74 69 6f 6e 20 6f 66 0a 20 20  cquisition of.  
2d00: 2a 2a 20 74 68 65 20 50 45 4e 44 49 4e 47 5f 4c  ** the PENDING_L
2d10: 4f 43 4b 20 62 79 74 65 20 69 73 20 74 65 6d 70  OCK byte is temp
2d20: 6f 72 61 72 79 2e 0a 20 20 2a 2f 0a 20 20 69 66  orary..  */.  if
2d30: 28 20 69 64 2d 3e 6c 6f 63 6b 74 79 70 65 3d 3d  ( id->locktype==
2d40: 4e 4f 5f 4c 4f 43 4b 0a 20 20 20 7c 7c 20 28 6c  NO_LOCK.   || (l
2d50: 6f 63 6b 74 79 70 65 3d 3d 45 58 43 4c 55 53 49  ocktype==EXCLUSI
2d60: 56 45 5f 4c 4f 43 4b 20 26 26 20 69 64 2d 3e 6c  VE_LOCK && id->l
2d70: 6f 63 6b 74 79 70 65 3d 3d 52 45 53 45 52 56 45  ocktype==RESERVE
2d80: 44 5f 4c 4f 43 4b 29 0a 20 20 29 7b 0a 20 20 20  D_LOCK).  ){.   
2d90: 20 69 6e 74 20 63 6e 74 20 3d 20 33 3b 0a 20 20   int cnt = 3;.  
2da0: 20 20 77 68 69 6c 65 28 20 63 6e 74 2d 2d 3e 30    while( cnt-->0
2db0: 20 26 26 20 28 72 65 73 20 3d 20 4c 6f 63 6b 46   && (res = LockF
2dc0: 69 6c 65 28 69 64 2d 3e 68 2c 20 50 45 4e 44 49  ile(id->h, PENDI
2dd0: 4e 47 5f 42 59 54 45 2c 20 30 2c 20 31 2c 20 30  NG_BYTE, 0, 1, 0
2de0: 29 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 2f  ))==0 ){.      /
2df0: 2a 20 54 72 79 20 33 20 74 69 6d 65 73 20 74 6f  * Try 3 times to
2e00: 20 67 65 74 20 74 68 65 20 70 65 6e 64 69 6e 67   get the pending
2e10: 20 6c 6f 63 6b 2e 20 20 54 68 65 20 70 65 6e 64   lock.  The pend
2e20: 69 6e 67 20 6c 6f 63 6b 20 6d 69 67 68 74 20 62  ing lock might b
2e30: 65 0a 20 20 20 20 20 20 2a 2a 20 68 65 6c 64 20  e.      ** held 
2e40: 62 79 20 61 6e 6f 74 68 65 72 20 72 65 61 64 65  by another reade
2e50: 72 20 70 72 6f 63 65 73 73 20 77 68 6f 20 77 69  r process who wi
2e60: 6c 6c 20 72 65 6c 65 61 73 65 20 69 74 20 6d 6f  ll release it mo
2e70: 6d 65 6e 74 61 72 69 6c 79 2e 0a 20 20 20 20 20  mentarily..     
2e80: 20 2a 2f 0a 20 20 20 20 20 20 54 52 41 43 45 32   */.      TRACE2
2e90: 28 22 63 6f 75 6c 64 20 6e 6f 74 20 67 65 74 20  ("could not get 
2ea0: 61 20 50 45 4e 44 49 4e 47 20 6c 6f 63 6b 2e 20  a PENDING lock. 
2eb0: 63 6e 74 3d 25 64 5c 6e 22 2c 20 63 6e 74 29 3b  cnt=%d\n", cnt);
2ec0: 0a 20 20 20 20 20 20 53 6c 65 65 70 28 31 29 3b  .      Sleep(1);
2ed0: 0a 20 20 20 20 7d 0a 20 20 20 20 67 6f 74 50 65  .    }.    gotPe
2ee0: 6e 64 69 6e 67 4c 6f 63 6b 20 3d 20 72 65 73 3b  ndingLock = res;
2ef0: 0a 20 20 7d 0a 0a 20 20 2f 2a 20 41 63 71 75 69  .  }..  /* Acqui
2f00: 72 65 20 61 20 73 68 61 72 65 64 20 6c 6f 63 6b  re a shared lock
2f10: 0a 20 20 2a 2f 0a 20 20 69 66 28 20 6c 6f 63 6b  .  */.  if( lock
2f20: 74 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f 43  type==SHARED_LOC
2f30: 4b 20 26 26 20 72 65 73 20 29 7b 0a 20 20 20 20  K && res ){.    
2f40: 61 73 73 65 72 74 28 20 69 64 2d 3e 6c 6f 63 6b  assert( id->lock
2f50: 74 79 70 65 3d 3d 4e 4f 5f 4c 4f 43 4b 20 29 3b  type==NO_LOCK );
2f60: 0a 20 20 20 20 69 66 28 20 69 73 4e 54 28 29 20  .    if( isNT() 
2f70: 29 7b 0a 20 20 20 20 20 20 72 65 73 20 3d 20 67  ){.      res = g
2f80: 65 74 52 65 61 64 4c 6f 63 6b 28 69 64 2d 3e 68  etReadLock(id->h
2f90: 2c 20 53 48 41 52 45 44 5f 46 49 52 53 54 2c 20  , SHARED_FIRST, 
2fa0: 53 48 41 52 45 44 5f 53 49 5a 45 29 3b 0a 20 20  SHARED_SIZE);.  
2fb0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 69    }else{.      i
2fc0: 6e 74 20 6c 6b 3b 0a 20 20 20 20 20 20 73 71 6c  nt lk;.      sql
2fd0: 69 74 65 33 52 61 6e 64 6f 6d 6e 65 73 73 28 73  ite3Randomness(s
2fe0: 69 7a 65 6f 66 28 6c 6b 29 2c 20 26 6c 6b 29 3b  izeof(lk), &lk);
2ff0: 0a 20 20 20 20 20 20 69 64 2d 3e 73 68 61 72 65  .      id->share
3000: 64 4c 6f 63 6b 42 79 74 65 20 3d 20 28 6c 6b 20  dLockByte = (lk 
3010: 26 20 30 78 37 66 66 66 66 66 66 66 29 25 28 53  & 0x7fffffff)%(S
3020: 48 41 52 45 44 5f 53 49 5a 45 20 2d 20 31 29 3b  HARED_SIZE - 1);
3030: 0a 20 20 20 20 20 20 72 65 73 20 3d 20 4c 6f 63  .      res = Loc
3040: 6b 46 69 6c 65 28 69 64 2d 3e 68 2c 20 53 48 41  kFile(id->h, SHA
3050: 52 45 44 5f 46 49 52 53 54 2b 69 64 2d 3e 73 68  RED_FIRST+id->sh
3060: 61 72 65 64 4c 6f 63 6b 42 79 74 65 2c 20 30 2c  aredLockByte, 0,
3070: 20 31 2c 20 30 29 3b 0a 20 20 20 20 7d 0a 20 20   1, 0);.    }.  
3080: 20 20 69 66 28 20 72 65 73 20 29 7b 0a 20 20 20    if( res ){.   
3090: 20 20 20 6e 65 77 4c 6f 63 6b 74 79 70 65 20 3d     newLocktype =
30a0: 20 53 48 41 52 45 44 5f 4c 4f 43 4b 3b 0a 20 20   SHARED_LOCK;.  
30b0: 20 20 7d 0a 20 20 7d 0a 0a 20 20 2f 2a 20 41 63    }.  }..  /* Ac
30c0: 71 75 69 72 65 20 61 20 52 45 53 45 52 56 45 44  quire a RESERVED
30d0: 20 6c 6f 63 6b 0a 20 20 2a 2f 0a 20 20 69 66 28   lock.  */.  if(
30e0: 20 6c 6f 63 6b 74 79 70 65 3d 3d 52 45 53 45 52   locktype==RESER
30f0: 56 45 44 5f 4c 4f 43 4b 20 26 26 20 72 65 73 20  VED_LOCK && res 
3100: 29 7b 0a 20 20 20 20 61 73 73 65 72 74 28 20 69  ){.    assert( i
3110: 64 2d 3e 6c 6f 63 6b 74 79 70 65 3d 3d 53 48 41  d->locktype==SHA
3120: 52 45 44 5f 4c 4f 43 4b 20 29 3b 0a 20 20 20 20  RED_LOCK );.    
3130: 72 65 73 20 3d 20 4c 6f 63 6b 46 69 6c 65 28 69  res = LockFile(i
3140: 64 2d 3e 68 2c 20 52 45 53 45 52 56 45 44 5f 42  d->h, RESERVED_B
3150: 59 54 45 2c 20 30 2c 20 31 2c 20 30 29 3b 0a 20  YTE, 0, 1, 0);. 
3160: 20 20 20 69 66 28 20 72 65 73 20 29 7b 0a 20 20     if( res ){.  
3170: 20 20 20 20 6e 65 77 4c 6f 63 6b 74 79 70 65 20      newLocktype 
3180: 3d 20 52 45 53 45 52 56 45 44 5f 4c 4f 43 4b 3b  = RESERVED_LOCK;
3190: 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 2f 2a  .    }.  }..  /*
31a0: 20 41 63 71 75 69 72 65 20 61 20 50 45 4e 44 49   Acquire a PENDI
31b0: 4e 47 20 6c 6f 63 6b 0a 20 20 2a 2f 0a 20 20 69  NG lock.  */.  i
31c0: 66 28 20 6c 6f 63 6b 74 79 70 65 3d 3d 45 58 43  f( locktype==EXC
31d0: 4c 55 53 49 56 45 5f 4c 4f 43 4b 20 26 26 20 72  LUSIVE_LOCK && r
31e0: 65 73 20 29 7b 0a 20 20 20 20 6e 65 77 4c 6f 63  es ){.    newLoc
31f0: 6b 74 79 70 65 20 3d 20 50 45 4e 44 49 4e 47 5f  ktype = PENDING_
3200: 4c 4f 43 4b 3b 0a 20 20 20 20 67 6f 74 50 65 6e  LOCK;.    gotPen
3210: 64 69 6e 67 4c 6f 63 6b 20 3d 20 30 3b 0a 20 20  dingLock = 0;.  
3220: 7d 0a 0a 20 20 2f 2a 20 41 63 71 75 69 72 65 20  }..  /* Acquire 
3230: 61 6e 20 45 58 43 4c 55 53 49 56 45 20 6c 6f 63  an EXCLUSIVE loc
3240: 6b 0a 20 20 2a 2f 0a 20 20 69 66 28 20 6c 6f 63  k.  */.  if( loc
3250: 6b 74 79 70 65 3d 3d 45 58 43 4c 55 53 49 56 45  ktype==EXCLUSIVE
3260: 5f 4c 4f 43 4b 20 26 26 20 72 65 73 20 29 7b 0a  _LOCK && res ){.
3270: 20 20 20 20 61 73 73 65 72 74 28 20 69 64 2d 3e      assert( id->
3280: 6c 6f 63 6b 74 79 70 65 3e 3d 53 48 41 52 45 44  locktype>=SHARED
3290: 5f 4c 4f 43 4b 20 29 3b 0a 20 20 20 20 72 65 73  _LOCK );.    res
32a0: 20 3d 20 75 6e 6c 6f 63 6b 52 65 61 64 4c 6f 63   = unlockReadLoc
32b0: 6b 28 69 64 29 3b 0a 20 20 20 20 54 52 41 43 45  k(id);.    TRACE
32c0: 32 28 22 75 6e 72 65 61 64 6c 6f 63 6b 20 3d 20  2("unreadlock = 
32d0: 25 64 5c 6e 22 2c 20 72 65 73 29 3b 0a 20 20 20  %d\n", res);.   
32e0: 20 72 65 73 20 3d 20 4c 6f 63 6b 46 69 6c 65 28   res = LockFile(
32f0: 69 64 2d 3e 68 2c 20 53 48 41 52 45 44 5f 46 49  id->h, SHARED_FI
3300: 52 53 54 2c 20 30 2c 20 53 48 41 52 45 44 5f 53  RST, 0, SHARED_S
3310: 49 5a 45 2c 20 30 29 3b 0a 20 20 20 20 69 66 28  IZE, 0);.    if(
3320: 20 72 65 73 20 29 7b 0a 20 20 20 20 20 20 6e 65   res ){.      ne
3330: 77 4c 6f 63 6b 74 79 70 65 20 3d 20 45 58 43 4c  wLocktype = EXCL
3340: 55 53 49 56 45 5f 4c 4f 43 4b 3b 0a 20 20 20 20  USIVE_LOCK;.    
3350: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 54 52 41  }else{.      TRA
3360: 43 45 32 28 22 65 72 72 6f 72 2d 63 6f 64 65 20  CE2("error-code 
3370: 3d 20 25 64 5c 6e 22 2c 20 47 65 74 4c 61 73 74  = %d\n", GetLast
3380: 45 72 72 6f 72 28 29 29 3b 0a 20 20 20 20 7d 0a  Error());.    }.
3390: 20 20 7d 0a 0a 20 20 2f 2a 20 49 66 20 77 65 20    }..  /* If we 
33a0: 61 72 65 20 68 6f 6c 64 69 6e 67 20 61 20 50 45  are holding a PE
33b0: 4e 44 49 4e 47 20 6c 6f 63 6b 20 74 68 61 74 20  NDING lock that 
33c0: 6f 75 67 68 74 20 74 6f 20 62 65 20 72 65 6c 65  ought to be rele
33d0: 61 73 65 64 2c 20 74 68 65 6e 0a 20 20 2a 2a 20  ased, then.  ** 
33e0: 72 65 6c 65 61 73 65 20 69 74 20 6e 6f 77 2e 0a  release it now..
33f0: 20 20 2a 2f 0a 20 20 69 66 28 20 67 6f 74 50 65    */.  if( gotPe
3400: 6e 64 69 6e 67 4c 6f 63 6b 20 26 26 20 6c 6f 63  ndingLock && loc
3410: 6b 74 79 70 65 3d 3d 53 48 41 52 45 44 5f 4c 4f  ktype==SHARED_LO
3420: 43 4b 20 29 7b 0a 20 20 20 20 55 6e 6c 6f 63 6b  CK ){.    Unlock
3430: 46 69 6c 65 28 69 64 2d 3e 68 2c 20 50 45 4e 44  File(id->h, PEND
3440: 49 4e 47 5f 42 59 54 45 2c 20 30 2c 20 31 2c 20  ING_BYTE, 0, 1, 
3450: 30 29 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 55 70  0);.  }..  /* Up
3460: 64 61 74 65 20 74 68 65 20 73 74 61 74 65 20 6f  date the state o
3470: 66 20 74 68 65 20 6c 6f 63 6b 20 68 61 73 20 68  f the lock has h
3480: 65 6c 64 20 69 6e 20 74 68 65 20 66 69 6c 65 20  eld in the file 
3490: 64 65 73 63 72 69 70 74 6f 72 20 74 68 65 6e 0a  descriptor then.
34a0: 20 20 2a 2a 20 72 65 74 75 72 6e 20 74 68 65 20    ** return the 
34b0: 61 70 70 72 6f 70 72 69 61 74 65 20 72 65 73 75  appropriate resu
34c0: 6c 74 20 63 6f 64 65 2e 0a 20 20 2a 2f 0a 20 20  lt code..  */.  
34d0: 69 66 28 20 72 65 73 20 29 7b 0a 20 20 20 20 72  if( res ){.    r
34e0: 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20  c = SQLITE_OK;. 
34f0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 54 52 41 43   }else{.    TRAC
3500: 45 34 28 22 4c 4f 43 4b 20 46 41 49 4c 45 44 20  E4("LOCK FAILED 
3510: 25 64 20 74 72 79 69 6e 67 20 66 6f 72 20 25 64  %d trying for %d
3520: 20 62 75 74 20 67 6f 74 20 25 64 5c 6e 22 2c 20   but got %d\n", 
3530: 69 64 2d 3e 68 2c 0a 20 20 20 20 20 20 20 20 20  id->h,.         
3540: 20 20 6c 6f 63 6b 74 79 70 65 2c 20 6e 65 77 4c    locktype, newL
3550: 6f 63 6b 74 79 70 65 29 3b 0a 20 20 20 20 72 63  ocktype);.    rc
3560: 20 3d 20 53 51 4c 49 54 45 5f 42 55 53 59 3b 0a   = SQLITE_BUSY;.
3570: 20 20 7d 0a 20 20 69 64 2d 3e 6c 6f 63 6b 74 79    }.  id->lockty
3580: 70 65 20 3d 20 6e 65 77 4c 6f 63 6b 74 79 70 65  pe = newLocktype
3590: 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d  ;.  return rc;.}
35a0: 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75  ../*.** This rou
35b0: 74 69 6e 65 20 63 68 65 63 6b 73 20 69 66 20 74  tine checks if t
35c0: 68 65 72 65 20 69 73 20 61 20 52 45 53 45 52 56  here is a RESERV
35d0: 45 44 20 6c 6f 63 6b 20 68 65 6c 64 20 6f 6e 20  ED lock held on 
35e0: 74 68 65 20 73 70 65 63 69 66 69 65 64 0a 2a 2a  the specified.**
35f0: 20 66 69 6c 65 20 62 79 20 74 68 69 73 20 6f 72   file by this or
3600: 20 61 6e 79 20 6f 74 68 65 72 20 70 72 6f 63 65   any other proce
3610: 73 73 2e 20 49 66 20 73 75 63 68 20 61 20 6c 6f  ss. If such a lo
3620: 63 6b 20 69 73 20 68 65 6c 64 2c 20 72 65 74 75  ck is held, retu
3630: 72 6e 0a 2a 2a 20 6e 6f 6e 2d 7a 65 72 6f 2c 20  rn.** non-zero, 
3640: 6f 74 68 65 72 77 69 73 65 20 7a 65 72 6f 2e 0a  otherwise zero..
3650: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f 73  */.int sqlite3Os
3660: 43 68 65 63 6b 52 65 73 65 72 76 65 64 4c 6f 63  CheckReservedLoc
3670: 6b 28 4f 73 46 69 6c 65 20 2a 69 64 29 7b 0a 20  k(OsFile *id){. 
3680: 20 69 6e 74 20 72 63 3b 0a 20 20 69 66 28 20 69   int rc;.  if( i
3690: 64 2d 3e 6c 6f 63 6b 74 79 70 65 3e 3d 52 45 53  d->locktype>=RES
36a0: 45 52 56 45 44 5f 4c 4f 43 4b 20 29 7b 0a 20 20  ERVED_LOCK ){.  
36b0: 20 20 72 63 20 3d 20 31 3b 0a 20 20 20 20 54 52    rc = 1;.    TR
36c0: 41 43 45 33 28 22 54 45 53 54 20 57 52 2d 4c 4f  ACE3("TEST WR-LO
36d0: 43 4b 20 25 64 20 25 64 20 28 6c 6f 63 61 6c 29  CK %d %d (local)
36e0: 5c 6e 22 2c 20 69 64 2d 3e 68 2c 20 72 63 29 3b  \n", id->h, rc);
36f0: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63  .  }else{.    rc
3700: 20 3d 20 4c 6f 63 6b 46 69 6c 65 28 69 64 2d 3e   = LockFile(id->
3710: 68 2c 20 52 45 53 45 52 56 45 44 5f 42 59 54 45  h, RESERVED_BYTE
3720: 2c 20 30 2c 20 31 2c 20 30 29 3b 0a 20 20 20 20  , 0, 1, 0);.    
3730: 69 66 28 20 72 63 20 29 7b 0a 20 20 20 20 20 20  if( rc ){.      
3740: 55 6e 6c 6f 63 6b 46 69 6c 65 28 69 64 2d 3e 68  UnlockFile(id->h
3750: 2c 20 52 45 53 45 52 56 45 44 5f 42 59 54 45 2c  , RESERVED_BYTE,
3760: 20 30 2c 20 31 2c 20 30 29 3b 0a 20 20 20 20 7d   0, 1, 0);.    }
3770: 0a 20 20 20 20 72 63 20 3d 20 21 72 63 3b 0a 20  .    rc = !rc;. 
3780: 20 20 20 54 52 41 43 45 33 28 22 54 45 53 54 20     TRACE3("TEST 
3790: 57 52 2d 4c 4f 43 4b 20 25 64 20 25 64 20 28 72  WR-LOCK %d %d (r
37a0: 65 6d 6f 74 65 29 5c 6e 22 2c 20 69 64 2d 3e 68  emote)\n", id->h
37b0: 2c 20 72 63 29 3b 0a 20 20 7d 0a 20 20 72 65 74  , rc);.  }.  ret
37c0: 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  urn rc;.}../*.**
37d0: 20 4c 6f 77 65 72 20 74 68 65 20 6c 6f 63 6b 69   Lower the locki
37e0: 6e 67 20 6c 65 76 65 6c 20 6f 6e 20 66 69 6c 65  ng level on file
37f0: 20 64 65 73 63 72 69 70 74 6f 72 20 69 64 20 74   descriptor id t
3800: 6f 20 6c 6f 63 6b 74 79 70 65 2e 20 20 6c 6f 63  o locktype.  loc
3810: 6b 74 79 70 65 0a 2a 2a 20 6d 75 73 74 20 62 65  ktype.** must be
3820: 20 65 69 74 68 65 72 20 4e 4f 5f 4c 4f 43 4b 20   either NO_LOCK 
3830: 6f 72 20 53 48 41 52 45 44 5f 4c 4f 43 4b 2e 0a  or SHARED_LOCK..
3840: 2a 2a 0a 2a 2a 20 49 66 20 74 68 65 20 6c 6f 63  **.** If the loc
3850: 6b 69 6e 67 20 6c 65 76 65 6c 20 6f 66 20 74 68  king level of th
3860: 65 20 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f  e file descripto
3870: 72 20 69 73 20 61 6c 72 65 61 64 79 20 61 74 20  r is already at 
3880: 6f 72 20 62 65 6c 6f 77 0a 2a 2a 20 74 68 65 20  or below.** the 
3890: 72 65 71 75 65 73 74 65 64 20 6c 6f 63 6b 69 6e  requested lockin
38a0: 67 20 6c 65 76 65 6c 2c 20 74 68 69 73 20 72 6f  g level, this ro
38b0: 75 74 69 6e 65 20 69 73 20 61 20 6e 6f 2d 6f 70  utine is a no-op
38c0: 2e 0a 2a 2a 0a 2a 2a 20 49 74 20 69 73 20 6e 6f  ..**.** It is no
38d0: 74 20 70 6f 73 73 69 62 6c 65 20 66 6f 72 20 74  t possible for t
38e0: 68 69 73 20 72 6f 75 74 69 6e 65 20 74 6f 20 66  his routine to f
38f0: 61 69 6c 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  ail..*/.int sqli
3900: 74 65 33 4f 73 55 6e 6c 6f 63 6b 28 4f 73 46 69  te3OsUnlock(OsFi
3910: 6c 65 20 2a 69 64 2c 20 69 6e 74 20 6c 6f 63 6b  le *id, int lock
3920: 74 79 70 65 29 7b 0a 20 20 69 6e 74 20 72 63 2c  type){.  int rc,
3930: 20 74 79 70 65 3b 0a 20 20 61 73 73 65 72 74 28   type;.  assert(
3940: 20 6c 6f 63 6b 74 79 70 65 3c 3d 53 48 41 52 45   locktype<=SHARE
3950: 44 5f 4c 4f 43 4b 20 29 3b 0a 20 20 54 52 41 43  D_LOCK );.  TRAC
3960: 45 34 28 22 55 4e 4c 4f 43 4b 20 25 64 20 74 6f  E4("UNLOCK %d to
3970: 20 25 64 20 77 61 73 20 25 64 28 25 64 29 5c 6e   %d was %d(%d)\n
3980: 22 2c 20 69 64 2d 3e 68 2c 20 6c 6f 63 6b 74 79  ", id->h, lockty
3990: 70 65 2c 0a 20 20 20 20 20 20 20 20 20 20 69 64  pe,.          id
39a0: 2d 3e 6c 6f 63 6b 74 79 70 65 2c 20 69 64 2d 3e  ->locktype, id->
39b0: 73 68 61 72 65 64 4c 6f 63 6b 42 79 74 65 29 3b  sharedLockByte);
39c0: 0a 20 20 74 79 70 65 20 3d 20 69 64 2d 3e 6c 6f  .  type = id->lo
39d0: 63 6b 74 79 70 65 3b 0a 20 20 69 66 28 20 74 79  cktype;.  if( ty
39e0: 70 65 3e 3d 45 58 43 4c 55 53 49 56 45 5f 4c 4f  pe>=EXCLUSIVE_LO
39f0: 43 4b 20 29 7b 0a 20 20 20 20 55 6e 6c 6f 63 6b  CK ){.    Unlock
3a00: 46 69 6c 65 28 69 64 2d 3e 68 2c 20 53 48 41 52  File(id->h, SHAR
3a10: 45 44 5f 46 49 52 53 54 2c 20 30 2c 20 53 48 41  ED_FIRST, 0, SHA
3a20: 52 45 44 5f 53 49 5a 45 2c 20 30 29 3b 0a 20 20  RED_SIZE, 0);.  
3a30: 7d 0a 20 20 69 66 28 20 74 79 70 65 3e 3d 52 45  }.  if( type>=RE
3a40: 53 45 52 56 45 44 5f 4c 4f 43 4b 20 29 7b 0a 20  SERVED_LOCK ){. 
3a50: 20 20 20 55 6e 6c 6f 63 6b 46 69 6c 65 28 69 64     UnlockFile(id
3a60: 2d 3e 68 2c 20 52 45 53 45 52 56 45 44 5f 42 59  ->h, RESERVED_BY
3a70: 54 45 2c 20 30 2c 20 31 2c 20 30 29 3b 0a 20 20  TE, 0, 1, 0);.  
3a80: 7d 0a 20 20 69 66 28 20 6c 6f 63 6b 74 79 70 65  }.  if( locktype
3a90: 3d 3d 4e 4f 5f 4c 4f 43 4b 20 26 26 20 74 79 70  ==NO_LOCK && typ
3aa0: 65 3e 3d 53 48 41 52 45 44 5f 4c 4f 43 4b 20 26  e>=SHARED_LOCK &
3ab0: 26 20 74 79 70 65 3c 45 58 43 4c 55 53 49 56 45  & type<EXCLUSIVE
3ac0: 5f 4c 4f 43 4b 20 29 7b 0a 20 20 20 20 75 6e 6c  _LOCK ){.    unl
3ad0: 6f 63 6b 52 65 61 64 4c 6f 63 6b 28 69 64 29 3b  ockReadLock(id);
3ae0: 0a 20 20 7d 0a 20 20 69 66 28 20 74 79 70 65 3e  .  }.  if( type>
3af0: 3d 50 45 4e 44 49 4e 47 5f 4c 4f 43 4b 20 29 7b  =PENDING_LOCK ){
3b00: 0a 20 20 20 20 55 6e 6c 6f 63 6b 46 69 6c 65 28  .    UnlockFile(
3b10: 69 64 2d 3e 68 2c 20 50 45 4e 44 49 4e 47 5f 42  id->h, PENDING_B
3b20: 59 54 45 2c 20 30 2c 20 31 2c 20 30 29 3b 0a 20  YTE, 0, 1, 0);. 
3b30: 20 7d 0a 20 20 69 64 2d 3e 6c 6f 63 6b 74 79 70   }.  id->locktyp
3b40: 65 20 3d 20 6c 6f 63 6b 74 79 70 65 3b 0a 20 20  e = locktype;.  
3b50: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b  return SQLITE_OK
3b60: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 65 74 20 69  ;.}../*.** Get i
3b70: 6e 66 6f 72 6d 61 74 69 6f 6e 20 74 6f 20 73 65  nformation to se
3b80: 65 64 20 74 68 65 20 72 61 6e 64 6f 6d 20 6e 75  ed the random nu
3b90: 6d 62 65 72 20 67 65 6e 65 72 61 74 6f 72 2e 20  mber generator. 
3ba0: 20 54 68 65 20 73 65 65 64 0a 2a 2a 20 69 73 20   The seed.** is 
3bb0: 77 72 69 74 74 65 6e 20 69 6e 74 6f 20 74 68 65  written into the
3bc0: 20 62 75 66 66 65 72 20 7a 42 75 66 5b 32 35 36   buffer zBuf[256
3bd0: 5d 2e 20 20 54 68 65 20 63 61 6c 6c 69 6e 67 20  ].  The calling 
3be0: 66 75 6e 63 74 69 6f 6e 20 6d 75 73 74 0a 2a 2a  function must.**
3bf0: 20 73 75 70 70 6c 79 20 61 20 73 75 66 66 69 63   supply a suffic
3c00: 69 65 6e 74 6c 79 20 6c 61 72 67 65 20 62 75 66  iently large buf
3c10: 66 65 72 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  fer..*/.int sqli
3c20: 74 65 33 4f 73 52 61 6e 64 6f 6d 53 65 65 64 28  te3OsRandomSeed(
3c30: 63 68 61 72 20 2a 7a 42 75 66 29 7b 0a 20 20 2f  char *zBuf){.  /
3c40: 2a 20 57 65 20 68 61 76 65 20 74 6f 20 69 6e 69  * We have to ini
3c50: 74 69 61 6c 69 7a 65 20 7a 42 75 66 20 74 6f 20  tialize zBuf to 
3c60: 70 72 65 76 65 6e 74 20 76 61 6c 67 72 69 6e 64  prevent valgrind
3c70: 20 66 72 6f 6d 20 72 65 70 6f 72 74 69 6e 67 0a   from reporting.
3c80: 20 20 2a 2a 20 65 72 72 6f 72 73 2e 20 20 54 68    ** errors.  Th
3c90: 65 20 72 65 70 6f 72 74 73 20 69 73 73 75 65 64  e reports issued
3ca0: 20 62 79 20 76 61 6c 67 72 69 6e 64 20 61 72 65   by valgrind are
3cb0: 20 69 6e 63 6f 72 72 65 63 74 20 2d 20 77 65 20   incorrect - we 
3cc0: 77 6f 75 6c 64 0a 20 20 2a 2a 20 70 72 65 66 65  would.  ** prefe
3cd0: 72 20 74 68 61 74 20 74 68 65 20 72 61 6e 64 6f  r that the rando
3ce0: 6d 6e 65 73 73 20 62 65 20 69 6e 63 72 65 61 73  mness be increas
3cf0: 65 64 20 62 79 20 6d 61 6b 69 6e 67 20 75 73 65  ed by making use
3d00: 20 6f 66 20 74 68 65 0a 20 20 2a 2a 20 75 6e 69   of the.  ** uni
3d10: 6e 69 74 69 61 6c 69 7a 65 64 20 73 70 61 63 65  nitialized space
3d20: 20 69 6e 20 7a 42 75 66 20 2d 20 62 75 74 20 76   in zBuf - but v
3d30: 61 6c 67 72 69 6e 64 20 65 72 72 6f 72 73 20 74  algrind errors t
3d40: 65 6e 64 20 74 6f 20 77 6f 72 72 79 0a 20 20 2a  end to worry.  *
3d50: 2a 20 73 6f 6d 65 20 75 73 65 72 73 2e 20 20 52  * some users.  R
3d60: 61 74 68 65 72 20 74 68 61 6e 20 61 72 67 75 65  ather than argue
3d70: 2c 20 69 74 20 73 65 65 6d 73 20 65 61 73 69 65  , it seems easie
3d80: 72 20 6a 75 73 74 20 74 6f 20 69 6e 69 74 69 61  r just to initia
3d90: 6c 69 7a 65 0a 20 20 2a 2a 20 74 68 65 20 77 68  lize.  ** the wh
3da0: 6f 6c 65 20 61 72 72 61 79 20 61 6e 64 20 73 69  ole array and si
3db0: 6c 65 6e 63 65 20 76 61 6c 67 72 69 6e 64 2c 20  lence valgrind, 
3dc0: 65 76 65 6e 20 69 66 20 74 68 61 74 20 6d 65 61  even if that mea
3dd0: 6e 73 20 6c 65 73 73 20 72 61 6e 64 6f 6d 6e 65  ns less randomne
3de0: 73 73 0a 20 20 2a 2a 20 69 6e 20 74 68 65 20 72  ss.  ** in the r
3df0: 61 6e 64 6f 6d 20 73 65 65 64 2e 0a 20 20 2a 2a  andom seed..  **
3e00: 0a 20 20 2a 2a 20 57 68 65 6e 20 74 65 73 74 69  .  ** When testi
3e10: 6e 67 2c 20 69 6e 69 74 69 61 6c 69 7a 69 6e 67  ng, initializing
3e20: 20 7a 42 75 66 5b 5d 20 74 6f 20 7a 65 72 6f 20   zBuf[] to zero 
3e30: 69 73 20 61 6c 6c 20 77 65 20 64 6f 2e 20 20 54  is all we do.  T
3e40: 68 61 74 20 6d 65 61 6e 73 0a 20 20 2a 2a 20 74  hat means.  ** t
3e50: 68 61 74 20 77 65 20 61 6c 77 61 79 73 20 75 73  hat we always us
3e60: 65 20 74 68 65 20 73 61 6d 65 20 72 61 6e 64 6f  e the same rando
3e70: 6d 20 6e 75 6d 62 65 72 20 73 65 71 75 65 6e 63  m number sequenc
3e80: 65 2e 2a 20 54 68 69 73 20 6d 61 6b 65 73 20 74  e.* This makes t
3e90: 68 65 0a 20 20 2a 2a 20 74 65 73 74 73 20 72 65  he.  ** tests re
3ea0: 70 65 61 74 61 62 6c 65 2e 0a 20 20 2a 2f 0a 20  peatable..  */. 
3eb0: 20 6d 65 6d 73 65 74 28 7a 42 75 66 2c 20 30 2c   memset(zBuf, 0,
3ec0: 20 32 35 36 29 3b 0a 20 20 47 65 74 53 79 73 74   256);.  GetSyst
3ed0: 65 6d 54 69 6d 65 28 28 4c 50 53 59 53 54 45 4d  emTime((LPSYSTEM
3ee0: 54 49 4d 45 29 7a 42 75 66 29 3b 0a 20 20 72 65  TIME)zBuf);.  re
3ef0: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  turn SQLITE_OK;.
3f00: 7d 0a 0a 2f 2a 0a 2a 2a 20 53 6c 65 65 70 20 66  }../*.** Sleep f
3f10: 6f 72 20 61 20 6c 69 74 74 6c 65 20 77 68 69 6c  or a little whil
3f20: 65 2e 20 20 52 65 74 75 72 6e 20 74 68 65 20 61  e.  Return the a
3f30: 6d 6f 75 6e 74 20 6f 66 20 74 69 6d 65 20 73 6c  mount of time sl
3f40: 65 70 74 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  ept..*/.int sqli
3f50: 74 65 33 4f 73 53 6c 65 65 70 28 69 6e 74 20 6d  te3OsSleep(int m
3f60: 73 29 7b 0a 20 20 53 6c 65 65 70 28 6d 73 29 3b  s){.  Sleep(ms);
3f70: 0a 20 20 72 65 74 75 72 6e 20 6d 73 3b 0a 7d 0a  .  return ms;.}.
3f80: 0a 2f 2a 0a 2a 2a 20 53 74 61 74 69 63 20 76 61  ./*.** Static va
3f90: 72 69 61 62 6c 65 73 20 75 73 65 64 20 66 6f 72  riables used for
3fa0: 20 74 68 72 65 61 64 20 73 79 6e 63 68 72 6f 6e   thread synchron
3fb0: 69 7a 61 74 69 6f 6e 0a 2a 2f 0a 73 74 61 74 69  ization.*/.stati
3fc0: 63 20 69 6e 74 20 69 6e 4d 75 74 65 78 20 3d 20  c int inMutex = 
3fd0: 30 3b 0a 23 69 66 64 65 66 20 53 51 4c 49 54 45  0;.#ifdef SQLITE
3fe0: 5f 57 33 32 5f 54 48 52 45 41 44 53 0a 20 20 73  _W32_THREADS.  s
3ff0: 74 61 74 69 63 20 43 52 49 54 49 43 41 4c 5f 53  tatic CRITICAL_S
4000: 45 43 54 49 4f 4e 20 63 73 3b 0a 23 65 6e 64 69  ECTION cs;.#endi
4010: 66 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c  f../*.** The fol
4020: 6c 6f 77 69 6e 67 20 70 61 69 72 20 6f 66 20 72  lowing pair of r
4030: 6f 75 74 69 6e 65 20 69 6d 70 6c 65 6d 65 6e 74  outine implement
4040: 20 6d 75 74 75 61 6c 20 65 78 63 6c 75 73 69 6f   mutual exclusio
4050: 6e 20 66 6f 72 0a 2a 2a 20 6d 75 6c 74 69 2d 74  n for.** multi-t
4060: 68 72 65 61 64 65 64 20 70 72 6f 63 65 73 73 65  hreaded processe
4070: 73 2e 20 20 4f 6e 6c 79 20 61 20 73 69 6e 67 6c  s.  Only a singl
4080: 65 20 74 68 72 65 61 64 20 69 73 20 61 6c 6c 6f  e thread is allo
4090: 77 65 64 20 74 6f 0a 2a 2a 20 65 78 65 63 75 74  wed to.** execut
40a0: 65 64 20 63 6f 64 65 20 74 68 61 74 20 69 73 20  ed code that is 
40b0: 73 75 72 72 6f 75 6e 64 65 64 20 62 79 20 45 6e  surrounded by En
40c0: 74 65 72 4d 75 74 65 78 28 29 20 61 6e 64 20 4c  terMutex() and L
40d0: 65 61 76 65 4d 75 74 65 78 28 29 2e 0a 2a 2a 0a  eaveMutex()..**.
40e0: 2a 2a 20 53 51 4c 69 74 65 20 75 73 65 73 20 6f  ** SQLite uses o
40f0: 6e 6c 79 20 61 20 73 69 6e 67 6c 65 20 4d 75 74  nly a single Mut
4100: 65 78 2e 20 20 54 68 65 72 65 20 69 73 20 6e 6f  ex.  There is no
4110: 74 20 6d 75 63 68 20 63 72 69 74 69 63 61 6c 0a  t much critical.
4120: 2a 2a 20 63 6f 64 65 20 61 6e 64 20 77 68 61 74  ** code and what
4130: 20 6c 69 74 74 6c 65 20 74 68 65 72 65 20 69 73   little there is
4140: 20 65 78 65 63 75 74 65 73 20 71 75 69 63 6b 6c   executes quickl
4150: 79 20 61 6e 64 20 77 69 74 68 6f 75 74 20 62 6c  y and without bl
4160: 6f 63 6b 69 6e 67 2e 0a 2a 2f 0a 76 6f 69 64 20  ocking..*/.void 
4170: 73 71 6c 69 74 65 33 4f 73 45 6e 74 65 72 4d 75  sqlite3OsEnterMu
4180: 74 65 78 28 29 7b 0a 23 69 66 64 65 66 20 53 51  tex(){.#ifdef SQ
4190: 4c 49 54 45 5f 57 33 32 5f 54 48 52 45 41 44 53  LITE_W32_THREADS
41a0: 0a 20 20 73 74 61 74 69 63 20 69 6e 74 20 69 73  .  static int is
41b0: 49 6e 69 74 20 3d 20 30 3b 0a 20 20 77 68 69 6c  Init = 0;.  whil
41c0: 65 28 20 21 69 73 49 6e 69 74 20 29 7b 0a 20 20  e( !isInit ){.  
41d0: 20 20 73 74 61 74 69 63 20 6c 6f 6e 67 20 6c 6f    static long lo
41e0: 63 6b 20 3d 20 30 3b 0a 20 20 20 20 69 66 28 20  ck = 0;.    if( 
41f0: 49 6e 74 65 72 6c 6f 63 6b 65 64 49 6e 63 72 65  InterlockedIncre
4200: 6d 65 6e 74 28 26 6c 6f 63 6b 29 3d 3d 31 20 29  ment(&lock)==1 )
4210: 7b 0a 20 20 20 20 20 20 49 6e 69 74 69 61 6c 69  {.      Initiali
4220: 7a 65 43 72 69 74 69 63 61 6c 53 65 63 74 69 6f  zeCriticalSectio
4230: 6e 28 26 63 73 29 3b 0a 20 20 20 20 20 20 69 73  n(&cs);.      is
4240: 49 6e 69 74 20 3d 20 31 3b 0a 20 20 20 20 7d 65  Init = 1;.    }e
4250: 6c 73 65 7b 0a 20 20 20 20 20 20 53 6c 65 65 70  lse{.      Sleep
4260: 28 31 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20  (1);.    }.  }. 
4270: 20 45 6e 74 65 72 43 72 69 74 69 63 61 6c 53 65   EnterCriticalSe
4280: 63 74 69 6f 6e 28 26 63 73 29 3b 0a 23 65 6e 64  ction(&cs);.#end
4290: 69 66 0a 20 20 61 73 73 65 72 74 28 20 21 69 6e  if.  assert( !in
42a0: 4d 75 74 65 78 20 29 3b 0a 20 20 69 6e 4d 75 74  Mutex );.  inMut
42b0: 65 78 20 3d 20 31 3b 0a 7d 0a 76 6f 69 64 20 73  ex = 1;.}.void s
42c0: 71 6c 69 74 65 33 4f 73 4c 65 61 76 65 4d 75 74  qlite3OsLeaveMut
42d0: 65 78 28 29 7b 0a 20 20 61 73 73 65 72 74 28 20  ex(){.  assert( 
42e0: 69 6e 4d 75 74 65 78 20 29 3b 0a 20 20 69 6e 4d  inMutex );.  inM
42f0: 75 74 65 78 20 3d 20 30 3b 0a 23 69 66 64 65 66  utex = 0;.#ifdef
4300: 20 53 51 4c 49 54 45 5f 57 33 32 5f 54 48 52 45   SQLITE_W32_THRE
4310: 41 44 53 0a 20 20 4c 65 61 76 65 43 72 69 74 69  ADS.  LeaveCriti
4320: 63 61 6c 53 65 63 74 69 6f 6e 28 26 63 73 29 3b  calSection(&cs);
4330: 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a  .#endif.}../*.**
4340: 20 54 75 72 6e 20 61 20 72 65 6c 61 74 69 76 65   Turn a relative
4350: 20 70 61 74 68 6e 61 6d 65 20 69 6e 74 6f 20 61   pathname into a
4360: 20 66 75 6c 6c 20 70 61 74 68 6e 61 6d 65 2e 20   full pathname. 
4370: 20 52 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 65   Return a pointe
4380: 72 0a 2a 2a 20 74 6f 20 74 68 65 20 66 75 6c 6c  r.** to the full
4390: 20 70 61 74 68 6e 61 6d 65 20 73 74 6f 72 65 64   pathname stored
43a0: 20 69 6e 20 73 70 61 63 65 20 6f 62 74 61 69 6e   in space obtain
43b0: 65 64 20 66 72 6f 6d 20 73 71 6c 69 74 65 4d 61  ed from sqliteMa
43c0: 6c 6c 6f 63 28 29 2e 0a 2a 2a 20 54 68 65 20 63  lloc()..** The c
43d0: 61 6c 6c 69 6e 67 20 66 75 6e 63 74 69 6f 6e 20  alling function 
43e0: 69 73 20 72 65 73 70 6f 6e 73 69 62 6c 65 20 66  is responsible f
43f0: 6f 72 20 66 72 65 65 69 6e 67 20 74 68 69 73 20  or freeing this 
4400: 73 70 61 63 65 20 6f 6e 63 65 20 69 74 0a 2a 2a  space once it.**
4410: 20 69 73 20 6e 6f 20 6c 6f 6e 67 65 72 20 6e 65   is no longer ne
4420: 65 64 65 64 2e 0a 2a 2f 0a 63 68 61 72 20 2a 73  eded..*/.char *s
4430: 71 6c 69 74 65 33 4f 73 46 75 6c 6c 50 61 74 68  qlite3OsFullPath
4440: 6e 61 6d 65 28 63 6f 6e 73 74 20 63 68 61 72 20  name(const char 
4450: 2a 7a 52 65 6c 61 74 69 76 65 29 7b 0a 20 20 63  *zRelative){.  c
4460: 68 61 72 20 2a 7a 4e 6f 74 55 73 65 64 3b 0a 20  har *zNotUsed;. 
4470: 20 63 68 61 72 20 2a 7a 46 75 6c 6c 3b 0a 20 20   char *zFull;.  
4480: 69 6e 74 20 6e 42 79 74 65 3b 0a 20 20 6e 42 79  int nByte;.  nBy
4490: 74 65 20 3d 20 47 65 74 46 75 6c 6c 50 61 74 68  te = GetFullPath
44a0: 4e 61 6d 65 28 7a 52 65 6c 61 74 69 76 65 2c 20  Name(zRelative, 
44b0: 30 2c 20 30 2c 20 26 7a 4e 6f 74 55 73 65 64 29  0, 0, &zNotUsed)
44c0: 20 2b 20 31 3b 0a 20 20 7a 46 75 6c 6c 20 3d 20   + 1;.  zFull = 
44d0: 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 20 6e 42  sqliteMalloc( nB
44e0: 79 74 65 20 29 3b 0a 20 20 69 66 28 20 7a 46 75  yte );.  if( zFu
44f0: 6c 6c 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30  ll==0 ) return 0
4500: 3b 0a 20 20 47 65 74 46 75 6c 6c 50 61 74 68 4e  ;.  GetFullPathN
4510: 61 6d 65 28 7a 52 65 6c 61 74 69 76 65 2c 20 6e  ame(zRelative, n
4520: 42 79 74 65 2c 20 7a 46 75 6c 6c 2c 20 26 7a 4e  Byte, zFull, &zN
4530: 6f 74 55 73 65 64 29 3b 0a 20 20 72 65 74 75 72  otUsed);.  retur
4540: 6e 20 7a 46 75 6c 6c 3b 0a 7d 0a 0a 2f 2a 0a 2a  n zFull;.}../*.*
4550: 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20  * The following 
4560: 76 61 72 69 61 62 6c 65 2c 20 69 66 20 73 65 74  variable, if set
4570: 20 74 6f 20 61 20 6e 6f 6e 2d 7a 65 72 6f 20 76   to a non-zero v
4580: 61 6c 75 65 2c 20 62 65 63 6f 6d 65 73 20 74 68  alue, becomes th
4590: 65 20 72 65 73 75 6c 74 0a 2a 2a 20 72 65 74 75  e result.** retu
45a0: 72 6e 65 64 20 66 72 6f 6d 20 73 71 6c 69 74 65  rned from sqlite
45b0: 33 4f 73 43 75 72 72 65 6e 74 54 69 6d 65 28 29  3OsCurrentTime()
45c0: 2e 20 20 54 68 69 73 20 69 73 20 75 73 65 64 20  .  This is used 
45d0: 66 6f 72 20 74 65 73 74 69 6e 67 2e 0a 2a 2f 0a  for testing..*/.
45e0: 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45  #ifdef SQLITE_TE
45f0: 53 54 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 63  ST.int sqlite3_c
4600: 75 72 72 65 6e 74 5f 74 69 6d 65 20 3d 20 30 3b  urrent_time = 0;
4610: 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 46  .#endif../*.** F
4620: 69 6e 64 20 74 68 65 20 63 75 72 72 65 6e 74 20  ind the current 
4630: 74 69 6d 65 20 28 69 6e 20 55 6e 69 76 65 72 73  time (in Univers
4640: 61 6c 20 43 6f 6f 72 64 69 6e 61 74 65 64 20 54  al Coordinated T
4650: 69 6d 65 29 2e 20 20 57 72 69 74 65 20 74 68 65  ime).  Write the
4660: 0a 2a 2a 20 63 75 72 72 65 6e 74 20 74 69 6d 65  .** current time
4670: 20 61 6e 64 20 64 61 74 65 20 61 73 20 61 20 4a   and date as a J
4680: 75 6c 69 61 6e 20 44 61 79 20 6e 75 6d 62 65 72  ulian Day number
4690: 20 69 6e 74 6f 20 2a 70 72 4e 6f 77 20 61 6e 64   into *prNow and
46a0: 0a 2a 2a 20 72 65 74 75 72 6e 20 30 2e 20 20 52  .** return 0.  R
46b0: 65 74 75 72 6e 20 31 20 69 66 20 74 68 65 20 74  eturn 1 if the t
46c0: 69 6d 65 20 61 6e 64 20 64 61 74 65 20 63 61 6e  ime and date can
46d0: 6e 6f 74 20 62 65 20 66 6f 75 6e 64 2e 0a 2a 2f  not be found..*/
46e0: 0a 69 6e 74 20 73 71 6c 69 74 65 33 4f 73 43 75  .int sqlite3OsCu
46f0: 72 72 65 6e 74 54 69 6d 65 28 64 6f 75 62 6c 65  rrentTime(double
4700: 20 2a 70 72 4e 6f 77 29 7b 0a 20 20 46 49 4c 45   *prNow){.  FILE
4710: 54 49 4d 45 20 66 74 3b 0a 20 20 2f 2a 20 46 49  TIME ft;.  /* FI
4720: 4c 45 54 49 4d 45 20 73 74 72 75 63 74 75 72 65  LETIME structure
4730: 20 69 73 20 61 20 36 34 2d 62 69 74 20 76 61 6c   is a 64-bit val
4740: 75 65 20 72 65 70 72 65 73 65 6e 74 69 6e 67 20  ue representing 
4750: 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 0a 20  the number of . 
4760: 20 20 20 20 31 30 30 2d 6e 61 6e 6f 73 65 63 6f      100-nanoseco
4770: 6e 64 20 69 6e 74 65 72 76 61 6c 73 20 73 69 6e  nd intervals sin
4780: 63 65 20 4a 61 6e 75 61 72 79 20 31 2c 20 31 36  ce January 1, 16
4790: 30 31 20 28 3d 20 4a 44 20 32 33 30 35 38 31 33  01 (= JD 2305813
47a0: 2e 35 29 2e 20 0a 20 20 2a 2f 0a 20 20 64 6f 75  .5). .  */.  dou
47b0: 62 6c 65 20 6e 6f 77 3b 0a 20 20 47 65 74 53 79  ble now;.  GetSy
47c0: 73 74 65 6d 54 69 6d 65 41 73 46 69 6c 65 54 69  stemTimeAsFileTi
47d0: 6d 65 28 20 26 66 74 20 29 3b 0a 20 20 6e 6f 77  me( &ft );.  now
47e0: 20 3d 20 28 28 64 6f 75 62 6c 65 29 66 74 2e 64   = ((double)ft.d
47f0: 77 48 69 67 68 44 61 74 65 54 69 6d 65 29 20 2a  wHighDateTime) *
4800: 20 34 32 39 34 39 36 37 32 39 36 2e 30 3b 20 0a   4294967296.0; .
4810: 20 20 2a 70 72 4e 6f 77 20 3d 20 28 6e 6f 77 20    *prNow = (now 
4820: 2b 20 66 74 2e 64 77 4c 6f 77 44 61 74 65 54 69  + ft.dwLowDateTi
4830: 6d 65 29 2f 38 36 34 30 30 30 30 30 30 30 30 30  me)/864000000000
4840: 2e 30 20 2b 20 32 33 30 35 38 31 33 2e 35 3b 0a  .0 + 2305813.5;.
4850: 23 69 66 64 65 66 20 53 51 4c 49 54 45 5f 54 45  #ifdef SQLITE_TE
4860: 53 54 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33  ST.  if( sqlite3
4870: 5f 63 75 72 72 65 6e 74 5f 74 69 6d 65 20 29 7b  _current_time ){
4880: 0a 20 20 20 20 2a 70 72 4e 6f 77 20 3d 20 73 71  .    *prNow = sq
4890: 6c 69 74 65 33 5f 63 75 72 72 65 6e 74 5f 74 69  lite3_current_ti
48a0: 6d 65 2f 38 36 34 30 30 2e 30 20 2b 20 32 34 34  me/86400.0 + 244
48b0: 30 35 38 37 2e 35 3b 0a 20 20 7d 0a 23 65 6e 64  0587.5;.  }.#end
48c0: 69 66 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d  if.  return 0;.}
48d0: 0a 0a 23 65 6e 64 69 66 20 2f 2a 20 4f 53 5f 57  ..#endif /* OS_W
48e0: 49 4e 20 2a 2f 0a                                IN */.