/ Hex Artifact Content
Login

Artifact 417e1e214734393c24a8ee80b41485a9c4169123:


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 6d 6f 64 69 66 69 65  ode that modifie
01a0: 64 20 74 68 65 20 4f 53 20 6c 61 79 65 72 20 69  d the OS layer i
01b0: 6e 20 6f 72 64 65 72 20 74 6f 20 73 69 6d 75 6c  n order to simul
01c0: 61 74 65 0a 2a 2a 20 74 68 65 20 65 66 66 65 63  ate.** the effec
01d0: 74 20 6f 6e 20 74 68 65 20 64 61 74 61 62 61 73  t on the databas
01e0: 65 20 66 69 6c 65 20 6f 66 20 61 6e 20 4f 53 20  e file of an OS 
01f0: 63 72 61 73 68 20 6f 72 20 70 6f 77 65 72 20 66  crash or power f
0200: 61 69 6c 75 72 65 2e 20 20 54 68 69 73 0a 2a 2a  ailure.  This.**
0210: 20 69 73 20 75 73 65 64 20 74 6f 20 74 65 73 74   is used to test
0220: 20 74 68 65 20 61 62 69 6c 69 74 79 20 6f 66 20   the ability of 
0230: 53 51 4c 69 74 65 20 74 6f 20 72 65 63 6f 76 65  SQLite to recove
0240: 72 20 66 72 6f 6d 20 74 68 6f 73 65 20 73 69 74  r from those sit
0250: 75 61 74 69 6f 6e 73 2e 0a 2a 2f 0a 23 69 66 20  uations..*/.#if 
0260: 53 51 4c 49 54 45 5f 54 45 53 54 20 20 20 20 20  SQLITE_TEST     
0270: 20 20 20 20 20 2f 2a 20 54 68 69 73 20 66 69 6c       /* This fil
0280: 65 20 69 73 20 75 73 65 64 20 66 6f 72 20 74 65  e is used for te
0290: 73 74 69 6e 67 20 6f 6e 6c 79 20 2a 2f 0a 23 69  sting only */.#i
02a0: 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65 49 6e  nclude "sqliteIn
02b0: 74 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 22 74  t.h".#include "t
02c0: 63 6c 2e 68 22 0a 0a 23 69 66 6e 64 65 66 20 53  cl.h"..#ifndef S
02d0: 51 4c 49 54 45 5f 4f 4d 49 54 5f 44 49 53 4b 49  QLITE_OMIT_DISKI
02e0: 4f 20 20 2f 2a 20 54 68 69 73 20 66 69 6c 65 20  O  /* This file 
02f0: 69 73 20 61 20 6e 6f 2d 6f 70 20 69 66 20 64 69  is a no-op if di
0300: 73 6b 20 49 2f 4f 20 69 73 20 64 69 73 61 62 6c  sk I/O is disabl
0310: 65 64 20 2a 2f 0a 0a 2f 2a 20 23 64 65 66 69 6e  ed */../* #defin
0320: 65 20 54 52 41 43 45 5f 43 52 41 53 48 54 45 53  e TRACE_CRASHTES
0330: 54 20 2a 2f 0a 0a 74 79 70 65 64 65 66 20 73 74  T */..typedef st
0340: 72 75 63 74 20 43 72 61 73 68 46 69 6c 65 20 43  ruct CrashFile C
0350: 72 61 73 68 46 69 6c 65 3b 0a 74 79 70 65 64 65  rashFile;.typede
0360: 66 20 73 74 72 75 63 74 20 43 72 61 73 68 47 6c  f struct CrashGl
0370: 6f 62 61 6c 20 43 72 61 73 68 47 6c 6f 62 61 6c  obal CrashGlobal
0380: 3b 0a 74 79 70 65 64 65 66 20 73 74 72 75 63 74  ;.typedef struct
0390: 20 57 72 69 74 65 42 75 66 66 65 72 20 57 72 69   WriteBuffer Wri
03a0: 74 65 42 75 66 66 65 72 3b 0a 0a 2f 2a 0a 2a 2a  teBuffer;../*.**
03b0: 20 4d 65 74 68 6f 64 3a 0a 2a 2a 0a 2a 2a 20 20   Method:.**.**  
03c0: 20 54 68 69 73 20 6c 61 79 65 72 20 69 73 20 69   This layer is i
03d0: 6d 70 6c 65 6d 65 6e 74 65 64 20 61 73 20 61 20  mplemented as a 
03e0: 77 72 61 70 70 65 72 20 61 72 6f 75 6e 64 20 74  wrapper around t
03f0: 68 65 20 22 72 65 61 6c 22 20 0a 2a 2a 20 20 20  he "real" .**   
0400: 73 71 6c 69 74 65 33 5f 66 69 6c 65 20 6f 62 6a  sqlite3_file obj
0410: 65 63 74 20 66 6f 72 20 74 68 65 20 68 6f 73 74  ect for the host
0420: 20 73 79 73 74 65 6d 2e 20 45 61 63 68 20 74 69   system. Each ti
0430: 6d 65 20 64 61 74 61 20 69 73 20 0a 2a 2a 20 20  me data is .**  
0440: 20 77 72 69 74 74 65 6e 20 74 6f 20 74 68 65 20   written to the 
0450: 66 69 6c 65 20 6f 62 6a 65 63 74 2c 20 69 6e 73  file object, ins
0460: 74 65 61 64 20 6f 66 20 62 65 69 6e 67 20 77 72  tead of being wr
0470: 69 74 74 65 6e 20 74 6f 20 74 68 65 0a 2a 2a 20  itten to the.** 
0480: 20 20 75 6e 64 65 72 6c 79 69 6e 67 20 66 69 6c    underlying fil
0490: 65 2c 20 74 68 65 20 77 72 69 74 65 20 6f 70 65  e, the write ope
04a0: 72 61 74 69 6f 6e 20 69 73 20 73 74 6f 72 65 64  ration is stored
04b0: 20 69 6e 20 61 6e 20 69 6e 2d 6d 65 6d 6f 72 79   in an in-memory
04c0: 20 0a 2a 2a 20 20 20 73 74 72 75 63 74 75 72 65   .**   structure
04d0: 20 28 74 79 70 65 20 57 72 69 74 65 42 75 66 66   (type WriteBuff
04e0: 65 72 29 2e 20 54 68 69 73 20 73 74 72 75 63 74  er). This struct
04f0: 75 72 65 20 69 73 20 70 6c 61 63 65 64 20 61 74  ure is placed at
0500: 20 74 68 65 0a 2a 2a 20 20 20 65 6e 64 20 6f 66   the.**   end of
0510: 20 61 20 67 6c 6f 62 61 6c 20 6f 72 64 65 72 65   a global ordere
0520: 64 20 6c 69 73 74 20 28 74 68 65 20 77 72 69 74  d list (the writ
0530: 65 2d 6c 69 73 74 29 2e 0a 2a 2a 0a 2a 2a 20 20  e-list)..**.**  
0540: 20 57 68 65 6e 20 64 61 74 61 20 69 73 20 72 65   When data is re
0550: 61 64 20 66 72 6f 6d 20 61 20 66 69 6c 65 20 6f  ad from a file o
0560: 62 6a 65 63 74 2c 20 74 68 65 20 72 65 71 75 65  bject, the reque
0570: 73 74 65 64 20 72 65 67 69 6f 6e 20 69 73 0a 2a  sted region is.*
0580: 2a 20 20 20 66 69 72 73 74 20 72 65 74 72 69 65  *   first retrie
0590: 76 65 64 20 66 72 6f 6d 20 74 68 65 20 72 65 61  ved from the rea
05a0: 6c 20 66 69 6c 65 2e 20 54 68 65 20 77 72 69 74  l file. The writ
05b0: 65 2d 6c 69 73 74 20 69 73 20 74 68 65 6e 20 0a  e-list is then .
05c0: 2a 2a 20 20 20 74 72 61 76 65 72 73 65 64 20 61  **   traversed a
05d0: 6e 64 20 64 61 74 61 20 63 6f 70 69 65 64 20 66  nd data copied f
05e0: 72 6f 6d 20 61 6e 79 20 6f 76 65 72 6c 61 70 70  rom any overlapp
05f0: 69 6e 67 20 57 72 69 74 65 42 75 66 66 65 72 20  ing WriteBuffer 
0600: 0a 2a 2a 20 20 20 73 74 72 75 63 74 75 72 65 73  .**   structures
0610: 20 74 6f 20 74 68 65 20 6f 75 74 70 75 74 20 62   to the output b
0620: 75 66 66 65 72 2e 20 69 2e 65 2e 20 61 20 72 65  uffer. i.e. a re
0630: 61 64 28 29 20 6f 70 65 72 61 74 69 6f 6e 20 66  ad() operation f
0640: 6f 6c 6c 6f 77 69 6e 67 0a 2a 2a 20 20 20 6f 6e  ollowing.**   on
0650: 65 20 6f 72 20 6d 6f 72 65 20 77 72 69 74 65 28  e or more write(
0660: 29 20 6f 70 65 72 61 74 69 6f 6e 73 20 77 6f 72  ) operations wor
0670: 6b 73 20 61 73 20 65 78 70 65 63 74 65 64 2c 20  ks as expected, 
0680: 65 76 65 6e 20 69 66 20 6e 6f 0a 2a 2a 20 20 20  even if no.**   
0690: 64 61 74 61 20 68 61 73 20 61 63 74 75 61 6c 6c  data has actuall
06a0: 79 20 62 65 65 6e 20 77 72 69 74 74 65 6e 20 6f  y been written o
06b0: 75 74 20 74 6f 20 74 68 65 20 72 65 61 6c 20 66  ut to the real f
06c0: 69 6c 65 2e 0a 2a 2a 0a 2a 2a 20 20 20 57 68 65  ile..**.**   Whe
06d0: 6e 20 61 20 66 73 79 6e 63 28 29 20 6f 70 65 72  n a fsync() oper
06e0: 61 74 69 6f 6e 20 69 73 20 70 65 72 66 6f 72 6d  ation is perform
06f0: 65 64 2c 20 61 6e 20 6f 70 65 72 61 74 69 6e 67  ed, an operating
0700: 20 73 79 73 74 65 6d 20 63 72 61 73 68 20 0a 2a   system crash .*
0710: 2a 20 20 20 6d 61 79 20 62 65 20 73 69 6d 75 6c  *   may be simul
0720: 61 74 65 64 2c 20 69 6e 20 77 68 69 63 68 20 63  ated, in which c
0730: 61 73 65 20 65 78 69 74 28 2d 31 29 20 69 73 20  ase exit(-1) is 
0740: 63 61 6c 6c 65 64 20 28 74 68 65 20 63 61 6c 6c  called (the call
0750: 20 74 6f 20 0a 2a 2a 20 20 20 78 53 79 6e 63 28   to .**   xSync(
0760: 29 20 6e 65 76 65 72 20 72 65 74 75 72 6e 73 29  ) never returns)
0770: 2e 20 57 68 65 74 68 65 72 20 6f 72 20 6e 6f 74  . Whether or not
0780: 20 61 20 63 72 61 73 68 20 69 73 20 73 69 6d 75   a crash is simu
0790: 6c 61 74 65 64 2c 0a 2a 2a 20 20 20 74 68 65 20  lated,.**   the 
07a0: 64 61 74 61 20 61 73 73 6f 63 69 61 74 65 64 20  data associated 
07b0: 77 69 74 68 20 61 20 73 75 62 73 65 74 20 6f 66  with a subset of
07c0: 20 74 68 65 20 57 72 69 74 65 42 75 66 66 65 72   the WriteBuffer
07d0: 20 73 74 72 75 63 74 75 72 65 73 20 0a 2a 2a 20   structures .** 
07e0: 20 20 73 74 6f 72 65 64 20 69 6e 20 74 68 65 20    stored in the 
07f0: 77 72 69 74 65 2d 6c 69 73 74 20 69 73 20 77 72  write-list is wr
0800: 69 74 74 65 6e 20 74 6f 20 74 68 65 20 72 65 61  itten to the rea
0810: 6c 20 75 6e 64 65 72 6c 79 69 6e 67 20 66 69 6c  l underlying fil
0820: 65 73 20 0a 2a 2a 20 20 20 61 6e 64 20 74 68 65  es .**   and the
0830: 20 65 6e 74 72 69 65 73 20 72 65 6d 6f 76 65 64   entries removed
0840: 20 66 72 6f 6d 20 74 68 65 20 77 72 69 74 65 2d   from the write-
0850: 6c 69 73 74 2e 20 49 66 20 61 20 63 72 61 73 68  list. If a crash
0860: 20 69 73 20 73 69 6d 75 6c 61 74 65 64 2c 0a 2a   is simulated,.*
0870: 2a 20 20 20 61 20 73 75 62 73 65 74 20 6f 66 20  *   a subset of 
0880: 74 68 65 20 62 75 66 66 65 72 73 20 6d 61 79 20  the buffers may 
0890: 62 65 20 63 6f 72 72 75 70 74 65 64 20 62 65 66  be corrupted bef
08a0: 6f 72 65 20 74 68 65 20 64 61 74 61 20 69 73 20  ore the data is 
08b0: 77 72 69 74 74 65 6e 2e 0a 2a 2a 0a 2a 2a 20 20  written..**.**  
08c0: 20 54 68 65 20 65 78 61 63 74 20 73 75 62 73 65   The exact subse
08d0: 74 20 6f 66 20 74 68 65 20 77 72 69 74 65 2d 6c  t of the write-l
08e0: 69 73 74 20 77 72 69 74 74 65 6e 20 61 6e 64 2f  ist written and/
08f0: 6f 72 20 63 6f 72 72 75 70 74 65 64 20 69 73 0a  or corrupted is.
0900: 2a 2a 20 20 20 64 65 74 65 72 6d 69 6e 65 64 20  **   determined 
0910: 62 79 20 74 68 65 20 73 69 6d 75 6c 61 74 65 64  by the simulated
0920: 20 64 65 76 69 63 65 20 63 68 61 72 61 63 74 65   device characte
0930: 72 69 73 74 69 63 73 20 61 6e 64 20 73 65 63 74  ristics and sect
0940: 6f 72 2d 73 69 7a 65 2e 0a 2a 2a 0a 2a 2a 20 22  or-size..**.** "
0950: 4e 6f 72 6d 61 6c 22 20 6d 6f 64 65 3a 0a 2a 2a  Normal" mode:.**
0960: 0a 2a 2a 20 20 20 4e 6f 72 6d 61 6c 20 6d 6f 64  .**   Normal mod
0970: 65 20 69 73 20 75 73 65 64 20 77 68 65 6e 20 74  e is used when t
0980: 68 65 20 73 69 6d 75 6c 61 74 65 64 20 64 65 76  he simulated dev
0990: 69 63 65 20 68 61 73 20 6e 6f 6e 65 20 6f 66 20  ice has none of 
09a0: 74 68 65 0a 2a 2a 20 20 20 53 51 4c 49 54 45 5f  the.**   SQLITE_
09b0: 49 4f 43 41 50 5f 58 58 58 20 66 6c 61 67 73 20  IOCAP_XXX flags 
09c0: 73 65 74 2e 0a 2a 2a 0a 2a 2a 20 20 20 49 6e 20  set..**.**   In 
09d0: 6e 6f 72 6d 61 6c 20 6d 6f 64 65 2c 20 69 66 20  normal mode, if 
09e0: 74 68 65 20 66 73 79 6e 63 28 29 20 69 73 20 6e  the fsync() is n
09f0: 6f 74 20 61 20 73 69 6d 75 6c 61 74 65 64 20 63  ot a simulated c
0a00: 72 61 73 68 2c 20 74 68 65 20 0a 2a 2a 20 20 20  rash, the .**   
0a10: 77 72 69 74 65 2d 6c 69 73 74 20 69 73 20 74 72  write-list is tr
0a20: 61 76 65 72 73 65 64 20 66 72 6f 6d 20 62 65 67  aversed from beg
0a30: 69 6e 6e 69 6e 67 20 74 6f 20 65 6e 64 2e 20 45  inning to end. E
0a40: 61 63 68 20 57 72 69 74 65 42 75 66 66 65 72 0a  ach WriteBuffer.
0a50: 2a 2a 20 20 20 73 74 72 75 63 74 75 72 65 20 61  **   structure a
0a60: 73 73 6f 63 69 61 74 65 64 20 77 69 74 68 20 74  ssociated with t
0a70: 68 65 20 66 69 6c 65 20 68 61 6e 64 6c 65 20 75  he file handle u
0a80: 73 65 64 20 74 6f 20 63 61 6c 6c 20 78 53 79 6e  sed to call xSyn
0a90: 63 28 29 0a 2a 2a 20 20 20 69 73 20 77 72 69 74  c().**   is writ
0aa0: 74 65 6e 20 74 6f 20 74 68 65 20 72 65 61 6c 20  ten to the real 
0ab0: 66 69 6c 65 20 61 6e 64 20 72 65 6d 6f 76 65 64  file and removed
0ac0: 20 66 72 6f 6d 20 74 68 65 20 77 72 69 74 65 2d   from the write-
0ad0: 6c 69 73 74 2e 0a 2a 2a 0a 2a 2a 20 20 20 49 66  list..**.**   If
0ae0: 20 61 20 63 72 61 73 68 20 69 73 20 73 69 6d 75   a crash is simu
0af0: 6c 61 74 65 64 2c 20 6f 6e 65 20 6f 66 20 74 68  lated, one of th
0b00: 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 74 61 6b 65  e following take
0b10: 73 20 70 6c 61 63 65 20 66 6f 72 20 0a 2a 2a 20  s place for .** 
0b20: 20 20 65 61 63 68 20 57 72 69 74 65 42 75 66 66    each WriteBuff
0b30: 65 72 20 69 6e 20 74 68 65 20 77 72 69 74 65 2d  er in the write-
0b40: 6c 69 73 74 2c 20 72 65 67 61 72 64 6c 65 73 73  list, regardless
0b50: 20 6f 66 20 77 68 69 63 68 20 0a 2a 2a 20 20 20   of which .**   
0b60: 66 69 6c 65 2d 68 61 6e 64 6c 65 20 69 74 20 69  file-handle it i
0b70: 73 20 61 73 73 6f 63 69 61 74 65 64 20 77 69 74  s associated wit
0b80: 68 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 31 2e 20  h:.**.**     1. 
0b90: 54 68 65 20 62 75 66 66 65 72 20 69 73 20 63 6f  The buffer is co
0ba0: 72 72 65 63 74 6c 79 20 77 72 69 74 74 65 6e 20  rrectly written 
0bb0: 74 6f 20 74 68 65 20 66 69 6c 65 2c 20 6a 75 73  to the file, jus
0bc0: 74 20 61 73 20 69 66 0a 2a 2a 20 20 20 20 20 20  t as if.**      
0bd0: 20 20 61 20 63 72 61 73 68 20 77 65 72 65 20 6e    a crash were n
0be0: 6f 74 20 62 65 69 6e 67 20 73 69 6d 75 6c 61 74  ot being simulat
0bf0: 65 64 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 32 2e  ed..**.**     2.
0c00: 20 4e 6f 74 68 69 6e 67 20 69 73 20 64 6f 6e 65   Nothing is done
0c10: 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 33 2e 20 47  ..**.**     3. G
0c20: 61 72 62 61 67 65 20 64 61 74 61 20 69 73 20 77  arbage data is w
0c30: 72 69 74 74 65 6e 20 74 6f 20 61 6c 6c 20 73 65  ritten to all se
0c40: 63 74 6f 72 73 20 6f 66 20 74 68 65 20 66 69 6c  ctors of the fil
0c50: 65 20 74 68 61 74 20 0a 2a 2a 20 20 20 20 20 20  e that .**      
0c60: 20 20 6f 76 65 72 6c 61 70 20 74 68 65 20 72 65    overlap the re
0c70: 67 69 6f 6e 20 73 70 65 63 69 66 69 65 64 20 62  gion specified b
0c80: 79 20 74 68 65 20 57 72 69 74 65 42 75 66 66 65  y the WriteBuffe
0c90: 72 2e 20 4f 72 20 67 61 72 62 61 67 65 0a 2a 2a  r. Or garbage.**
0ca0: 20 20 20 20 20 20 20 20 64 61 74 61 20 69 73 20          data is 
0cb0: 77 72 69 74 74 65 6e 20 74 6f 20 73 6f 6d 65 20  written to some 
0cc0: 63 6f 6e 74 69 67 75 6f 75 73 20 73 65 63 74 69  contiguous secti
0cd0: 6f 6e 20 77 69 74 68 69 6e 20 74 68 65 20 0a 2a  on within the .*
0ce0: 2a 20 20 20 20 20 20 20 20 6f 76 65 72 6c 61 70  *        overlap
0cf0: 70 65 64 20 73 65 63 74 6f 72 73 2e 0a 2a 2a 0a  ped sectors..**.
0d00: 2a 2a 20 44 65 76 69 63 65 20 43 68 61 72 61 63  ** Device Charac
0d10: 74 65 72 69 73 74 69 63 20 66 6c 61 67 20 68 61  teristic flag ha
0d20: 6e 64 6c 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20  ndling:.**.**   
0d30: 49 66 20 74 68 65 20 49 4f 43 41 50 5f 41 54 4f  If the IOCAP_ATO
0d40: 4d 49 43 20 66 6c 61 67 20 69 73 20 73 65 74 2c  MIC flag is set,
0d50: 20 74 68 65 6e 20 6f 70 74 69 6f 6e 20 28 33 29   then option (3)
0d60: 20 61 62 6f 76 65 20 69 73 20 0a 2a 2a 20 20 20   above is .**   
0d70: 6e 65 76 65 72 20 73 65 6c 65 63 74 65 64 2e 0a  never selected..
0d80: 2a 2a 0a 2a 2a 20 20 20 49 66 20 74 68 65 20 49  **.**   If the I
0d90: 4f 43 41 50 5f 41 54 4f 4d 49 43 35 31 32 20 66  OCAP_ATOMIC512 f
0da0: 6c 61 67 20 69 73 20 73 65 74 2c 20 61 6e 64 20  lag is set, and 
0db0: 74 68 65 20 57 72 69 74 65 42 75 66 66 65 72 20  the WriteBuffer 
0dc0: 72 65 70 72 65 73 65 6e 74 73 0a 2a 2a 20 20 20  represents.**   
0dd0: 61 6e 20 61 6c 69 67 6e 65 64 20 77 72 69 74 65  an aligned write
0de0: 28 29 20 6f 66 20 61 6e 20 69 6e 74 65 67 65 72  () of an integer
0df0: 20 6e 75 6d 62 65 72 20 6f 66 20 35 31 32 20 62   number of 512 b
0e00: 79 74 65 20 72 65 67 69 6f 6e 73 2c 20 74 68 65  yte regions, the
0e10: 6e 0a 2a 2a 20 20 20 6f 70 74 69 6f 6e 20 28 33  n.**   option (3
0e20: 29 20 61 62 6f 76 65 20 69 73 20 6e 65 76 65 72  ) above is never
0e30: 20 73 65 6c 65 63 74 65 64 2e 20 49 6e 73 74 65   selected. Inste
0e40: 61 64 2c 20 65 61 63 68 20 35 31 32 20 62 79 74  ad, each 512 byt
0e50: 65 20 72 65 67 69 6f 6e 0a 2a 2a 20 20 20 69 73  e region.**   is
0e60: 20 65 69 74 68 65 72 20 63 6f 72 72 65 63 74 6c   either correctl
0e70: 79 20 77 72 69 74 74 65 6e 20 6f 72 20 6c 65 66  y written or lef
0e80: 74 20 63 6f 6d 70 6c 65 74 65 6c 79 20 75 6e 74  t completely unt
0e90: 6f 75 63 68 65 64 2e 20 53 69 6d 69 6c 61 72 0a  ouched. Similar.
0ea0: 2a 2a 20 20 20 6c 6f 67 69 63 20 67 6f 76 65 72  **   logic gover
0eb0: 6e 73 20 74 68 65 20 62 65 68 61 76 69 6f 75 72  ns the behaviour
0ec0: 20 69 66 20 61 6e 79 20 6f 66 20 74 68 65 20 6f   if any of the o
0ed0: 74 68 65 72 20 41 54 4f 4d 49 43 58 58 58 20 66  ther ATOMICXXX f
0ee0: 6c 61 67 73 0a 2a 2a 20 20 20 69 73 20 73 65 74  lags.**   is set
0ef0: 2e 0a 2a 2a 0a 2a 2a 20 20 20 49 66 20 65 69 74  ..**.**   If eit
0f00: 68 65 72 20 74 68 65 20 49 4f 43 41 50 5f 53 41  her the IOCAP_SA
0f10: 46 45 41 50 50 45 4e 44 20 6f 72 20 49 4f 43 41  FEAPPEND or IOCA
0f20: 50 5f 53 45 51 55 45 4e 54 49 41 4c 20 66 6c 61  P_SEQUENTIAL fla
0f30: 67 73 20 61 72 65 20 73 65 74 0a 2a 2a 20 20 20  gs are set.**   
0f40: 61 6e 64 20 61 20 63 72 61 73 68 20 69 73 20 62  and a crash is b
0f50: 65 69 6e 67 20 73 69 6d 75 6c 61 74 65 64 2c 20  eing simulated, 
0f60: 74 68 65 6e 20 61 6e 20 65 6e 74 72 79 20 6f 66  then an entry of
0f70: 20 74 68 65 20 77 72 69 74 65 2d 6c 69 73 74 20   the write-list 
0f80: 69 73 0a 2a 2a 20 20 20 73 65 6c 65 63 74 65 64  is.**   selected
0f90: 20 61 74 20 72 61 6e 64 6f 6d 2e 20 45 76 65 72   at random. Ever
0fa0: 79 74 68 69 6e 67 20 69 6e 20 74 68 65 20 6c 69  ything in the li
0fb0: 73 74 20 61 66 74 65 72 20 74 68 65 20 73 65 6c  st after the sel
0fc0: 65 63 74 65 64 20 65 6e 74 72 79 20 0a 2a 2a 20  ected entry .** 
0fd0: 20 20 69 73 20 64 69 73 63 61 72 64 65 64 20 62    is discarded b
0fe0: 65 66 6f 72 65 20 70 72 6f 63 65 73 73 69 6e 67  efore processing
0ff0: 20 62 65 67 69 6e 73 2e 0a 2a 2a 0a 2a 2a 20 20   begins..**.**  
1000: 20 49 66 20 49 4f 43 41 50 5f 53 45 51 55 45 4e   If IOCAP_SEQUEN
1010: 54 49 41 4c 20 69 73 20 73 65 74 20 61 6e 64 20  TIAL is set and 
1020: 61 20 63 72 61 73 68 20 69 73 20 62 65 69 6e 67  a crash is being
1030: 20 73 69 6d 75 6c 61 74 65 64 2c 20 6f 70 74 69   simulated, opti
1040: 6f 6e 20 0a 2a 2a 20 20 20 28 31 29 20 69 73 20  on .**   (1) is 
1050: 73 65 6c 65 63 74 65 64 20 66 6f 72 20 61 6c 6c  selected for all
1060: 20 77 72 69 74 65 2d 6c 69 73 74 20 65 6e 74 72   write-list entr
1070: 69 65 73 20 65 78 63 65 70 74 20 74 68 65 20 6c  ies except the l
1080: 61 73 74 2e 20 49 66 20 61 20 0a 2a 2a 20 20 20  ast. If a .**   
1090: 63 72 61 73 68 20 69 73 20 6e 6f 74 20 62 65 69  crash is not bei
10a0: 6e 67 20 73 69 6d 75 6c 61 74 65 64 2c 20 74 68  ng simulated, th
10b0: 65 6e 20 61 6c 6c 20 65 6e 74 72 69 65 73 20 69  en all entries i
10c0: 6e 20 74 68 65 20 77 72 69 74 65 2d 6c 69 73 74  n the write-list
10d0: 0a 2a 2a 20 20 20 74 68 61 74 20 6f 63 63 75 72  .**   that occur
10e0: 20 62 65 66 6f 72 65 20 61 74 20 6c 65 61 73 74   before at least
10f0: 20 6f 6e 65 20 77 72 69 74 65 28 29 20 6f 6e 20   one write() on 
1100: 74 68 65 20 66 69 6c 65 2d 68 61 6e 64 6c 65 20  the file-handle 
1110: 73 70 65 63 69 66 69 65 64 0a 2a 2a 20 20 20 61  specified.**   a
1120: 73 20 70 61 72 74 20 6f 66 20 74 68 65 20 78 53  s part of the xS
1130: 79 6e 63 28 29 20 61 72 65 20 77 72 69 74 74 65  ync() are writte
1140: 6e 20 74 6f 20 74 68 65 69 72 20 61 73 73 6f 63  n to their assoc
1150: 69 61 74 65 64 20 72 65 61 6c 20 66 69 6c 65 73  iated real files
1160: 2e 0a 2a 2a 0a 2a 2a 20 20 20 49 66 20 49 4f 43  ..**.**   If IOC
1170: 41 50 5f 53 41 46 45 41 50 50 45 4e 44 20 69 73  AP_SAFEAPPEND is
1180: 20 73 65 74 20 61 6e 64 20 74 68 65 20 66 69 72   set and the fir
1190: 73 74 20 62 79 74 65 20 77 72 69 74 74 65 6e 20  st byte written 
11a0: 62 79 20 74 68 65 20 77 72 69 74 65 28 29 0a 2a  by the write().*
11b0: 2a 20 20 20 6f 70 65 72 61 74 69 6f 6e 20 69 73  *   operation is
11c0: 20 6f 6e 65 20 62 79 74 65 20 70 61 73 74 20 74   one byte past t
11d0: 68 65 20 63 75 72 72 65 6e 74 20 65 6e 64 20 6f  he current end o
11e0: 66 20 74 68 65 20 66 69 6c 65 2c 20 74 68 65 6e  f the file, then
11f0: 20 6f 70 74 69 6f 6e 0a 2a 2a 20 20 20 28 31 29   option.**   (1)
1200: 20 69 73 20 61 6c 77 61 79 73 20 73 65 6c 65 63   is always selec
1210: 74 65 64 2e 0a 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 45  ted..*/../*.** E
1220: 61 63 68 20 77 72 69 74 65 20 6f 70 65 72 61 74  ach write operat
1230: 69 6f 6e 20 69 6e 20 74 68 65 20 77 72 69 74 65  ion in the write
1240: 2d 6c 69 73 74 20 69 73 20 72 65 70 72 65 73 65  -list is represe
1250: 6e 74 65 64 20 62 79 20 61 6e 20 69 6e 73 74 61  nted by an insta
1260: 6e 63 65 0a 2a 2a 20 6f 66 20 74 68 65 20 66 6f  nce.** of the fo
1270: 6c 6c 6f 77 69 6e 67 20 73 74 72 75 63 74 75 72  llowing structur
1280: 65 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 7a 42 75 66  e..**.** If zBuf
1290: 20 69 73 20 30 2c 20 74 68 65 6e 20 74 68 69 73   is 0, then this
12a0: 20 73 74 72 75 63 74 75 72 65 20 72 65 70 72 65   structure repre
12b0: 73 65 6e 74 73 20 61 20 63 61 6c 6c 20 74 6f 20  sents a call to 
12c0: 78 54 72 75 6e 63 61 74 65 28 29 2c 20 0a 2a 2a  xTruncate(), .**
12d0: 20 6e 6f 74 20 78 57 72 69 74 65 28 29 2e 20 49   not xWrite(). I
12e0: 6e 20 74 68 61 74 20 63 61 73 65 2c 20 69 4f 66  n that case, iOf
12f0: 66 73 65 74 20 69 73 20 74 68 65 20 73 69 7a 65  fset is the size
1300: 20 74 68 61 74 20 74 68 65 20 66 69 6c 65 20 69   that the file i
1310: 73 0a 2a 2a 20 74 72 75 6e 63 61 74 65 64 20 74  s.** truncated t
1320: 6f 2e 0a 2a 2f 0a 73 74 72 75 63 74 20 57 72 69  o..*/.struct Wri
1330: 74 65 42 75 66 66 65 72 20 7b 0a 20 20 69 36 34  teBuffer {.  i64
1340: 20 69 4f 66 66 73 65 74 3b 20 20 20 20 20 20 20   iOffset;       
1350: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 42 79 74            /* Byt
1360: 65 20 6f 66 66 73 65 74 20 6f 66 20 74 68 65 20  e offset of the 
1370: 73 74 61 72 74 20 6f 66 20 74 68 69 73 20 77 72  start of this wr
1380: 69 74 65 28 29 20 2a 2f 0a 20 20 69 6e 74 20 6e  ite() */.  int n
1390: 42 75 66 3b 20 20 20 20 20 20 20 20 20 20 20 20  Buf;            
13a0: 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65          /* Numbe
13b0: 72 20 6f 66 20 62 79 74 65 73 20 77 72 69 74 74  r of bytes writt
13c0: 65 6e 20 2a 2f 0a 20 20 75 38 20 2a 7a 42 75 66  en */.  u8 *zBuf
13d0: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ;               
13e0: 20 20 20 20 20 2f 2a 20 50 6f 69 6e 74 65 72 20       /* Pointer 
13f0: 74 6f 20 63 6f 70 79 20 6f 66 20 77 72 69 74 74  to copy of writt
1400: 65 6e 20 64 61 74 61 20 2a 2f 0a 20 20 43 72 61  en data */.  Cra
1410: 73 68 46 69 6c 65 20 2a 70 46 69 6c 65 3b 20 20  shFile *pFile;  
1420: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 46 69 6c            /* Fil
1430: 65 20 74 68 69 73 20 77 72 69 74 65 28 29 20 61  e this write() a
1440: 70 70 6c 69 65 73 20 74 6f 20 2a 2f 0a 0a 20 20  pplies to */..  
1450: 57 72 69 74 65 42 75 66 66 65 72 20 2a 70 4e 65  WriteBuffer *pNe
1460: 78 74 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20  xt;          /* 
1470: 4e 65 78 74 20 69 6e 20 43 72 61 73 68 47 6c 6f  Next in CrashGlo
1480: 62 61 6c 2e 70 57 72 69 74 65 4c 69 73 74 20 2a  bal.pWriteList *
1490: 2f 0a 7d 3b 0a 0a 73 74 72 75 63 74 20 43 72 61  /.};..struct Cra
14a0: 73 68 46 69 6c 65 20 7b 0a 20 20 63 6f 6e 73 74  shFile {.  const
14b0: 20 73 71 6c 69 74 65 33 5f 69 6f 5f 6d 65 74 68   sqlite3_io_meth
14c0: 6f 64 73 20 2a 70 4d 65 74 68 6f 64 3b 20 20 20  ods *pMethod;   
14d0: 2f 2a 20 4d 75 73 74 20 62 65 20 66 69 72 73 74  /* Must be first
14e0: 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 66 69   */.  sqlite3_fi
14f0: 6c 65 20 2a 70 52 65 61 6c 46 69 6c 65 3b 20 20  le *pRealFile;  
1500: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 55 6e             /* Un
1510: 64 65 72 6c 79 69 6e 67 20 22 72 65 61 6c 22 20  derlying "real" 
1520: 66 69 6c 65 20 68 61 6e 64 6c 65 20 2a 2f 0a 20  file handle */. 
1530: 20 63 68 61 72 20 2a 7a 4e 61 6d 65 3b 0a 20 20   char *zName;.  
1540: 69 6e 74 20 66 6c 61 67 73 3b 20 20 20 20 20 20  int flags;      
1550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1560: 20 20 20 20 20 2f 2a 20 46 6c 61 67 73 20 74 68       /* Flags th
1570: 65 20 66 69 6c 65 20 77 61 73 20 6f 70 65 6e 65  e file was opene
1580: 64 20 77 69 74 68 20 2a 2f 0a 0a 20 20 2f 2a 20  d with */..  /* 
1590: 43 61 63 68 65 20 6f 66 20 74 68 65 20 65 6e 74  Cache of the ent
15a0: 69 72 65 20 66 69 6c 65 2e 20 54 68 69 73 20 69  ire file. This i
15b0: 73 20 75 73 65 64 20 74 6f 20 73 70 65 65 64 20  s used to speed 
15c0: 75 70 20 4f 73 52 65 61 64 28 29 20 61 6e 64 20  up OsRead() and 
15d0: 0a 20 20 2a 2a 20 4f 73 46 69 6c 65 53 69 7a 65  .  ** OsFileSize
15e0: 28 29 20 63 61 6c 6c 73 2e 20 41 6c 74 68 6f 75  () calls. Althou
15f0: 67 68 20 62 6f 74 68 20 63 6f 75 6c 64 20 62 65  gh both could be
1600: 20 64 6f 6e 65 20 62 79 20 74 72 61 76 65 72 73   done by travers
1610: 69 6e 67 20 74 68 65 0a 20 20 2a 2a 20 77 72 69  ing the.  ** wri
1620: 74 65 2d 6c 69 73 74 2c 20 69 6e 20 70 72 61 63  te-list, in prac
1630: 74 69 63 65 20 74 68 69 73 20 69 73 20 69 6d 70  tice this is imp
1640: 72 61 63 74 69 63 61 6c 6c 79 20 73 6c 6f 77 2e  ractically slow.
1650: 0a 20 20 2a 2f 0a 20 20 69 6e 74 20 69 53 69 7a  .  */.  int iSiz
1660: 65 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  e;              
1670: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
1680: 53 69 7a 65 20 6f 66 20 66 69 6c 65 20 69 6e 20  Size of file in 
1690: 62 79 74 65 73 20 2a 2f 0a 20 20 69 6e 74 20 6e  bytes */.  int n
16a0: 44 61 74 61 3b 20 20 20 20 20 20 20 20 20 20 20  Data;           
16b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
16c0: 2f 2a 20 53 69 7a 65 20 6f 66 20 62 75 66 66 65  /* Size of buffe
16d0: 72 20 61 6c 6c 6f 63 61 74 65 64 20 61 74 20 7a  r allocated at z
16e0: 44 61 74 61 20 2a 2f 0a 20 20 75 38 20 2a 7a 44  Data */.  u8 *zD
16f0: 61 74 61 3b 20 20 20 20 20 20 20 20 20 20 20 20  ata;            
1700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
1710: 2a 20 42 75 66 66 65 72 20 63 6f 6e 74 61 69 6e  * Buffer contain
1720: 69 6e 67 20 66 69 6c 65 20 63 6f 6e 74 65 6e 74  ing file content
1730: 73 20 2a 2f 0a 7d 3b 0a 0a 73 74 72 75 63 74 20  s */.};..struct 
1740: 43 72 61 73 68 47 6c 6f 62 61 6c 20 7b 0a 20 20  CrashGlobal {.  
1750: 57 72 69 74 65 42 75 66 66 65 72 20 2a 70 57 72  WriteBuffer *pWr
1760: 69 74 65 4c 69 73 74 3b 20 20 20 20 20 2f 2a 20  iteList;     /* 
1770: 48 65 61 64 20 6f 66 20 77 72 69 74 65 2d 6c 69  Head of write-li
1780: 73 74 20 2a 2f 0a 20 20 57 72 69 74 65 42 75 66  st */.  WriteBuf
1790: 66 65 72 20 2a 70 57 72 69 74 65 4c 69 73 74 45  fer *pWriteListE
17a0: 6e 64 3b 20 20 2f 2a 20 45 6e 64 20 6f 66 20 77  nd;  /* End of w
17b0: 72 69 74 65 2d 6c 69 73 74 20 2a 2f 0a 0a 20 20  rite-list */..  
17c0: 69 6e 74 20 69 53 65 63 74 6f 72 53 69 7a 65 3b  int iSectorSize;
17d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
17e0: 56 61 6c 75 65 20 6f 66 20 73 69 6d 75 6c 61 74  Value of simulat
17f0: 65 64 20 73 65 63 74 6f 72 20 73 69 7a 65 20 2a  ed sector size *
1800: 2f 0a 20 20 69 6e 74 20 69 44 65 76 69 63 65 43  /.  int iDeviceC
1810: 68 61 72 61 63 74 65 72 69 73 74 69 63 73 3b 20  haracteristics; 
1820: 20 2f 2a 20 56 61 6c 75 65 20 6f 66 20 73 69 6d   /* Value of sim
1830: 75 6c 61 74 65 64 20 64 65 76 69 63 65 20 63 68  ulated device ch
1840: 61 72 61 63 74 65 72 69 73 74 69 63 73 20 2a 2f  aracteristics */
1850: 0a 0a 20 20 69 6e 74 20 69 43 72 61 73 68 3b 20  ..  int iCrash; 
1860: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1870: 20 2f 2a 20 43 72 61 73 68 20 6f 6e 20 74 68 65   /* Crash on the
1880: 20 69 43 72 61 73 68 27 74 68 20 63 61 6c 6c 20   iCrash'th call 
1890: 74 6f 20 78 53 79 6e 63 28 29 20 2a 2f 0a 20 20  to xSync() */.  
18a0: 63 68 61 72 20 7a 43 72 61 73 68 46 69 6c 65 5b  char zCrashFile[
18b0: 35 30 30 5d 3b 20 20 20 20 20 20 20 20 2f 2a 20  500];        /* 
18c0: 43 72 61 73 68 20 64 75 72 69 6e 67 20 61 6e 20  Crash during an 
18d0: 78 53 79 6e 63 28 29 20 6f 6e 20 74 68 69 73 20  xSync() on this 
18e0: 66 69 6c 65 20 2a 2f 20 0a 7d 3b 0a 0a 73 74 61  file */ .};..sta
18f0: 74 69 63 20 43 72 61 73 68 47 6c 6f 62 61 6c 20  tic CrashGlobal 
1900: 67 20 3d 20 7b 30 2c 20 30 2c 20 53 51 4c 49 54  g = {0, 0, SQLIT
1910: 45 5f 44 45 46 41 55 4c 54 5f 53 45 43 54 4f 52  E_DEFAULT_SECTOR
1920: 5f 53 49 5a 45 2c 20 30 2c 20 30 7d 3b 0a 0a 2f  _SIZE, 0, 0};../
1930: 2a 0a 2a 2a 20 53 65 74 20 74 68 69 73 20 67 6c  *.** Set this gl
1940: 6f 62 61 6c 20 76 61 72 69 61 62 6c 65 20 74 6f  obal variable to
1950: 20 31 20 74 6f 20 65 6e 61 62 6c 65 20 63 72 61   1 to enable cra
1960: 73 68 20 74 65 73 74 69 6e 67 2e 0a 2a 2f 0a 73  sh testing..*/.s
1970: 74 61 74 69 63 20 69 6e 74 20 73 71 6c 69 74 65  tatic int sqlite
1980: 33 43 72 61 73 68 54 65 73 74 45 6e 61 62 6c 65  3CrashTestEnable
1990: 20 3d 20 30 3b 0a 0a 73 74 61 74 69 63 20 76 6f   = 0;..static vo
19a0: 69 64 20 2a 63 72 61 73 68 5f 6d 61 6c 6c 6f 63  id *crash_malloc
19b0: 28 69 6e 74 20 6e 42 79 74 65 29 7b 0a 20 20 72  (int nByte){.  r
19c0: 65 74 75 72 6e 20 28 76 6f 69 64 20 2a 29 54 63  eturn (void *)Tc
19d0: 6c 5f 41 6c 6c 6f 63 28 28 73 69 7a 65 5f 74 29  l_Alloc((size_t)
19e0: 6e 42 79 74 65 29 3b 0a 7d 0a 73 74 61 74 69 63  nByte);.}.static
19f0: 20 76 6f 69 64 20 63 72 61 73 68 5f 66 72 65 65   void crash_free
1a00: 28 76 6f 69 64 20 2a 70 29 7b 0a 20 20 54 63 6c  (void *p){.  Tcl
1a10: 5f 46 72 65 65 28 70 29 3b 0a 7d 0a 73 74 61 74  _Free(p);.}.stat
1a20: 69 63 20 76 6f 69 64 20 2a 63 72 61 73 68 5f 72  ic void *crash_r
1a30: 65 61 6c 6c 6f 63 28 76 6f 69 64 20 2a 70 2c 20  ealloc(void *p, 
1a40: 69 6e 74 20 6e 29 7b 0a 20 20 72 65 74 75 72 6e  int n){.  return
1a50: 20 28 76 6f 69 64 20 2a 29 54 63 6c 5f 52 65 61   (void *)Tcl_Rea
1a60: 6c 6c 6f 63 28 70 2c 20 28 73 69 7a 65 5f 74 29  lloc(p, (size_t)
1a70: 6e 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 72 61  n);.}../*.** Wra
1a80: 70 70 65 72 20 61 72 6f 75 6e 64 20 74 68 65 20  pper around the 
1a90: 73 71 6c 69 74 65 33 4f 73 57 72 69 74 65 28 29  sqlite3OsWrite()
1aa0: 20 66 75 6e 63 74 69 6f 6e 20 74 68 61 74 20 61   function that a
1ab0: 76 6f 69 64 73 20 77 72 69 74 69 6e 67 20 74 6f  voids writing to
1ac0: 20 74 68 65 0a 2a 2a 20 35 31 32 20 62 79 74 65   the.** 512 byte
1ad0: 20 62 6c 6f 63 6b 20 62 65 67 69 6e 69 6e 67 20   block begining 
1ae0: 61 74 20 6f 66 66 73 65 74 20 50 45 4e 44 49 4e  at offset PENDIN
1af0: 47 5f 42 59 54 45 2e 0a 2a 2f 0a 73 74 61 74 69  G_BYTE..*/.stati
1b00: 63 20 69 6e 74 20 77 72 69 74 65 44 62 46 69 6c  c int writeDbFil
1b10: 65 28 43 72 61 73 68 46 69 6c 65 20 2a 70 2c 20  e(CrashFile *p, 
1b20: 75 38 20 2a 7a 2c 20 69 36 34 20 69 41 6d 74 2c  u8 *z, i64 iAmt,
1b30: 20 69 36 34 20 69 4f 66 66 29 7b 0a 20 20 69 6e   i64 iOff){.  in
1b40: 74 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b  t rc = SQLITE_OK
1b50: 3b 0a 20 20 69 6e 74 20 69 53 6b 69 70 20 3d 20  ;.  int iSkip = 
1b60: 30 3b 0a 20 20 69 66 28 20 69 4f 66 66 3d 3d 50  0;.  if( iOff==P
1b70: 45 4e 44 49 4e 47 5f 42 59 54 45 20 26 26 20 28  ENDING_BYTE && (
1b80: 70 2d 3e 66 6c 61 67 73 26 53 51 4c 49 54 45 5f  p->flags&SQLITE_
1b90: 4f 50 45 4e 5f 4d 41 49 4e 5f 44 42 29 20 29 7b  OPEN_MAIN_DB) ){
1ba0: 0a 20 20 20 20 69 53 6b 69 70 20 3d 20 35 31 32  .    iSkip = 512
1bb0: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 28 69 41 6d  ;.  }.  if( (iAm
1bc0: 74 2d 69 53 6b 69 70 29 3e 30 20 29 7b 0a 20 20  t-iSkip)>0 ){.  
1bd0: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 4f 73    rc = sqlite3Os
1be0: 57 72 69 74 65 28 70 2d 3e 70 52 65 61 6c 46 69  Write(p->pRealFi
1bf0: 6c 65 2c 20 26 7a 5b 69 53 6b 69 70 5d 2c 20 28  le, &z[iSkip], (
1c00: 69 6e 74 29 28 69 41 6d 74 2d 69 53 6b 69 70 29  int)(iAmt-iSkip)
1c10: 2c 20 69 4f 66 66 2b 69 53 6b 69 70 29 3b 0a 20  , iOff+iSkip);. 
1c20: 20 7d 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a   }.  return rc;.
1c30: 7d 0a 0a 2f 2a 0a 2a 2a 20 46 6c 75 73 68 20 74  }../*.** Flush t
1c40: 68 65 20 77 72 69 74 65 2d 6c 69 73 74 20 61 73  he write-list as
1c50: 20 69 66 20 78 53 79 6e 63 28 29 20 68 61 64 20   if xSync() had 
1c60: 62 65 65 6e 20 63 61 6c 6c 65 64 20 6f 6e 20 66  been called on f
1c70: 69 6c 65 20 68 61 6e 64 6c 65 0a 2a 2a 20 70 46  ile handle.** pF
1c80: 69 6c 65 2e 20 49 66 20 69 73 43 72 61 73 68 20  ile. If isCrash 
1c90: 69 73 20 74 72 75 65 2c 20 73 69 6d 75 6c 61 74  is true, simulat
1ca0: 65 20 61 20 63 72 61 73 68 2e 0a 2a 2f 0a 73 74  e a crash..*/.st
1cb0: 61 74 69 63 20 69 6e 74 20 77 72 69 74 65 4c 69  atic int writeLi
1cc0: 73 74 53 79 6e 63 28 43 72 61 73 68 46 69 6c 65  stSync(CrashFile
1cd0: 20 2a 70 46 69 6c 65 2c 20 69 6e 74 20 69 73 43   *pFile, int isC
1ce0: 72 61 73 68 29 7b 0a 20 20 69 6e 74 20 72 63 20  rash){.  int rc 
1cf0: 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 69  = SQLITE_OK;.  i
1d00: 6e 74 20 69 44 63 20 3d 20 67 2e 69 44 65 76 69  nt iDc = g.iDevi
1d10: 63 65 43 68 61 72 61 63 74 65 72 69 73 74 69 63  ceCharacteristic
1d20: 73 3b 0a 0a 20 20 57 72 69 74 65 42 75 66 66 65  s;..  WriteBuffe
1d30: 72 20 2a 70 57 72 69 74 65 3b 0a 20 20 57 72 69  r *pWrite;.  Wri
1d40: 74 65 42 75 66 66 65 72 20 2a 2a 70 70 50 74 72  teBuffer **ppPtr
1d50: 3b 0a 0a 20 20 2f 2a 20 49 66 20 74 68 69 73 20  ;..  /* If this 
1d60: 69 73 20 6e 6f 74 20 61 20 63 72 61 73 68 20 73  is not a crash s
1d70: 69 6d 75 6c 61 74 69 6f 6e 2c 20 73 65 74 20 70  imulation, set p
1d80: 46 69 6e 61 6c 20 74 6f 20 70 6f 69 6e 74 20 74  Final to point t
1d90: 6f 20 74 68 65 20 0a 20 20 2a 2a 20 6c 61 73 74  o the .  ** last
1da0: 20 65 6c 65 6d 65 6e 74 20 6f 66 20 74 68 65 20   element of the 
1db0: 77 72 69 74 65 2d 6c 69 73 74 20 74 68 61 74 20  write-list that 
1dc0: 69 73 20 61 73 73 6f 63 69 61 74 65 64 20 77 69  is associated wi
1dd0: 74 68 20 66 69 6c 65 20 68 61 6e 64 6c 65 0a 20  th file handle. 
1de0: 20 2a 2a 20 70 46 69 6c 65 2e 0a 20 20 2a 2a 0a   ** pFile..  **.
1df0: 20 20 2a 2a 20 49 66 20 74 68 69 73 20 69 73 20    ** If this is 
1e00: 61 20 63 72 61 73 68 20 73 69 6d 75 6c 61 74 69  a crash simulati
1e10: 6f 6e 2c 20 73 65 74 20 70 46 69 6e 61 6c 20 74  on, set pFinal t
1e20: 6f 20 61 6e 20 61 72 62 69 74 72 61 72 69 6c 79  o an arbitrarily
1e30: 20 73 65 6c 65 63 74 65 64 0a 20 20 2a 2a 20 65   selected.  ** e
1e40: 6c 65 6d 65 6e 74 20 6f 66 20 74 68 65 20 77 72  lement of the wr
1e50: 69 74 65 2d 6c 69 73 74 2e 0a 20 20 2a 2f 0a 20  ite-list..  */. 
1e60: 20 57 72 69 74 65 42 75 66 66 65 72 20 2a 70 46   WriteBuffer *pF
1e70: 69 6e 61 6c 20 3d 20 30 3b 0a 20 20 69 66 28 20  inal = 0;.  if( 
1e80: 21 69 73 43 72 61 73 68 20 29 7b 0a 20 20 20 20  !isCrash ){.    
1e90: 66 6f 72 28 70 57 72 69 74 65 3d 67 2e 70 57 72  for(pWrite=g.pWr
1ea0: 69 74 65 4c 69 73 74 3b 20 70 57 72 69 74 65 3b  iteList; pWrite;
1eb0: 20 70 57 72 69 74 65 3d 70 57 72 69 74 65 2d 3e   pWrite=pWrite->
1ec0: 70 4e 65 78 74 29 7b 0a 20 20 20 20 20 20 69 66  pNext){.      if
1ed0: 28 20 70 57 72 69 74 65 2d 3e 70 46 69 6c 65 3d  ( pWrite->pFile=
1ee0: 3d 70 46 69 6c 65 20 29 7b 0a 20 20 20 20 20 20  =pFile ){.      
1ef0: 20 20 70 46 69 6e 61 6c 20 3d 20 70 57 72 69 74    pFinal = pWrit
1f00: 65 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  e;.      }.    }
1f10: 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 69 44 63  .  }else if( iDc
1f20: 26 28 53 51 4c 49 54 45 5f 49 4f 43 41 50 5f 53  &(SQLITE_IOCAP_S
1f30: 45 51 55 45 4e 54 49 41 4c 7c 53 51 4c 49 54 45  EQUENTIAL|SQLITE
1f40: 5f 49 4f 43 41 50 5f 53 41 46 45 5f 41 50 50 45  _IOCAP_SAFE_APPE
1f50: 4e 44 29 20 29 7b 0a 20 20 20 20 69 6e 74 20 6e  ND) ){.    int n
1f60: 57 72 69 74 65 20 3d 20 30 3b 0a 20 20 20 20 69  Write = 0;.    i
1f70: 6e 74 20 69 46 69 6e 61 6c 3b 0a 20 20 20 20 66  nt iFinal;.    f
1f80: 6f 72 28 70 57 72 69 74 65 3d 67 2e 70 57 72 69  or(pWrite=g.pWri
1f90: 74 65 4c 69 73 74 3b 20 70 57 72 69 74 65 3b 20  teList; pWrite; 
1fa0: 70 57 72 69 74 65 3d 70 57 72 69 74 65 2d 3e 70  pWrite=pWrite->p
1fb0: 4e 65 78 74 29 20 6e 57 72 69 74 65 2b 2b 3b 0a  Next) nWrite++;.
1fc0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 61 6e 64      sqlite3_rand
1fd0: 6f 6d 6e 65 73 73 28 73 69 7a 65 6f 66 28 69 6e  omness(sizeof(in
1fe0: 74 29 2c 20 26 69 46 69 6e 61 6c 29 3b 0a 20 20  t), &iFinal);.  
1ff0: 20 20 69 46 69 6e 61 6c 20 3d 20 28 28 69 46 69    iFinal = ((iFi
2000: 6e 61 6c 3c 30 29 3f 2d 31 2a 69 46 69 6e 61 6c  nal<0)?-1*iFinal
2010: 3a 69 46 69 6e 61 6c 29 25 6e 57 72 69 74 65 3b  :iFinal)%nWrite;
2020: 0a 20 20 20 20 66 6f 72 28 70 57 72 69 74 65 3d  .    for(pWrite=
2030: 67 2e 70 57 72 69 74 65 4c 69 73 74 3b 20 69 46  g.pWriteList; iF
2040: 69 6e 61 6c 3e 30 3b 20 70 57 72 69 74 65 3d 70  inal>0; pWrite=p
2050: 57 72 69 74 65 2d 3e 70 4e 65 78 74 29 20 69 46  Write->pNext) iF
2060: 69 6e 61 6c 2d 2d 3b 0a 20 20 20 20 70 46 69 6e  inal--;.    pFin
2070: 61 6c 20 3d 20 70 57 72 69 74 65 3b 0a 20 20 7d  al = pWrite;.  }
2080: 0a 0a 23 69 66 64 65 66 20 54 52 41 43 45 5f 43  ..#ifdef TRACE_C
2090: 52 41 53 48 54 45 53 54 0a 20 20 70 72 69 6e 74  RASHTEST.  print
20a0: 66 28 22 53 79 6e 63 20 25 73 20 28 69 73 20 25  f("Sync %s (is %
20b0: 73 20 63 72 61 73 68 29 5c 6e 22 2c 20 70 46 69  s crash)\n", pFi
20c0: 6c 65 2d 3e 7a 4e 61 6d 65 2c 20 28 69 73 43 72  le->zName, (isCr
20d0: 61 73 68 3f 22 61 22 3a 22 6e 6f 74 20 61 22 29  ash?"a":"not a")
20e0: 29 3b 0a 23 65 6e 64 69 66 0a 0a 20 20 70 70 50  );.#endif..  ppP
20f0: 74 72 20 3d 20 26 67 2e 70 57 72 69 74 65 4c 69  tr = &g.pWriteLi
2100: 73 74 3b 0a 20 20 66 6f 72 28 70 57 72 69 74 65  st;.  for(pWrite
2110: 3d 2a 70 70 50 74 72 3b 20 72 63 3d 3d 53 51 4c  =*ppPtr; rc==SQL
2120: 49 54 45 5f 4f 4b 20 26 26 20 70 57 72 69 74 65  ITE_OK && pWrite
2130: 3b 20 70 57 72 69 74 65 3d 2a 70 70 50 74 72 29  ; pWrite=*ppPtr)
2140: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 66 69  {.    sqlite3_fi
2150: 6c 65 20 2a 70 52 65 61 6c 46 69 6c 65 20 3d 20  le *pRealFile = 
2160: 70 57 72 69 74 65 2d 3e 70 46 69 6c 65 2d 3e 70  pWrite->pFile->p
2170: 52 65 61 6c 46 69 6c 65 3b 0a 0a 20 20 20 20 2f  RealFile;..    /
2180: 2a 20 28 65 41 63 74 69 6f 6e 3d 3d 31 29 20 20  * (eAction==1)  
2190: 20 20 20 20 2d 3e 20 77 72 69 74 65 20 62 6c 6f      -> write blo
21a0: 63 6b 20 6f 75 74 20 6e 6f 72 6d 61 6c 6c 79 2c  ck out normally,
21b0: 0a 20 20 20 20 2a 2a 20 28 65 41 63 74 69 6f 6e  .    ** (eAction
21c0: 3d 3d 32 29 20 20 20 20 20 20 2d 3e 20 64 6f 20  ==2)      -> do 
21d0: 6e 6f 74 68 69 6e 67 2c 0a 20 20 20 20 2a 2a 20  nothing,.    ** 
21e0: 28 65 41 63 74 69 6f 6e 3d 3d 33 29 20 20 20 20  (eAction==3)    
21f0: 20 20 2d 3e 20 74 72 61 73 68 20 73 65 63 74 6f    -> trash secto
2200: 72 73 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 69  rs..    */.    i
2210: 6e 74 20 65 41 63 74 69 6f 6e 20 3d 20 30 3b 0a  nt eAction = 0;.
2220: 20 20 20 20 69 66 28 20 21 69 73 43 72 61 73 68      if( !isCrash
2230: 20 29 7b 0a 20 20 20 20 20 20 65 41 63 74 69 6f   ){.      eActio
2240: 6e 20 3d 20 32 3b 0a 20 20 20 20 20 20 69 66 28  n = 2;.      if(
2250: 20 28 70 57 72 69 74 65 2d 3e 70 46 69 6c 65 3d   (pWrite->pFile=
2260: 3d 70 46 69 6c 65 20 7c 7c 20 69 44 63 26 53 51  =pFile || iDc&SQ
2270: 4c 49 54 45 5f 49 4f 43 41 50 5f 53 45 51 55 45  LITE_IOCAP_SEQUE
2280: 4e 54 49 41 4c 29 20 29 7b 0a 20 20 20 20 20 20  NTIAL) ){.      
2290: 20 20 65 41 63 74 69 6f 6e 20 3d 20 31 3b 0a 20    eAction = 1;. 
22a0: 20 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65       }.    }else
22b0: 7b 0a 20 20 20 20 20 20 63 68 61 72 20 72 61 6e  {.      char ran
22c0: 64 6f 6d 3b 0a 20 20 20 20 20 20 73 71 6c 69 74  dom;.      sqlit
22d0: 65 33 5f 72 61 6e 64 6f 6d 6e 65 73 73 28 31 2c  e3_randomness(1,
22e0: 20 26 72 61 6e 64 6f 6d 29 3b 0a 0a 20 20 20 20   &random);..    
22f0: 20 20 2f 2a 20 44 6f 20 6e 6f 74 20 73 65 6c 65    /* Do not sele
2300: 63 74 20 6f 70 74 69 6f 6e 20 33 20 28 73 65 63  ct option 3 (sec
2310: 74 6f 72 20 74 72 61 73 68 69 6e 67 29 20 69 66  tor trashing) if
2320: 20 74 68 65 20 49 4f 43 41 50 5f 41 54 4f 4d 49   the IOCAP_ATOMI
2330: 43 20 66 6c 61 67 20 0a 20 20 20 20 20 20 2a 2a  C flag .      **
2340: 20 69 73 20 73 65 74 20 6f 72 20 74 68 69 73 20   is set or this 
2350: 69 73 20 61 6e 20 4f 73 54 72 75 6e 63 61 74 65  is an OsTruncate
2360: 28 29 2c 20 6e 6f 74 20 61 6e 20 4f 73 77 72 69  (), not an Oswri
2370: 74 65 28 29 2e 0a 20 20 20 20 20 20 2a 2f 0a 20  te()..      */. 
2380: 20 20 20 20 20 69 66 28 20 28 69 44 63 26 53 51       if( (iDc&SQ
2390: 4c 49 54 45 5f 49 4f 43 41 50 5f 41 54 4f 4d 49  LITE_IOCAP_ATOMI
23a0: 43 29 20 7c 7c 20 28 70 57 72 69 74 65 2d 3e 7a  C) || (pWrite->z
23b0: 42 75 66 3d 3d 30 29 20 29 7b 0a 20 20 20 20 20  Buf==0) ){.     
23c0: 20 20 20 72 61 6e 64 6f 6d 20 26 3d 20 30 78 30     random &= 0x0
23d0: 31 3b 0a 20 20 20 20 20 20 7d 0a 0a 20 20 20 20  1;.      }..    
23e0: 20 20 2f 2a 20 49 66 20 49 4f 43 41 50 5f 53 45    /* If IOCAP_SE
23f0: 51 55 45 4e 54 49 41 4c 20 69 73 20 73 65 74 20  QUENTIAL is set 
2400: 61 6e 64 20 74 68 69 73 20 69 73 20 6e 6f 74 20  and this is not 
2410: 74 68 65 20 66 69 6e 61 6c 20 65 6e 74 72 79 0a  the final entry.
2420: 20 20 20 20 20 20 2a 2a 20 69 6e 20 74 68 65 20        ** in the 
2430: 74 72 75 6e 63 61 74 65 64 20 77 72 69 74 65 2d  truncated write-
2440: 6c 69 73 74 2c 20 61 6c 77 61 79 73 20 73 65 6c  list, always sel
2450: 65 63 74 20 6f 70 74 69 6f 6e 20 31 20 28 77 72  ect option 1 (wr
2460: 69 74 65 0a 20 20 20 20 20 20 2a 2a 20 6f 75 74  ite.      ** out
2470: 20 63 6f 72 72 65 63 74 6c 79 29 2e 0a 20 20 20   correctly)..   
2480: 20 20 20 2a 2f 0a 20 20 20 20 20 20 69 66 28 20     */.      if( 
2490: 28 69 44 63 26 53 51 4c 49 54 45 5f 49 4f 43 41  (iDc&SQLITE_IOCA
24a0: 50 5f 53 45 51 55 45 4e 54 49 41 4c 20 26 26 20  P_SEQUENTIAL && 
24b0: 70 57 72 69 74 65 21 3d 70 46 69 6e 61 6c 29 20  pWrite!=pFinal) 
24c0: 29 7b 0a 20 20 20 20 20 20 20 20 72 61 6e 64 6f  ){.        rando
24d0: 6d 20 3d 20 30 3b 0a 20 20 20 20 20 20 7d 0a 0a  m = 0;.      }..
24e0: 20 20 20 20 20 20 2f 2a 20 49 66 20 49 4f 43 41        /* If IOCA
24f0: 50 5f 53 41 46 45 5f 41 50 50 45 4e 44 20 69 73  P_SAFE_APPEND is
2500: 20 73 65 74 20 61 6e 64 20 74 68 69 73 20 4f 73   set and this Os
2510: 57 72 69 74 65 28 29 20 6f 70 65 72 61 74 69 6f  Write() operatio
2520: 6e 20 69 73 0a 20 20 20 20 20 20 2a 2a 20 61 6e  n is.      ** an
2530: 20 61 70 70 65 6e 64 20 28 66 69 72 73 74 20 62   append (first b
2540: 79 74 65 20 6f 66 20 74 68 65 20 77 72 69 74 74  yte of the writt
2550: 65 6e 20 72 65 67 69 6f 6e 20 69 73 20 31 20 62  en region is 1 b
2560: 79 74 65 20 70 61 73 74 20 74 68 65 0a 20 20 20  yte past the.   
2570: 20 20 20 2a 2a 20 63 75 72 72 65 6e 74 20 45 4f     ** current EO
2580: 46 29 2c 20 61 6c 77 61 79 73 20 73 65 6c 65 63  F), always selec
2590: 74 20 6f 70 74 69 6f 6e 20 31 20 28 77 72 69 74  t option 1 (writ
25a0: 65 20 6f 75 74 20 63 6f 72 72 65 63 74 6c 79 29  e out correctly)
25b0: 2e 0a 20 20 20 20 20 20 2a 2f 0a 20 20 20 20 20  ..      */.     
25c0: 20 69 66 28 20 69 44 63 26 53 51 4c 49 54 45 5f   if( iDc&SQLITE_
25d0: 49 4f 43 41 50 5f 53 41 46 45 5f 41 50 50 45 4e  IOCAP_SAFE_APPEN
25e0: 44 20 26 26 20 70 57 72 69 74 65 2d 3e 7a 42 75  D && pWrite->zBu
25f0: 66 20 29 7b 0a 20 20 20 20 20 20 20 20 69 36 34  f ){.        i64
2600: 20 69 53 69 7a 65 3b 0a 20 20 20 20 20 20 20 20   iSize;.        
2610: 73 71 6c 69 74 65 33 4f 73 46 69 6c 65 53 69 7a  sqlite3OsFileSiz
2620: 65 28 70 52 65 61 6c 46 69 6c 65 2c 20 26 69 53  e(pRealFile, &iS
2630: 69 7a 65 29 3b 0a 20 20 20 20 20 20 20 20 69 66  ize);.        if
2640: 28 20 69 53 69 7a 65 3d 3d 70 57 72 69 74 65 2d  ( iSize==pWrite-
2650: 3e 69 4f 66 66 73 65 74 20 29 7b 0a 20 20 20 20  >iOffset ){.    
2660: 20 20 20 20 20 20 72 61 6e 64 6f 6d 20 3d 20 30        random = 0
2670: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20  ;.        }.    
2680: 20 20 7d 0a 0a 20 20 20 20 20 20 69 66 28 20 28    }..      if( (
2690: 72 61 6e 64 6f 6d 26 30 78 30 36 29 3d 3d 30 78  random&0x06)==0x
26a0: 30 36 20 29 7b 0a 20 20 20 20 20 20 20 20 65 41  06 ){.        eA
26b0: 63 74 69 6f 6e 20 3d 20 33 3b 0a 20 20 20 20 20  ction = 3;.     
26c0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20   }else{.        
26d0: 65 41 63 74 69 6f 6e 20 3d 20 28 28 72 61 6e 64  eAction = ((rand
26e0: 6f 6d 26 30 78 30 31 29 3f 32 3a 31 29 3b 0a 20  om&0x01)?2:1);. 
26f0: 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 0a 20 20       }.    }..  
2700: 20 20 73 77 69 74 63 68 28 20 65 41 63 74 69 6f    switch( eActio
2710: 6e 20 29 7b 0a 20 20 20 20 20 20 63 61 73 65 20  n ){.      case 
2720: 31 3a 20 7b 20 20 20 20 20 20 20 20 20 20 20 20  1: {            
2730: 20 20 20 2f 2a 20 57 72 69 74 65 20 6f 75 74 20     /* Write out 
2740: 63 6f 72 72 65 63 74 6c 79 20 2a 2f 0a 20 20 20  correctly */.   
2750: 20 20 20 20 20 69 66 28 20 70 57 72 69 74 65 2d       if( pWrite-
2760: 3e 7a 42 75 66 20 29 7b 0a 20 20 20 20 20 20 20  >zBuf ){.       
2770: 20 20 20 72 63 20 3d 20 77 72 69 74 65 44 62 46     rc = writeDbF
2780: 69 6c 65 28 0a 20 20 20 20 20 20 20 20 20 20 20  ile(.           
2790: 20 20 20 70 57 72 69 74 65 2d 3e 70 46 69 6c 65     pWrite->pFile
27a0: 2c 20 70 57 72 69 74 65 2d 3e 7a 42 75 66 2c 20  , pWrite->zBuf, 
27b0: 70 57 72 69 74 65 2d 3e 6e 42 75 66 2c 20 70 57  pWrite->nBuf, pW
27c0: 72 69 74 65 2d 3e 69 4f 66 66 73 65 74 0a 20 20  rite->iOffset.  
27d0: 20 20 20 20 20 20 20 20 29 3b 0a 20 20 20 20 20          );.     
27e0: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
27f0: 20 20 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33      rc = sqlite3
2800: 4f 73 54 72 75 6e 63 61 74 65 28 70 52 65 61 6c  OsTruncate(pReal
2810: 46 69 6c 65 2c 20 70 57 72 69 74 65 2d 3e 69 4f  File, pWrite->iO
2820: 66 66 73 65 74 29 3b 0a 20 20 20 20 20 20 20 20  ffset);.        
2830: 7d 0a 20 20 20 20 20 20 20 20 2a 70 70 50 74 72  }.        *ppPtr
2840: 20 3d 20 70 57 72 69 74 65 2d 3e 70 4e 65 78 74   = pWrite->pNext
2850: 3b 0a 23 69 66 64 65 66 20 54 52 41 43 45 5f 43  ;.#ifdef TRACE_C
2860: 52 41 53 48 54 45 53 54 0a 20 20 20 20 20 20 20  RASHTEST.       
2870: 20 69 66 28 20 69 73 43 72 61 73 68 20 29 7b 0a   if( isCrash ){.
2880: 20 20 20 20 20 20 20 20 20 20 70 72 69 6e 74 66            printf
2890: 28 22 57 72 69 74 69 6e 67 20 25 64 20 62 79 74  ("Writing %d byt
28a0: 65 73 20 40 20 25 64 20 28 25 73 29 5c 6e 22 2c  es @ %d (%s)\n",
28b0: 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 70 57   .            pW
28c0: 72 69 74 65 2d 3e 6e 42 75 66 2c 20 28 69 6e 74  rite->nBuf, (int
28d0: 29 70 57 72 69 74 65 2d 3e 69 4f 66 66 73 65 74  )pWrite->iOffset
28e0: 2c 20 70 57 72 69 74 65 2d 3e 70 46 69 6c 65 2d  , pWrite->pFile-
28f0: 3e 7a 4e 61 6d 65 0a 20 20 20 20 20 20 20 20 20  >zName.         
2900: 20 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 23 65   );.        }.#e
2910: 6e 64 69 66 0a 20 20 20 20 20 20 20 20 63 72 61  ndif.        cra
2920: 73 68 5f 66 72 65 65 28 70 57 72 69 74 65 29 3b  sh_free(pWrite);
2930: 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a  .        break;.
2940: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 63 61        }.      ca
2950: 73 65 20 32 3a 20 7b 20 20 20 20 20 20 20 20 20  se 2: {         
2960: 20 20 20 20 20 20 2f 2a 20 44 6f 20 6e 6f 74 68        /* Do noth
2970: 69 6e 67 20 2a 2f 0a 20 20 20 20 20 20 20 20 70  ing */.        p
2980: 70 50 74 72 20 3d 20 26 70 57 72 69 74 65 2d 3e  pPtr = &pWrite->
2990: 70 4e 65 78 74 3b 0a 23 69 66 64 65 66 20 54 52  pNext;.#ifdef TR
29a0: 41 43 45 5f 43 52 41 53 48 54 45 53 54 0a 20 20  ACE_CRASHTEST.  
29b0: 20 20 20 20 20 20 69 66 28 20 69 73 43 72 61 73        if( isCras
29c0: 68 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 70  h ){.          p
29d0: 72 69 6e 74 66 28 22 4f 6d 69 74 69 6e 67 20 25  rintf("Omiting %
29e0: 64 20 62 79 74 65 73 20 40 20 25 64 20 28 25 73  d bytes @ %d (%s
29f0: 29 5c 6e 22 2c 20 0a 20 20 20 20 20 20 20 20 20  )\n", .         
2a00: 20 20 20 70 57 72 69 74 65 2d 3e 6e 42 75 66 2c     pWrite->nBuf,
2a10: 20 28 69 6e 74 29 70 57 72 69 74 65 2d 3e 69 4f   (int)pWrite->iO
2a20: 66 66 73 65 74 2c 20 70 57 72 69 74 65 2d 3e 70  ffset, pWrite->p
2a30: 46 69 6c 65 2d 3e 7a 4e 61 6d 65 0a 20 20 20 20  File->zName.    
2a40: 20 20 20 20 20 20 29 3b 0a 20 20 20 20 20 20 20        );.       
2a50: 20 7d 0a 23 65 6e 64 69 66 0a 20 20 20 20 20 20   }.#endif.      
2a60: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 7d    break;.      }
2a70: 0a 20 20 20 20 20 20 63 61 73 65 20 33 3a 20 7b  .      case 3: {
2a80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
2a90: 2a 20 54 72 61 73 68 20 73 65 63 74 6f 72 73 20  * Trash sectors 
2aa0: 2a 2f 0a 20 20 20 20 20 20 20 20 75 38 20 2a 7a  */.        u8 *z
2ab0: 47 61 72 62 61 67 65 3b 0a 20 20 20 20 20 20 20  Garbage;.       
2ac0: 20 69 6e 74 20 69 46 69 72 73 74 20 3d 20 28 69   int iFirst = (i
2ad0: 6e 74 29 28 70 57 72 69 74 65 2d 3e 69 4f 66 66  nt)(pWrite->iOff
2ae0: 73 65 74 2f 67 2e 69 53 65 63 74 6f 72 53 69 7a  set/g.iSectorSiz
2af0: 65 29 3b 0a 20 20 20 20 20 20 20 20 69 6e 74 20  e);.        int 
2b00: 69 4c 61 73 74 20 3d 20 28 69 6e 74 29 28 28 70  iLast = (int)((p
2b10: 57 72 69 74 65 2d 3e 69 4f 66 66 73 65 74 2b 70  Write->iOffset+p
2b20: 57 72 69 74 65 2d 3e 6e 42 75 66 2d 31 29 2f 67  Write->nBuf-1)/g
2b30: 2e 69 53 65 63 74 6f 72 53 69 7a 65 29 3b 0a 0a  .iSectorSize);..
2b40: 20 20 20 20 20 20 20 20 61 73 73 65 72 74 28 70          assert(p
2b50: 57 72 69 74 65 2d 3e 7a 42 75 66 29 3b 0a 0a 23  Write->zBuf);..#
2b60: 69 66 64 65 66 20 54 52 41 43 45 5f 43 52 41 53  ifdef TRACE_CRAS
2b70: 48 54 45 53 54 0a 20 20 20 20 20 20 20 20 70 72  HTEST.        pr
2b80: 69 6e 74 66 28 22 54 72 61 73 68 69 6e 67 20 25  intf("Trashing %
2b90: 64 20 73 65 63 74 6f 72 73 20 40 20 73 65 63 74  d sectors @ sect
2ba0: 6f 72 20 25 64 20 28 25 73 29 5c 6e 22 2c 20 0a  or %d (%s)\n", .
2bb0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2b 69 4c              1+iL
2bc0: 61 73 74 2d 69 46 69 72 73 74 2c 20 69 46 69 72  ast-iFirst, iFir
2bd0: 73 74 2c 20 70 57 72 69 74 65 2d 3e 70 46 69 6c  st, pWrite->pFil
2be0: 65 2d 3e 7a 4e 61 6d 65 0a 20 20 20 20 20 20 20  e->zName.       
2bf0: 20 29 3b 0a 23 65 6e 64 69 66 0a 0a 20 20 20 20   );.#endif..    
2c00: 20 20 20 20 7a 47 61 72 62 61 67 65 20 3d 20 63      zGarbage = c
2c10: 72 61 73 68 5f 6d 61 6c 6c 6f 63 28 67 2e 69 53  rash_malloc(g.iS
2c20: 65 63 74 6f 72 53 69 7a 65 29 3b 0a 20 20 20 20  ectorSize);.    
2c30: 20 20 20 20 69 66 28 20 7a 47 61 72 62 61 67 65      if( zGarbage
2c40: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 73 71   ){.          sq
2c50: 6c 69 74 65 33 5f 69 6e 74 36 34 20 69 3b 0a 20  lite3_int64 i;. 
2c60: 20 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d 69           for(i=i
2c70: 46 69 72 73 74 3b 20 72 63 3d 3d 53 51 4c 49 54  First; rc==SQLIT
2c80: 45 5f 4f 4b 20 26 26 20 69 3c 3d 69 4c 61 73 74  E_OK && i<=iLast
2c90: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20  ; i++){.        
2ca0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 61 6e 64      sqlite3_rand
2cb0: 6f 6d 6e 65 73 73 28 67 2e 69 53 65 63 74 6f 72  omness(g.iSector
2cc0: 53 69 7a 65 2c 20 7a 47 61 72 62 61 67 65 29 3b  Size, zGarbage);
2cd0: 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 72 63   .            rc
2ce0: 20 3d 20 77 72 69 74 65 44 62 46 69 6c 65 28 0a   = writeDbFile(.
2cf0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 57                pW
2d00: 72 69 74 65 2d 3e 70 46 69 6c 65 2c 20 7a 47 61  rite->pFile, zGa
2d10: 72 62 61 67 65 2c 20 67 2e 69 53 65 63 74 6f 72  rbage, g.iSector
2d20: 53 69 7a 65 2c 20 69 2a 67 2e 69 53 65 63 74 6f  Size, i*g.iSecto
2d30: 72 53 69 7a 65 0a 20 20 20 20 20 20 20 20 20 20  rSize.          
2d40: 20 20 29 3b 0a 20 20 20 20 20 20 20 20 20 20 7d    );.          }
2d50: 0a 20 20 20 20 20 20 20 20 20 20 63 72 61 73 68  .          crash
2d60: 5f 66 72 65 65 28 7a 47 61 72 62 61 67 65 29 3b  _free(zGarbage);
2d70: 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a  .        }else{.
2d80: 20 20 20 20 20 20 20 20 20 20 72 63 20 3d 20 53            rc = S
2d90: 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 20  QLITE_NOMEM;.   
2da0: 20 20 20 20 20 7d 0a 0a 20 20 20 20 20 20 20 20       }..        
2db0: 70 70 50 74 72 20 3d 20 26 70 57 72 69 74 65 2d  ppPtr = &pWrite-
2dc0: 3e 70 4e 65 78 74 3b 0a 20 20 20 20 20 20 20 20  >pNext;.        
2dd0: 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 7d 0a 0a  break;.      }..
2de0: 20 20 20 20 20 20 64 65 66 61 75 6c 74 3a 0a 20        default:. 
2df0: 20 20 20 20 20 20 20 61 73 73 65 72 74 28 21 22         assert(!"
2e00: 43 61 6e 6e 6f 74 20 68 61 70 70 65 6e 22 29 3b  Cannot happen");
2e10: 0a 20 20 20 20 7d 0a 0a 20 20 20 20 69 66 28 20  .    }..    if( 
2e20: 70 57 72 69 74 65 3d 3d 70 46 69 6e 61 6c 20 29  pWrite==pFinal )
2e30: 20 62 72 65 61 6b 3b 0a 20 20 7d 0a 0a 20 20 69   break;.  }..  i
2e40: 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b  f( rc==SQLITE_OK
2e50: 20 26 26 20 69 73 43 72 61 73 68 20 29 7b 0a 20   && isCrash ){. 
2e60: 20 20 20 65 78 69 74 28 2d 31 29 3b 0a 20 20 7d     exit(-1);.  }
2e70: 0a 0a 20 20 66 6f 72 28 70 57 72 69 74 65 3d 67  ..  for(pWrite=g
2e80: 2e 70 57 72 69 74 65 4c 69 73 74 3b 20 70 57 72  .pWriteList; pWr
2e90: 69 74 65 20 26 26 20 70 57 72 69 74 65 2d 3e 70  ite && pWrite->p
2ea0: 4e 65 78 74 3b 20 70 57 72 69 74 65 3d 70 57 72  Next; pWrite=pWr
2eb0: 69 74 65 2d 3e 70 4e 65 78 74 29 3b 0a 20 20 67  ite->pNext);.  g
2ec0: 2e 70 57 72 69 74 65 4c 69 73 74 45 6e 64 20 3d  .pWriteListEnd =
2ed0: 20 70 57 72 69 74 65 3b 0a 0a 20 20 72 65 74 75   pWrite;..  retu
2ee0: 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  rn rc;.}../*.** 
2ef0: 41 64 64 20 61 6e 20 65 6e 74 72 79 20 74 6f 20  Add an entry to 
2f00: 74 68 65 20 65 6e 64 20 6f 66 20 74 68 65 20 77  the end of the w
2f10: 72 69 74 65 2d 6c 69 73 74 2e 0a 2a 2f 0a 73 74  rite-list..*/.st
2f20: 61 74 69 63 20 69 6e 74 20 77 72 69 74 65 4c 69  atic int writeLi
2f30: 73 74 41 70 70 65 6e 64 28 0a 20 20 73 71 6c 69  stAppend(.  sqli
2f40: 74 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65 2c  te3_file *pFile,
2f50: 0a 20 20 73 71 6c 69 74 65 33 5f 69 6e 74 36 34  .  sqlite3_int64
2f60: 20 69 4f 66 66 73 65 74 2c 0a 20 20 63 6f 6e 73   iOffset,.  cons
2f70: 74 20 75 38 20 2a 7a 42 75 66 2c 0a 20 20 69 6e  t u8 *zBuf,.  in
2f80: 74 20 6e 42 75 66 0a 29 7b 0a 20 20 57 72 69 74  t nBuf.){.  Writ
2f90: 65 42 75 66 66 65 72 20 2a 70 4e 65 77 3b 0a 0a  eBuffer *pNew;..
2fa0: 20 20 61 73 73 65 72 74 28 28 7a 42 75 66 20 26    assert((zBuf &
2fb0: 26 20 6e 42 75 66 29 20 7c 7c 20 28 21 6e 42 75  & nBuf) || (!nBu
2fc0: 66 20 26 26 20 21 7a 42 75 66 29 29 3b 0a 0a 20  f && !zBuf));.. 
2fd0: 20 70 4e 65 77 20 3d 20 28 57 72 69 74 65 42 75   pNew = (WriteBu
2fe0: 66 66 65 72 20 2a 29 63 72 61 73 68 5f 6d 61 6c  ffer *)crash_mal
2ff0: 6c 6f 63 28 73 69 7a 65 6f 66 28 57 72 69 74 65  loc(sizeof(Write
3000: 42 75 66 66 65 72 29 20 2b 20 6e 42 75 66 29 3b  Buffer) + nBuf);
3010: 0a 20 20 69 66 28 20 70 4e 65 77 3d 3d 30 20 29  .  if( pNew==0 )
3020: 7b 0a 20 20 20 20 66 70 72 69 6e 74 66 28 73 74  {.    fprintf(st
3030: 64 65 72 72 2c 20 22 6f 75 74 20 6f 66 20 6d 65  derr, "out of me
3040: 6d 6f 72 79 20 69 6e 20 74 68 65 20 63 72 61 73  mory in the cras
3050: 68 20 73 69 6d 75 6c 61 74 6f 72 5c 6e 22 29 3b  h simulator\n");
3060: 0a 20 20 7d 0a 20 20 6d 65 6d 73 65 74 28 70 4e  .  }.  memset(pN
3070: 65 77 2c 20 30 2c 20 73 69 7a 65 6f 66 28 57 72  ew, 0, sizeof(Wr
3080: 69 74 65 42 75 66 66 65 72 29 2b 6e 42 75 66 29  iteBuffer)+nBuf)
3090: 3b 0a 20 20 70 4e 65 77 2d 3e 69 4f 66 66 73 65  ;.  pNew->iOffse
30a0: 74 20 3d 20 69 4f 66 66 73 65 74 3b 0a 20 20 70  t = iOffset;.  p
30b0: 4e 65 77 2d 3e 6e 42 75 66 20 3d 20 6e 42 75 66  New->nBuf = nBuf
30c0: 3b 0a 20 20 70 4e 65 77 2d 3e 70 46 69 6c 65 20  ;.  pNew->pFile 
30d0: 3d 20 28 43 72 61 73 68 46 69 6c 65 20 2a 29 70  = (CrashFile *)p
30e0: 46 69 6c 65 3b 0a 20 20 69 66 28 20 7a 42 75 66  File;.  if( zBuf
30f0: 20 29 7b 0a 20 20 20 20 70 4e 65 77 2d 3e 7a 42   ){.    pNew->zB
3100: 75 66 20 3d 20 28 75 38 20 2a 29 26 70 4e 65 77  uf = (u8 *)&pNew
3110: 5b 31 5d 3b 0a 20 20 20 20 6d 65 6d 63 70 79 28  [1];.    memcpy(
3120: 70 4e 65 77 2d 3e 7a 42 75 66 2c 20 7a 42 75 66  pNew->zBuf, zBuf
3130: 2c 20 6e 42 75 66 29 3b 0a 20 20 7d 0a 0a 20 20  , nBuf);.  }..  
3140: 69 66 28 20 67 2e 70 57 72 69 74 65 4c 69 73 74  if( g.pWriteList
3150: 20 29 7b 0a 20 20 20 20 61 73 73 65 72 74 28 67   ){.    assert(g
3160: 2e 70 57 72 69 74 65 4c 69 73 74 45 6e 64 29 3b  .pWriteListEnd);
3170: 0a 20 20 20 20 67 2e 70 57 72 69 74 65 4c 69 73  .    g.pWriteLis
3180: 74 45 6e 64 2d 3e 70 4e 65 78 74 20 3d 20 70 4e  tEnd->pNext = pN
3190: 65 77 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ew;.  }else{.   
31a0: 20 67 2e 70 57 72 69 74 65 4c 69 73 74 20 3d 20   g.pWriteList = 
31b0: 70 4e 65 77 3b 0a 20 20 7d 0a 20 20 67 2e 70 57  pNew;.  }.  g.pW
31c0: 72 69 74 65 4c 69 73 74 45 6e 64 20 3d 20 70 4e  riteListEnd = pN
31d0: 65 77 3b 0a 20 20 0a 20 20 72 65 74 75 72 6e 20  ew;.  .  return 
31e0: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a  SQLITE_OK;.}../*
31f0: 0a 2a 2a 20 43 6c 6f 73 65 20 61 20 63 72 61 73  .** Close a cras
3200: 68 2d 66 69 6c 65 2e 0a 2a 2f 0a 73 74 61 74 69  h-file..*/.stati
3210: 63 20 69 6e 74 20 63 66 43 6c 6f 73 65 28 73 71  c int cfClose(sq
3220: 6c 69 74 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c  lite3_file *pFil
3230: 65 29 7b 0a 20 20 43 72 61 73 68 46 69 6c 65 20  e){.  CrashFile 
3240: 2a 70 43 72 61 73 68 20 3d 20 28 43 72 61 73 68  *pCrash = (Crash
3250: 46 69 6c 65 20 2a 29 70 46 69 6c 65 3b 0a 20 20  File *)pFile;.  
3260: 77 72 69 74 65 4c 69 73 74 53 79 6e 63 28 70 43  writeListSync(pC
3270: 72 61 73 68 2c 20 30 29 3b 0a 20 20 73 71 6c 69  rash, 0);.  sqli
3280: 74 65 33 4f 73 43 6c 6f 73 65 28 70 43 72 61 73  te3OsClose(pCras
3290: 68 2d 3e 70 52 65 61 6c 46 69 6c 65 29 3b 0a 20  h->pRealFile);. 
32a0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f   return SQLITE_O
32b0: 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 61 64  K;.}../*.** Read
32c0: 20 64 61 74 61 20 66 72 6f 6d 20 61 20 63 72 61   data from a cra
32d0: 73 68 2d 66 69 6c 65 2e 0a 2a 2f 0a 73 74 61 74  sh-file..*/.stat
32e0: 69 63 20 69 6e 74 20 63 66 52 65 61 64 28 0a 20  ic int cfRead(. 
32f0: 20 73 71 6c 69 74 65 33 5f 66 69 6c 65 20 2a 70   sqlite3_file *p
3300: 46 69 6c 65 2c 20 0a 20 20 76 6f 69 64 20 2a 7a  File, .  void *z
3310: 42 75 66 2c 20 0a 20 20 69 6e 74 20 69 41 6d 74  Buf, .  int iAmt
3320: 2c 20 0a 20 20 73 71 6c 69 74 65 5f 69 6e 74 36  , .  sqlite_int6
3330: 34 20 69 4f 66 73 74 0a 29 7b 0a 20 20 43 72 61  4 iOfst.){.  Cra
3340: 73 68 46 69 6c 65 20 2a 70 43 72 61 73 68 20 3d  shFile *pCrash =
3350: 20 28 43 72 61 73 68 46 69 6c 65 20 2a 29 70 46   (CrashFile *)pF
3360: 69 6c 65 3b 0a 0a 20 20 2f 2a 20 43 68 65 63 6b  ile;..  /* Check
3370: 20 74 68 65 20 66 69 6c 65 2d 73 69 7a 65 20 74   the file-size t
3380: 6f 20 73 65 65 20 69 66 20 74 68 69 73 20 69 73  o see if this is
3390: 20 61 20 73 68 6f 72 74 2d 72 65 61 64 20 2a 2f   a short-read */
33a0: 0a 20 20 69 66 28 20 70 43 72 61 73 68 2d 3e 69  .  if( pCrash->i
33b0: 53 69 7a 65 3c 28 69 4f 66 73 74 2b 69 41 6d 74  Size<(iOfst+iAmt
33c0: 29 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20  ) ){.    return 
33d0: 53 51 4c 49 54 45 5f 49 4f 45 52 52 5f 53 48 4f  SQLITE_IOERR_SHO
33e0: 52 54 5f 52 45 41 44 3b 0a 20 20 7d 0a 0a 20 20  RT_READ;.  }..  
33f0: 6d 65 6d 63 70 79 28 7a 42 75 66 2c 20 26 70 43  memcpy(zBuf, &pC
3400: 72 61 73 68 2d 3e 7a 44 61 74 61 5b 69 4f 66 73  rash->zData[iOfs
3410: 74 5d 2c 20 69 41 6d 74 29 3b 0a 20 20 72 65 74  t], iAmt);.  ret
3420: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d  urn SQLITE_OK;.}
3430: 0a 0a 2f 2a 0a 2a 2a 20 57 72 69 74 65 20 64 61  ../*.** Write da
3440: 74 61 20 74 6f 20 61 20 63 72 61 73 68 2d 66 69  ta to a crash-fi
3450: 6c 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e  le..*/.static in
3460: 74 20 63 66 57 72 69 74 65 28 0a 20 20 73 71 6c  t cfWrite(.  sql
3470: 69 74 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65  ite3_file *pFile
3480: 2c 20 0a 20 20 63 6f 6e 73 74 20 76 6f 69 64 20  , .  const void 
3490: 2a 7a 42 75 66 2c 20 0a 20 20 69 6e 74 20 69 41  *zBuf, .  int iA
34a0: 6d 74 2c 20 0a 20 20 73 71 6c 69 74 65 5f 69 6e  mt, .  sqlite_in
34b0: 74 36 34 20 69 4f 66 73 74 0a 29 7b 0a 20 20 43  t64 iOfst.){.  C
34c0: 72 61 73 68 46 69 6c 65 20 2a 70 43 72 61 73 68  rashFile *pCrash
34d0: 20 3d 20 28 43 72 61 73 68 46 69 6c 65 20 2a 29   = (CrashFile *)
34e0: 70 46 69 6c 65 3b 0a 20 20 69 66 28 20 69 41 6d  pFile;.  if( iAm
34f0: 74 2b 69 4f 66 73 74 3e 70 43 72 61 73 68 2d 3e  t+iOfst>pCrash->
3500: 69 53 69 7a 65 20 29 7b 0a 20 20 20 20 70 43 72  iSize ){.    pCr
3510: 61 73 68 2d 3e 69 53 69 7a 65 20 3d 20 28 69 6e  ash->iSize = (in
3520: 74 29 28 69 41 6d 74 2b 69 4f 66 73 74 29 3b 0a  t)(iAmt+iOfst);.
3530: 20 20 7d 0a 20 20 77 68 69 6c 65 28 20 70 43 72    }.  while( pCr
3540: 61 73 68 2d 3e 69 53 69 7a 65 3e 70 43 72 61 73  ash->iSize>pCras
3550: 68 2d 3e 6e 44 61 74 61 20 29 7b 0a 20 20 20 20  h->nData ){.    
3560: 75 38 20 2a 7a 4e 65 77 3b 0a 20 20 20 20 69 6e  u8 *zNew;.    in
3570: 74 20 6e 4e 65 77 20 3d 20 28 70 43 72 61 73 68  t nNew = (pCrash
3580: 2d 3e 6e 44 61 74 61 2a 32 29 20 2b 20 34 30 39  ->nData*2) + 409
3590: 36 3b 0a 20 20 20 20 7a 4e 65 77 20 3d 20 63 72  6;.    zNew = cr
35a0: 61 73 68 5f 72 65 61 6c 6c 6f 63 28 70 43 72 61  ash_realloc(pCra
35b0: 73 68 2d 3e 7a 44 61 74 61 2c 20 6e 4e 65 77 29  sh->zData, nNew)
35c0: 3b 0a 20 20 20 20 69 66 28 20 21 7a 4e 65 77 20  ;.    if( !zNew 
35d0: 29 7b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20  ){.      return 
35e0: 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20  SQLITE_NOMEM;.  
35f0: 20 20 7d 0a 20 20 20 20 6d 65 6d 73 65 74 28 26    }.    memset(&
3600: 7a 4e 65 77 5b 70 43 72 61 73 68 2d 3e 6e 44 61  zNew[pCrash->nDa
3610: 74 61 5d 2c 20 30 2c 20 6e 4e 65 77 2d 70 43 72  ta], 0, nNew-pCr
3620: 61 73 68 2d 3e 6e 44 61 74 61 29 3b 0a 20 20 20  ash->nData);.   
3630: 20 70 43 72 61 73 68 2d 3e 6e 44 61 74 61 20 3d   pCrash->nData =
3640: 20 6e 4e 65 77 3b 0a 20 20 20 20 70 43 72 61 73   nNew;.    pCras
3650: 68 2d 3e 7a 44 61 74 61 20 3d 20 7a 4e 65 77 3b  h->zData = zNew;
3660: 0a 20 20 7d 0a 20 20 6d 65 6d 63 70 79 28 26 70  .  }.  memcpy(&p
3670: 43 72 61 73 68 2d 3e 7a 44 61 74 61 5b 69 4f 66  Crash->zData[iOf
3680: 73 74 5d 2c 20 7a 42 75 66 2c 20 69 41 6d 74 29  st], zBuf, iAmt)
3690: 3b 0a 20 20 72 65 74 75 72 6e 20 77 72 69 74 65  ;.  return write
36a0: 4c 69 73 74 41 70 70 65 6e 64 28 70 46 69 6c 65  ListAppend(pFile
36b0: 2c 20 69 4f 66 73 74 2c 20 7a 42 75 66 2c 20 69  , iOfst, zBuf, i
36c0: 41 6d 74 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  Amt);.}../*.** T
36d0: 72 75 6e 63 61 74 65 20 61 20 63 72 61 73 68 2d  runcate a crash-
36e0: 66 69 6c 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  file..*/.static 
36f0: 69 6e 74 20 63 66 54 72 75 6e 63 61 74 65 28 73  int cfTruncate(s
3700: 71 6c 69 74 65 33 5f 66 69 6c 65 20 2a 70 46 69  qlite3_file *pFi
3710: 6c 65 2c 20 73 71 6c 69 74 65 5f 69 6e 74 36 34  le, sqlite_int64
3720: 20 73 69 7a 65 29 7b 0a 20 20 43 72 61 73 68 46   size){.  CrashF
3730: 69 6c 65 20 2a 70 43 72 61 73 68 20 3d 20 28 43  ile *pCrash = (C
3740: 72 61 73 68 46 69 6c 65 20 2a 29 70 46 69 6c 65  rashFile *)pFile
3750: 3b 0a 20 20 61 73 73 65 72 74 28 73 69 7a 65 3e  ;.  assert(size>
3760: 3d 30 29 3b 0a 20 20 69 66 28 20 70 43 72 61 73  =0);.  if( pCras
3770: 68 2d 3e 69 53 69 7a 65 3e 73 69 7a 65 20 29 7b  h->iSize>size ){
3780: 0a 20 20 20 20 70 43 72 61 73 68 2d 3e 69 53 69  .    pCrash->iSi
3790: 7a 65 20 3d 20 28 69 6e 74 29 73 69 7a 65 3b 0a  ze = (int)size;.
37a0: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 77 72 69    }.  return wri
37b0: 74 65 4c 69 73 74 41 70 70 65 6e 64 28 70 46 69  teListAppend(pFi
37c0: 6c 65 2c 20 73 69 7a 65 2c 20 30 2c 20 30 29 3b  le, size, 0, 0);
37d0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 79 6e 63 20 61  .}../*.** Sync a
37e0: 20 63 72 61 73 68 2d 66 69 6c 65 2e 0a 2a 2f 0a   crash-file..*/.
37f0: 73 74 61 74 69 63 20 69 6e 74 20 63 66 53 79 6e  static int cfSyn
3800: 63 28 73 71 6c 69 74 65 33 5f 66 69 6c 65 20 2a  c(sqlite3_file *
3810: 70 46 69 6c 65 2c 20 69 6e 74 20 66 6c 61 67 73  pFile, int flags
3820: 29 7b 0a 20 20 43 72 61 73 68 46 69 6c 65 20 2a  ){.  CrashFile *
3830: 70 43 72 61 73 68 20 3d 20 28 43 72 61 73 68 46  pCrash = (CrashF
3840: 69 6c 65 20 2a 29 70 46 69 6c 65 3b 0a 20 20 69  ile *)pFile;.  i
3850: 6e 74 20 69 73 43 72 61 73 68 20 3d 20 30 3b 0a  nt isCrash = 0;.
3860: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
3870: 4e 61 6d 65 20 3d 20 70 43 72 61 73 68 2d 3e 7a  Name = pCrash->z
3880: 4e 61 6d 65 3b 0a 20 20 63 6f 6e 73 74 20 63 68  Name;.  const ch
3890: 61 72 20 2a 7a 43 72 61 73 68 46 69 6c 65 20 3d  ar *zCrashFile =
38a0: 20 67 2e 7a 43 72 61 73 68 46 69 6c 65 3b 0a 20   g.zCrashFile;. 
38b0: 20 69 6e 74 20 6e 4e 61 6d 65 20 3d 20 28 69 6e   int nName = (in
38c0: 74 29 73 74 72 6c 65 6e 28 7a 4e 61 6d 65 29 3b  t)strlen(zName);
38d0: 0a 20 20 69 6e 74 20 6e 43 72 61 73 68 46 69 6c  .  int nCrashFil
38e0: 65 20 3d 20 28 69 6e 74 29 73 74 72 6c 65 6e 28  e = (int)strlen(
38f0: 7a 43 72 61 73 68 46 69 6c 65 29 3b 0a 0a 20 20  zCrashFile);..  
3900: 69 66 28 20 6e 43 72 61 73 68 46 69 6c 65 3e 30  if( nCrashFile>0
3910: 20 26 26 20 7a 43 72 61 73 68 46 69 6c 65 5b 6e   && zCrashFile[n
3920: 43 72 61 73 68 46 69 6c 65 2d 31 5d 3d 3d 27 2a  CrashFile-1]=='*
3930: 27 20 29 7b 0a 20 20 20 20 6e 43 72 61 73 68 46  ' ){.    nCrashF
3940: 69 6c 65 2d 2d 3b 0a 20 20 20 20 69 66 28 20 6e  ile--;.    if( n
3950: 4e 61 6d 65 3e 6e 43 72 61 73 68 46 69 6c 65 20  Name>nCrashFile 
3960: 29 20 6e 4e 61 6d 65 20 3d 20 6e 43 72 61 73 68  ) nName = nCrash
3970: 46 69 6c 65 3b 0a 20 20 7d 0a 0a 23 69 66 64 65  File;.  }..#ifde
3980: 66 20 54 52 41 43 45 5f 43 52 41 53 48 54 45 53  f TRACE_CRASHTES
3990: 54 0a 20 20 70 72 69 6e 74 66 28 22 63 66 53 79  T.  printf("cfSy
39a0: 6e 63 28 29 3a 20 6e 4e 61 6d 65 20 3d 20 25 64  nc(): nName = %d
39b0: 2c 20 6e 43 72 61 73 68 46 69 6c 65 20 3d 20 25  , nCrashFile = %
39c0: 64 2c 20 7a 4e 61 6d 65 20 3d 20 25 73 2c 20 7a  d, zName = %s, z
39d0: 43 72 61 73 68 46 69 6c 65 20 3d 20 25 73 5c 6e  CrashFile = %s\n
39e0: 22 2c 0a 20 20 20 20 20 20 20 20 20 6e 4e 61 6d  ",.         nNam
39f0: 65 2c 20 6e 43 72 61 73 68 46 69 6c 65 2c 20 7a  e, nCrashFile, z
3a00: 4e 61 6d 65 2c 20 7a 43 72 61 73 68 46 69 6c 65  Name, zCrashFile
3a10: 29 3b 0a 23 65 6e 64 69 66 0a 0a 20 20 69 66 28  );.#endif..  if(
3a20: 20 6e 4e 61 6d 65 3d 3d 6e 43 72 61 73 68 46 69   nName==nCrashFi
3a30: 6c 65 20 26 26 20 30 3d 3d 6d 65 6d 63 6d 70 28  le && 0==memcmp(
3a40: 7a 4e 61 6d 65 2c 20 7a 43 72 61 73 68 46 69 6c  zName, zCrashFil
3a50: 65 2c 20 6e 4e 61 6d 65 29 20 29 7b 0a 23 69 66  e, nName) ){.#if
3a60: 64 65 66 20 54 52 41 43 45 5f 43 52 41 53 48 54  def TRACE_CRASHT
3a70: 45 53 54 0a 20 20 20 20 70 72 69 6e 74 66 28 22  EST.    printf("
3a80: 63 66 53 79 6e 63 28 29 3a 20 6e 61 6d 65 20 6d  cfSync(): name m
3a90: 61 74 63 68 65 64 2c 20 67 2e 69 43 72 61 73 68  atched, g.iCrash
3aa0: 20 3d 20 25 64 5c 6e 22 2c 20 67 2e 69 43 72 61   = %d\n", g.iCra
3ab0: 73 68 29 3b 0a 23 65 6e 64 69 66 0a 20 20 20 20  sh);.#endif.    
3ac0: 69 66 28 20 28 2d 2d 67 2e 69 43 72 61 73 68 29  if( (--g.iCrash)
3ad0: 3d 3d 30 20 29 20 69 73 43 72 61 73 68 20 3d 20  ==0 ) isCrash = 
3ae0: 31 3b 0a 20 20 7d 0a 0a 20 20 72 65 74 75 72 6e  1;.  }..  return
3af0: 20 77 72 69 74 65 4c 69 73 74 53 79 6e 63 28 70   writeListSync(p
3b00: 43 72 61 73 68 2c 20 69 73 43 72 61 73 68 29 3b  Crash, isCrash);
3b10: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e  .}../*.** Return
3b20: 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 69 6c   the current fil
3b30: 65 2d 73 69 7a 65 20 6f 66 20 74 68 65 20 63 72  e-size of the cr
3b40: 61 73 68 2d 66 69 6c 65 2e 0a 2a 2f 0a 73 74 61  ash-file..*/.sta
3b50: 74 69 63 20 69 6e 74 20 63 66 46 69 6c 65 53 69  tic int cfFileSi
3b60: 7a 65 28 73 71 6c 69 74 65 33 5f 66 69 6c 65 20  ze(sqlite3_file 
3b70: 2a 70 46 69 6c 65 2c 20 73 71 6c 69 74 65 5f 69  *pFile, sqlite_i
3b80: 6e 74 36 34 20 2a 70 53 69 7a 65 29 7b 0a 20 20  nt64 *pSize){.  
3b90: 43 72 61 73 68 46 69 6c 65 20 2a 70 43 72 61 73  CrashFile *pCras
3ba0: 68 20 3d 20 28 43 72 61 73 68 46 69 6c 65 20 2a  h = (CrashFile *
3bb0: 29 70 46 69 6c 65 3b 0a 20 20 2a 70 53 69 7a 65  )pFile;.  *pSize
3bc0: 20 3d 20 28 69 36 34 29 70 43 72 61 73 68 2d 3e   = (i64)pCrash->
3bd0: 69 53 69 7a 65 3b 0a 20 20 72 65 74 75 72 6e 20  iSize;.  return 
3be0: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a  SQLITE_OK;.}../*
3bf0: 0a 2a 2a 20 43 61 6c 6c 73 20 72 65 6c 61 74 65  .** Calls relate
3c00: 64 20 74 6f 20 66 69 6c 65 2d 6c 6f 63 6b 73 20  d to file-locks 
3c10: 61 72 65 20 70 61 73 73 65 64 20 6f 6e 20 74 6f  are passed on to
3c20: 20 74 68 65 20 72 65 61 6c 20 66 69 6c 65 20 68   the real file h
3c30: 61 6e 64 6c 65 2e 0a 2a 2f 0a 73 74 61 74 69 63  andle..*/.static
3c40: 20 69 6e 74 20 63 66 4c 6f 63 6b 28 73 71 6c 69   int cfLock(sqli
3c50: 74 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65 2c  te3_file *pFile,
3c60: 20 69 6e 74 20 65 4c 6f 63 6b 29 7b 0a 20 20 72   int eLock){.  r
3c70: 65 74 75 72 6e 20 73 71 6c 69 74 65 33 4f 73 4c  eturn sqlite3OsL
3c80: 6f 63 6b 28 28 28 43 72 61 73 68 46 69 6c 65 20  ock(((CrashFile 
3c90: 2a 29 70 46 69 6c 65 29 2d 3e 70 52 65 61 6c 46  *)pFile)->pRealF
3ca0: 69 6c 65 2c 20 65 4c 6f 63 6b 29 3b 0a 7d 0a 73  ile, eLock);.}.s
3cb0: 74 61 74 69 63 20 69 6e 74 20 63 66 55 6e 6c 6f  tatic int cfUnlo
3cc0: 63 6b 28 73 71 6c 69 74 65 33 5f 66 69 6c 65 20  ck(sqlite3_file 
3cd0: 2a 70 46 69 6c 65 2c 20 69 6e 74 20 65 4c 6f 63  *pFile, int eLoc
3ce0: 6b 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71 6c  k){.  return sql
3cf0: 69 74 65 33 4f 73 55 6e 6c 6f 63 6b 28 28 28 43  ite3OsUnlock(((C
3d00: 72 61 73 68 46 69 6c 65 20 2a 29 70 46 69 6c 65  rashFile *)pFile
3d10: 29 2d 3e 70 52 65 61 6c 46 69 6c 65 2c 20 65 4c  )->pRealFile, eL
3d20: 6f 63 6b 29 3b 0a 7d 0a 73 74 61 74 69 63 20 69  ock);.}.static i
3d30: 6e 74 20 63 66 43 68 65 63 6b 52 65 73 65 72 76  nt cfCheckReserv
3d40: 65 64 4c 6f 63 6b 28 73 71 6c 69 74 65 33 5f 66  edLock(sqlite3_f
3d50: 69 6c 65 20 2a 70 46 69 6c 65 2c 20 69 6e 74 20  ile *pFile, int 
3d60: 2a 70 52 65 73 4f 75 74 29 7b 0a 20 20 72 65 74  *pResOut){.  ret
3d70: 75 72 6e 20 73 71 6c 69 74 65 33 4f 73 43 68 65  urn sqlite3OsChe
3d80: 63 6b 52 65 73 65 72 76 65 64 4c 6f 63 6b 28 28  ckReservedLock((
3d90: 28 43 72 61 73 68 46 69 6c 65 20 2a 29 70 46 69  (CrashFile *)pFi
3da0: 6c 65 29 2d 3e 70 52 65 61 6c 46 69 6c 65 2c 20  le)->pRealFile, 
3db0: 70 52 65 73 4f 75 74 29 3b 0a 7d 0a 73 74 61 74  pResOut);.}.stat
3dc0: 69 63 20 69 6e 74 20 63 66 46 69 6c 65 43 6f 6e  ic int cfFileCon
3dd0: 74 72 6f 6c 28 73 71 6c 69 74 65 33 5f 66 69 6c  trol(sqlite3_fil
3de0: 65 20 2a 70 46 69 6c 65 2c 20 69 6e 74 20 6f 70  e *pFile, int op
3df0: 2c 20 76 6f 69 64 20 2a 70 41 72 67 29 7b 0a 20  , void *pArg){. 
3e00: 20 69 66 28 20 6f 70 3d 3d 53 51 4c 49 54 45 5f   if( op==SQLITE_
3e10: 46 43 4e 54 4c 5f 53 49 5a 45 5f 48 49 4e 54 20  FCNTL_SIZE_HINT 
3e20: 29 7b 0a 20 20 20 20 43 72 61 73 68 46 69 6c 65  ){.    CrashFile
3e30: 20 2a 70 43 72 61 73 68 20 3d 20 28 43 72 61 73   *pCrash = (Cras
3e40: 68 46 69 6c 65 20 2a 29 70 46 69 6c 65 3b 0a 20  hFile *)pFile;. 
3e50: 20 20 20 69 36 34 20 6e 42 79 74 65 20 3d 20 2a     i64 nByte = *
3e60: 28 69 36 34 20 2a 29 70 41 72 67 3b 0a 20 20 20  (i64 *)pArg;.   
3e70: 20 69 66 28 20 6e 42 79 74 65 3e 70 43 72 61 73   if( nByte>pCras
3e80: 68 2d 3e 69 53 69 7a 65 20 29 7b 0a 20 20 20 20  h->iSize ){.    
3e90: 20 20 69 66 28 20 53 51 4c 49 54 45 5f 4f 4b 3d    if( SQLITE_OK=
3ea0: 3d 77 72 69 74 65 4c 69 73 74 41 70 70 65 6e 64  =writeListAppend
3eb0: 28 70 46 69 6c 65 2c 20 6e 42 79 74 65 2c 20 30  (pFile, nByte, 0
3ec0: 2c 20 30 29 20 29 7b 0a 20 20 20 20 20 20 20 20  , 0) ){.        
3ed0: 70 43 72 61 73 68 2d 3e 69 53 69 7a 65 20 3d 20  pCrash->iSize = 
3ee0: 28 69 6e 74 29 6e 42 79 74 65 3b 0a 20 20 20 20  (int)nByte;.    
3ef0: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 72 65    }.    }.    re
3f00: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  turn SQLITE_OK;.
3f10: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 73 71 6c    }.  return sql
3f20: 69 74 65 33 4f 73 46 69 6c 65 43 6f 6e 74 72 6f  ite3OsFileContro
3f30: 6c 28 28 28 43 72 61 73 68 46 69 6c 65 20 2a 29  l(((CrashFile *)
3f40: 70 46 69 6c 65 29 2d 3e 70 52 65 61 6c 46 69 6c  pFile)->pRealFil
3f50: 65 2c 20 6f 70 2c 20 70 41 72 67 29 3b 0a 7d 0a  e, op, pArg);.}.
3f60: 0a 2f 2a 0a 2a 2a 20 54 68 65 20 78 53 65 63 74  ./*.** The xSect
3f70: 6f 72 53 69 7a 65 28 29 20 61 6e 64 20 78 44 65  orSize() and xDe
3f80: 76 69 63 65 43 68 61 72 61 63 74 65 72 69 73 74  viceCharacterist
3f90: 69 63 73 28 29 20 66 75 6e 63 74 69 6f 6e 73 20  ics() functions 
3fa0: 72 65 74 75 72 6e 0a 2a 2a 20 74 68 65 20 67 6c  return.** the gl
3fb0: 6f 62 61 6c 20 76 61 6c 75 65 73 20 63 6f 6e 66  obal values conf
3fc0: 69 67 75 72 65 64 20 62 79 20 74 68 65 20 5b 73  igured by the [s
3fd0: 71 6c 69 74 65 5f 63 72 61 73 68 70 61 72 61 6d  qlite_crashparam
3fe0: 73 5d 20 74 63 6c 0a 2a 20 20 69 6e 74 65 72 66  s] tcl.*  interf
3ff0: 61 63 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69  ace..*/.static i
4000: 6e 74 20 63 66 53 65 63 74 6f 72 53 69 7a 65 28  nt cfSectorSize(
4010: 73 71 6c 69 74 65 33 5f 66 69 6c 65 20 2a 70 46  sqlite3_file *pF
4020: 69 6c 65 29 7b 0a 20 20 72 65 74 75 72 6e 20 67  ile){.  return g
4030: 2e 69 53 65 63 74 6f 72 53 69 7a 65 3b 0a 7d 0a  .iSectorSize;.}.
4040: 73 74 61 74 69 63 20 69 6e 74 20 63 66 44 65 76  static int cfDev
4050: 69 63 65 43 68 61 72 61 63 74 65 72 69 73 74 69  iceCharacteristi
4060: 63 73 28 73 71 6c 69 74 65 33 5f 66 69 6c 65 20  cs(sqlite3_file 
4070: 2a 70 46 69 6c 65 29 7b 0a 20 20 72 65 74 75 72  *pFile){.  retur
4080: 6e 20 67 2e 69 44 65 76 69 63 65 43 68 61 72 61  n g.iDeviceChara
4090: 63 74 65 72 69 73 74 69 63 73 3b 0a 7d 0a 0a 2f  cteristics;.}../
40a0: 2a 0a 2a 2a 20 50 61 73 73 2d 74 68 72 6f 75 67  *.** Pass-throug
40b0: 68 73 20 66 6f 72 20 57 41 4c 20 73 75 70 70 6f  hs for WAL suppo
40c0: 72 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e  rt..*/.static in
40d0: 74 20 63 66 53 68 6d 4c 6f 63 6b 28 73 71 6c 69  t cfShmLock(sqli
40e0: 74 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65 2c  te3_file *pFile,
40f0: 20 69 6e 74 20 6f 66 73 74 2c 20 69 6e 74 20 6e   int ofst, int n
4100: 2c 20 69 6e 74 20 66 6c 61 67 73 29 7b 0a 20 20  , int flags){.  
4110: 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 4f 73  return sqlite3Os
4120: 53 68 6d 4c 6f 63 6b 28 28 28 43 72 61 73 68 46  ShmLock(((CrashF
4130: 69 6c 65 2a 29 70 46 69 6c 65 29 2d 3e 70 52 65  ile*)pFile)->pRe
4140: 61 6c 46 69 6c 65 2c 20 6f 66 73 74 2c 20 6e 2c  alFile, ofst, n,
4150: 20 66 6c 61 67 73 29 3b 0a 7d 0a 73 74 61 74 69   flags);.}.stati
4160: 63 20 76 6f 69 64 20 63 66 53 68 6d 42 61 72 72  c void cfShmBarr
4170: 69 65 72 28 73 71 6c 69 74 65 33 5f 66 69 6c 65  ier(sqlite3_file
4180: 20 2a 70 46 69 6c 65 29 7b 0a 20 20 73 71 6c 69   *pFile){.  sqli
4190: 74 65 33 4f 73 53 68 6d 42 61 72 72 69 65 72 28  te3OsShmBarrier(
41a0: 28 28 43 72 61 73 68 46 69 6c 65 2a 29 70 46 69  ((CrashFile*)pFi
41b0: 6c 65 29 2d 3e 70 52 65 61 6c 46 69 6c 65 29 3b  le)->pRealFile);
41c0: 0a 7d 0a 73 74 61 74 69 63 20 69 6e 74 20 63 66  .}.static int cf
41d0: 53 68 6d 55 6e 6d 61 70 28 73 71 6c 69 74 65 33  ShmUnmap(sqlite3
41e0: 5f 66 69 6c 65 20 2a 70 46 69 6c 65 2c 20 69 6e  _file *pFile, in
41f0: 74 20 64 65 6c 46 6c 61 67 29 7b 0a 20 20 72 65  t delFlag){.  re
4200: 74 75 72 6e 20 73 71 6c 69 74 65 33 4f 73 53 68  turn sqlite3OsSh
4210: 6d 55 6e 6d 61 70 28 28 28 43 72 61 73 68 46 69  mUnmap(((CrashFi
4220: 6c 65 2a 29 70 46 69 6c 65 29 2d 3e 70 52 65 61  le*)pFile)->pRea
4230: 6c 46 69 6c 65 2c 20 64 65 6c 46 6c 61 67 29 3b  lFile, delFlag);
4240: 0a 7d 0a 73 74 61 74 69 63 20 69 6e 74 20 63 66  .}.static int cf
4250: 53 68 6d 4d 61 70 28 0a 20 20 73 71 6c 69 74 65  ShmMap(.  sqlite
4260: 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65 2c 20 20  3_file *pFile,  
4270: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 48 61 6e            /* Han
4280: 64 6c 65 20 6f 70 65 6e 20 6f 6e 20 64 61 74 61  dle open on data
4290: 62 61 73 65 20 66 69 6c 65 20 2a 2f 0a 20 20 69  base file */.  i
42a0: 6e 74 20 69 52 65 67 69 6f 6e 2c 20 20 20 20 20  nt iRegion,     
42b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
42c0: 2a 20 52 65 67 69 6f 6e 20 74 6f 20 72 65 74 72  * Region to retr
42d0: 69 65 76 65 20 2a 2f 0a 20 20 69 6e 74 20 73 7a  ieve */.  int sz
42e0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
42f0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 53 69 7a            /* Siz
4300: 65 20 6f 66 20 72 65 67 69 6f 6e 73 20 2a 2f 0a  e of regions */.
4310: 20 20 69 6e 74 20 77 2c 20 20 20 20 20 20 20 20    int w,        
4320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4330: 20 20 2f 2a 20 54 72 75 65 20 74 6f 20 65 78 74    /* True to ext
4340: 65 6e 64 20 66 69 6c 65 20 69 66 20 6e 65 63 65  end file if nece
4350: 73 73 61 72 79 20 2a 2f 0a 20 20 76 6f 69 64 20  ssary */.  void 
4360: 76 6f 6c 61 74 69 6c 65 20 2a 2a 70 70 20 20 20  volatile **pp   
4370: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4f 55             /* OU
4380: 54 3a 20 4d 61 70 70 65 64 20 6d 65 6d 6f 72 79  T: Mapped memory
4390: 20 2a 2f 0a 29 7b 0a 20 20 72 65 74 75 72 6e 20   */.){.  return 
43a0: 73 71 6c 69 74 65 33 4f 73 53 68 6d 4d 61 70 28  sqlite3OsShmMap(
43b0: 28 28 43 72 61 73 68 46 69 6c 65 2a 29 70 46 69  ((CrashFile*)pFi
43c0: 6c 65 29 2d 3e 70 52 65 61 6c 46 69 6c 65 2c 20  le)->pRealFile, 
43d0: 69 52 65 67 69 6f 6e 2c 20 73 7a 2c 20 77 2c 20  iRegion, sz, w, 
43e0: 70 70 29 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 63  pp);.}..static c
43f0: 6f 6e 73 74 20 73 71 6c 69 74 65 33 5f 69 6f 5f  onst sqlite3_io_
4400: 6d 65 74 68 6f 64 73 20 43 72 61 73 68 46 69 6c  methods CrashFil
4410: 65 56 74 61 62 20 3d 20 7b 0a 20 20 32 2c 20 20  eVtab = {.  2,  
4420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4430: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 69 56 65            /* iVe
4440: 72 73 69 6f 6e 20 2a 2f 0a 20 20 63 66 43 6c 6f  rsion */.  cfClo
4450: 73 65 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  se,             
4460: 20 20 20 20 20 20 20 20 20 2f 2a 20 78 43 6c 6f           /* xClo
4470: 73 65 20 2a 2f 0a 20 20 63 66 52 65 61 64 2c 20  se */.  cfRead, 
4480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4490: 20 20 20 20 20 20 2f 2a 20 78 52 65 61 64 20 2a        /* xRead *
44a0: 2f 0a 20 20 63 66 57 72 69 74 65 2c 20 20 20 20  /.  cfWrite,    
44b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
44c0: 20 20 2f 2a 20 78 57 72 69 74 65 20 2a 2f 0a 20    /* xWrite */. 
44d0: 20 63 66 54 72 75 6e 63 61 74 65 2c 20 20 20 20   cfTruncate,    
44e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
44f0: 2a 20 78 54 72 75 6e 63 61 74 65 20 2a 2f 0a 20  * xTruncate */. 
4500: 20 63 66 53 79 6e 63 2c 20 20 20 20 20 20 20 20   cfSync,        
4510: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
4520: 2a 20 78 53 79 6e 63 20 2a 2f 0a 20 20 63 66 46  * xSync */.  cfF
4530: 69 6c 65 53 69 7a 65 2c 20 20 20 20 20 20 20 20  ileSize,        
4540: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 78 46             /* xF
4550: 69 6c 65 53 69 7a 65 20 2a 2f 0a 20 20 63 66 4c  ileSize */.  cfL
4560: 6f 63 6b 2c 20 20 20 20 20 20 20 20 20 20 20 20  ock,            
4570: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 78 4c             /* xL
4580: 6f 63 6b 20 2a 2f 0a 20 20 63 66 55 6e 6c 6f 63  ock */.  cfUnloc
4590: 6b 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  k,              
45a0: 20 20 20 20 20 20 20 2f 2a 20 78 55 6e 6c 6f 63         /* xUnloc
45b0: 6b 20 2a 2f 0a 20 20 63 66 43 68 65 63 6b 52 65  k */.  cfCheckRe
45c0: 73 65 72 76 65 64 4c 6f 63 6b 2c 20 20 20 20 20  servedLock,     
45d0: 20 20 20 20 20 2f 2a 20 78 43 68 65 63 6b 52 65       /* xCheckRe
45e0: 73 65 72 76 65 64 4c 6f 63 6b 20 2a 2f 0a 20 20  servedLock */.  
45f0: 63 66 46 69 6c 65 43 6f 6e 74 72 6f 6c 2c 20 20  cfFileControl,  
4600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
4610: 20 78 46 69 6c 65 43 6f 6e 74 72 6f 6c 20 2a 2f   xFileControl */
4620: 0a 20 20 63 66 53 65 63 74 6f 72 53 69 7a 65 2c  .  cfSectorSize,
4630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4640: 20 2f 2a 20 78 53 65 63 74 6f 72 53 69 7a 65 20   /* xSectorSize 
4650: 2a 2f 0a 20 20 63 66 44 65 76 69 63 65 43 68 61  */.  cfDeviceCha
4660: 72 61 63 74 65 72 69 73 74 69 63 73 2c 20 20 20  racteristics,   
4670: 20 20 20 2f 2a 20 78 44 65 76 69 63 65 43 68 61     /* xDeviceCha
4680: 72 61 63 74 65 72 69 73 74 69 63 73 20 2a 2f 0a  racteristics */.
4690: 20 20 63 66 53 68 6d 4d 61 70 2c 20 20 20 20 20    cfShmMap,     
46a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
46b0: 2f 2a 20 78 53 68 6d 4d 61 70 20 2a 2f 0a 20 20  /* xShmMap */.  
46c0: 63 66 53 68 6d 4c 6f 63 6b 2c 20 20 20 20 20 20  cfShmLock,      
46d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
46e0: 20 78 53 68 6d 4c 6f 63 6b 20 2a 2f 0a 20 20 63   xShmLock */.  c
46f0: 66 53 68 6d 42 61 72 72 69 65 72 2c 20 20 20 20  fShmBarrier,    
4700: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
4710: 78 53 68 6d 42 61 72 72 69 65 72 20 2a 2f 0a 20  xShmBarrier */. 
4720: 20 63 66 53 68 6d 55 6e 6d 61 70 20 20 20 20 20   cfShmUnmap     
4730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
4740: 2a 20 78 53 68 6d 55 6e 6d 61 70 20 2a 2f 0a 7d  * xShmUnmap */.}
4750: 3b 0a 0a 2f 2a 0a 2a 2a 20 41 70 70 6c 69 63 61  ;../*.** Applica
4760: 74 69 6f 6e 20 64 61 74 61 20 66 6f 72 20 74 68  tion data for th
4770: 65 20 63 72 61 73 68 20 56 46 53 0a 2a 2f 0a 73  e crash VFS.*/.s
4780: 74 72 75 63 74 20 63 72 61 73 68 41 70 70 44 61  truct crashAppDa
4790: 74 61 20 7b 0a 20 20 73 71 6c 69 74 65 33 5f 76  ta {.  sqlite3_v
47a0: 66 73 20 2a 70 4f 72 69 67 3b 20 20 20 20 20 20  fs *pOrig;      
47b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
47c0: 57 72 61 70 70 65 64 20 76 66 73 20 73 74 72 75  Wrapped vfs stru
47d0: 63 74 75 72 65 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a  cture */.};../*.
47e0: 2a 2a 20 4f 70 65 6e 20 61 20 63 72 61 73 68 2d  ** Open a crash-
47f0: 66 69 6c 65 20 66 69 6c 65 20 68 61 6e 64 6c 65  file file handle
4800: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 63 61 6c 6c  ..**.** The call
4810: 65 72 20 77 69 6c 6c 20 68 61 76 65 20 61 6c 6c  er will have all
4820: 6f 63 61 74 65 64 20 70 56 66 73 2d 3e 73 7a 4f  ocated pVfs->szO
4830: 73 46 69 6c 65 20 62 79 74 65 73 20 6f 66 20 73  sFile bytes of s
4840: 70 61 63 65 0a 2a 2a 20 61 74 20 70 46 69 6c 65  pace.** at pFile
4850: 2e 20 54 68 69 73 20 66 69 6c 65 20 75 73 65 73  . This file uses
4860: 20 74 68 69 73 20 73 70 61 63 65 20 66 6f 72 20   this space for 
4870: 74 68 65 20 43 72 61 73 68 46 69 6c 65 20 73 74  the CrashFile st
4880: 72 75 63 74 75 72 65 0a 2a 2a 20 61 6e 64 20 61  ructure.** and a
4890: 6c 6c 6f 63 61 74 65 73 20 73 70 61 63 65 20 66  llocates space f
48a0: 6f 72 20 74 68 65 20 22 72 65 61 6c 22 20 66 69  or the "real" fi
48b0: 6c 65 20 73 74 72 75 63 74 75 72 65 20 75 73 69  le structure usi
48c0: 6e 67 20 0a 2a 2a 20 73 71 6c 69 74 65 33 5f 6d  ng .** sqlite3_m
48d0: 61 6c 6c 6f 63 28 29 2e 20 54 68 65 20 61 73 73  alloc(). The ass
48e0: 75 6d 70 74 69 6f 6e 20 68 65 72 65 20 69 73 20  umption here is 
48f0: 28 70 56 66 73 2d 3e 73 7a 4f 73 46 69 6c 65 29  (pVfs->szOsFile)
4900: 20 69 73 0a 2a 2a 20 65 71 75 61 6c 20 6f 72 20   is.** equal or 
4910: 67 72 65 61 74 65 72 20 74 68 61 6e 20 73 69 7a  greater than siz
4920: 65 6f 66 28 43 72 61 73 68 46 69 6c 65 29 2e 0a  eof(CrashFile)..
4930: 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 63 66  */.static int cf
4940: 4f 70 65 6e 28 0a 20 20 73 71 6c 69 74 65 33 5f  Open(.  sqlite3_
4950: 76 66 73 20 2a 70 43 66 56 66 73 2c 0a 20 20 63  vfs *pCfVfs,.  c
4960: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65  onst char *zName
4970: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 66 69 6c 65  ,.  sqlite3_file
4980: 20 2a 70 46 69 6c 65 2c 0a 20 20 69 6e 74 20 66   *pFile,.  int f
4990: 6c 61 67 73 2c 0a 20 20 69 6e 74 20 2a 70 4f 75  lags,.  int *pOu
49a0: 74 46 6c 61 67 73 0a 29 7b 0a 20 20 73 71 6c 69  tFlags.){.  sqli
49b0: 74 65 33 5f 76 66 73 20 2a 70 56 66 73 20 3d 20  te3_vfs *pVfs = 
49c0: 28 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 29 70  (sqlite3_vfs *)p
49d0: 43 66 56 66 73 2d 3e 70 41 70 70 44 61 74 61 3b  CfVfs->pAppData;
49e0: 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 43 72 61  .  int rc;.  Cra
49f0: 73 68 46 69 6c 65 20 2a 70 57 72 61 70 70 65 72  shFile *pWrapper
4a00: 20 3d 20 28 43 72 61 73 68 46 69 6c 65 20 2a 29   = (CrashFile *)
4a10: 70 46 69 6c 65 3b 0a 20 20 73 71 6c 69 74 65 33  pFile;.  sqlite3
4a20: 5f 66 69 6c 65 20 2a 70 52 65 61 6c 20 3d 20 28  _file *pReal = (
4a30: 73 71 6c 69 74 65 33 5f 66 69 6c 65 2a 29 26 70  sqlite3_file*)&p
4a40: 57 72 61 70 70 65 72 5b 31 5d 3b 0a 0a 20 20 6d  Wrapper[1];..  m
4a50: 65 6d 73 65 74 28 70 57 72 61 70 70 65 72 2c 20  emset(pWrapper, 
4a60: 30 2c 20 73 69 7a 65 6f 66 28 43 72 61 73 68 46  0, sizeof(CrashF
4a70: 69 6c 65 29 29 3b 0a 20 20 72 63 20 3d 20 73 71  ile));.  rc = sq
4a80: 6c 69 74 65 33 4f 73 4f 70 65 6e 28 70 56 66 73  lite3OsOpen(pVfs
4a90: 2c 20 7a 4e 61 6d 65 2c 20 70 52 65 61 6c 2c 20  , zName, pReal, 
4aa0: 66 6c 61 67 73 2c 20 70 4f 75 74 46 6c 61 67 73  flags, pOutFlags
4ab0: 29 3b 0a 0a 20 20 69 66 28 20 72 63 3d 3d 53 51  );..  if( rc==SQ
4ac0: 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 69  LITE_OK ){.    i
4ad0: 36 34 20 69 53 69 7a 65 3b 0a 20 20 20 20 70 57  64 iSize;.    pW
4ae0: 72 61 70 70 65 72 2d 3e 70 4d 65 74 68 6f 64 20  rapper->pMethod 
4af0: 3d 20 26 43 72 61 73 68 46 69 6c 65 56 74 61 62  = &CrashFileVtab
4b00: 3b 0a 20 20 20 20 70 57 72 61 70 70 65 72 2d 3e  ;.    pWrapper->
4b10: 7a 4e 61 6d 65 20 3d 20 28 63 68 61 72 20 2a 29  zName = (char *)
4b20: 7a 4e 61 6d 65 3b 0a 20 20 20 20 70 57 72 61 70  zName;.    pWrap
4b30: 70 65 72 2d 3e 70 52 65 61 6c 46 69 6c 65 20 3d  per->pRealFile =
4b40: 20 70 52 65 61 6c 3b 0a 20 20 20 20 72 63 20 3d   pReal;.    rc =
4b50: 20 73 71 6c 69 74 65 33 4f 73 46 69 6c 65 53 69   sqlite3OsFileSi
4b60: 7a 65 28 70 52 65 61 6c 2c 20 26 69 53 69 7a 65  ze(pReal, &iSize
4b70: 29 3b 0a 20 20 20 20 70 57 72 61 70 70 65 72 2d  );.    pWrapper-
4b80: 3e 69 53 69 7a 65 20 3d 20 28 69 6e 74 29 69 53  >iSize = (int)iS
4b90: 69 7a 65 3b 0a 20 20 20 20 70 57 72 61 70 70 65  ize;.    pWrappe
4ba0: 72 2d 3e 66 6c 61 67 73 20 3d 20 66 6c 61 67 73  r->flags = flags
4bb0: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 72 63 3d 3d  ;.  }.  if( rc==
4bc0: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20  SQLITE_OK ){.   
4bd0: 20 70 57 72 61 70 70 65 72 2d 3e 6e 44 61 74 61   pWrapper->nData
4be0: 20 3d 20 28 34 30 39 36 20 2b 20 70 57 72 61 70   = (4096 + pWrap
4bf0: 70 65 72 2d 3e 69 53 69 7a 65 29 3b 0a 20 20 20  per->iSize);.   
4c00: 20 70 57 72 61 70 70 65 72 2d 3e 7a 44 61 74 61   pWrapper->zData
4c10: 20 3d 20 63 72 61 73 68 5f 6d 61 6c 6c 6f 63 28   = crash_malloc(
4c20: 70 57 72 61 70 70 65 72 2d 3e 6e 44 61 74 61 29  pWrapper->nData)
4c30: 3b 0a 20 20 20 20 69 66 28 20 70 57 72 61 70 70  ;.    if( pWrapp
4c40: 65 72 2d 3e 7a 44 61 74 61 20 29 7b 0a 20 20 20  er->zData ){.   
4c50: 20 20 20 2f 2a 20 6f 73 5f 75 6e 69 78 2e 63 20     /* os_unix.c 
4c60: 63 6f 6e 74 61 69 6e 73 20 61 6e 20 61 73 73 65  contains an asse
4c70: 72 74 28 29 20 74 68 61 74 20 66 61 69 6c 73 20  rt() that fails 
4c80: 69 66 20 74 68 65 20 63 61 6c 6c 65 72 20 61 74  if the caller at
4c90: 74 65 6d 70 74 73 0a 20 20 20 20 20 20 2a 2a 20  tempts.      ** 
4ca0: 74 6f 20 72 65 61 64 20 64 61 74 61 20 66 72 6f  to read data fro
4cb0: 6d 20 74 68 65 20 35 31 32 2d 62 79 74 65 20 6c  m the 512-byte l
4cc0: 6f 63 6b 69 6e 67 20 72 65 67 69 6f 6e 20 6f 66  ocking region of
4cd0: 20 61 20 66 69 6c 65 20 6f 70 65 6e 65 64 0a 20   a file opened. 
4ce0: 20 20 20 20 20 2a 2a 20 77 69 74 68 20 74 68 65       ** with the
4cf0: 20 53 51 4c 49 54 45 5f 4f 50 45 4e 5f 4d 41 49   SQLITE_OPEN_MAI
4d00: 4e 5f 44 42 20 66 6c 61 67 2e 20 54 68 69 73 20  N_DB flag. This 
4d10: 72 65 67 69 6f 6e 20 6f 66 20 61 20 64 61 74 61  region of a data
4d20: 62 61 73 65 20 66 69 6c 65 0a 20 20 20 20 20 20  base file.      
4d30: 2a 2a 20 6e 65 76 65 72 20 63 6f 6e 74 61 69 6e  ** never contain
4d40: 73 20 76 61 6c 69 64 20 64 61 74 61 20 61 6e 79  s valid data any
4d50: 68 6f 77 2e 20 53 6f 20 61 76 6f 69 64 20 64 6f  how. So avoid do
4d60: 69 6e 67 20 73 75 63 68 20 61 20 72 65 61 64 20  ing such a read 
4d70: 68 65 72 65 2e 0a 20 20 20 20 20 20 2a 2f 0a 20  here..      */. 
4d80: 20 20 20 20 20 63 6f 6e 73 74 20 69 6e 74 20 69       const int i
4d90: 73 44 62 20 3d 20 28 66 6c 61 67 73 26 53 51 4c  sDb = (flags&SQL
4da0: 49 54 45 5f 4f 50 45 4e 5f 4d 41 49 4e 5f 44 42  ITE_OPEN_MAIN_DB
4db0: 29 3b 0a 20 20 20 20 20 20 69 36 34 20 69 43 68  );.      i64 iCh
4dc0: 75 6e 6b 20 3d 20 70 57 72 61 70 70 65 72 2d 3e  unk = pWrapper->
4dd0: 69 53 69 7a 65 3b 0a 20 20 20 20 20 20 69 66 28  iSize;.      if(
4de0: 20 69 43 68 75 6e 6b 3e 50 45 4e 44 49 4e 47 5f   iChunk>PENDING_
4df0: 42 59 54 45 20 26 26 20 69 73 44 62 20 29 7b 0a  BYTE && isDb ){.
4e00: 20 20 20 20 20 20 20 20 69 43 68 75 6e 6b 20 3d          iChunk =
4e10: 20 50 45 4e 44 49 4e 47 5f 42 59 54 45 3b 0a 20   PENDING_BYTE;. 
4e20: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 6d 65 6d       }.      mem
4e30: 73 65 74 28 70 57 72 61 70 70 65 72 2d 3e 7a 44  set(pWrapper->zD
4e40: 61 74 61 2c 20 30 2c 20 70 57 72 61 70 70 65 72  ata, 0, pWrapper
4e50: 2d 3e 6e 44 61 74 61 29 3b 0a 20 20 20 20 20 20  ->nData);.      
4e60: 72 63 20 3d 20 73 71 6c 69 74 65 33 4f 73 52 65  rc = sqlite3OsRe
4e70: 61 64 28 70 52 65 61 6c 2c 20 70 57 72 61 70 70  ad(pReal, pWrapp
4e80: 65 72 2d 3e 7a 44 61 74 61 2c 20 28 69 6e 74 29  er->zData, (int)
4e90: 69 43 68 75 6e 6b 2c 20 30 29 3b 20 0a 20 20 20  iChunk, 0); .   
4ea0: 20 20 20 69 66 28 20 53 51 4c 49 54 45 5f 4f 4b     if( SQLITE_OK
4eb0: 3d 3d 72 63 20 26 26 20 70 57 72 61 70 70 65 72  ==rc && pWrapper
4ec0: 2d 3e 69 53 69 7a 65 3e 28 50 45 4e 44 49 4e 47  ->iSize>(PENDING
4ed0: 5f 42 59 54 45 2b 35 31 32 29 20 26 26 20 69 73  _BYTE+512) && is
4ee0: 44 62 20 29 7b 0a 20 20 20 20 20 20 20 20 69 36  Db ){.        i6
4ef0: 34 20 69 4f 66 66 20 3d 20 50 45 4e 44 49 4e 47  4 iOff = PENDING
4f00: 5f 42 59 54 45 2b 35 31 32 3b 0a 20 20 20 20 20  _BYTE+512;.     
4f10: 20 20 20 69 43 68 75 6e 6b 20 3d 20 70 57 72 61     iChunk = pWra
4f20: 70 70 65 72 2d 3e 69 53 69 7a 65 20 2d 20 69 4f  pper->iSize - iO
4f30: 66 66 3b 0a 20 20 20 20 20 20 20 20 72 63 20 3d  ff;.        rc =
4f40: 20 73 71 6c 69 74 65 33 4f 73 52 65 61 64 28 70   sqlite3OsRead(p
4f50: 52 65 61 6c 2c 20 26 70 57 72 61 70 70 65 72 2d  Real, &pWrapper-
4f60: 3e 7a 44 61 74 61 5b 69 4f 66 66 5d 2c 20 28 69  >zData[iOff], (i
4f70: 6e 74 29 69 43 68 75 6e 6b 2c 20 69 4f 66 66 29  nt)iChunk, iOff)
4f80: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 65  ;.      }.    }e
4f90: 6c 73 65 7b 0a 20 20 20 20 20 20 72 63 20 3d 20  lse{.      rc = 
4fa0: 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20  SQLITE_NOMEM;.  
4fb0: 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20 72 63    }.  }.  if( rc
4fc0: 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 26 26 20 70  !=SQLITE_OK && p
4fd0: 57 72 61 70 70 65 72 2d 3e 70 4d 65 74 68 6f 64  Wrapper->pMethod
4fe0: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 4f   ){.    sqlite3O
4ff0: 73 43 6c 6f 73 65 28 70 46 69 6c 65 29 3b 0a 20  sClose(pFile);. 
5000: 20 7d 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a   }.  return rc;.
5010: 7d 0a 0a 73 74 61 74 69 63 20 69 6e 74 20 63 66  }..static int cf
5020: 44 65 6c 65 74 65 28 73 71 6c 69 74 65 33 5f 76  Delete(sqlite3_v
5030: 66 73 20 2a 70 43 66 56 66 73 2c 20 63 6f 6e 73  fs *pCfVfs, cons
5040: 74 20 63 68 61 72 20 2a 7a 50 61 74 68 2c 20 69  t char *zPath, i
5050: 6e 74 20 64 69 72 53 79 6e 63 29 7b 0a 20 20 73  nt dirSync){.  s
5060: 71 6c 69 74 65 33 5f 76 66 73 20 2a 70 56 66 73  qlite3_vfs *pVfs
5070: 20 3d 20 28 73 71 6c 69 74 65 33 5f 76 66 73 20   = (sqlite3_vfs 
5080: 2a 29 70 43 66 56 66 73 2d 3e 70 41 70 70 44 61  *)pCfVfs->pAppDa
5090: 74 61 3b 0a 20 20 72 65 74 75 72 6e 20 70 56 66  ta;.  return pVf
50a0: 73 2d 3e 78 44 65 6c 65 74 65 28 70 56 66 73 2c  s->xDelete(pVfs,
50b0: 20 7a 50 61 74 68 2c 20 64 69 72 53 79 6e 63 29   zPath, dirSync)
50c0: 3b 0a 7d 0a 73 74 61 74 69 63 20 69 6e 74 20 63  ;.}.static int c
50d0: 66 41 63 63 65 73 73 28 0a 20 20 73 71 6c 69 74  fAccess(.  sqlit
50e0: 65 33 5f 76 66 73 20 2a 70 43 66 56 66 73 2c 20  e3_vfs *pCfVfs, 
50f0: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
5100: 50 61 74 68 2c 20 0a 20 20 69 6e 74 20 66 6c 61  Path, .  int fla
5110: 67 73 2c 20 0a 20 20 69 6e 74 20 2a 70 52 65 73  gs, .  int *pRes
5120: 4f 75 74 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33  Out.){.  sqlite3
5130: 5f 76 66 73 20 2a 70 56 66 73 20 3d 20 28 73 71  _vfs *pVfs = (sq
5140: 6c 69 74 65 33 5f 76 66 73 20 2a 29 70 43 66 56  lite3_vfs *)pCfV
5150: 66 73 2d 3e 70 41 70 70 44 61 74 61 3b 0a 20 20  fs->pAppData;.  
5160: 72 65 74 75 72 6e 20 70 56 66 73 2d 3e 78 41 63  return pVfs->xAc
5170: 63 65 73 73 28 70 56 66 73 2c 20 7a 50 61 74 68  cess(pVfs, zPath
5180: 2c 20 66 6c 61 67 73 2c 20 70 52 65 73 4f 75 74  , flags, pResOut
5190: 29 3b 0a 7d 0a 73 74 61 74 69 63 20 69 6e 74 20  );.}.static int 
51a0: 63 66 46 75 6c 6c 50 61 74 68 6e 61 6d 65 28 0a  cfFullPathname(.
51b0: 20 20 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 70    sqlite3_vfs *p
51c0: 43 66 56 66 73 2c 20 0a 20 20 63 6f 6e 73 74 20  CfVfs, .  const 
51d0: 63 68 61 72 20 2a 7a 50 61 74 68 2c 20 0a 20 20  char *zPath, .  
51e0: 69 6e 74 20 6e 50 61 74 68 4f 75 74 2c 0a 20 20  int nPathOut,.  
51f0: 63 68 61 72 20 2a 7a 50 61 74 68 4f 75 74 0a 29  char *zPathOut.)
5200: 7b 0a 20 20 73 71 6c 69 74 65 33 5f 76 66 73 20  {.  sqlite3_vfs 
5210: 2a 70 56 66 73 20 3d 20 28 73 71 6c 69 74 65 33  *pVfs = (sqlite3
5220: 5f 76 66 73 20 2a 29 70 43 66 56 66 73 2d 3e 70  _vfs *)pCfVfs->p
5230: 41 70 70 44 61 74 61 3b 0a 20 20 72 65 74 75 72  AppData;.  retur
5240: 6e 20 70 56 66 73 2d 3e 78 46 75 6c 6c 50 61 74  n pVfs->xFullPat
5250: 68 6e 61 6d 65 28 70 56 66 73 2c 20 7a 50 61 74  hname(pVfs, zPat
5260: 68 2c 20 6e 50 61 74 68 4f 75 74 2c 20 7a 50 61  h, nPathOut, zPa
5270: 74 68 4f 75 74 29 3b 0a 7d 0a 73 74 61 74 69 63  thOut);.}.static
5280: 20 76 6f 69 64 20 2a 63 66 44 6c 4f 70 65 6e 28   void *cfDlOpen(
5290: 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 70 43 66  sqlite3_vfs *pCf
52a0: 56 66 73 2c 20 63 6f 6e 73 74 20 63 68 61 72 20  Vfs, const char 
52b0: 2a 7a 50 61 74 68 29 7b 0a 20 20 73 71 6c 69 74  *zPath){.  sqlit
52c0: 65 33 5f 76 66 73 20 2a 70 56 66 73 20 3d 20 28  e3_vfs *pVfs = (
52d0: 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 29 70 43  sqlite3_vfs *)pC
52e0: 66 56 66 73 2d 3e 70 41 70 70 44 61 74 61 3b 0a  fVfs->pAppData;.
52f0: 20 20 72 65 74 75 72 6e 20 70 56 66 73 2d 3e 78    return pVfs->x
5300: 44 6c 4f 70 65 6e 28 70 56 66 73 2c 20 7a 50 61  DlOpen(pVfs, zPa
5310: 74 68 29 3b 0a 7d 0a 73 74 61 74 69 63 20 76 6f  th);.}.static vo
5320: 69 64 20 63 66 44 6c 45 72 72 6f 72 28 73 71 6c  id cfDlError(sql
5330: 69 74 65 33 5f 76 66 73 20 2a 70 43 66 56 66 73  ite3_vfs *pCfVfs
5340: 2c 20 69 6e 74 20 6e 42 79 74 65 2c 20 63 68 61  , int nByte, cha
5350: 72 20 2a 7a 45 72 72 4d 73 67 29 7b 0a 20 20 73  r *zErrMsg){.  s
5360: 71 6c 69 74 65 33 5f 76 66 73 20 2a 70 56 66 73  qlite3_vfs *pVfs
5370: 20 3d 20 28 73 71 6c 69 74 65 33 5f 76 66 73 20   = (sqlite3_vfs 
5380: 2a 29 70 43 66 56 66 73 2d 3e 70 41 70 70 44 61  *)pCfVfs->pAppDa
5390: 74 61 3b 0a 20 20 70 56 66 73 2d 3e 78 44 6c 45  ta;.  pVfs->xDlE
53a0: 72 72 6f 72 28 70 56 66 73 2c 20 6e 42 79 74 65  rror(pVfs, nByte
53b0: 2c 20 7a 45 72 72 4d 73 67 29 3b 0a 7d 0a 73 74  , zErrMsg);.}.st
53c0: 61 74 69 63 20 76 6f 69 64 20 28 2a 63 66 44 6c  atic void (*cfDl
53d0: 53 79 6d 28 73 71 6c 69 74 65 33 5f 76 66 73 20  Sym(sqlite3_vfs 
53e0: 2a 70 43 66 56 66 73 2c 20 76 6f 69 64 20 2a 70  *pCfVfs, void *p
53f0: 48 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  H, const char *z
5400: 53 79 6d 29 29 28 76 6f 69 64 29 7b 0a 20 20 73  Sym))(void){.  s
5410: 71 6c 69 74 65 33 5f 76 66 73 20 2a 70 56 66 73  qlite3_vfs *pVfs
5420: 20 3d 20 28 73 71 6c 69 74 65 33 5f 76 66 73 20   = (sqlite3_vfs 
5430: 2a 29 70 43 66 56 66 73 2d 3e 70 41 70 70 44 61  *)pCfVfs->pAppDa
5440: 74 61 3b 0a 20 20 72 65 74 75 72 6e 20 70 56 66  ta;.  return pVf
5450: 73 2d 3e 78 44 6c 53 79 6d 28 70 56 66 73 2c 20  s->xDlSym(pVfs, 
5460: 70 48 2c 20 7a 53 79 6d 29 3b 0a 7d 0a 73 74 61  pH, zSym);.}.sta
5470: 74 69 63 20 76 6f 69 64 20 63 66 44 6c 43 6c 6f  tic void cfDlClo
5480: 73 65 28 73 71 6c 69 74 65 33 5f 76 66 73 20 2a  se(sqlite3_vfs *
5490: 70 43 66 56 66 73 2c 20 76 6f 69 64 20 2a 70 48  pCfVfs, void *pH
54a0: 61 6e 64 6c 65 29 7b 0a 20 20 73 71 6c 69 74 65  andle){.  sqlite
54b0: 33 5f 76 66 73 20 2a 70 56 66 73 20 3d 20 28 73  3_vfs *pVfs = (s
54c0: 71 6c 69 74 65 33 5f 76 66 73 20 2a 29 70 43 66  qlite3_vfs *)pCf
54d0: 56 66 73 2d 3e 70 41 70 70 44 61 74 61 3b 0a 20  Vfs->pAppData;. 
54e0: 20 70 56 66 73 2d 3e 78 44 6c 43 6c 6f 73 65 28   pVfs->xDlClose(
54f0: 70 56 66 73 2c 20 70 48 61 6e 64 6c 65 29 3b 0a  pVfs, pHandle);.
5500: 7d 0a 73 74 61 74 69 63 20 69 6e 74 20 63 66 52  }.static int cfR
5510: 61 6e 64 6f 6d 6e 65 73 73 28 73 71 6c 69 74 65  andomness(sqlite
5520: 33 5f 76 66 73 20 2a 70 43 66 56 66 73 2c 20 69  3_vfs *pCfVfs, i
5530: 6e 74 20 6e 42 79 74 65 2c 20 63 68 61 72 20 2a  nt nByte, char *
5540: 7a 42 75 66 4f 75 74 29 7b 0a 20 20 73 71 6c 69  zBufOut){.  sqli
5550: 74 65 33 5f 76 66 73 20 2a 70 56 66 73 20 3d 20  te3_vfs *pVfs = 
5560: 28 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 29 70  (sqlite3_vfs *)p
5570: 43 66 56 66 73 2d 3e 70 41 70 70 44 61 74 61 3b  CfVfs->pAppData;
5580: 0a 20 20 72 65 74 75 72 6e 20 70 56 66 73 2d 3e  .  return pVfs->
5590: 78 52 61 6e 64 6f 6d 6e 65 73 73 28 70 56 66 73  xRandomness(pVfs
55a0: 2c 20 6e 42 79 74 65 2c 20 7a 42 75 66 4f 75 74  , nByte, zBufOut
55b0: 29 3b 0a 7d 0a 73 74 61 74 69 63 20 69 6e 74 20  );.}.static int 
55c0: 63 66 53 6c 65 65 70 28 73 71 6c 69 74 65 33 5f  cfSleep(sqlite3_
55d0: 76 66 73 20 2a 70 43 66 56 66 73 2c 20 69 6e 74  vfs *pCfVfs, int
55e0: 20 6e 4d 69 63 72 6f 29 7b 0a 20 20 73 71 6c 69   nMicro){.  sqli
55f0: 74 65 33 5f 76 66 73 20 2a 70 56 66 73 20 3d 20  te3_vfs *pVfs = 
5600: 28 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 29 70  (sqlite3_vfs *)p
5610: 43 66 56 66 73 2d 3e 70 41 70 70 44 61 74 61 3b  CfVfs->pAppData;
5620: 0a 20 20 72 65 74 75 72 6e 20 70 56 66 73 2d 3e  .  return pVfs->
5630: 78 53 6c 65 65 70 28 70 56 66 73 2c 20 6e 4d 69  xSleep(pVfs, nMi
5640: 63 72 6f 29 3b 0a 7d 0a 73 74 61 74 69 63 20 69  cro);.}.static i
5650: 6e 74 20 63 66 43 75 72 72 65 6e 74 54 69 6d 65  nt cfCurrentTime
5660: 28 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 70 43  (sqlite3_vfs *pC
5670: 66 56 66 73 2c 20 64 6f 75 62 6c 65 20 2a 70 54  fVfs, double *pT
5680: 69 6d 65 4f 75 74 29 7b 0a 20 20 73 71 6c 69 74  imeOut){.  sqlit
5690: 65 33 5f 76 66 73 20 2a 70 56 66 73 20 3d 20 28  e3_vfs *pVfs = (
56a0: 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 29 70 43  sqlite3_vfs *)pC
56b0: 66 56 66 73 2d 3e 70 41 70 70 44 61 74 61 3b 0a  fVfs->pAppData;.
56c0: 20 20 72 65 74 75 72 6e 20 70 56 66 73 2d 3e 78    return pVfs->x
56d0: 43 75 72 72 65 6e 74 54 69 6d 65 28 70 56 66 73  CurrentTime(pVfs
56e0: 2c 20 70 54 69 6d 65 4f 75 74 29 3b 0a 7d 0a 0a  , pTimeOut);.}..
56f0: 73 74 61 74 69 63 20 69 6e 74 20 70 72 6f 63 65  static int proce
5700: 73 73 44 65 76 53 79 6d 41 72 67 73 28 0a 20 20  ssDevSymArgs(.  
5710: 54 63 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65  Tcl_Interp *inte
5720: 72 70 2c 0a 20 20 69 6e 74 20 6f 62 6a 63 2c 0a  rp,.  int objc,.
5730: 20 20 54 63 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54    Tcl_Obj *CONST
5740: 20 6f 62 6a 76 5b 5d 2c 0a 20 20 69 6e 74 20 2a   objv[],.  int *
5750: 70 69 44 65 76 69 63 65 43 68 61 72 2c 0a 20 20  piDeviceChar,.  
5760: 69 6e 74 20 2a 70 69 53 65 63 74 6f 72 53 69 7a  int *piSectorSiz
5770: 65 0a 29 7b 0a 20 20 73 74 72 75 63 74 20 44 65  e.){.  struct De
5780: 76 69 63 65 46 6c 61 67 20 7b 0a 20 20 20 20 63  viceFlag {.    c
5790: 68 61 72 20 2a 7a 4e 61 6d 65 3b 0a 20 20 20 20  har *zName;.    
57a0: 69 6e 74 20 69 56 61 6c 75 65 3b 0a 20 20 7d 20  int iValue;.  } 
57b0: 61 46 6c 61 67 5b 5d 20 3d 20 7b 0a 20 20 20 20  aFlag[] = {.    
57c0: 7b 20 22 61 74 6f 6d 69 63 22 2c 20 20 20 20 20  { "atomic",     
57d0: 20 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f           SQLITE_
57e0: 49 4f 43 41 50 5f 41 54 4f 4d 49 43 20 20 20 20  IOCAP_ATOMIC    
57f0: 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20              },. 
5800: 20 20 20 7b 20 22 61 74 6f 6d 69 63 35 31 32 22     { "atomic512"
5810: 2c 20 20 20 20 20 20 20 20 20 20 20 53 51 4c 49  ,           SQLI
5820: 54 45 5f 49 4f 43 41 50 5f 41 54 4f 4d 49 43 35  TE_IOCAP_ATOMIC5
5830: 31 32 20 20 20 20 20 20 20 20 20 20 20 20 20 7d  12             }
5840: 2c 0a 20 20 20 20 7b 20 22 61 74 6f 6d 69 63 31  ,.    { "atomic1
5850: 6b 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 53  k",            S
5860: 51 4c 49 54 45 5f 49 4f 43 41 50 5f 41 54 4f 4d  QLITE_IOCAP_ATOM
5870: 49 43 31 4b 20 20 20 20 20 20 20 20 20 20 20 20  IC1K            
5880: 20 20 7d 2c 0a 20 20 20 20 7b 20 22 61 74 6f 6d    },.    { "atom
5890: 69 63 32 6b 22 2c 20 20 20 20 20 20 20 20 20 20  ic2k",          
58a0: 20 20 53 51 4c 49 54 45 5f 49 4f 43 41 50 5f 41    SQLITE_IOCAP_A
58b0: 54 4f 4d 49 43 32 4b 20 20 20 20 20 20 20 20 20  TOMIC2K         
58c0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 61       },.    { "a
58d0: 74 6f 6d 69 63 34 6b 22 2c 20 20 20 20 20 20 20  tomic4k",       
58e0: 20 20 20 20 20 53 51 4c 49 54 45 5f 49 4f 43 41       SQLITE_IOCA
58f0: 50 5f 41 54 4f 4d 49 43 34 4b 20 20 20 20 20 20  P_ATOMIC4K      
5900: 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b          },.    {
5910: 20 22 61 74 6f 6d 69 63 38 6b 22 2c 20 20 20 20   "atomic8k",    
5920: 20 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f 49          SQLITE_I
5930: 4f 43 41 50 5f 41 54 4f 4d 49 43 38 4b 20 20 20  OCAP_ATOMIC8K   
5940: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
5950: 20 20 7b 20 22 61 74 6f 6d 69 63 31 36 6b 22 2c    { "atomic16k",
5960: 20 20 20 20 20 20 20 20 20 20 20 53 51 4c 49 54             SQLIT
5970: 45 5f 49 4f 43 41 50 5f 41 54 4f 4d 49 43 31 36  E_IOCAP_ATOMIC16
5980: 4b 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c  K             },
5990: 0a 20 20 20 20 7b 20 22 61 74 6f 6d 69 63 33 32  .    { "atomic32
59a0: 6b 22 2c 20 20 20 20 20 20 20 20 20 20 20 53 51  k",           SQ
59b0: 4c 49 54 45 5f 49 4f 43 41 50 5f 41 54 4f 4d 49  LITE_IOCAP_ATOMI
59c0: 43 33 32 4b 20 20 20 20 20 20 20 20 20 20 20 20  C32K            
59d0: 20 7d 2c 0a 20 20 20 20 7b 20 22 61 74 6f 6d 69   },.    { "atomi
59e0: 63 36 34 6b 22 2c 20 20 20 20 20 20 20 20 20 20  c64k",          
59f0: 20 53 51 4c 49 54 45 5f 49 4f 43 41 50 5f 41 54   SQLITE_IOCAP_AT
5a00: 4f 4d 49 43 36 34 4b 20 20 20 20 20 20 20 20 20  OMIC64K         
5a10: 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73 65      },.    { "se
5a20: 71 75 65 6e 74 69 61 6c 22 2c 20 20 20 20 20 20  quential",      
5a30: 20 20 20 20 53 51 4c 49 54 45 5f 49 4f 43 41 50      SQLITE_IOCAP
5a40: 5f 53 45 51 55 45 4e 54 49 41 4c 20 20 20 20 20  _SEQUENTIAL     
5a50: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5a60: 22 73 61 66 65 5f 61 70 70 65 6e 64 22 2c 20 20  "safe_append",  
5a70: 20 20 20 20 20 20 20 53 51 4c 49 54 45 5f 49 4f         SQLITE_IO
5a80: 43 41 50 5f 53 41 46 45 5f 41 50 50 45 4e 44 20  CAP_SAFE_APPEND 
5a90: 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20            },.   
5aa0: 20 7b 20 22 70 6f 77 65 72 73 61 66 65 5f 6f 76   { "powersafe_ov
5ab0: 65 72 77 72 69 74 65 22 2c 20 53 51 4c 49 54 45  erwrite", SQLITE
5ac0: 5f 49 4f 43 41 50 5f 50 4f 57 45 52 53 41 46 45  _IOCAP_POWERSAFE
5ad0: 5f 4f 56 45 52 57 52 49 54 45 20 20 20 7d 2c 0a  _OVERWRITE   },.
5ae0: 20 20 20 20 7b 20 30 2c 20 30 20 7d 0a 20 20 7d      { 0, 0 }.  }
5af0: 3b 0a 0a 20 20 69 6e 74 20 69 3b 0a 20 20 69 6e  ;..  int i;.  in
5b00: 74 20 69 44 63 20 3d 20 30 3b 0a 20 20 69 6e 74  t iDc = 0;.  int
5b10: 20 69 53 65 63 74 6f 72 53 69 7a 65 20 3d 20 30   iSectorSize = 0
5b20: 3b 0a 20 20 69 6e 74 20 73 65 74 53 65 63 74 6f  ;.  int setSecto
5b30: 72 73 69 7a 65 20 3d 20 30 3b 0a 20 20 69 6e 74  rsize = 0;.  int
5b40: 20 73 65 74 44 65 76 69 63 65 43 68 61 72 20 3d   setDeviceChar =
5b50: 20 30 3b 0a 0a 20 20 66 6f 72 28 69 3d 30 3b 20   0;..  for(i=0; 
5b60: 69 3c 6f 62 6a 63 3b 20 69 2b 3d 32 29 7b 0a 20  i<objc; i+=2){. 
5b70: 20 20 20 69 6e 74 20 6e 4f 70 74 3b 0a 20 20 20     int nOpt;.   
5b80: 20 63 68 61 72 20 2a 7a 4f 70 74 20 3d 20 54 63   char *zOpt = Tc
5b90: 6c 5f 47 65 74 53 74 72 69 6e 67 46 72 6f 6d 4f  l_GetStringFromO
5ba0: 62 6a 28 6f 62 6a 76 5b 69 5d 2c 20 26 6e 4f 70  bj(objv[i], &nOp
5bb0: 74 29 3b 0a 0a 20 20 20 20 69 66 28 20 28 6e 4f  t);..    if( (nO
5bc0: 70 74 3e 31 31 20 7c 7c 20 6e 4f 70 74 3c 32 20  pt>11 || nOpt<2 
5bd0: 7c 7c 20 73 74 72 6e 63 6d 70 28 22 2d 73 65 63  || strncmp("-sec
5be0: 74 6f 72 73 69 7a 65 22 2c 20 7a 4f 70 74 2c 20  torsize", zOpt, 
5bf0: 6e 4f 70 74 29 29 20 0a 20 20 20 20 20 26 26 20  nOpt)) .     && 
5c00: 28 6e 4f 70 74 3e 31 36 20 7c 7c 20 6e 4f 70 74  (nOpt>16 || nOpt
5c10: 3c 32 20 7c 7c 20 73 74 72 6e 63 6d 70 28 22 2d  <2 || strncmp("-
5c20: 63 68 61 72 61 63 74 65 72 69 73 74 69 63 73 22  characteristics"
5c30: 2c 20 7a 4f 70 74 2c 20 6e 4f 70 74 29 29 0a 20  , zOpt, nOpt)). 
5c40: 20 20 20 29 7b 0a 20 20 20 20 20 20 54 63 6c 5f     ){.      Tcl_
5c50: 41 70 70 65 6e 64 52 65 73 75 6c 74 28 69 6e 74  AppendResult(int
5c60: 65 72 70 2c 20 0a 20 20 20 20 20 20 20 20 22 42  erp, .        "B
5c70: 61 64 20 6f 70 74 69 6f 6e 3a 20 5c 22 22 2c 20  ad option: \"", 
5c80: 7a 4f 70 74 2c 20 0a 20 20 20 20 20 20 20 20 22  zOpt, .        "
5c90: 5c 22 20 2d 20 6d 75 73 74 20 62 65 20 5c 22 2d  \" - must be \"-
5ca0: 63 68 61 72 61 63 74 65 72 69 73 74 69 63 73 5c  characteristics\
5cb0: 22 20 6f 72 20 5c 22 2d 73 65 63 74 6f 72 73 69  " or \"-sectorsi
5cc0: 7a 65 5c 22 22 2c 20 30 0a 20 20 20 20 20 20 29  ze\"", 0.      )
5cd0: 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 54  ;.      return T
5ce0: 43 4c 5f 45 52 52 4f 52 3b 0a 20 20 20 20 7d 0a  CL_ERROR;.    }.
5cf0: 20 20 20 20 69 66 28 20 69 3d 3d 6f 62 6a 63 2d      if( i==objc-
5d00: 31 20 29 7b 0a 20 20 20 20 20 20 54 63 6c 5f 41  1 ){.      Tcl_A
5d10: 70 70 65 6e 64 52 65 73 75 6c 74 28 69 6e 74 65  ppendResult(inte
5d20: 72 70 2c 20 22 4f 70 74 69 6f 6e 20 72 65 71 75  rp, "Option requ
5d30: 69 72 65 73 20 61 6e 20 61 72 67 75 6d 65 6e 74  ires an argument
5d40: 3a 20 5c 22 22 2c 20 7a 4f 70 74 2c 20 22 5c 22  : \"", zOpt, "\"
5d50: 22 2c 30 29 3b 0a 20 20 20 20 20 20 72 65 74 75  ",0);.      retu
5d60: 72 6e 20 54 43 4c 5f 45 52 52 4f 52 3b 0a 20 20  rn TCL_ERROR;.  
5d70: 20 20 7d 0a 0a 20 20 20 20 69 66 28 20 7a 4f 70    }..    if( zOp
5d80: 74 5b 31 5d 3d 3d 27 73 27 20 29 7b 0a 20 20 20  t[1]=='s' ){.   
5d90: 20 20 20 69 66 28 20 54 63 6c 5f 47 65 74 49 6e     if( Tcl_GetIn
5da0: 74 46 72 6f 6d 4f 62 6a 28 69 6e 74 65 72 70 2c  tFromObj(interp,
5db0: 20 6f 62 6a 76 5b 69 2b 31 5d 2c 20 26 69 53 65   objv[i+1], &iSe
5dc0: 63 74 6f 72 53 69 7a 65 29 20 29 7b 0a 20 20 20  ctorSize) ){.   
5dd0: 20 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f       return TCL_
5de0: 45 52 52 4f 52 3b 0a 20 20 20 20 20 20 7d 0a 20  ERROR;.      }. 
5df0: 20 20 20 20 20 73 65 74 53 65 63 74 6f 72 73 69       setSectorsi
5e00: 7a 65 20 3d 20 31 3b 0a 20 20 20 20 7d 65 6c 73  ze = 1;.    }els
5e10: 65 7b 0a 20 20 20 20 20 20 69 6e 74 20 6a 3b 0a  e{.      int j;.
5e20: 20 20 20 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 2a        Tcl_Obj **
5e30: 61 70 4f 62 6a 3b 0a 20 20 20 20 20 20 69 6e 74  apObj;.      int
5e40: 20 6e 4f 62 6a 3b 0a 20 20 20 20 20 20 69 66 28   nObj;.      if(
5e50: 20 54 63 6c 5f 4c 69 73 74 4f 62 6a 47 65 74 45   Tcl_ListObjGetE
5e60: 6c 65 6d 65 6e 74 73 28 69 6e 74 65 72 70 2c 20  lements(interp, 
5e70: 6f 62 6a 76 5b 69 2b 31 5d 2c 20 26 6e 4f 62 6a  objv[i+1], &nObj
5e80: 2c 20 26 61 70 4f 62 6a 29 20 29 7b 0a 20 20 20  , &apObj) ){.   
5e90: 20 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f       return TCL_
5ea0: 45 52 52 4f 52 3b 0a 20 20 20 20 20 20 7d 0a 20  ERROR;.      }. 
5eb0: 20 20 20 20 20 66 6f 72 28 6a 3d 30 3b 20 6a 3c       for(j=0; j<
5ec0: 6e 4f 62 6a 3b 20 6a 2b 2b 29 7b 0a 20 20 20 20  nObj; j++){.    
5ed0: 20 20 20 20 69 6e 74 20 72 63 3b 0a 20 20 20 20      int rc;.    
5ee0: 20 20 20 20 69 6e 74 20 69 43 68 6f 69 63 65 3b      int iChoice;
5ef0: 0a 20 20 20 20 20 20 20 20 54 63 6c 5f 4f 62 6a  .        Tcl_Obj
5f00: 20 2a 70 46 6c 61 67 20 3d 20 54 63 6c 5f 44 75   *pFlag = Tcl_Du
5f10: 70 6c 69 63 61 74 65 4f 62 6a 28 61 70 4f 62 6a  plicateObj(apObj
5f20: 5b 6a 5d 29 3b 0a 20 20 20 20 20 20 20 20 54 63  [j]);.        Tc
5f30: 6c 5f 49 6e 63 72 52 65 66 43 6f 75 6e 74 28 70  l_IncrRefCount(p
5f40: 46 6c 61 67 29 3b 0a 20 20 20 20 20 20 20 20 54  Flag);.        T
5f50: 63 6c 5f 55 74 66 54 6f 4c 6f 77 65 72 28 54 63  cl_UtfToLower(Tc
5f60: 6c 5f 47 65 74 53 74 72 69 6e 67 28 70 46 6c 61  l_GetString(pFla
5f70: 67 29 29 3b 0a 20 0a 20 20 20 20 20 20 20 20 72  g));. .        r
5f80: 63 20 3d 20 54 63 6c 5f 47 65 74 49 6e 64 65 78  c = Tcl_GetIndex
5f90: 46 72 6f 6d 4f 62 6a 53 74 72 75 63 74 28 0a 20  FromObjStruct(. 
5fa0: 20 20 20 20 20 20 20 20 20 20 20 69 6e 74 65 72             inter
5fb0: 70 2c 20 70 46 6c 61 67 2c 20 61 46 6c 61 67 2c  p, pFlag, aFlag,
5fc0: 20 73 69 7a 65 6f 66 28 61 46 6c 61 67 5b 30 5d   sizeof(aFlag[0]
5fd0: 29 2c 20 22 6e 6f 20 73 75 63 68 20 66 6c 61 67  ), "no such flag
5fe0: 22 2c 20 30 2c 20 26 69 43 68 6f 69 63 65 0a 20  ", 0, &iChoice. 
5ff0: 20 20 20 20 20 20 20 29 3b 0a 20 20 20 20 20 20         );.      
6000: 20 20 54 63 6c 5f 44 65 63 72 52 65 66 43 6f 75    Tcl_DecrRefCou
6010: 6e 74 28 70 46 6c 61 67 29 3b 0a 20 20 20 20 20  nt(pFlag);.     
6020: 20 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20 20     if( rc ){.   
6030: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 54 43         return TC
6040: 4c 5f 45 52 52 4f 52 3b 0a 20 20 20 20 20 20 20  L_ERROR;.       
6050: 20 7d 0a 0a 20 20 20 20 20 20 20 20 69 44 63 20   }..        iDc 
6060: 7c 3d 20 61 46 6c 61 67 5b 69 43 68 6f 69 63 65  |= aFlag[iChoice
6070: 5d 2e 69 56 61 6c 75 65 3b 0a 20 20 20 20 20 20  ].iValue;.      
6080: 7d 0a 20 20 20 20 20 20 73 65 74 44 65 76 69 63  }.      setDevic
6090: 65 43 68 61 72 20 3d 20 31 3b 0a 20 20 20 20 7d  eChar = 1;.    }
60a0: 0a 20 20 7d 0a 0a 20 20 69 66 28 20 73 65 74 44  .  }..  if( setD
60b0: 65 76 69 63 65 43 68 61 72 20 29 7b 0a 20 20 20  eviceChar ){.   
60c0: 20 2a 70 69 44 65 76 69 63 65 43 68 61 72 20 3d   *piDeviceChar =
60d0: 20 69 44 63 3b 0a 20 20 7d 0a 20 20 69 66 28 20   iDc;.  }.  if( 
60e0: 73 65 74 53 65 63 74 6f 72 73 69 7a 65 20 29 7b  setSectorsize ){
60f0: 0a 20 20 20 20 2a 70 69 53 65 63 74 6f 72 53 69  .    *piSectorSi
6100: 7a 65 20 3d 20 69 53 65 63 74 6f 72 53 69 7a 65  ze = iSectorSize
6110: 3b 0a 20 20 7d 0a 0a 20 20 72 65 74 75 72 6e 20  ;.  }..  return 
6120: 54 43 4c 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  TCL_OK;.}../*.**
6130: 20 74 63 6c 63 6d 64 3a 20 20 20 73 71 6c 69 74   tclcmd:   sqlit
6140: 65 5f 63 72 61 73 68 5f 65 6e 61 62 6c 65 20 45  e_crash_enable E
6150: 4e 41 42 4c 45 0a 2a 2a 0a 2a 2a 20 50 61 72 61  NABLE.**.** Para
6160: 6d 65 74 65 72 20 45 4e 41 42 4c 45 20 6d 75 73  meter ENABLE mus
6170: 74 20 62 65 20 61 20 62 6f 6f 6c 65 61 6e 20 76  t be a boolean v
6180: 61 6c 75 65 2e 20 49 66 20 74 72 75 65 2c 20 74  alue. If true, t
6190: 68 65 6e 20 74 68 65 20 22 63 72 61 73 68 22 0a  hen the "crash".
61a0: 2a 2a 20 76 66 73 20 69 73 20 61 64 64 65 64 20  ** vfs is added 
61b0: 74 6f 20 74 68 65 20 73 79 73 74 65 6d 2e 20 49  to the system. I
61c0: 66 20 66 61 6c 73 65 2c 20 69 74 20 69 73 20 72  f false, it is r
61d0: 65 6d 6f 76 65 64 2e 0a 2a 2f 0a 73 74 61 74 69  emoved..*/.stati
61e0: 63 20 69 6e 74 20 63 72 61 73 68 45 6e 61 62 6c  c int crashEnabl
61f0: 65 43 6d 64 28 0a 20 20 76 6f 69 64 20 2a 20 63  eCmd(.  void * c
6200: 6c 69 65 6e 74 44 61 74 61 2c 0a 20 20 54 63 6c  lientData,.  Tcl
6210: 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65 72 70 2c  _Interp *interp,
6220: 0a 20 20 69 6e 74 20 6f 62 6a 63 2c 0a 20 20 54  .  int objc,.  T
6230: 63 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f 62  cl_Obj *CONST ob
6240: 6a 76 5b 5d 0a 29 7b 0a 20 20 69 6e 74 20 69 73  jv[].){.  int is
6250: 45 6e 61 62 6c 65 3b 0a 20 20 73 74 61 74 69 63  Enable;.  static
6260: 20 73 71 6c 69 74 65 33 5f 76 66 73 20 63 72 61   sqlite3_vfs cra
6270: 73 68 56 66 73 20 3d 20 7b 0a 20 20 20 20 32 2c  shVfs = {.    2,
6280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6290: 20 20 2f 2a 20 69 56 65 72 73 69 6f 6e 20 2a 2f    /* iVersion */
62a0: 0a 20 20 20 20 30 2c 20 20 20 20 20 20 20 20 20  .    0,         
62b0: 20 20 20 20 20 20 20 20 20 2f 2a 20 73 7a 4f 73           /* szOs
62c0: 46 69 6c 65 20 2a 2f 0a 20 20 20 20 30 2c 20 20  File */.    0,  
62d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
62e0: 2f 2a 20 6d 78 50 61 74 68 6e 61 6d 65 20 2a 2f  /* mxPathname */
62f0: 0a 20 20 20 20 30 2c 20 20 20 20 20 20 20 20 20  .    0,         
6300: 20 20 20 20 20 20 20 20 20 2f 2a 20 70 4e 65 78           /* pNex
6310: 74 20 2a 2f 0a 20 20 20 20 22 63 72 61 73 68 22  t */.    "crash"
6320: 2c 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20  ,            /* 
6330: 7a 4e 61 6d 65 20 2a 2f 0a 20 20 20 20 30 2c 20  zName */.    0, 
6340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6350: 20 2f 2a 20 70 41 70 70 44 61 74 61 20 2a 2f 0a   /* pAppData */.
6360: 20 20 0a 20 20 20 20 63 66 4f 70 65 6e 2c 20 20    .    cfOpen,  
6370: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
6380: 78 4f 70 65 6e 20 2a 2f 0a 20 20 20 20 63 66 44  xOpen */.    cfD
6390: 65 6c 65 74 65 2c 20 20 20 20 20 20 20 20 20 20  elete,          
63a0: 20 20 20 2f 2a 20 78 44 65 6c 65 74 65 20 2a 2f     /* xDelete */
63b0: 0a 20 20 20 20 63 66 41 63 63 65 73 73 2c 20 20  .    cfAccess,  
63c0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 78 41             /* xA
63d0: 63 63 65 73 73 20 2a 2f 0a 20 20 20 20 63 66 46  ccess */.    cfF
63e0: 75 6c 6c 50 61 74 68 6e 61 6d 65 2c 20 20 20 20  ullPathname,    
63f0: 20 20 20 2f 2a 20 78 46 75 6c 6c 50 61 74 68 6e     /* xFullPathn
6400: 61 6d 65 20 2a 2f 0a 20 20 20 20 63 66 44 6c 4f  ame */.    cfDlO
6410: 70 65 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20  pen,            
6420: 20 2f 2a 20 78 44 6c 4f 70 65 6e 20 2a 2f 0a 20   /* xDlOpen */. 
6430: 20 20 20 63 66 44 6c 45 72 72 6f 72 2c 20 20 20     cfDlError,   
6440: 20 20 20 20 20 20 20 20 20 2f 2a 20 78 44 6c 45           /* xDlE
6450: 72 72 6f 72 20 2a 2f 0a 20 20 20 20 63 66 44 6c  rror */.    cfDl
6460: 53 79 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20  Sym,            
6470: 20 20 2f 2a 20 78 44 6c 53 79 6d 20 2a 2f 0a 20    /* xDlSym */. 
6480: 20 20 20 63 66 44 6c 43 6c 6f 73 65 2c 20 20 20     cfDlClose,   
6490: 20 20 20 20 20 20 20 20 20 2f 2a 20 78 44 6c 43           /* xDlC
64a0: 6c 6f 73 65 20 2a 2f 0a 20 20 20 20 63 66 52 61  lose */.    cfRa
64b0: 6e 64 6f 6d 6e 65 73 73 2c 20 20 20 20 20 20 20  ndomness,       
64c0: 20 20 2f 2a 20 78 52 61 6e 64 6f 6d 6e 65 73 73    /* xRandomness
64d0: 20 2a 2f 0a 20 20 20 20 63 66 53 6c 65 65 70 2c   */.    cfSleep,
64e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
64f0: 20 78 53 6c 65 65 70 20 2a 2f 0a 20 20 20 20 63   xSleep */.    c
6500: 66 43 75 72 72 65 6e 74 54 69 6d 65 2c 20 20 20  fCurrentTime,   
6510: 20 20 20 20 20 2f 2a 20 78 43 75 72 72 65 6e 74       /* xCurrent
6520: 54 69 6d 65 20 2a 2f 0a 20 20 20 20 30 2c 20 20  Time */.    0,  
6530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6540: 20 20 2f 2a 20 78 47 65 74 6c 61 73 74 45 72 72    /* xGetlastErr
6550: 6f 72 20 2a 2f 0a 20 20 20 20 30 2c 20 20 20 20  or */.    0,    
6560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6570: 2f 2a 20 78 43 75 72 72 65 6e 74 54 69 6d 65 49  /* xCurrentTimeI
6580: 6e 74 36 34 20 2a 2f 0a 20 20 7d 3b 0a 0a 20 20  nt64 */.  };..  
6590: 69 66 28 20 6f 62 6a 63 21 3d 32 20 29 7b 0a 20  if( objc!=2 ){. 
65a0: 20 20 20 54 63 6c 5f 57 72 6f 6e 67 4e 75 6d 41     Tcl_WrongNumA
65b0: 72 67 73 28 69 6e 74 65 72 70 2c 20 31 2c 20 6f  rgs(interp, 1, o
65c0: 62 6a 76 2c 20 22 45 4e 41 42 4c 45 22 29 3b 0a  bjv, "ENABLE");.
65d0: 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f 45      return TCL_E
65e0: 52 52 4f 52 3b 0a 20 20 7d 0a 0a 20 20 69 66 28  RROR;.  }..  if(
65f0: 20 54 63 6c 5f 47 65 74 42 6f 6f 6c 65 61 6e 46   Tcl_GetBooleanF
6600: 72 6f 6d 4f 62 6a 28 69 6e 74 65 72 70 2c 20 6f  romObj(interp, o
6610: 62 6a 76 5b 31 5d 2c 20 26 69 73 45 6e 61 62 6c  bjv[1], &isEnabl
6620: 65 29 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  e) ){.    return
6630: 20 54 43 4c 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a   TCL_ERROR;.  }.
6640: 0a 20 20 69 66 28 20 28 69 73 45 6e 61 62 6c 65  .  if( (isEnable
6650: 20 26 26 20 63 72 61 73 68 56 66 73 2e 70 41 70   && crashVfs.pAp
6660: 70 44 61 74 61 29 20 7c 7c 20 28 21 69 73 45 6e  pData) || (!isEn
6670: 61 62 6c 65 20 26 26 20 21 63 72 61 73 68 56 66  able && !crashVf
6680: 73 2e 70 41 70 70 44 61 74 61 29 20 29 7b 0a 20  s.pAppData) ){. 
6690: 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f 4f 4b     return TCL_OK
66a0: 3b 0a 20 20 7d 0a 0a 20 20 69 66 28 20 63 72 61  ;.  }..  if( cra
66b0: 73 68 56 66 73 2e 70 41 70 70 44 61 74 61 3d 3d  shVfs.pAppData==
66c0: 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  0 ){.    sqlite3
66d0: 5f 76 66 73 20 2a 70 4f 72 69 67 69 6e 61 6c 56  _vfs *pOriginalV
66e0: 66 73 20 3d 20 73 71 6c 69 74 65 33 5f 76 66 73  fs = sqlite3_vfs
66f0: 5f 66 69 6e 64 28 30 29 3b 0a 20 20 20 20 63 72  _find(0);.    cr
6700: 61 73 68 56 66 73 2e 6d 78 50 61 74 68 6e 61 6d  ashVfs.mxPathnam
6710: 65 20 3d 20 70 4f 72 69 67 69 6e 61 6c 56 66 73  e = pOriginalVfs
6720: 2d 3e 6d 78 50 61 74 68 6e 61 6d 65 3b 0a 20 20  ->mxPathname;.  
6730: 20 20 63 72 61 73 68 56 66 73 2e 70 41 70 70 44    crashVfs.pAppD
6740: 61 74 61 20 3d 20 28 76 6f 69 64 20 2a 29 70 4f  ata = (void *)pO
6750: 72 69 67 69 6e 61 6c 56 66 73 3b 0a 20 20 20 20  riginalVfs;.    
6760: 63 72 61 73 68 56 66 73 2e 73 7a 4f 73 46 69 6c  crashVfs.szOsFil
6770: 65 20 3d 20 73 69 7a 65 6f 66 28 43 72 61 73 68  e = sizeof(Crash
6780: 46 69 6c 65 29 20 2b 20 70 4f 72 69 67 69 6e 61  File) + pOrigina
6790: 6c 56 66 73 2d 3e 73 7a 4f 73 46 69 6c 65 3b 0a  lVfs->szOsFile;.
67a0: 20 20 20 20 73 71 6c 69 74 65 33 5f 76 66 73 5f      sqlite3_vfs_
67b0: 72 65 67 69 73 74 65 72 28 26 63 72 61 73 68 56  register(&crashV
67c0: 66 73 2c 20 30 29 3b 0a 20 20 7d 65 6c 73 65 7b  fs, 0);.  }else{
67d0: 0a 20 20 20 20 63 72 61 73 68 56 66 73 2e 70 41  .    crashVfs.pA
67e0: 70 70 44 61 74 61 20 3d 20 30 3b 0a 20 20 20 20  ppData = 0;.    
67f0: 73 71 6c 69 74 65 33 5f 76 66 73 5f 75 6e 72 65  sqlite3_vfs_unre
6800: 67 69 73 74 65 72 28 26 63 72 61 73 68 56 66 73  gister(&crashVfs
6810: 29 3b 0a 20 20 7d 0a 0a 20 20 72 65 74 75 72 6e  );.  }..  return
6820: 20 54 43 4c 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a   TCL_OK;.}../*.*
6830: 2a 20 74 63 6c 63 6d 64 3a 20 20 20 73 71 6c 69  * tclcmd:   sqli
6840: 74 65 5f 63 72 61 73 68 70 61 72 61 6d 73 20 3f  te_crashparams ?
6850: 4f 50 54 49 4f 4e 53 3f 20 44 45 4c 41 59 20 43  OPTIONS? DELAY C
6860: 52 41 53 48 46 49 4c 45 0a 2a 2a 0a 2a 2a 20 54  RASHFILE.**.** T
6870: 68 69 73 20 70 72 6f 63 65 64 75 72 65 20 69 6d  his procedure im
6880: 70 6c 65 6d 65 6e 74 73 20 61 20 54 43 4c 20 63  plements a TCL c
6890: 6f 6d 6d 61 6e 64 20 74 68 61 74 20 65 6e 61 62  ommand that enab
68a0: 6c 65 73 20 63 72 61 73 68 20 74 65 73 74 69 6e  les crash testin
68b0: 67 0a 2a 2a 20 69 6e 20 74 65 73 74 66 69 78 74  g.** in testfixt
68c0: 75 72 65 2e 20 20 4f 6e 63 65 20 65 6e 61 62 6c  ure.  Once enabl
68d0: 65 64 2c 20 63 72 61 73 68 20 74 65 73 74 69 6e  ed, crash testin
68e0: 67 20 63 61 6e 6e 6f 74 20 62 65 20 64 69 73 61  g cannot be disa
68f0: 62 6c 65 64 2e 0a 2a 2a 0a 2a 2a 20 41 76 61 69  bled..**.** Avai
6900: 6c 61 62 6c 65 20 6f 70 74 69 6f 6e 73 20 61 72  lable options ar
6910: 65 20 22 2d 63 68 61 72 61 63 74 65 72 69 73 74  e "-characterist
6920: 69 63 73 22 20 61 6e 64 20 22 2d 73 65 63 74 6f  ics" and "-secto
6930: 72 73 69 7a 65 22 2e 20 42 6f 74 68 20 72 65 71  rsize". Both req
6940: 75 69 72 65 0a 2a 2a 20 61 6e 20 61 72 67 75 6d  uire.** an argum
6950: 65 6e 74 2e 20 46 6f 72 20 2d 73 65 63 74 6f 72  ent. For -sector
6960: 73 69 7a 65 2c 20 74 68 69 73 20 69 73 20 74 68  size, this is th
6970: 65 20 73 69 6d 75 6c 61 74 65 64 20 73 65 63 74  e simulated sect
6980: 6f 72 20 73 69 7a 65 20 69 6e 0a 2a 2a 20 62 79  or size in.** by
6990: 74 65 73 2e 20 46 6f 72 20 2d 63 68 61 72 61 63  tes. For -charac
69a0: 74 65 72 69 73 74 69 63 73 2c 20 74 68 65 20 61  teristics, the a
69b0: 72 67 75 6d 65 6e 74 20 6d 75 73 74 20 62 65 20  rgument must be 
69c0: 61 20 6c 69 73 74 20 6f 66 20 69 6f 2d 63 61 70  a list of io-cap
69d0: 61 62 69 6c 69 74 79 0a 2a 2a 20 66 6c 61 67 73  ability.** flags
69e0: 20 74 6f 20 73 69 6d 75 6c 61 74 65 2e 20 56 61   to simulate. Va
69f0: 6c 69 64 20 66 6c 61 67 73 20 61 72 65 20 22 61  lid flags are "a
6a00: 74 6f 6d 69 63 22 2c 20 22 61 74 6f 6d 69 63 35  tomic", "atomic5
6a10: 31 32 22 2c 20 22 61 74 6f 6d 69 63 31 4b 22 2c  12", "atomic1K",
6a20: 0a 2a 2a 20 22 61 74 6f 6d 69 63 32 4b 22 2c 20  .** "atomic2K", 
6a30: 22 61 74 6f 6d 69 63 34 4b 22 2c 20 22 61 74 6f  "atomic4K", "ato
6a40: 6d 69 63 38 4b 22 2c 20 22 61 74 6f 6d 69 63 31  mic8K", "atomic1
6a50: 36 4b 22 2c 20 22 61 74 6f 6d 69 63 33 32 4b 22  6K", "atomic32K"
6a60: 2c 20 0a 2a 2a 20 22 61 74 6f 6d 69 63 36 34 4b  , .** "atomic64K
6a70: 22 2c 20 22 73 65 71 75 65 6e 74 69 61 6c 22 20  ", "sequential" 
6a80: 61 6e 64 20 22 73 61 66 65 5f 61 70 70 65 6e 64  and "safe_append
6a90: 22 2e 0a 2a 2a 0a 2a 2a 20 45 78 61 6d 70 6c 65  "..**.** Example
6aa0: 3a 0a 2a 2a 0a 2a 2a 20 20 20 73 71 6c 69 74 65  :.**.**   sqlite
6ab0: 5f 63 72 61 73 68 70 61 72 61 6d 73 20 2d 73 65  _crashparams -se
6ac0: 63 74 20 31 30 32 34 20 2d 63 68 61 72 20 7b 61  ct 1024 -char {a
6ad0: 74 6f 6d 69 63 20 73 65 71 75 65 6e 74 69 61 6c  tomic sequential
6ae0: 7d 20 2e 2f 74 65 73 74 2e 64 62 20 31 0a 2a 2a  } ./test.db 1.**
6af0: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 63  .*/.static int c
6b00: 72 61 73 68 50 61 72 61 6d 73 4f 62 6a 43 6d 64  rashParamsObjCmd
6b10: 28 0a 20 20 76 6f 69 64 20 2a 20 63 6c 69 65 6e  (.  void * clien
6b20: 74 44 61 74 61 2c 0a 20 20 54 63 6c 5f 49 6e 74  tData,.  Tcl_Int
6b30: 65 72 70 20 2a 69 6e 74 65 72 70 2c 0a 20 20 69  erp *interp,.  i
6b40: 6e 74 20 6f 62 6a 63 2c 0a 20 20 54 63 6c 5f 4f  nt objc,.  Tcl_O
6b50: 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d  bj *CONST objv[]
6b60: 0a 29 7b 0a 20 20 69 6e 74 20 69 44 65 6c 61 79  .){.  int iDelay
6b70: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
6b80: 7a 43 72 61 73 68 46 69 6c 65 3b 0a 20 20 69 6e  zCrashFile;.  in
6b90: 74 20 6e 43 72 61 73 68 46 69 6c 65 2c 20 69 44  t nCrashFile, iD
6ba0: 63 2c 20 69 53 65 63 74 6f 72 53 69 7a 65 3b 0a  c, iSectorSize;.
6bb0: 0a 20 20 69 44 63 20 3d 20 2d 31 3b 0a 20 20 69  .  iDc = -1;.  i
6bc0: 53 65 63 74 6f 72 53 69 7a 65 20 3d 20 2d 31 3b  SectorSize = -1;
6bd0: 0a 0a 20 20 69 66 28 20 6f 62 6a 63 3c 33 20 29  ..  if( objc<3 )
6be0: 7b 0a 20 20 20 20 54 63 6c 5f 57 72 6f 6e 67 4e  {.    Tcl_WrongN
6bf0: 75 6d 41 72 67 73 28 69 6e 74 65 72 70 2c 20 31  umArgs(interp, 1
6c00: 2c 20 6f 62 6a 76 2c 20 22 3f 4f 50 54 49 4f 4e  , objv, "?OPTION
6c10: 53 3f 20 44 45 4c 41 59 20 43 52 41 53 48 46 49  S? DELAY CRASHFI
6c20: 4c 45 22 29 3b 0a 20 20 20 20 67 6f 74 6f 20 65  LE");.    goto e
6c30: 72 72 6f 72 3b 0a 20 20 7d 0a 0a 20 20 7a 43 72  rror;.  }..  zCr
6c40: 61 73 68 46 69 6c 65 20 3d 20 54 63 6c 5f 47 65  ashFile = Tcl_Ge
6c50: 74 53 74 72 69 6e 67 46 72 6f 6d 4f 62 6a 28 6f  tStringFromObj(o
6c60: 62 6a 76 5b 6f 62 6a 63 2d 31 5d 2c 20 26 6e 43  bjv[objc-1], &nC
6c70: 72 61 73 68 46 69 6c 65 29 3b 0a 20 20 69 66 28  rashFile);.  if(
6c80: 20 6e 43 72 61 73 68 46 69 6c 65 3e 3d 73 69 7a   nCrashFile>=siz
6c90: 65 6f 66 28 67 2e 7a 43 72 61 73 68 46 69 6c 65  eof(g.zCrashFile
6ca0: 29 20 29 7b 0a 20 20 20 20 54 63 6c 5f 41 70 70  ) ){.    Tcl_App
6cb0: 65 6e 64 52 65 73 75 6c 74 28 69 6e 74 65 72 70  endResult(interp
6cc0: 2c 20 22 46 69 6c 65 6e 61 6d 65 20 69 73 20 74  , "Filename is t
6cd0: 6f 6f 20 6c 6f 6e 67 3a 20 5c 22 22 2c 20 7a 43  oo long: \"", zC
6ce0: 72 61 73 68 46 69 6c 65 2c 20 22 5c 22 22 2c 20  rashFile, "\"", 
6cf0: 30 29 3b 0a 20 20 20 20 67 6f 74 6f 20 65 72 72  0);.    goto err
6d00: 6f 72 3b 0a 20 20 7d 0a 20 20 69 66 28 20 54 63  or;.  }.  if( Tc
6d10: 6c 5f 47 65 74 49 6e 74 46 72 6f 6d 4f 62 6a 28  l_GetIntFromObj(
6d20: 69 6e 74 65 72 70 2c 20 6f 62 6a 76 5b 6f 62 6a  interp, objv[obj
6d30: 63 2d 32 5d 2c 20 26 69 44 65 6c 61 79 29 20 29  c-2], &iDelay) )
6d40: 7b 0a 20 20 20 20 67 6f 74 6f 20 65 72 72 6f 72  {.    goto error
6d50: 3b 0a 20 20 7d 0a 0a 20 20 69 66 28 20 70 72 6f  ;.  }..  if( pro
6d60: 63 65 73 73 44 65 76 53 79 6d 41 72 67 73 28 69  cessDevSymArgs(i
6d70: 6e 74 65 72 70 2c 20 6f 62 6a 63 2d 33 2c 20 26  nterp, objc-3, &
6d80: 6f 62 6a 76 5b 31 5d 2c 20 26 69 44 63 2c 20 26  objv[1], &iDc, &
6d90: 69 53 65 63 74 6f 72 53 69 7a 65 29 20 29 7b 0a  iSectorSize) ){.
6da0: 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f 45      return TCL_E
6db0: 52 52 4f 52 3b 0a 20 20 7d 0a 0a 20 20 69 66 28  RROR;.  }..  if(
6dc0: 20 69 44 63 3e 3d 30 20 29 7b 0a 20 20 20 20 67   iDc>=0 ){.    g
6dd0: 2e 69 44 65 76 69 63 65 43 68 61 72 61 63 74 65  .iDeviceCharacte
6de0: 72 69 73 74 69 63 73 20 3d 20 69 44 63 3b 0a 20  ristics = iDc;. 
6df0: 20 7d 0a 20 20 69 66 28 20 69 53 65 63 74 6f 72   }.  if( iSector
6e00: 53 69 7a 65 3e 3d 30 20 29 7b 0a 20 20 20 20 67  Size>=0 ){.    g
6e10: 2e 69 53 65 63 74 6f 72 53 69 7a 65 20 3d 20 69  .iSectorSize = i
6e20: 53 65 63 74 6f 72 53 69 7a 65 3b 0a 20 20 7d 0a  SectorSize;.  }.
6e30: 0a 20 20 67 2e 69 43 72 61 73 68 20 3d 20 69 44  .  g.iCrash = iD
6e40: 65 6c 61 79 3b 0a 20 20 6d 65 6d 63 70 79 28 67  elay;.  memcpy(g
6e50: 2e 7a 43 72 61 73 68 46 69 6c 65 2c 20 7a 43 72  .zCrashFile, zCr
6e60: 61 73 68 46 69 6c 65 2c 20 6e 43 72 61 73 68 46  ashFile, nCrashF
6e70: 69 6c 65 2b 31 29 3b 0a 20 20 73 71 6c 69 74 65  ile+1);.  sqlite
6e80: 33 43 72 61 73 68 54 65 73 74 45 6e 61 62 6c 65  3CrashTestEnable
6e90: 20 3d 20 31 3b 0a 20 20 72 65 74 75 72 6e 20 54   = 1;.  return T
6ea0: 43 4c 5f 4f 4b 3b 0a 0a 65 72 72 6f 72 3a 0a 20  CL_OK;..error:. 
6eb0: 20 72 65 74 75 72 6e 20 54 43 4c 5f 45 52 52 4f   return TCL_ERRO
6ec0: 52 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 69 6e 74  R;.}..static int
6ed0: 20 64 65 76 53 79 6d 4f 62 6a 43 6d 64 28 0a 20   devSymObjCmd(. 
6ee0: 20 76 6f 69 64 20 2a 20 63 6c 69 65 6e 74 44 61   void * clientDa
6ef0: 74 61 2c 0a 20 20 54 63 6c 5f 49 6e 74 65 72 70  ta,.  Tcl_Interp
6f00: 20 2a 69 6e 74 65 72 70 2c 0a 20 20 69 6e 74 20   *interp,.  int 
6f10: 6f 62 6a 63 2c 0a 20 20 54 63 6c 5f 4f 62 6a 20  objc,.  Tcl_Obj 
6f20: 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d 0a 29 7b  *CONST objv[].){
6f30: 0a 20 20 76 6f 69 64 20 64 65 76 73 79 6d 5f 72  .  void devsym_r
6f40: 65 67 69 73 74 65 72 28 69 6e 74 20 69 44 65 76  egister(int iDev
6f50: 69 63 65 43 68 61 72 2c 20 69 6e 74 20 69 53 65  iceChar, int iSe
6f60: 63 74 6f 72 53 69 7a 65 29 3b 0a 0a 20 20 69 6e  ctorSize);..  in
6f70: 74 20 69 44 63 20 3d 20 2d 31 3b 0a 20 20 69 6e  t iDc = -1;.  in
6f80: 74 20 69 53 65 63 74 6f 72 53 69 7a 65 20 3d 20  t iSectorSize = 
6f90: 2d 31 3b 0a 0a 20 20 69 66 28 20 70 72 6f 63 65  -1;..  if( proce
6fa0: 73 73 44 65 76 53 79 6d 41 72 67 73 28 69 6e 74  ssDevSymArgs(int
6fb0: 65 72 70 2c 20 6f 62 6a 63 2d 31 2c 20 26 6f 62  erp, objc-1, &ob
6fc0: 6a 76 5b 31 5d 2c 20 26 69 44 63 2c 20 26 69 53  jv[1], &iDc, &iS
6fd0: 65 63 74 6f 72 53 69 7a 65 29 20 29 7b 0a 20 20  ectorSize) ){.  
6fe0: 20 20 72 65 74 75 72 6e 20 54 43 4c 5f 45 52 52    return TCL_ERR
6ff0: 4f 52 3b 0a 20 20 7d 0a 20 20 64 65 76 73 79 6d  OR;.  }.  devsym
7000: 5f 72 65 67 69 73 74 65 72 28 69 44 63 2c 20 69  _register(iDc, i
7010: 53 65 63 74 6f 72 53 69 7a 65 29 3b 0a 0a 20 20  SectorSize);..  
7020: 72 65 74 75 72 6e 20 54 43 4c 5f 4f 4b 3b 0a 7d  return TCL_OK;.}
7030: 0a 0a 2f 2a 0a 2a 2a 20 74 63 6c 63 6d 64 3a 20  ../*.** tclcmd: 
7040: 72 65 67 69 73 74 65 72 5f 6a 74 5f 76 66 73 20  register_jt_vfs 
7050: 3f 2d 64 65 66 61 75 6c 74 3f 20 50 41 52 45 4e  ?-default? PAREN
7060: 54 2d 56 46 53 0a 2a 2f 0a 73 74 61 74 69 63 20  T-VFS.*/.static 
7070: 69 6e 74 20 6a 74 4f 62 6a 43 6d 64 28 0a 20 20  int jtObjCmd(.  
7080: 76 6f 69 64 20 2a 20 63 6c 69 65 6e 74 44 61 74  void * clientDat
7090: 61 2c 0a 20 20 54 63 6c 5f 49 6e 74 65 72 70 20  a,.  Tcl_Interp 
70a0: 2a 69 6e 74 65 72 70 2c 0a 20 20 69 6e 74 20 6f  *interp,.  int o
70b0: 62 6a 63 2c 0a 20 20 54 63 6c 5f 4f 62 6a 20 2a  bjc,.  Tcl_Obj *
70c0: 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d 0a 29 7b 0a  CONST objv[].){.
70d0: 20 20 69 6e 74 20 6a 74 5f 72 65 67 69 73 74 65    int jt_registe
70e0: 72 28 63 68 61 72 20 2a 2c 20 69 6e 74 29 3b 0a  r(char *, int);.
70f0: 20 20 63 68 61 72 20 2a 7a 50 61 72 65 6e 74 20    char *zParent 
7100: 3d 20 30 3b 0a 0a 20 20 69 66 28 20 6f 62 6a 63  = 0;..  if( objc
7110: 21 3d 32 20 26 26 20 6f 62 6a 63 21 3d 33 20 29  !=2 && objc!=3 )
7120: 7b 0a 20 20 20 20 54 63 6c 5f 57 72 6f 6e 67 4e  {.    Tcl_WrongN
7130: 75 6d 41 72 67 73 28 69 6e 74 65 72 70 2c 20 31  umArgs(interp, 1
7140: 2c 20 6f 62 6a 76 2c 20 22 3f 2d 64 65 66 61 75  , objv, "?-defau
7150: 6c 74 3f 20 50 41 52 45 4e 54 2d 56 46 53 22 29  lt? PARENT-VFS")
7160: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c  ;.    return TCL
7170: 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a 20 20 7a 50  _ERROR;.  }.  zP
7180: 61 72 65 6e 74 20 3d 20 54 63 6c 5f 47 65 74 53  arent = Tcl_GetS
7190: 74 72 69 6e 67 28 6f 62 6a 76 5b 31 5d 29 3b 0a  tring(objv[1]);.
71a0: 20 20 69 66 28 20 6f 62 6a 63 3d 3d 33 20 29 7b    if( objc==3 ){
71b0: 0a 20 20 20 20 69 66 28 20 73 74 72 63 6d 70 28  .    if( strcmp(
71c0: 7a 50 61 72 65 6e 74 2c 20 22 2d 64 65 66 61 75  zParent, "-defau
71d0: 6c 74 22 29 20 29 7b 0a 20 20 20 20 20 20 54 63  lt") ){.      Tc
71e0: 6c 5f 41 70 70 65 6e 64 52 65 73 75 6c 74 28 69  l_AppendResult(i
71f0: 6e 74 65 72 70 2c 20 0a 20 20 20 20 20 20 20 20  nterp, .        
7200: 20 20 22 62 61 64 20 6f 70 74 69 6f 6e 20 5c 22    "bad option \"
7210: 22 2c 20 7a 50 61 72 65 6e 74 2c 20 22 5c 22 3a  ", zParent, "\":
7220: 20 6d 75 73 74 20 62 65 20 2d 64 65 66 61 75 6c   must be -defaul
7230: 74 22 2c 20 30 0a 20 20 20 20 20 20 29 3b 0a 20  t", 0.      );. 
7240: 20 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f       return TCL_
7250: 45 52 52 4f 52 3b 0a 20 20 20 20 7d 0a 20 20 20  ERROR;.    }.   
7260: 20 7a 50 61 72 65 6e 74 20 3d 20 54 63 6c 5f 47   zParent = Tcl_G
7270: 65 74 53 74 72 69 6e 67 28 6f 62 6a 76 5b 32 5d  etString(objv[2]
7280: 29 3b 0a 20 20 7d 0a 0a 20 20 69 66 28 20 21 28  );.  }..  if( !(
7290: 2a 7a 50 61 72 65 6e 74 29 20 29 7b 0a 20 20 20  *zParent) ){.   
72a0: 20 7a 50 61 72 65 6e 74 20 3d 20 30 3b 0a 20 20   zParent = 0;.  
72b0: 7d 0a 20 20 69 66 28 20 6a 74 5f 72 65 67 69 73  }.  if( jt_regis
72c0: 74 65 72 28 7a 50 61 72 65 6e 74 2c 20 6f 62 6a  ter(zParent, obj
72d0: 63 3d 3d 33 29 20 29 7b 0a 20 20 20 20 54 63 6c  c==3) ){.    Tcl
72e0: 5f 41 70 70 65 6e 64 52 65 73 75 6c 74 28 69 6e  _AppendResult(in
72f0: 74 65 72 70 2c 20 22 45 72 72 6f 72 20 69 6e 20  terp, "Error in 
7300: 6a 74 5f 72 65 67 69 73 74 65 72 22 2c 20 30 29  jt_register", 0)
7310: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c  ;.    return TCL
7320: 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a 0a 20 20 72  _ERROR;.  }..  r
7330: 65 74 75 72 6e 20 54 43 4c 5f 4f 4b 3b 0a 7d 0a  eturn TCL_OK;.}.
7340: 0a 2f 2a 0a 2a 2a 20 74 63 6c 63 6d 64 3a 20 75  ./*.** tclcmd: u
7350: 6e 72 65 67 69 73 74 65 72 5f 6a 74 5f 76 66 73  nregister_jt_vfs
7360: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 6a  .*/.static int j
7370: 74 55 6e 72 65 67 69 73 74 65 72 4f 62 6a 43 6d  tUnregisterObjCm
7380: 64 28 0a 20 20 76 6f 69 64 20 2a 20 63 6c 69 65  d(.  void * clie
7390: 6e 74 44 61 74 61 2c 0a 20 20 54 63 6c 5f 49 6e  ntData,.  Tcl_In
73a0: 74 65 72 70 20 2a 69 6e 74 65 72 70 2c 0a 20 20  terp *interp,.  
73b0: 69 6e 74 20 6f 62 6a 63 2c 0a 20 20 54 63 6c 5f  int objc,.  Tcl_
73c0: 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b  Obj *CONST objv[
73d0: 5d 0a 29 7b 0a 20 20 76 6f 69 64 20 6a 74 5f 75  ].){.  void jt_u
73e0: 6e 72 65 67 69 73 74 65 72 28 76 6f 69 64 29 3b  nregister(void);
73f0: 0a 0a 20 20 69 66 28 20 6f 62 6a 63 21 3d 31 20  ..  if( objc!=1 
7400: 29 7b 0a 20 20 20 20 54 63 6c 5f 57 72 6f 6e 67  ){.    Tcl_Wrong
7410: 4e 75 6d 41 72 67 73 28 69 6e 74 65 72 70 2c 20  NumArgs(interp, 
7420: 31 2c 20 6f 62 6a 76 2c 20 22 22 29 3b 0a 20 20  1, objv, "");.  
7430: 20 20 72 65 74 75 72 6e 20 54 43 4c 5f 45 52 52    return TCL_ERR
7440: 4f 52 3b 0a 20 20 7d 0a 0a 20 20 6a 74 5f 75 6e  OR;.  }..  jt_un
7450: 72 65 67 69 73 74 65 72 28 29 3b 0a 20 20 72 65  register();.  re
7460: 74 75 72 6e 20 54 43 4c 5f 4f 4b 3b 0a 7d 0a 0a  turn TCL_OK;.}..
7470: 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45  #endif /* SQLITE
7480: 5f 4f 4d 49 54 5f 44 49 53 4b 49 4f 20 2a 2f 0a  _OMIT_DISKIO */.
7490: 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 70 72 6f 63  ./*.** This proc
74a0: 65 64 75 72 65 20 72 65 67 69 73 74 65 72 73 20  edure registers 
74b0: 74 68 65 20 54 43 4c 20 70 72 6f 63 65 64 75 72  the TCL procedur
74c0: 65 73 20 64 65 66 69 6e 65 64 20 69 6e 20 74 68  es defined in th
74d0: 69 73 20 66 69 6c 65 2e 0a 2a 2f 0a 69 6e 74 20  is file..*/.int 
74e0: 53 71 6c 69 74 65 74 65 73 74 36 5f 49 6e 69 74  Sqlitetest6_Init
74f0: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74  (Tcl_Interp *int
7500: 65 72 70 29 7b 0a 23 69 66 6e 64 65 66 20 53 51  erp){.#ifndef SQ
7510: 4c 49 54 45 5f 4f 4d 49 54 5f 44 49 53 4b 49 4f  LITE_OMIT_DISKIO
7520: 0a 20 20 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a  .  Tcl_CreateObj
7530: 43 6f 6d 6d 61 6e 64 28 69 6e 74 65 72 70 2c 20  Command(interp, 
7540: 22 73 71 6c 69 74 65 33 5f 63 72 61 73 68 5f 65  "sqlite3_crash_e
7550: 6e 61 62 6c 65 22 2c 20 63 72 61 73 68 45 6e 61  nable", crashEna
7560: 62 6c 65 43 6d 64 2c 20 30 2c 20 30 29 3b 0a 20  bleCmd, 0, 0);. 
7570: 20 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a 43 6f   Tcl_CreateObjCo
7580: 6d 6d 61 6e 64 28 69 6e 74 65 72 70 2c 20 22 73  mmand(interp, "s
7590: 71 6c 69 74 65 33 5f 63 72 61 73 68 70 61 72 61  qlite3_crashpara
75a0: 6d 73 22 2c 20 63 72 61 73 68 50 61 72 61 6d 73  ms", crashParams
75b0: 4f 62 6a 43 6d 64 2c 20 30 2c 20 30 29 3b 0a 20  ObjCmd, 0, 0);. 
75c0: 20 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a 43 6f   Tcl_CreateObjCo
75d0: 6d 6d 61 6e 64 28 69 6e 74 65 72 70 2c 20 22 73  mmand(interp, "s
75e0: 71 6c 69 74 65 33 5f 73 69 6d 75 6c 61 74 65 5f  qlite3_simulate_
75f0: 64 65 76 69 63 65 22 2c 20 64 65 76 53 79 6d 4f  device", devSymO
7600: 62 6a 43 6d 64 2c 20 30 2c 20 30 29 3b 0a 20 20  bjCmd, 0, 0);.  
7610: 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a 43 6f 6d  Tcl_CreateObjCom
7620: 6d 61 6e 64 28 69 6e 74 65 72 70 2c 20 22 72 65  mand(interp, "re
7630: 67 69 73 74 65 72 5f 6a 74 5f 76 66 73 22 2c 20  gister_jt_vfs", 
7640: 6a 74 4f 62 6a 43 6d 64 2c 20 30 2c 20 30 29 3b  jtObjCmd, 0, 0);
7650: 0a 20 20 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a  .  Tcl_CreateObj
7660: 43 6f 6d 6d 61 6e 64 28 69 6e 74 65 72 70 2c 20  Command(interp, 
7670: 22 75 6e 72 65 67 69 73 74 65 72 5f 6a 74 5f 76  "unregister_jt_v
7680: 66 73 22 2c 20 6a 74 55 6e 72 65 67 69 73 74 65  fs", jtUnregiste
7690: 72 4f 62 6a 43 6d 64 2c 20 30 2c 20 30 29 3b 0a  rObjCmd, 0, 0);.
76a0: 23 65 6e 64 69 66 0a 20 20 72 65 74 75 72 6e 20  #endif.  return 
76b0: 54 43 4c 5f 4f 4b 3b 0a 7d 0a 0a 23 65 6e 64 69  TCL_OK;.}..#endi
76c0: 66 20 2f 2a 20 53 51 4c 49 54 45 5f 54 45 53 54  f /* SQLITE_TEST
76d0: 20 2a 2f 0a                                       */.