/ Hex Artifact Content
Login

Artifact faf9f484f3261c7650021cae79294338491f2cfb:


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 0a 2a 2a 20 6f 6e 20   abstract.** on 
0210: 77 68 69 63 68 20 74 68 65 20 72 65 73 74 20 6f  which the rest o
0220: 66 20 53 51 4c 69 74 65 20 63 61 6e 20 6f 70 65  f SQLite can ope
0230: 72 61 74 65 2e 0a 2a 2f 0a 23 69 6e 63 6c 75 64  rate..*/.#includ
0240: 65 20 22 73 71 6c 69 74 65 49 6e 74 2e 68 22 0a  e "sqliteInt.h".
0250: 23 69 6e 63 6c 75 64 65 20 22 6f 73 2e 68 22 0a  #include "os.h".
0260: 0a 23 69 66 6e 64 65 66 20 4f 53 5f 55 4e 49 58  .#ifndef OS_UNIX
0270: 0a 23 20 69 66 6e 64 65 66 20 4f 53 5f 57 49 4e  .# ifndef OS_WIN
0280: 0a 23 20 20 64 65 66 69 6e 65 20 4f 53 5f 55 4e  .#  define OS_UN
0290: 49 58 20 31 0a 23 20 65 6c 73 65 0a 23 20 20 64  IX 1.# else.#  d
02a0: 65 66 69 6e 65 20 4f 53 5f 55 4e 49 58 20 30 0a  efine OS_UNIX 0.
02b0: 23 20 65 6e 64 69 66 0a 23 65 6e 64 69 66 0a 23  # endif.#endif.#
02c0: 69 66 6e 64 65 66 20 4f 53 5f 57 49 4e 0a 23 20  ifndef OS_WIN.# 
02d0: 64 65 66 69 6e 65 20 4f 53 5f 57 49 4e 20 30 0a  define OS_WIN 0.
02e0: 23 65 6e 64 69 66 0a 23 69 66 20 4f 53 5f 55 4e  #endif.#if OS_UN
02f0: 49 58 0a 23 20 69 6e 63 6c 75 64 65 20 3c 75 6e  IX.# include <un
0300: 69 73 74 64 2e 68 3e 0a 23 20 69 6e 63 6c 75 64  istd.h>.# includ
0310: 65 20 3c 66 63 6e 74 6c 2e 68 3e 0a 23 20 69 6e  e <fcntl.h>.# in
0320: 63 6c 75 64 65 20 3c 73 79 73 2f 73 74 61 74 2e  clude <sys/stat.
0330: 68 3e 0a 23 20 69 6e 63 6c 75 64 65 20 3c 74 69  h>.# include <ti
0340: 6d 65 2e 68 3e 0a 23 65 6e 64 69 66 0a 23 69 66  me.h>.#endif.#if
0350: 20 4f 53 5f 57 49 4e 0a 23 20 69 6e 63 6c 75 64   OS_WIN.# includ
0360: 65 20 3c 77 69 6e 62 61 73 65 2e 68 3e 0a 23 65  e <winbase.h>.#e
0370: 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 44 65 6c 65  ndif../*.** Dele
0380: 74 65 20 74 68 65 20 6e 61 6d 65 64 20 66 69 6c  te the named fil
0390: 65 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f  e.*/.int sqliteO
03a0: 73 44 65 6c 65 74 65 28 63 6f 6e 73 74 20 63 68  sDelete(const ch
03b0: 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b 0a  ar *zFilename){.
03c0: 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 75 6e  #if OS_UNIX.  un
03d0: 6c 69 6e 6b 28 7a 46 69 6c 65 6e 61 6d 65 29 3b  link(zFilename);
03e0: 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53 5f 57  .#endif.#if OS_W
03f0: 49 4e 0a 20 20 44 65 6c 65 74 65 46 69 6c 65 28  IN.  DeleteFile(
0400: 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 23 65 6e 64  zFilename);.#end
0410: 69 66 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49  if.  return SQLI
0420: 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  TE_OK;.}../*.** 
0430: 52 65 74 75 72 6e 20 54 52 55 45 20 69 66 20 74  Return TRUE if t
0440: 68 65 20 6e 61 6d 65 64 20 66 69 6c 65 20 65 78  he named file ex
0450: 69 73 74 73 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c  ists..*/.int sql
0460: 69 74 65 4f 73 46 69 6c 65 45 78 69 73 74 73 28  iteOsFileExists(
0470: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c  const char *zFil
0480: 65 6e 61 6d 65 29 7b 0a 23 69 66 20 4f 53 5f 55  ename){.#if OS_U
0490: 4e 49 58 0a 20 20 72 65 74 75 72 6e 20 61 63 63  NIX.  return acc
04a0: 65 73 73 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 30  ess(zFilename, 0
04b0: 29 3d 3d 30 3b 0a 23 65 6e 64 69 66 0a 23 69 66  )==0;.#endif.#if
04c0: 20 4f 53 5f 57 49 4e 0a 20 20 48 41 4e 44 4c 45   OS_WIN.  HANDLE
04d0: 20 68 3b 0a 20 20 68 20 3d 20 43 72 65 61 74 65   h;.  h = Create
04e0: 46 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65 2c 0a  File(zFilename,.
04f0: 20 20 20 20 47 45 4e 45 52 49 43 5f 52 45 41 44      GENERIC_READ
0500: 2c 0a 20 20 20 20 30 2c 0a 20 20 20 20 4e 55 4c  ,.    0,.    NUL
0510: 4c 2c 0a 20 20 20 20 4f 50 45 4e 5f 45 58 49 53  L,.    OPEN_EXIS
0520: 54 49 4e 47 2c 0a 20 20 20 20 46 49 4c 45 5f 41  TING,.    FILE_A
0530: 54 54 52 49 42 55 54 45 5f 4e 4f 52 4d 41 4c 20  TTRIBUTE_NORMAL 
0540: 7c 20 46 49 4c 45 5f 46 4c 41 47 5f 52 41 4e 44  | FILE_FLAG_RAND
0550: 4f 4d 5f 41 43 43 45 53 53 2c 0a 20 20 20 20 4e  OM_ACCESS,.    N
0560: 55 4c 4c 0a 20 20 29 3b 0a 20 20 69 66 28 20 68  ULL.  );.  if( h
0570: 21 3d 49 4e 56 41 4c 49 44 5f 48 41 4e 44 4c 45  !=INVALID_HANDLE
0580: 5f 56 41 4c 55 45 20 29 7b 0a 20 20 20 20 43 6c  _VALUE ){.    Cl
0590: 6f 73 65 48 61 6e 64 6c 65 28 68 29 3b 0a 20 20  oseHandle(h);.  
05a0: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d 0a    return 1;.  }.
05b0: 20 20 72 65 74 75 72 6e 20 30 3b 0a 23 65 6e 64    return 0;.#end
05c0: 69 66 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 41 74 74  if.}.../*.** Att
05d0: 65 6d 70 74 20 74 6f 20 6f 70 65 6e 20 61 20 66  empt to open a f
05e0: 69 6c 65 20 66 6f 72 20 62 6f 74 68 20 72 65 61  ile for both rea
05f0: 64 69 6e 67 20 61 6e 64 20 77 72 69 74 69 6e 67  ding and writing
0600: 2e 20 20 49 66 20 74 68 61 74 0a 2a 2a 20 66 61  .  If that.** fa
0610: 69 6c 73 2c 20 74 72 79 20 6f 70 65 6e 69 6e 67  ils, try opening
0620: 20 69 74 20 72 65 61 64 2d 6f 6e 6c 79 2e 20 20   it read-only.  
0630: 49 66 20 74 68 65 20 66 69 6c 65 20 64 6f 65 73  If the file does
0640: 20 6e 6f 74 20 65 78 69 73 74 2c 0a 2a 2a 20 74   not exist,.** t
0650: 72 79 20 74 6f 20 63 72 65 61 74 65 20 69 74 2e  ry to create it.
0660: 0a 2a 2a 0a 2a 2a 20 4f 6e 20 73 75 63 63 65 73  .**.** On succes
0670: 73 2c 20 61 20 68 61 6e 64 6c 65 20 66 6f 72 20  s, a handle for 
0680: 74 68 65 20 6f 70 65 6e 20 66 69 6c 65 20 69 73  the open file is
0690: 20 77 72 69 74 74 65 6e 20 74 6f 20 2a 70 52 65   written to *pRe
06a0: 73 75 6c 74 0a 2a 2a 20 61 6e 64 20 2a 70 52 65  sult.** and *pRe
06b0: 61 64 6f 6e 6c 79 20 69 73 20 73 65 74 20 74 6f  adonly is set to
06c0: 20 30 20 69 66 20 74 68 65 20 66 69 6c 65 20 77   0 if the file w
06d0: 61 73 20 6f 70 65 6e 65 64 20 66 6f 72 20 72 65  as opened for re
06e0: 61 64 69 6e 67 20 61 6e 64 0a 2a 2a 20 77 72 69  ading and.** wri
06f0: 74 69 6e 67 20 6f 72 20 31 20 69 66 20 74 68 65  ting or 1 if the
0700: 20 66 69 6c 65 20 77 61 73 20 6f 70 65 6e 65 64   file was opened
0710: 20 72 65 61 64 2d 6f 6e 6c 79 2e 20 20 54 68 65   read-only.  The
0720: 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e   function return
0730: 73 0a 2a 2a 20 53 51 4c 49 54 45 5f 4f 4b 2e 0a  s.** SQLITE_OK..
0740: 2a 2a 0a 2a 2a 20 4f 6e 20 66 61 69 6c 75 72 65  **.** On failure
0750: 2c 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 72  , the function r
0760: 65 74 75 72 6e 73 20 53 51 4c 49 54 45 5f 43 41  eturns SQLITE_CA
0770: 4e 54 4f 50 45 4e 20 61 6e 64 20 6c 65 61 76 65  NTOPEN and leave
0780: 73 0a 2a 2a 20 2a 70 52 65 73 75 6c 73 74 20 61  s.** *pResulst a
0790: 6e 64 20 2a 70 52 65 61 64 6f 6e 6c 79 20 75 6e  nd *pReadonly un
07a0: 63 68 61 6e 67 65 64 2e 0a 2a 2f 0a 69 6e 74 20  changed..*/.int 
07b0: 73 71 6c 69 74 65 4f 73 4f 70 65 6e 52 65 61 64  sqliteOsOpenRead
07c0: 57 72 69 74 65 28 0a 20 20 63 6f 6e 73 74 20 63  Write(.  const c
07d0: 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 2c 0a  har *zFilename,.
07e0: 20 20 4f 73 46 69 6c 65 20 2a 70 52 65 73 75 6c    OsFile *pResul
07f0: 74 2c 0a 20 20 69 6e 74 20 2a 70 52 65 61 64 6f  t,.  int *pReado
0800: 6e 6c 79 0a 29 7b 0a 23 69 66 20 4f 53 5f 55 4e  nly.){.#if OS_UN
0810: 49 58 0a 20 20 69 6e 74 20 66 64 20 3d 20 6f 70  IX.  int fd = op
0820: 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f  en(zFilename, O_
0830: 52 44 57 52 7c 4f 5f 43 52 45 41 54 2c 20 30 36  RDWR|O_CREAT, 06
0840: 34 34 29 3b 0a 20 20 69 66 28 20 66 64 3c 30 20  44);.  if( fd<0 
0850: 29 7b 0a 20 20 20 20 66 64 20 3d 20 6f 70 65 6e  ){.    fd = open
0860: 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44  (zFilename, O_RD
0870: 4f 4e 4c 59 29 3b 0a 20 20 20 20 69 66 28 20 66  ONLY);.    if( f
0880: 64 3c 30 20 29 7b 0a 20 20 20 20 20 20 72 65 74  d<0 ){.      ret
0890: 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e 54 4f  urn SQLITE_CANTO
08a0: 50 45 4e 3b 20 0a 20 20 20 20 7d 0a 20 20 20 20  PEN; .    }.    
08b0: 2a 70 52 65 61 64 6f 6e 6c 79 20 3d 20 31 3b 0a  *pReadonly = 1;.
08c0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 2a 70 52    }else{.    *pR
08d0: 65 61 64 6f 6e 6c 79 20 3d 20 30 3b 0a 20 20 7d  eadonly = 0;.  }
08e0: 0a 20 20 2a 70 52 65 73 75 6c 74 20 3d 20 66 64  .  *pResult = fd
08f0: 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  ;.  return SQLIT
0900: 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 23 69 66  E_OK;.#endif.#if
0910: 20 4f 53 5f 57 49 4e 0a 20 20 48 41 4e 44 4c 45   OS_WIN.  HANDLE
0920: 20 68 20 3d 20 43 72 65 61 74 65 46 69 6c 65 28   h = CreateFile(
0930: 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20 20 20 20 20  zFilename,.     
0940: 47 45 4e 45 52 49 43 5f 52 45 41 44 20 7c 20 47  GENERIC_READ | G
0950: 45 4e 45 52 49 43 5f 57 52 49 54 45 2c 0a 20 20  ENERIC_WRITE,.  
0960: 20 20 20 46 49 4c 45 5f 53 48 41 52 45 5f 52 45     FILE_SHARE_RE
0970: 41 44 20 7c 20 46 49 4c 45 5f 53 48 41 52 45 5f  AD | FILE_SHARE_
0980: 57 52 49 54 45 2c 0a 20 20 20 20 20 4e 55 4c 4c  WRITE,.     NULL
0990: 2c 0a 20 20 20 20 20 4f 50 45 4e 5f 41 4c 57 41  ,.     OPEN_ALWA
09a0: 59 53 2c 0a 20 20 20 20 20 46 49 4c 45 5f 41 54  YS,.     FILE_AT
09b0: 54 52 49 42 55 54 45 5f 4e 4f 52 4d 41 4c 20 7c  TRIBUTE_NORMAL |
09c0: 20 46 49 4c 45 5f 46 4c 41 47 5f 52 41 4e 44 4f   FILE_FLAG_RANDO
09d0: 4d 5f 41 43 43 45 53 53 2c 0a 20 20 20 20 20 4e  M_ACCESS,.     N
09e0: 55 4c 4c 0a 20 20 29 3b 0a 20 20 69 66 28 20 68  ULL.  );.  if( h
09f0: 3d 3d 49 4e 56 41 4c 49 44 5f 48 41 4e 44 4c 45  ==INVALID_HANDLE
0a00: 5f 56 41 4c 55 45 20 29 7b 0a 20 20 20 20 48 41  _VALUE ){.    HA
0a10: 4e 44 4c 45 20 68 20 3d 20 43 72 65 61 74 65 46  NDLE h = CreateF
0a20: 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20  ile(zFilename,. 
0a30: 20 20 20 20 20 20 47 45 4e 45 52 49 43 5f 52 45        GENERIC_RE
0a40: 41 44 2c 0a 20 20 20 20 20 20 20 46 49 4c 45 5f  AD,.       FILE_
0a50: 53 48 41 52 45 5f 52 45 41 44 2c 0a 20 20 20 20  SHARE_READ,.    
0a60: 20 20 20 4e 55 4c 4c 2c 0a 20 20 20 20 20 20 20     NULL,.       
0a70: 4f 50 45 4e 5f 41 4c 57 41 59 53 2c 0a 20 20 20  OPEN_ALWAYS,.   
0a80: 20 20 20 20 46 49 4c 45 5f 41 54 54 52 49 42 55      FILE_ATTRIBU
0a90: 54 45 5f 4e 4f 52 4d 41 4c 20 7c 20 46 49 4c 45  TE_NORMAL | FILE
0aa0: 5f 46 4c 41 47 5f 52 41 4e 44 4f 4d 5f 41 43 43  _FLAG_RANDOM_ACC
0ab0: 45 53 53 2c 0a 20 20 20 20 20 20 20 4e 55 4c 4c  ESS,.       NULL
0ac0: 0a 20 20 20 20 29 3b 0a 20 20 20 20 69 66 28 20  .    );.    if( 
0ad0: 68 3d 3d 49 4e 56 41 4c 49 44 5f 48 41 4e 44 4c  h==INVALID_HANDL
0ae0: 45 5f 56 41 4c 55 45 20 29 7b 0a 20 20 20 20 20  E_VALUE ){.     
0af0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43   return SQLITE_C
0b00: 41 4e 54 4f 50 45 4e 3b 0a 20 20 20 20 7d 0a 20  ANTOPEN;.    }. 
0b10: 20 20 20 2a 70 52 65 61 64 6f 6e 6c 79 20 3d 20     *pReadonly = 
0b20: 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  1;.  }else{.    
0b30: 2a 70 52 65 61 64 6f 6e 6c 79 20 3d 20 30 3b 0a  *pReadonly = 0;.
0b40: 20 20 7d 0a 20 20 2a 70 52 65 73 75 6c 74 20 3d    }.  *pResult =
0b50: 20 68 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c   h;.  return SQL
0b60: 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d  ITE_OK;.#endif.}
0b70: 0a 0a 0a 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74  .../*.** Attempt
0b80: 20 74 6f 20 6f 70 65 6e 20 61 20 6e 65 77 20 66   to open a new f
0b90: 69 6c 65 20 66 6f 72 20 65 78 63 6c 75 73 69 76  ile for exclusiv
0ba0: 65 20 61 63 63 65 73 73 20 62 79 20 74 68 69 73  e access by this
0bb0: 20 70 72 6f 63 65 73 73 2e 0a 2a 2a 20 54 68 65   process..** The
0bc0: 20 66 69 6c 65 20 77 69 6c 6c 20 62 65 20 6f 70   file will be op
0bd0: 65 6e 65 64 20 66 6f 72 20 62 6f 74 68 20 72 65  ened for both re
0be0: 61 64 69 6e 67 20 61 6e 64 20 77 72 69 74 69 6e  ading and writin
0bf0: 67 2e 20 20 54 6f 20 61 76 6f 69 64 0a 2a 2a 20  g.  To avoid.** 
0c00: 61 20 70 6f 74 65 6e 74 69 61 6c 20 73 65 63 75  a potential secu
0c10: 72 69 74 79 20 70 72 6f 62 6c 65 6d 2c 20 77 65  rity problem, we
0c20: 20 64 6f 20 6e 6f 74 20 61 6c 6c 6f 77 20 74 68   do not allow th
0c30: 65 20 66 69 6c 65 20 74 6f 20 68 61 76 65 0a 2a  e file to have.*
0c40: 2a 20 70 72 65 76 69 6f 75 73 6c 79 20 65 78 69  * previously exi
0c50: 73 74 65 64 2e 20 20 4e 6f 72 20 64 6f 20 77 65  sted.  Nor do we
0c60: 20 61 6c 6c 6f 77 20 74 68 65 20 66 69 6c 65 20   allow the file 
0c70: 74 6f 20 62 65 20 61 20 73 79 6d 62 6f 6c 69 63  to be a symbolic
0c80: 0a 2a 2a 20 6c 69 6e 6b 2e 0a 2a 2a 0a 2a 2a 20  .** link..**.** 
0c90: 4f 6e 20 73 75 63 63 65 73 73 2c 20 77 72 69 74  On success, writ
0ca0: 65 20 74 68 65 20 66 69 6c 65 20 68 61 6e 64 6c  e the file handl
0cb0: 65 20 69 6e 74 6f 20 2a 70 52 65 73 75 6c 74 20  e into *pResult 
0cc0: 61 6e 64 20 72 65 74 75 72 6e 20 53 51 4c 49 54  and return SQLIT
0cd0: 45 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66  E_OK..**.** On f
0ce0: 61 69 6c 75 72 65 2c 20 72 65 74 75 72 6e 20 53  ailure, return S
0cf0: 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 2e 0a  QLITE_CANTOPEN..
0d00: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 4f  */.int sqliteOsO
0d10: 70 65 6e 45 78 63 6c 75 73 69 76 65 28 63 6f 6e  penExclusive(con
0d20: 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61  st char *zFilena
0d30: 6d 65 2c 20 4f 73 46 69 6c 65 20 2a 70 52 65 73  me, OsFile *pRes
0d40: 75 6c 74 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49  ult){.#if OS_UNI
0d50: 58 0a 20 20 69 6e 74 20 66 64 3b 0a 20 20 69 66  X.  int fd;.  if
0d60: 28 20 61 63 63 65 73 73 28 7a 46 69 6c 65 6e 61  ( access(zFilena
0d70: 6d 65 2c 20 30 29 3d 3d 30 20 29 7b 0a 20 20 20  me, 0)==0 ){.   
0d80: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43   return SQLITE_C
0d90: 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a 23 69 66  ANTOPEN;.  }.#if
0da0: 6e 64 65 66 20 4f 5f 4e 4f 46 4f 4c 4c 4f 57 0a  ndef O_NOFOLLOW.
0db0: 23 20 64 65 66 69 6e 65 20 4f 5f 4e 4f 46 4f 4c  # define O_NOFOL
0dc0: 4c 4f 57 20 30 0a 23 65 6e 64 69 66 0a 20 20 66  LOW 0.#endif.  f
0dd0: 64 20 3d 20 6f 70 65 6e 28 7a 46 69 6c 65 6e 61  d = open(zFilena
0de0: 6d 65 2c 20 4f 5f 52 44 57 52 7c 4f 5f 43 52 45  me, O_RDWR|O_CRE
0df0: 41 54 7c 4f 5f 45 58 43 4c 7c 4f 5f 4e 4f 46 4f  AT|O_EXCL|O_NOFO
0e00: 4c 4c 4f 57 2c 20 30 36 30 30 29 3b 0a 20 20 69  LLOW, 0600);.  i
0e10: 66 28 20 66 64 3c 30 20 29 7b 0a 20 20 20 20 72  f( fd<0 ){.    r
0e20: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 43 41 4e  eturn SQLITE_CAN
0e30: 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20 20 2a 70 52  TOPEN;.  }.  *pR
0e40: 65 73 75 6c 74 20 3d 20 66 64 3b 0a 20 20 72 65  esult = fd;.  re
0e50: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  turn SQLITE_OK;.
0e60: 23 65 6e 64 69 66 0a 23 69 66 20 4f 53 5f 57 49  #endif.#if OS_WI
0e70: 4e 0a 20 20 48 41 4e 44 4c 45 20 68 20 3d 20 43  N.  HANDLE h = C
0e80: 72 65 61 74 65 46 69 6c 65 28 7a 46 69 6c 65 6e  reateFile(zFilen
0e90: 61 6d 65 2c 0a 20 20 20 20 20 47 45 4e 45 52 49  ame,.     GENERI
0ea0: 43 5f 52 45 41 44 20 7c 20 47 45 4e 45 52 49 43  C_READ | GENERIC
0eb0: 5f 57 52 49 54 45 2c 0a 20 20 20 20 20 30 2c 0a  _WRITE,.     0,.
0ec0: 20 20 20 20 20 4e 55 4c 4c 2c 0a 20 20 20 20 20       NULL,.     
0ed0: 43 52 45 41 54 45 5f 41 4c 57 41 59 53 2c 0a 20  CREATE_ALWAYS,. 
0ee0: 20 20 20 20 46 49 4c 45 5f 41 54 54 52 49 42 55      FILE_ATTRIBU
0ef0: 54 45 5f 4e 4f 52 4d 41 4c 20 7c 20 46 49 4c 45  TE_NORMAL | FILE
0f00: 5f 46 4c 41 47 5f 52 41 4e 44 4f 4d 5f 41 43 43  _FLAG_RANDOM_ACC
0f10: 45 53 53 2c 0a 20 20 20 20 20 4e 55 4c 4c 0a 20  ESS,.     NULL. 
0f20: 20 29 3b 0a 20 20 69 66 28 20 68 3d 3d 49 4e 56   );.  if( h==INV
0f30: 41 4c 49 44 5f 48 41 4e 44 4c 45 5f 56 41 4c 55  ALID_HANDLE_VALU
0f40: 45 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20  E ){.    return 
0f50: 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b  SQLITE_CANTOPEN;
0f60: 0a 20 20 7d 0a 20 20 2a 70 52 65 73 75 6c 74 20  .  }.  *pResult 
0f70: 3d 20 68 3b 0a 20 20 72 65 74 75 72 6e 20 53 51  = h;.  return SQ
0f80: 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a  LITE_OK;.#endif.
0f90: 7d 0a 0a 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74  }../*.** Attempt
0fa0: 20 74 6f 20 6f 70 65 6e 20 61 20 6e 65 77 20 66   to open a new f
0fb0: 69 6c 65 20 66 6f 72 20 72 65 61 64 2d 6f 6e 6c  ile for read-onl
0fc0: 79 20 61 63 63 65 73 73 2e 0a 2a 2a 0a 2a 2a 20  y access..**.** 
0fd0: 4f 6e 20 73 75 63 63 65 73 73 2c 20 77 72 69 74  On success, writ
0fe0: 65 20 74 68 65 20 66 69 6c 65 20 68 61 6e 64 6c  e the file handl
0ff0: 65 20 69 6e 74 6f 20 2a 70 52 65 73 75 6c 74 20  e into *pResult 
1000: 61 6e 64 20 72 65 74 75 72 6e 20 53 51 4c 49 54  and return SQLIT
1010: 45 5f 4f 4b 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 20 66  E_OK..**.** On f
1020: 61 69 6c 75 72 65 2c 20 72 65 74 75 72 6e 20 53  ailure, return S
1030: 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 2e 0a  QLITE_CANTOPEN..
1040: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 4f  */.int sqliteOsO
1050: 70 65 6e 52 65 61 64 4f 6e 6c 79 28 63 6f 6e 73  penReadOnly(cons
1060: 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d  t char *zFilenam
1070: 65 2c 20 4f 73 46 69 6c 65 20 2a 70 52 65 73 75  e, OsFile *pResu
1080: 6c 74 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58  lt){.#if OS_UNIX
1090: 0a 20 20 69 6e 74 20 66 64 20 3d 20 6f 70 65 6e  .  int fd = open
10a0: 28 7a 46 69 6c 65 6e 61 6d 65 2c 20 4f 5f 52 44  (zFilename, O_RD
10b0: 4f 4e 4c 59 29 3b 0a 20 20 69 66 28 20 66 64 3c  ONLY);.  if( fd<
10c0: 30 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20  0 ){.    return 
10d0: 53 51 4c 49 54 45 5f 43 41 4e 54 4f 50 45 4e 3b  SQLITE_CANTOPEN;
10e0: 0a 20 20 7d 0a 20 20 2a 70 52 65 73 75 6c 74 20  .  }.  *pResult 
10f0: 3d 20 66 64 3b 0a 20 20 72 65 74 75 72 6e 20 53  = fd;.  return S
1100: 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66  QLITE_OK;.#endif
1110: 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 48 41  .#if OS_WIN.  HA
1120: 4e 44 4c 45 20 68 20 3d 20 43 72 65 61 74 65 46  NDLE h = CreateF
1130: 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65 2c 0a 20  ile(zFilename,. 
1140: 20 20 20 20 47 45 4e 45 52 49 43 5f 52 45 41 44      GENERIC_READ
1150: 2c 0a 20 20 20 20 20 30 2c 0a 20 20 20 20 20 4e  ,.     0,.     N
1160: 55 4c 4c 2c 0a 20 20 20 20 20 4f 50 45 4e 5f 45  ULL,.     OPEN_E
1170: 58 49 53 54 49 4e 47 2c 0a 20 20 20 20 20 46 49  XISTING,.     FI
1180: 4c 45 5f 41 54 54 52 49 42 55 54 45 5f 4e 4f 52  LE_ATTRIBUTE_NOR
1190: 4d 41 4c 20 7c 20 46 49 4c 45 5f 46 4c 41 47 5f  MAL | FILE_FLAG_
11a0: 52 41 4e 44 4f 4d 5f 41 43 43 45 53 53 2c 0a 20  RANDOM_ACCESS,. 
11b0: 20 20 20 20 4e 55 4c 4c 0a 20 20 29 3b 0a 20 20      NULL.  );.  
11c0: 69 66 28 20 68 3d 3d 49 4e 56 41 4c 49 44 5f 48  if( h==INVALID_H
11d0: 41 4e 44 4c 45 5f 56 41 4c 55 45 20 29 7b 0a 20  ANDLE_VALUE ){. 
11e0: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45     return SQLITE
11f0: 5f 43 41 4e 54 4f 50 45 4e 3b 0a 20 20 7d 0a 20  _CANTOPEN;.  }. 
1200: 20 2a 70 52 65 73 75 6c 74 20 3d 20 68 3b 0a 20   *pResult = h;. 
1210: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f   return SQLITE_O
1220: 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a  K;.#endif.}../*.
1230: 2a 2a 20 43 72 65 61 74 65 20 61 20 74 65 6d 70  ** Create a temp
1240: 6f 72 61 72 79 20 66 69 6c 65 20 6e 61 6d 65 20  orary file name 
1250: 69 6e 20 7a 42 75 66 2e 20 20 7a 42 75 66 20 6d  in zBuf.  zBuf m
1260: 75 73 74 20 62 65 20 62 69 67 20 65 6e 6f 75 67  ust be big enoug
1270: 68 20 74 6f 0a 2a 2a 20 68 6f 6c 64 20 61 74 20  h to.** hold at 
1280: 6c 65 61 73 74 20 53 51 4c 49 54 45 5f 54 45 4d  least SQLITE_TEM
1290: 50 4e 41 4d 45 5f 53 49 5a 45 20 63 68 61 72 61  PNAME_SIZE chara
12a0: 63 74 65 72 73 2e 0a 2a 2f 0a 69 6e 74 20 73 71  cters..*/.int sq
12b0: 6c 69 74 65 4f 73 54 65 6d 70 46 69 6c 65 4e 61  liteOsTempFileNa
12c0: 6d 65 28 63 68 61 72 20 2a 7a 42 75 66 29 7b 0a  me(char *zBuf){.
12d0: 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 73 74  #if OS_UNIX.  st
12e0: 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20  atic const char 
12f0: 2a 61 7a 44 69 72 73 5b 5d 20 3d 20 7b 0a 20 20  *azDirs[] = {.  
1300: 20 20 20 22 2e 22 2c 0a 20 20 20 20 20 22 2f 76     ".",.     "/v
1310: 61 72 2f 74 6d 70 22 2c 0a 20 20 20 20 20 22 2f  ar/tmp",.     "/
1320: 75 73 72 2f 74 6d 70 22 2c 0a 20 20 20 20 20 22  usr/tmp",.     "
1330: 2f 74 6d 70 22 2c 0a 20 20 7d 3b 0a 20 20 73 74  /tmp",.  };.  st
1340: 61 74 69 63 20 63 68 61 72 20 7a 43 68 61 72 73  atic char zChars
1350: 5b 5d 20 3d 0a 20 20 20 20 22 61 62 63 64 65 66  [] =.    "abcdef
1360: 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74 75 76  ghijklmnopqrstuv
1370: 77 78 79 7a 22 0a 20 20 20 20 22 41 42 43 44 45  wxyz".    "ABCDE
1380: 46 47 48 49 4a 4b 4c 4d 4e 4f 50 51 52 53 54 55  FGHIJKLMNOPQRSTU
1390: 56 57 58 59 5a 22 0a 20 20 20 20 22 30 31 32 33  VWXYZ".    "0123
13a0: 34 35 36 37 38 39 22 3b 0a 20 20 69 6e 74 20 69  456789";.  int i
13b0: 2c 20 6a 3b 0a 20 20 73 74 72 75 63 74 20 73 74  , j;.  struct st
13c0: 61 74 20 62 75 66 3b 0a 20 20 63 6f 6e 73 74 20  at buf;.  const 
13d0: 63 68 61 72 20 2a 7a 44 69 72 20 3d 20 22 2e 22  char *zDir = "."
13e0: 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 73  ;.  for(i=0; i<s
13f0: 69 7a 65 6f 66 28 61 7a 44 69 72 73 29 2f 73 69  izeof(azDirs)/si
1400: 7a 65 6f 66 28 61 7a 44 69 72 73 5b 30 5d 29 3b  zeof(azDirs[0]);
1410: 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 73   i++){.    if( s
1420: 74 61 74 28 61 7a 44 69 72 73 5b 69 5d 2c 20 26  tat(azDirs[i], &
1430: 62 75 66 29 20 29 20 63 6f 6e 74 69 6e 75 65 3b  buf) ) continue;
1440: 0a 20 20 20 20 69 66 28 20 21 53 5f 49 53 44 49  .    if( !S_ISDI
1450: 52 28 62 75 66 2e 73 74 5f 6d 6f 64 65 29 20 29  R(buf.st_mode) )
1460: 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 69   continue;.    i
1470: 66 28 20 61 63 63 65 73 73 28 61 7a 44 69 72 73  f( access(azDirs
1480: 5b 69 5d 2c 20 30 37 29 20 29 20 63 6f 6e 74 69  [i], 07) ) conti
1490: 6e 75 65 3b 0a 20 20 20 20 7a 44 69 72 20 3d 20  nue;.    zDir = 
14a0: 61 7a 44 69 72 73 5b 69 5d 3b 0a 20 20 20 20 62  azDirs[i];.    b
14b0: 72 65 61 6b 3b 0a 20 20 7d 0a 20 20 64 6f 7b 0a  reak;.  }.  do{.
14c0: 20 20 20 20 73 70 72 69 6e 74 66 28 7a 42 75 66      sprintf(zBuf
14d0: 2c 20 22 25 73 2f 73 71 6c 69 74 65 5f 22 2c 20  , "%s/sqlite_", 
14e0: 7a 44 69 72 29 3b 0a 20 20 20 20 6a 20 3d 20 73  zDir);.    j = s
14f0: 74 72 6c 65 6e 28 7a 42 75 66 29 3b 0a 20 20 20  trlen(zBuf);.   
1500: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 31 35 3b 20   for(i=0; i<15; 
1510: 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 6e 74 20  i++){.      int 
1520: 6e 20 3d 20 73 71 6c 69 74 65 52 61 6e 64 6f 6d  n = sqliteRandom
1530: 42 79 74 65 28 29 20 25 20 73 69 7a 65 6f 66 28  Byte() % sizeof(
1540: 7a 43 68 61 72 73 29 3b 0a 20 20 20 20 20 20 7a  zChars);.      z
1550: 42 75 66 5b 6a 2b 2b 5d 20 3d 20 7a 43 68 61 72  Buf[j++] = zChar
1560: 73 5b 6e 5d 3b 0a 20 20 20 20 7d 0a 20 20 20 20  s[n];.    }.    
1570: 7a 42 75 66 5b 6a 5d 20 3d 20 30 3b 0a 20 20 7d  zBuf[j] = 0;.  }
1580: 77 68 69 6c 65 28 20 61 63 63 65 73 73 28 7a 42  while( access(zB
1590: 75 66 2c 30 29 3d 3d 30 20 29 3b 0a 23 65 6e 64  uf,0)==0 );.#end
15a0: 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20  if.#if OS_WIN.  
15b0: 73 74 61 74 69 63 20 63 68 61 72 20 7a 43 68 61  static char zCha
15c0: 72 73 5b 5d 20 3d 0a 20 20 20 20 22 61 62 63 64  rs[] =.    "abcd
15d0: 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74  efghijklmnopqrst
15e0: 75 76 77 78 79 7a 22 0a 20 20 20 20 22 41 42 43  uvwxyz".    "ABC
15f0: 44 45 46 47 48 49 4a 4b 4c 4d 4e 4f 50 51 52 53  DEFGHIJKLMNOPQRS
1600: 54 55 56 57 58 59 5a 22 0a 20 20 20 20 22 30 31  TUVWXYZ".    "01
1610: 32 33 34 35 36 37 38 39 22 3b 0a 20 20 69 6e 74  23456789";.  int
1620: 20 69 2c 20 6a 3b 0a 20 20 63 68 61 72 20 7a 54   i, j;.  char zT
1630: 65 6d 70 50 61 74 68 5b 53 51 4c 49 54 45 5f 54  empPath[SQLITE_T
1640: 45 4d 50 4e 41 4d 45 5f 53 49 5a 45 5d 3b 0a 20  EMPNAME_SIZE];. 
1650: 20 47 65 74 54 65 6d 70 50 61 74 68 28 53 51 4c   GetTempPath(SQL
1660: 49 54 45 5f 54 45 4d 50 4e 41 4d 45 5f 53 49 5a  ITE_TEMPNAME_SIZ
1670: 45 2d 33 30 2c 20 7a 54 65 6d 70 50 61 74 68 29  E-30, zTempPath)
1680: 3b 0a 20 20 66 6f 72 28 3b 3b 29 7b 0a 20 20 20  ;.  for(;;){.   
1690: 20 73 70 72 69 6e 74 66 28 7a 42 75 66 2c 20 22   sprintf(zBuf, "
16a0: 25 73 2f 73 71 6c 69 74 65 5f 22 2c 20 7a 54 65  %s/sqlite_", zTe
16b0: 6d 70 50 61 74 68 29 3b 0a 20 20 20 20 6a 20 3d  mpPath);.    j =
16c0: 20 73 74 72 6c 65 6e 28 7a 42 75 66 29 3b 0a 20   strlen(zBuf);. 
16d0: 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 31 35     for(i=0; i<15
16e0: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 6e  ; i++){.      in
16f0: 74 20 6e 20 3d 20 73 71 6c 69 74 65 52 61 6e 64  t n = sqliteRand
1700: 6f 6d 42 79 74 65 28 29 20 25 20 73 69 7a 65 6f  omByte() % sizeo
1710: 66 28 7a 43 68 61 72 73 29 3b 0a 20 20 20 20 20  f(zChars);.     
1720: 20 7a 42 75 66 5b 6a 2b 2b 5d 20 3d 20 7a 43 68   zBuf[j++] = zCh
1730: 61 72 73 5b 6e 5d 3b 0a 20 20 20 20 7d 0a 20 20  ars[n];.    }.  
1740: 20 20 7a 42 75 66 5b 6a 5d 20 3d 20 30 3b 0a 20    zBuf[j] = 0;. 
1750: 20 20 20 69 66 28 20 21 73 71 6c 69 74 65 4f 73     if( !sqliteOs
1760: 46 69 6c 65 45 78 69 73 74 73 28 7a 42 75 66 29  FileExists(zBuf)
1770: 20 29 20 62 72 65 61 6b 3b 0a 20 20 7d 0a 23 65   ) break;.  }.#e
1780: 6e 64 69 66 0a 20 20 72 65 74 75 72 6e 20 53 51  ndif.  return SQ
1790: 4c 49 54 45 5f 4f 4b 3b 20 0a 7d 0a 0a 2f 2a 0a  LITE_OK; .}../*.
17a0: 2a 2a 20 43 6c 6f 73 65 20 61 20 66 69 6c 65 0a  ** Close a file.
17b0: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 43  */.int sqliteOsC
17c0: 6c 6f 73 65 28 4f 73 46 69 6c 65 20 69 64 29 7b  lose(OsFile id){
17d0: 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 63  .#if OS_UNIX.  c
17e0: 6c 6f 73 65 28 69 64 29 3b 0a 20 20 72 65 74 75  lose(id);.  retu
17f0: 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65  rn SQLITE_OK;.#e
1800: 6e 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a  ndif.#if OS_WIN.
1810: 20 20 43 6c 6f 73 65 48 61 6e 64 6c 65 28 69 64    CloseHandle(id
1820: 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49  );.  return SQLI
1830: 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a  TE_OK;.#endif.}.
1840: 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 64 61 74 61  ./*.** Read data
1850: 20 66 72 6f 6d 20 61 20 66 69 6c 65 20 69 6e 74   from a file int
1860: 6f 20 61 20 62 75 66 66 65 72 2e 20 20 52 65 74  o a buffer.  Ret
1870: 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 72 20 6f  urn the number o
1880: 66 0a 2a 2a 20 62 79 74 65 73 20 61 63 74 75 61  f.** bytes actua
1890: 6c 6c 79 20 72 65 61 64 2e 0a 2a 2f 0a 69 6e 74  lly read..*/.int
18a0: 20 73 71 6c 69 74 65 4f 73 52 65 61 64 28 4f 73   sqliteOsRead(Os
18b0: 46 69 6c 65 20 69 64 2c 20 76 6f 69 64 20 2a 70  File id, void *p
18c0: 42 75 66 2c 20 69 6e 74 20 61 6d 74 29 7b 0a 23  Buf, int amt){.#
18d0: 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 69 6e 74  if OS_UNIX.  int
18e0: 20 67 6f 74 3b 0a 20 20 67 6f 74 20 3d 20 72 65   got;.  got = re
18f0: 61 64 28 69 64 2c 20 70 42 75 66 2c 20 61 6d 74  ad(id, pBuf, amt
1900: 29 3b 0a 20 20 69 66 28 20 67 6f 74 3c 30 20 29  );.  if( got<0 )
1910: 20 67 6f 74 20 3d 20 30 3b 0a 20 20 72 65 74 75   got = 0;.  retu
1920: 72 6e 20 67 6f 74 3d 3d 61 6d 74 20 3f 20 53 51  rn got==amt ? SQ
1930: 4c 49 54 45 5f 4f 4b 20 3a 20 53 51 4c 49 54 45  LITE_OK : SQLITE
1940: 5f 49 4f 45 52 52 3b 0a 23 65 6e 64 69 66 0a 23  _IOERR;.#endif.#
1950: 69 66 20 4f 53 5f 57 49 4e 0a 20 20 44 57 4f 52  if OS_WIN.  DWOR
1960: 44 20 67 6f 74 3b 0a 20 20 69 66 28 20 21 52 65  D got;.  if( !Re
1970: 61 64 46 69 6c 65 28 69 64 2c 20 70 42 75 66 2c  adFile(id, pBuf,
1980: 20 61 6d 74 2c 20 26 67 6f 74 2c 20 30 29 20 29   amt, &got, 0) )
1990: 7b 0a 20 20 20 20 67 6f 74 20 3d 20 30 3b 0a 20  {.    got = 0;. 
19a0: 20 7d 0a 20 20 72 65 74 75 72 6e 20 67 6f 74 3d   }.  return got=
19b0: 3d 61 6d 74 20 3f 20 53 51 4c 49 54 45 5f 4f 4b  =amt ? SQLITE_OK
19c0: 20 3a 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b   : SQLITE_IOERR;
19d0: 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a  .#endif.}../*.**
19e0: 20 57 72 69 74 65 20 64 61 74 61 20 66 72 6f 6d   Write data from
19f0: 20 61 20 62 75 66 66 65 72 20 69 6e 74 6f 20 61   a buffer into a
1a00: 20 66 69 6c 65 2e 20 20 52 65 74 75 72 6e 20 53   file.  Return S
1a10: 51 4c 49 54 45 5f 4f 4b 20 6f 6e 20 73 75 63 63  QLITE_OK on succ
1a20: 65 73 73 0a 2a 2a 20 6f 72 20 73 6f 6d 65 20 6f  ess.** or some o
1a30: 74 68 65 72 20 65 72 72 6f 72 20 63 6f 64 65 20  ther error code 
1a40: 6f 6e 20 66 61 69 6c 75 72 65 2e 0a 2a 2f 0a 69  on failure..*/.i
1a50: 6e 74 20 73 71 6c 69 74 65 4f 73 57 72 69 74 65  nt sqliteOsWrite
1a60: 28 4f 73 46 69 6c 65 20 69 64 2c 20 63 6f 6e 73  (OsFile id, cons
1a70: 74 20 76 6f 69 64 20 2a 70 42 75 66 2c 20 69 6e  t void *pBuf, in
1a80: 74 20 61 6d 74 29 7b 0a 23 69 66 20 4f 53 5f 55  t amt){.#if OS_U
1a90: 4e 49 58 0a 20 20 69 6e 74 20 77 72 6f 74 65 3b  NIX.  int wrote;
1aa0: 0a 20 20 77 72 6f 74 65 20 3d 20 77 72 69 74 65  .  wrote = write
1ab0: 28 69 64 2c 20 70 42 75 66 2c 20 61 6d 74 29 3b  (id, pBuf, amt);
1ac0: 0a 20 20 69 66 28 20 77 72 6f 74 65 3c 61 6d 74  .  if( wrote<amt
1ad0: 20 29 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45   ) return SQLITE
1ae0: 5f 46 55 4c 4c 3b 0a 20 20 72 65 74 75 72 6e 20  _FULL;.  return 
1af0: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69  SQLITE_OK;.#endi
1b00: 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 44  f.#if OS_WIN.  D
1b10: 57 4f 52 44 20 77 72 6f 74 65 3b 0a 20 20 69 66  WORD wrote;.  if
1b20: 28 20 21 57 72 69 74 65 46 69 6c 65 28 69 64 2c  ( !WriteFile(id,
1b30: 20 70 42 75 66 2c 20 61 6d 74 2c 20 26 77 72 6f   pBuf, amt, &wro
1b40: 74 65 2c 20 30 29 20 7c 7c 20 77 72 6f 74 65 3c  te, 0) || wrote<
1b50: 61 6d 74 20 29 7b 0a 20 20 20 20 72 65 74 75 72  amt ){.    retur
1b60: 6e 20 53 51 4c 49 54 45 5f 46 55 4c 4c 3b 0a 20  n SQLITE_FULL;. 
1b70: 20 7d 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49   }.  return SQLI
1b80: 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a  TE_OK;.#endif.}.
1b90: 0a 2f 2a 0a 2a 2a 20 4d 6f 76 65 20 74 68 65 20  ./*.** Move the 
1ba0: 72 65 61 64 2f 77 72 69 74 65 20 70 6f 69 6e 74  read/write point
1bb0: 65 72 20 69 6e 20 61 20 66 69 6c 65 2e 0a 2a 2f  er in a file..*/
1bc0: 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73 53 65 65  .int sqliteOsSee
1bd0: 6b 28 4f 73 46 69 6c 65 20 69 64 2c 20 69 6e 74  k(OsFile id, int
1be0: 20 6f 66 66 73 65 74 29 7b 0a 23 69 66 20 4f 53   offset){.#if OS
1bf0: 5f 55 4e 49 58 0a 20 20 6c 73 65 65 6b 28 69 64  _UNIX.  lseek(id
1c00: 2c 20 6f 66 66 73 65 74 2c 20 53 45 45 4b 5f 53  , offset, SEEK_S
1c10: 45 54 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51  ET);.  return SQ
1c20: 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a  LITE_OK;.#endif.
1c30: 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 53 65 74  #if OS_WIN.  Set
1c40: 46 69 6c 65 50 6f 69 6e 74 65 72 28 69 64 2c 20  FilePointer(id, 
1c50: 6f 66 66 73 65 74 2c 20 30 2c 20 46 49 4c 45 5f  offset, 0, FILE_
1c60: 42 45 47 49 4e 29 3b 0a 20 20 72 65 74 75 72 6e  BEGIN);.  return
1c70: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64   SQLITE_OK;.#end
1c80: 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4d 61 6b 65  if.}../*.** Make
1c90: 20 73 75 72 65 20 61 6c 6c 20 77 72 69 74 65 73   sure all writes
1ca0: 20 74 6f 20 61 20 70 61 72 74 69 63 75 6c 61 72   to a particular
1cb0: 20 66 69 6c 65 20 61 72 65 20 63 6f 6d 6d 69 74   file are commit
1cc0: 74 65 64 20 74 6f 20 64 69 73 6b 2e 0a 2a 2f 0a  ted to disk..*/.
1cd0: 69 6e 74 20 73 71 6c 69 74 65 4f 73 53 79 6e 63  int sqliteOsSync
1ce0: 28 4f 73 46 69 6c 65 20 69 64 29 7b 0a 23 69 66  (OsFile id){.#if
1cf0: 20 4f 53 5f 55 4e 49 58 0a 20 20 72 65 74 75 72   OS_UNIX.  retur
1d00: 6e 20 66 73 79 6e 63 28 69 64 29 3d 3d 30 20 3f  n fsync(id)==0 ?
1d10: 20 53 51 4c 49 54 45 5f 4f 4b 20 3a 20 53 51 4c   SQLITE_OK : SQL
1d20: 49 54 45 5f 49 4f 45 52 52 3b 0a 23 65 6e 64 69  ITE_IOERR;.#endi
1d30: 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 72  f.#if OS_WIN.  r
1d40: 65 74 75 72 6e 20 46 6c 75 73 68 46 69 6c 65 42  eturn FlushFileB
1d50: 75 66 66 65 72 73 28 69 64 29 20 3f 20 53 51 4c  uffers(id) ? SQL
1d60: 49 54 45 5f 4f 4b 20 3a 20 53 51 4c 49 54 45 5f  ITE_OK : SQLITE_
1d70: 49 4f 45 52 52 3b 0a 23 65 6e 64 69 66 0a 7d 0a  IOERR;.#endif.}.
1d80: 0a 2f 2a 0a 2a 2a 20 54 72 75 6e 63 61 74 65 20  ./*.** Truncate 
1d90: 61 6e 20 6f 70 65 6e 20 66 69 6c 65 20 74 6f 20  an open file to 
1da0: 61 20 73 70 65 63 69 66 69 65 64 20 73 69 7a 65  a specified size
1db0: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 4f 73  .*/.int sqliteOs
1dc0: 54 72 75 6e 63 61 74 65 28 4f 73 46 69 6c 65 20  Truncate(OsFile 
1dd0: 69 64 2c 20 69 6e 74 20 6e 42 79 74 65 29 7b 0a  id, int nByte){.
1de0: 23 69 66 20 4f 53 5f 55 4e 49 58 0a 20 20 72 65  #if OS_UNIX.  re
1df0: 74 75 72 6e 20 66 74 72 75 6e 63 61 74 65 28 69  turn ftruncate(i
1e00: 64 2c 20 6e 42 79 74 65 29 3d 3d 30 20 3f 20 53  d, nByte)==0 ? S
1e10: 51 4c 49 54 45 5f 4f 4b 20 3a 20 53 51 4c 49 54  QLITE_OK : SQLIT
1e20: 45 5f 49 4f 45 52 52 3b 0a 23 65 6e 64 69 66 0a  E_IOERR;.#endif.
1e30: 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 53 65 74  #if OS_WIN.  Set
1e40: 46 69 6c 65 50 6f 69 6e 74 65 72 28 69 64 2c 20  FilePointer(id, 
1e50: 6e 42 79 74 65 2c 20 30 2c 20 46 49 4c 45 5f 42  nByte, 0, FILE_B
1e60: 45 47 49 4e 29 3b 0a 20 20 53 65 74 45 6e 64 4f  EGIN);.  SetEndO
1e70: 66 46 69 6c 65 28 69 64 29 3b 0a 20 20 72 65 74  fFile(id);.  ret
1e80: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23  urn SQLITE_OK;.#
1e90: 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 44  endif.}../*.** D
1ea0: 65 74 65 72 6d 69 6e 65 20 74 68 65 20 63 75 72  etermine the cur
1eb0: 72 65 6e 74 20 73 69 7a 65 20 6f 66 20 61 20 66  rent size of a f
1ec0: 69 6c 65 20 69 6e 20 62 79 74 65 73 0a 2a 2f 0a  ile in bytes.*/.
1ed0: 69 6e 74 20 73 71 6c 69 74 65 4f 73 46 69 6c 65  int sqliteOsFile
1ee0: 53 69 7a 65 28 4f 73 46 69 6c 65 20 69 64 2c 20  Size(OsFile id, 
1ef0: 69 6e 74 20 2a 70 53 69 7a 65 29 7b 0a 23 69 66  int *pSize){.#if
1f00: 20 4f 53 5f 55 4e 49 58 0a 20 20 73 74 72 75 63   OS_UNIX.  struc
1f10: 74 20 73 74 61 74 20 62 75 66 3b 0a 20 20 69 66  t stat buf;.  if
1f20: 28 20 66 73 74 61 74 28 69 64 2c 20 26 62 75 66  ( fstat(id, &buf
1f30: 29 21 3d 30 20 29 7b 0a 20 20 20 20 72 65 74 75  )!=0 ){.    retu
1f40: 72 6e 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b  rn SQLITE_IOERR;
1f50: 0a 20 20 7d 0a 20 20 2a 70 53 69 7a 65 20 3d 20  .  }.  *pSize = 
1f60: 62 75 66 2e 73 74 5f 73 69 7a 65 3b 0a 20 20 72  buf.st_size;.  r
1f70: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b  eturn SQLITE_OK;
1f80: 0a 23 65 6e 64 69 66 0a 23 69 66 20 4f 53 5f 57  .#endif.#if OS_W
1f90: 49 4e 0a 20 20 2a 70 53 69 7a 65 20 3d 20 47 65  IN.  *pSize = Ge
1fa0: 74 46 69 6c 65 53 69 7a 65 28 69 64 2c 20 30 29  tFileSize(id, 0)
1fb0: 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54  ;.  return SQLIT
1fc0: 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 0a 7d 0a 0a  E_OK;.#endif.}..
1fd0: 2f 2a 0a 2a 2a 20 47 65 74 20 61 20 72 65 61 64  /*.** Get a read
1fe0: 20 6f 72 20 77 72 69 74 65 20 6c 6f 63 6b 20 6f   or write lock o
1ff0: 6e 20 61 20 66 69 6c 65 2e 0a 2a 2f 0a 69 6e 74  n a file..*/.int
2000: 20 73 71 6c 69 74 65 4f 73 4c 6f 63 6b 28 4f 73   sqliteOsLock(Os
2010: 46 69 6c 65 20 69 64 2c 20 69 6e 74 20 77 72 6c  File id, int wrl
2020: 6f 63 6b 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49  ock){.#if OS_UNI
2030: 58 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 73 74  X.  int rc;.  st
2040: 72 75 63 74 20 66 6c 6f 63 6b 20 6c 6f 63 6b 3b  ruct flock lock;
2050: 0a 20 20 6c 6f 63 6b 2e 6c 5f 74 79 70 65 20 3d  .  lock.l_type =
2060: 20 77 72 6c 6f 63 6b 20 3f 20 46 5f 57 52 4c 43   wrlock ? F_WRLC
2070: 4b 20 3a 20 46 5f 52 44 4c 43 4b 3b 0a 20 20 6c  K : F_RDLCK;.  l
2080: 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65 20 3d 20 53  ock.l_whence = S
2090: 45 45 4b 5f 53 45 54 3b 0a 20 20 6c 6f 63 6b 2e  EEK_SET;.  lock.
20a0: 6c 5f 73 74 61 72 74 20 3d 20 6c 6f 63 6b 2e 6c  l_start = lock.l
20b0: 5f 6c 65 6e 20 3d 20 30 4c 3b 0a 20 20 72 63 20  _len = 0L;.  rc 
20c0: 3d 20 66 63 6e 74 6c 28 69 64 2c 20 46 5f 53 45  = fcntl(id, F_SE
20d0: 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b 0a 20 20 72  TLK, &lock);.  r
20e0: 65 74 75 72 6e 20 72 63 3d 3d 30 20 3f 20 53 51  eturn rc==0 ? SQ
20f0: 4c 49 54 45 5f 4f 4b 20 3a 20 53 51 4c 49 54 45  LITE_OK : SQLITE
2100: 5f 42 55 53 59 3b 0a 23 65 6e 64 69 66 0a 23 69  _BUSY;.#endif.#i
2110: 66 20 4f 53 5f 57 49 4e 0a 20 20 69 66 28 20 21  f OS_WIN.  if( !
2120: 4c 6f 63 6b 46 69 6c 65 28 69 64 2c 20 30 2c 20  LockFile(id, 0, 
2130: 30 2c 20 31 30 32 34 2c 20 30 29 20 29 7b 0a 20  0, 1024, 0) ){. 
2140: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45     return SQLITE
2150: 5f 42 55 53 59 3b 0a 20 20 7d 0a 20 20 72 65 74  _BUSY;.  }.  ret
2160: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23  urn SQLITE_OK;.#
2170: 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52  endif.}../*.** R
2180: 65 6c 65 61 73 65 20 74 68 65 20 72 65 61 64 20  elease the read 
2190: 6f 72 20 77 72 69 74 65 20 6c 6f 63 6b 20 66 72  or write lock fr
21a0: 6f 6d 20 61 20 66 69 6c 65 2e 0a 2a 2f 0a 69 6e  om a file..*/.in
21b0: 74 20 73 71 6c 69 74 65 4f 73 55 6e 6c 6f 63 6b  t sqliteOsUnlock
21c0: 28 4f 73 46 69 6c 65 20 69 64 29 7b 0a 23 69 66  (OsFile id){.#if
21d0: 20 4f 53 5f 55 4e 49 58 0a 20 20 69 6e 74 20 72   OS_UNIX.  int r
21e0: 63 3b 0a 20 20 73 74 72 75 63 74 20 66 6c 6f 63  c;.  struct floc
21f0: 6b 20 6c 6f 63 6b 3b 0a 20 20 6c 6f 63 6b 2e 6c  k lock;.  lock.l
2200: 5f 74 79 70 65 20 3d 20 46 5f 55 4e 4c 43 4b 3b  _type = F_UNLCK;
2210: 0a 20 20 6c 6f 63 6b 2e 6c 5f 77 68 65 6e 63 65  .  lock.l_whence
2220: 20 3d 20 53 45 45 4b 5f 53 45 54 3b 0a 20 20 6c   = SEEK_SET;.  l
2230: 6f 63 6b 2e 6c 5f 73 74 61 72 74 20 3d 20 6c 6f  ock.l_start = lo
2240: 63 6b 2e 6c 5f 6c 65 6e 20 3d 20 30 4c 3b 0a 20  ck.l_len = 0L;. 
2250: 20 72 63 20 3d 20 66 63 6e 74 6c 28 69 64 2c 20   rc = fcntl(id, 
2260: 46 5f 53 45 54 4c 4b 2c 20 26 6c 6f 63 6b 29 3b  F_SETLK, &lock);
2270: 0a 20 20 72 65 74 75 72 6e 20 72 63 3d 3d 30 20  .  return rc==0 
2280: 3f 20 53 51 4c 49 54 45 5f 4f 4b 20 3a 20 53 51  ? SQLITE_OK : SQ
2290: 4c 49 54 45 5f 49 4f 45 52 52 3b 0a 23 65 6e 64  LITE_IOERR;.#end
22a0: 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20  if.#if OS_WIN.  
22b0: 72 65 74 75 72 6e 20 55 6e 6c 6f 63 6b 46 69 6c  return UnlockFil
22c0: 65 28 69 64 2c 20 30 2c 20 30 2c 20 31 30 32 34  e(id, 0, 0, 1024
22d0: 2c 20 30 29 20 3f 20 53 51 4c 49 54 45 5f 4f 4b  , 0) ? SQLITE_OK
22e0: 20 3a 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 3b   : SQLITE_IOERR;
22f0: 0a 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a  .#endif.}../*.**
2300: 20 47 65 74 20 69 6e 66 6f 72 6d 61 74 69 6f 6e   Get information
2310: 20 74 6f 20 73 65 65 64 20 74 68 65 20 72 61 6e   to seed the ran
2320: 64 6f 6d 20 6e 75 6d 62 65 72 20 67 65 6e 65 72  dom number gener
2330: 61 74 6f 72 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c  ator..*/.int sql
2340: 69 74 65 4f 73 52 61 6e 64 6f 6d 53 65 65 64 28  iteOsRandomSeed(
2350: 63 68 61 72 20 2a 7a 42 75 66 29 7b 0a 23 69 66  char *zBuf){.#if
2360: 20 4f 53 5f 55 4e 49 58 0a 20 20 69 6e 74 20 70   OS_UNIX.  int p
2370: 69 64 3b 0a 20 20 74 69 6d 65 28 28 74 69 6d 65  id;.  time((time
2380: 5f 74 2a 29 7a 42 75 66 29 3b 0a 20 20 7a 42 75  _t*)zBuf);.  zBu
2390: 66 20 2b 3d 20 73 69 7a 65 6f 66 28 74 69 6d 65  f += sizeof(time
23a0: 5f 74 29 3b 0a 20 20 70 69 64 20 3d 20 67 65 74  _t);.  pid = get
23b0: 70 69 64 28 29 3b 0a 20 20 6d 65 6d 63 70 79 28  pid();.  memcpy(
23c0: 7a 42 75 66 2c 20 26 70 69 64 2c 20 73 69 7a 65  zBuf, &pid, size
23d0: 6f 66 28 70 69 64 29 29 3b 0a 20 20 7a 42 75 66  of(pid));.  zBuf
23e0: 20 2b 3d 20 70 69 64 3b 0a 20 20 72 65 74 75 72   += pid;.  retur
23f0: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 23 65 6e  n SQLITE_OK;.#en
2400: 64 69 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20  dif.#if OS_WIN. 
2410: 20 47 65 74 53 79 73 74 65 6d 54 69 6d 65 28 28   GetSystemTime((
2420: 4c 50 53 59 53 54 45 4d 54 49 4d 45 29 7a 42 75  LPSYSTEMTIME)zBu
2430: 66 29 3b 0a 20 20 72 65 74 75 72 6e 20 53 51 4c  f);.  return SQL
2440: 49 54 45 5f 4f 4b 3b 0a 23 65 6e 64 69 66 20 0a  ITE_OK;.#endif .
2450: 7d 0a 0a 2f 2a 0a 2a 2a 20 53 6c 65 65 70 20 66  }../*.** Sleep f
2460: 6f 72 20 61 20 6c 69 74 74 6c 65 20 77 68 69 6c  or a little whil
2470: 65 2e 20 20 52 65 74 75 72 6e 20 74 68 65 20 61  e.  Return the a
2480: 6d 6f 75 6e 74 20 6f 66 20 74 69 6d 65 20 73 6c  mount of time sl
2490: 65 70 74 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69  ept..*/.int sqli
24a0: 74 65 4f 73 53 6c 65 65 70 28 69 6e 74 20 6d 73  teOsSleep(int ms
24b0: 29 7b 0a 23 69 66 20 4f 53 5f 55 4e 49 58 0a 23  ){.#if OS_UNIX.#
24c0: 69 66 20 64 65 66 69 6e 65 64 28 48 41 56 45 5f  if defined(HAVE_
24d0: 55 53 4c 45 45 50 29 20 26 26 20 48 41 56 45 5f  USLEEP) && HAVE_
24e0: 55 53 4c 45 45 50 0a 20 20 75 73 6c 65 65 70 28  USLEEP.  usleep(
24f0: 6d 73 2a 31 30 30 30 29 3b 0a 20 20 72 65 74 75  ms*1000);.  retu
2500: 72 6e 20 6d 73 3b 0a 23 65 6c 73 65 0a 20 20 73  rn ms;.#else.  s
2510: 6c 65 65 70 28 28 6d 73 2b 39 39 39 29 2f 31 30  leep((ms+999)/10
2520: 30 30 29 3b 0a 20 20 72 65 74 75 72 6e 20 31 30  00);.  return 10
2530: 30 30 2a 28 28 6d 73 2b 39 39 39 29 2f 31 30 30  00*((ms+999)/100
2540: 30 29 3b 0a 23 65 6e 64 69 66 0a 23 65 6e 64 69  0);.#endif.#endi
2550: 66 0a 23 69 66 20 4f 53 5f 57 49 4e 0a 20 20 53  f.#if OS_WIN.  S
2560: 6c 65 65 70 28 6d 73 29 3b 0a 20 20 72 65 74 75  leep(ms);.  retu
2570: 72 6e 20 6d 73 3b 0a 23 65 6e 64 69 66 0a 7d 0a  rn ms;.#endif.}.