/ Hex Artifact Content
Login
SQLite training in Houston TX on 2019-11-05 (details)
Part of the 2019 Tcl Conference

Artifact c7256cc21d2409486d094277d5b017e8eced44ba:


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 69  le, &z[iSkip], i
1c00: 41 6d 74 2d 69 53 6b 69 70 2c 20 69 4f 66 66 2b  Amt-iSkip, iOff+
1c10: 69 53 6b 69 70 29 3b 0a 20 20 7d 0a 20 20 72 65  iSkip);.  }.  re
1c20: 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a  turn rc;.}../*.*
1c30: 2a 20 46 6c 75 73 68 20 74 68 65 20 77 72 69 74  * Flush the writ
1c40: 65 2d 6c 69 73 74 20 61 73 20 69 66 20 78 53 79  e-list as if xSy
1c50: 6e 63 28 29 20 68 61 64 20 62 65 65 6e 20 63 61  nc() had been ca
1c60: 6c 6c 65 64 20 6f 6e 20 66 69 6c 65 20 68 61 6e  lled on file han
1c70: 64 6c 65 0a 2a 2a 20 70 46 69 6c 65 2e 20 49 66  dle.** pFile. If
1c80: 20 69 73 43 72 61 73 68 20 69 73 20 74 72 75 65   isCrash is true
1c90: 2c 20 73 69 6d 75 6c 61 74 65 20 61 20 63 72 61  , simulate a cra
1ca0: 73 68 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e  sh..*/.static in
1cb0: 74 20 77 72 69 74 65 4c 69 73 74 53 79 6e 63 28  t writeListSync(
1cc0: 43 72 61 73 68 46 69 6c 65 20 2a 70 46 69 6c 65  CrashFile *pFile
1cd0: 2c 20 69 6e 74 20 69 73 43 72 61 73 68 29 7b 0a  , int isCrash){.
1ce0: 20 20 69 6e 74 20 72 63 20 3d 20 53 51 4c 49 54    int rc = SQLIT
1cf0: 45 5f 4f 4b 3b 0a 20 20 69 6e 74 20 69 44 63 20  E_OK;.  int iDc 
1d00: 3d 20 67 2e 69 44 65 76 69 63 65 43 68 61 72 61  = g.iDeviceChara
1d10: 63 74 65 72 69 73 74 69 63 73 3b 0a 0a 20 20 57  cteristics;..  W
1d20: 72 69 74 65 42 75 66 66 65 72 20 2a 70 57 72 69  riteBuffer *pWri
1d30: 74 65 3b 0a 20 20 57 72 69 74 65 42 75 66 66 65  te;.  WriteBuffe
1d40: 72 20 2a 2a 70 70 50 74 72 3b 0a 0a 20 20 2f 2a  r **ppPtr;..  /*
1d50: 20 49 66 20 74 68 69 73 20 69 73 20 6e 6f 74 20   If this is not 
1d60: 61 20 63 72 61 73 68 20 73 69 6d 75 6c 61 74 69  a crash simulati
1d70: 6f 6e 2c 20 73 65 74 20 70 46 69 6e 61 6c 20 74  on, set pFinal t
1d80: 6f 20 70 6f 69 6e 74 20 74 6f 20 74 68 65 20 0a  o point to the .
1d90: 20 20 2a 2a 20 6c 61 73 74 20 65 6c 65 6d 65 6e    ** last elemen
1da0: 74 20 6f 66 20 74 68 65 20 77 72 69 74 65 2d 6c  t of the write-l
1db0: 69 73 74 20 74 68 61 74 20 69 73 20 61 73 73 6f  ist that is asso
1dc0: 63 69 61 74 65 64 20 77 69 74 68 20 66 69 6c 65  ciated with file
1dd0: 20 68 61 6e 64 6c 65 0a 20 20 2a 2a 20 70 46 69   handle.  ** pFi
1de0: 6c 65 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 49 66  le..  **.  ** If
1df0: 20 74 68 69 73 20 69 73 20 61 20 63 72 61 73 68   this is a crash
1e00: 20 73 69 6d 75 6c 61 74 69 6f 6e 2c 20 73 65 74   simulation, set
1e10: 20 70 46 69 6e 61 6c 20 74 6f 20 61 6e 20 61 72   pFinal to an ar
1e20: 62 69 74 72 61 72 69 6c 79 20 73 65 6c 65 63 74  bitrarily select
1e30: 65 64 0a 20 20 2a 2a 20 65 6c 65 6d 65 6e 74 20  ed.  ** element 
1e40: 6f 66 20 74 68 65 20 77 72 69 74 65 2d 6c 69 73  of the write-lis
1e50: 74 2e 0a 20 20 2a 2f 0a 20 20 57 72 69 74 65 42  t..  */.  WriteB
1e60: 75 66 66 65 72 20 2a 70 46 69 6e 61 6c 20 3d 20  uffer *pFinal = 
1e70: 30 3b 0a 20 20 69 66 28 20 21 69 73 43 72 61 73  0;.  if( !isCras
1e80: 68 20 29 7b 0a 20 20 20 20 66 6f 72 28 70 57 72  h ){.    for(pWr
1e90: 69 74 65 3d 67 2e 70 57 72 69 74 65 4c 69 73 74  ite=g.pWriteList
1ea0: 3b 20 70 57 72 69 74 65 3b 20 70 57 72 69 74 65  ; pWrite; pWrite
1eb0: 3d 70 57 72 69 74 65 2d 3e 70 4e 65 78 74 29 7b  =pWrite->pNext){
1ec0: 0a 20 20 20 20 20 20 69 66 28 20 70 57 72 69 74  .      if( pWrit
1ed0: 65 2d 3e 70 46 69 6c 65 3d 3d 70 46 69 6c 65 20  e->pFile==pFile 
1ee0: 29 7b 0a 20 20 20 20 20 20 20 20 70 46 69 6e 61  ){.        pFina
1ef0: 6c 20 3d 20 70 57 72 69 74 65 3b 0a 20 20 20 20  l = pWrite;.    
1f00: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73    }.    }.  }els
1f10: 65 20 69 66 28 20 69 44 63 26 28 53 51 4c 49 54  e if( iDc&(SQLIT
1f20: 45 5f 49 4f 43 41 50 5f 53 45 51 55 45 4e 54 49  E_IOCAP_SEQUENTI
1f30: 41 4c 7c 53 51 4c 49 54 45 5f 49 4f 43 41 50 5f  AL|SQLITE_IOCAP_
1f40: 53 41 46 45 5f 41 50 50 45 4e 44 29 20 29 7b 0a  SAFE_APPEND) ){.
1f50: 20 20 20 20 69 6e 74 20 6e 57 72 69 74 65 20 3d      int nWrite =
1f60: 20 30 3b 0a 20 20 20 20 69 6e 74 20 69 46 69 6e   0;.    int iFin
1f70: 61 6c 3b 0a 20 20 20 20 66 6f 72 28 70 57 72 69  al;.    for(pWri
1f80: 74 65 3d 67 2e 70 57 72 69 74 65 4c 69 73 74 3b  te=g.pWriteList;
1f90: 20 70 57 72 69 74 65 3b 20 70 57 72 69 74 65 3d   pWrite; pWrite=
1fa0: 70 57 72 69 74 65 2d 3e 70 4e 65 78 74 29 20 6e  pWrite->pNext) n
1fb0: 57 72 69 74 65 2b 2b 3b 0a 20 20 20 20 73 71 6c  Write++;.    sql
1fc0: 69 74 65 33 5f 72 61 6e 64 6f 6d 6e 65 73 73 28  ite3_randomness(
1fd0: 73 69 7a 65 6f 66 28 69 6e 74 29 2c 20 26 69 46  sizeof(int), &iF
1fe0: 69 6e 61 6c 29 3b 0a 20 20 20 20 69 46 69 6e 61  inal);.    iFina
1ff0: 6c 20 3d 20 28 28 69 46 69 6e 61 6c 3c 30 29 3f  l = ((iFinal<0)?
2000: 2d 31 2a 69 46 69 6e 61 6c 3a 69 46 69 6e 61 6c  -1*iFinal:iFinal
2010: 29 25 6e 57 72 69 74 65 3b 0a 20 20 20 20 66 6f  )%nWrite;.    fo
2020: 72 28 70 57 72 69 74 65 3d 67 2e 70 57 72 69 74  r(pWrite=g.pWrit
2030: 65 4c 69 73 74 3b 20 69 46 69 6e 61 6c 3e 30 3b  eList; iFinal>0;
2040: 20 70 57 72 69 74 65 3d 70 57 72 69 74 65 2d 3e   pWrite=pWrite->
2050: 70 4e 65 78 74 29 20 69 46 69 6e 61 6c 2d 2d 3b  pNext) iFinal--;
2060: 0a 20 20 20 20 70 46 69 6e 61 6c 20 3d 20 70 57  .    pFinal = pW
2070: 72 69 74 65 3b 0a 20 20 7d 0a 0a 23 69 66 64 65  rite;.  }..#ifde
2080: 66 20 54 52 41 43 45 5f 43 52 41 53 48 54 45 53  f TRACE_CRASHTES
2090: 54 0a 20 20 70 72 69 6e 74 66 28 22 53 79 6e 63  T.  printf("Sync
20a0: 20 25 73 20 28 69 73 20 25 73 20 63 72 61 73 68   %s (is %s crash
20b0: 29 5c 6e 22 2c 20 70 46 69 6c 65 2d 3e 7a 4e 61  )\n", pFile->zNa
20c0: 6d 65 2c 20 28 69 73 43 72 61 73 68 3f 22 61 22  me, (isCrash?"a"
20d0: 3a 22 6e 6f 74 20 61 22 29 29 3b 0a 23 65 6e 64  :"not a"));.#end
20e0: 69 66 0a 0a 20 20 70 70 50 74 72 20 3d 20 26 67  if..  ppPtr = &g
20f0: 2e 70 57 72 69 74 65 4c 69 73 74 3b 0a 20 20 66  .pWriteList;.  f
2100: 6f 72 28 70 57 72 69 74 65 3d 2a 70 70 50 74 72  or(pWrite=*ppPtr
2110: 3b 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20  ; rc==SQLITE_OK 
2120: 26 26 20 70 57 72 69 74 65 3b 20 70 57 72 69 74  && pWrite; pWrit
2130: 65 3d 2a 70 70 50 74 72 29 7b 0a 20 20 20 20 73  e=*ppPtr){.    s
2140: 71 6c 69 74 65 33 5f 66 69 6c 65 20 2a 70 52 65  qlite3_file *pRe
2150: 61 6c 46 69 6c 65 20 3d 20 70 57 72 69 74 65 2d  alFile = pWrite-
2160: 3e 70 46 69 6c 65 2d 3e 70 52 65 61 6c 46 69 6c  >pFile->pRealFil
2170: 65 3b 0a 0a 20 20 20 20 2f 2a 20 28 65 41 63 74  e;..    /* (eAct
2180: 69 6f 6e 3d 3d 31 29 20 20 20 20 20 20 2d 3e 20  ion==1)      -> 
2190: 77 72 69 74 65 20 62 6c 6f 63 6b 20 6f 75 74 20  write block out 
21a0: 6e 6f 72 6d 61 6c 6c 79 2c 0a 20 20 20 20 2a 2a  normally,.    **
21b0: 20 28 65 41 63 74 69 6f 6e 3d 3d 32 29 20 20 20   (eAction==2)   
21c0: 20 20 20 2d 3e 20 64 6f 20 6e 6f 74 68 69 6e 67     -> do nothing
21d0: 2c 0a 20 20 20 20 2a 2a 20 28 65 41 63 74 69 6f  ,.    ** (eActio
21e0: 6e 3d 3d 33 29 20 20 20 20 20 20 2d 3e 20 74 72  n==3)      -> tr
21f0: 61 73 68 20 73 65 63 74 6f 72 73 2e 0a 20 20 20  ash sectors..   
2200: 20 2a 2f 0a 20 20 20 20 69 6e 74 20 65 41 63 74   */.    int eAct
2210: 69 6f 6e 20 3d 20 30 3b 0a 20 20 20 20 69 66 28  ion = 0;.    if(
2220: 20 21 69 73 43 72 61 73 68 20 29 7b 0a 20 20 20   !isCrash ){.   
2230: 20 20 20 65 41 63 74 69 6f 6e 20 3d 20 32 3b 0a     eAction = 2;.
2240: 20 20 20 20 20 20 69 66 28 20 28 70 57 72 69 74        if( (pWrit
2250: 65 2d 3e 70 46 69 6c 65 3d 3d 70 46 69 6c 65 20  e->pFile==pFile 
2260: 7c 7c 20 69 44 63 26 53 51 4c 49 54 45 5f 49 4f  || iDc&SQLITE_IO
2270: 43 41 50 5f 53 45 51 55 45 4e 54 49 41 4c 29 20  CAP_SEQUENTIAL) 
2280: 29 7b 0a 20 20 20 20 20 20 20 20 65 41 63 74 69  ){.        eActi
2290: 6f 6e 20 3d 20 31 3b 0a 20 20 20 20 20 20 7d 0a  on = 1;.      }.
22a0: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
22b0: 20 63 68 61 72 20 72 61 6e 64 6f 6d 3b 0a 20 20   char random;.  
22c0: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 61 6e 64      sqlite3_rand
22d0: 6f 6d 6e 65 73 73 28 31 2c 20 26 72 61 6e 64 6f  omness(1, &rando
22e0: 6d 29 3b 0a 0a 20 20 20 20 20 20 2f 2a 20 44 6f  m);..      /* Do
22f0: 20 6e 6f 74 20 73 65 6c 65 63 74 20 6f 70 74 69   not select opti
2300: 6f 6e 20 33 20 28 73 65 63 74 6f 72 20 74 72 61  on 3 (sector tra
2310: 73 68 69 6e 67 29 20 69 66 20 74 68 65 20 49 4f  shing) if the IO
2320: 43 41 50 5f 41 54 4f 4d 49 43 20 66 6c 61 67 20  CAP_ATOMIC flag 
2330: 0a 20 20 20 20 20 20 2a 2a 20 69 73 20 73 65 74  .      ** is set
2340: 20 6f 72 20 74 68 69 73 20 69 73 20 61 6e 20 4f   or this is an O
2350: 73 54 72 75 6e 63 61 74 65 28 29 2c 20 6e 6f 74  sTruncate(), not
2360: 20 61 6e 20 4f 73 77 72 69 74 65 28 29 2e 0a 20   an Oswrite().. 
2370: 20 20 20 20 20 2a 2f 0a 20 20 20 20 20 20 69 66       */.      if
2380: 28 20 28 69 44 63 26 53 51 4c 49 54 45 5f 49 4f  ( (iDc&SQLITE_IO
2390: 43 41 50 5f 41 54 4f 4d 49 43 29 20 7c 7c 20 28  CAP_ATOMIC) || (
23a0: 70 57 72 69 74 65 2d 3e 7a 42 75 66 3d 3d 30 29  pWrite->zBuf==0)
23b0: 20 29 7b 0a 20 20 20 20 20 20 20 20 72 61 6e 64   ){.        rand
23c0: 6f 6d 20 26 3d 20 30 78 30 31 3b 0a 20 20 20 20  om &= 0x01;.    
23d0: 20 20 7d 0a 0a 20 20 20 20 20 20 2f 2a 20 49 66    }..      /* If
23e0: 20 49 4f 43 41 50 5f 53 45 51 55 45 4e 54 49 41   IOCAP_SEQUENTIA
23f0: 4c 20 69 73 20 73 65 74 20 61 6e 64 20 74 68 69  L is set and thi
2400: 73 20 69 73 20 6e 6f 74 20 74 68 65 20 66 69 6e  s is not the fin
2410: 61 6c 20 65 6e 74 72 79 0a 20 20 20 20 20 20 2a  al entry.      *
2420: 2a 20 69 6e 20 74 68 65 20 74 72 75 6e 63 61 74  * in the truncat
2430: 65 64 20 77 72 69 74 65 2d 6c 69 73 74 2c 20 61  ed write-list, a
2440: 6c 77 61 79 73 20 73 65 6c 65 63 74 20 6f 70 74  lways select opt
2450: 69 6f 6e 20 31 20 28 77 72 69 74 65 0a 20 20 20  ion 1 (write.   
2460: 20 20 20 2a 2a 20 6f 75 74 20 63 6f 72 72 65 63     ** out correc
2470: 74 6c 79 29 2e 0a 20 20 20 20 20 20 2a 2f 0a 20  tly)..      */. 
2480: 20 20 20 20 20 69 66 28 20 28 69 44 63 26 53 51       if( (iDc&SQ
2490: 4c 49 54 45 5f 49 4f 43 41 50 5f 53 45 51 55 45  LITE_IOCAP_SEQUE
24a0: 4e 54 49 41 4c 20 26 26 20 70 57 72 69 74 65 21  NTIAL && pWrite!
24b0: 3d 70 46 69 6e 61 6c 29 20 29 7b 0a 20 20 20 20  =pFinal) ){.    
24c0: 20 20 20 20 72 61 6e 64 6f 6d 20 3d 20 30 3b 0a      random = 0;.
24d0: 20 20 20 20 20 20 7d 0a 0a 20 20 20 20 20 20 2f        }..      /
24e0: 2a 20 49 66 20 49 4f 43 41 50 5f 53 41 46 45 5f  * If IOCAP_SAFE_
24f0: 41 50 50 45 4e 44 20 69 73 20 73 65 74 20 61 6e  APPEND is set an
2500: 64 20 74 68 69 73 20 4f 73 57 72 69 74 65 28 29  d this OsWrite()
2510: 20 6f 70 65 72 61 74 69 6f 6e 20 69 73 0a 20 20   operation is.  
2520: 20 20 20 20 2a 2a 20 61 6e 20 61 70 70 65 6e 64      ** an append
2530: 20 28 66 69 72 73 74 20 62 79 74 65 20 6f 66 20   (first byte of 
2540: 74 68 65 20 77 72 69 74 74 65 6e 20 72 65 67 69  the written regi
2550: 6f 6e 20 69 73 20 31 20 62 79 74 65 20 70 61 73  on is 1 byte pas
2560: 74 20 74 68 65 0a 20 20 20 20 20 20 2a 2a 20 63  t the.      ** c
2570: 75 72 72 65 6e 74 20 45 4f 46 29 2c 20 61 6c 77  urrent EOF), alw
2580: 61 79 73 20 73 65 6c 65 63 74 20 6f 70 74 69 6f  ays select optio
2590: 6e 20 31 20 28 77 72 69 74 65 20 6f 75 74 20 63  n 1 (write out c
25a0: 6f 72 72 65 63 74 6c 79 29 2e 0a 20 20 20 20 20  orrectly)..     
25b0: 20 2a 2f 0a 20 20 20 20 20 20 69 66 28 20 69 44   */.      if( iD
25c0: 63 26 53 51 4c 49 54 45 5f 49 4f 43 41 50 5f 53  c&SQLITE_IOCAP_S
25d0: 41 46 45 5f 41 50 50 45 4e 44 20 26 26 20 70 57  AFE_APPEND && pW
25e0: 72 69 74 65 2d 3e 7a 42 75 66 20 29 7b 0a 20 20  rite->zBuf ){.  
25f0: 20 20 20 20 20 20 69 36 34 20 69 53 69 7a 65 3b        i64 iSize;
2600: 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33  .        sqlite3
2610: 4f 73 46 69 6c 65 53 69 7a 65 28 70 52 65 61 6c  OsFileSize(pReal
2620: 46 69 6c 65 2c 20 26 69 53 69 7a 65 29 3b 0a 20  File, &iSize);. 
2630: 20 20 20 20 20 20 20 69 66 28 20 69 53 69 7a 65         if( iSize
2640: 3d 3d 70 57 72 69 74 65 2d 3e 69 4f 66 66 73 65  ==pWrite->iOffse
2650: 74 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 72  t ){.          r
2660: 61 6e 64 6f 6d 20 3d 20 30 3b 0a 20 20 20 20 20  andom = 0;.     
2670: 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 0a 20 20     }.      }..  
2680: 20 20 20 20 69 66 28 20 28 72 61 6e 64 6f 6d 26      if( (random&
2690: 30 78 30 36 29 3d 3d 30 78 30 36 20 29 7b 0a 20  0x06)==0x06 ){. 
26a0: 20 20 20 20 20 20 20 65 41 63 74 69 6f 6e 20 3d         eAction =
26b0: 20 33 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b   3;.      }else{
26c0: 0a 20 20 20 20 20 20 20 20 65 41 63 74 69 6f 6e  .        eAction
26d0: 20 3d 20 28 28 72 61 6e 64 6f 6d 26 30 78 30 31   = ((random&0x01
26e0: 29 3f 32 3a 31 29 3b 0a 20 20 20 20 20 20 7d 0a  )?2:1);.      }.
26f0: 20 20 20 20 7d 0a 0a 20 20 20 20 73 77 69 74 63      }..    switc
2700: 68 28 20 65 41 63 74 69 6f 6e 20 29 7b 0a 20 20  h( eAction ){.  
2710: 20 20 20 20 63 61 73 65 20 31 3a 20 7b 20 20 20      case 1: {   
2720: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 57              /* W
2730: 72 69 74 65 20 6f 75 74 20 63 6f 72 72 65 63 74  rite out correct
2740: 6c 79 20 2a 2f 0a 20 20 20 20 20 20 20 20 69 66  ly */.        if
2750: 28 20 70 57 72 69 74 65 2d 3e 7a 42 75 66 20 29  ( pWrite->zBuf )
2760: 7b 0a 20 20 20 20 20 20 20 20 20 20 72 63 20 3d  {.          rc =
2770: 20 77 72 69 74 65 44 62 46 69 6c 65 28 0a 20 20   writeDbFile(.  
2780: 20 20 20 20 20 20 20 20 20 20 20 20 70 57 72 69              pWri
2790: 74 65 2d 3e 70 46 69 6c 65 2c 20 70 57 72 69 74  te->pFile, pWrit
27a0: 65 2d 3e 7a 42 75 66 2c 20 70 57 72 69 74 65 2d  e->zBuf, pWrite-
27b0: 3e 6e 42 75 66 2c 20 70 57 72 69 74 65 2d 3e 69  >nBuf, pWrite->i
27c0: 4f 66 66 73 65 74 0a 20 20 20 20 20 20 20 20 20  Offset.         
27d0: 20 29 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73   );.        }els
27e0: 65 7b 0a 20 20 20 20 20 20 20 20 20 20 72 63 20  e{.          rc 
27f0: 3d 20 73 71 6c 69 74 65 33 4f 73 54 72 75 6e 63  = sqlite3OsTrunc
2800: 61 74 65 28 70 52 65 61 6c 46 69 6c 65 2c 20 70  ate(pRealFile, p
2810: 57 72 69 74 65 2d 3e 69 4f 66 66 73 65 74 29 3b  Write->iOffset);
2820: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
2830: 20 20 20 2a 70 70 50 74 72 20 3d 20 70 57 72 69     *ppPtr = pWri
2840: 74 65 2d 3e 70 4e 65 78 74 3b 0a 23 69 66 64 65  te->pNext;.#ifde
2850: 66 20 54 52 41 43 45 5f 43 52 41 53 48 54 45 53  f TRACE_CRASHTES
2860: 54 0a 20 20 20 20 20 20 20 20 69 66 28 20 69 73  T.        if( is
2870: 43 72 61 73 68 20 29 7b 0a 20 20 20 20 20 20 20  Crash ){.       
2880: 20 20 20 70 72 69 6e 74 66 28 22 57 72 69 74 69     printf("Writi
2890: 6e 67 20 25 64 20 62 79 74 65 73 20 40 20 25 64  ng %d bytes @ %d
28a0: 20 28 25 73 29 5c 6e 22 2c 20 0a 20 20 20 20 20   (%s)\n", .     
28b0: 20 20 20 20 20 20 20 70 57 72 69 74 65 2d 3e 6e         pWrite->n
28c0: 42 75 66 2c 20 28 69 6e 74 29 70 57 72 69 74 65  Buf, (int)pWrite
28d0: 2d 3e 69 4f 66 66 73 65 74 2c 20 70 57 72 69 74  ->iOffset, pWrit
28e0: 65 2d 3e 70 46 69 6c 65 2d 3e 7a 4e 61 6d 65 0a  e->pFile->zName.
28f0: 20 20 20 20 20 20 20 20 20 20 29 3b 0a 20 20 20            );.   
2900: 20 20 20 20 20 7d 0a 23 65 6e 64 69 66 0a 20 20       }.#endif.  
2910: 20 20 20 20 20 20 63 72 61 73 68 5f 66 72 65 65        crash_free
2920: 28 70 57 72 69 74 65 29 3b 0a 20 20 20 20 20 20  (pWrite);.      
2930: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 7d    break;.      }
2940: 0a 20 20 20 20 20 20 63 61 73 65 20 32 3a 20 7b  .      case 2: {
2950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
2960: 2a 20 44 6f 20 6e 6f 74 68 69 6e 67 20 2a 2f 0a  * Do nothing */.
2970: 20 20 20 20 20 20 20 20 70 70 50 74 72 20 3d 20          ppPtr = 
2980: 26 70 57 72 69 74 65 2d 3e 70 4e 65 78 74 3b 0a  &pWrite->pNext;.
2990: 23 69 66 64 65 66 20 54 52 41 43 45 5f 43 52 41  #ifdef TRACE_CRA
29a0: 53 48 54 45 53 54 0a 20 20 20 20 20 20 20 20 69  SHTEST.        i
29b0: 66 28 20 69 73 43 72 61 73 68 20 29 7b 0a 20 20  f( isCrash ){.  
29c0: 20 20 20 20 20 20 20 20 70 72 69 6e 74 66 28 22          printf("
29d0: 4f 6d 69 74 69 6e 67 20 25 64 20 62 79 74 65 73  Omiting %d bytes
29e0: 20 40 20 25 64 20 28 25 73 29 5c 6e 22 2c 20 0a   @ %d (%s)\n", .
29f0: 20 20 20 20 20 20 20 20 20 20 20 20 70 57 72 69              pWri
2a00: 74 65 2d 3e 6e 42 75 66 2c 20 28 69 6e 74 29 70  te->nBuf, (int)p
2a10: 57 72 69 74 65 2d 3e 69 4f 66 66 73 65 74 2c 20  Write->iOffset, 
2a20: 70 57 72 69 74 65 2d 3e 70 46 69 6c 65 2d 3e 7a  pWrite->pFile->z
2a30: 4e 61 6d 65 0a 20 20 20 20 20 20 20 20 20 20 29  Name.          )
2a40: 3b 0a 20 20 20 20 20 20 20 20 7d 0a 23 65 6e 64  ;.        }.#end
2a50: 69 66 0a 20 20 20 20 20 20 20 20 62 72 65 61 6b  if.        break
2a60: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
2a70: 63 61 73 65 20 33 3a 20 7b 20 20 20 20 20 20 20  case 3: {       
2a80: 20 20 20 20 20 20 20 20 2f 2a 20 54 72 61 73 68          /* Trash
2a90: 20 73 65 63 74 6f 72 73 20 2a 2f 0a 20 20 20 20   sectors */.    
2aa0: 20 20 20 20 75 38 20 2a 7a 47 61 72 62 61 67 65      u8 *zGarbage
2ab0: 3b 0a 20 20 20 20 20 20 20 20 69 6e 74 20 69 46  ;.        int iF
2ac0: 69 72 73 74 20 3d 20 28 70 57 72 69 74 65 2d 3e  irst = (pWrite->
2ad0: 69 4f 66 66 73 65 74 2f 67 2e 69 53 65 63 74 6f  iOffset/g.iSecto
2ae0: 72 53 69 7a 65 29 3b 0a 20 20 20 20 20 20 20 20  rSize);.        
2af0: 69 6e 74 20 69 4c 61 73 74 20 3d 20 28 70 57 72  int iLast = (pWr
2b00: 69 74 65 2d 3e 69 4f 66 66 73 65 74 2b 70 57 72  ite->iOffset+pWr
2b10: 69 74 65 2d 3e 6e 42 75 66 2d 31 29 2f 67 2e 69  ite->nBuf-1)/g.i
2b20: 53 65 63 74 6f 72 53 69 7a 65 3b 0a 0a 20 20 20  SectorSize;..   
2b30: 20 20 20 20 20 61 73 73 65 72 74 28 70 57 72 69       assert(pWri
2b40: 74 65 2d 3e 7a 42 75 66 29 3b 0a 0a 23 69 66 64  te->zBuf);..#ifd
2b50: 65 66 20 54 52 41 43 45 5f 43 52 41 53 48 54 45  ef TRACE_CRASHTE
2b60: 53 54 0a 20 20 20 20 20 20 20 20 70 72 69 6e 74  ST.        print
2b70: 66 28 22 54 72 61 73 68 69 6e 67 20 25 64 20 73  f("Trashing %d s
2b80: 65 63 74 6f 72 73 20 40 20 73 65 63 74 6f 72 20  ectors @ sector 
2b90: 25 64 20 28 25 73 29 5c 6e 22 2c 20 0a 20 20 20  %d (%s)\n", .   
2ba0: 20 20 20 20 20 20 20 20 20 31 2b 69 4c 61 73 74           1+iLast
2bb0: 2d 69 46 69 72 73 74 2c 20 69 46 69 72 73 74 2c  -iFirst, iFirst,
2bc0: 20 70 57 72 69 74 65 2d 3e 70 46 69 6c 65 2d 3e   pWrite->pFile->
2bd0: 7a 4e 61 6d 65 0a 20 20 20 20 20 20 20 20 29 3b  zName.        );
2be0: 0a 23 65 6e 64 69 66 0a 0a 20 20 20 20 20 20 20  .#endif..       
2bf0: 20 7a 47 61 72 62 61 67 65 20 3d 20 63 72 61 73   zGarbage = cras
2c00: 68 5f 6d 61 6c 6c 6f 63 28 67 2e 69 53 65 63 74  h_malloc(g.iSect
2c10: 6f 72 53 69 7a 65 29 3b 0a 20 20 20 20 20 20 20  orSize);.       
2c20: 20 69 66 28 20 7a 47 61 72 62 61 67 65 20 29 7b   if( zGarbage ){
2c30: 0a 20 20 20 20 20 20 20 20 20 20 73 71 6c 69 74  .          sqlit
2c40: 65 33 5f 69 6e 74 36 34 20 69 3b 0a 20 20 20 20  e3_int64 i;.    
2c50: 20 20 20 20 20 20 66 6f 72 28 69 3d 69 46 69 72        for(i=iFir
2c60: 73 74 3b 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f  st; rc==SQLITE_O
2c70: 4b 20 26 26 20 69 3c 3d 69 4c 61 73 74 3b 20 69  K && i<=iLast; i
2c80: 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20  ++){.           
2c90: 20 73 71 6c 69 74 65 33 5f 72 61 6e 64 6f 6d 6e   sqlite3_randomn
2ca0: 65 73 73 28 67 2e 69 53 65 63 74 6f 72 53 69 7a  ess(g.iSectorSiz
2cb0: 65 2c 20 7a 47 61 72 62 61 67 65 29 3b 20 0a 20  e, zGarbage); . 
2cc0: 20 20 20 20 20 20 20 20 20 20 20 72 63 20 3d 20             rc = 
2cd0: 77 72 69 74 65 44 62 46 69 6c 65 28 0a 20 20 20  writeDbFile(.   
2ce0: 20 20 20 20 20 20 20 20 20 20 20 70 57 72 69 74             pWrit
2cf0: 65 2d 3e 70 46 69 6c 65 2c 20 7a 47 61 72 62 61  e->pFile, zGarba
2d00: 67 65 2c 20 67 2e 69 53 65 63 74 6f 72 53 69 7a  ge, g.iSectorSiz
2d10: 65 2c 20 69 2a 67 2e 69 53 65 63 74 6f 72 53 69  e, i*g.iSectorSi
2d20: 7a 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 29  ze.            )
2d30: 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20  ;.          }.  
2d40: 20 20 20 20 20 20 20 20 63 72 61 73 68 5f 66 72          crash_fr
2d50: 65 65 28 7a 47 61 72 62 61 67 65 29 3b 0a 20 20  ee(zGarbage);.  
2d60: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20        }else{.   
2d70: 20 20 20 20 20 20 20 72 63 20 3d 20 53 51 4c 49         rc = SQLI
2d80: 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 20 20 20 20  TE_NOMEM;.      
2d90: 20 20 7d 0a 0a 20 20 20 20 20 20 20 20 70 70 50    }..        ppP
2da0: 74 72 20 3d 20 26 70 57 72 69 74 65 2d 3e 70 4e  tr = &pWrite->pN
2db0: 65 78 74 3b 0a 20 20 20 20 20 20 20 20 62 72 65  ext;.        bre
2dc0: 61 6b 3b 0a 20 20 20 20 20 20 7d 0a 0a 20 20 20  ak;.      }..   
2dd0: 20 20 20 64 65 66 61 75 6c 74 3a 0a 20 20 20 20     default:.    
2de0: 20 20 20 20 61 73 73 65 72 74 28 21 22 43 61 6e      assert(!"Can
2df0: 6e 6f 74 20 68 61 70 70 65 6e 22 29 3b 0a 20 20  not happen");.  
2e00: 20 20 7d 0a 0a 20 20 20 20 69 66 28 20 70 57 72    }..    if( pWr
2e10: 69 74 65 3d 3d 70 46 69 6e 61 6c 20 29 20 62 72  ite==pFinal ) br
2e20: 65 61 6b 3b 0a 20 20 7d 0a 0a 20 20 69 66 28 20  eak;.  }..  if( 
2e30: 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 26 26  rc==SQLITE_OK &&
2e40: 20 69 73 43 72 61 73 68 20 29 7b 0a 20 20 20 20   isCrash ){.    
2e50: 65 78 69 74 28 2d 31 29 3b 0a 20 20 7d 0a 0a 20  exit(-1);.  }.. 
2e60: 20 66 6f 72 28 70 57 72 69 74 65 3d 67 2e 70 57   for(pWrite=g.pW
2e70: 72 69 74 65 4c 69 73 74 3b 20 70 57 72 69 74 65  riteList; pWrite
2e80: 20 26 26 20 70 57 72 69 74 65 2d 3e 70 4e 65 78   && pWrite->pNex
2e90: 74 3b 20 70 57 72 69 74 65 3d 70 57 72 69 74 65  t; pWrite=pWrite
2ea0: 2d 3e 70 4e 65 78 74 29 3b 0a 20 20 67 2e 70 57  ->pNext);.  g.pW
2eb0: 72 69 74 65 4c 69 73 74 45 6e 64 20 3d 20 70 57  riteListEnd = pW
2ec0: 72 69 74 65 3b 0a 0a 20 20 72 65 74 75 72 6e 20  rite;..  return 
2ed0: 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 64 64  rc;.}../*.** Add
2ee0: 20 61 6e 20 65 6e 74 72 79 20 74 6f 20 74 68 65   an entry to the
2ef0: 20 65 6e 64 20 6f 66 20 74 68 65 20 77 72 69 74   end of the writ
2f00: 65 2d 6c 69 73 74 2e 0a 2a 2f 0a 73 74 61 74 69  e-list..*/.stati
2f10: 63 20 69 6e 74 20 77 72 69 74 65 4c 69 73 74 41  c int writeListA
2f20: 70 70 65 6e 64 28 0a 20 20 73 71 6c 69 74 65 33  ppend(.  sqlite3
2f30: 5f 66 69 6c 65 20 2a 70 46 69 6c 65 2c 0a 20 20  _file *pFile,.  
2f40: 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20 69 4f  sqlite3_int64 iO
2f50: 66 66 73 65 74 2c 0a 20 20 63 6f 6e 73 74 20 75  ffset,.  const u
2f60: 38 20 2a 7a 42 75 66 2c 0a 20 20 69 6e 74 20 6e  8 *zBuf,.  int n
2f70: 42 75 66 0a 29 7b 0a 20 20 57 72 69 74 65 42 75  Buf.){.  WriteBu
2f80: 66 66 65 72 20 2a 70 4e 65 77 3b 0a 0a 20 20 61  ffer *pNew;..  a
2f90: 73 73 65 72 74 28 28 7a 42 75 66 20 26 26 20 6e  ssert((zBuf && n
2fa0: 42 75 66 29 20 7c 7c 20 28 21 6e 42 75 66 20 26  Buf) || (!nBuf &
2fb0: 26 20 21 7a 42 75 66 29 29 3b 0a 0a 20 20 70 4e  & !zBuf));..  pN
2fc0: 65 77 20 3d 20 28 57 72 69 74 65 42 75 66 66 65  ew = (WriteBuffe
2fd0: 72 20 2a 29 63 72 61 73 68 5f 6d 61 6c 6c 6f 63  r *)crash_malloc
2fe0: 28 73 69 7a 65 6f 66 28 57 72 69 74 65 42 75 66  (sizeof(WriteBuf
2ff0: 66 65 72 29 20 2b 20 6e 42 75 66 29 3b 0a 20 20  fer) + nBuf);.  
3000: 69 66 28 20 70 4e 65 77 3d 3d 30 20 29 7b 0a 20  if( pNew==0 ){. 
3010: 20 20 20 66 70 72 69 6e 74 66 28 73 74 64 65 72     fprintf(stder
3020: 72 2c 20 22 6f 75 74 20 6f 66 20 6d 65 6d 6f 72  r, "out of memor
3030: 79 20 69 6e 20 74 68 65 20 63 72 61 73 68 20 73  y in the crash s
3040: 69 6d 75 6c 61 74 6f 72 5c 6e 22 29 3b 0a 20 20  imulator\n");.  
3050: 7d 0a 20 20 6d 65 6d 73 65 74 28 70 4e 65 77 2c  }.  memset(pNew,
3060: 20 30 2c 20 73 69 7a 65 6f 66 28 57 72 69 74 65   0, sizeof(Write
3070: 42 75 66 66 65 72 29 2b 6e 42 75 66 29 3b 0a 20  Buffer)+nBuf);. 
3080: 20 70 4e 65 77 2d 3e 69 4f 66 66 73 65 74 20 3d   pNew->iOffset =
3090: 20 69 4f 66 66 73 65 74 3b 0a 20 20 70 4e 65 77   iOffset;.  pNew
30a0: 2d 3e 6e 42 75 66 20 3d 20 6e 42 75 66 3b 0a 20  ->nBuf = nBuf;. 
30b0: 20 70 4e 65 77 2d 3e 70 46 69 6c 65 20 3d 20 28   pNew->pFile = (
30c0: 43 72 61 73 68 46 69 6c 65 20 2a 29 70 46 69 6c  CrashFile *)pFil
30d0: 65 3b 0a 20 20 69 66 28 20 7a 42 75 66 20 29 7b  e;.  if( zBuf ){
30e0: 0a 20 20 20 20 70 4e 65 77 2d 3e 7a 42 75 66 20  .    pNew->zBuf 
30f0: 3d 20 28 75 38 20 2a 29 26 70 4e 65 77 5b 31 5d  = (u8 *)&pNew[1]
3100: 3b 0a 20 20 20 20 6d 65 6d 63 70 79 28 70 4e 65  ;.    memcpy(pNe
3110: 77 2d 3e 7a 42 75 66 2c 20 7a 42 75 66 2c 20 6e  w->zBuf, zBuf, n
3120: 42 75 66 29 3b 0a 20 20 7d 0a 0a 20 20 69 66 28  Buf);.  }..  if(
3130: 20 67 2e 70 57 72 69 74 65 4c 69 73 74 20 29 7b   g.pWriteList ){
3140: 0a 20 20 20 20 61 73 73 65 72 74 28 67 2e 70 57  .    assert(g.pW
3150: 72 69 74 65 4c 69 73 74 45 6e 64 29 3b 0a 20 20  riteListEnd);.  
3160: 20 20 67 2e 70 57 72 69 74 65 4c 69 73 74 45 6e    g.pWriteListEn
3170: 64 2d 3e 70 4e 65 78 74 20 3d 20 70 4e 65 77 3b  d->pNext = pNew;
3180: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 67 2e  .  }else{.    g.
3190: 70 57 72 69 74 65 4c 69 73 74 20 3d 20 70 4e 65  pWriteList = pNe
31a0: 77 3b 0a 20 20 7d 0a 20 20 67 2e 70 57 72 69 74  w;.  }.  g.pWrit
31b0: 65 4c 69 73 74 45 6e 64 20 3d 20 70 4e 65 77 3b  eListEnd = pNew;
31c0: 0a 20 20 0a 20 20 72 65 74 75 72 6e 20 53 51 4c  .  .  return SQL
31d0: 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  ITE_OK;.}../*.**
31e0: 20 43 6c 6f 73 65 20 61 20 63 72 61 73 68 2d 66   Close a crash-f
31f0: 69 6c 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69  ile..*/.static i
3200: 6e 74 20 63 66 43 6c 6f 73 65 28 73 71 6c 69 74  nt cfClose(sqlit
3210: 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65 29 7b  e3_file *pFile){
3220: 0a 20 20 43 72 61 73 68 46 69 6c 65 20 2a 70 43  .  CrashFile *pC
3230: 72 61 73 68 20 3d 20 28 43 72 61 73 68 46 69 6c  rash = (CrashFil
3240: 65 20 2a 29 70 46 69 6c 65 3b 0a 20 20 77 72 69  e *)pFile;.  wri
3250: 74 65 4c 69 73 74 53 79 6e 63 28 70 43 72 61 73  teListSync(pCras
3260: 68 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74 65 33  h, 0);.  sqlite3
3270: 4f 73 43 6c 6f 73 65 28 70 43 72 61 73 68 2d 3e  OsClose(pCrash->
3280: 70 52 65 61 6c 46 69 6c 65 29 3b 0a 20 20 72 65  pRealFile);.  re
3290: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  turn SQLITE_OK;.
32a0: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 61 64 20 64 61  }../*.** Read da
32b0: 74 61 20 66 72 6f 6d 20 61 20 63 72 61 73 68 2d  ta from a crash-
32c0: 66 69 6c 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  file..*/.static 
32d0: 69 6e 74 20 63 66 52 65 61 64 28 0a 20 20 73 71  int cfRead(.  sq
32e0: 6c 69 74 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c  lite3_file *pFil
32f0: 65 2c 20 0a 20 20 76 6f 69 64 20 2a 7a 42 75 66  e, .  void *zBuf
3300: 2c 20 0a 20 20 69 6e 74 20 69 41 6d 74 2c 20 0a  , .  int iAmt, .
3310: 20 20 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 69    sqlite_int64 i
3320: 4f 66 73 74 0a 29 7b 0a 20 20 43 72 61 73 68 46  Ofst.){.  CrashF
3330: 69 6c 65 20 2a 70 43 72 61 73 68 20 3d 20 28 43  ile *pCrash = (C
3340: 72 61 73 68 46 69 6c 65 20 2a 29 70 46 69 6c 65  rashFile *)pFile
3350: 3b 0a 0a 20 20 2f 2a 20 43 68 65 63 6b 20 74 68  ;..  /* Check th
3360: 65 20 66 69 6c 65 2d 73 69 7a 65 20 74 6f 20 73  e file-size to s
3370: 65 65 20 69 66 20 74 68 69 73 20 69 73 20 61 20  ee if this is a 
3380: 73 68 6f 72 74 2d 72 65 61 64 20 2a 2f 0a 20 20  short-read */.  
3390: 69 66 28 20 70 43 72 61 73 68 2d 3e 69 53 69 7a  if( pCrash->iSiz
33a0: 65 3c 28 69 4f 66 73 74 2b 69 41 6d 74 29 20 29  e<(iOfst+iAmt) )
33b0: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c  {.    return SQL
33c0: 49 54 45 5f 49 4f 45 52 52 5f 53 48 4f 52 54 5f  ITE_IOERR_SHORT_
33d0: 52 45 41 44 3b 0a 20 20 7d 0a 0a 20 20 6d 65 6d  READ;.  }..  mem
33e0: 63 70 79 28 7a 42 75 66 2c 20 26 70 43 72 61 73  cpy(zBuf, &pCras
33f0: 68 2d 3e 7a 44 61 74 61 5b 69 4f 66 73 74 5d 2c  h->zData[iOfst],
3400: 20 69 41 6d 74 29 3b 0a 20 20 72 65 74 75 72 6e   iAmt);.  return
3410: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f   SQLITE_OK;.}../
3420: 2a 0a 2a 2a 20 57 72 69 74 65 20 64 61 74 61 20  *.** Write data 
3430: 74 6f 20 61 20 63 72 61 73 68 2d 66 69 6c 65 2e  to a crash-file.
3440: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 63  .*/.static int c
3450: 66 57 72 69 74 65 28 0a 20 20 73 71 6c 69 74 65  fWrite(.  sqlite
3460: 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65 2c 20 0a  3_file *pFile, .
3470: 20 20 63 6f 6e 73 74 20 76 6f 69 64 20 2a 7a 42    const void *zB
3480: 75 66 2c 20 0a 20 20 69 6e 74 20 69 41 6d 74 2c  uf, .  int iAmt,
3490: 20 0a 20 20 73 71 6c 69 74 65 5f 69 6e 74 36 34   .  sqlite_int64
34a0: 20 69 4f 66 73 74 0a 29 7b 0a 20 20 43 72 61 73   iOfst.){.  Cras
34b0: 68 46 69 6c 65 20 2a 70 43 72 61 73 68 20 3d 20  hFile *pCrash = 
34c0: 28 43 72 61 73 68 46 69 6c 65 20 2a 29 70 46 69  (CrashFile *)pFi
34d0: 6c 65 3b 0a 20 20 69 66 28 20 69 41 6d 74 2b 69  le;.  if( iAmt+i
34e0: 4f 66 73 74 3e 70 43 72 61 73 68 2d 3e 69 53 69  Ofst>pCrash->iSi
34f0: 7a 65 20 29 7b 0a 20 20 20 20 70 43 72 61 73 68  ze ){.    pCrash
3500: 2d 3e 69 53 69 7a 65 20 3d 20 69 41 6d 74 2b 69  ->iSize = iAmt+i
3510: 4f 66 73 74 3b 0a 20 20 7d 0a 20 20 77 68 69 6c  Ofst;.  }.  whil
3520: 65 28 20 70 43 72 61 73 68 2d 3e 69 53 69 7a 65  e( pCrash->iSize
3530: 3e 70 43 72 61 73 68 2d 3e 6e 44 61 74 61 20 29  >pCrash->nData )
3540: 7b 0a 20 20 20 20 75 38 20 2a 7a 4e 65 77 3b 0a  {.    u8 *zNew;.
3550: 20 20 20 20 69 6e 74 20 6e 4e 65 77 20 3d 20 28      int nNew = (
3560: 70 43 72 61 73 68 2d 3e 6e 44 61 74 61 2a 32 29  pCrash->nData*2)
3570: 20 2b 20 34 30 39 36 3b 0a 20 20 20 20 7a 4e 65   + 4096;.    zNe
3580: 77 20 3d 20 63 72 61 73 68 5f 72 65 61 6c 6c 6f  w = crash_reallo
3590: 63 28 70 43 72 61 73 68 2d 3e 7a 44 61 74 61 2c  c(pCrash->zData,
35a0: 20 6e 4e 65 77 29 3b 0a 20 20 20 20 69 66 28 20   nNew);.    if( 
35b0: 21 7a 4e 65 77 20 29 7b 0a 20 20 20 20 20 20 72  !zNew ){.      r
35c0: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d  eturn SQLITE_NOM
35d0: 45 4d 3b 0a 20 20 20 20 7d 0a 20 20 20 20 6d 65  EM;.    }.    me
35e0: 6d 73 65 74 28 26 7a 4e 65 77 5b 70 43 72 61 73  mset(&zNew[pCras
35f0: 68 2d 3e 6e 44 61 74 61 5d 2c 20 30 2c 20 6e 4e  h->nData], 0, nN
3600: 65 77 2d 70 43 72 61 73 68 2d 3e 6e 44 61 74 61  ew-pCrash->nData
3610: 29 3b 0a 20 20 20 20 70 43 72 61 73 68 2d 3e 6e  );.    pCrash->n
3620: 44 61 74 61 20 3d 20 6e 4e 65 77 3b 0a 20 20 20  Data = nNew;.   
3630: 20 70 43 72 61 73 68 2d 3e 7a 44 61 74 61 20 3d   pCrash->zData =
3640: 20 7a 4e 65 77 3b 0a 20 20 7d 0a 20 20 6d 65 6d   zNew;.  }.  mem
3650: 63 70 79 28 26 70 43 72 61 73 68 2d 3e 7a 44 61  cpy(&pCrash->zDa
3660: 74 61 5b 69 4f 66 73 74 5d 2c 20 7a 42 75 66 2c  ta[iOfst], zBuf,
3670: 20 69 41 6d 74 29 3b 0a 20 20 72 65 74 75 72 6e   iAmt);.  return
3680: 20 77 72 69 74 65 4c 69 73 74 41 70 70 65 6e 64   writeListAppend
3690: 28 70 46 69 6c 65 2c 20 69 4f 66 73 74 2c 20 7a  (pFile, iOfst, z
36a0: 42 75 66 2c 20 69 41 6d 74 29 3b 0a 7d 0a 0a 2f  Buf, iAmt);.}../
36b0: 2a 0a 2a 2a 20 54 72 75 6e 63 61 74 65 20 61 20  *.** Truncate a 
36c0: 63 72 61 73 68 2d 66 69 6c 65 2e 0a 2a 2f 0a 73  crash-file..*/.s
36d0: 74 61 74 69 63 20 69 6e 74 20 63 66 54 72 75 6e  tatic int cfTrun
36e0: 63 61 74 65 28 73 71 6c 69 74 65 33 5f 66 69 6c  cate(sqlite3_fil
36f0: 65 20 2a 70 46 69 6c 65 2c 20 73 71 6c 69 74 65  e *pFile, sqlite
3700: 5f 69 6e 74 36 34 20 73 69 7a 65 29 7b 0a 20 20  _int64 size){.  
3710: 43 72 61 73 68 46 69 6c 65 20 2a 70 43 72 61 73  CrashFile *pCras
3720: 68 20 3d 20 28 43 72 61 73 68 46 69 6c 65 20 2a  h = (CrashFile *
3730: 29 70 46 69 6c 65 3b 0a 20 20 61 73 73 65 72 74  )pFile;.  assert
3740: 28 73 69 7a 65 3e 3d 30 29 3b 0a 20 20 69 66 28  (size>=0);.  if(
3750: 20 70 43 72 61 73 68 2d 3e 69 53 69 7a 65 3e 73   pCrash->iSize>s
3760: 69 7a 65 20 29 7b 0a 20 20 20 20 70 43 72 61 73  ize ){.    pCras
3770: 68 2d 3e 69 53 69 7a 65 20 3d 20 73 69 7a 65 3b  h->iSize = size;
3780: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 77 72  .  }.  return wr
3790: 69 74 65 4c 69 73 74 41 70 70 65 6e 64 28 70 46  iteListAppend(pF
37a0: 69 6c 65 2c 20 73 69 7a 65 2c 20 30 2c 20 30 29  ile, size, 0, 0)
37b0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 79 6e 63 20  ;.}../*.** Sync 
37c0: 61 20 63 72 61 73 68 2d 66 69 6c 65 2e 0a 2a 2f  a crash-file..*/
37d0: 0a 73 74 61 74 69 63 20 69 6e 74 20 63 66 53 79  .static int cfSy
37e0: 6e 63 28 73 71 6c 69 74 65 33 5f 66 69 6c 65 20  nc(sqlite3_file 
37f0: 2a 70 46 69 6c 65 2c 20 69 6e 74 20 66 6c 61 67  *pFile, int flag
3800: 73 29 7b 0a 20 20 43 72 61 73 68 46 69 6c 65 20  s){.  CrashFile 
3810: 2a 70 43 72 61 73 68 20 3d 20 28 43 72 61 73 68  *pCrash = (Crash
3820: 46 69 6c 65 20 2a 29 70 46 69 6c 65 3b 0a 20 20  File *)pFile;.  
3830: 69 6e 74 20 69 73 43 72 61 73 68 20 3d 20 30 3b  int isCrash = 0;
3840: 0a 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ..  const char *
3850: 7a 4e 61 6d 65 20 3d 20 70 43 72 61 73 68 2d 3e  zName = pCrash->
3860: 7a 4e 61 6d 65 3b 0a 20 20 63 6f 6e 73 74 20 63  zName;.  const c
3870: 68 61 72 20 2a 7a 43 72 61 73 68 46 69 6c 65 20  har *zCrashFile 
3880: 3d 20 67 2e 7a 43 72 61 73 68 46 69 6c 65 3b 0a  = g.zCrashFile;.
3890: 20 20 69 6e 74 20 6e 4e 61 6d 65 20 3d 20 73 74    int nName = st
38a0: 72 6c 65 6e 28 7a 4e 61 6d 65 29 3b 0a 20 20 69  rlen(zName);.  i
38b0: 6e 74 20 6e 43 72 61 73 68 46 69 6c 65 20 3d 20  nt nCrashFile = 
38c0: 73 74 72 6c 65 6e 28 7a 43 72 61 73 68 46 69 6c  strlen(zCrashFil
38d0: 65 29 3b 0a 0a 20 20 69 66 28 20 6e 43 72 61 73  e);..  if( nCras
38e0: 68 46 69 6c 65 3e 30 20 26 26 20 7a 43 72 61 73  hFile>0 && zCras
38f0: 68 46 69 6c 65 5b 6e 43 72 61 73 68 46 69 6c 65  hFile[nCrashFile
3900: 2d 31 5d 3d 3d 27 2a 27 20 29 7b 0a 20 20 20 20  -1]=='*' ){.    
3910: 6e 43 72 61 73 68 46 69 6c 65 2d 2d 3b 0a 20 20  nCrashFile--;.  
3920: 20 20 69 66 28 20 6e 4e 61 6d 65 3e 6e 43 72 61    if( nName>nCra
3930: 73 68 46 69 6c 65 20 29 20 6e 4e 61 6d 65 20 3d  shFile ) nName =
3940: 20 6e 43 72 61 73 68 46 69 6c 65 3b 0a 20 20 7d   nCrashFile;.  }
3950: 0a 0a 20 20 69 66 28 20 6e 4e 61 6d 65 3d 3d 6e  ..  if( nName==n
3960: 43 72 61 73 68 46 69 6c 65 20 26 26 20 30 3d 3d  CrashFile && 0==
3970: 6d 65 6d 63 6d 70 28 7a 4e 61 6d 65 2c 20 7a 43  memcmp(zName, zC
3980: 72 61 73 68 46 69 6c 65 2c 20 6e 4e 61 6d 65 29  rashFile, nName)
3990: 20 29 7b 0a 20 20 20 20 69 66 28 20 28 2d 2d 67   ){.    if( (--g
39a0: 2e 69 43 72 61 73 68 29 3d 3d 30 20 29 20 69 73  .iCrash)==0 ) is
39b0: 43 72 61 73 68 20 3d 20 31 3b 0a 20 20 7d 0a 0a  Crash = 1;.  }..
39c0: 20 20 72 65 74 75 72 6e 20 77 72 69 74 65 4c 69    return writeLi
39d0: 73 74 53 79 6e 63 28 70 43 72 61 73 68 2c 20 69  stSync(pCrash, i
39e0: 73 43 72 61 73 68 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  sCrash);.}../*.*
39f0: 2a 20 52 65 74 75 72 6e 20 74 68 65 20 63 75 72  * Return the cur
3a00: 72 65 6e 74 20 66 69 6c 65 2d 73 69 7a 65 20 6f  rent file-size o
3a10: 66 20 74 68 65 20 63 72 61 73 68 2d 66 69 6c 65  f the crash-file
3a20: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  ..*/.static int 
3a30: 63 66 46 69 6c 65 53 69 7a 65 28 73 71 6c 69 74  cfFileSize(sqlit
3a40: 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65 2c 20  e3_file *pFile, 
3a50: 73 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 70 53  sqlite_int64 *pS
3a60: 69 7a 65 29 7b 0a 20 20 43 72 61 73 68 46 69 6c  ize){.  CrashFil
3a70: 65 20 2a 70 43 72 61 73 68 20 3d 20 28 43 72 61  e *pCrash = (Cra
3a80: 73 68 46 69 6c 65 20 2a 29 70 46 69 6c 65 3b 0a  shFile *)pFile;.
3a90: 20 20 2a 70 53 69 7a 65 20 3d 20 28 69 36 34 29    *pSize = (i64)
3aa0: 70 43 72 61 73 68 2d 3e 69 53 69 7a 65 3b 0a 20  pCrash->iSize;. 
3ab0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f   return SQLITE_O
3ac0: 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 61 6c 6c  K;.}../*.** Call
3ad0: 73 20 72 65 6c 61 74 65 64 20 74 6f 20 66 69 6c  s related to fil
3ae0: 65 2d 6c 6f 63 6b 73 20 61 72 65 20 70 61 73 73  e-locks are pass
3af0: 65 64 20 6f 6e 20 74 6f 20 74 68 65 20 72 65 61  ed on to the rea
3b00: 6c 20 66 69 6c 65 20 68 61 6e 64 6c 65 2e 0a 2a  l file handle..*
3b10: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 63 66 4c  /.static int cfL
3b20: 6f 63 6b 28 73 71 6c 69 74 65 33 5f 66 69 6c 65  ock(sqlite3_file
3b30: 20 2a 70 46 69 6c 65 2c 20 69 6e 74 20 65 4c 6f   *pFile, int eLo
3b40: 63 6b 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71  ck){.  return sq
3b50: 6c 69 74 65 33 4f 73 4c 6f 63 6b 28 28 28 43 72  lite3OsLock(((Cr
3b60: 61 73 68 46 69 6c 65 20 2a 29 70 46 69 6c 65 29  ashFile *)pFile)
3b70: 2d 3e 70 52 65 61 6c 46 69 6c 65 2c 20 65 4c 6f  ->pRealFile, eLo
3b80: 63 6b 29 3b 0a 7d 0a 73 74 61 74 69 63 20 69 6e  ck);.}.static in
3b90: 74 20 63 66 55 6e 6c 6f 63 6b 28 73 71 6c 69 74  t cfUnlock(sqlit
3ba0: 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65 2c 20  e3_file *pFile, 
3bb0: 69 6e 74 20 65 4c 6f 63 6b 29 7b 0a 20 20 72 65  int eLock){.  re
3bc0: 74 75 72 6e 20 73 71 6c 69 74 65 33 4f 73 55 6e  turn sqlite3OsUn
3bd0: 6c 6f 63 6b 28 28 28 43 72 61 73 68 46 69 6c 65  lock(((CrashFile
3be0: 20 2a 29 70 46 69 6c 65 29 2d 3e 70 52 65 61 6c   *)pFile)->pReal
3bf0: 46 69 6c 65 2c 20 65 4c 6f 63 6b 29 3b 0a 7d 0a  File, eLock);.}.
3c00: 73 74 61 74 69 63 20 69 6e 74 20 63 66 43 68 65  static int cfChe
3c10: 63 6b 52 65 73 65 72 76 65 64 4c 6f 63 6b 28 73  ckReservedLock(s
3c20: 71 6c 69 74 65 33 5f 66 69 6c 65 20 2a 70 46 69  qlite3_file *pFi
3c30: 6c 65 2c 20 69 6e 74 20 2a 70 52 65 73 4f 75 74  le, int *pResOut
3c40: 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71 6c 69  ){.  return sqli
3c50: 74 65 33 4f 73 43 68 65 63 6b 52 65 73 65 72 76  te3OsCheckReserv
3c60: 65 64 4c 6f 63 6b 28 28 28 43 72 61 73 68 46 69  edLock(((CrashFi
3c70: 6c 65 20 2a 29 70 46 69 6c 65 29 2d 3e 70 52 65  le *)pFile)->pRe
3c80: 61 6c 46 69 6c 65 2c 20 70 52 65 73 4f 75 74 29  alFile, pResOut)
3c90: 3b 0a 7d 0a 73 74 61 74 69 63 20 69 6e 74 20 63  ;.}.static int c
3ca0: 66 46 69 6c 65 43 6f 6e 74 72 6f 6c 28 73 71 6c  fFileControl(sql
3cb0: 69 74 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65  ite3_file *pFile
3cc0: 2c 20 69 6e 74 20 6f 70 2c 20 76 6f 69 64 20 2a  , int op, void *
3cd0: 70 41 72 67 29 7b 0a 20 20 72 65 74 75 72 6e 20  pArg){.  return 
3ce0: 73 71 6c 69 74 65 33 4f 73 46 69 6c 65 43 6f 6e  sqlite3OsFileCon
3cf0: 74 72 6f 6c 28 28 28 43 72 61 73 68 46 69 6c 65  trol(((CrashFile
3d00: 20 2a 29 70 46 69 6c 65 29 2d 3e 70 52 65 61 6c   *)pFile)->pReal
3d10: 46 69 6c 65 2c 20 6f 70 2c 20 70 41 72 67 29 3b  File, op, pArg);
3d20: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 78 53  .}../*.** The xS
3d30: 65 63 74 6f 72 53 69 7a 65 28 29 20 61 6e 64 20  ectorSize() and 
3d40: 78 44 65 76 69 63 65 43 68 61 72 61 63 74 65 72  xDeviceCharacter
3d50: 69 73 74 69 63 73 28 29 20 66 75 6e 63 74 69 6f  istics() functio
3d60: 6e 73 20 72 65 74 75 72 6e 0a 2a 2a 20 74 68 65  ns return.** the
3d70: 20 67 6c 6f 62 61 6c 20 76 61 6c 75 65 73 20 63   global values c
3d80: 6f 6e 66 69 67 75 72 65 64 20 62 79 20 74 68 65  onfigured by the
3d90: 20 5b 73 71 6c 69 74 65 5f 63 72 61 73 68 70 61   [sqlite_crashpa
3da0: 72 61 6d 73 5d 20 74 63 6c 0a 2a 20 20 69 6e 74  rams] tcl.*  int
3db0: 65 72 66 61 63 65 2e 0a 2a 2f 0a 73 74 61 74 69  erface..*/.stati
3dc0: 63 20 69 6e 74 20 63 66 53 65 63 74 6f 72 53 69  c int cfSectorSi
3dd0: 7a 65 28 73 71 6c 69 74 65 33 5f 66 69 6c 65 20  ze(sqlite3_file 
3de0: 2a 70 46 69 6c 65 29 7b 0a 20 20 72 65 74 75 72  *pFile){.  retur
3df0: 6e 20 67 2e 69 53 65 63 74 6f 72 53 69 7a 65 3b  n g.iSectorSize;
3e00: 0a 7d 0a 73 74 61 74 69 63 20 69 6e 74 20 63 66  .}.static int cf
3e10: 44 65 76 69 63 65 43 68 61 72 61 63 74 65 72 69  DeviceCharacteri
3e20: 73 74 69 63 73 28 73 71 6c 69 74 65 33 5f 66 69  stics(sqlite3_fi
3e30: 6c 65 20 2a 70 46 69 6c 65 29 7b 0a 20 20 72 65  le *pFile){.  re
3e40: 74 75 72 6e 20 67 2e 69 44 65 76 69 63 65 43 68  turn g.iDeviceCh
3e50: 61 72 61 63 74 65 72 69 73 74 69 63 73 3b 0a 7d  aracteristics;.}
3e60: 0a 0a 2f 2a 0a 2a 2a 20 50 61 73 73 2d 74 68 72  ../*.** Pass-thr
3e70: 6f 75 67 68 73 20 66 6f 72 20 57 41 4c 20 73 75  oughs for WAL su
3e80: 70 70 6f 72 74 2e 0a 2a 2f 0a 73 74 61 74 69 63  pport..*/.static
3e90: 20 69 6e 74 20 63 66 53 68 6d 4c 6f 63 6b 28 73   int cfShmLock(s
3ea0: 71 6c 69 74 65 33 5f 66 69 6c 65 20 2a 70 46 69  qlite3_file *pFi
3eb0: 6c 65 2c 20 69 6e 74 20 6f 66 73 74 2c 20 69 6e  le, int ofst, in
3ec0: 74 20 6e 2c 20 69 6e 74 20 66 6c 61 67 73 29 7b  t n, int flags){
3ed0: 0a 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65  .  return sqlite
3ee0: 33 4f 73 53 68 6d 4c 6f 63 6b 28 28 28 43 72 61  3OsShmLock(((Cra
3ef0: 73 68 46 69 6c 65 2a 29 70 46 69 6c 65 29 2d 3e  shFile*)pFile)->
3f00: 70 52 65 61 6c 46 69 6c 65 2c 20 6f 66 73 74 2c  pRealFile, ofst,
3f10: 20 6e 2c 20 66 6c 61 67 73 29 3b 0a 7d 0a 73 74   n, flags);.}.st
3f20: 61 74 69 63 20 76 6f 69 64 20 63 66 53 68 6d 42  atic void cfShmB
3f30: 61 72 72 69 65 72 28 73 71 6c 69 74 65 33 5f 66  arrier(sqlite3_f
3f40: 69 6c 65 20 2a 70 46 69 6c 65 29 7b 0a 20 20 73  ile *pFile){.  s
3f50: 71 6c 69 74 65 33 4f 73 53 68 6d 42 61 72 72 69  qlite3OsShmBarri
3f60: 65 72 28 28 28 43 72 61 73 68 46 69 6c 65 2a 29  er(((CrashFile*)
3f70: 70 46 69 6c 65 29 2d 3e 70 52 65 61 6c 46 69 6c  pFile)->pRealFil
3f80: 65 29 3b 0a 7d 0a 73 74 61 74 69 63 20 69 6e 74  e);.}.static int
3f90: 20 63 66 53 68 6d 55 6e 6d 61 70 28 73 71 6c 69   cfShmUnmap(sqli
3fa0: 74 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65 2c  te3_file *pFile,
3fb0: 20 69 6e 74 20 64 65 6c 46 6c 61 67 29 7b 0a 20   int delFlag){. 
3fc0: 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 4f   return sqlite3O
3fd0: 73 53 68 6d 55 6e 6d 61 70 28 28 28 43 72 61 73  sShmUnmap(((Cras
3fe0: 68 46 69 6c 65 2a 29 70 46 69 6c 65 29 2d 3e 70  hFile*)pFile)->p
3ff0: 52 65 61 6c 46 69 6c 65 2c 20 64 65 6c 46 6c 61  RealFile, delFla
4000: 67 29 3b 0a 7d 0a 73 74 61 74 69 63 20 69 6e 74  g);.}.static int
4010: 20 63 66 53 68 6d 4d 61 70 28 0a 20 20 73 71 6c   cfShmMap(.  sql
4020: 69 74 65 33 5f 66 69 6c 65 20 2a 70 46 69 6c 65  ite3_file *pFile
4030: 2c 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20  ,            /* 
4040: 48 61 6e 64 6c 65 20 6f 70 65 6e 20 6f 6e 20 64  Handle open on d
4050: 61 74 61 62 61 73 65 20 66 69 6c 65 20 2a 2f 0a  atabase file */.
4060: 20 20 69 6e 74 20 69 52 65 67 69 6f 6e 2c 20 20    int iRegion,  
4070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4080: 20 20 2f 2a 20 52 65 67 69 6f 6e 20 74 6f 20 72    /* Region to r
4090: 65 74 72 69 65 76 65 20 2a 2f 0a 20 20 69 6e 74  etrieve */.  int
40a0: 20 73 7a 2c 20 20 20 20 20 20 20 20 20 20 20 20   sz,            
40b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
40c0: 53 69 7a 65 20 6f 66 20 72 65 67 69 6f 6e 73 20  Size of regions 
40d0: 2a 2f 0a 20 20 69 6e 74 20 77 2c 20 20 20 20 20  */.  int w,     
40e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
40f0: 20 20 20 20 20 2f 2a 20 54 72 75 65 20 74 6f 20       /* True to 
4100: 65 78 74 65 6e 64 20 66 69 6c 65 20 69 66 20 6e  extend file if n
4110: 65 63 65 73 73 61 72 79 20 2a 2f 0a 20 20 76 6f  ecessary */.  vo
4120: 69 64 20 76 6f 6c 61 74 69 6c 65 20 2a 2a 70 70  id volatile **pp
4130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
4140: 20 4f 55 54 3a 20 4d 61 70 70 65 64 20 6d 65 6d   OUT: Mapped mem
4150: 6f 72 79 20 2a 2f 0a 29 7b 0a 20 20 72 65 74 75  ory */.){.  retu
4160: 72 6e 20 73 71 6c 69 74 65 33 4f 73 53 68 6d 4d  rn sqlite3OsShmM
4170: 61 70 28 28 28 43 72 61 73 68 46 69 6c 65 2a 29  ap(((CrashFile*)
4180: 70 46 69 6c 65 29 2d 3e 70 52 65 61 6c 46 69 6c  pFile)->pRealFil
4190: 65 2c 20 69 52 65 67 69 6f 6e 2c 20 73 7a 2c 20  e, iRegion, sz, 
41a0: 77 2c 20 70 70 29 3b 0a 7d 0a 0a 73 74 61 74 69  w, pp);.}..stati
41b0: 63 20 63 6f 6e 73 74 20 73 71 6c 69 74 65 33 5f  c const sqlite3_
41c0: 69 6f 5f 6d 65 74 68 6f 64 73 20 43 72 61 73 68  io_methods Crash
41d0: 46 69 6c 65 56 74 61 62 20 3d 20 7b 0a 20 20 32  FileVtab = {.  2
41e0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
41f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
4200: 69 56 65 72 73 69 6f 6e 20 2a 2f 0a 20 20 63 66  iVersion */.  cf
4210: 43 6c 6f 73 65 2c 20 20 20 20 20 20 20 20 20 20  Close,          
4220: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 78              /* x
4230: 43 6c 6f 73 65 20 2a 2f 0a 20 20 63 66 52 65 61  Close */.  cfRea
4240: 64 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  d,              
4250: 20 20 20 20 20 20 20 20 20 2f 2a 20 78 52 65 61           /* xRea
4260: 64 20 2a 2f 0a 20 20 63 66 57 72 69 74 65 2c 20  d */.  cfWrite, 
4270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4280: 20 20 20 20 20 2f 2a 20 78 57 72 69 74 65 20 2a       /* xWrite *
4290: 2f 0a 20 20 63 66 54 72 75 6e 63 61 74 65 2c 20  /.  cfTruncate, 
42a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
42b0: 20 20 2f 2a 20 78 54 72 75 6e 63 61 74 65 20 2a    /* xTruncate *
42c0: 2f 0a 20 20 63 66 53 79 6e 63 2c 20 20 20 20 20  /.  cfSync,     
42d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
42e0: 20 20 2f 2a 20 78 53 79 6e 63 20 2a 2f 0a 20 20    /* xSync */.  
42f0: 63 66 46 69 6c 65 53 69 7a 65 2c 20 20 20 20 20  cfFileSize,     
4300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
4310: 20 78 46 69 6c 65 53 69 7a 65 20 2a 2f 0a 20 20   xFileSize */.  
4320: 63 66 4c 6f 63 6b 2c 20 20 20 20 20 20 20 20 20  cfLock,         
4330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
4340: 20 78 4c 6f 63 6b 20 2a 2f 0a 20 20 63 66 55 6e   xLock */.  cfUn
4350: 6c 6f 63 6b 2c 20 20 20 20 20 20 20 20 20 20 20  lock,           
4360: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 78 55 6e            /* xUn
4370: 6c 6f 63 6b 20 2a 2f 0a 20 20 63 66 43 68 65 63  lock */.  cfChec
4380: 6b 52 65 73 65 72 76 65 64 4c 6f 63 6b 2c 20 20  kReservedLock,  
4390: 20 20 20 20 20 20 20 20 2f 2a 20 78 43 68 65 63          /* xChec
43a0: 6b 52 65 73 65 72 76 65 64 4c 6f 63 6b 20 2a 2f  kReservedLock */
43b0: 0a 20 20 63 66 46 69 6c 65 43 6f 6e 74 72 6f 6c  .  cfFileControl
43c0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
43d0: 20 2f 2a 20 78 46 69 6c 65 43 6f 6e 74 72 6f 6c   /* xFileControl
43e0: 20 2a 2f 0a 20 20 63 66 53 65 63 74 6f 72 53 69   */.  cfSectorSi
43f0: 7a 65 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  ze,             
4400: 20 20 20 20 2f 2a 20 78 53 65 63 74 6f 72 53 69      /* xSectorSi
4410: 7a 65 20 2a 2f 0a 20 20 63 66 44 65 76 69 63 65  ze */.  cfDevice
4420: 43 68 61 72 61 63 74 65 72 69 73 74 69 63 73 2c  Characteristics,
4430: 20 20 20 20 20 20 2f 2a 20 78 44 65 76 69 63 65        /* xDevice
4440: 43 68 61 72 61 63 74 65 72 69 73 74 69 63 73 20  Characteristics 
4450: 2a 2f 0a 20 20 63 66 53 68 6d 4d 61 70 2c 20 20  */.  cfShmMap,  
4460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4470: 20 20 20 2f 2a 20 78 53 68 6d 4d 61 70 20 2a 2f     /* xShmMap */
4480: 0a 20 20 63 66 53 68 6d 4c 6f 63 6b 2c 20 20 20  .  cfShmLock,   
4490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
44a0: 20 2f 2a 20 78 53 68 6d 4c 6f 63 6b 20 2a 2f 0a   /* xShmLock */.
44b0: 20 20 63 66 53 68 6d 42 61 72 72 69 65 72 2c 20    cfShmBarrier, 
44c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
44d0: 2f 2a 20 78 53 68 6d 42 61 72 72 69 65 72 20 2a  /* xShmBarrier *
44e0: 2f 0a 20 20 63 66 53 68 6d 55 6e 6d 61 70 20 20  /.  cfShmUnmap  
44f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4500: 20 20 2f 2a 20 78 53 68 6d 55 6e 6d 61 70 20 2a    /* xShmUnmap *
4510: 2f 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 41 70 70 6c  /.};../*.** Appl
4520: 69 63 61 74 69 6f 6e 20 64 61 74 61 20 66 6f 72  ication data for
4530: 20 74 68 65 20 63 72 61 73 68 20 56 46 53 0a 2a   the crash VFS.*
4540: 2f 0a 73 74 72 75 63 74 20 63 72 61 73 68 41 70  /.struct crashAp
4550: 70 44 61 74 61 20 7b 0a 20 20 73 71 6c 69 74 65  pData {.  sqlite
4560: 33 5f 76 66 73 20 2a 70 4f 72 69 67 3b 20 20 20  3_vfs *pOrig;   
4570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4580: 2f 2a 20 57 72 61 70 70 65 64 20 76 66 73 20 73  /* Wrapped vfs s
4590: 74 72 75 63 74 75 72 65 20 2a 2f 0a 7d 3b 0a 0a  tructure */.};..
45a0: 2f 2a 0a 2a 2a 20 4f 70 65 6e 20 61 20 63 72 61  /*.** Open a cra
45b0: 73 68 2d 66 69 6c 65 20 66 69 6c 65 20 68 61 6e  sh-file file han
45c0: 64 6c 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 63  dle..**.** The c
45d0: 61 6c 6c 65 72 20 77 69 6c 6c 20 68 61 76 65 20  aller will have 
45e0: 61 6c 6c 6f 63 61 74 65 64 20 70 56 66 73 2d 3e  allocated pVfs->
45f0: 73 7a 4f 73 46 69 6c 65 20 62 79 74 65 73 20 6f  szOsFile bytes o
4600: 66 20 73 70 61 63 65 0a 2a 2a 20 61 74 20 70 46  f space.** at pF
4610: 69 6c 65 2e 20 54 68 69 73 20 66 69 6c 65 20 75  ile. This file u
4620: 73 65 73 20 74 68 69 73 20 73 70 61 63 65 20 66  ses this space f
4630: 6f 72 20 74 68 65 20 43 72 61 73 68 46 69 6c 65  or the CrashFile
4640: 20 73 74 72 75 63 74 75 72 65 0a 2a 2a 20 61 6e   structure.** an
4650: 64 20 61 6c 6c 6f 63 61 74 65 73 20 73 70 61 63  d allocates spac
4660: 65 20 66 6f 72 20 74 68 65 20 22 72 65 61 6c 22  e for the "real"
4670: 20 66 69 6c 65 20 73 74 72 75 63 74 75 72 65 20   file structure 
4680: 75 73 69 6e 67 20 0a 2a 2a 20 73 71 6c 69 74 65  using .** sqlite
4690: 33 5f 6d 61 6c 6c 6f 63 28 29 2e 20 54 68 65 20  3_malloc(). The 
46a0: 61 73 73 75 6d 70 74 69 6f 6e 20 68 65 72 65 20  assumption here 
46b0: 69 73 20 28 70 56 66 73 2d 3e 73 7a 4f 73 46 69  is (pVfs->szOsFi
46c0: 6c 65 29 20 69 73 0a 2a 2a 20 65 71 75 61 6c 20  le) is.** equal 
46d0: 6f 72 20 67 72 65 61 74 65 72 20 74 68 61 6e 20  or greater than 
46e0: 73 69 7a 65 6f 66 28 43 72 61 73 68 46 69 6c 65  sizeof(CrashFile
46f0: 29 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74  )..*/.static int
4700: 20 63 66 4f 70 65 6e 28 0a 20 20 73 71 6c 69 74   cfOpen(.  sqlit
4710: 65 33 5f 76 66 73 20 2a 70 43 66 56 66 73 2c 0a  e3_vfs *pCfVfs,.
4720: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e    const char *zN
4730: 61 6d 65 2c 0a 20 20 73 71 6c 69 74 65 33 5f 66  ame,.  sqlite3_f
4740: 69 6c 65 20 2a 70 46 69 6c 65 2c 0a 20 20 69 6e  ile *pFile,.  in
4750: 74 20 66 6c 61 67 73 2c 0a 20 20 69 6e 74 20 2a  t flags,.  int *
4760: 70 4f 75 74 46 6c 61 67 73 0a 29 7b 0a 20 20 73  pOutFlags.){.  s
4770: 71 6c 69 74 65 33 5f 76 66 73 20 2a 70 56 66 73  qlite3_vfs *pVfs
4780: 20 3d 20 28 73 71 6c 69 74 65 33 5f 76 66 73 20   = (sqlite3_vfs 
4790: 2a 29 70 43 66 56 66 73 2d 3e 70 41 70 70 44 61  *)pCfVfs->pAppDa
47a0: 74 61 3b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20  ta;.  int rc;.  
47b0: 43 72 61 73 68 46 69 6c 65 20 2a 70 57 72 61 70  CrashFile *pWrap
47c0: 70 65 72 20 3d 20 28 43 72 61 73 68 46 69 6c 65  per = (CrashFile
47d0: 20 2a 29 70 46 69 6c 65 3b 0a 20 20 73 71 6c 69   *)pFile;.  sqli
47e0: 74 65 33 5f 66 69 6c 65 20 2a 70 52 65 61 6c 20  te3_file *pReal 
47f0: 3d 20 28 73 71 6c 69 74 65 33 5f 66 69 6c 65 2a  = (sqlite3_file*
4800: 29 26 70 57 72 61 70 70 65 72 5b 31 5d 3b 0a 0a  )&pWrapper[1];..
4810: 20 20 6d 65 6d 73 65 74 28 70 57 72 61 70 70 65    memset(pWrappe
4820: 72 2c 20 30 2c 20 73 69 7a 65 6f 66 28 43 72 61  r, 0, sizeof(Cra
4830: 73 68 46 69 6c 65 29 29 3b 0a 20 20 72 63 20 3d  shFile));.  rc =
4840: 20 73 71 6c 69 74 65 33 4f 73 4f 70 65 6e 28 70   sqlite3OsOpen(p
4850: 56 66 73 2c 20 7a 4e 61 6d 65 2c 20 70 52 65 61  Vfs, zName, pRea
4860: 6c 2c 20 66 6c 61 67 73 2c 20 70 4f 75 74 46 6c  l, flags, pOutFl
4870: 61 67 73 29 3b 0a 0a 20 20 69 66 28 20 72 63 3d  ags);..  if( rc=
4880: 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20  =SQLITE_OK ){.  
4890: 20 20 69 36 34 20 69 53 69 7a 65 3b 0a 20 20 20    i64 iSize;.   
48a0: 20 70 57 72 61 70 70 65 72 2d 3e 70 4d 65 74 68   pWrapper->pMeth
48b0: 6f 64 20 3d 20 26 43 72 61 73 68 46 69 6c 65 56  od = &CrashFileV
48c0: 74 61 62 3b 0a 20 20 20 20 70 57 72 61 70 70 65  tab;.    pWrappe
48d0: 72 2d 3e 7a 4e 61 6d 65 20 3d 20 28 63 68 61 72  r->zName = (char
48e0: 20 2a 29 7a 4e 61 6d 65 3b 0a 20 20 20 20 70 57   *)zName;.    pW
48f0: 72 61 70 70 65 72 2d 3e 70 52 65 61 6c 46 69 6c  rapper->pRealFil
4900: 65 20 3d 20 70 52 65 61 6c 3b 0a 20 20 20 20 72  e = pReal;.    r
4910: 63 20 3d 20 73 71 6c 69 74 65 33 4f 73 46 69 6c  c = sqlite3OsFil
4920: 65 53 69 7a 65 28 70 52 65 61 6c 2c 20 26 69 53  eSize(pReal, &iS
4930: 69 7a 65 29 3b 0a 20 20 20 20 70 57 72 61 70 70  ize);.    pWrapp
4940: 65 72 2d 3e 69 53 69 7a 65 20 3d 20 28 69 6e 74  er->iSize = (int
4950: 29 69 53 69 7a 65 3b 0a 20 20 20 20 70 57 72 61  )iSize;.    pWra
4960: 70 70 65 72 2d 3e 66 6c 61 67 73 20 3d 20 66 6c  pper->flags = fl
4970: 61 67 73 3b 0a 20 20 7d 0a 20 20 69 66 28 20 72  ags;.  }.  if( r
4980: 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a  c==SQLITE_OK ){.
4990: 20 20 20 20 70 57 72 61 70 70 65 72 2d 3e 6e 44      pWrapper->nD
49a0: 61 74 61 20 3d 20 28 34 30 39 36 20 2b 20 70 57  ata = (4096 + pW
49b0: 72 61 70 70 65 72 2d 3e 69 53 69 7a 65 29 3b 0a  rapper->iSize);.
49c0: 20 20 20 20 70 57 72 61 70 70 65 72 2d 3e 7a 44      pWrapper->zD
49d0: 61 74 61 20 3d 20 63 72 61 73 68 5f 6d 61 6c 6c  ata = crash_mall
49e0: 6f 63 28 70 57 72 61 70 70 65 72 2d 3e 6e 44 61  oc(pWrapper->nDa
49f0: 74 61 29 3b 0a 20 20 20 20 69 66 28 20 70 57 72  ta);.    if( pWr
4a00: 61 70 70 65 72 2d 3e 7a 44 61 74 61 20 29 7b 0a  apper->zData ){.
4a10: 20 20 20 20 20 20 2f 2a 20 6f 73 5f 75 6e 69 78        /* os_unix
4a20: 2e 63 20 63 6f 6e 74 61 69 6e 73 20 61 6e 20 61  .c contains an a
4a30: 73 73 65 72 74 28 29 20 74 68 61 74 20 66 61 69  ssert() that fai
4a40: 6c 73 20 69 66 20 74 68 65 20 63 61 6c 6c 65 72  ls if the caller
4a50: 20 61 74 74 65 6d 70 74 73 0a 20 20 20 20 20 20   attempts.      
4a60: 2a 2a 20 74 6f 20 72 65 61 64 20 64 61 74 61 20  ** to read data 
4a70: 66 72 6f 6d 20 74 68 65 20 35 31 32 2d 62 79 74  from the 512-byt
4a80: 65 20 6c 6f 63 6b 69 6e 67 20 72 65 67 69 6f 6e  e locking region
4a90: 20 6f 66 20 61 20 66 69 6c 65 20 6f 70 65 6e 65   of a file opene
4aa0: 64 0a 20 20 20 20 20 20 2a 2a 20 77 69 74 68 20  d.      ** with 
4ab0: 74 68 65 20 53 51 4c 49 54 45 5f 4f 50 45 4e 5f  the SQLITE_OPEN_
4ac0: 4d 41 49 4e 5f 44 42 20 66 6c 61 67 2e 20 54 68  MAIN_DB flag. Th
4ad0: 69 73 20 72 65 67 69 6f 6e 20 6f 66 20 61 20 64  is region of a d
4ae0: 61 74 61 62 61 73 65 20 66 69 6c 65 0a 20 20 20  atabase file.   
4af0: 20 20 20 2a 2a 20 6e 65 76 65 72 20 63 6f 6e 74     ** never cont
4b00: 61 69 6e 73 20 76 61 6c 69 64 20 64 61 74 61 20  ains valid data 
4b10: 61 6e 79 68 6f 77 2e 20 53 6f 20 61 76 6f 69 64  anyhow. So avoid
4b20: 20 64 6f 69 6e 67 20 73 75 63 68 20 61 20 72 65   doing such a re
4b30: 61 64 20 68 65 72 65 2e 0a 20 20 20 20 20 20 2a  ad here..      *
4b40: 2f 0a 20 20 20 20 20 20 63 6f 6e 73 74 20 69 6e  /.      const in
4b50: 74 20 69 73 44 62 20 3d 20 28 66 6c 61 67 73 26  t isDb = (flags&
4b60: 53 51 4c 49 54 45 5f 4f 50 45 4e 5f 4d 41 49 4e  SQLITE_OPEN_MAIN
4b70: 5f 44 42 29 3b 0a 20 20 20 20 20 20 69 36 34 20  _DB);.      i64 
4b80: 69 43 68 75 6e 6b 20 3d 20 70 57 72 61 70 70 65  iChunk = pWrappe
4b90: 72 2d 3e 69 53 69 7a 65 3b 0a 20 20 20 20 20 20  r->iSize;.      
4ba0: 69 66 28 20 69 43 68 75 6e 6b 3e 50 45 4e 44 49  if( iChunk>PENDI
4bb0: 4e 47 5f 42 59 54 45 20 26 26 20 69 73 44 62 20  NG_BYTE && isDb 
4bc0: 29 7b 0a 20 20 20 20 20 20 20 20 69 43 68 75 6e  ){.        iChun
4bd0: 6b 20 3d 20 50 45 4e 44 49 4e 47 5f 42 59 54 45  k = PENDING_BYTE
4be0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20  ;.      }.      
4bf0: 6d 65 6d 73 65 74 28 70 57 72 61 70 70 65 72 2d  memset(pWrapper-
4c00: 3e 7a 44 61 74 61 2c 20 30 2c 20 70 57 72 61 70  >zData, 0, pWrap
4c10: 70 65 72 2d 3e 6e 44 61 74 61 29 3b 0a 20 20 20  per->nData);.   
4c20: 20 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 4f     rc = sqlite3O
4c30: 73 52 65 61 64 28 70 52 65 61 6c 2c 20 70 57 72  sRead(pReal, pWr
4c40: 61 70 70 65 72 2d 3e 7a 44 61 74 61 2c 20 69 43  apper->zData, iC
4c50: 68 75 6e 6b 2c 20 30 29 3b 20 0a 20 20 20 20 20  hunk, 0); .     
4c60: 20 69 66 28 20 53 51 4c 49 54 45 5f 4f 4b 3d 3d   if( SQLITE_OK==
4c70: 72 63 20 26 26 20 70 57 72 61 70 70 65 72 2d 3e  rc && pWrapper->
4c80: 69 53 69 7a 65 3e 28 50 45 4e 44 49 4e 47 5f 42  iSize>(PENDING_B
4c90: 59 54 45 2b 35 31 32 29 20 26 26 20 69 73 44 62  YTE+512) && isDb
4ca0: 20 29 7b 0a 20 20 20 20 20 20 20 20 69 36 34 20   ){.        i64 
4cb0: 69 4f 66 66 20 3d 20 50 45 4e 44 49 4e 47 5f 42  iOff = PENDING_B
4cc0: 59 54 45 2b 35 31 32 3b 0a 20 20 20 20 20 20 20  YTE+512;.       
4cd0: 20 69 43 68 75 6e 6b 20 3d 20 70 57 72 61 70 70   iChunk = pWrapp
4ce0: 65 72 2d 3e 69 53 69 7a 65 20 2d 20 69 4f 66 66  er->iSize - iOff
4cf0: 3b 0a 20 20 20 20 20 20 20 20 72 63 20 3d 20 73  ;.        rc = s
4d00: 71 6c 69 74 65 33 4f 73 52 65 61 64 28 70 52 65  qlite3OsRead(pRe
4d10: 61 6c 2c 20 26 70 57 72 61 70 70 65 72 2d 3e 7a  al, &pWrapper->z
4d20: 44 61 74 61 5b 69 4f 66 66 5d 2c 20 69 43 68 75  Data[iOff], iChu
4d30: 6e 6b 2c 20 69 4f 66 66 29 3b 0a 20 20 20 20 20  nk, iOff);.     
4d40: 20 7d 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20   }.    }else{.  
4d50: 20 20 20 20 72 63 20 3d 20 53 51 4c 49 54 45 5f      rc = SQLITE_
4d60: 4e 4f 4d 45 4d 3b 0a 20 20 20 20 7d 0a 20 20 7d  NOMEM;.    }.  }
4d70: 0a 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54  .  if( rc!=SQLIT
4d80: 45 5f 4f 4b 20 26 26 20 70 57 72 61 70 70 65 72  E_OK && pWrapper
4d90: 2d 3e 70 4d 65 74 68 6f 64 20 29 7b 0a 20 20 20  ->pMethod ){.   
4da0: 20 73 71 6c 69 74 65 33 4f 73 43 6c 6f 73 65 28   sqlite3OsClose(
4db0: 70 46 69 6c 65 29 3b 0a 20 20 7d 0a 20 20 72 65  pFile);.  }.  re
4dc0: 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 73 74 61 74  turn rc;.}..stat
4dd0: 69 63 20 69 6e 74 20 63 66 44 65 6c 65 74 65 28  ic int cfDelete(
4de0: 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 70 43 66  sqlite3_vfs *pCf
4df0: 56 66 73 2c 20 63 6f 6e 73 74 20 63 68 61 72 20  Vfs, const char 
4e00: 2a 7a 50 61 74 68 2c 20 69 6e 74 20 64 69 72 53  *zPath, int dirS
4e10: 79 6e 63 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f  ync){.  sqlite3_
4e20: 76 66 73 20 2a 70 56 66 73 20 3d 20 28 73 71 6c  vfs *pVfs = (sql
4e30: 69 74 65 33 5f 76 66 73 20 2a 29 70 43 66 56 66  ite3_vfs *)pCfVf
4e40: 73 2d 3e 70 41 70 70 44 61 74 61 3b 0a 20 20 72  s->pAppData;.  r
4e50: 65 74 75 72 6e 20 70 56 66 73 2d 3e 78 44 65 6c  eturn pVfs->xDel
4e60: 65 74 65 28 70 56 66 73 2c 20 7a 50 61 74 68 2c  ete(pVfs, zPath,
4e70: 20 64 69 72 53 79 6e 63 29 3b 0a 7d 0a 73 74 61   dirSync);.}.sta
4e80: 74 69 63 20 69 6e 74 20 63 66 41 63 63 65 73 73  tic int cfAccess
4e90: 28 0a 20 20 73 71 6c 69 74 65 33 5f 76 66 73 20  (.  sqlite3_vfs 
4ea0: 2a 70 43 66 56 66 73 2c 20 0a 20 20 63 6f 6e 73  *pCfVfs, .  cons
4eb0: 74 20 63 68 61 72 20 2a 7a 50 61 74 68 2c 20 0a  t char *zPath, .
4ec0: 20 20 69 6e 74 20 66 6c 61 67 73 2c 20 0a 20 20    int flags, .  
4ed0: 69 6e 74 20 2a 70 52 65 73 4f 75 74 0a 29 7b 0a  int *pResOut.){.
4ee0: 20 20 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 70    sqlite3_vfs *p
4ef0: 56 66 73 20 3d 20 28 73 71 6c 69 74 65 33 5f 76  Vfs = (sqlite3_v
4f00: 66 73 20 2a 29 70 43 66 56 66 73 2d 3e 70 41 70  fs *)pCfVfs->pAp
4f10: 70 44 61 74 61 3b 0a 20 20 72 65 74 75 72 6e 20  pData;.  return 
4f20: 70 56 66 73 2d 3e 78 41 63 63 65 73 73 28 70 56  pVfs->xAccess(pV
4f30: 66 73 2c 20 7a 50 61 74 68 2c 20 66 6c 61 67 73  fs, zPath, flags
4f40: 2c 20 70 52 65 73 4f 75 74 29 3b 0a 7d 0a 73 74  , pResOut);.}.st
4f50: 61 74 69 63 20 69 6e 74 20 63 66 46 75 6c 6c 50  atic int cfFullP
4f60: 61 74 68 6e 61 6d 65 28 0a 20 20 73 71 6c 69 74  athname(.  sqlit
4f70: 65 33 5f 76 66 73 20 2a 70 43 66 56 66 73 2c 20  e3_vfs *pCfVfs, 
4f80: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
4f90: 50 61 74 68 2c 20 0a 20 20 69 6e 74 20 6e 50 61  Path, .  int nPa
4fa0: 74 68 4f 75 74 2c 0a 20 20 63 68 61 72 20 2a 7a  thOut,.  char *z
4fb0: 50 61 74 68 4f 75 74 0a 29 7b 0a 20 20 73 71 6c  PathOut.){.  sql
4fc0: 69 74 65 33 5f 76 66 73 20 2a 70 56 66 73 20 3d  ite3_vfs *pVfs =
4fd0: 20 28 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 29   (sqlite3_vfs *)
4fe0: 70 43 66 56 66 73 2d 3e 70 41 70 70 44 61 74 61  pCfVfs->pAppData
4ff0: 3b 0a 20 20 72 65 74 75 72 6e 20 70 56 66 73 2d  ;.  return pVfs-
5000: 3e 78 46 75 6c 6c 50 61 74 68 6e 61 6d 65 28 70  >xFullPathname(p
5010: 56 66 73 2c 20 7a 50 61 74 68 2c 20 6e 50 61 74  Vfs, zPath, nPat
5020: 68 4f 75 74 2c 20 7a 50 61 74 68 4f 75 74 29 3b  hOut, zPathOut);
5030: 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69 64 20 2a  .}.static void *
5040: 63 66 44 6c 4f 70 65 6e 28 73 71 6c 69 74 65 33  cfDlOpen(sqlite3
5050: 5f 76 66 73 20 2a 70 43 66 56 66 73 2c 20 63 6f  _vfs *pCfVfs, co
5060: 6e 73 74 20 63 68 61 72 20 2a 7a 50 61 74 68 29  nst char *zPath)
5070: 7b 0a 20 20 73 71 6c 69 74 65 33 5f 76 66 73 20  {.  sqlite3_vfs 
5080: 2a 70 56 66 73 20 3d 20 28 73 71 6c 69 74 65 33  *pVfs = (sqlite3
5090: 5f 76 66 73 20 2a 29 70 43 66 56 66 73 2d 3e 70  _vfs *)pCfVfs->p
50a0: 41 70 70 44 61 74 61 3b 0a 20 20 72 65 74 75 72  AppData;.  retur
50b0: 6e 20 70 56 66 73 2d 3e 78 44 6c 4f 70 65 6e 28  n pVfs->xDlOpen(
50c0: 70 56 66 73 2c 20 7a 50 61 74 68 29 3b 0a 7d 0a  pVfs, zPath);.}.
50d0: 73 74 61 74 69 63 20 76 6f 69 64 20 63 66 44 6c  static void cfDl
50e0: 45 72 72 6f 72 28 73 71 6c 69 74 65 33 5f 76 66  Error(sqlite3_vf
50f0: 73 20 2a 70 43 66 56 66 73 2c 20 69 6e 74 20 6e  s *pCfVfs, int n
5100: 42 79 74 65 2c 20 63 68 61 72 20 2a 7a 45 72 72  Byte, char *zErr
5110: 4d 73 67 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f  Msg){.  sqlite3_
5120: 76 66 73 20 2a 70 56 66 73 20 3d 20 28 73 71 6c  vfs *pVfs = (sql
5130: 69 74 65 33 5f 76 66 73 20 2a 29 70 43 66 56 66  ite3_vfs *)pCfVf
5140: 73 2d 3e 70 41 70 70 44 61 74 61 3b 0a 20 20 70  s->pAppData;.  p
5150: 56 66 73 2d 3e 78 44 6c 45 72 72 6f 72 28 70 56  Vfs->xDlError(pV
5160: 66 73 2c 20 6e 42 79 74 65 2c 20 7a 45 72 72 4d  fs, nByte, zErrM
5170: 73 67 29 3b 0a 7d 0a 73 74 61 74 69 63 20 76 6f  sg);.}.static vo
5180: 69 64 20 28 2a 63 66 44 6c 53 79 6d 28 73 71 6c  id (*cfDlSym(sql
5190: 69 74 65 33 5f 76 66 73 20 2a 70 43 66 56 66 73  ite3_vfs *pCfVfs
51a0: 2c 20 76 6f 69 64 20 2a 70 48 2c 20 63 6f 6e 73  , void *pH, cons
51b0: 74 20 63 68 61 72 20 2a 7a 53 79 6d 29 29 28 76  t char *zSym))(v
51c0: 6f 69 64 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f  oid){.  sqlite3_
51d0: 76 66 73 20 2a 70 56 66 73 20 3d 20 28 73 71 6c  vfs *pVfs = (sql
51e0: 69 74 65 33 5f 76 66 73 20 2a 29 70 43 66 56 66  ite3_vfs *)pCfVf
51f0: 73 2d 3e 70 41 70 70 44 61 74 61 3b 0a 20 20 72  s->pAppData;.  r
5200: 65 74 75 72 6e 20 70 56 66 73 2d 3e 78 44 6c 53  eturn pVfs->xDlS
5210: 79 6d 28 70 56 66 73 2c 20 70 48 2c 20 7a 53 79  ym(pVfs, pH, zSy
5220: 6d 29 3b 0a 7d 0a 73 74 61 74 69 63 20 76 6f 69  m);.}.static voi
5230: 64 20 63 66 44 6c 43 6c 6f 73 65 28 73 71 6c 69  d cfDlClose(sqli
5240: 74 65 33 5f 76 66 73 20 2a 70 43 66 56 66 73 2c  te3_vfs *pCfVfs,
5250: 20 76 6f 69 64 20 2a 70 48 61 6e 64 6c 65 29 7b   void *pHandle){
5260: 0a 20 20 73 71 6c 69 74 65 33 5f 76 66 73 20 2a  .  sqlite3_vfs *
5270: 70 56 66 73 20 3d 20 28 73 71 6c 69 74 65 33 5f  pVfs = (sqlite3_
5280: 76 66 73 20 2a 29 70 43 66 56 66 73 2d 3e 70 41  vfs *)pCfVfs->pA
5290: 70 70 44 61 74 61 3b 0a 20 20 70 56 66 73 2d 3e  ppData;.  pVfs->
52a0: 78 44 6c 43 6c 6f 73 65 28 70 56 66 73 2c 20 70  xDlClose(pVfs, p
52b0: 48 61 6e 64 6c 65 29 3b 0a 7d 0a 73 74 61 74 69  Handle);.}.stati
52c0: 63 20 69 6e 74 20 63 66 52 61 6e 64 6f 6d 6e 65  c int cfRandomne
52d0: 73 73 28 73 71 6c 69 74 65 33 5f 76 66 73 20 2a  ss(sqlite3_vfs *
52e0: 70 43 66 56 66 73 2c 20 69 6e 74 20 6e 42 79 74  pCfVfs, int nByt
52f0: 65 2c 20 63 68 61 72 20 2a 7a 42 75 66 4f 75 74  e, char *zBufOut
5300: 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f 76 66 73  ){.  sqlite3_vfs
5310: 20 2a 70 56 66 73 20 3d 20 28 73 71 6c 69 74 65   *pVfs = (sqlite
5320: 33 5f 76 66 73 20 2a 29 70 43 66 56 66 73 2d 3e  3_vfs *)pCfVfs->
5330: 70 41 70 70 44 61 74 61 3b 0a 20 20 72 65 74 75  pAppData;.  retu
5340: 72 6e 20 70 56 66 73 2d 3e 78 52 61 6e 64 6f 6d  rn pVfs->xRandom
5350: 6e 65 73 73 28 70 56 66 73 2c 20 6e 42 79 74 65  ness(pVfs, nByte
5360: 2c 20 7a 42 75 66 4f 75 74 29 3b 0a 7d 0a 73 74  , zBufOut);.}.st
5370: 61 74 69 63 20 69 6e 74 20 63 66 53 6c 65 65 70  atic int cfSleep
5380: 28 73 71 6c 69 74 65 33 5f 76 66 73 20 2a 70 43  (sqlite3_vfs *pC
5390: 66 56 66 73 2c 20 69 6e 74 20 6e 4d 69 63 72 6f  fVfs, int nMicro
53a0: 29 7b 0a 20 20 73 71 6c 69 74 65 33 5f 76 66 73  ){.  sqlite3_vfs
53b0: 20 2a 70 56 66 73 20 3d 20 28 73 71 6c 69 74 65   *pVfs = (sqlite
53c0: 33 5f 76 66 73 20 2a 29 70 43 66 56 66 73 2d 3e  3_vfs *)pCfVfs->
53d0: 70 41 70 70 44 61 74 61 3b 0a 20 20 72 65 74 75  pAppData;.  retu
53e0: 72 6e 20 70 56 66 73 2d 3e 78 53 6c 65 65 70 28  rn pVfs->xSleep(
53f0: 70 56 66 73 2c 20 6e 4d 69 63 72 6f 29 3b 0a 7d  pVfs, nMicro);.}
5400: 0a 73 74 61 74 69 63 20 69 6e 74 20 63 66 43 75  .static int cfCu
5410: 72 72 65 6e 74 54 69 6d 65 28 73 71 6c 69 74 65  rrentTime(sqlite
5420: 33 5f 76 66 73 20 2a 70 43 66 56 66 73 2c 20 64  3_vfs *pCfVfs, d
5430: 6f 75 62 6c 65 20 2a 70 54 69 6d 65 4f 75 74 29  ouble *pTimeOut)
5440: 7b 0a 20 20 73 71 6c 69 74 65 33 5f 76 66 73 20  {.  sqlite3_vfs 
5450: 2a 70 56 66 73 20 3d 20 28 73 71 6c 69 74 65 33  *pVfs = (sqlite3
5460: 5f 76 66 73 20 2a 29 70 43 66 56 66 73 2d 3e 70  _vfs *)pCfVfs->p
5470: 41 70 70 44 61 74 61 3b 0a 20 20 72 65 74 75 72  AppData;.  retur
5480: 6e 20 70 56 66 73 2d 3e 78 43 75 72 72 65 6e 74  n pVfs->xCurrent
5490: 54 69 6d 65 28 70 56 66 73 2c 20 70 54 69 6d 65  Time(pVfs, pTime
54a0: 4f 75 74 29 3b 0a 7d 0a 0a 73 74 61 74 69 63 20  Out);.}..static 
54b0: 69 6e 74 20 70 72 6f 63 65 73 73 44 65 76 53 79  int processDevSy
54c0: 6d 41 72 67 73 28 0a 20 20 54 63 6c 5f 49 6e 74  mArgs(.  Tcl_Int
54d0: 65 72 70 20 2a 69 6e 74 65 72 70 2c 0a 20 20 69  erp *interp,.  i
54e0: 6e 74 20 6f 62 6a 63 2c 0a 20 20 54 63 6c 5f 4f  nt objc,.  Tcl_O
54f0: 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d  bj *CONST objv[]
5500: 2c 0a 20 20 69 6e 74 20 2a 70 69 44 65 76 69 63  ,.  int *piDevic
5510: 65 43 68 61 72 2c 0a 20 20 69 6e 74 20 2a 70 69  eChar,.  int *pi
5520: 53 65 63 74 6f 72 53 69 7a 65 0a 29 7b 0a 20 20  SectorSize.){.  
5530: 73 74 72 75 63 74 20 44 65 76 69 63 65 46 6c 61  struct DeviceFla
5540: 67 20 7b 0a 20 20 20 20 63 68 61 72 20 2a 7a 4e  g {.    char *zN
5550: 61 6d 65 3b 0a 20 20 20 20 69 6e 74 20 69 56 61  ame;.    int iVa
5560: 6c 75 65 3b 0a 20 20 7d 20 61 46 6c 61 67 5b 5d  lue;.  } aFlag[]
5570: 20 3d 20 7b 0a 20 20 20 20 7b 20 22 61 74 6f 6d   = {.    { "atom
5580: 69 63 22 2c 20 20 20 20 20 20 53 51 4c 49 54 45  ic",      SQLITE
5590: 5f 49 4f 43 41 50 5f 41 54 4f 4d 49 43 20 20 20  _IOCAP_ATOMIC   
55a0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 61 74 6f     },.    { "ato
55b0: 6d 69 63 35 31 32 22 2c 20 20 20 53 51 4c 49 54  mic512",   SQLIT
55c0: 45 5f 49 4f 43 41 50 5f 41 54 4f 4d 49 43 35 31  E_IOCAP_ATOMIC51
55d0: 32 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 61 74  2   },.    { "at
55e0: 6f 6d 69 63 31 6b 22 2c 20 20 20 20 53 51 4c 49  omic1k",    SQLI
55f0: 54 45 5f 49 4f 43 41 50 5f 41 54 4f 4d 49 43 31  TE_IOCAP_ATOMIC1
5600: 4b 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 61  K    },.    { "a
5610: 74 6f 6d 69 63 32 6b 22 2c 20 20 20 20 53 51 4c  tomic2k",    SQL
5620: 49 54 45 5f 49 4f 43 41 50 5f 41 54 4f 4d 49 43  ITE_IOCAP_ATOMIC
5630: 32 4b 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22  2K    },.    { "
5640: 61 74 6f 6d 69 63 34 6b 22 2c 20 20 20 20 53 51  atomic4k",    SQ
5650: 4c 49 54 45 5f 49 4f 43 41 50 5f 41 54 4f 4d 49  LITE_IOCAP_ATOMI
5660: 43 34 4b 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20  C4K    },.    { 
5670: 22 61 74 6f 6d 69 63 38 6b 22 2c 20 20 20 20 53  "atomic8k",    S
5680: 51 4c 49 54 45 5f 49 4f 43 41 50 5f 41 54 4f 4d  QLITE_IOCAP_ATOM
5690: 49 43 38 4b 20 20 20 20 7d 2c 0a 20 20 20 20 7b  IC8K    },.    {
56a0: 20 22 61 74 6f 6d 69 63 31 36 6b 22 2c 20 20 20   "atomic16k",   
56b0: 53 51 4c 49 54 45 5f 49 4f 43 41 50 5f 41 54 4f  SQLITE_IOCAP_ATO
56c0: 4d 49 43 31 36 4b 20 20 20 7d 2c 0a 20 20 20 20  MIC16K   },.    
56d0: 7b 20 22 61 74 6f 6d 69 63 33 32 6b 22 2c 20 20  { "atomic32k",  
56e0: 20 53 51 4c 49 54 45 5f 49 4f 43 41 50 5f 41 54   SQLITE_IOCAP_AT
56f0: 4f 4d 49 43 33 32 4b 20 20 20 7d 2c 0a 20 20 20  OMIC32K   },.   
5700: 20 7b 20 22 61 74 6f 6d 69 63 36 34 6b 22 2c 20   { "atomic64k", 
5710: 20 20 53 51 4c 49 54 45 5f 49 4f 43 41 50 5f 41    SQLITE_IOCAP_A
5720: 54 4f 4d 49 43 36 34 4b 20 20 20 7d 2c 0a 20 20  TOMIC64K   },.  
5730: 20 20 7b 20 22 73 65 71 75 65 6e 74 69 61 6c 22    { "sequential"
5740: 2c 20 20 53 51 4c 49 54 45 5f 49 4f 43 41 50 5f  ,  SQLITE_IOCAP_
5750: 53 45 51 55 45 4e 54 49 41 4c 20 20 7d 2c 0a 20  SEQUENTIAL  },. 
5760: 20 20 20 7b 20 22 73 61 66 65 5f 61 70 70 65 6e     { "safe_appen
5770: 64 22 2c 20 53 51 4c 49 54 45 5f 49 4f 43 41 50  d", SQLITE_IOCAP
5780: 5f 53 41 46 45 5f 41 50 50 45 4e 44 20 7d 2c 0a  _SAFE_APPEND },.
5790: 20 20 20 20 7b 20 30 2c 20 30 20 7d 0a 20 20 7d      { 0, 0 }.  }
57a0: 3b 0a 0a 20 20 69 6e 74 20 69 3b 0a 20 20 69 6e  ;..  int i;.  in
57b0: 74 20 69 44 63 20 3d 20 30 3b 0a 20 20 69 6e 74  t iDc = 0;.  int
57c0: 20 69 53 65 63 74 6f 72 53 69 7a 65 20 3d 20 30   iSectorSize = 0
57d0: 3b 0a 20 20 69 6e 74 20 73 65 74 53 65 63 74 6f  ;.  int setSecto
57e0: 72 73 69 7a 65 20 3d 20 30 3b 0a 20 20 69 6e 74  rsize = 0;.  int
57f0: 20 73 65 74 44 65 76 69 63 65 43 68 61 72 20 3d   setDeviceChar =
5800: 20 30 3b 0a 0a 20 20 66 6f 72 28 69 3d 30 3b 20   0;..  for(i=0; 
5810: 69 3c 6f 62 6a 63 3b 20 69 2b 3d 32 29 7b 0a 20  i<objc; i+=2){. 
5820: 20 20 20 69 6e 74 20 6e 4f 70 74 3b 0a 20 20 20     int nOpt;.   
5830: 20 63 68 61 72 20 2a 7a 4f 70 74 20 3d 20 54 63   char *zOpt = Tc
5840: 6c 5f 47 65 74 53 74 72 69 6e 67 46 72 6f 6d 4f  l_GetStringFromO
5850: 62 6a 28 6f 62 6a 76 5b 69 5d 2c 20 26 6e 4f 70  bj(objv[i], &nOp
5860: 74 29 3b 0a 0a 20 20 20 20 69 66 28 20 28 6e 4f  t);..    if( (nO
5870: 70 74 3e 31 31 20 7c 7c 20 6e 4f 70 74 3c 32 20  pt>11 || nOpt<2 
5880: 7c 7c 20 73 74 72 6e 63 6d 70 28 22 2d 73 65 63  || strncmp("-sec
5890: 74 6f 72 73 69 7a 65 22 2c 20 7a 4f 70 74 2c 20  torsize", zOpt, 
58a0: 6e 4f 70 74 29 29 20 0a 20 20 20 20 20 26 26 20  nOpt)) .     && 
58b0: 28 6e 4f 70 74 3e 31 36 20 7c 7c 20 6e 4f 70 74  (nOpt>16 || nOpt
58c0: 3c 32 20 7c 7c 20 73 74 72 6e 63 6d 70 28 22 2d  <2 || strncmp("-
58d0: 63 68 61 72 61 63 74 65 72 69 73 74 69 63 73 22  characteristics"
58e0: 2c 20 7a 4f 70 74 2c 20 6e 4f 70 74 29 29 0a 20  , zOpt, nOpt)). 
58f0: 20 20 20 29 7b 0a 20 20 20 20 20 20 54 63 6c 5f     ){.      Tcl_
5900: 41 70 70 65 6e 64 52 65 73 75 6c 74 28 69 6e 74  AppendResult(int
5910: 65 72 70 2c 20 0a 20 20 20 20 20 20 20 20 22 42  erp, .        "B
5920: 61 64 20 6f 70 74 69 6f 6e 3a 20 5c 22 22 2c 20  ad option: \"", 
5930: 7a 4f 70 74 2c 20 0a 20 20 20 20 20 20 20 20 22  zOpt, .        "
5940: 5c 22 20 2d 20 6d 75 73 74 20 62 65 20 5c 22 2d  \" - must be \"-
5950: 63 68 61 72 61 63 74 65 72 69 73 74 69 63 73 5c  characteristics\
5960: 22 20 6f 72 20 5c 22 2d 73 65 63 74 6f 72 73 69  " or \"-sectorsi
5970: 7a 65 5c 22 22 2c 20 30 0a 20 20 20 20 20 20 29  ze\"", 0.      )
5980: 3b 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 54  ;.      return T
5990: 43 4c 5f 45 52 52 4f 52 3b 0a 20 20 20 20 7d 0a  CL_ERROR;.    }.
59a0: 20 20 20 20 69 66 28 20 69 3d 3d 6f 62 6a 63 2d      if( i==objc-
59b0: 31 20 29 7b 0a 20 20 20 20 20 20 54 63 6c 5f 41  1 ){.      Tcl_A
59c0: 70 70 65 6e 64 52 65 73 75 6c 74 28 69 6e 74 65  ppendResult(inte
59d0: 72 70 2c 20 22 4f 70 74 69 6f 6e 20 72 65 71 75  rp, "Option requ
59e0: 69 72 65 73 20 61 6e 20 61 72 67 75 6d 65 6e 74  ires an argument
59f0: 3a 20 5c 22 22 2c 20 7a 4f 70 74 2c 20 22 5c 22  : \"", zOpt, "\"
5a00: 22 2c 30 29 3b 0a 20 20 20 20 20 20 72 65 74 75  ",0);.      retu
5a10: 72 6e 20 54 43 4c 5f 45 52 52 4f 52 3b 0a 20 20  rn TCL_ERROR;.  
5a20: 20 20 7d 0a 0a 20 20 20 20 69 66 28 20 7a 4f 70    }..    if( zOp
5a30: 74 5b 31 5d 3d 3d 27 73 27 20 29 7b 0a 20 20 20  t[1]=='s' ){.   
5a40: 20 20 20 69 66 28 20 54 63 6c 5f 47 65 74 49 6e     if( Tcl_GetIn
5a50: 74 46 72 6f 6d 4f 62 6a 28 69 6e 74 65 72 70 2c  tFromObj(interp,
5a60: 20 6f 62 6a 76 5b 69 2b 31 5d 2c 20 26 69 53 65   objv[i+1], &iSe
5a70: 63 74 6f 72 53 69 7a 65 29 20 29 7b 0a 20 20 20  ctorSize) ){.   
5a80: 20 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f       return TCL_
5a90: 45 52 52 4f 52 3b 0a 20 20 20 20 20 20 7d 0a 20  ERROR;.      }. 
5aa0: 20 20 20 20 20 73 65 74 53 65 63 74 6f 72 73 69       setSectorsi
5ab0: 7a 65 20 3d 20 31 3b 0a 20 20 20 20 7d 65 6c 73  ze = 1;.    }els
5ac0: 65 7b 0a 20 20 20 20 20 20 69 6e 74 20 6a 3b 0a  e{.      int j;.
5ad0: 20 20 20 20 20 20 54 63 6c 5f 4f 62 6a 20 2a 2a        Tcl_Obj **
5ae0: 61 70 4f 62 6a 3b 0a 20 20 20 20 20 20 69 6e 74  apObj;.      int
5af0: 20 6e 4f 62 6a 3b 0a 20 20 20 20 20 20 69 66 28   nObj;.      if(
5b00: 20 54 63 6c 5f 4c 69 73 74 4f 62 6a 47 65 74 45   Tcl_ListObjGetE
5b10: 6c 65 6d 65 6e 74 73 28 69 6e 74 65 72 70 2c 20  lements(interp, 
5b20: 6f 62 6a 76 5b 69 2b 31 5d 2c 20 26 6e 4f 62 6a  objv[i+1], &nObj
5b30: 2c 20 26 61 70 4f 62 6a 29 20 29 7b 0a 20 20 20  , &apObj) ){.   
5b40: 20 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f       return TCL_
5b50: 45 52 52 4f 52 3b 0a 20 20 20 20 20 20 7d 0a 20  ERROR;.      }. 
5b60: 20 20 20 20 20 66 6f 72 28 6a 3d 30 3b 20 6a 3c       for(j=0; j<
5b70: 6e 4f 62 6a 3b 20 6a 2b 2b 29 7b 0a 20 20 20 20  nObj; j++){.    
5b80: 20 20 20 20 69 6e 74 20 72 63 3b 0a 20 20 20 20      int rc;.    
5b90: 20 20 20 20 69 6e 74 20 69 43 68 6f 69 63 65 3b      int iChoice;
5ba0: 0a 20 20 20 20 20 20 20 20 54 63 6c 5f 4f 62 6a  .        Tcl_Obj
5bb0: 20 2a 70 46 6c 61 67 20 3d 20 54 63 6c 5f 44 75   *pFlag = Tcl_Du
5bc0: 70 6c 69 63 61 74 65 4f 62 6a 28 61 70 4f 62 6a  plicateObj(apObj
5bd0: 5b 6a 5d 29 3b 0a 20 20 20 20 20 20 20 20 54 63  [j]);.        Tc
5be0: 6c 5f 49 6e 63 72 52 65 66 43 6f 75 6e 74 28 70  l_IncrRefCount(p
5bf0: 46 6c 61 67 29 3b 0a 20 20 20 20 20 20 20 20 54  Flag);.        T
5c00: 63 6c 5f 55 74 66 54 6f 4c 6f 77 65 72 28 54 63  cl_UtfToLower(Tc
5c10: 6c 5f 47 65 74 53 74 72 69 6e 67 28 70 46 6c 61  l_GetString(pFla
5c20: 67 29 29 3b 0a 20 0a 20 20 20 20 20 20 20 20 72  g));. .        r
5c30: 63 20 3d 20 54 63 6c 5f 47 65 74 49 6e 64 65 78  c = Tcl_GetIndex
5c40: 46 72 6f 6d 4f 62 6a 53 74 72 75 63 74 28 0a 20  FromObjStruct(. 
5c50: 20 20 20 20 20 20 20 20 20 20 20 69 6e 74 65 72             inter
5c60: 70 2c 20 70 46 6c 61 67 2c 20 61 46 6c 61 67 2c  p, pFlag, aFlag,
5c70: 20 73 69 7a 65 6f 66 28 61 46 6c 61 67 5b 30 5d   sizeof(aFlag[0]
5c80: 29 2c 20 22 6e 6f 20 73 75 63 68 20 66 6c 61 67  ), "no such flag
5c90: 22 2c 20 30 2c 20 26 69 43 68 6f 69 63 65 0a 20  ", 0, &iChoice. 
5ca0: 20 20 20 20 20 20 20 29 3b 0a 20 20 20 20 20 20         );.      
5cb0: 20 20 54 63 6c 5f 44 65 63 72 52 65 66 43 6f 75    Tcl_DecrRefCou
5cc0: 6e 74 28 70 46 6c 61 67 29 3b 0a 20 20 20 20 20  nt(pFlag);.     
5cd0: 20 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20 20     if( rc ){.   
5ce0: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 54 43         return TC
5cf0: 4c 5f 45 52 52 4f 52 3b 0a 20 20 20 20 20 20 20  L_ERROR;.       
5d00: 20 7d 0a 0a 20 20 20 20 20 20 20 20 69 44 63 20   }..        iDc 
5d10: 7c 3d 20 61 46 6c 61 67 5b 69 43 68 6f 69 63 65  |= aFlag[iChoice
5d20: 5d 2e 69 56 61 6c 75 65 3b 0a 20 20 20 20 20 20  ].iValue;.      
5d30: 7d 0a 20 20 20 20 20 20 73 65 74 44 65 76 69 63  }.      setDevic
5d40: 65 43 68 61 72 20 3d 20 31 3b 0a 20 20 20 20 7d  eChar = 1;.    }
5d50: 0a 20 20 7d 0a 0a 20 20 69 66 28 20 73 65 74 44  .  }..  if( setD
5d60: 65 76 69 63 65 43 68 61 72 20 29 7b 0a 20 20 20  eviceChar ){.   
5d70: 20 2a 70 69 44 65 76 69 63 65 43 68 61 72 20 3d   *piDeviceChar =
5d80: 20 69 44 63 3b 0a 20 20 7d 0a 20 20 69 66 28 20   iDc;.  }.  if( 
5d90: 73 65 74 53 65 63 74 6f 72 73 69 7a 65 20 29 7b  setSectorsize ){
5da0: 0a 20 20 20 20 2a 70 69 53 65 63 74 6f 72 53 69  .    *piSectorSi
5db0: 7a 65 20 3d 20 69 53 65 63 74 6f 72 53 69 7a 65  ze = iSectorSize
5dc0: 3b 0a 20 20 7d 0a 0a 20 20 72 65 74 75 72 6e 20  ;.  }..  return 
5dd0: 54 43 4c 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  TCL_OK;.}../*.**
5de0: 20 74 63 6c 63 6d 64 3a 20 20 20 73 71 6c 69 74   tclcmd:   sqlit
5df0: 65 5f 63 72 61 73 68 5f 65 6e 61 62 6c 65 20 45  e_crash_enable E
5e00: 4e 41 42 4c 45 0a 2a 2a 0a 2a 2a 20 50 61 72 61  NABLE.**.** Para
5e10: 6d 65 74 65 72 20 45 4e 41 42 4c 45 20 6d 75 73  meter ENABLE mus
5e20: 74 20 62 65 20 61 20 62 6f 6f 6c 65 61 6e 20 76  t be a boolean v
5e30: 61 6c 75 65 2e 20 49 66 20 74 72 75 65 2c 20 74  alue. If true, t
5e40: 68 65 6e 20 74 68 65 20 22 63 72 61 73 68 22 0a  hen the "crash".
5e50: 2a 2a 20 76 66 73 20 69 73 20 61 64 64 65 64 20  ** vfs is added 
5e60: 74 6f 20 74 68 65 20 73 79 73 74 65 6d 2e 20 49  to the system. I
5e70: 66 20 66 61 6c 73 65 2c 20 69 74 20 69 73 20 72  f false, it is r
5e80: 65 6d 6f 76 65 64 2e 0a 2a 2f 0a 73 74 61 74 69  emoved..*/.stati
5e90: 63 20 69 6e 74 20 63 72 61 73 68 45 6e 61 62 6c  c int crashEnabl
5ea0: 65 43 6d 64 28 0a 20 20 76 6f 69 64 20 2a 20 63  eCmd(.  void * c
5eb0: 6c 69 65 6e 74 44 61 74 61 2c 0a 20 20 54 63 6c  lientData,.  Tcl
5ec0: 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65 72 70 2c  _Interp *interp,
5ed0: 0a 20 20 69 6e 74 20 6f 62 6a 63 2c 0a 20 20 54  .  int objc,.  T
5ee0: 63 6c 5f 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f 62  cl_Obj *CONST ob
5ef0: 6a 76 5b 5d 0a 29 7b 0a 20 20 69 6e 74 20 69 73  jv[].){.  int is
5f00: 45 6e 61 62 6c 65 3b 0a 20 20 73 74 61 74 69 63  Enable;.  static
5f10: 20 73 71 6c 69 74 65 33 5f 76 66 73 20 63 72 61   sqlite3_vfs cra
5f20: 73 68 56 66 73 20 3d 20 7b 0a 20 20 20 20 32 2c  shVfs = {.    2,
5f30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5f40: 20 20 2f 2a 20 69 56 65 72 73 69 6f 6e 20 2a 2f    /* iVersion */
5f50: 0a 20 20 20 20 30 2c 20 20 20 20 20 20 20 20 20  .    0,         
5f60: 20 20 20 20 20 20 20 20 20 2f 2a 20 73 7a 4f 73           /* szOs
5f70: 46 69 6c 65 20 2a 2f 0a 20 20 20 20 30 2c 20 20  File */.    0,  
5f80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5f90: 2f 2a 20 6d 78 50 61 74 68 6e 61 6d 65 20 2a 2f  /* mxPathname */
5fa0: 0a 20 20 20 20 30 2c 20 20 20 20 20 20 20 20 20  .    0,         
5fb0: 20 20 20 20 20 20 20 20 20 2f 2a 20 70 4e 65 78           /* pNex
5fc0: 74 20 2a 2f 0a 20 20 20 20 22 63 72 61 73 68 22  t */.    "crash"
5fd0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20  ,            /* 
5fe0: 7a 4e 61 6d 65 20 2a 2f 0a 20 20 20 20 30 2c 20  zName */.    0, 
5ff0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6000: 20 2f 2a 20 70 41 70 70 44 61 74 61 20 2a 2f 0a   /* pAppData */.
6010: 20 20 0a 20 20 20 20 63 66 4f 70 65 6e 2c 20 20    .    cfOpen,  
6020: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
6030: 78 4f 70 65 6e 20 2a 2f 0a 20 20 20 20 63 66 44  xOpen */.    cfD
6040: 65 6c 65 74 65 2c 20 20 20 20 20 20 20 20 20 20  elete,          
6050: 20 20 20 2f 2a 20 78 44 65 6c 65 74 65 20 2a 2f     /* xDelete */
6060: 0a 20 20 20 20 63 66 41 63 63 65 73 73 2c 20 20  .    cfAccess,  
6070: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 78 41             /* xA
6080: 63 63 65 73 73 20 2a 2f 0a 20 20 20 20 63 66 46  ccess */.    cfF
6090: 75 6c 6c 50 61 74 68 6e 61 6d 65 2c 20 20 20 20  ullPathname,    
60a0: 20 20 20 2f 2a 20 78 46 75 6c 6c 50 61 74 68 6e     /* xFullPathn
60b0: 61 6d 65 20 2a 2f 0a 20 20 20 20 63 66 44 6c 4f  ame */.    cfDlO
60c0: 70 65 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20  pen,            
60d0: 20 2f 2a 20 78 44 6c 4f 70 65 6e 20 2a 2f 0a 20   /* xDlOpen */. 
60e0: 20 20 20 63 66 44 6c 45 72 72 6f 72 2c 20 20 20     cfDlError,   
60f0: 20 20 20 20 20 20 20 20 20 2f 2a 20 78 44 6c 45           /* xDlE
6100: 72 72 6f 72 20 2a 2f 0a 20 20 20 20 63 66 44 6c  rror */.    cfDl
6110: 53 79 6d 2c 20 20 20 20 20 20 20 20 20 20 20 20  Sym,            
6120: 20 20 2f 2a 20 78 44 6c 53 79 6d 20 2a 2f 0a 20    /* xDlSym */. 
6130: 20 20 20 63 66 44 6c 43 6c 6f 73 65 2c 20 20 20     cfDlClose,   
6140: 20 20 20 20 20 20 20 20 20 2f 2a 20 78 44 6c 43           /* xDlC
6150: 6c 6f 73 65 20 2a 2f 0a 20 20 20 20 63 66 52 61  lose */.    cfRa
6160: 6e 64 6f 6d 6e 65 73 73 2c 20 20 20 20 20 20 20  ndomness,       
6170: 20 20 2f 2a 20 78 52 61 6e 64 6f 6d 6e 65 73 73    /* xRandomness
6180: 20 2a 2f 0a 20 20 20 20 63 66 53 6c 65 65 70 2c   */.    cfSleep,
6190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
61a0: 20 78 53 6c 65 65 70 20 2a 2f 0a 20 20 20 20 63   xSleep */.    c
61b0: 66 43 75 72 72 65 6e 74 54 69 6d 65 2c 20 20 20  fCurrentTime,   
61c0: 20 20 20 20 20 2f 2a 20 78 43 75 72 72 65 6e 74       /* xCurrent
61d0: 54 69 6d 65 20 2a 2f 0a 20 20 20 20 30 2c 20 20  Time */.    0,  
61e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
61f0: 20 20 2f 2a 20 78 47 65 74 6c 61 73 74 45 72 72    /* xGetlastErr
6200: 6f 72 20 2a 2f 0a 20 20 20 20 30 2c 20 20 20 20  or */.    0,    
6210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6220: 2f 2a 20 78 43 75 72 72 65 6e 74 54 69 6d 65 49  /* xCurrentTimeI
6230: 6e 74 36 34 20 2a 2f 0a 20 20 7d 3b 0a 0a 20 20  nt64 */.  };..  
6240: 69 66 28 20 6f 62 6a 63 21 3d 32 20 29 7b 0a 20  if( objc!=2 ){. 
6250: 20 20 20 54 63 6c 5f 57 72 6f 6e 67 4e 75 6d 41     Tcl_WrongNumA
6260: 72 67 73 28 69 6e 74 65 72 70 2c 20 31 2c 20 6f  rgs(interp, 1, o
6270: 62 6a 76 2c 20 22 45 4e 41 42 4c 45 22 29 3b 0a  bjv, "ENABLE");.
6280: 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f 45      return TCL_E
6290: 52 52 4f 52 3b 0a 20 20 7d 0a 0a 20 20 69 66 28  RROR;.  }..  if(
62a0: 20 54 63 6c 5f 47 65 74 42 6f 6f 6c 65 61 6e 46   Tcl_GetBooleanF
62b0: 72 6f 6d 4f 62 6a 28 69 6e 74 65 72 70 2c 20 6f  romObj(interp, o
62c0: 62 6a 76 5b 31 5d 2c 20 26 69 73 45 6e 61 62 6c  bjv[1], &isEnabl
62d0: 65 29 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e  e) ){.    return
62e0: 20 54 43 4c 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a   TCL_ERROR;.  }.
62f0: 0a 20 20 69 66 28 20 28 69 73 45 6e 61 62 6c 65  .  if( (isEnable
6300: 20 26 26 20 63 72 61 73 68 56 66 73 2e 70 41 70   && crashVfs.pAp
6310: 70 44 61 74 61 29 20 7c 7c 20 28 21 69 73 45 6e  pData) || (!isEn
6320: 61 62 6c 65 20 26 26 20 21 63 72 61 73 68 56 66  able && !crashVf
6330: 73 2e 70 41 70 70 44 61 74 61 29 20 29 7b 0a 20  s.pAppData) ){. 
6340: 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f 4f 4b     return TCL_OK
6350: 3b 0a 20 20 7d 0a 0a 20 20 69 66 28 20 63 72 61  ;.  }..  if( cra
6360: 73 68 56 66 73 2e 70 41 70 70 44 61 74 61 3d 3d  shVfs.pAppData==
6370: 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  0 ){.    sqlite3
6380: 5f 76 66 73 20 2a 70 4f 72 69 67 69 6e 61 6c 56  _vfs *pOriginalV
6390: 66 73 20 3d 20 73 71 6c 69 74 65 33 5f 76 66 73  fs = sqlite3_vfs
63a0: 5f 66 69 6e 64 28 30 29 3b 0a 20 20 20 20 63 72  _find(0);.    cr
63b0: 61 73 68 56 66 73 2e 6d 78 50 61 74 68 6e 61 6d  ashVfs.mxPathnam
63c0: 65 20 3d 20 70 4f 72 69 67 69 6e 61 6c 56 66 73  e = pOriginalVfs
63d0: 2d 3e 6d 78 50 61 74 68 6e 61 6d 65 3b 0a 20 20  ->mxPathname;.  
63e0: 20 20 63 72 61 73 68 56 66 73 2e 70 41 70 70 44    crashVfs.pAppD
63f0: 61 74 61 20 3d 20 28 76 6f 69 64 20 2a 29 70 4f  ata = (void *)pO
6400: 72 69 67 69 6e 61 6c 56 66 73 3b 0a 20 20 20 20  riginalVfs;.    
6410: 63 72 61 73 68 56 66 73 2e 73 7a 4f 73 46 69 6c  crashVfs.szOsFil
6420: 65 20 3d 20 73 69 7a 65 6f 66 28 43 72 61 73 68  e = sizeof(Crash
6430: 46 69 6c 65 29 20 2b 20 70 4f 72 69 67 69 6e 61  File) + pOrigina
6440: 6c 56 66 73 2d 3e 73 7a 4f 73 46 69 6c 65 3b 0a  lVfs->szOsFile;.
6450: 20 20 20 20 73 71 6c 69 74 65 33 5f 76 66 73 5f      sqlite3_vfs_
6460: 72 65 67 69 73 74 65 72 28 26 63 72 61 73 68 56  register(&crashV
6470: 66 73 2c 20 30 29 3b 0a 20 20 7d 65 6c 73 65 7b  fs, 0);.  }else{
6480: 0a 20 20 20 20 63 72 61 73 68 56 66 73 2e 70 41  .    crashVfs.pA
6490: 70 70 44 61 74 61 20 3d 20 30 3b 0a 20 20 20 20  ppData = 0;.    
64a0: 73 71 6c 69 74 65 33 5f 76 66 73 5f 75 6e 72 65  sqlite3_vfs_unre
64b0: 67 69 73 74 65 72 28 26 63 72 61 73 68 56 66 73  gister(&crashVfs
64c0: 29 3b 0a 20 20 7d 0a 0a 20 20 72 65 74 75 72 6e  );.  }..  return
64d0: 20 54 43 4c 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a   TCL_OK;.}../*.*
64e0: 2a 20 74 63 6c 63 6d 64 3a 20 20 20 73 71 6c 69  * tclcmd:   sqli
64f0: 74 65 5f 63 72 61 73 68 70 61 72 61 6d 73 20 3f  te_crashparams ?
6500: 4f 50 54 49 4f 4e 53 3f 20 44 45 4c 41 59 20 43  OPTIONS? DELAY C
6510: 52 41 53 48 46 49 4c 45 0a 2a 2a 0a 2a 2a 20 54  RASHFILE.**.** T
6520: 68 69 73 20 70 72 6f 63 65 64 75 72 65 20 69 6d  his procedure im
6530: 70 6c 65 6d 65 6e 74 73 20 61 20 54 43 4c 20 63  plements a TCL c
6540: 6f 6d 6d 61 6e 64 20 74 68 61 74 20 65 6e 61 62  ommand that enab
6550: 6c 65 73 20 63 72 61 73 68 20 74 65 73 74 69 6e  les crash testin
6560: 67 0a 2a 2a 20 69 6e 20 74 65 73 74 66 69 78 74  g.** in testfixt
6570: 75 72 65 2e 20 20 4f 6e 63 65 20 65 6e 61 62 6c  ure.  Once enabl
6580: 65 64 2c 20 63 72 61 73 68 20 74 65 73 74 69 6e  ed, crash testin
6590: 67 20 63 61 6e 6e 6f 74 20 62 65 20 64 69 73 61  g cannot be disa
65a0: 62 6c 65 64 2e 0a 2a 2a 0a 2a 2a 20 41 76 61 69  bled..**.** Avai
65b0: 6c 61 62 6c 65 20 6f 70 74 69 6f 6e 73 20 61 72  lable options ar
65c0: 65 20 22 2d 63 68 61 72 61 63 74 65 72 69 73 74  e "-characterist
65d0: 69 63 73 22 20 61 6e 64 20 22 2d 73 65 63 74 6f  ics" and "-secto
65e0: 72 73 69 7a 65 22 2e 20 42 6f 74 68 20 72 65 71  rsize". Both req
65f0: 75 69 72 65 0a 2a 2a 20 61 6e 20 61 72 67 75 6d  uire.** an argum
6600: 65 6e 74 2e 20 46 6f 72 20 2d 73 65 63 74 6f 72  ent. For -sector
6610: 73 69 7a 65 2c 20 74 68 69 73 20 69 73 20 74 68  size, this is th
6620: 65 20 73 69 6d 75 6c 61 74 65 64 20 73 65 63 74  e simulated sect
6630: 6f 72 20 73 69 7a 65 20 69 6e 0a 2a 2a 20 62 79  or size in.** by
6640: 74 65 73 2e 20 46 6f 72 20 2d 63 68 61 72 61 63  tes. For -charac
6650: 74 65 72 69 73 74 69 63 73 2c 20 74 68 65 20 61  teristics, the a
6660: 72 67 75 6d 65 6e 74 20 6d 75 73 74 20 62 65 20  rgument must be 
6670: 61 20 6c 69 73 74 20 6f 66 20 69 6f 2d 63 61 70  a list of io-cap
6680: 61 62 69 6c 69 74 79 0a 2a 2a 20 66 6c 61 67 73  ability.** flags
6690: 20 74 6f 20 73 69 6d 75 6c 61 74 65 2e 20 56 61   to simulate. Va
66a0: 6c 69 64 20 66 6c 61 67 73 20 61 72 65 20 22 61  lid flags are "a
66b0: 74 6f 6d 69 63 22 2c 20 22 61 74 6f 6d 69 63 35  tomic", "atomic5
66c0: 31 32 22 2c 20 22 61 74 6f 6d 69 63 31 4b 22 2c  12", "atomic1K",
66d0: 0a 2a 2a 20 22 61 74 6f 6d 69 63 32 4b 22 2c 20  .** "atomic2K", 
66e0: 22 61 74 6f 6d 69 63 34 4b 22 2c 20 22 61 74 6f  "atomic4K", "ato
66f0: 6d 69 63 38 4b 22 2c 20 22 61 74 6f 6d 69 63 31  mic8K", "atomic1
6700: 36 4b 22 2c 20 22 61 74 6f 6d 69 63 33 32 4b 22  6K", "atomic32K"
6710: 2c 20 0a 2a 2a 20 22 61 74 6f 6d 69 63 36 34 4b  , .** "atomic64K
6720: 22 2c 20 22 73 65 71 75 65 6e 74 69 61 6c 22 20  ", "sequential" 
6730: 61 6e 64 20 22 73 61 66 65 5f 61 70 70 65 6e 64  and "safe_append
6740: 22 2e 0a 2a 2a 0a 2a 2a 20 45 78 61 6d 70 6c 65  "..**.** Example
6750: 3a 0a 2a 2a 0a 2a 2a 20 20 20 73 71 6c 69 74 65  :.**.**   sqlite
6760: 5f 63 72 61 73 68 70 61 72 61 6d 73 20 2d 73 65  _crashparams -se
6770: 63 74 20 31 30 32 34 20 2d 63 68 61 72 20 7b 61  ct 1024 -char {a
6780: 74 6f 6d 69 63 20 73 65 71 75 65 6e 74 69 61 6c  tomic sequential
6790: 7d 20 2e 2f 74 65 73 74 2e 64 62 20 31 0a 2a 2a  } ./test.db 1.**
67a0: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 63  .*/.static int c
67b0: 72 61 73 68 50 61 72 61 6d 73 4f 62 6a 43 6d 64  rashParamsObjCmd
67c0: 28 0a 20 20 76 6f 69 64 20 2a 20 63 6c 69 65 6e  (.  void * clien
67d0: 74 44 61 74 61 2c 0a 20 20 54 63 6c 5f 49 6e 74  tData,.  Tcl_Int
67e0: 65 72 70 20 2a 69 6e 74 65 72 70 2c 0a 20 20 69  erp *interp,.  i
67f0: 6e 74 20 6f 62 6a 63 2c 0a 20 20 54 63 6c 5f 4f  nt objc,.  Tcl_O
6800: 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d  bj *CONST objv[]
6810: 0a 29 7b 0a 20 20 69 6e 74 20 69 44 65 6c 61 79  .){.  int iDelay
6820: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
6830: 7a 43 72 61 73 68 46 69 6c 65 3b 0a 20 20 69 6e  zCrashFile;.  in
6840: 74 20 6e 43 72 61 73 68 46 69 6c 65 2c 20 69 44  t nCrashFile, iD
6850: 63 2c 20 69 53 65 63 74 6f 72 53 69 7a 65 3b 0a  c, iSectorSize;.
6860: 0a 20 20 69 44 63 20 3d 20 2d 31 3b 0a 20 20 69  .  iDc = -1;.  i
6870: 53 65 63 74 6f 72 53 69 7a 65 20 3d 20 2d 31 3b  SectorSize = -1;
6880: 0a 0a 20 20 69 66 28 20 6f 62 6a 63 3c 33 20 29  ..  if( objc<3 )
6890: 7b 0a 20 20 20 20 54 63 6c 5f 57 72 6f 6e 67 4e  {.    Tcl_WrongN
68a0: 75 6d 41 72 67 73 28 69 6e 74 65 72 70 2c 20 31  umArgs(interp, 1
68b0: 2c 20 6f 62 6a 76 2c 20 22 3f 4f 50 54 49 4f 4e  , objv, "?OPTION
68c0: 53 3f 20 44 45 4c 41 59 20 43 52 41 53 48 46 49  S? DELAY CRASHFI
68d0: 4c 45 22 29 3b 0a 20 20 20 20 67 6f 74 6f 20 65  LE");.    goto e
68e0: 72 72 6f 72 3b 0a 20 20 7d 0a 0a 20 20 7a 43 72  rror;.  }..  zCr
68f0: 61 73 68 46 69 6c 65 20 3d 20 54 63 6c 5f 47 65  ashFile = Tcl_Ge
6900: 74 53 74 72 69 6e 67 46 72 6f 6d 4f 62 6a 28 6f  tStringFromObj(o
6910: 62 6a 76 5b 6f 62 6a 63 2d 31 5d 2c 20 26 6e 43  bjv[objc-1], &nC
6920: 72 61 73 68 46 69 6c 65 29 3b 0a 20 20 69 66 28  rashFile);.  if(
6930: 20 6e 43 72 61 73 68 46 69 6c 65 3e 3d 73 69 7a   nCrashFile>=siz
6940: 65 6f 66 28 67 2e 7a 43 72 61 73 68 46 69 6c 65  eof(g.zCrashFile
6950: 29 20 29 7b 0a 20 20 20 20 54 63 6c 5f 41 70 70  ) ){.    Tcl_App
6960: 65 6e 64 52 65 73 75 6c 74 28 69 6e 74 65 72 70  endResult(interp
6970: 2c 20 22 46 69 6c 65 6e 61 6d 65 20 69 73 20 74  , "Filename is t
6980: 6f 6f 20 6c 6f 6e 67 3a 20 5c 22 22 2c 20 7a 43  oo long: \"", zC
6990: 72 61 73 68 46 69 6c 65 2c 20 22 5c 22 22 2c 20  rashFile, "\"", 
69a0: 30 29 3b 0a 20 20 20 20 67 6f 74 6f 20 65 72 72  0);.    goto err
69b0: 6f 72 3b 0a 20 20 7d 0a 20 20 69 66 28 20 54 63  or;.  }.  if( Tc
69c0: 6c 5f 47 65 74 49 6e 74 46 72 6f 6d 4f 62 6a 28  l_GetIntFromObj(
69d0: 69 6e 74 65 72 70 2c 20 6f 62 6a 76 5b 6f 62 6a  interp, objv[obj
69e0: 63 2d 32 5d 2c 20 26 69 44 65 6c 61 79 29 20 29  c-2], &iDelay) )
69f0: 7b 0a 20 20 20 20 67 6f 74 6f 20 65 72 72 6f 72  {.    goto error
6a00: 3b 0a 20 20 7d 0a 0a 20 20 69 66 28 20 70 72 6f  ;.  }..  if( pro
6a10: 63 65 73 73 44 65 76 53 79 6d 41 72 67 73 28 69  cessDevSymArgs(i
6a20: 6e 74 65 72 70 2c 20 6f 62 6a 63 2d 33 2c 20 26  nterp, objc-3, &
6a30: 6f 62 6a 76 5b 31 5d 2c 20 26 69 44 63 2c 20 26  objv[1], &iDc, &
6a40: 69 53 65 63 74 6f 72 53 69 7a 65 29 20 29 7b 0a  iSectorSize) ){.
6a50: 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f 45      return TCL_E
6a60: 52 52 4f 52 3b 0a 20 20 7d 0a 0a 20 20 69 66 28  RROR;.  }..  if(
6a70: 20 69 44 63 3e 3d 30 20 29 7b 0a 20 20 20 20 67   iDc>=0 ){.    g
6a80: 2e 69 44 65 76 69 63 65 43 68 61 72 61 63 74 65  .iDeviceCharacte
6a90: 72 69 73 74 69 63 73 20 3d 20 69 44 63 3b 0a 20  ristics = iDc;. 
6aa0: 20 7d 0a 20 20 69 66 28 20 69 53 65 63 74 6f 72   }.  if( iSector
6ab0: 53 69 7a 65 3e 3d 30 20 29 7b 0a 20 20 20 20 67  Size>=0 ){.    g
6ac0: 2e 69 53 65 63 74 6f 72 53 69 7a 65 20 3d 20 69  .iSectorSize = i
6ad0: 53 65 63 74 6f 72 53 69 7a 65 3b 0a 20 20 7d 0a  SectorSize;.  }.
6ae0: 0a 20 20 67 2e 69 43 72 61 73 68 20 3d 20 69 44  .  g.iCrash = iD
6af0: 65 6c 61 79 3b 0a 20 20 6d 65 6d 63 70 79 28 67  elay;.  memcpy(g
6b00: 2e 7a 43 72 61 73 68 46 69 6c 65 2c 20 7a 43 72  .zCrashFile, zCr
6b10: 61 73 68 46 69 6c 65 2c 20 6e 43 72 61 73 68 46  ashFile, nCrashF
6b20: 69 6c 65 2b 31 29 3b 0a 20 20 73 71 6c 69 74 65  ile+1);.  sqlite
6b30: 33 43 72 61 73 68 54 65 73 74 45 6e 61 62 6c 65  3CrashTestEnable
6b40: 20 3d 20 31 3b 0a 20 20 72 65 74 75 72 6e 20 54   = 1;.  return T
6b50: 43 4c 5f 4f 4b 3b 0a 0a 65 72 72 6f 72 3a 0a 20  CL_OK;..error:. 
6b60: 20 72 65 74 75 72 6e 20 54 43 4c 5f 45 52 52 4f   return TCL_ERRO
6b70: 52 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 69 6e 74  R;.}..static int
6b80: 20 64 65 76 53 79 6d 4f 62 6a 43 6d 64 28 0a 20   devSymObjCmd(. 
6b90: 20 76 6f 69 64 20 2a 20 63 6c 69 65 6e 74 44 61   void * clientDa
6ba0: 74 61 2c 0a 20 20 54 63 6c 5f 49 6e 74 65 72 70  ta,.  Tcl_Interp
6bb0: 20 2a 69 6e 74 65 72 70 2c 0a 20 20 69 6e 74 20   *interp,.  int 
6bc0: 6f 62 6a 63 2c 0a 20 20 54 63 6c 5f 4f 62 6a 20  objc,.  Tcl_Obj 
6bd0: 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d 0a 29 7b  *CONST objv[].){
6be0: 0a 20 20 76 6f 69 64 20 64 65 76 73 79 6d 5f 72  .  void devsym_r
6bf0: 65 67 69 73 74 65 72 28 69 6e 74 20 69 44 65 76  egister(int iDev
6c00: 69 63 65 43 68 61 72 2c 20 69 6e 74 20 69 53 65  iceChar, int iSe
6c10: 63 74 6f 72 53 69 7a 65 29 3b 0a 0a 20 20 69 6e  ctorSize);..  in
6c20: 74 20 69 44 63 20 3d 20 2d 31 3b 0a 20 20 69 6e  t iDc = -1;.  in
6c30: 74 20 69 53 65 63 74 6f 72 53 69 7a 65 20 3d 20  t iSectorSize = 
6c40: 2d 31 3b 0a 0a 20 20 69 66 28 20 70 72 6f 63 65  -1;..  if( proce
6c50: 73 73 44 65 76 53 79 6d 41 72 67 73 28 69 6e 74  ssDevSymArgs(int
6c60: 65 72 70 2c 20 6f 62 6a 63 2d 31 2c 20 26 6f 62  erp, objc-1, &ob
6c70: 6a 76 5b 31 5d 2c 20 26 69 44 63 2c 20 26 69 53  jv[1], &iDc, &iS
6c80: 65 63 74 6f 72 53 69 7a 65 29 20 29 7b 0a 20 20  ectorSize) ){.  
6c90: 20 20 72 65 74 75 72 6e 20 54 43 4c 5f 45 52 52    return TCL_ERR
6ca0: 4f 52 3b 0a 20 20 7d 0a 20 20 64 65 76 73 79 6d  OR;.  }.  devsym
6cb0: 5f 72 65 67 69 73 74 65 72 28 69 44 63 2c 20 69  _register(iDc, i
6cc0: 53 65 63 74 6f 72 53 69 7a 65 29 3b 0a 0a 20 20  SectorSize);..  
6cd0: 72 65 74 75 72 6e 20 54 43 4c 5f 4f 4b 3b 0a 7d  return TCL_OK;.}
6ce0: 0a 0a 2f 2a 0a 2a 2a 20 74 63 6c 63 6d 64 3a 20  ../*.** tclcmd: 
6cf0: 72 65 67 69 73 74 65 72 5f 6a 74 5f 76 66 73 20  register_jt_vfs 
6d00: 3f 2d 64 65 66 61 75 6c 74 3f 20 50 41 52 45 4e  ?-default? PAREN
6d10: 54 2d 56 46 53 0a 2a 2f 0a 73 74 61 74 69 63 20  T-VFS.*/.static 
6d20: 69 6e 74 20 6a 74 4f 62 6a 43 6d 64 28 0a 20 20  int jtObjCmd(.  
6d30: 76 6f 69 64 20 2a 20 63 6c 69 65 6e 74 44 61 74  void * clientDat
6d40: 61 2c 0a 20 20 54 63 6c 5f 49 6e 74 65 72 70 20  a,.  Tcl_Interp 
6d50: 2a 69 6e 74 65 72 70 2c 0a 20 20 69 6e 74 20 6f  *interp,.  int o
6d60: 62 6a 63 2c 0a 20 20 54 63 6c 5f 4f 62 6a 20 2a  bjc,.  Tcl_Obj *
6d70: 43 4f 4e 53 54 20 6f 62 6a 76 5b 5d 0a 29 7b 0a  CONST objv[].){.
6d80: 20 20 69 6e 74 20 6a 74 5f 72 65 67 69 73 74 65    int jt_registe
6d90: 72 28 63 68 61 72 20 2a 2c 20 69 6e 74 29 3b 0a  r(char *, int);.
6da0: 20 20 63 68 61 72 20 2a 7a 50 61 72 65 6e 74 20    char *zParent 
6db0: 3d 20 30 3b 0a 0a 20 20 69 66 28 20 6f 62 6a 63  = 0;..  if( objc
6dc0: 21 3d 32 20 26 26 20 6f 62 6a 63 21 3d 33 20 29  !=2 && objc!=3 )
6dd0: 7b 0a 20 20 20 20 54 63 6c 5f 57 72 6f 6e 67 4e  {.    Tcl_WrongN
6de0: 75 6d 41 72 67 73 28 69 6e 74 65 72 70 2c 20 31  umArgs(interp, 1
6df0: 2c 20 6f 62 6a 76 2c 20 22 3f 2d 64 65 66 61 75  , objv, "?-defau
6e00: 6c 74 3f 20 50 41 52 45 4e 54 2d 56 46 53 22 29  lt? PARENT-VFS")
6e10: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c  ;.    return TCL
6e20: 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a 20 20 7a 50  _ERROR;.  }.  zP
6e30: 61 72 65 6e 74 20 3d 20 54 63 6c 5f 47 65 74 53  arent = Tcl_GetS
6e40: 74 72 69 6e 67 28 6f 62 6a 76 5b 31 5d 29 3b 0a  tring(objv[1]);.
6e50: 20 20 69 66 28 20 6f 62 6a 63 3d 3d 33 20 29 7b    if( objc==3 ){
6e60: 0a 20 20 20 20 69 66 28 20 73 74 72 63 6d 70 28  .    if( strcmp(
6e70: 7a 50 61 72 65 6e 74 2c 20 22 2d 64 65 66 61 75  zParent, "-defau
6e80: 6c 74 22 29 20 29 7b 0a 20 20 20 20 20 20 54 63  lt") ){.      Tc
6e90: 6c 5f 41 70 70 65 6e 64 52 65 73 75 6c 74 28 69  l_AppendResult(i
6ea0: 6e 74 65 72 70 2c 20 0a 20 20 20 20 20 20 20 20  nterp, .        
6eb0: 20 20 22 62 61 64 20 6f 70 74 69 6f 6e 20 5c 22    "bad option \"
6ec0: 22 2c 20 7a 50 61 72 65 6e 74 2c 20 22 5c 22 3a  ", zParent, "\":
6ed0: 20 6d 75 73 74 20 62 65 20 2d 64 65 66 61 75 6c   must be -defaul
6ee0: 74 22 2c 20 30 0a 20 20 20 20 20 20 29 3b 0a 20  t", 0.      );. 
6ef0: 20 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c 5f       return TCL_
6f00: 45 52 52 4f 52 3b 0a 20 20 20 20 7d 0a 20 20 20  ERROR;.    }.   
6f10: 20 7a 50 61 72 65 6e 74 20 3d 20 54 63 6c 5f 47   zParent = Tcl_G
6f20: 65 74 53 74 72 69 6e 67 28 6f 62 6a 76 5b 32 5d  etString(objv[2]
6f30: 29 3b 0a 20 20 7d 0a 0a 20 20 69 66 28 20 21 28  );.  }..  if( !(
6f40: 2a 7a 50 61 72 65 6e 74 29 20 29 7b 0a 20 20 20  *zParent) ){.   
6f50: 20 7a 50 61 72 65 6e 74 20 3d 20 30 3b 0a 20 20   zParent = 0;.  
6f60: 7d 0a 20 20 69 66 28 20 6a 74 5f 72 65 67 69 73  }.  if( jt_regis
6f70: 74 65 72 28 7a 50 61 72 65 6e 74 2c 20 6f 62 6a  ter(zParent, obj
6f80: 63 3d 3d 33 29 20 29 7b 0a 20 20 20 20 54 63 6c  c==3) ){.    Tcl
6f90: 5f 41 70 70 65 6e 64 52 65 73 75 6c 74 28 69 6e  _AppendResult(in
6fa0: 74 65 72 70 2c 20 22 45 72 72 6f 72 20 69 6e 20  terp, "Error in 
6fb0: 6a 74 5f 72 65 67 69 73 74 65 72 22 2c 20 30 29  jt_register", 0)
6fc0: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 54 43 4c  ;.    return TCL
6fd0: 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a 0a 20 20 72  _ERROR;.  }..  r
6fe0: 65 74 75 72 6e 20 54 43 4c 5f 4f 4b 3b 0a 7d 0a  eturn TCL_OK;.}.
6ff0: 0a 2f 2a 0a 2a 2a 20 74 63 6c 63 6d 64 3a 20 75  ./*.** tclcmd: u
7000: 6e 72 65 67 69 73 74 65 72 5f 6a 74 5f 76 66 73  nregister_jt_vfs
7010: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 6a  .*/.static int j
7020: 74 55 6e 72 65 67 69 73 74 65 72 4f 62 6a 43 6d  tUnregisterObjCm
7030: 64 28 0a 20 20 76 6f 69 64 20 2a 20 63 6c 69 65  d(.  void * clie
7040: 6e 74 44 61 74 61 2c 0a 20 20 54 63 6c 5f 49 6e  ntData,.  Tcl_In
7050: 74 65 72 70 20 2a 69 6e 74 65 72 70 2c 0a 20 20  terp *interp,.  
7060: 69 6e 74 20 6f 62 6a 63 2c 0a 20 20 54 63 6c 5f  int objc,.  Tcl_
7070: 4f 62 6a 20 2a 43 4f 4e 53 54 20 6f 62 6a 76 5b  Obj *CONST objv[
7080: 5d 0a 29 7b 0a 20 20 76 6f 69 64 20 6a 74 5f 75  ].){.  void jt_u
7090: 6e 72 65 67 69 73 74 65 72 28 76 6f 69 64 29 3b  nregister(void);
70a0: 0a 0a 20 20 69 66 28 20 6f 62 6a 63 21 3d 31 20  ..  if( objc!=1 
70b0: 29 7b 0a 20 20 20 20 54 63 6c 5f 57 72 6f 6e 67  ){.    Tcl_Wrong
70c0: 4e 75 6d 41 72 67 73 28 69 6e 74 65 72 70 2c 20  NumArgs(interp, 
70d0: 31 2c 20 6f 62 6a 76 2c 20 22 22 29 3b 0a 20 20  1, objv, "");.  
70e0: 20 20 72 65 74 75 72 6e 20 54 43 4c 5f 45 52 52    return TCL_ERR
70f0: 4f 52 3b 0a 20 20 7d 0a 0a 20 20 6a 74 5f 75 6e  OR;.  }..  jt_un
7100: 72 65 67 69 73 74 65 72 28 29 3b 0a 20 20 72 65  register();.  re
7110: 74 75 72 6e 20 54 43 4c 5f 4f 4b 3b 0a 7d 0a 0a  turn TCL_OK;.}..
7120: 23 65 6e 64 69 66 20 2f 2a 20 53 51 4c 49 54 45  #endif /* SQLITE
7130: 5f 4f 4d 49 54 5f 44 49 53 4b 49 4f 20 2a 2f 0a  _OMIT_DISKIO */.
7140: 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 70 72 6f 63  ./*.** This proc
7150: 65 64 75 72 65 20 72 65 67 69 73 74 65 72 73 20  edure registers 
7160: 74 68 65 20 54 43 4c 20 70 72 6f 63 65 64 75 72  the TCL procedur
7170: 65 73 20 64 65 66 69 6e 65 64 20 69 6e 20 74 68  es defined in th
7180: 69 73 20 66 69 6c 65 2e 0a 2a 2f 0a 69 6e 74 20  is file..*/.int 
7190: 53 71 6c 69 74 65 74 65 73 74 36 5f 49 6e 69 74  Sqlitetest6_Init
71a0: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74  (Tcl_Interp *int
71b0: 65 72 70 29 7b 0a 23 69 66 6e 64 65 66 20 53 51  erp){.#ifndef SQ
71c0: 4c 49 54 45 5f 4f 4d 49 54 5f 44 49 53 4b 49 4f  LITE_OMIT_DISKIO
71d0: 0a 20 20 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a  .  Tcl_CreateObj
71e0: 43 6f 6d 6d 61 6e 64 28 69 6e 74 65 72 70 2c 20  Command(interp, 
71f0: 22 73 71 6c 69 74 65 33 5f 63 72 61 73 68 5f 65  "sqlite3_crash_e
7200: 6e 61 62 6c 65 22 2c 20 63 72 61 73 68 45 6e 61  nable", crashEna
7210: 62 6c 65 43 6d 64 2c 20 30 2c 20 30 29 3b 0a 20  bleCmd, 0, 0);. 
7220: 20 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a 43 6f   Tcl_CreateObjCo
7230: 6d 6d 61 6e 64 28 69 6e 74 65 72 70 2c 20 22 73  mmand(interp, "s
7240: 71 6c 69 74 65 33 5f 63 72 61 73 68 70 61 72 61  qlite3_crashpara
7250: 6d 73 22 2c 20 63 72 61 73 68 50 61 72 61 6d 73  ms", crashParams
7260: 4f 62 6a 43 6d 64 2c 20 30 2c 20 30 29 3b 0a 20  ObjCmd, 0, 0);. 
7270: 20 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a 43 6f   Tcl_CreateObjCo
7280: 6d 6d 61 6e 64 28 69 6e 74 65 72 70 2c 20 22 73  mmand(interp, "s
7290: 71 6c 69 74 65 33 5f 73 69 6d 75 6c 61 74 65 5f  qlite3_simulate_
72a0: 64 65 76 69 63 65 22 2c 20 64 65 76 53 79 6d 4f  device", devSymO
72b0: 62 6a 43 6d 64 2c 20 30 2c 20 30 29 3b 0a 20 20  bjCmd, 0, 0);.  
72c0: 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a 43 6f 6d  Tcl_CreateObjCom
72d0: 6d 61 6e 64 28 69 6e 74 65 72 70 2c 20 22 72 65  mand(interp, "re
72e0: 67 69 73 74 65 72 5f 6a 74 5f 76 66 73 22 2c 20  gister_jt_vfs", 
72f0: 6a 74 4f 62 6a 43 6d 64 2c 20 30 2c 20 30 29 3b  jtObjCmd, 0, 0);
7300: 0a 20 20 54 63 6c 5f 43 72 65 61 74 65 4f 62 6a  .  Tcl_CreateObj
7310: 43 6f 6d 6d 61 6e 64 28 69 6e 74 65 72 70 2c 20  Command(interp, 
7320: 22 75 6e 72 65 67 69 73 74 65 72 5f 6a 74 5f 76  "unregister_jt_v
7330: 66 73 22 2c 20 6a 74 55 6e 72 65 67 69 73 74 65  fs", jtUnregiste
7340: 72 4f 62 6a 43 6d 64 2c 20 30 2c 20 30 29 3b 0a  rObjCmd, 0, 0);.
7350: 23 65 6e 64 69 66 0a 20 20 72 65 74 75 72 6e 20  #endif.  return 
7360: 54 43 4c 5f 4f 4b 3b 0a 7d 0a 0a 23 65 6e 64 69  TCL_OK;.}..#endi
7370: 66 20 2f 2a 20 53 51 4c 49 54 45 5f 54 45 53 54  f /* SQLITE_TEST
7380: 20 2a 2f 0a                                       */.