/ Hex Artifact Content
Login

Artifact e7864c391e14ccaf73ee4b22f5a55c1eb40ecc93a7f5ee77a1b41b87367ec7ae:


0000: 2f 2a 0a 2a 2a 20 32 30 31 34 2d 30 36 2d 31 33  /*.** 2014-06-13
0010: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 75 74 68 6f  .**.** The autho
0020: 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70 79  r disclaims copy
0030: 72 69 67 68 74 20 74 6f 20 74 68 69 73 20 73 6f  right to this so
0040: 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20 70  urce code.  In p
0050: 6c 61 63 65 20 6f 66 0a 2a 2a 20 61 20 6c 65 67  lace of.** a leg
0060: 61 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72 65 20  al notice, here 
0070: 69 73 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a 2a  is a blessing:.*
0080: 2a 0a 2a 2a 20 20 20 20 4d 61 79 20 79 6f 75 20  *.**    May you 
0090: 64 6f 20 67 6f 6f 64 20 61 6e 64 20 6e 6f 74 20  do good and not 
00a0: 65 76 69 6c 2e 0a 2a 2a 20 20 20 20 4d 61 79 20  evil..**    May 
00b0: 79 6f 75 20 66 69 6e 64 20 66 6f 72 67 69 76 65  you find forgive
00c0: 6e 65 73 73 20 66 6f 72 20 79 6f 75 72 73 65 6c  ness for yoursel
00d0: 66 20 61 6e 64 20 66 6f 72 67 69 76 65 20 6f 74  f and forgive ot
00e0: 68 65 72 73 2e 0a 2a 2a 20 20 20 20 4d 61 79 20  hers..**    May 
00f0: 79 6f 75 20 73 68 61 72 65 20 66 72 65 65 6c 79  you share freely
0100: 2c 20 6e 65 76 65 72 20 74 61 6b 69 6e 67 20 6d  , never taking m
0110: 6f 72 65 20 74 68 61 6e 20 79 6f 75 20 67 69 76  ore than you giv
0120: 65 2e 0a 2a 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  e..**.**********
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 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20  ****.**.** This 
0180: 53 51 4c 69 74 65 20 65 78 74 65 6e 73 69 6f 6e  SQLite extension
0190: 20 69 6d 70 6c 65 6d 65 6e 74 73 20 53 51 4c 20   implements SQL 
01a0: 66 75 6e 63 74 69 6f 6e 73 20 72 65 61 64 66 69  functions readfi
01b0: 6c 65 28 29 20 61 6e 64 0a 2a 2a 20 77 72 69 74  le() and.** writ
01c0: 65 66 69 6c 65 28 29 2c 20 61 6e 64 20 65 70 6f  efile(), and epo
01d0: 6e 79 6d 6f 75 73 20 76 69 72 74 75 61 6c 20 74  nymous virtual t
01e0: 79 70 65 20 22 66 73 64 69 72 22 2e 0a 2a 2a 0a  ype "fsdir"..**.
01f0: 2a 2a 20 57 52 49 54 45 46 49 4c 45 28 46 49 4c  ** WRITEFILE(FIL
0200: 45 2c 20 44 41 54 41 20 5b 2c 20 4d 4f 44 45 20  E, DATA [, MODE 
0210: 5b 2c 20 4d 54 49 4d 45 5d 5d 29 3a 0a 2a 2a 0a  [, MTIME]]):.**.
0220: 2a 2a 20 20 20 49 66 20 6e 65 69 74 68 65 72 20  **   If neither 
0230: 6f 66 20 74 68 65 20 6f 70 74 69 6f 6e 61 6c 20  of the optional 
0240: 61 72 67 75 6d 65 6e 74 73 20 69 73 20 70 72 65  arguments is pre
0250: 73 65 6e 74 2c 20 74 68 65 6e 20 74 68 69 73 20  sent, then this 
0260: 55 44 46 0a 2a 2a 20 20 20 66 75 6e 63 74 69 6f  UDF.**   functio
0270: 6e 20 77 72 69 74 65 73 20 62 6c 6f 62 20 44 41  n writes blob DA
0280: 54 41 20 74 6f 20 66 69 6c 65 20 46 49 4c 45 2e  TA to file FILE.
0290: 20 49 66 20 73 75 63 63 65 73 73 66 75 6c 2c 20   If successful, 
02a0: 74 68 65 20 6e 75 6d 62 65 72 0a 2a 2a 20 20 20  the number.**   
02b0: 6f 66 20 62 79 74 65 73 20 77 72 69 74 74 65 6e  of bytes written
02c0: 20 69 73 20 72 65 74 75 72 6e 65 64 2e 20 49 66   is returned. If
02d0: 20 61 6e 20 65 72 72 6f 72 20 6f 63 63 75 72 73   an error occurs
02e0: 2c 20 4e 55 4c 4c 20 69 73 20 72 65 74 75 72 6e  , NULL is return
02f0: 65 64 2e 0a 2a 2a 0a 2a 2a 20 20 20 49 66 20 74  ed..**.**   If t
0300: 68 65 20 66 69 72 73 74 20 6f 70 74 69 6f 6e 20  he first option 
0310: 61 72 67 75 6d 65 6e 74 20 2d 20 4d 4f 44 45 20  argument - MODE 
0320: 2d 20 69 73 20 70 72 65 73 65 6e 74 2c 20 74 68  - is present, th
0330: 65 6e 20 69 74 20 6d 75 73 74 0a 2a 2a 20 20 20  en it must.**   
0340: 62 65 20 70 61 73 73 65 64 20 61 6e 20 69 6e 74  be passed an int
0350: 65 67 65 72 20 76 61 6c 75 65 20 74 68 61 74 20  eger value that 
0360: 63 6f 72 72 65 73 70 6f 6e 64 73 20 74 6f 20 61  corresponds to a
0370: 20 50 4f 53 49 58 20 6d 6f 64 65 0a 2a 2a 20 20   POSIX mode.**  
0380: 20 76 61 6c 75 65 20 28 66 69 6c 65 20 74 79 70   value (file typ
0390: 65 20 2b 20 70 65 72 6d 69 73 73 69 6f 6e 73 2c  e + permissions,
03a0: 20 61 73 20 72 65 74 75 72 6e 65 64 20 69 6e 20   as returned in 
03b0: 74 68 65 20 73 74 61 74 2e 73 74 5f 6d 6f 64 65  the stat.st_mode
03c0: 0a 2a 2a 20 20 20 66 69 65 6c 64 20 62 79 20 74  .**   field by t
03d0: 68 65 20 73 74 61 74 28 29 20 73 79 73 74 65 6d  he stat() system
03e0: 20 63 61 6c 6c 29 2e 20 54 68 72 65 65 20 74 79   call). Three ty
03f0: 70 65 73 20 6f 66 20 66 69 6c 65 73 20 6d 61 79  pes of files may
0400: 0a 2a 2a 20 20 20 62 65 20 77 72 69 74 74 65 6e  .**   be written
0410: 2f 63 72 65 61 74 65 64 3a 0a 2a 2a 0a 2a 2a 20  /created:.**.** 
0420: 20 20 20 20 72 65 67 75 6c 61 72 20 66 69 6c 65      regular file
0430: 73 3a 20 20 28 6d 6f 64 65 20 26 20 30 31 37 30  s:  (mode & 0170
0440: 30 30 30 29 3d 3d 30 31 30 30 30 30 30 0a 2a 2a  000)==0100000.**
0450: 20 20 20 20 20 73 79 6d 62 6f 6c 69 63 20 6c 69       symbolic li
0460: 6e 6b 73 3a 20 28 6d 6f 64 65 20 26 20 30 31 37  nks: (mode & 017
0470: 30 30 30 30 29 3d 3d 30 31 32 30 30 30 30 0a 2a  0000)==0120000.*
0480: 2a 20 20 20 20 20 64 69 72 65 63 74 6f 72 69 65  *     directorie
0490: 73 3a 20 20 20 20 28 6d 6f 64 65 20 26 20 30 31  s:    (mode & 01
04a0: 37 30 30 30 30 29 3d 3d 30 30 34 30 30 30 30 0a  70000)==0040000.
04b0: 2a 2a 0a 2a 2a 20 20 20 46 6f 72 20 61 20 64 69  **.**   For a di
04c0: 72 65 63 74 6f 72 79 2c 20 74 68 65 20 44 41 54  rectory, the DAT
04d0: 41 20 69 73 20 69 67 6e 6f 72 65 64 2e 20 46 6f  A is ignored. Fo
04e0: 72 20 61 20 73 79 6d 62 6f 6c 69 63 20 6c 69 6e  r a symbolic lin
04f0: 6b 2c 20 69 74 20 69 73 0a 2a 2a 20 20 20 69 6e  k, it is.**   in
0500: 74 65 72 70 72 65 74 65 64 20 61 73 20 74 65 78  terpreted as tex
0510: 74 20 61 6e 64 20 75 73 65 64 20 61 73 20 74 68  t and used as th
0520: 65 20 74 61 72 67 65 74 20 6f 66 20 74 68 65 20  e target of the 
0530: 6c 69 6e 6b 2e 20 46 6f 72 20 61 0a 2a 2a 20 20  link. For a.**  
0540: 20 72 65 67 75 6c 61 72 20 66 69 6c 65 2c 20 69   regular file, i
0550: 74 20 69 73 20 69 6e 74 65 72 70 72 65 74 65 64  t is interpreted
0560: 20 61 73 20 61 20 62 6c 6f 62 20 61 6e 64 20 77   as a blob and w
0570: 72 69 74 74 65 6e 20 69 6e 74 6f 20 74 68 65 0a  ritten into the.
0580: 2a 2a 20 20 20 6e 61 6d 65 64 20 66 69 6c 65 2e  **   named file.
0590: 20 52 65 67 61 72 64 6c 65 73 73 20 6f 66 20 74   Regardless of t
05a0: 68 65 20 74 79 70 65 20 6f 66 20 66 69 6c 65 2c  he type of file,
05b0: 20 69 74 73 20 70 65 72 6d 69 73 73 69 6f 6e 73   its permissions
05c0: 20 61 72 65 0a 2a 2a 20 20 20 73 65 74 20 74 6f   are.**   set to
05d0: 20 28 6d 6f 64 65 20 26 20 30 37 37 37 29 20 62   (mode & 0777) b
05e0: 65 66 6f 72 65 20 72 65 74 75 72 6e 69 6e 67 2e  efore returning.
05f0: 0a 2a 2a 0a 2a 2a 20 20 20 49 66 20 74 68 65 20  .**.**   If the 
0600: 6f 70 74 69 6f 6e 61 6c 20 4d 54 49 4d 45 20 61  optional MTIME a
0610: 72 67 75 6d 65 6e 74 20 69 73 20 70 72 65 73 65  rgument is prese
0620: 6e 74 2c 20 74 68 65 6e 20 69 74 20 69 73 20 69  nt, then it is i
0630: 6e 74 65 72 70 72 65 74 65 64 0a 2a 2a 20 20 20  nterpreted.**   
0640: 61 73 20 61 6e 20 69 6e 74 65 67 65 72 20 2d 20  as an integer - 
0650: 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 73 65  the number of se
0660: 63 6f 6e 64 73 20 73 69 6e 63 65 20 74 68 65 20  conds since the 
0670: 75 6e 69 78 20 65 70 6f 63 68 2e 20 54 68 65 0a  unix epoch. The.
0680: 2a 2a 20 20 20 6d 6f 64 69 66 69 63 61 74 69 6f  **   modificatio
0690: 6e 2d 74 69 6d 65 20 6f 66 20 74 68 65 20 74 61  n-time of the ta
06a0: 72 67 65 74 20 66 69 6c 65 20 69 73 20 73 65 74  rget file is set
06b0: 20 74 6f 20 74 68 69 73 20 76 61 6c 75 65 20 62   to this value b
06c0: 65 66 6f 72 65 0a 2a 2a 20 20 20 72 65 74 75 72  efore.**   retur
06d0: 6e 69 6e 67 2e 0a 2a 2a 0a 2a 2a 20 20 20 49 66  ning..**.**   If
06e0: 20 74 68 72 65 65 20 6f 72 20 6d 6f 72 65 20 61   three or more a
06f0: 72 67 75 6d 65 6e 74 73 20 61 72 65 20 70 61 73  rguments are pas
0700: 73 65 64 20 74 6f 20 74 68 69 73 20 66 75 6e 63  sed to this func
0710: 74 69 6f 6e 20 61 6e 64 20 61 6e 0a 2a 2a 20 20  tion and an.**  
0720: 20 65 72 72 6f 72 20 69 73 20 65 6e 63 6f 75 6e   error is encoun
0730: 74 65 72 65 64 2c 20 61 6e 20 65 78 63 65 70 74  tered, an except
0740: 69 6f 6e 20 69 73 20 72 61 69 73 65 64 2e 0a 2a  ion is raised..*
0750: 2a 0a 2a 2a 20 52 45 41 44 46 49 4c 45 28 46 49  *.** READFILE(FI
0760: 4c 45 29 3a 0a 2a 2a 0a 2a 2a 20 20 20 52 65 61  LE):.**.**   Rea
0770: 64 20 61 6e 64 20 72 65 74 75 72 6e 20 74 68 65  d and return the
0780: 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 66 69 6c   contents of fil
0790: 65 20 46 49 4c 45 20 28 74 79 70 65 20 62 6c 6f  e FILE (type blo
07a0: 62 29 20 66 72 6f 6d 20 64 69 73 6b 2e 0a 2a 2a  b) from disk..**
07b0: 0a 2a 2a 20 46 53 44 49 52 3a 0a 2a 2a 0a 2a 2a  .** FSDIR:.**.**
07c0: 20 20 20 55 73 65 64 20 61 73 20 66 6f 6c 6c 6f     Used as follo
07d0: 77 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 53 45  ws:.**.**     SE
07e0: 4c 45 43 54 20 2a 20 46 52 4f 4d 20 66 73 64 69  LECT * FROM fsdi
07f0: 72 28 24 70 61 74 68 20 5b 2c 20 24 64 69 72 5d  r($path [, $dir]
0800: 29 3b 0a 2a 2a 0a 2a 2a 20 20 20 50 61 72 61 6d  );.**.**   Param
0810: 65 74 65 72 20 24 70 61 74 68 20 69 73 20 61 6e  eter $path is an
0820: 20 61 62 73 6f 6c 75 74 65 20 6f 72 20 72 65 6c   absolute or rel
0830: 61 74 69 76 65 20 70 61 74 68 6e 61 6d 65 2e 20  ative pathname. 
0840: 49 66 20 74 68 65 20 66 69 6c 65 20 74 68 61 74  If the file that
0850: 20 69 74 0a 2a 2a 20 20 20 72 65 66 65 72 73 20   it.**   refers 
0860: 74 6f 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73  to does not exis
0870: 74 2c 20 69 74 20 69 73 20 61 6e 20 65 72 72 6f  t, it is an erro
0880: 72 2e 20 49 66 20 74 68 65 20 70 61 74 68 20 72  r. If the path r
0890: 65 66 65 72 73 20 74 6f 20 61 20 72 65 67 75 6c  efers to a regul
08a0: 61 72 0a 2a 2a 20 20 20 66 69 6c 65 20 6f 72 20  ar.**   file or 
08b0: 73 79 6d 62 6f 6c 69 63 20 6c 69 6e 6b 2c 20 69  symbolic link, i
08c0: 74 20 72 65 74 75 72 6e 73 20 61 20 73 69 6e 67  t returns a sing
08d0: 6c 65 20 72 6f 77 2e 20 4f 72 2c 20 69 66 20 74  le row. Or, if t
08e0: 68 65 20 70 61 74 68 20 72 65 66 65 72 73 0a 2a  he path refers.*
08f0: 2a 20 20 20 74 6f 20 61 20 64 69 72 65 63 74 6f  *   to a directo
0900: 72 79 2c 20 69 74 20 72 65 74 75 72 6e 73 20 6f  ry, it returns o
0910: 6e 65 20 72 6f 77 20 66 6f 72 20 74 68 65 20 64  ne row for the d
0920: 69 72 65 63 74 6f 72 79 2c 20 61 6e 64 20 6f 6e  irectory, and on
0930: 65 20 72 6f 77 20 66 6f 72 20 65 61 63 68 0a 2a  e row for each.*
0940: 2a 20 20 20 66 69 6c 65 20 77 69 74 68 69 6e 20  *   file within 
0950: 74 68 65 20 68 69 65 72 61 72 63 68 79 20 72 6f  the hierarchy ro
0960: 6f 74 65 64 20 61 74 20 24 70 61 74 68 2e 0a 2a  oted at $path..*
0970: 2a 0a 2a 2a 20 20 20 45 61 63 68 20 72 6f 77 20  *.**   Each row 
0980: 68 61 73 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e  has the followin
0990: 67 20 63 6f 6c 75 6d 6e 73 3a 0a 2a 2a 0a 2a 2a  g columns:.**.**
09a0: 20 20 20 20 20 6e 61 6d 65 3a 20 20 50 61 74 68       name:  Path
09b0: 20 74 6f 20 66 69 6c 65 20 6f 72 20 64 69 72 65   to file or dire
09c0: 63 74 6f 72 79 20 28 74 65 78 74 20 76 61 6c 75  ctory (text valu
09d0: 65 29 2e 0a 2a 2a 20 20 20 20 20 6d 6f 64 65 3a  e)..**     mode:
09e0: 20 20 56 61 6c 75 65 20 6f 66 20 73 74 61 74 2e    Value of stat.
09f0: 73 74 5f 6d 6f 64 65 20 66 6f 72 20 64 69 72 65  st_mode for dire
0a00: 63 74 6f 72 79 20 65 6e 74 72 79 20 28 61 6e 20  ctory entry (an 
0a10: 69 6e 74 65 67 65 72 29 2e 0a 2a 2a 20 20 20 20  integer)..**    
0a20: 20 6d 74 69 6d 65 3a 20 56 61 6c 75 65 20 6f 66   mtime: Value of
0a30: 20 73 74 61 74 2e 73 74 5f 6d 74 69 6d 65 20 66   stat.st_mtime f
0a40: 6f 72 20 64 69 72 65 63 74 6f 72 79 20 65 6e 74  or directory ent
0a50: 72 79 20 28 61 6e 20 69 6e 74 65 67 65 72 29 2e  ry (an integer).
0a60: 0a 2a 2a 20 20 20 20 20 64 61 74 61 3a 20 20 46  .**     data:  F
0a70: 6f 72 20 61 20 72 65 67 75 6c 61 72 20 66 69 6c  or a regular fil
0a80: 65 2c 20 61 20 62 6c 6f 62 20 63 6f 6e 74 61 69  e, a blob contai
0a90: 6e 69 6e 67 20 74 68 65 20 66 69 6c 65 20 64 61  ning the file da
0aa0: 74 61 2e 20 46 6f 72 20 61 0a 2a 2a 20 20 20 20  ta. For a.**    
0ab0: 20 20 20 20 20 20 20 20 73 79 6d 6c 69 6e 6b 2c          symlink,
0ac0: 20 61 20 74 65 78 74 20 76 61 6c 75 65 20 63 6f   a text value co
0ad0: 6e 74 61 69 6e 69 6e 67 20 74 68 65 20 74 65 78  ntaining the tex
0ae0: 74 20 6f 66 20 74 68 65 20 6c 69 6e 6b 2e 20 46  t of the link. F
0af0: 6f 72 20 61 0a 2a 2a 20 20 20 20 20 20 20 20 20  or a.**         
0b00: 20 20 20 64 69 72 65 63 74 6f 72 79 2c 20 4e 55     directory, NU
0b10: 4c 4c 2e 0a 2a 2a 0a 2a 2a 20 20 20 49 66 20 61  LL..**.**   If a
0b20: 20 6e 6f 6e 2d 4e 55 4c 4c 20 76 61 6c 75 65 20   non-NULL value 
0b30: 69 73 20 73 70 65 63 69 66 69 65 64 20 66 6f 72  is specified for
0b40: 20 74 68 65 20 6f 70 74 69 6f 6e 61 6c 20 24 64   the optional $d
0b50: 69 72 20 70 61 72 61 6d 65 74 65 72 20 61 6e 64  ir parameter and
0b60: 0a 2a 2a 20 20 20 24 70 61 74 68 20 69 73 20 61  .**   $path is a
0b70: 20 72 65 6c 61 74 69 76 65 20 70 61 74 68 2c 20   relative path, 
0b80: 74 68 65 6e 20 24 70 61 74 68 20 69 73 20 69 6e  then $path is in
0b90: 74 65 72 70 72 65 74 65 64 20 72 65 6c 61 74 69  terpreted relati
0ba0: 76 65 20 74 6f 20 24 64 69 72 2e 20 0a 2a 2a 20  ve to $dir. .** 
0bb0: 20 20 41 6e 64 20 74 68 65 20 70 61 74 68 73 20    And the paths 
0bc0: 72 65 74 75 72 6e 65 64 20 69 6e 20 74 68 65 20  returned in the 
0bd0: 22 6e 61 6d 65 22 20 63 6f 6c 75 6d 6e 20 6f 66  "name" column of
0be0: 20 74 68 65 20 74 61 62 6c 65 20 61 72 65 20 61   the table are a
0bf0: 6c 73 6f 20 0a 2a 2a 20 20 20 72 65 6c 61 74 69  lso .**   relati
0c00: 76 65 20 74 6f 20 64 69 72 65 63 74 6f 72 79 20  ve to directory 
0c10: 24 64 69 72 2e 0a 2a 2f 0a 23 69 6e 63 6c 75 64  $dir..*/.#includ
0c20: 65 20 22 73 71 6c 69 74 65 33 65 78 74 2e 68 22  e "sqlite3ext.h"
0c30: 0a 53 51 4c 49 54 45 5f 45 58 54 45 4e 53 49 4f  .SQLITE_EXTENSIO
0c40: 4e 5f 49 4e 49 54 31 0a 23 69 6e 63 6c 75 64 65  N_INIT1.#include
0c50: 20 3c 73 74 64 69 6f 2e 68 3e 0a 23 69 6e 63 6c   <stdio.h>.#incl
0c60: 75 64 65 20 3c 73 74 72 69 6e 67 2e 68 3e 0a 23  ude <string.h>.#
0c70: 69 6e 63 6c 75 64 65 20 3c 61 73 73 65 72 74 2e  include <assert.
0c80: 68 3e 0a 0a 23 69 6e 63 6c 75 64 65 20 3c 73 79  h>..#include <sy
0c90: 73 2f 74 79 70 65 73 2e 68 3e 0a 23 69 6e 63 6c  s/types.h>.#incl
0ca0: 75 64 65 20 3c 73 79 73 2f 73 74 61 74 2e 68 3e  ude <sys/stat.h>
0cb0: 0a 23 69 6e 63 6c 75 64 65 20 3c 66 63 6e 74 6c  .#include <fcntl
0cc0: 2e 68 3e 0a 23 69 66 20 21 64 65 66 69 6e 65 64  .h>.#if !defined
0cd0: 28 5f 57 49 4e 33 32 29 20 26 26 20 21 64 65 66  (_WIN32) && !def
0ce0: 69 6e 65 64 28 57 49 4e 33 32 29 0a 23 20 20 69  ined(WIN32).#  i
0cf0: 6e 63 6c 75 64 65 20 3c 75 6e 69 73 74 64 2e 68  nclude <unistd.h
0d00: 3e 0a 23 20 20 69 6e 63 6c 75 64 65 20 3c 64 69  >.#  include <di
0d10: 72 65 6e 74 2e 68 3e 0a 23 20 20 69 6e 63 6c 75  rent.h>.#  inclu
0d20: 64 65 20 3c 75 74 69 6d 65 2e 68 3e 0a 23 20 20  de <utime.h>.#  
0d30: 69 6e 63 6c 75 64 65 20 3c 73 79 73 2f 74 69 6d  include <sys/tim
0d40: 65 2e 68 3e 0a 23 65 6c 73 65 0a 23 20 20 69 6e  e.h>.#else.#  in
0d50: 63 6c 75 64 65 20 22 77 69 6e 64 6f 77 73 2e 68  clude "windows.h
0d60: 22 0a 23 20 20 69 6e 63 6c 75 64 65 20 3c 69 6f  ".#  include <io
0d70: 2e 68 3e 0a 23 20 20 69 6e 63 6c 75 64 65 20 3c  .h>.#  include <
0d80: 64 69 72 65 63 74 2e 68 3e 0a 23 20 20 69 6e 63  direct.h>.#  inc
0d90: 6c 75 64 65 20 22 74 65 73 74 5f 77 69 6e 64 69  lude "test_windi
0da0: 72 65 6e 74 2e 68 22 0a 23 20 20 64 65 66 69 6e  rent.h".#  defin
0db0: 65 20 64 69 72 65 6e 74 20 44 49 52 45 4e 54 0a  e dirent DIRENT.
0dc0: 23 20 20 69 66 6e 64 65 66 20 63 68 6d 6f 64 0a  #  ifndef chmod.
0dd0: 23 20 20 20 20 64 65 66 69 6e 65 20 63 68 6d 6f  #    define chmo
0de0: 64 20 5f 63 68 6d 6f 64 0a 23 20 20 65 6e 64 69  d _chmod.#  endi
0df0: 66 0a 23 20 20 69 66 6e 64 65 66 20 73 74 61 74  f.#  ifndef stat
0e00: 0a 23 20 20 20 20 64 65 66 69 6e 65 20 73 74 61  .#    define sta
0e10: 74 20 5f 73 74 61 74 0a 23 20 20 65 6e 64 69 66  t _stat.#  endif
0e20: 0a 23 20 20 64 65 66 69 6e 65 20 6d 6b 64 69 72  .#  define mkdir
0e30: 28 70 61 74 68 2c 6d 6f 64 65 29 20 5f 6d 6b 64  (path,mode) _mkd
0e40: 69 72 28 70 61 74 68 29 0a 23 20 20 64 65 66 69  ir(path).#  defi
0e50: 6e 65 20 6c 73 74 61 74 28 70 61 74 68 2c 62 75  ne lstat(path,bu
0e60: 66 29 20 73 74 61 74 28 70 61 74 68 2c 62 75 66  f) stat(path,buf
0e70: 29 0a 23 65 6e 64 69 66 0a 23 69 6e 63 6c 75 64  ).#endif.#includ
0e80: 65 20 3c 74 69 6d 65 2e 68 3e 0a 23 69 6e 63 6c  e <time.h>.#incl
0e90: 75 64 65 20 3c 65 72 72 6e 6f 2e 68 3e 0a 0a 0a  ude <errno.h>...
0ea0: 2f 2a 0a 2a 2a 20 53 74 72 75 63 74 75 72 65 20  /*.** Structure 
0eb0: 6f 66 20 74 68 65 20 66 73 64 69 72 28 29 20 74  of the fsdir() t
0ec0: 61 62 6c 65 2d 76 61 6c 75 65 64 20 66 75 6e 63  able-valued func
0ed0: 74 69 6f 6e 0a 2a 2f 0a 20 20 20 20 20 20 20 20  tion.*/.        
0ee0: 20 20 20 20 20 20 20 20 20 2f 2a 20 20 20 20 30           /*    0
0ef0: 20 20 20 20 31 20 20 20 20 32 20 20 20 20 20 33      1    2     3
0f00: 20 20 20 20 34 20 20 20 20 20 20 20 20 20 20 20      4           
0f10: 35 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2f  5             */
0f20: 0a 23 64 65 66 69 6e 65 20 46 53 44 49 52 5f 53  .#define FSDIR_S
0f30: 43 48 45 4d 41 20 22 28 6e 61 6d 65 2c 6d 6f 64  CHEMA "(name,mod
0f40: 65 2c 6d 74 69 6d 65 2c 64 61 74 61 2c 70 61 74  e,mtime,data,pat
0f50: 68 20 48 49 44 44 45 4e 2c 64 69 72 20 48 49 44  h HIDDEN,dir HID
0f60: 44 45 4e 29 22 0a 23 64 65 66 69 6e 65 20 46 53  DEN)".#define FS
0f70: 44 49 52 5f 43 4f 4c 55 4d 4e 5f 4e 41 4d 45 20  DIR_COLUMN_NAME 
0f80: 20 20 20 20 30 20 20 20 20 20 2f 2a 20 4e 61 6d      0     /* Nam
0f90: 65 20 6f 66 20 74 68 65 20 66 69 6c 65 20 2a 2f  e of the file */
0fa0: 0a 23 64 65 66 69 6e 65 20 46 53 44 49 52 5f 43  .#define FSDIR_C
0fb0: 4f 4c 55 4d 4e 5f 4d 4f 44 45 20 20 20 20 20 31  OLUMN_MODE     1
0fc0: 20 20 20 20 20 2f 2a 20 41 63 63 65 73 73 20 6d       /* Access m
0fd0: 6f 64 65 20 2a 2f 0a 23 64 65 66 69 6e 65 20 46  ode */.#define F
0fe0: 53 44 49 52 5f 43 4f 4c 55 4d 4e 5f 4d 54 49 4d  SDIR_COLUMN_MTIM
0ff0: 45 20 20 20 20 32 20 20 20 20 20 2f 2a 20 4c 61  E    2     /* La
1000: 73 74 20 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20  st modification 
1010: 74 69 6d 65 20 2a 2f 0a 23 64 65 66 69 6e 65 20  time */.#define 
1020: 46 53 44 49 52 5f 43 4f 4c 55 4d 4e 5f 44 41 54  FSDIR_COLUMN_DAT
1030: 41 20 20 20 20 20 33 20 20 20 20 20 2f 2a 20 46  A     3     /* F
1040: 69 6c 65 20 63 6f 6e 74 65 6e 74 20 2a 2f 0a 23  ile content */.#
1050: 64 65 66 69 6e 65 20 46 53 44 49 52 5f 43 4f 4c  define FSDIR_COL
1060: 55 4d 4e 5f 50 41 54 48 20 20 20 20 20 34 20 20  UMN_PATH     4  
1070: 20 20 20 2f 2a 20 50 61 74 68 20 74 6f 20 74 6f     /* Path to to
1080: 70 20 6f 66 20 73 65 61 72 63 68 20 2a 2f 0a 23  p of search */.#
1090: 64 65 66 69 6e 65 20 46 53 44 49 52 5f 43 4f 4c  define FSDIR_COL
10a0: 55 4d 4e 5f 44 49 52 20 20 20 20 20 20 35 20 20  UMN_DIR      5  
10b0: 20 20 20 2f 2a 20 50 61 74 68 20 69 73 20 72 65     /* Path is re
10c0: 6c 61 74 69 76 65 20 74 6f 20 74 68 69 73 20 64  lative to this d
10d0: 69 72 65 63 74 6f 72 79 20 2a 2f 0a 0a 0a 2f 2a  irectory */.../*
10e0: 0a 2a 2a 20 53 65 74 20 74 68 65 20 72 65 73 75  .** Set the resu
10f0: 6c 74 20 73 74 6f 72 65 64 20 62 79 20 63 6f 6e  lt stored by con
1100: 74 65 78 74 20 63 74 78 20 74 6f 20 61 20 62 6c  text ctx to a bl
1110: 6f 62 20 63 6f 6e 74 61 69 6e 69 6e 67 20 74 68  ob containing th
1120: 65 20 0a 2a 2a 20 63 6f 6e 74 65 6e 74 73 20 6f  e .** contents o
1130: 66 20 66 69 6c 65 20 7a 4e 61 6d 65 2e 20 20 4f  f file zName.  O
1140: 72 2c 20 6c 65 61 76 65 20 74 68 65 20 72 65 73  r, leave the res
1150: 75 6c 74 20 75 6e 63 68 61 6e 67 65 64 20 28 4e  ult unchanged (N
1160: 55 4c 4c 29 0a 2a 2a 20 69 66 20 74 68 65 20 66  ULL).** if the f
1170: 69 6c 65 20 64 6f 65 73 20 6e 6f 74 20 65 78 69  ile does not exi
1180: 73 74 20 6f 72 20 69 73 20 75 6e 72 65 61 64 61  st or is unreada
1190: 62 6c 65 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 74 68  ble..**.** If th
11a0: 65 20 66 69 6c 65 20 65 78 63 65 65 64 73 20 74  e file exceeds t
11b0: 68 65 20 53 51 4c 69 74 65 20 62 6c 6f 62 20 73  he SQLite blob s
11c0: 69 7a 65 20 6c 69 6d 69 74 2c 20 74 68 72 6f 75  ize limit, throu
11d0: 67 68 20 61 6e 0a 2a 2a 20 53 51 4c 49 54 45 5f  gh an.** SQLITE_
11e0: 54 4f 4f 42 49 47 20 65 72 72 6f 72 2e 0a 2a 2a  TOOBIG error..**
11f0: 0a 2a 2a 20 54 68 72 6f 77 20 61 6e 20 53 51 4c  .** Throw an SQL
1200: 49 54 45 5f 49 4f 45 52 52 20 69 66 20 74 68 65  ITE_IOERR if the
1210: 72 65 20 61 72 65 20 64 69 66 66 69 63 75 6c 74  re are difficult
1220: 69 65 73 20 70 75 6c 6c 69 6e 67 20 74 68 65 20  ies pulling the 
1230: 66 69 6c 65 0a 2a 2a 20 6f 66 66 20 6f 66 20 64  file.** off of d
1240: 69 73 6b 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  isk..*/.static v
1250: 6f 69 64 20 72 65 61 64 46 69 6c 65 43 6f 6e 74  oid readFileCont
1260: 65 6e 74 73 28 73 71 6c 69 74 65 33 5f 63 6f 6e  ents(sqlite3_con
1270: 74 65 78 74 20 2a 63 74 78 2c 20 63 6f 6e 73 74  text *ctx, const
1280: 20 63 68 61 72 20 2a 7a 4e 61 6d 65 29 7b 0a 20   char *zName){. 
1290: 20 46 49 4c 45 20 2a 69 6e 3b 0a 20 20 73 71 6c   FILE *in;.  sql
12a0: 69 74 65 33 5f 69 6e 74 36 34 20 6e 49 6e 3b 0a  ite3_int64 nIn;.
12b0: 20 20 76 6f 69 64 20 2a 70 42 75 66 3b 0a 20 20    void *pBuf;.  
12c0: 73 71 6c 69 74 65 33 20 2a 64 62 3b 0a 20 20 69  sqlite3 *db;.  i
12d0: 6e 74 20 6d 78 42 6c 6f 62 3b 0a 0a 20 20 69 6e  nt mxBlob;..  in
12e0: 20 3d 20 66 6f 70 65 6e 28 7a 4e 61 6d 65 2c 20   = fopen(zName, 
12f0: 22 72 62 22 29 3b 0a 20 20 69 66 28 20 69 6e 3d  "rb");.  if( in=
1300: 3d 30 20 29 7b 0a 20 20 20 20 2f 2a 20 46 69 6c  =0 ){.    /* Fil
1310: 65 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74  e does not exist
1320: 20 6f 72 20 69 73 20 75 6e 72 65 61 64 61 62 6c   or is unreadabl
1330: 65 2e 20 4c 65 61 76 65 20 74 68 65 20 72 65 73  e. Leave the res
1340: 75 6c 74 20 73 65 74 20 74 6f 20 4e 55 4c 4c 2e  ult set to NULL.
1350: 20 2a 2f 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a   */.    return;.
1360: 20 20 7d 0a 20 20 66 73 65 65 6b 28 69 6e 2c 20    }.  fseek(in, 
1370: 30 2c 20 53 45 45 4b 5f 45 4e 44 29 3b 0a 20 20  0, SEEK_END);.  
1380: 6e 49 6e 20 3d 20 66 74 65 6c 6c 28 69 6e 29 3b  nIn = ftell(in);
1390: 0a 20 20 72 65 77 69 6e 64 28 69 6e 29 3b 0a 20  .  rewind(in);. 
13a0: 20 64 62 20 3d 20 73 71 6c 69 74 65 33 5f 63 6f   db = sqlite3_co
13b0: 6e 74 65 78 74 5f 64 62 5f 68 61 6e 64 6c 65 28  ntext_db_handle(
13c0: 63 74 78 29 3b 0a 20 20 6d 78 42 6c 6f 62 20 3d  ctx);.  mxBlob =
13d0: 20 73 71 6c 69 74 65 33 5f 6c 69 6d 69 74 28 64   sqlite3_limit(d
13e0: 62 2c 20 53 51 4c 49 54 45 5f 4c 49 4d 49 54 5f  b, SQLITE_LIMIT_
13f0: 4c 45 4e 47 54 48 2c 20 2d 31 29 3b 0a 20 20 69  LENGTH, -1);.  i
1400: 66 28 20 6e 49 6e 3e 6d 78 42 6c 6f 62 20 29 7b  f( nIn>mxBlob ){
1410: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
1420: 75 6c 74 5f 65 72 72 6f 72 5f 63 6f 64 65 28 63  ult_error_code(c
1430: 74 78 2c 20 53 51 4c 49 54 45 5f 54 4f 4f 42 49  tx, SQLITE_TOOBI
1440: 47 29 3b 0a 20 20 20 20 66 63 6c 6f 73 65 28 69  G);.    fclose(i
1450: 6e 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  n);.    return;.
1460: 20 20 7d 0a 20 20 70 42 75 66 20 3d 20 73 71 6c    }.  pBuf = sql
1470: 69 74 65 33 5f 6d 61 6c 6c 6f 63 36 34 28 20 6e  ite3_malloc64( n
1480: 49 6e 20 3f 20 6e 49 6e 20 3a 20 31 20 29 3b 0a  In ? nIn : 1 );.
1490: 20 20 69 66 28 20 70 42 75 66 3d 3d 30 20 29 7b    if( pBuf==0 ){
14a0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
14b0: 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28  ult_error_nomem(
14c0: 63 74 78 29 3b 0a 20 20 20 20 66 63 6c 6f 73 65  ctx);.    fclose
14d0: 28 69 6e 29 3b 0a 20 20 20 20 72 65 74 75 72 6e  (in);.    return
14e0: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 6e 49 6e 3d  ;.  }.  if( nIn=
14f0: 3d 66 72 65 61 64 28 70 42 75 66 2c 20 31 2c 20  =fread(pBuf, 1, 
1500: 6e 49 6e 2c 20 69 6e 29 20 29 7b 0a 20 20 20 20  nIn, in) ){.    
1510: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 62  sqlite3_result_b
1520: 6c 6f 62 36 34 28 63 74 78 2c 20 70 42 75 66 2c  lob64(ctx, pBuf,
1530: 20 6e 49 6e 2c 20 73 71 6c 69 74 65 33 5f 66 72   nIn, sqlite3_fr
1540: 65 65 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  ee);.  }else{.  
1550: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74    sqlite3_result
1560: 5f 65 72 72 6f 72 5f 63 6f 64 65 28 63 74 78 2c  _error_code(ctx,
1570: 20 53 51 4c 49 54 45 5f 49 4f 45 52 52 29 3b 0a   SQLITE_IOERR);.
1580: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65      sqlite3_free
1590: 28 70 42 75 66 29 3b 0a 20 20 7d 0a 20 20 66 63  (pBuf);.  }.  fc
15a0: 6c 6f 73 65 28 69 6e 29 3b 0a 7d 0a 0a 2f 2a 0a  lose(in);.}../*.
15b0: 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f  ** Implementatio
15c0: 6e 20 6f 66 20 74 68 65 20 22 72 65 61 64 66 69  n of the "readfi
15d0: 6c 65 28 58 29 22 20 53 51 4c 20 66 75 6e 63 74  le(X)" SQL funct
15e0: 69 6f 6e 2e 20 20 54 68 65 20 65 6e 74 69 72 65  ion.  The entire
15f0: 20 63 6f 6e 74 65 6e 74 0a 2a 2a 20 6f 66 20 74   content.** of t
1600: 68 65 20 66 69 6c 65 20 6e 61 6d 65 64 20 58 20  he file named X 
1610: 69 73 20 72 65 61 64 20 61 6e 64 20 72 65 74 75  is read and retu
1620: 72 6e 65 64 20 61 73 20 61 20 42 4c 4f 42 2e 20  rned as a BLOB. 
1630: 20 4e 55 4c 4c 20 69 73 20 72 65 74 75 72 6e 65   NULL is returne
1640: 64 0a 2a 2a 20 69 66 20 74 68 65 20 66 69 6c 65  d.** if the file
1650: 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 20   does not exist 
1660: 6f 72 20 69 73 20 75 6e 72 65 61 64 61 62 6c 65  or is unreadable
1670: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  ..*/.static void
1680: 20 72 65 61 64 66 69 6c 65 46 75 6e 63 28 0a 20   readfileFunc(. 
1690: 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74   sqlite3_context
16a0: 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e 74   *context,.  int
16b0: 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 33   argc,.  sqlite3
16c0: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 7b  _value **argv.){
16d0: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
16e0: 4e 61 6d 65 3b 0a 20 20 28 76 6f 69 64 29 28 61  Name;.  (void)(a
16f0: 72 67 63 29 3b 20 20 2f 2a 20 55 6e 75 73 65 64  rgc);  /* Unused
1700: 20 70 61 72 61 6d 65 74 65 72 20 2a 2f 0a 20 20   parameter */.  
1710: 7a 4e 61 6d 65 20 3d 20 28 63 6f 6e 73 74 20 63  zName = (const c
1720: 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  har*)sqlite3_val
1730: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
1740: 3b 0a 20 20 69 66 28 20 7a 4e 61 6d 65 3d 3d 30  ;.  if( zName==0
1750: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 72 65 61   ) return;.  rea
1760: 64 46 69 6c 65 43 6f 6e 74 65 6e 74 73 28 63 6f  dFileContents(co
1770: 6e 74 65 78 74 2c 20 7a 4e 61 6d 65 29 3b 0a 7d  ntext, zName);.}
1780: 0a 0a 2f 2a 0a 2a 2a 20 53 65 74 20 74 68 65 20  ../*.** Set the 
1790: 65 72 72 6f 72 20 6d 65 73 73 61 67 65 20 63 6f  error message co
17a0: 6e 74 61 69 6e 65 64 20 69 6e 20 63 6f 6e 74 65  ntained in conte
17b0: 78 74 20 63 74 78 20 74 6f 20 74 68 65 20 72 65  xt ctx to the re
17c0: 73 75 6c 74 73 20 6f 66 0a 2a 2a 20 76 70 72 69  sults of.** vpri
17d0: 6e 74 66 28 7a 46 6d 74 2c 20 2e 2e 2e 29 2e 0a  ntf(zFmt, ...)..
17e0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 63  */.static void c
17f0: 74 78 45 72 72 6f 72 4d 73 67 28 73 71 6c 69 74  txErrorMsg(sqlit
1800: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 74 78 2c  e3_context *ctx,
1810: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6d   const char *zFm
1820: 74 2c 20 2e 2e 2e 29 7b 0a 20 20 63 68 61 72 20  t, ...){.  char 
1830: 2a 7a 4d 73 67 20 3d 20 30 3b 0a 20 20 76 61 5f  *zMsg = 0;.  va_
1840: 6c 69 73 74 20 61 70 3b 0a 20 20 76 61 5f 73 74  list ap;.  va_st
1850: 61 72 74 28 61 70 2c 20 7a 46 6d 74 29 3b 0a 20  art(ap, zFmt);. 
1860: 20 7a 4d 73 67 20 3d 20 73 71 6c 69 74 65 33 5f   zMsg = sqlite3_
1870: 76 6d 70 72 69 6e 74 66 28 7a 46 6d 74 2c 20 61  vmprintf(zFmt, a
1880: 70 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 65  p);.  sqlite3_re
1890: 73 75 6c 74 5f 65 72 72 6f 72 28 63 74 78 2c 20  sult_error(ctx, 
18a0: 7a 4d 73 67 2c 20 2d 31 29 3b 0a 20 20 73 71 6c  zMsg, -1);.  sql
18b0: 69 74 65 33 5f 66 72 65 65 28 7a 4d 73 67 29 3b  ite3_free(zMsg);
18c0: 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 7d  .  va_end(ap);.}
18d0: 0a 0a 23 69 66 20 64 65 66 69 6e 65 64 28 5f 57  ..#if defined(_W
18e0: 49 4e 33 32 29 0a 2f 2a 0a 2a 2a 20 54 68 69 73  IN32)./*.** This
18f0: 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 64 65 73   function is des
1900: 69 67 6e 65 64 20 74 6f 20 63 6f 6e 76 65 72 74  igned to convert
1910: 20 61 20 57 69 6e 33 32 20 46 49 4c 45 54 49 4d   a Win32 FILETIM
1920: 45 20 73 74 72 75 63 74 75 72 65 20 69 6e 74 6f  E structure into
1930: 20 74 68 65 0a 2a 2a 20 6e 75 6d 62 65 72 20 6f   the.** number o
1940: 66 20 73 65 63 6f 6e 64 73 20 73 69 6e 63 65 20  f seconds since 
1950: 74 68 65 20 55 6e 69 78 20 45 70 6f 63 68 20 28  the Unix Epoch (
1960: 31 39 37 30 2d 30 31 2d 30 31 20 30 30 3a 30 30  1970-01-01 00:00
1970: 3a 30 30 20 55 54 43 29 2e 0a 2a 2f 0a 73 74 61  :00 UTC)..*/.sta
1980: 74 69 63 20 73 71 6c 69 74 65 33 5f 75 69 6e 74  tic sqlite3_uint
1990: 36 34 20 66 69 6c 65 54 69 6d 65 54 6f 55 6e 69  64 fileTimeToUni
19a0: 78 54 69 6d 65 28 0a 20 20 4c 50 46 49 4c 45 54  xTime(.  LPFILET
19b0: 49 4d 45 20 70 46 69 6c 65 54 69 6d 65 0a 29 7b  IME pFileTime.){
19c0: 0a 20 20 53 59 53 54 45 4d 54 49 4d 45 20 65 70  .  SYSTEMTIME ep
19d0: 6f 63 68 53 79 73 74 65 6d 54 69 6d 65 3b 0a 20  ochSystemTime;. 
19e0: 20 55 4c 41 52 47 45 5f 49 4e 54 45 47 45 52 20   ULARGE_INTEGER 
19f0: 65 70 6f 63 68 49 6e 74 65 72 76 61 6c 73 3b 0a  epochIntervals;.
1a00: 20 20 46 49 4c 45 54 49 4d 45 20 65 70 6f 63 68    FILETIME epoch
1a10: 46 69 6c 65 54 69 6d 65 3b 0a 20 20 55 4c 41 52  FileTime;.  ULAR
1a20: 47 45 5f 49 4e 54 45 47 45 52 20 66 69 6c 65 49  GE_INTEGER fileI
1a30: 6e 74 65 72 76 61 6c 73 3b 0a 0a 20 20 6d 65 6d  ntervals;..  mem
1a40: 73 65 74 28 26 65 70 6f 63 68 53 79 73 74 65 6d  set(&epochSystem
1a50: 54 69 6d 65 2c 20 30 2c 20 73 69 7a 65 6f 66 28  Time, 0, sizeof(
1a60: 53 59 53 54 45 4d 54 49 4d 45 29 29 3b 0a 20 20  SYSTEMTIME));.  
1a70: 65 70 6f 63 68 53 79 73 74 65 6d 54 69 6d 65 2e  epochSystemTime.
1a80: 77 59 65 61 72 20 3d 20 31 39 37 30 3b 0a 20 20  wYear = 1970;.  
1a90: 65 70 6f 63 68 53 79 73 74 65 6d 54 69 6d 65 2e  epochSystemTime.
1aa0: 77 4d 6f 6e 74 68 20 3d 20 31 3b 0a 20 20 65 70  wMonth = 1;.  ep
1ab0: 6f 63 68 53 79 73 74 65 6d 54 69 6d 65 2e 77 44  ochSystemTime.wD
1ac0: 61 79 20 3d 20 31 3b 0a 20 20 53 79 73 74 65 6d  ay = 1;.  System
1ad0: 54 69 6d 65 54 6f 46 69 6c 65 54 69 6d 65 28 26  TimeToFileTime(&
1ae0: 65 70 6f 63 68 53 79 73 74 65 6d 54 69 6d 65 2c  epochSystemTime,
1af0: 20 26 65 70 6f 63 68 46 69 6c 65 54 69 6d 65 29   &epochFileTime)
1b00: 3b 0a 20 20 65 70 6f 63 68 49 6e 74 65 72 76 61  ;.  epochInterva
1b10: 6c 73 2e 4c 6f 77 50 61 72 74 20 3d 20 65 70 6f  ls.LowPart = epo
1b20: 63 68 46 69 6c 65 54 69 6d 65 2e 64 77 4c 6f 77  chFileTime.dwLow
1b30: 44 61 74 65 54 69 6d 65 3b 0a 20 20 65 70 6f 63  DateTime;.  epoc
1b40: 68 49 6e 74 65 72 76 61 6c 73 2e 48 69 67 68 50  hIntervals.HighP
1b50: 61 72 74 20 3d 20 65 70 6f 63 68 46 69 6c 65 54  art = epochFileT
1b60: 69 6d 65 2e 64 77 48 69 67 68 44 61 74 65 54 69  ime.dwHighDateTi
1b70: 6d 65 3b 0a 0a 20 20 66 69 6c 65 49 6e 74 65 72  me;..  fileInter
1b80: 76 61 6c 73 2e 4c 6f 77 50 61 72 74 20 3d 20 70  vals.LowPart = p
1b90: 46 69 6c 65 54 69 6d 65 2d 3e 64 77 4c 6f 77 44  FileTime->dwLowD
1ba0: 61 74 65 54 69 6d 65 3b 0a 20 20 66 69 6c 65 49  ateTime;.  fileI
1bb0: 6e 74 65 72 76 61 6c 73 2e 48 69 67 68 50 61 72  ntervals.HighPar
1bc0: 74 20 3d 20 70 46 69 6c 65 54 69 6d 65 2d 3e 64  t = pFileTime->d
1bd0: 77 48 69 67 68 44 61 74 65 54 69 6d 65 3b 0a 0a  wHighDateTime;..
1be0: 20 20 72 65 74 75 72 6e 20 28 66 69 6c 65 49 6e    return (fileIn
1bf0: 74 65 72 76 61 6c 73 2e 51 75 61 64 50 61 72 74  tervals.QuadPart
1c00: 20 2d 20 65 70 6f 63 68 49 6e 74 65 72 76 61 6c   - epochInterval
1c10: 73 2e 51 75 61 64 50 61 72 74 29 20 2f 20 31 30  s.QuadPart) / 10
1c20: 30 30 30 30 30 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  000000;.}../*.**
1c30: 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 61   This function a
1c40: 74 74 65 6d 70 74 73 20 74 6f 20 6e 6f 72 6d 61  ttempts to norma
1c50: 6c 69 7a 65 20 74 68 65 20 74 69 6d 65 20 76 61  lize the time va
1c60: 6c 75 65 73 20 66 6f 75 6e 64 20 69 6e 20 74 68  lues found in th
1c70: 65 20 73 74 61 74 28 29 0a 2a 2a 20 62 75 66 66  e stat().** buff
1c80: 65 72 20 74 6f 20 55 54 43 2e 20 20 54 68 69 73  er to UTC.  This
1c90: 20 69 73 20 6e 65 63 65 73 73 61 72 79 20 6f 6e   is necessary on
1ca0: 20 57 69 6e 33 32 2c 20 77 68 65 72 65 20 74 68   Win32, where th
1cb0: 65 20 72 75 6e 74 69 6d 65 20 6c 69 62 72 61 72  e runtime librar
1cc0: 79 0a 2a 2a 20 61 70 70 65 61 72 73 20 74 6f 20  y.** appears to 
1cd0: 72 65 74 75 72 6e 20 74 68 65 73 65 20 76 61 6c  return these val
1ce0: 75 65 73 20 61 73 20 6c 6f 63 61 6c 20 74 69 6d  ues as local tim
1cf0: 65 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  es..*/.static vo
1d00: 69 64 20 73 74 61 74 54 69 6d 65 73 54 6f 55 74  id statTimesToUt
1d10: 63 28 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  c(.  const char 
1d20: 2a 7a 50 61 74 68 2c 0a 20 20 73 74 72 75 63 74  *zPath,.  struct
1d30: 20 73 74 61 74 20 2a 70 53 74 61 74 42 75 66 0a   stat *pStatBuf.
1d40: 29 7b 0a 20 20 48 41 4e 44 4c 45 20 68 46 69 6e  ){.  HANDLE hFin
1d50: 64 46 69 6c 65 3b 0a 20 20 57 49 4e 33 32 5f 46  dFile;.  WIN32_F
1d60: 49 4e 44 5f 44 41 54 41 57 20 66 64 3b 0a 20 20  IND_DATAW fd;.  
1d70: 4c 50 57 53 54 52 20 7a 55 6e 69 63 6f 64 65 4e  LPWSTR zUnicodeN
1d80: 61 6d 65 3b 0a 20 20 65 78 74 65 72 6e 20 4c 50  ame;.  extern LP
1d90: 57 53 54 52 20 73 71 6c 69 74 65 33 5f 77 69 6e  WSTR sqlite3_win
1da0: 33 32 5f 75 74 66 38 5f 74 6f 5f 75 6e 69 63 6f  32_utf8_to_unico
1db0: 64 65 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 3b  de(const char*);
1dc0: 0a 20 20 7a 55 6e 69 63 6f 64 65 4e 61 6d 65 20  .  zUnicodeName 
1dd0: 3d 20 73 71 6c 69 74 65 33 5f 77 69 6e 33 32 5f  = sqlite3_win32_
1de0: 75 74 66 38 5f 74 6f 5f 75 6e 69 63 6f 64 65 28  utf8_to_unicode(
1df0: 7a 50 61 74 68 29 3b 0a 20 20 69 66 28 20 7a 55  zPath);.  if( zU
1e00: 6e 69 63 6f 64 65 4e 61 6d 65 20 29 7b 0a 20 20  nicodeName ){.  
1e10: 20 20 6d 65 6d 73 65 74 28 26 66 64 2c 20 30 2c    memset(&fd, 0,
1e20: 20 73 69 7a 65 6f 66 28 57 49 4e 33 32 5f 46 49   sizeof(WIN32_FI
1e30: 4e 44 5f 44 41 54 41 57 29 29 3b 0a 20 20 20 20  ND_DATAW));.    
1e40: 68 46 69 6e 64 46 69 6c 65 20 3d 20 46 69 6e 64  hFindFile = Find
1e50: 46 69 72 73 74 46 69 6c 65 57 28 7a 55 6e 69 63  FirstFileW(zUnic
1e60: 6f 64 65 4e 61 6d 65 2c 20 26 66 64 29 3b 0a 20  odeName, &fd);. 
1e70: 20 20 20 69 66 28 20 68 46 69 6e 64 46 69 6c 65     if( hFindFile
1e80: 21 3d 4e 55 4c 4c 20 29 7b 0a 20 20 20 20 20 20  !=NULL ){.      
1e90: 70 53 74 61 74 42 75 66 2d 3e 73 74 5f 63 74 69  pStatBuf->st_cti
1ea0: 6d 65 20 3d 20 28 74 69 6d 65 5f 74 29 66 69 6c  me = (time_t)fil
1eb0: 65 54 69 6d 65 54 6f 55 6e 69 78 54 69 6d 65 28  eTimeToUnixTime(
1ec0: 26 66 64 2e 66 74 43 72 65 61 74 69 6f 6e 54 69  &fd.ftCreationTi
1ed0: 6d 65 29 3b 0a 20 20 20 20 20 20 70 53 74 61 74  me);.      pStat
1ee0: 42 75 66 2d 3e 73 74 5f 61 74 69 6d 65 20 3d 20  Buf->st_atime = 
1ef0: 28 74 69 6d 65 5f 74 29 66 69 6c 65 54 69 6d 65  (time_t)fileTime
1f00: 54 6f 55 6e 69 78 54 69 6d 65 28 26 66 64 2e 66  ToUnixTime(&fd.f
1f10: 74 4c 61 73 74 41 63 63 65 73 73 54 69 6d 65 29  tLastAccessTime)
1f20: 3b 0a 20 20 20 20 20 20 70 53 74 61 74 42 75 66  ;.      pStatBuf
1f30: 2d 3e 73 74 5f 6d 74 69 6d 65 20 3d 20 28 74 69  ->st_mtime = (ti
1f40: 6d 65 5f 74 29 66 69 6c 65 54 69 6d 65 54 6f 55  me_t)fileTimeToU
1f50: 6e 69 78 54 69 6d 65 28 26 66 64 2e 66 74 4c 61  nixTime(&fd.ftLa
1f60: 73 74 57 72 69 74 65 54 69 6d 65 29 3b 0a 20 20  stWriteTime);.  
1f70: 20 20 20 20 46 69 6e 64 43 6c 6f 73 65 28 68 46      FindClose(hF
1f80: 69 6e 64 46 69 6c 65 29 3b 0a 20 20 20 20 7d 0a  indFile);.    }.
1f90: 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65      sqlite3_free
1fa0: 28 7a 55 6e 69 63 6f 64 65 4e 61 6d 65 29 3b 0a  (zUnicodeName);.
1fb0: 20 20 7d 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f 2a    }.}.#endif../*
1fc0: 0a 2a 2a 20 54 68 69 73 20 66 75 6e 63 74 69 6f  .** This functio
1fd0: 6e 20 69 73 20 75 73 65 64 20 69 6e 20 70 6c 61  n is used in pla
1fe0: 63 65 20 6f 66 20 73 74 61 74 28 29 2e 20 20 4f  ce of stat().  O
1ff0: 6e 20 57 69 6e 64 6f 77 73 2c 20 73 70 65 63 69  n Windows, speci
2000: 61 6c 20 68 61 6e 64 6c 69 6e 67 0a 2a 2a 20 69  al handling.** i
2010: 73 20 72 65 71 75 69 72 65 64 20 69 6e 20 6f 72  s required in or
2020: 64 65 72 20 66 6f 72 20 74 68 65 20 69 6e 63 6c  der for the incl
2030: 75 64 65 64 20 74 69 6d 65 20 74 6f 20 62 65 20  uded time to be 
2040: 72 65 74 75 72 6e 65 64 20 61 73 20 55 54 43 2e  returned as UTC.
2050: 20 20 4f 6e 20 61 6c 6c 0a 2a 2a 20 6f 74 68 65    On all.** othe
2060: 72 20 73 79 73 74 65 6d 73 2c 20 74 68 69 73 20  r systems, this 
2070: 66 75 6e 63 74 69 6f 6e 20 73 69 6d 70 6c 79 20  function simply 
2080: 63 61 6c 6c 73 20 73 74 61 74 28 29 2e 0a 2a 2f  calls stat()..*/
2090: 0a 73 74 61 74 69 63 20 69 6e 74 20 66 69 6c 65  .static int file
20a0: 53 74 61 74 28 0a 20 20 63 6f 6e 73 74 20 63 68  Stat(.  const ch
20b0: 61 72 20 2a 7a 50 61 74 68 2c 0a 20 20 73 74 72  ar *zPath,.  str
20c0: 75 63 74 20 73 74 61 74 20 2a 70 53 74 61 74 42  uct stat *pStatB
20d0: 75 66 0a 29 7b 0a 23 69 66 20 64 65 66 69 6e 65  uf.){.#if define
20e0: 64 28 5f 57 49 4e 33 32 29 0a 20 20 69 6e 74 20  d(_WIN32).  int 
20f0: 72 63 20 3d 20 73 74 61 74 28 7a 50 61 74 68 2c  rc = stat(zPath,
2100: 20 70 53 74 61 74 42 75 66 29 3b 0a 20 20 69 66   pStatBuf);.  if
2110: 28 20 72 63 3d 3d 30 20 29 20 73 74 61 74 54 69  ( rc==0 ) statTi
2120: 6d 65 73 54 6f 55 74 63 28 7a 50 61 74 68 2c 20  mesToUtc(zPath, 
2130: 70 53 74 61 74 42 75 66 29 3b 0a 20 20 72 65 74  pStatBuf);.  ret
2140: 75 72 6e 20 72 63 3b 0a 23 65 6c 73 65 0a 20 20  urn rc;.#else.  
2150: 72 65 74 75 72 6e 20 73 74 61 74 28 7a 50 61 74  return stat(zPat
2160: 68 2c 20 70 53 74 61 74 42 75 66 29 3b 0a 23 65  h, pStatBuf);.#e
2170: 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  ndif.}../*.** Th
2180: 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 75  is function is u
2190: 73 65 64 20 69 6e 20 70 6c 61 63 65 20 6f 66 20  sed in place of 
21a0: 6c 73 74 61 74 28 29 2e 20 20 4f 6e 20 57 69 6e  lstat().  On Win
21b0: 64 6f 77 73 2c 20 73 70 65 63 69 61 6c 20 68 61  dows, special ha
21c0: 6e 64 6c 69 6e 67 0a 2a 2a 20 69 73 20 72 65 71  ndling.** is req
21d0: 75 69 72 65 64 20 69 6e 20 6f 72 64 65 72 20 66  uired in order f
21e0: 6f 72 20 74 68 65 20 69 6e 63 6c 75 64 65 64 20  or the included 
21f0: 74 69 6d 65 20 74 6f 20 62 65 20 72 65 74 75 72  time to be retur
2200: 6e 65 64 20 61 73 20 55 54 43 2e 20 20 4f 6e 20  ned as UTC.  On 
2210: 61 6c 6c 0a 2a 2a 20 6f 74 68 65 72 20 73 79 73  all.** other sys
2220: 74 65 6d 73 2c 20 74 68 69 73 20 66 75 6e 63 74  tems, this funct
2230: 69 6f 6e 20 73 69 6d 70 6c 79 20 63 61 6c 6c 73  ion simply calls
2240: 20 6c 73 74 61 74 28 29 2e 0a 2a 2f 0a 73 74 61   lstat()..*/.sta
2250: 74 69 63 20 69 6e 74 20 66 69 6c 65 4c 69 6e 6b  tic int fileLink
2260: 53 74 61 74 28 0a 20 20 63 6f 6e 73 74 20 63 68  Stat(.  const ch
2270: 61 72 20 2a 7a 50 61 74 68 2c 0a 20 20 73 74 72  ar *zPath,.  str
2280: 75 63 74 20 73 74 61 74 20 2a 70 53 74 61 74 42  uct stat *pStatB
2290: 75 66 0a 29 7b 0a 23 69 66 20 64 65 66 69 6e 65  uf.){.#if define
22a0: 64 28 5f 57 49 4e 33 32 29 0a 20 20 69 6e 74 20  d(_WIN32).  int 
22b0: 72 63 20 3d 20 6c 73 74 61 74 28 7a 50 61 74 68  rc = lstat(zPath
22c0: 2c 20 70 53 74 61 74 42 75 66 29 3b 0a 20 20 69  , pStatBuf);.  i
22d0: 66 28 20 72 63 3d 3d 30 20 29 20 73 74 61 74 54  f( rc==0 ) statT
22e0: 69 6d 65 73 54 6f 55 74 63 28 7a 50 61 74 68 2c  imesToUtc(zPath,
22f0: 20 70 53 74 61 74 42 75 66 29 3b 0a 20 20 72 65   pStatBuf);.  re
2300: 74 75 72 6e 20 72 63 3b 0a 23 65 6c 73 65 0a 20  turn rc;.#else. 
2310: 20 72 65 74 75 72 6e 20 6c 73 74 61 74 28 7a 50   return lstat(zP
2320: 61 74 68 2c 20 70 53 74 61 74 42 75 66 29 3b 0a  ath, pStatBuf);.
2330: 23 65 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  #endif.}../*.** 
2340: 41 72 67 75 6d 65 6e 74 20 7a 46 69 6c 65 20 69  Argument zFile i
2350: 73 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 20  s the name of a 
2360: 66 69 6c 65 20 74 68 61 74 20 77 69 6c 6c 20 62  file that will b
2370: 65 20 63 72 65 61 74 65 64 20 61 6e 64 2f 6f 72  e created and/or
2380: 20 77 72 69 74 74 65 6e 0a 2a 2a 20 62 79 20 53   written.** by S
2390: 51 4c 20 66 75 6e 63 74 69 6f 6e 20 77 72 69 74  QL function writ
23a0: 65 66 69 6c 65 28 29 2e 20 54 68 69 73 20 66 75  efile(). This fu
23b0: 6e 63 74 69 6f 6e 20 65 6e 73 75 72 65 73 20 74  nction ensures t
23c0: 68 61 74 20 74 68 65 20 64 69 72 65 63 74 6f 72  hat the director
23d0: 79 0a 2a 2a 20 7a 46 69 6c 65 20 77 69 6c 6c 20  y.** zFile will 
23e0: 62 65 20 77 72 69 74 74 65 6e 20 74 6f 20 65 78  be written to ex
23f0: 69 73 74 73 2c 20 63 72 65 61 74 69 6e 67 20 69  ists, creating i
2400: 74 20 69 66 20 72 65 71 75 69 72 65 64 2e 20 54  t if required. T
2410: 68 65 20 70 65 72 6d 69 73 73 69 6f 6e 73 0a 2a  he permissions.*
2420: 2a 20 66 6f 72 20 61 6e 79 20 70 61 74 68 20 63  * for any path c
2430: 6f 6d 70 6f 6e 65 6e 74 73 20 63 72 65 61 74 65  omponents create
2440: 64 20 62 79 20 74 68 69 73 20 66 75 6e 63 74 69  d by this functi
2450: 6f 6e 20 61 72 65 20 73 65 74 20 74 6f 20 28 6d  on are set to (m
2460: 6f 64 65 26 30 37 37 37 29 2e 0a 2a 2a 0a 2a 2a  ode&0777)..**.**
2470: 20 49 66 20 61 6e 20 4f 4f 4d 20 63 6f 6e 64 69   If an OOM condi
2480: 74 69 6f 6e 20 69 73 20 65 6e 63 6f 75 6e 74 65  tion is encounte
2490: 72 65 64 2c 20 53 51 4c 49 54 45 5f 4e 4f 4d 45  red, SQLITE_NOME
24a0: 4d 20 69 73 20 72 65 74 75 72 6e 65 64 2e 20 4f  M is returned. O
24b0: 74 68 65 72 77 69 73 65 2c 0a 2a 2a 20 53 51 4c  therwise,.** SQL
24c0: 49 54 45 5f 4f 4b 20 69 73 20 72 65 74 75 72 6e  ITE_OK is return
24d0: 65 64 20 69 66 20 74 68 65 20 64 69 72 65 63 74  ed if the direct
24e0: 6f 72 79 20 69 73 20 73 75 63 63 65 73 73 66 75  ory is successfu
24f0: 6c 6c 79 20 63 72 65 61 74 65 64 2c 20 6f 72 0a  lly created, or.
2500: 2a 2a 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 20  ** SQLITE_ERROR 
2510: 6f 74 68 65 72 77 69 73 65 2e 0a 2a 2f 0a 73 74  otherwise..*/.st
2520: 61 74 69 63 20 69 6e 74 20 6d 61 6b 65 44 69 72  atic int makeDir
2530: 65 63 74 6f 72 79 28 0a 20 20 63 6f 6e 73 74 20  ectory(.  const 
2540: 63 68 61 72 20 2a 7a 46 69 6c 65 2c 0a 20 20 6d  char *zFile,.  m
2550: 6f 64 65 5f 74 20 6d 6f 64 65 0a 29 7b 0a 20 20  ode_t mode.){.  
2560: 63 68 61 72 20 2a 7a 43 6f 70 79 20 3d 20 73 71  char *zCopy = sq
2570: 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 28 22 25  lite3_mprintf("%
2580: 73 22 2c 20 7a 46 69 6c 65 29 3b 0a 20 20 69 6e  s", zFile);.  in
2590: 74 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b  t rc = SQLITE_OK
25a0: 3b 0a 0a 20 20 69 66 28 20 7a 43 6f 70 79 3d 3d  ;..  if( zCopy==
25b0: 30 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 53 51  0 ){.    rc = SQ
25c0: 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d 65  LITE_NOMEM;.  }e
25d0: 6c 73 65 7b 0a 20 20 20 20 69 6e 74 20 6e 43 6f  lse{.    int nCo
25e0: 70 79 20 3d 20 28 69 6e 74 29 73 74 72 6c 65 6e  py = (int)strlen
25f0: 28 7a 43 6f 70 79 29 3b 0a 20 20 20 20 69 6e 74  (zCopy);.    int
2600: 20 69 20 3d 20 31 3b 0a 0a 20 20 20 20 77 68 69   i = 1;..    whi
2610: 6c 65 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f  le( rc==SQLITE_O
2620: 4b 20 29 7b 0a 20 20 20 20 20 20 73 74 72 75 63  K ){.      struc
2630: 74 20 73 74 61 74 20 73 53 74 61 74 3b 0a 20 20  t stat sStat;.  
2640: 20 20 20 20 69 6e 74 20 72 63 32 3b 0a 0a 20 20      int rc2;..  
2650: 20 20 20 20 66 6f 72 28 3b 20 7a 43 6f 70 79 5b      for(; zCopy[
2660: 69 5d 21 3d 27 2f 27 20 26 26 20 69 3c 6e 43 6f  i]!='/' && i<nCo
2670: 70 79 3b 20 69 2b 2b 29 3b 0a 20 20 20 20 20 20  py; i++);.      
2680: 69 66 28 20 69 3d 3d 6e 43 6f 70 79 20 29 20 62  if( i==nCopy ) b
2690: 72 65 61 6b 3b 0a 20 20 20 20 20 20 7a 43 6f 70  reak;.      zCop
26a0: 79 5b 69 5d 20 3d 20 27 5c 30 27 3b 0a 0a 20 20  y[i] = '\0';..  
26b0: 20 20 20 20 72 63 32 20 3d 20 66 69 6c 65 53 74      rc2 = fileSt
26c0: 61 74 28 7a 43 6f 70 79 2c 20 26 73 53 74 61 74  at(zCopy, &sStat
26d0: 29 3b 0a 20 20 20 20 20 20 69 66 28 20 72 63 32  );.      if( rc2
26e0: 21 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69  !=0 ){.        i
26f0: 66 28 20 6d 6b 64 69 72 28 7a 43 6f 70 79 2c 20  f( mkdir(zCopy, 
2700: 6d 6f 64 65 20 26 20 30 37 37 37 29 20 29 20 72  mode & 0777) ) r
2710: 63 20 3d 20 53 51 4c 49 54 45 5f 45 52 52 4f 52  c = SQLITE_ERROR
2720: 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20  ;.      }else{. 
2730: 20 20 20 20 20 20 20 69 66 28 20 21 53 5f 49 53         if( !S_IS
2740: 44 49 52 28 73 53 74 61 74 2e 73 74 5f 6d 6f 64  DIR(sStat.st_mod
2750: 65 29 20 29 20 72 63 20 3d 20 53 51 4c 49 54 45  e) ) rc = SQLITE
2760: 5f 45 52 52 4f 52 3b 0a 20 20 20 20 20 20 7d 0a  _ERROR;.      }.
2770: 20 20 20 20 20 20 7a 43 6f 70 79 5b 69 5d 20 3d        zCopy[i] =
2780: 20 27 2f 27 3b 0a 20 20 20 20 20 20 69 2b 2b 3b   '/';.      i++;
2790: 0a 20 20 20 20 7d 0a 0a 20 20 20 20 73 71 6c 69  .    }..    sqli
27a0: 74 65 33 5f 66 72 65 65 28 7a 43 6f 70 79 29 3b  te3_free(zCopy);
27b0: 0a 20 20 7d 0a 0a 20 20 72 65 74 75 72 6e 20 72  .  }..  return r
27c0: 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73  c;.}../*.** This
27d0: 20 66 75 6e 63 74 69 6f 6e 20 64 6f 65 73 20 74   function does t
27e0: 68 65 20 77 6f 72 6b 20 66 6f 72 20 74 68 65 20  he work for the 
27f0: 77 72 69 74 65 66 69 6c 65 28 29 20 55 44 46 2e  writefile() UDF.
2800: 20 52 65 66 65 72 20 74 6f 20 0a 2a 2a 20 68 65   Refer to .** he
2810: 61 64 65 72 20 63 6f 6d 6d 65 6e 74 73 20 61 74  ader comments at
2820: 20 74 68 65 20 74 6f 70 20 6f 66 20 74 68 69 73   the top of this
2830: 20 66 69 6c 65 20 66 6f 72 20 64 65 74 61 69 6c   file for detail
2840: 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74  s..*/.static int
2850: 20 77 72 69 74 65 46 69 6c 65 28 0a 20 20 73 71   writeFile(.  sq
2860: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 70  lite3_context *p
2870: 43 74 78 2c 20 20 20 20 20 20 20 20 20 20 2f 2a  Ctx,          /*
2880: 20 43 6f 6e 74 65 78 74 20 74 6f 20 72 65 74 75   Context to retu
2890: 72 6e 20 62 79 74 65 73 20 77 72 69 74 74 65 6e  rn bytes written
28a0: 20 69 6e 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63   in */.  const c
28b0: 68 61 72 20 2a 7a 46 69 6c 65 2c 20 20 20 20 20  har *zFile,     
28c0: 20 20 20 20 20 20 20 20 20 2f 2a 20 46 69 6c 65           /* File
28d0: 20 74 6f 20 77 72 69 74 65 20 2a 2f 0a 20 20 73   to write */.  s
28e0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 70 44  qlite3_value *pD
28f0: 61 74 61 2c 20 20 20 20 20 20 20 20 20 20 20 2f  ata,           /
2900: 2a 20 44 61 74 61 20 74 6f 20 77 72 69 74 65 20  * Data to write 
2910: 2a 2f 0a 20 20 6d 6f 64 65 5f 74 20 6d 6f 64 65  */.  mode_t mode
2920: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
2930: 20 20 20 20 20 2f 2a 20 4d 4f 44 45 20 70 61 72       /* MODE par
2940: 61 6d 65 74 65 72 20 70 61 73 73 65 64 20 74 6f  ameter passed to
2950: 20 77 72 69 74 65 66 69 6c 65 28 29 20 2a 2f 0a   writefile() */.
2960: 20 20 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20    sqlite3_int64 
2970: 6d 74 69 6d 65 20 20 20 20 20 20 20 20 20 20 20  mtime           
2980: 20 20 2f 2a 20 4d 54 49 4d 45 20 70 61 72 61 6d    /* MTIME param
2990: 65 74 65 72 20 28 6f 72 20 2d 31 20 74 6f 20 6e  eter (or -1 to n
29a0: 6f 74 20 73 65 74 20 74 69 6d 65 29 20 2a 2f 0a  ot set time) */.
29b0: 29 7b 0a 23 69 66 20 21 64 65 66 69 6e 65 64 28  ){.#if !defined(
29c0: 5f 57 49 4e 33 32 29 20 26 26 20 21 64 65 66 69  _WIN32) && !defi
29d0: 6e 65 64 28 57 49 4e 33 32 29 0a 20 20 69 66 28  ned(WIN32).  if(
29e0: 20 53 5f 49 53 4c 4e 4b 28 6d 6f 64 65 29 20 29   S_ISLNK(mode) )
29f0: 7b 0a 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72  {.    const char
2a00: 20 2a 7a 54 6f 20 3d 20 28 63 6f 6e 73 74 20 63   *zTo = (const c
2a10: 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  har*)sqlite3_val
2a20: 75 65 5f 74 65 78 74 28 70 44 61 74 61 29 3b 0a  ue_text(pData);.
2a30: 20 20 20 20 69 66 28 20 73 79 6d 6c 69 6e 6b 28      if( symlink(
2a40: 7a 54 6f 2c 20 7a 46 69 6c 65 29 3c 30 20 29 20  zTo, zFile)<0 ) 
2a50: 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d 65 6c 73  return 1;.  }els
2a60: 65 0a 23 65 6e 64 69 66 0a 20 20 7b 0a 20 20 20  e.#endif.  {.   
2a70: 20 69 66 28 20 53 5f 49 53 44 49 52 28 6d 6f 64   if( S_ISDIR(mod
2a80: 65 29 20 29 7b 0a 20 20 20 20 20 20 69 66 28 20  e) ){.      if( 
2a90: 6d 6b 64 69 72 28 7a 46 69 6c 65 2c 20 6d 6f 64  mkdir(zFile, mod
2aa0: 65 29 20 29 7b 0a 20 20 20 20 20 20 20 20 2f 2a  e) ){.        /*
2ab0: 20 54 68 65 20 6d 6b 64 69 72 28 29 20 63 61 6c   The mkdir() cal
2ac0: 6c 20 74 6f 20 63 72 65 61 74 65 20 74 68 65 20  l to create the 
2ad0: 64 69 72 65 63 74 6f 72 79 20 66 61 69 6c 65 64  directory failed
2ae0: 2e 20 54 68 69 73 20 6d 69 67 68 74 20 6e 6f 74  . This might not
2af0: 0a 20 20 20 20 20 20 20 20 2a 2a 20 62 65 20 61  .        ** be a
2b00: 6e 20 65 72 72 6f 72 20 74 68 6f 75 67 68 20 2d  n error though -
2b10: 20 69 66 20 74 68 65 72 65 20 69 73 20 61 6c 72   if there is alr
2b20: 65 61 64 79 20 61 20 64 69 72 65 63 74 6f 72 79  eady a directory
2b30: 20 61 74 20 74 68 65 20 73 61 6d 65 0a 20 20 20   at the same.   
2b40: 20 20 20 20 20 2a 2a 20 70 61 74 68 20 61 6e 64       ** path and
2b50: 20 65 69 74 68 65 72 20 74 68 65 20 70 65 72 6d   either the perm
2b60: 69 73 73 69 6f 6e 73 20 61 6c 72 65 61 64 79 20  issions already 
2b70: 6d 61 74 63 68 20 6f 72 20 63 61 6e 20 62 65 20  match or can be 
2b80: 63 68 61 6e 67 65 64 0a 20 20 20 20 20 20 20 20  changed.        
2b90: 2a 2a 20 74 6f 20 64 6f 20 73 6f 20 75 73 69 6e  ** to do so usin
2ba0: 67 20 63 68 6d 6f 64 28 29 2c 20 69 74 20 69 73  g chmod(), it is
2bb0: 20 6e 6f 74 20 61 6e 20 65 72 72 6f 72 2e 20 20   not an error.  
2bc0: 2a 2f 0a 20 20 20 20 20 20 20 20 73 74 72 75 63  */.        struc
2bd0: 74 20 73 74 61 74 20 73 53 74 61 74 3b 0a 20 20  t stat sStat;.  
2be0: 20 20 20 20 20 20 69 66 28 20 65 72 72 6e 6f 21        if( errno!
2bf0: 3d 45 45 58 49 53 54 0a 20 20 20 20 20 20 20 20  =EEXIST.        
2c00: 20 7c 7c 20 30 21 3d 66 69 6c 65 53 74 61 74 28   || 0!=fileStat(
2c10: 7a 46 69 6c 65 2c 20 26 73 53 74 61 74 29 0a 20  zFile, &sStat). 
2c20: 20 20 20 20 20 20 20 20 7c 7c 20 21 53 5f 49 53          || !S_IS
2c30: 44 49 52 28 73 53 74 61 74 2e 73 74 5f 6d 6f 64  DIR(sStat.st_mod
2c40: 65 29 0a 20 20 20 20 20 20 20 20 20 7c 7c 20 28  e).         || (
2c50: 28 73 53 74 61 74 2e 73 74 5f 6d 6f 64 65 26 30  (sStat.st_mode&0
2c60: 37 37 37 29 21 3d 28 6d 6f 64 65 26 30 37 37 37  777)!=(mode&0777
2c70: 29 20 26 26 20 30 21 3d 63 68 6d 6f 64 28 7a 46  ) && 0!=chmod(zF
2c80: 69 6c 65 2c 20 6d 6f 64 65 26 30 37 37 37 29 29  ile, mode&0777))
2c90: 0a 20 20 20 20 20 20 20 20 29 7b 0a 20 20 20 20  .        ){.    
2ca0: 20 20 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a        return 1;.
2cb0: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
2cc0: 7d 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20  }.    }else{.   
2cd0: 20 20 20 73 71 6c 69 74 65 33 5f 69 6e 74 36 34     sqlite3_int64
2ce0: 20 6e 57 72 69 74 65 20 3d 20 30 3b 0a 20 20 20   nWrite = 0;.   
2cf0: 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a     const char *z
2d00: 3b 0a 20 20 20 20 20 20 69 6e 74 20 72 63 20 3d  ;.      int rc =
2d10: 20 30 3b 0a 20 20 20 20 20 20 46 49 4c 45 20 2a   0;.      FILE *
2d20: 6f 75 74 20 3d 20 66 6f 70 65 6e 28 7a 46 69 6c  out = fopen(zFil
2d30: 65 2c 20 22 77 62 22 29 3b 0a 20 20 20 20 20 20  e, "wb");.      
2d40: 69 66 28 20 6f 75 74 3d 3d 30 20 29 20 72 65 74  if( out==0 ) ret
2d50: 75 72 6e 20 31 3b 0a 20 20 20 20 20 20 7a 20 3d  urn 1;.      z =
2d60: 20 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 73 71   (const char*)sq
2d70: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62  lite3_value_blob
2d80: 28 70 44 61 74 61 29 3b 0a 20 20 20 20 20 20 69  (pData);.      i
2d90: 66 28 20 7a 20 29 7b 0a 20 20 20 20 20 20 20 20  f( z ){.        
2da0: 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20 6e 20  sqlite3_int64 n 
2db0: 3d 20 66 77 72 69 74 65 28 7a 2c 20 31 2c 20 73  = fwrite(z, 1, s
2dc0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 79 74  qlite3_value_byt
2dd0: 65 73 28 70 44 61 74 61 29 2c 20 6f 75 74 29 3b  es(pData), out);
2de0: 0a 20 20 20 20 20 20 20 20 6e 57 72 69 74 65 20  .        nWrite 
2df0: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  = sqlite3_value_
2e00: 62 79 74 65 73 28 70 44 61 74 61 29 3b 0a 20 20  bytes(pData);.  
2e10: 20 20 20 20 20 20 69 66 28 20 6e 57 72 69 74 65        if( nWrite
2e20: 21 3d 6e 20 29 7b 0a 20 20 20 20 20 20 20 20 20  !=n ){.         
2e30: 20 72 63 20 3d 20 31 3b 0a 20 20 20 20 20 20 20   rc = 1;.       
2e40: 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20   }.      }.     
2e50: 20 66 63 6c 6f 73 65 28 6f 75 74 29 3b 0a 20 20   fclose(out);.  
2e60: 20 20 20 20 69 66 28 20 72 63 3d 3d 30 20 26 26      if( rc==0 &&
2e70: 20 6d 6f 64 65 20 26 26 20 63 68 6d 6f 64 28 7a   mode && chmod(z
2e80: 46 69 6c 65 2c 20 6d 6f 64 65 20 26 20 30 37 37  File, mode & 077
2e90: 37 29 20 29 7b 0a 20 20 20 20 20 20 20 20 72 63  7) ){.        rc
2ea0: 20 3d 20 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20   = 1;.      }.  
2eb0: 20 20 20 20 69 66 28 20 72 63 20 29 20 72 65 74      if( rc ) ret
2ec0: 75 72 6e 20 32 3b 0a 20 20 20 20 20 20 73 71 6c  urn 2;.      sql
2ed0: 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 36  ite3_result_int6
2ee0: 34 28 70 43 74 78 2c 20 6e 57 72 69 74 65 29 3b  4(pCtx, nWrite);
2ef0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 69 66  .    }.  }..  if
2f00: 28 20 6d 74 69 6d 65 3e 3d 30 20 29 7b 0a 23 69  ( mtime>=0 ){.#i
2f10: 66 20 64 65 66 69 6e 65 64 28 5f 57 49 4e 33 32  f defined(_WIN32
2f20: 29 0a 20 20 20 20 2f 2a 20 57 69 6e 64 6f 77 73  ).    /* Windows
2f30: 20 2a 2f 0a 20 20 20 20 46 49 4c 45 54 49 4d 45   */.    FILETIME
2f40: 20 6c 61 73 74 41 63 63 65 73 73 3b 0a 20 20 20   lastAccess;.   
2f50: 20 46 49 4c 45 54 49 4d 45 20 6c 61 73 74 57 72   FILETIME lastWr
2f60: 69 74 65 3b 0a 20 20 20 20 53 59 53 54 45 4d 54  ite;.    SYSTEMT
2f70: 49 4d 45 20 63 75 72 72 65 6e 74 54 69 6d 65 3b  IME currentTime;
2f80: 0a 20 20 20 20 4c 4f 4e 47 4c 4f 4e 47 20 69 6e  .    LONGLONG in
2f90: 74 65 72 76 61 6c 73 3b 0a 20 20 20 20 48 41 4e  tervals;.    HAN
2fa0: 44 4c 45 20 68 46 69 6c 65 3b 0a 20 20 20 20 4c  DLE hFile;.    L
2fb0: 50 57 53 54 52 20 7a 55 6e 69 63 6f 64 65 4e 61  PWSTR zUnicodeNa
2fc0: 6d 65 3b 0a 20 20 20 20 65 78 74 65 72 6e 20 4c  me;.    extern L
2fd0: 50 57 53 54 52 20 73 71 6c 69 74 65 33 5f 77 69  PWSTR sqlite3_wi
2fe0: 6e 33 32 5f 75 74 66 38 5f 74 6f 5f 75 6e 69 63  n32_utf8_to_unic
2ff0: 6f 64 65 28 63 6f 6e 73 74 20 63 68 61 72 2a 29  ode(const char*)
3000: 3b 0a 0a 20 20 20 20 47 65 74 53 79 73 74 65 6d  ;..    GetSystem
3010: 54 69 6d 65 28 26 63 75 72 72 65 6e 74 54 69 6d  Time(&currentTim
3020: 65 29 3b 0a 20 20 20 20 53 79 73 74 65 6d 54 69  e);.    SystemTi
3030: 6d 65 54 6f 46 69 6c 65 54 69 6d 65 28 26 63 75  meToFileTime(&cu
3040: 72 72 65 6e 74 54 69 6d 65 2c 20 26 6c 61 73 74  rrentTime, &last
3050: 41 63 63 65 73 73 29 3b 0a 20 20 20 20 69 6e 74  Access);.    int
3060: 65 72 76 61 6c 73 20 3d 20 49 6e 74 33 32 78 33  ervals = Int32x3
3070: 32 54 6f 36 34 28 6d 74 69 6d 65 2c 20 31 30 30  2To64(mtime, 100
3080: 30 30 30 30 30 29 20 2b 20 31 31 36 34 34 34 37  00000) + 1164447
3090: 33 36 30 30 30 30 30 30 30 30 30 3b 0a 20 20 20  36000000000;.   
30a0: 20 6c 61 73 74 57 72 69 74 65 2e 64 77 4c 6f 77   lastWrite.dwLow
30b0: 44 61 74 65 54 69 6d 65 20 3d 20 28 44 57 4f 52  DateTime = (DWOR
30c0: 44 29 69 6e 74 65 72 76 61 6c 73 3b 0a 20 20 20  D)intervals;.   
30d0: 20 6c 61 73 74 57 72 69 74 65 2e 64 77 48 69 67   lastWrite.dwHig
30e0: 68 44 61 74 65 54 69 6d 65 20 3d 20 69 6e 74 65  hDateTime = inte
30f0: 72 76 61 6c 73 20 3e 3e 20 33 32 3b 0a 20 20 20  rvals >> 32;.   
3100: 20 7a 55 6e 69 63 6f 64 65 4e 61 6d 65 20 3d 20   zUnicodeName = 
3110: 73 71 6c 69 74 65 33 5f 77 69 6e 33 32 5f 75 74  sqlite3_win32_ut
3120: 66 38 5f 74 6f 5f 75 6e 69 63 6f 64 65 28 7a 46  f8_to_unicode(zF
3130: 69 6c 65 29 3b 0a 20 20 20 20 69 66 28 20 7a 55  ile);.    if( zU
3140: 6e 69 63 6f 64 65 4e 61 6d 65 3d 3d 30 20 29 7b  nicodeName==0 ){
3150: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 20 31 3b  .      return 1;
3160: 0a 20 20 20 20 7d 0a 20 20 20 20 68 46 69 6c 65  .    }.    hFile
3170: 20 3d 20 43 72 65 61 74 65 46 69 6c 65 57 28 0a   = CreateFileW(.
3180: 20 20 20 20 20 20 7a 55 6e 69 63 6f 64 65 4e 61        zUnicodeNa
3190: 6d 65 2c 20 46 49 4c 45 5f 57 52 49 54 45 5f 41  me, FILE_WRITE_A
31a0: 54 54 52 49 42 55 54 45 53 2c 20 30 2c 20 4e 55  TTRIBUTES, 0, NU
31b0: 4c 4c 2c 20 4f 50 45 4e 5f 45 58 49 53 54 49 4e  LL, OPEN_EXISTIN
31c0: 47 2c 0a 20 20 20 20 20 20 46 49 4c 45 5f 46 4c  G,.      FILE_FL
31d0: 41 47 5f 42 41 43 4b 55 50 5f 53 45 4d 41 4e 54  AG_BACKUP_SEMANT
31e0: 49 43 53 2c 20 4e 55 4c 4c 0a 20 20 20 20 29 3b  ICS, NULL.    );
31f0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65  .    sqlite3_fre
3200: 65 28 7a 55 6e 69 63 6f 64 65 4e 61 6d 65 29 3b  e(zUnicodeName);
3210: 0a 20 20 20 20 69 66 28 20 68 46 69 6c 65 21 3d  .    if( hFile!=
3220: 49 4e 56 41 4c 49 44 5f 48 41 4e 44 4c 45 5f 56  INVALID_HANDLE_V
3230: 41 4c 55 45 20 29 7b 0a 20 20 20 20 20 20 42 4f  ALUE ){.      BO
3240: 4f 4c 20 62 52 65 73 75 6c 74 20 3d 20 53 65 74  OL bResult = Set
3250: 46 69 6c 65 54 69 6d 65 28 68 46 69 6c 65 2c 20  FileTime(hFile, 
3260: 4e 55 4c 4c 2c 20 26 6c 61 73 74 41 63 63 65 73  NULL, &lastAcces
3270: 73 2c 20 26 6c 61 73 74 57 72 69 74 65 29 3b 0a  s, &lastWrite);.
3280: 20 20 20 20 20 20 43 6c 6f 73 65 48 61 6e 64 6c        CloseHandl
3290: 65 28 68 46 69 6c 65 29 3b 0a 20 20 20 20 20 20  e(hFile);.      
32a0: 72 65 74 75 72 6e 20 21 62 52 65 73 75 6c 74 3b  return !bResult;
32b0: 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  .    }else{.    
32c0: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20    return 1;.    
32d0: 7d 0a 23 65 6c 69 66 20 64 65 66 69 6e 65 64 28  }.#elif defined(
32e0: 41 54 5f 46 44 43 57 44 29 20 26 26 20 30 20 2f  AT_FDCWD) && 0 /
32f0: 2a 20 75 74 69 6d 65 6e 73 61 74 28 29 20 69 73  * utimensat() is
3300: 20 6e 6f 74 20 75 6e 69 76 65 72 73 61 6c 6c 79   not universally
3310: 20 61 76 61 69 6c 61 62 6c 65 20 2a 2f 0a 20 20   available */.  
3320: 20 20 2f 2a 20 52 65 63 65 6e 74 20 75 6e 69 78    /* Recent unix
3330: 20 2a 2f 0a 20 20 20 20 73 74 72 75 63 74 20 74   */.    struct t
3340: 69 6d 65 73 70 65 63 20 74 69 6d 65 73 5b 32 5d  imespec times[2]
3350: 3b 0a 20 20 20 20 74 69 6d 65 73 5b 30 5d 2e 74  ;.    times[0].t
3360: 76 5f 6e 73 65 63 20 3d 20 74 69 6d 65 73 5b 31  v_nsec = times[1
3370: 5d 2e 74 76 5f 6e 73 65 63 20 3d 20 30 3b 0a 20  ].tv_nsec = 0;. 
3380: 20 20 20 74 69 6d 65 73 5b 30 5d 2e 74 76 5f 73     times[0].tv_s
3390: 65 63 20 3d 20 74 69 6d 65 28 30 29 3b 0a 20 20  ec = time(0);.  
33a0: 20 20 74 69 6d 65 73 5b 31 5d 2e 74 76 5f 73 65    times[1].tv_se
33b0: 63 20 3d 20 6d 74 69 6d 65 3b 0a 20 20 20 20 69  c = mtime;.    i
33c0: 66 28 20 75 74 69 6d 65 6e 73 61 74 28 41 54 5f  f( utimensat(AT_
33d0: 46 44 43 57 44 2c 20 7a 46 69 6c 65 2c 20 74 69  FDCWD, zFile, ti
33e0: 6d 65 73 2c 20 41 54 5f 53 59 4d 4c 49 4e 4b 5f  mes, AT_SYMLINK_
33f0: 4e 4f 46 4f 4c 4c 4f 57 29 20 29 7b 0a 20 20 20  NOFOLLOW) ){.   
3400: 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20     return 1;.   
3410: 20 7d 0a 23 65 6c 73 65 0a 20 20 20 20 2f 2a 20   }.#else.    /* 
3420: 4c 65 67 61 63 79 20 75 6e 69 78 20 2a 2f 0a 20  Legacy unix */. 
3430: 20 20 20 73 74 72 75 63 74 20 74 69 6d 65 76 61     struct timeva
3440: 6c 20 74 69 6d 65 73 5b 32 5d 3b 0a 20 20 20 20  l times[2];.    
3450: 74 69 6d 65 73 5b 30 5d 2e 74 76 5f 75 73 65 63  times[0].tv_usec
3460: 20 3d 20 74 69 6d 65 73 5b 31 5d 2e 74 76 5f 75   = times[1].tv_u
3470: 73 65 63 20 3d 20 30 3b 0a 20 20 20 20 74 69 6d  sec = 0;.    tim
3480: 65 73 5b 30 5d 2e 74 76 5f 73 65 63 20 3d 20 74  es[0].tv_sec = t
3490: 69 6d 65 28 30 29 3b 0a 20 20 20 20 74 69 6d 65  ime(0);.    time
34a0: 73 5b 31 5d 2e 74 76 5f 73 65 63 20 3d 20 6d 74  s[1].tv_sec = mt
34b0: 69 6d 65 3b 0a 20 20 20 20 69 66 28 20 75 74 69  ime;.    if( uti
34c0: 6d 65 73 28 7a 46 69 6c 65 2c 20 74 69 6d 65 73  mes(zFile, times
34d0: 29 20 29 7b 0a 20 20 20 20 20 20 72 65 74 75 72  ) ){.      retur
34e0: 6e 20 31 3b 0a 20 20 20 20 7d 0a 23 65 6e 64 69  n 1;.    }.#endi
34f0: 66 0a 20 20 7d 0a 0a 20 20 72 65 74 75 72 6e 20  f.  }..  return 
3500: 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6d 70 6c  0;.}../*.** Impl
3510: 65 6d 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68  ementation of th
3520: 65 20 22 77 72 69 74 65 66 69 6c 65 28 57 2c 58  e "writefile(W,X
3530: 5b 2c 59 5b 2c 5a 5d 5d 5d 29 22 20 53 51 4c 20  [,Y[,Z]]])" SQL 
3540: 66 75 6e 63 74 69 6f 6e 2e 20 20 0a 2a 2a 20 52  function.  .** R
3550: 65 66 65 72 20 74 6f 20 68 65 61 64 65 72 20 63  efer to header c
3560: 6f 6d 6d 65 6e 74 73 20 61 74 20 74 68 65 20 74  omments at the t
3570: 6f 70 20 6f 66 20 74 68 69 73 20 66 69 6c 65 20  op of this file 
3580: 66 6f 72 20 64 65 74 61 69 6c 73 2e 0a 2a 2f 0a  for details..*/.
3590: 73 74 61 74 69 63 20 76 6f 69 64 20 77 72 69 74  static void writ
35a0: 65 66 69 6c 65 46 75 6e 63 28 0a 20 20 73 71 6c  efileFunc(.  sql
35b0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
35c0: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
35d0: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
35e0: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63  ue **argv.){.  c
35f0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65  onst char *zFile
3600: 3b 0a 20 20 6d 6f 64 65 5f 74 20 6d 6f 64 65 20  ;.  mode_t mode 
3610: 3d 20 30 3b 0a 20 20 69 6e 74 20 72 65 73 3b 0a  = 0;.  int res;.
3620: 20 20 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20    sqlite3_int64 
3630: 6d 74 69 6d 65 20 3d 20 2d 31 3b 0a 0a 20 20 69  mtime = -1;..  i
3640: 66 28 20 61 72 67 63 3c 32 20 7c 7c 20 61 72 67  f( argc<2 || arg
3650: 63 3e 34 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  c>4 ){.    sqlit
3660: 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28  e3_result_error(
3670: 63 6f 6e 74 65 78 74 2c 20 0a 20 20 20 20 20 20  context, .      
3680: 20 20 22 77 72 6f 6e 67 20 6e 75 6d 62 65 72 20    "wrong number 
3690: 6f 66 20 61 72 67 75 6d 65 6e 74 73 20 74 6f 20  of arguments to 
36a0: 66 75 6e 63 74 69 6f 6e 20 77 72 69 74 65 66 69  function writefi
36b0: 6c 65 28 29 22 2c 20 2d 31 0a 20 20 20 20 29 3b  le()", -1.    );
36c0: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
36d0: 0a 0a 20 20 7a 46 69 6c 65 20 3d 20 28 63 6f 6e  ..  zFile = (con
36e0: 73 74 20 63 68 61 72 2a 29 73 71 6c 69 74 65 33  st char*)sqlite3
36f0: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76  _value_text(argv
3700: 5b 30 5d 29 3b 0a 20 20 69 66 28 20 7a 46 69 6c  [0]);.  if( zFil
3710: 65 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20  e==0 ) return;. 
3720: 20 69 66 28 20 61 72 67 63 3e 3d 33 20 29 7b 0a   if( argc>=3 ){.
3730: 20 20 20 20 6d 6f 64 65 20 3d 20 28 6d 6f 64 65      mode = (mode
3740: 5f 74 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  _t)sqlite3_value
3750: 5f 69 6e 74 28 61 72 67 76 5b 32 5d 29 3b 0a 20  _int(argv[2]);. 
3760: 20 7d 0a 20 20 69 66 28 20 61 72 67 63 3d 3d 34   }.  if( argc==4
3770: 20 29 7b 0a 20 20 20 20 6d 74 69 6d 65 20 3d 20   ){.    mtime = 
3780: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e  sqlite3_value_in
3790: 74 36 34 28 61 72 67 76 5b 33 5d 29 3b 0a 20 20  t64(argv[3]);.  
37a0: 7d 0a 0a 20 20 72 65 73 20 3d 20 77 72 69 74 65  }..  res = write
37b0: 46 69 6c 65 28 63 6f 6e 74 65 78 74 2c 20 7a 46  File(context, zF
37c0: 69 6c 65 2c 20 61 72 67 76 5b 31 5d 2c 20 6d 6f  ile, argv[1], mo
37d0: 64 65 2c 20 6d 74 69 6d 65 29 3b 0a 20 20 69 66  de, mtime);.  if
37e0: 28 20 72 65 73 3d 3d 31 20 26 26 20 65 72 72 6e  ( res==1 && errn
37f0: 6f 3d 3d 45 4e 4f 45 4e 54 20 29 7b 0a 20 20 20  o==ENOENT ){.   
3800: 20 69 66 28 20 6d 61 6b 65 44 69 72 65 63 74 6f   if( makeDirecto
3810: 72 79 28 7a 46 69 6c 65 2c 20 6d 6f 64 65 29 3d  ry(zFile, mode)=
3820: 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20  =SQLITE_OK ){.  
3830: 20 20 20 20 72 65 73 20 3d 20 77 72 69 74 65 46      res = writeF
3840: 69 6c 65 28 63 6f 6e 74 65 78 74 2c 20 7a 46 69  ile(context, zFi
3850: 6c 65 2c 20 61 72 67 76 5b 31 5d 2c 20 6d 6f 64  le, argv[1], mod
3860: 65 2c 20 6d 74 69 6d 65 29 3b 0a 20 20 20 20 7d  e, mtime);.    }
3870: 0a 20 20 7d 0a 0a 20 20 69 66 28 20 61 72 67 63  .  }..  if( argc
3880: 3e 32 20 26 26 20 72 65 73 21 3d 30 20 29 7b 0a  >2 && res!=0 ){.
3890: 20 20 20 20 69 66 28 20 53 5f 49 53 4c 4e 4b 28      if( S_ISLNK(
38a0: 6d 6f 64 65 29 20 29 7b 0a 20 20 20 20 20 20 63  mode) ){.      c
38b0: 74 78 45 72 72 6f 72 4d 73 67 28 63 6f 6e 74 65  txErrorMsg(conte
38c0: 78 74 2c 20 22 66 61 69 6c 65 64 20 74 6f 20 63  xt, "failed to c
38d0: 72 65 61 74 65 20 73 79 6d 6c 69 6e 6b 3a 20 25  reate symlink: %
38e0: 73 22 2c 20 7a 46 69 6c 65 29 3b 0a 20 20 20 20  s", zFile);.    
38f0: 7d 65 6c 73 65 20 69 66 28 20 53 5f 49 53 44 49  }else if( S_ISDI
3900: 52 28 6d 6f 64 65 29 20 29 7b 0a 20 20 20 20 20  R(mode) ){.     
3910: 20 63 74 78 45 72 72 6f 72 4d 73 67 28 63 6f 6e   ctxErrorMsg(con
3920: 74 65 78 74 2c 20 22 66 61 69 6c 65 64 20 74 6f  text, "failed to
3930: 20 63 72 65 61 74 65 20 64 69 72 65 63 74 6f 72   create director
3940: 79 3a 20 25 73 22 2c 20 7a 46 69 6c 65 29 3b 0a  y: %s", zFile);.
3950: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
3960: 20 63 74 78 45 72 72 6f 72 4d 73 67 28 63 6f 6e   ctxErrorMsg(con
3970: 74 65 78 74 2c 20 22 66 61 69 6c 65 64 20 74 6f  text, "failed to
3980: 20 77 72 69 74 65 20 66 69 6c 65 3a 20 25 73 22   write file: %s"
3990: 2c 20 7a 46 69 6c 65 29 3b 0a 20 20 20 20 7d 0a  , zFile);.    }.
39a0: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 51 4c    }.}../*.** SQL
39b0: 20 66 75 6e 63 74 69 6f 6e 3a 20 20 20 6c 73 6d   function:   lsm
39c0: 6f 64 65 28 4d 4f 44 45 29 0a 2a 2a 0a 2a 2a 20  ode(MODE).**.** 
39d0: 47 69 76 65 6e 20 61 20 6e 75 6d 62 65 72 69 63  Given a numberic
39e0: 20 73 74 5f 6d 6f 64 65 20 66 72 6f 6d 20 73 74   st_mode from st
39f0: 61 74 28 29 2c 20 63 6f 6e 76 65 72 74 20 69 74  at(), convert it
3a00: 20 69 6e 74 6f 20 61 20 68 75 6d 61 6e 2d 72 65   into a human-re
3a10: 61 64 61 62 6c 65 0a 2a 2a 20 74 65 78 74 20 73  adable.** text s
3a20: 74 72 69 6e 67 20 69 6e 20 74 68 65 20 73 74 79  tring in the sty
3a30: 6c 65 20 6f 66 20 22 6c 73 20 2d 6c 22 2e 0a 2a  le of "ls -l"..*
3a40: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6c 73  /.static void ls
3a50: 4d 6f 64 65 46 75 6e 63 28 0a 20 20 73 71 6c 69  ModeFunc(.  sqli
3a60: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e  te3_context *con
3a70: 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63  text,.  int argc
3a80: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75  ,.  sqlite3_valu
3a90: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e  e **argv.){.  in
3aa0: 74 20 69 3b 0a 20 20 69 6e 74 20 69 4d 6f 64 65  t i;.  int iMode
3ab0: 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65   = sqlite3_value
3ac0: 5f 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  _int(argv[0]);. 
3ad0: 20 63 68 61 72 20 7a 5b 31 36 5d 3b 0a 20 20 28   char z[16];.  (
3ae0: 76 6f 69 64 29 61 72 67 63 3b 0a 20 20 69 66 28  void)argc;.  if(
3af0: 20 53 5f 49 53 4c 4e 4b 28 69 4d 6f 64 65 29 20   S_ISLNK(iMode) 
3b00: 29 7b 0a 20 20 20 20 7a 5b 30 5d 20 3d 20 27 6c  ){.    z[0] = 'l
3b10: 27 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 53  ';.  }else if( S
3b20: 5f 49 53 52 45 47 28 69 4d 6f 64 65 29 20 29 7b  _ISREG(iMode) ){
3b30: 0a 20 20 20 20 7a 5b 30 5d 20 3d 20 27 2d 27 3b  .    z[0] = '-';
3b40: 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 53 5f 49  .  }else if( S_I
3b50: 53 44 49 52 28 69 4d 6f 64 65 29 20 29 7b 0a 20  SDIR(iMode) ){. 
3b60: 20 20 20 7a 5b 30 5d 20 3d 20 27 64 27 3b 0a 20     z[0] = 'd';. 
3b70: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 5b 30 5d   }else{.    z[0]
3b80: 20 3d 20 27 3f 27 3b 0a 20 20 7d 0a 20 20 66 6f   = '?';.  }.  fo
3b90: 72 28 69 3d 30 3b 20 69 3c 33 3b 20 69 2b 2b 29  r(i=0; i<3; i++)
3ba0: 7b 0a 20 20 20 20 69 6e 74 20 6d 20 3d 20 28 69  {.    int m = (i
3bb0: 4d 6f 64 65 20 3e 3e 20 28 28 32 2d 69 29 2a 33  Mode >> ((2-i)*3
3bc0: 29 29 3b 0a 20 20 20 20 63 68 61 72 20 2a 61 20  ));.    char *a 
3bd0: 3d 20 26 7a 5b 31 20 2b 20 69 2a 33 5d 3b 0a 20  = &z[1 + i*3];. 
3be0: 20 20 20 61 5b 30 5d 20 3d 20 28 6d 20 26 20 30     a[0] = (m & 0
3bf0: 78 34 29 20 3f 20 27 72 27 20 3a 20 27 2d 27 3b  x4) ? 'r' : '-';
3c00: 0a 20 20 20 20 61 5b 31 5d 20 3d 20 28 6d 20 26  .    a[1] = (m &
3c10: 20 30 78 32 29 20 3f 20 27 77 27 20 3a 20 27 2d   0x2) ? 'w' : '-
3c20: 27 3b 0a 20 20 20 20 61 5b 32 5d 20 3d 20 28 6d  ';.    a[2] = (m
3c30: 20 26 20 30 78 31 29 20 3f 20 27 78 27 20 3a 20   & 0x1) ? 'x' : 
3c40: 27 2d 27 3b 0a 20 20 7d 0a 20 20 7a 5b 31 30 5d  '-';.  }.  z[10]
3c50: 20 3d 20 27 5c 30 27 3b 0a 20 20 73 71 6c 69 74   = '\0';.  sqlit
3c60: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63  e3_result_text(c
3c70: 6f 6e 74 65 78 74 2c 20 7a 2c 20 2d 31 2c 20 53  ontext, z, -1, S
3c80: 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 29  QLITE_TRANSIENT)
3c90: 3b 0a 7d 0a 0a 23 69 66 6e 64 65 66 20 53 51 4c  ;.}..#ifndef SQL
3ca0: 49 54 45 5f 4f 4d 49 54 5f 56 49 52 54 55 41 4c  ITE_OMIT_VIRTUAL
3cb0: 54 41 42 4c 45 0a 0a 2f 2a 20 0a 2a 2a 20 43 75  TABLE../* .** Cu
3cc0: 72 73 6f 72 20 74 79 70 65 20 66 6f 72 20 72 65  rsor type for re
3cd0: 63 75 72 73 69 76 65 6c 79 20 69 74 65 72 61 74  cursively iterat
3ce0: 69 6e 67 20 74 68 72 6f 75 67 68 20 61 20 64 69  ing through a di
3cf0: 72 65 63 74 6f 72 79 20 73 74 72 75 63 74 75 72  rectory structur
3d00: 65 2e 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73 74  e..*/.typedef st
3d10: 72 75 63 74 20 66 73 64 69 72 5f 63 75 72 73 6f  ruct fsdir_curso
3d20: 72 20 66 73 64 69 72 5f 63 75 72 73 6f 72 3b 0a  r fsdir_cursor;.
3d30: 74 79 70 65 64 65 66 20 73 74 72 75 63 74 20 46  typedef struct F
3d40: 73 64 69 72 4c 65 76 65 6c 20 46 73 64 69 72 4c  sdirLevel FsdirL
3d50: 65 76 65 6c 3b 0a 0a 73 74 72 75 63 74 20 46 73  evel;..struct Fs
3d60: 64 69 72 4c 65 76 65 6c 20 7b 0a 20 20 44 49 52  dirLevel {.  DIR
3d70: 20 2a 70 44 69 72 3b 20 20 20 20 20 20 20 20 20   *pDir;         
3d80: 20 20 20 20 20 20 20 20 2f 2a 20 46 72 6f 6d 20          /* From 
3d90: 6f 70 65 6e 64 69 72 28 29 20 2a 2f 0a 20 20 63  opendir() */.  c
3da0: 68 61 72 20 2a 7a 44 69 72 3b 20 20 20 20 20 20  har *zDir;      
3db0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 61 6d            /* Nam
3dc0: 65 20 6f 66 20 64 69 72 65 63 74 6f 72 79 20 28  e of directory (
3dd0: 6e 75 6c 2d 74 65 72 6d 69 6e 61 74 65 64 29 20  nul-terminated) 
3de0: 2a 2f 0a 7d 3b 0a 0a 73 74 72 75 63 74 20 66 73  */.};..struct fs
3df0: 64 69 72 5f 63 75 72 73 6f 72 20 7b 0a 20 20 73  dir_cursor {.  s
3e00: 71 6c 69 74 65 33 5f 76 74 61 62 5f 63 75 72 73  qlite3_vtab_curs
3e10: 6f 72 20 62 61 73 65 3b 20 20 2f 2a 20 42 61 73  or base;  /* Bas
3e20: 65 20 63 6c 61 73 73 20 2d 20 6d 75 73 74 20 62  e class - must b
3e30: 65 20 66 69 72 73 74 20 2a 2f 0a 0a 20 20 69 6e  e first */..  in
3e40: 74 20 6e 4c 76 6c 3b 20 20 20 20 20 20 20 20 20  t nLvl;         
3e50: 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62           /* Numb
3e60: 65 72 20 6f 66 20 65 6e 74 72 69 65 73 20 69 6e  er of entries in
3e70: 20 61 4c 76 6c 5b 5d 20 61 72 72 61 79 20 2a 2f   aLvl[] array */
3e80: 0a 20 20 69 6e 74 20 69 4c 76 6c 3b 20 20 20 20  .  int iLvl;    
3e90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
3ea0: 20 49 6e 64 65 78 20 6f 66 20 63 75 72 72 65 6e   Index of curren
3eb0: 74 20 65 6e 74 72 79 20 2a 2f 0a 20 20 46 73 64  t entry */.  Fsd
3ec0: 69 72 4c 65 76 65 6c 20 2a 61 4c 76 6c 3b 20 20  irLevel *aLvl;  
3ed0: 20 20 20 20 20 20 20 20 2f 2a 20 48 69 65 72 61          /* Hiera
3ee0: 72 63 68 79 20 6f 66 20 64 69 72 65 63 74 6f 72  rchy of director
3ef0: 69 65 73 20 62 65 69 6e 67 20 74 72 61 76 65 72  ies being traver
3f00: 73 65 64 20 2a 2f 0a 0a 20 20 63 6f 6e 73 74 20  sed */..  const 
3f10: 63 68 61 72 20 2a 7a 42 61 73 65 3b 0a 20 20 69  char *zBase;.  i
3f20: 6e 74 20 6e 42 61 73 65 3b 0a 0a 20 20 73 74 72  nt nBase;..  str
3f30: 75 63 74 20 73 74 61 74 20 73 53 74 61 74 3b 20  uct stat sStat; 
3f40: 20 20 20 20 20 20 20 20 2f 2a 20 43 75 72 72 65          /* Curre
3f50: 6e 74 20 6c 73 74 61 74 28 29 20 72 65 73 75 6c  nt lstat() resul
3f60: 74 73 20 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 50  ts */.  char *zP
3f70: 61 74 68 3b 20 20 20 20 20 20 20 20 20 20 20 20  ath;            
3f80: 20 20 20 2f 2a 20 50 61 74 68 20 74 6f 20 63 75     /* Path to cu
3f90: 72 72 65 6e 74 20 65 6e 74 72 79 20 2a 2f 0a 20  rrent entry */. 
3fa0: 20 73 71 6c 69 74 65 33 5f 69 6e 74 36 34 20 69   sqlite3_int64 i
3fb0: 52 6f 77 69 64 3b 20 20 20 20 20 20 2f 2a 20 43  Rowid;      /* C
3fc0: 75 72 72 65 6e 74 20 72 6f 77 69 64 20 2a 2f 0a  urrent rowid */.
3fd0: 7d 3b 0a 0a 74 79 70 65 64 65 66 20 73 74 72 75  };..typedef stru
3fe0: 63 74 20 66 73 64 69 72 5f 74 61 62 20 66 73 64  ct fsdir_tab fsd
3ff0: 69 72 5f 74 61 62 3b 0a 73 74 72 75 63 74 20 66  ir_tab;.struct f
4000: 73 64 69 72 5f 74 61 62 20 7b 0a 20 20 73 71 6c  sdir_tab {.  sql
4010: 69 74 65 33 5f 76 74 61 62 20 62 61 73 65 3b 20  ite3_vtab base; 
4020: 20 20 20 20 20 20 20 20 2f 2a 20 42 61 73 65 20          /* Base 
4030: 63 6c 61 73 73 20 2d 20 6d 75 73 74 20 62 65 20  class - must be 
4040: 66 69 72 73 74 20 2a 2f 0a 7d 3b 0a 0a 2f 2a 0a  first */.};../*.
4050: 2a 2a 20 43 6f 6e 73 74 72 75 63 74 20 61 20 6e  ** Construct a n
4060: 65 77 20 66 73 64 69 72 20 76 69 72 74 75 61 6c  ew fsdir virtual
4070: 20 74 61 62 6c 65 20 6f 62 6a 65 63 74 2e 0a 2a   table object..*
4080: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 66 73 64  /.static int fsd
4090: 69 72 43 6f 6e 6e 65 63 74 28 0a 20 20 73 71 6c  irConnect(.  sql
40a0: 69 74 65 33 20 2a 64 62 2c 0a 20 20 76 6f 69 64  ite3 *db,.  void
40b0: 20 2a 70 41 75 78 2c 0a 20 20 69 6e 74 20 61 72   *pAux,.  int ar
40c0: 67 63 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  gc, const char *
40d0: 63 6f 6e 73 74 2a 61 72 67 76 2c 0a 20 20 73 71  const*argv,.  sq
40e0: 6c 69 74 65 33 5f 76 74 61 62 20 2a 2a 70 70 56  lite3_vtab **ppV
40f0: 74 61 62 2c 0a 20 20 63 68 61 72 20 2a 2a 70 7a  tab,.  char **pz
4100: 45 72 72 0a 29 7b 0a 20 20 66 73 64 69 72 5f 74  Err.){.  fsdir_t
4110: 61 62 20 2a 70 4e 65 77 20 3d 20 30 3b 0a 20 20  ab *pNew = 0;.  
4120: 69 6e 74 20 72 63 3b 0a 20 20 28 76 6f 69 64 29  int rc;.  (void)
4130: 70 41 75 78 3b 0a 20 20 28 76 6f 69 64 29 61 72  pAux;.  (void)ar
4140: 67 63 3b 0a 20 20 28 76 6f 69 64 29 61 72 67 76  gc;.  (void)argv
4150: 3b 0a 20 20 28 76 6f 69 64 29 70 7a 45 72 72 3b  ;.  (void)pzErr;
4160: 0a 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f  .  rc = sqlite3_
4170: 64 65 63 6c 61 72 65 5f 76 74 61 62 28 64 62 2c  declare_vtab(db,
4180: 20 22 43 52 45 41 54 45 20 54 41 42 4c 45 20 78   "CREATE TABLE x
4190: 22 20 46 53 44 49 52 5f 53 43 48 45 4d 41 29 3b  " FSDIR_SCHEMA);
41a0: 0a 20 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54  .  if( rc==SQLIT
41b0: 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 70 4e 65 77  E_OK ){.    pNew
41c0: 20 3d 20 28 66 73 64 69 72 5f 74 61 62 2a 29 73   = (fsdir_tab*)s
41d0: 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 28 20 73  qlite3_malloc( s
41e0: 69 7a 65 6f 66 28 2a 70 4e 65 77 29 20 29 3b 0a  izeof(*pNew) );.
41f0: 20 20 20 20 69 66 28 20 70 4e 65 77 3d 3d 30 20      if( pNew==0 
4200: 29 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f  ) return SQLITE_
4210: 4e 4f 4d 45 4d 3b 0a 20 20 20 20 6d 65 6d 73 65  NOMEM;.    memse
4220: 74 28 70 4e 65 77 2c 20 30 2c 20 73 69 7a 65 6f  t(pNew, 0, sizeo
4230: 66 28 2a 70 4e 65 77 29 29 3b 0a 20 20 7d 0a 20  f(*pNew));.  }. 
4240: 20 2a 70 70 56 74 61 62 20 3d 20 28 73 71 6c 69   *ppVtab = (sqli
4250: 74 65 33 5f 76 74 61 62 2a 29 70 4e 65 77 3b 0a  te3_vtab*)pNew;.
4260: 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a    return rc;.}..
4270: 2f 2a 0a 2a 2a 20 54 68 69 73 20 6d 65 74 68 6f  /*.** This metho
4280: 64 20 69 73 20 74 68 65 20 64 65 73 74 72 75 63  d is the destruc
4290: 74 6f 72 20 66 6f 72 20 66 73 64 69 72 20 76 74  tor for fsdir vt
42a0: 61 62 20 6f 62 6a 65 63 74 73 2e 0a 2a 2f 0a 73  ab objects..*/.s
42b0: 74 61 74 69 63 20 69 6e 74 20 66 73 64 69 72 44  tatic int fsdirD
42c0: 69 73 63 6f 6e 6e 65 63 74 28 73 71 6c 69 74 65  isconnect(sqlite
42d0: 33 5f 76 74 61 62 20 2a 70 56 74 61 62 29 7b 0a  3_vtab *pVtab){.
42e0: 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 70    sqlite3_free(p
42f0: 56 74 61 62 29 3b 0a 20 20 72 65 74 75 72 6e 20  Vtab);.  return 
4300: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a  SQLITE_OK;.}../*
4310: 0a 2a 2a 20 43 6f 6e 73 74 72 75 63 74 6f 72 20  .** Constructor 
4320: 66 6f 72 20 61 20 6e 65 77 20 66 73 64 69 72 5f  for a new fsdir_
4330: 63 75 72 73 6f 72 20 6f 62 6a 65 63 74 2e 0a 2a  cursor object..*
4340: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 66 73 64  /.static int fsd
4350: 69 72 4f 70 65 6e 28 73 71 6c 69 74 65 33 5f 76  irOpen(sqlite3_v
4360: 74 61 62 20 2a 70 2c 20 73 71 6c 69 74 65 33 5f  tab *p, sqlite3_
4370: 76 74 61 62 5f 63 75 72 73 6f 72 20 2a 2a 70 70  vtab_cursor **pp
4380: 43 75 72 73 6f 72 29 7b 0a 20 20 66 73 64 69 72  Cursor){.  fsdir
4390: 5f 63 75 72 73 6f 72 20 2a 70 43 75 72 3b 0a 20  _cursor *pCur;. 
43a0: 20 28 76 6f 69 64 29 70 3b 0a 20 20 70 43 75 72   (void)p;.  pCur
43b0: 20 3d 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f   = sqlite3_mallo
43c0: 63 28 20 73 69 7a 65 6f 66 28 2a 70 43 75 72 29  c( sizeof(*pCur)
43d0: 20 29 3b 0a 20 20 69 66 28 20 70 43 75 72 3d 3d   );.  if( pCur==
43e0: 30 20 29 20 72 65 74 75 72 6e 20 53 51 4c 49 54  0 ) return SQLIT
43f0: 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 6d 65 6d 73 65  E_NOMEM;.  memse
4400: 74 28 70 43 75 72 2c 20 30 2c 20 73 69 7a 65 6f  t(pCur, 0, sizeo
4410: 66 28 2a 70 43 75 72 29 29 3b 0a 20 20 70 43 75  f(*pCur));.  pCu
4420: 72 2d 3e 69 4c 76 6c 20 3d 20 2d 31 3b 0a 20 20  r->iLvl = -1;.  
4430: 2a 70 70 43 75 72 73 6f 72 20 3d 20 26 70 43 75  *ppCursor = &pCu
4440: 72 2d 3e 62 61 73 65 3b 0a 20 20 72 65 74 75 72  r->base;.  retur
4450: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a  n SQLITE_OK;.}..
4460: 2f 2a 0a 2a 2a 20 52 65 73 65 74 20 61 20 63 75  /*.** Reset a cu
4470: 72 73 6f 72 20 62 61 63 6b 20 74 6f 20 74 68 65  rsor back to the
4480: 20 73 74 61 74 65 20 69 74 20 77 61 73 20 69 6e   state it was in
4490: 20 77 68 65 6e 20 66 69 72 73 74 20 72 65 74 75   when first retu
44a0: 72 6e 65 64 0a 2a 2a 20 62 79 20 66 73 64 69 72  rned.** by fsdir
44b0: 4f 70 65 6e 28 29 2e 0a 2a 2f 0a 73 74 61 74 69  Open()..*/.stati
44c0: 63 20 76 6f 69 64 20 66 73 64 69 72 52 65 73 65  c void fsdirRese
44d0: 74 43 75 72 73 6f 72 28 66 73 64 69 72 5f 63 75  tCursor(fsdir_cu
44e0: 72 73 6f 72 20 2a 70 43 75 72 29 7b 0a 20 20 69  rsor *pCur){.  i
44f0: 6e 74 20 69 3b 0a 20 20 66 6f 72 28 69 3d 30 3b  nt i;.  for(i=0;
4500: 20 69 3c 3d 70 43 75 72 2d 3e 69 4c 76 6c 3b 20   i<=pCur->iLvl; 
4510: 69 2b 2b 29 7b 0a 20 20 20 20 46 73 64 69 72 4c  i++){.    FsdirL
4520: 65 76 65 6c 20 2a 70 4c 76 6c 20 3d 20 26 70 43  evel *pLvl = &pC
4530: 75 72 2d 3e 61 4c 76 6c 5b 69 5d 3b 0a 20 20 20  ur->aLvl[i];.   
4540: 20 69 66 28 20 70 4c 76 6c 2d 3e 70 44 69 72 20   if( pLvl->pDir 
4550: 29 20 63 6c 6f 73 65 64 69 72 28 70 4c 76 6c 2d  ) closedir(pLvl-
4560: 3e 70 44 69 72 29 3b 0a 20 20 20 20 73 71 6c 69  >pDir);.    sqli
4570: 74 65 33 5f 66 72 65 65 28 70 4c 76 6c 2d 3e 7a  te3_free(pLvl->z
4580: 44 69 72 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69  Dir);.  }.  sqli
4590: 74 65 33 5f 66 72 65 65 28 70 43 75 72 2d 3e 7a  te3_free(pCur->z
45a0: 50 61 74 68 29 3b 0a 20 20 73 71 6c 69 74 65 33  Path);.  sqlite3
45b0: 5f 66 72 65 65 28 70 43 75 72 2d 3e 61 4c 76 6c  _free(pCur->aLvl
45c0: 29 3b 0a 20 20 70 43 75 72 2d 3e 61 4c 76 6c 20  );.  pCur->aLvl 
45d0: 3d 20 30 3b 0a 20 20 70 43 75 72 2d 3e 7a 50 61  = 0;.  pCur->zPa
45e0: 74 68 20 3d 20 30 3b 0a 20 20 70 43 75 72 2d 3e  th = 0;.  pCur->
45f0: 7a 42 61 73 65 20 3d 20 30 3b 0a 20 20 70 43 75  zBase = 0;.  pCu
4600: 72 2d 3e 6e 42 61 73 65 20 3d 20 30 3b 0a 20 20  r->nBase = 0;.  
4610: 70 43 75 72 2d 3e 6e 4c 76 6c 20 3d 20 30 3b 0a  pCur->nLvl = 0;.
4620: 20 20 70 43 75 72 2d 3e 69 4c 76 6c 20 3d 20 2d    pCur->iLvl = -
4630: 31 3b 0a 20 20 70 43 75 72 2d 3e 69 52 6f 77 69  1;.  pCur->iRowi
4640: 64 20 3d 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  d = 1;.}../*.** 
4650: 44 65 73 74 72 75 63 74 6f 72 20 66 6f 72 20 61  Destructor for a
4660: 6e 20 66 73 64 69 72 5f 63 75 72 73 6f 72 2e 0a  n fsdir_cursor..
4670: 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 66 73  */.static int fs
4680: 64 69 72 43 6c 6f 73 65 28 73 71 6c 69 74 65 33  dirClose(sqlite3
4690: 5f 76 74 61 62 5f 63 75 72 73 6f 72 20 2a 63 75  _vtab_cursor *cu
46a0: 72 29 7b 0a 20 20 66 73 64 69 72 5f 63 75 72 73  r){.  fsdir_curs
46b0: 6f 72 20 2a 70 43 75 72 20 3d 20 28 66 73 64 69  or *pCur = (fsdi
46c0: 72 5f 63 75 72 73 6f 72 2a 29 63 75 72 3b 0a 0a  r_cursor*)cur;..
46d0: 20 20 66 73 64 69 72 52 65 73 65 74 43 75 72 73    fsdirResetCurs
46e0: 6f 72 28 70 43 75 72 29 3b 0a 20 20 73 71 6c 69  or(pCur);.  sqli
46f0: 74 65 33 5f 66 72 65 65 28 70 43 75 72 29 3b 0a  te3_free(pCur);.
4700: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
4710: 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 65 74  OK;.}../*.** Set
4720: 20 74 68 65 20 65 72 72 6f 72 20 6d 65 73 73 61   the error messa
4730: 67 65 20 66 6f 72 20 74 68 65 20 76 69 72 74 75  ge for the virtu
4740: 61 6c 20 74 61 62 6c 65 20 61 73 73 6f 63 69 61  al table associa
4750: 74 65 64 20 77 69 74 68 20 63 75 72 73 6f 72 0a  ted with cursor.
4760: 2a 2a 20 70 43 75 72 20 74 6f 20 74 68 65 20 72  ** pCur to the r
4770: 65 73 75 6c 74 73 20 6f 66 20 76 70 72 69 6e 74  esults of vprint
4780: 66 28 7a 46 6d 74 2c 20 2e 2e 2e 29 2e 0a 2a 2f  f(zFmt, ...)..*/
4790: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 66 73 64  .static void fsd
47a0: 69 72 53 65 74 45 72 72 6d 73 67 28 66 73 64 69  irSetErrmsg(fsdi
47b0: 72 5f 63 75 72 73 6f 72 20 2a 70 43 75 72 2c 20  r_cursor *pCur, 
47c0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6d 74  const char *zFmt
47d0: 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 73  , ...){.  va_lis
47e0: 74 20 61 70 3b 0a 20 20 76 61 5f 73 74 61 72 74  t ap;.  va_start
47f0: 28 61 70 2c 20 7a 46 6d 74 29 3b 0a 20 20 70 43  (ap, zFmt);.  pC
4800: 75 72 2d 3e 62 61 73 65 2e 70 56 74 61 62 2d 3e  ur->base.pVtab->
4810: 7a 45 72 72 4d 73 67 20 3d 20 73 71 6c 69 74 65  zErrMsg = sqlite
4820: 33 5f 76 6d 70 72 69 6e 74 66 28 7a 46 6d 74 2c  3_vmprintf(zFmt,
4830: 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61   ap);.  va_end(a
4840: 70 29 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 41 64  p);.}.../*.** Ad
4850: 76 61 6e 63 65 20 61 6e 20 66 73 64 69 72 5f 63  vance an fsdir_c
4860: 75 72 73 6f 72 20 74 6f 20 69 74 73 20 6e 65 78  ursor to its nex
4870: 74 20 72 6f 77 20 6f 66 20 6f 75 74 70 75 74 2e  t row of output.
4880: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 66  .*/.static int f
4890: 73 64 69 72 4e 65 78 74 28 73 71 6c 69 74 65 33  sdirNext(sqlite3
48a0: 5f 76 74 61 62 5f 63 75 72 73 6f 72 20 2a 63 75  _vtab_cursor *cu
48b0: 72 29 7b 0a 20 20 66 73 64 69 72 5f 63 75 72 73  r){.  fsdir_curs
48c0: 6f 72 20 2a 70 43 75 72 20 3d 20 28 66 73 64 69  or *pCur = (fsdi
48d0: 72 5f 63 75 72 73 6f 72 2a 29 63 75 72 3b 0a 20  r_cursor*)cur;. 
48e0: 20 6d 6f 64 65 5f 74 20 6d 20 3d 20 70 43 75 72   mode_t m = pCur
48f0: 2d 3e 73 53 74 61 74 2e 73 74 5f 6d 6f 64 65 3b  ->sStat.st_mode;
4900: 0a 0a 20 20 70 43 75 72 2d 3e 69 52 6f 77 69 64  ..  pCur->iRowid
4910: 2b 2b 3b 0a 20 20 69 66 28 20 53 5f 49 53 44 49  ++;.  if( S_ISDI
4920: 52 28 6d 29 20 29 7b 0a 20 20 20 20 2f 2a 20 44  R(m) ){.    /* D
4930: 65 73 63 65 6e 64 20 69 6e 74 6f 20 74 68 69 73  escend into this
4940: 20 64 69 72 65 63 74 6f 72 79 20 2a 2f 0a 20 20   directory */.  
4950: 20 20 69 6e 74 20 69 4e 65 77 20 3d 20 70 43 75    int iNew = pCu
4960: 72 2d 3e 69 4c 76 6c 20 2b 20 31 3b 0a 20 20 20  r->iLvl + 1;.   
4970: 20 46 73 64 69 72 4c 65 76 65 6c 20 2a 70 4c 76   FsdirLevel *pLv
4980: 6c 3b 0a 20 20 20 20 69 66 28 20 69 4e 65 77 3e  l;.    if( iNew>
4990: 3d 70 43 75 72 2d 3e 6e 4c 76 6c 20 29 7b 0a 20  =pCur->nLvl ){. 
49a0: 20 20 20 20 20 69 6e 74 20 6e 4e 65 77 20 3d 20       int nNew = 
49b0: 69 4e 65 77 2b 31 3b 0a 20 20 20 20 20 20 73 71  iNew+1;.      sq
49c0: 6c 69 74 65 33 5f 69 6e 74 36 34 20 6e 42 79 74  lite3_int64 nByt
49d0: 65 20 3d 20 6e 4e 65 77 2a 73 69 7a 65 6f 66 28  e = nNew*sizeof(
49e0: 46 73 64 69 72 4c 65 76 65 6c 29 3b 0a 20 20 20  FsdirLevel);.   
49f0: 20 20 20 46 73 64 69 72 4c 65 76 65 6c 20 2a 61     FsdirLevel *a
4a00: 4e 65 77 20 3d 20 28 46 73 64 69 72 4c 65 76 65  New = (FsdirLeve
4a10: 6c 2a 29 73 71 6c 69 74 65 33 5f 72 65 61 6c 6c  l*)sqlite3_reall
4a20: 6f 63 36 34 28 70 43 75 72 2d 3e 61 4c 76 6c 2c  oc64(pCur->aLvl,
4a30: 20 6e 42 79 74 65 29 3b 0a 20 20 20 20 20 20 69   nByte);.      i
4a40: 66 28 20 61 4e 65 77 3d 3d 30 20 29 20 72 65 74  f( aNew==0 ) ret
4a50: 75 72 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d  urn SQLITE_NOMEM
4a60: 3b 0a 20 20 20 20 20 20 6d 65 6d 73 65 74 28 26  ;.      memset(&
4a70: 61 4e 65 77 5b 70 43 75 72 2d 3e 6e 4c 76 6c 5d  aNew[pCur->nLvl]
4a80: 2c 20 30 2c 20 73 69 7a 65 6f 66 28 46 73 64 69  , 0, sizeof(Fsdi
4a90: 72 4c 65 76 65 6c 29 2a 28 6e 4e 65 77 2d 70 43  rLevel)*(nNew-pC
4aa0: 75 72 2d 3e 6e 4c 76 6c 29 29 3b 0a 20 20 20 20  ur->nLvl));.    
4ab0: 20 20 70 43 75 72 2d 3e 61 4c 76 6c 20 3d 20 61    pCur->aLvl = a
4ac0: 4e 65 77 3b 0a 20 20 20 20 20 20 70 43 75 72 2d  New;.      pCur-
4ad0: 3e 6e 4c 76 6c 20 3d 20 6e 4e 65 77 3b 0a 20 20  >nLvl = nNew;.  
4ae0: 20 20 7d 0a 20 20 20 20 70 43 75 72 2d 3e 69 4c    }.    pCur->iL
4af0: 76 6c 20 3d 20 69 4e 65 77 3b 0a 20 20 20 20 70  vl = iNew;.    p
4b00: 4c 76 6c 20 3d 20 26 70 43 75 72 2d 3e 61 4c 76  Lvl = &pCur->aLv
4b10: 6c 5b 69 4e 65 77 5d 3b 0a 20 20 20 20 0a 20 20  l[iNew];.    .  
4b20: 20 20 70 4c 76 6c 2d 3e 7a 44 69 72 20 3d 20 70    pLvl->zDir = p
4b30: 43 75 72 2d 3e 7a 50 61 74 68 3b 0a 20 20 20 20  Cur->zPath;.    
4b40: 70 43 75 72 2d 3e 7a 50 61 74 68 20 3d 20 30 3b  pCur->zPath = 0;
4b50: 0a 20 20 20 20 70 4c 76 6c 2d 3e 70 44 69 72 20  .    pLvl->pDir 
4b60: 3d 20 6f 70 65 6e 64 69 72 28 70 4c 76 6c 2d 3e  = opendir(pLvl->
4b70: 7a 44 69 72 29 3b 0a 20 20 20 20 69 66 28 20 70  zDir);.    if( p
4b80: 4c 76 6c 2d 3e 70 44 69 72 3d 3d 30 20 29 7b 0a  Lvl->pDir==0 ){.
4b90: 20 20 20 20 20 20 66 73 64 69 72 53 65 74 45 72        fsdirSetEr
4ba0: 72 6d 73 67 28 70 43 75 72 2c 20 22 63 61 6e 6e  rmsg(pCur, "cann
4bb0: 6f 74 20 72 65 61 64 20 64 69 72 65 63 74 6f 72  ot read director
4bc0: 79 3a 20 25 73 22 2c 20 70 43 75 72 2d 3e 7a 50  y: %s", pCur->zP
4bd0: 61 74 68 29 3b 0a 20 20 20 20 20 20 72 65 74 75  ath);.      retu
4be0: 72 6e 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b  rn SQLITE_ERROR;
4bf0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 77 68  .    }.  }..  wh
4c00: 69 6c 65 28 20 70 43 75 72 2d 3e 69 4c 76 6c 3e  ile( pCur->iLvl>
4c10: 3d 30 20 29 7b 0a 20 20 20 20 46 73 64 69 72 4c  =0 ){.    FsdirL
4c20: 65 76 65 6c 20 2a 70 4c 76 6c 20 3d 20 26 70 43  evel *pLvl = &pC
4c30: 75 72 2d 3e 61 4c 76 6c 5b 70 43 75 72 2d 3e 69  ur->aLvl[pCur->i
4c40: 4c 76 6c 5d 3b 0a 20 20 20 20 73 74 72 75 63 74  Lvl];.    struct
4c50: 20 64 69 72 65 6e 74 20 2a 70 45 6e 74 72 79 20   dirent *pEntry 
4c60: 3d 20 72 65 61 64 64 69 72 28 70 4c 76 6c 2d 3e  = readdir(pLvl->
4c70: 70 44 69 72 29 3b 0a 20 20 20 20 69 66 28 20 70  pDir);.    if( p
4c80: 45 6e 74 72 79 20 29 7b 0a 20 20 20 20 20 20 69  Entry ){.      i
4c90: 66 28 20 70 45 6e 74 72 79 2d 3e 64 5f 6e 61 6d  f( pEntry->d_nam
4ca0: 65 5b 30 5d 3d 3d 27 2e 27 20 29 7b 0a 20 20 20  e[0]=='.' ){.   
4cb0: 20 20 20 20 69 66 28 20 70 45 6e 74 72 79 2d 3e      if( pEntry->
4cc0: 64 5f 6e 61 6d 65 5b 31 5d 3d 3d 27 2e 27 20 26  d_name[1]=='.' &
4cd0: 26 20 70 45 6e 74 72 79 2d 3e 64 5f 6e 61 6d 65  & pEntry->d_name
4ce0: 5b 32 5d 3d 3d 27 5c 30 27 20 29 20 63 6f 6e 74  [2]=='\0' ) cont
4cf0: 69 6e 75 65 3b 0a 20 20 20 20 20 20 20 69 66 28  inue;.       if(
4d00: 20 70 45 6e 74 72 79 2d 3e 64 5f 6e 61 6d 65 5b   pEntry->d_name[
4d10: 31 5d 3d 3d 27 5c 30 27 20 29 20 63 6f 6e 74 69  1]=='\0' ) conti
4d20: 6e 75 65 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  nue;.      }.   
4d30: 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28     sqlite3_free(
4d40: 70 43 75 72 2d 3e 7a 50 61 74 68 29 3b 0a 20 20  pCur->zPath);.  
4d50: 20 20 20 20 70 43 75 72 2d 3e 7a 50 61 74 68 20      pCur->zPath 
4d60: 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74  = sqlite3_mprint
4d70: 66 28 22 25 73 2f 25 73 22 2c 20 70 4c 76 6c 2d  f("%s/%s", pLvl-
4d80: 3e 7a 44 69 72 2c 20 70 45 6e 74 72 79 2d 3e 64  >zDir, pEntry->d
4d90: 5f 6e 61 6d 65 29 3b 0a 20 20 20 20 20 20 69 66  _name);.      if
4da0: 28 20 70 43 75 72 2d 3e 7a 50 61 74 68 3d 3d 30  ( pCur->zPath==0
4db0: 20 29 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45   ) return SQLITE
4dc0: 5f 4e 4f 4d 45 4d 3b 0a 20 20 20 20 20 20 69 66  _NOMEM;.      if
4dd0: 28 20 66 69 6c 65 4c 69 6e 6b 53 74 61 74 28 70  ( fileLinkStat(p
4de0: 43 75 72 2d 3e 7a 50 61 74 68 2c 20 26 70 43 75  Cur->zPath, &pCu
4df0: 72 2d 3e 73 53 74 61 74 29 20 29 7b 0a 20 20 20  r->sStat) ){.   
4e00: 20 20 20 20 20 66 73 64 69 72 53 65 74 45 72 72       fsdirSetErr
4e10: 6d 73 67 28 70 43 75 72 2c 20 22 63 61 6e 6e 6f  msg(pCur, "canno
4e20: 74 20 73 74 61 74 20 66 69 6c 65 3a 20 25 73 22  t stat file: %s"
4e30: 2c 20 70 43 75 72 2d 3e 7a 50 61 74 68 29 3b 0a  , pCur->zPath);.
4e40: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 53          return S
4e50: 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0a 20 20 20  QLITE_ERROR;.   
4e60: 20 20 20 7d 0a 20 20 20 20 20 20 72 65 74 75 72     }.      retur
4e70: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 20  n SQLITE_OK;.   
4e80: 20 7d 0a 20 20 20 20 63 6c 6f 73 65 64 69 72 28   }.    closedir(
4e90: 70 4c 76 6c 2d 3e 70 44 69 72 29 3b 0a 20 20 20  pLvl->pDir);.   
4ea0: 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 70 4c   sqlite3_free(pL
4eb0: 76 6c 2d 3e 7a 44 69 72 29 3b 0a 20 20 20 20 70  vl->zDir);.    p
4ec0: 4c 76 6c 2d 3e 70 44 69 72 20 3d 20 30 3b 0a 20  Lvl->pDir = 0;. 
4ed0: 20 20 20 70 4c 76 6c 2d 3e 7a 44 69 72 20 3d 20     pLvl->zDir = 
4ee0: 30 3b 0a 20 20 20 20 70 43 75 72 2d 3e 69 4c 76  0;.    pCur->iLv
4ef0: 6c 2d 2d 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 45  l--;.  }..  /* E
4f00: 4f 46 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f  OF */.  sqlite3_
4f10: 66 72 65 65 28 70 43 75 72 2d 3e 7a 50 61 74 68  free(pCur->zPath
4f20: 29 3b 0a 20 20 70 43 75 72 2d 3e 7a 50 61 74 68  );.  pCur->zPath
4f30: 20 3d 20 30 3b 0a 20 20 72 65 74 75 72 6e 20 53   = 0;.  return S
4f40: 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a  QLITE_OK;.}../*.
4f50: 2a 2a 20 52 65 74 75 72 6e 20 76 61 6c 75 65 73  ** Return values
4f60: 20 6f 66 20 63 6f 6c 75 6d 6e 73 20 66 6f 72 20   of columns for 
4f70: 74 68 65 20 72 6f 77 20 61 74 20 77 68 69 63 68  the row at which
4f80: 20 74 68 65 20 73 65 72 69 65 73 5f 63 75 72 73   the series_curs
4f90: 6f 72 0a 2a 2a 20 69 73 20 63 75 72 72 65 6e 74  or.** is current
4fa0: 6c 79 20 70 6f 69 6e 74 69 6e 67 2e 0a 2a 2f 0a  ly pointing..*/.
4fb0: 73 74 61 74 69 63 20 69 6e 74 20 66 73 64 69 72  static int fsdir
4fc0: 43 6f 6c 75 6d 6e 28 0a 20 20 73 71 6c 69 74 65  Column(.  sqlite
4fd0: 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 20 2a 63  3_vtab_cursor *c
4fe0: 75 72 2c 20 20 20 2f 2a 20 54 68 65 20 63 75 72  ur,   /* The cur
4ff0: 73 6f 72 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33  sor */.  sqlite3
5000: 5f 63 6f 6e 74 65 78 74 20 2a 63 74 78 2c 20 20  _context *ctx,  
5010: 20 20 20 20 20 2f 2a 20 46 69 72 73 74 20 61 72       /* First ar
5020: 67 75 6d 65 6e 74 20 74 6f 20 73 71 6c 69 74 65  gument to sqlite
5030: 33 5f 72 65 73 75 6c 74 5f 2e 2e 2e 28 29 20 2a  3_result_...() *
5040: 2f 0a 20 20 69 6e 74 20 69 20 20 20 20 20 20 20  /.  int i       
5050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5060: 2f 2a 20 57 68 69 63 68 20 63 6f 6c 75 6d 6e 20  /* Which column 
5070: 74 6f 20 72 65 74 75 72 6e 20 2a 2f 0a 29 7b 0a  to return */.){.
5080: 20 20 66 73 64 69 72 5f 63 75 72 73 6f 72 20 2a    fsdir_cursor *
5090: 70 43 75 72 20 3d 20 28 66 73 64 69 72 5f 63 75  pCur = (fsdir_cu
50a0: 72 73 6f 72 2a 29 63 75 72 3b 0a 20 20 73 77 69  rsor*)cur;.  swi
50b0: 74 63 68 28 20 69 20 29 7b 0a 20 20 20 20 63 61  tch( i ){.    ca
50c0: 73 65 20 46 53 44 49 52 5f 43 4f 4c 55 4d 4e 5f  se FSDIR_COLUMN_
50d0: 4e 41 4d 45 3a 20 7b 0a 20 20 20 20 20 20 73 71  NAME: {.      sq
50e0: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78  lite3_result_tex
50f0: 74 28 63 74 78 2c 20 26 70 43 75 72 2d 3e 7a 50  t(ctx, &pCur->zP
5100: 61 74 68 5b 70 43 75 72 2d 3e 6e 42 61 73 65 5d  ath[pCur->nBase]
5110: 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 54 52 41  , -1, SQLITE_TRA
5120: 4e 53 49 45 4e 54 29 3b 0a 20 20 20 20 20 20 62  NSIENT);.      b
5130: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 0a 20 20 20  reak;.    }..   
5140: 20 63 61 73 65 20 46 53 44 49 52 5f 43 4f 4c 55   case FSDIR_COLU
5150: 4d 4e 5f 4d 4f 44 45 3a 0a 20 20 20 20 20 20 73  MN_MODE:.      s
5160: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69 6e  qlite3_result_in
5170: 74 36 34 28 63 74 78 2c 20 70 43 75 72 2d 3e 73  t64(ctx, pCur->s
5180: 53 74 61 74 2e 73 74 5f 6d 6f 64 65 29 3b 0a 20  Stat.st_mode);. 
5190: 20 20 20 20 20 62 72 65 61 6b 3b 0a 0a 20 20 20       break;..   
51a0: 20 63 61 73 65 20 46 53 44 49 52 5f 43 4f 4c 55   case FSDIR_COLU
51b0: 4d 4e 5f 4d 54 49 4d 45 3a 0a 20 20 20 20 20 20  MN_MTIME:.      
51c0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 69  sqlite3_result_i
51d0: 6e 74 36 34 28 63 74 78 2c 20 70 43 75 72 2d 3e  nt64(ctx, pCur->
51e0: 73 53 74 61 74 2e 73 74 5f 6d 74 69 6d 65 29 3b  sStat.st_mtime);
51f0: 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 0a 20  .      break;.. 
5200: 20 20 20 63 61 73 65 20 46 53 44 49 52 5f 43 4f     case FSDIR_CO
5210: 4c 55 4d 4e 5f 44 41 54 41 3a 20 7b 0a 20 20 20  LUMN_DATA: {.   
5220: 20 20 20 6d 6f 64 65 5f 74 20 6d 20 3d 20 70 43     mode_t m = pC
5230: 75 72 2d 3e 73 53 74 61 74 2e 73 74 5f 6d 6f 64  ur->sStat.st_mod
5240: 65 3b 0a 20 20 20 20 20 20 69 66 28 20 53 5f 49  e;.      if( S_I
5250: 53 44 49 52 28 6d 29 20 29 7b 0a 20 20 20 20 20  SDIR(m) ){.     
5260: 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c     sqlite3_resul
5270: 74 5f 6e 75 6c 6c 28 63 74 78 29 3b 0a 23 69 66  t_null(ctx);.#if
5280: 20 21 64 65 66 69 6e 65 64 28 5f 57 49 4e 33 32   !defined(_WIN32
5290: 29 20 26 26 20 21 64 65 66 69 6e 65 64 28 57 49  ) && !defined(WI
52a0: 4e 33 32 29 0a 20 20 20 20 20 20 7d 65 6c 73 65  N32).      }else
52b0: 20 69 66 28 20 53 5f 49 53 4c 4e 4b 28 6d 29 20   if( S_ISLNK(m) 
52c0: 29 7b 0a 20 20 20 20 20 20 20 20 63 68 61 72 20  ){.        char 
52d0: 61 53 74 61 74 69 63 5b 36 34 5d 3b 0a 20 20 20  aStatic[64];.   
52e0: 20 20 20 20 20 63 68 61 72 20 2a 61 42 75 66 20       char *aBuf 
52f0: 3d 20 61 53 74 61 74 69 63 3b 0a 20 20 20 20 20  = aStatic;.     
5300: 20 20 20 73 71 6c 69 74 65 33 5f 69 6e 74 36 34     sqlite3_int64
5310: 20 6e 42 75 66 20 3d 20 36 34 3b 0a 20 20 20 20   nBuf = 64;.    
5320: 20 20 20 20 69 6e 74 20 6e 3b 0a 0a 20 20 20 20      int n;..    
5330: 20 20 20 20 77 68 69 6c 65 28 20 31 20 29 7b 0a      while( 1 ){.
5340: 20 20 20 20 20 20 20 20 20 20 6e 20 3d 20 72 65            n = re
5350: 61 64 6c 69 6e 6b 28 70 43 75 72 2d 3e 7a 50 61  adlink(pCur->zPa
5360: 74 68 2c 20 61 42 75 66 2c 20 6e 42 75 66 29 3b  th, aBuf, nBuf);
5370: 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 6e  .          if( n
5380: 3c 6e 42 75 66 20 29 20 62 72 65 61 6b 3b 0a 20  <nBuf ) break;. 
5390: 20 20 20 20 20 20 20 20 20 69 66 28 20 61 42 75           if( aBu
53a0: 66 21 3d 61 53 74 61 74 69 63 20 29 20 73 71 6c  f!=aStatic ) sql
53b0: 69 74 65 33 5f 66 72 65 65 28 61 42 75 66 29 3b  ite3_free(aBuf);
53c0: 0a 20 20 20 20 20 20 20 20 20 20 6e 42 75 66 20  .          nBuf 
53d0: 3d 20 6e 42 75 66 2a 32 3b 0a 20 20 20 20 20 20  = nBuf*2;.      
53e0: 20 20 20 20 61 42 75 66 20 3d 20 73 71 6c 69 74      aBuf = sqlit
53f0: 65 33 5f 6d 61 6c 6c 6f 63 36 34 28 6e 42 75 66  e3_malloc64(nBuf
5400: 29 3b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28  );.          if(
5410: 20 61 42 75 66 3d 3d 30 20 29 7b 0a 20 20 20 20   aBuf==0 ){.    
5420: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f          sqlite3_
5430: 72 65 73 75 6c 74 5f 65 72 72 6f 72 5f 6e 6f 6d  result_error_nom
5440: 65 6d 28 63 74 78 29 3b 0a 20 20 20 20 20 20 20  em(ctx);.       
5450: 20 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49       return SQLI
5460: 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 20 20 20 20  TE_NOMEM;.      
5470: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a      }.        }.
5480: 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33  .        sqlite3
5490: 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 63 74 78  _result_text(ctx
54a0: 2c 20 61 42 75 66 2c 20 6e 2c 20 53 51 4c 49 54  , aBuf, n, SQLIT
54b0: 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b 0a 20 20  E_TRANSIENT);.  
54c0: 20 20 20 20 20 20 69 66 28 20 61 42 75 66 21 3d        if( aBuf!=
54d0: 61 53 74 61 74 69 63 20 29 20 73 71 6c 69 74 65  aStatic ) sqlite
54e0: 33 5f 66 72 65 65 28 61 42 75 66 29 3b 0a 23 65  3_free(aBuf);.#e
54f0: 6e 64 69 66 0a 20 20 20 20 20 20 7d 65 6c 73 65  ndif.      }else
5500: 7b 0a 20 20 20 20 20 20 20 20 72 65 61 64 46 69  {.        readFi
5510: 6c 65 43 6f 6e 74 65 6e 74 73 28 63 74 78 2c 20  leContents(ctx, 
5520: 70 43 75 72 2d 3e 7a 50 61 74 68 29 3b 0a 20 20  pCur->zPath);.  
5530: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20      }.    }.    
5540: 63 61 73 65 20 46 53 44 49 52 5f 43 4f 4c 55 4d  case FSDIR_COLUM
5550: 4e 5f 50 41 54 48 3a 0a 20 20 20 20 64 65 66 61  N_PATH:.    defa
5560: 75 6c 74 3a 20 7b 0a 20 20 20 20 20 20 2f 2a 20  ult: {.      /* 
5570: 54 68 65 20 46 53 44 49 52 5f 43 4f 4c 55 4d 4e  The FSDIR_COLUMN
5580: 5f 50 41 54 48 20 61 6e 64 20 46 53 44 49 52 5f  _PATH and FSDIR_
5590: 43 4f 4c 55 4d 4e 5f 44 49 52 20 61 72 65 20 69  COLUMN_DIR are i
55a0: 6e 70 75 74 20 70 61 72 61 6d 65 74 65 72 73 2e  nput parameters.
55b0: 0a 20 20 20 20 20 20 2a 2a 20 61 6c 77 61 79 73  .      ** always
55c0: 20 72 65 74 75 72 6e 20 74 68 65 69 72 20 76 61   return their va
55d0: 6c 75 65 73 20 61 73 20 4e 55 4c 4c 20 2a 2f 0a  lues as NULL */.
55e0: 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20        break;.   
55f0: 20 7d 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20   }.  }.  return 
5600: 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a  SQLITE_OK;.}../*
5610: 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 72  .** Return the r
5620: 6f 77 69 64 20 66 6f 72 20 74 68 65 20 63 75 72  owid for the cur
5630: 72 65 6e 74 20 72 6f 77 2e 20 49 6e 20 74 68 69  rent row. In thi
5640: 73 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e  s implementation
5650: 2c 20 74 68 65 0a 2a 2a 20 66 69 72 73 74 20 72  , the.** first r
5660: 6f 77 20 72 65 74 75 72 6e 65 64 20 69 73 20 61  ow returned is a
5670: 73 73 69 67 6e 65 64 20 72 6f 77 69 64 20 76 61  ssigned rowid va
5680: 6c 75 65 20 31 2c 20 61 6e 64 20 65 61 63 68 20  lue 1, and each 
5690: 73 75 62 73 65 71 75 65 6e 74 0a 2a 2a 20 72 6f  subsequent.** ro
56a0: 77 20 61 20 76 61 6c 75 65 20 31 20 6d 6f 72 65  w a value 1 more
56b0: 20 74 68 61 6e 20 74 68 61 74 20 6f 66 20 74 68   than that of th
56c0: 65 20 70 72 65 76 69 6f 75 73 2e 0a 2a 2f 0a 73  e previous..*/.s
56d0: 74 61 74 69 63 20 69 6e 74 20 66 73 64 69 72 52  tatic int fsdirR
56e0: 6f 77 69 64 28 73 71 6c 69 74 65 33 5f 76 74 61  owid(sqlite3_vta
56f0: 62 5f 63 75 72 73 6f 72 20 2a 63 75 72 2c 20 73  b_cursor *cur, s
5700: 71 6c 69 74 65 5f 69 6e 74 36 34 20 2a 70 52 6f  qlite_int64 *pRo
5710: 77 69 64 29 7b 0a 20 20 66 73 64 69 72 5f 63 75  wid){.  fsdir_cu
5720: 72 73 6f 72 20 2a 70 43 75 72 20 3d 20 28 66 73  rsor *pCur = (fs
5730: 64 69 72 5f 63 75 72 73 6f 72 2a 29 63 75 72 3b  dir_cursor*)cur;
5740: 0a 20 20 2a 70 52 6f 77 69 64 20 3d 20 70 43 75  .  *pRowid = pCu
5750: 72 2d 3e 69 52 6f 77 69 64 3b 0a 20 20 72 65 74  r->iRowid;.  ret
5760: 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d  urn SQLITE_OK;.}
5770: 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54  ../*.** Return T
5780: 52 55 45 20 69 66 20 74 68 65 20 63 75 72 73 6f  RUE if the curso
5790: 72 20 68 61 73 20 62 65 65 6e 20 6d 6f 76 65 64  r has been moved
57a0: 20 6f 66 66 20 6f 66 20 74 68 65 20 6c 61 73 74   off of the last
57b0: 0a 2a 2a 20 72 6f 77 20 6f 66 20 6f 75 74 70 75  .** row of outpu
57c0: 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74  t..*/.static int
57d0: 20 66 73 64 69 72 45 6f 66 28 73 71 6c 69 74 65   fsdirEof(sqlite
57e0: 33 5f 76 74 61 62 5f 63 75 72 73 6f 72 20 2a 63  3_vtab_cursor *c
57f0: 75 72 29 7b 0a 20 20 66 73 64 69 72 5f 63 75 72  ur){.  fsdir_cur
5800: 73 6f 72 20 2a 70 43 75 72 20 3d 20 28 66 73 64  sor *pCur = (fsd
5810: 69 72 5f 63 75 72 73 6f 72 2a 29 63 75 72 3b 0a  ir_cursor*)cur;.
5820: 20 20 72 65 74 75 72 6e 20 28 70 43 75 72 2d 3e    return (pCur->
5830: 7a 50 61 74 68 3d 3d 30 29 3b 0a 7d 0a 0a 2f 2a  zPath==0);.}../*
5840: 0a 2a 2a 20 78 46 69 6c 74 65 72 20 63 61 6c 6c  .** xFilter call
5850: 62 61 63 6b 2e 0a 2a 2a 0a 2a 2a 20 69 64 78 4e  back..**.** idxN
5860: 75 6d 3d 3d 31 20 20 20 50 41 54 48 20 70 61 72  um==1   PATH par
5870: 61 6d 65 74 65 72 20 6f 6e 6c 79 0a 2a 2a 20 69  ameter only.** i
5880: 64 78 4e 75 6d 3d 3d 32 20 20 20 42 6f 74 68 20  dxNum==2   Both 
5890: 50 41 54 48 20 61 6e 64 20 44 49 52 20 73 75 70  PATH and DIR sup
58a0: 70 6c 69 65 64 0a 2a 2f 0a 73 74 61 74 69 63 20  plied.*/.static 
58b0: 69 6e 74 20 66 73 64 69 72 46 69 6c 74 65 72 28  int fsdirFilter(
58c0: 0a 20 20 73 71 6c 69 74 65 33 5f 76 74 61 62 5f  .  sqlite3_vtab_
58d0: 63 75 72 73 6f 72 20 2a 63 75 72 2c 20 0a 20 20  cursor *cur, .  
58e0: 69 6e 74 20 69 64 78 4e 75 6d 2c 20 63 6f 6e 73  int idxNum, cons
58f0: 74 20 63 68 61 72 20 2a 69 64 78 53 74 72 2c 0a  t char *idxStr,.
5900: 20 20 69 6e 74 20 61 72 67 63 2c 20 73 71 6c 69    int argc, sqli
5910: 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76  te3_value **argv
5920: 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72  .){.  const char
5930: 20 2a 7a 44 69 72 20 3d 20 30 3b 0a 20 20 66 73   *zDir = 0;.  fs
5940: 64 69 72 5f 63 75 72 73 6f 72 20 2a 70 43 75 72  dir_cursor *pCur
5950: 20 3d 20 28 66 73 64 69 72 5f 63 75 72 73 6f 72   = (fsdir_cursor
5960: 2a 29 63 75 72 3b 0a 20 20 28 76 6f 69 64 29 69  *)cur;.  (void)i
5970: 64 78 53 74 72 3b 0a 20 20 66 73 64 69 72 52 65  dxStr;.  fsdirRe
5980: 73 65 74 43 75 72 73 6f 72 28 70 43 75 72 29 3b  setCursor(pCur);
5990: 0a 0a 20 20 69 66 28 20 69 64 78 4e 75 6d 3d 3d  ..  if( idxNum==
59a0: 30 20 29 7b 0a 20 20 20 20 66 73 64 69 72 53 65  0 ){.    fsdirSe
59b0: 74 45 72 72 6d 73 67 28 70 43 75 72 2c 20 22 74  tErrmsg(pCur, "t
59c0: 61 62 6c 65 20 66 75 6e 63 74 69 6f 6e 20 66 73  able function fs
59d0: 64 69 72 20 72 65 71 75 69 72 65 73 20 61 6e 20  dir requires an 
59e0: 61 72 67 75 6d 65 6e 74 22 29 3b 0a 20 20 20 20  argument");.    
59f0: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 45 52  return SQLITE_ER
5a00: 52 4f 52 3b 0a 20 20 7d 0a 0a 20 20 61 73 73 65  ROR;.  }..  asse
5a10: 72 74 28 20 61 72 67 63 3d 3d 69 64 78 4e 75 6d  rt( argc==idxNum
5a20: 20 26 26 20 28 61 72 67 63 3d 3d 31 20 7c 7c 20   && (argc==1 || 
5a30: 61 72 67 63 3d 3d 32 29 20 29 3b 0a 20 20 7a 44  argc==2) );.  zD
5a40: 69 72 20 3d 20 28 63 6f 6e 73 74 20 63 68 61 72  ir = (const char
5a50: 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f  *)sqlite3_value_
5a60: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20  text(argv[0]);. 
5a70: 20 69 66 28 20 7a 44 69 72 3d 3d 30 20 29 7b 0a   if( zDir==0 ){.
5a80: 20 20 20 20 66 73 64 69 72 53 65 74 45 72 72 6d      fsdirSetErrm
5a90: 73 67 28 70 43 75 72 2c 20 22 74 61 62 6c 65 20  sg(pCur, "table 
5aa0: 66 75 6e 63 74 69 6f 6e 20 66 73 64 69 72 20 72  function fsdir r
5ab0: 65 71 75 69 72 65 73 20 61 20 6e 6f 6e 2d 4e 55  equires a non-NU
5ac0: 4c 4c 20 61 72 67 75 6d 65 6e 74 22 29 3b 0a 20  LL argument");. 
5ad0: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45     return SQLITE
5ae0: 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a 20 20 69 66  _ERROR;.  }.  if
5af0: 28 20 61 72 67 63 3d 3d 32 20 29 7b 0a 20 20 20  ( argc==2 ){.   
5b00: 20 70 43 75 72 2d 3e 7a 42 61 73 65 20 3d 20 28   pCur->zBase = (
5b10: 63 6f 6e 73 74 20 63 68 61 72 2a 29 73 71 6c 69  const char*)sqli
5b20: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
5b30: 72 67 76 5b 31 5d 29 3b 0a 20 20 7d 0a 20 20 69  rgv[1]);.  }.  i
5b40: 66 28 20 70 43 75 72 2d 3e 7a 42 61 73 65 20 29  f( pCur->zBase )
5b50: 7b 0a 20 20 20 20 70 43 75 72 2d 3e 6e 42 61 73  {.    pCur->nBas
5b60: 65 20 3d 20 28 69 6e 74 29 73 74 72 6c 65 6e 28  e = (int)strlen(
5b70: 70 43 75 72 2d 3e 7a 42 61 73 65 29 2b 31 3b 0a  pCur->zBase)+1;.
5b80: 20 20 20 20 70 43 75 72 2d 3e 7a 50 61 74 68 20      pCur->zPath 
5b90: 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e 74  = sqlite3_mprint
5ba0: 66 28 22 25 73 2f 25 73 22 2c 20 70 43 75 72 2d  f("%s/%s", pCur-
5bb0: 3e 7a 42 61 73 65 2c 20 7a 44 69 72 29 3b 0a 20  >zBase, zDir);. 
5bc0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 70 43 75 72   }else{.    pCur
5bd0: 2d 3e 7a 50 61 74 68 20 3d 20 73 71 6c 69 74 65  ->zPath = sqlite
5be0: 33 5f 6d 70 72 69 6e 74 66 28 22 25 73 22 2c 20  3_mprintf("%s", 
5bf0: 7a 44 69 72 29 3b 0a 20 20 7d 0a 0a 20 20 69 66  zDir);.  }..  if
5c00: 28 20 70 43 75 72 2d 3e 7a 50 61 74 68 3d 3d 30  ( pCur->zPath==0
5c10: 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53   ){.    return S
5c20: 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d  QLITE_NOMEM;.  }
5c30: 0a 20 20 69 66 28 20 66 69 6c 65 4c 69 6e 6b 53  .  if( fileLinkS
5c40: 74 61 74 28 70 43 75 72 2d 3e 7a 50 61 74 68 2c  tat(pCur->zPath,
5c50: 20 26 70 43 75 72 2d 3e 73 53 74 61 74 29 20 29   &pCur->sStat) )
5c60: 7b 0a 20 20 20 20 66 73 64 69 72 53 65 74 45 72  {.    fsdirSetEr
5c70: 72 6d 73 67 28 70 43 75 72 2c 20 22 63 61 6e 6e  rmsg(pCur, "cann
5c80: 6f 74 20 73 74 61 74 20 66 69 6c 65 3a 20 25 73  ot stat file: %s
5c90: 22 2c 20 70 43 75 72 2d 3e 7a 50 61 74 68 29 3b  ", pCur->zPath);
5ca0: 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49  .    return SQLI
5cb0: 54 45 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a 0a 20  TE_ERROR;.  }.. 
5cc0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f   return SQLITE_O
5cd0: 4b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 51 4c 69  K;.}../*.** SQLi
5ce0: 74 65 20 77 69 6c 6c 20 69 6e 76 6f 6b 65 20 74  te will invoke t
5cf0: 68 69 73 20 6d 65 74 68 6f 64 20 6f 6e 65 20 6f  his method one o
5d00: 72 20 6d 6f 72 65 20 74 69 6d 65 73 20 77 68 69  r more times whi
5d10: 6c 65 20 70 6c 61 6e 6e 69 6e 67 20 61 20 71 75  le planning a qu
5d20: 65 72 79 0a 2a 2a 20 74 68 61 74 20 75 73 65 73  ery.** that uses
5d30: 20 74 68 65 20 67 65 6e 65 72 61 74 65 5f 73 65   the generate_se
5d40: 72 69 65 73 20 76 69 72 74 75 61 6c 20 74 61 62  ries virtual tab
5d50: 6c 65 2e 20 20 54 68 69 73 20 72 6f 75 74 69 6e  le.  This routin
5d60: 65 20 6e 65 65 64 73 20 74 6f 20 63 72 65 61 74  e needs to creat
5d70: 65 0a 2a 2a 20 61 20 71 75 65 72 79 20 70 6c 61  e.** a query pla
5d80: 6e 20 66 6f 72 20 65 61 63 68 20 69 6e 76 6f 63  n for each invoc
5d90: 61 74 69 6f 6e 20 61 6e 64 20 63 6f 6d 70 75 74  ation and comput
5da0: 65 20 61 6e 20 65 73 74 69 6d 61 74 65 64 20 63  e an estimated c
5db0: 6f 73 74 20 66 6f 72 20 74 68 61 74 0a 2a 2a 20  ost for that.** 
5dc0: 70 6c 61 6e 2e 0a 2a 2a 0a 2a 2a 20 49 6e 20 74  plan..**.** In t
5dd0: 68 69 73 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69  his implementati
5de0: 6f 6e 20 69 64 78 4e 75 6d 20 69 73 20 75 73 65  on idxNum is use
5df0: 64 20 74 6f 20 72 65 70 72 65 73 65 6e 74 20 74  d to represent t
5e00: 68 65 0a 2a 2a 20 71 75 65 72 79 20 70 6c 61 6e  he.** query plan
5e10: 2e 20 20 69 64 78 53 74 72 20 69 73 20 75 6e 75  .  idxStr is unu
5e20: 73 65 64 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 71  sed..**.** The q
5e30: 75 65 72 79 20 70 6c 61 6e 20 69 73 20 72 65 70  uery plan is rep
5e40: 72 65 73 65 6e 74 65 64 20 62 79 20 76 61 6c 75  resented by valu
5e50: 65 73 20 6f 66 20 69 64 78 4e 75 6d 3a 0a 2a 2a  es of idxNum:.**
5e60: 0a 2a 2a 20 20 28 31 29 20 20 54 68 65 20 70 61  .**  (1)  The pa
5e70: 74 68 20 76 61 6c 75 65 20 69 73 20 73 75 70 70  th value is supp
5e80: 6c 69 65 64 20 62 79 20 61 72 67 76 5b 30 5d 0a  lied by argv[0].
5e90: 2a 2a 20 20 28 32 29 20 20 50 61 74 68 20 69 73  **  (2)  Path is
5ea0: 20 69 6e 20 61 72 67 76 5b 30 5d 20 61 6e 64 20   in argv[0] and 
5eb0: 64 69 72 20 69 73 20 69 6e 20 61 72 67 76 5b 31  dir is in argv[1
5ec0: 5d 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  ].*/.static int 
5ed0: 66 73 64 69 72 42 65 73 74 49 6e 64 65 78 28 0a  fsdirBestIndex(.
5ee0: 20 20 73 71 6c 69 74 65 33 5f 76 74 61 62 20 2a    sqlite3_vtab *
5ef0: 74 61 62 2c 0a 20 20 73 71 6c 69 74 65 33 5f 69  tab,.  sqlite3_i
5f00: 6e 64 65 78 5f 69 6e 66 6f 20 2a 70 49 64 78 49  ndex_info *pIdxI
5f10: 6e 66 6f 0a 29 7b 0a 20 20 69 6e 74 20 69 3b 20  nfo.){.  int i; 
5f20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5f30: 2f 2a 20 4c 6f 6f 70 20 6f 76 65 72 20 63 6f 6e  /* Loop over con
5f40: 73 74 72 61 69 6e 74 73 20 2a 2f 0a 20 20 69 6e  straints */.  in
5f50: 74 20 69 64 78 50 61 74 68 20 3d 20 2d 31 3b 20  t idxPath = -1; 
5f60: 20 20 20 20 20 2f 2a 20 49 6e 64 65 78 20 69 6e       /* Index in
5f70: 20 70 49 64 78 49 6e 66 6f 2d 3e 61 43 6f 6e 73   pIdxInfo->aCons
5f80: 74 72 61 69 6e 74 20 6f 66 20 50 41 54 48 3d 20  traint of PATH= 
5f90: 2a 2f 0a 20 20 69 6e 74 20 69 64 78 44 69 72 20  */.  int idxDir 
5fa0: 3d 20 2d 31 3b 20 20 20 20 20 20 20 2f 2a 20 49  = -1;       /* I
5fb0: 6e 64 65 78 20 69 6e 20 70 49 64 78 49 6e 66 6f  ndex in pIdxInfo
5fc0: 2d 3e 61 43 6f 6e 73 74 72 61 69 6e 74 20 6f 66  ->aConstraint of
5fd0: 20 44 49 52 3d 20 2a 2f 0a 20 20 69 6e 74 20 73   DIR= */.  int s
5fe0: 65 65 6e 50 61 74 68 20 3d 20 30 3b 20 20 20 20  eenPath = 0;    
5ff0: 20 20 2f 2a 20 54 72 75 65 20 69 66 20 61 6e 20    /* True if an 
6000: 75 6e 75 73 61 62 6c 65 20 50 41 54 48 3d 20 63  unusable PATH= c
6010: 6f 6e 73 74 72 61 69 6e 74 20 69 73 20 73 65 65  onstraint is see
6020: 6e 20 2a 2f 0a 20 20 69 6e 74 20 73 65 65 6e 44  n */.  int seenD
6030: 69 72 20 3d 20 30 3b 20 20 20 20 20 20 20 2f 2a  ir = 0;       /*
6040: 20 54 72 75 65 20 69 66 20 61 6e 20 75 6e 75 73   True if an unus
6050: 61 62 6c 65 20 44 49 52 3d 20 63 6f 6e 73 74 72  able DIR= constr
6060: 61 69 6e 74 20 69 73 20 73 65 65 6e 20 2a 2f 0a  aint is seen */.
6070: 20 20 63 6f 6e 73 74 20 73 74 72 75 63 74 20 73    const struct s
6080: 71 6c 69 74 65 33 5f 69 6e 64 65 78 5f 63 6f 6e  qlite3_index_con
6090: 73 74 72 61 69 6e 74 20 2a 70 43 6f 6e 73 74 72  straint *pConstr
60a0: 61 69 6e 74 3b 0a 0a 20 20 28 76 6f 69 64 29 74  aint;..  (void)t
60b0: 61 62 3b 0a 20 20 70 43 6f 6e 73 74 72 61 69 6e  ab;.  pConstrain
60c0: 74 20 3d 20 70 49 64 78 49 6e 66 6f 2d 3e 61 43  t = pIdxInfo->aC
60d0: 6f 6e 73 74 72 61 69 6e 74 3b 0a 20 20 66 6f 72  onstraint;.  for
60e0: 28 69 3d 30 3b 20 69 3c 70 49 64 78 49 6e 66 6f  (i=0; i<pIdxInfo
60f0: 2d 3e 6e 43 6f 6e 73 74 72 61 69 6e 74 3b 20 69  ->nConstraint; i
6100: 2b 2b 2c 20 70 43 6f 6e 73 74 72 61 69 6e 74 2b  ++, pConstraint+
6110: 2b 29 7b 0a 20 20 20 20 69 66 28 20 70 43 6f 6e  +){.    if( pCon
6120: 73 74 72 61 69 6e 74 2d 3e 6f 70 21 3d 53 51 4c  straint->op!=SQL
6130: 49 54 45 5f 49 4e 44 45 58 5f 43 4f 4e 53 54 52  ITE_INDEX_CONSTR
6140: 41 49 4e 54 5f 45 51 20 29 20 63 6f 6e 74 69 6e  AINT_EQ ) contin
6150: 75 65 3b 0a 20 20 20 20 73 77 69 74 63 68 28 20  ue;.    switch( 
6160: 70 43 6f 6e 73 74 72 61 69 6e 74 2d 3e 69 43 6f  pConstraint->iCo
6170: 6c 75 6d 6e 20 29 7b 0a 20 20 20 20 20 20 63 61  lumn ){.      ca
6180: 73 65 20 46 53 44 49 52 5f 43 4f 4c 55 4d 4e 5f  se FSDIR_COLUMN_
6190: 50 41 54 48 3a 20 7b 0a 20 20 20 20 20 20 20 20  PATH: {.        
61a0: 69 66 28 20 70 43 6f 6e 73 74 72 61 69 6e 74 2d  if( pConstraint-
61b0: 3e 75 73 61 62 6c 65 20 29 7b 0a 20 20 20 20 20  >usable ){.     
61c0: 20 20 20 20 20 69 64 78 50 61 74 68 20 3d 20 69       idxPath = i
61d0: 3b 0a 20 20 20 20 20 20 20 20 20 20 73 65 65 6e  ;.          seen
61e0: 50 61 74 68 20 3d 20 30 3b 0a 20 20 20 20 20 20  Path = 0;.      
61f0: 20 20 7d 65 6c 73 65 20 69 66 28 20 69 64 78 50    }else if( idxP
6200: 61 74 68 3c 30 20 29 7b 0a 20 20 20 20 20 20 20  ath<0 ){.       
6210: 20 20 20 73 65 65 6e 50 61 74 68 20 3d 20 31 3b     seenPath = 1;
6220: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
6230: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20     break;.      
6240: 7d 0a 20 20 20 20 20 20 63 61 73 65 20 46 53 44  }.      case FSD
6250: 49 52 5f 43 4f 4c 55 4d 4e 5f 44 49 52 3a 20 7b  IR_COLUMN_DIR: {
6260: 0a 20 20 20 20 20 20 20 20 69 66 28 20 70 43 6f  .        if( pCo
6270: 6e 73 74 72 61 69 6e 74 2d 3e 75 73 61 62 6c 65  nstraint->usable
6280: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 69 64   ){.          id
6290: 78 44 69 72 20 3d 20 69 3b 0a 20 20 20 20 20 20  xDir = i;.      
62a0: 20 20 20 20 73 65 65 6e 44 69 72 20 3d 20 30 3b      seenDir = 0;
62b0: 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 20 69  .        }else i
62c0: 66 28 20 69 64 78 44 69 72 3c 30 20 29 7b 0a 20  f( idxDir<0 ){. 
62d0: 20 20 20 20 20 20 20 20 20 73 65 65 6e 44 69 72           seenDir
62e0: 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 7d 0a   = 1;.        }.
62f0: 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20          break;. 
6300: 20 20 20 20 20 7d 0a 20 20 20 20 7d 20 0a 20 20       }.    } .  
6310: 7d 0a 20 20 69 66 28 20 73 65 65 6e 50 61 74 68  }.  if( seenPath
6320: 20 7c 7c 20 73 65 65 6e 44 69 72 20 29 7b 0a 20   || seenDir ){. 
6330: 20 20 20 2f 2a 20 49 66 20 69 6e 70 75 74 20 70     /* If input p
6340: 61 72 61 6d 65 74 65 72 73 20 61 72 65 20 75 6e  arameters are un
6350: 75 73 61 62 6c 65 2c 20 64 69 73 61 6c 6c 6f 77  usable, disallow
6360: 20 74 68 69 73 20 70 6c 61 6e 20 2a 2f 0a 20 20   this plan */.  
6370: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f    return SQLITE_
6380: 43 4f 4e 53 54 52 41 49 4e 54 3b 0a 20 20 7d 0a  CONSTRAINT;.  }.
6390: 0a 20 20 69 66 28 20 69 64 78 50 61 74 68 3c 30  .  if( idxPath<0
63a0: 20 29 7b 0a 20 20 20 20 70 49 64 78 49 6e 66 6f   ){.    pIdxInfo
63b0: 2d 3e 69 64 78 4e 75 6d 20 3d 20 30 3b 0a 20 20  ->idxNum = 0;.  
63c0: 20 20 2f 2a 20 54 68 65 20 70 49 64 78 49 6e 66    /* The pIdxInf
63d0: 6f 2d 3e 65 73 74 69 6d 61 74 65 64 43 6f 73 74  o->estimatedCost
63e0: 20 73 68 6f 75 6c 64 20 68 61 76 65 20 62 65 65   should have bee
63f0: 6e 20 69 6e 69 74 69 61 6c 69 7a 65 64 20 74 6f  n initialized to
6400: 20 61 20 68 75 67 65 0a 20 20 20 20 2a 2a 20 6e   a huge.    ** n
6410: 75 6d 62 65 72 2e 20 20 4c 65 61 76 65 20 69 74  umber.  Leave it
6420: 20 75 6e 63 68 61 6e 67 65 64 2e 20 2a 2f 0a 20   unchanged. */. 
6430: 20 20 20 70 49 64 78 49 6e 66 6f 2d 3e 65 73 74     pIdxInfo->est
6440: 69 6d 61 74 65 64 52 6f 77 73 20 3d 20 30 78 37  imatedRows = 0x7
6450: 66 66 66 66 66 66 66 3b 0a 20 20 7d 65 6c 73 65  fffffff;.  }else
6460: 7b 0a 20 20 20 20 70 49 64 78 49 6e 66 6f 2d 3e  {.    pIdxInfo->
6470: 61 43 6f 6e 73 74 72 61 69 6e 74 55 73 61 67 65  aConstraintUsage
6480: 5b 69 64 78 50 61 74 68 5d 2e 6f 6d 69 74 20 3d  [idxPath].omit =
6490: 20 31 3b 0a 20 20 20 20 70 49 64 78 49 6e 66 6f   1;.    pIdxInfo
64a0: 2d 3e 61 43 6f 6e 73 74 72 61 69 6e 74 55 73 61  ->aConstraintUsa
64b0: 67 65 5b 69 64 78 50 61 74 68 5d 2e 61 72 67 76  ge[idxPath].argv
64c0: 49 6e 64 65 78 20 3d 20 31 3b 0a 20 20 20 20 69  Index = 1;.    i
64d0: 66 28 20 69 64 78 44 69 72 3e 3d 30 20 29 7b 0a  f( idxDir>=0 ){.
64e0: 20 20 20 20 20 20 70 49 64 78 49 6e 66 6f 2d 3e        pIdxInfo->
64f0: 61 43 6f 6e 73 74 72 61 69 6e 74 55 73 61 67 65  aConstraintUsage
6500: 5b 69 64 78 44 69 72 5d 2e 6f 6d 69 74 20 3d 20  [idxDir].omit = 
6510: 31 3b 0a 20 20 20 20 20 20 70 49 64 78 49 6e 66  1;.      pIdxInf
6520: 6f 2d 3e 61 43 6f 6e 73 74 72 61 69 6e 74 55 73  o->aConstraintUs
6530: 61 67 65 5b 69 64 78 44 69 72 5d 2e 61 72 67 76  age[idxDir].argv
6540: 49 6e 64 65 78 20 3d 20 32 3b 0a 20 20 20 20 20  Index = 2;.     
6550: 20 70 49 64 78 49 6e 66 6f 2d 3e 69 64 78 4e 75   pIdxInfo->idxNu
6560: 6d 20 3d 20 32 3b 0a 20 20 20 20 20 20 70 49 64  m = 2;.      pId
6570: 78 49 6e 66 6f 2d 3e 65 73 74 69 6d 61 74 65 64  xInfo->estimated
6580: 43 6f 73 74 20 3d 20 31 30 2e 30 3b 0a 20 20 20  Cost = 10.0;.   
6590: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 70 49   }else{.      pI
65a0: 64 78 49 6e 66 6f 2d 3e 69 64 78 4e 75 6d 20 3d  dxInfo->idxNum =
65b0: 20 31 3b 0a 20 20 20 20 20 20 70 49 64 78 49 6e   1;.      pIdxIn
65c0: 66 6f 2d 3e 65 73 74 69 6d 61 74 65 64 43 6f 73  fo->estimatedCos
65d0: 74 20 3d 20 31 30 30 2e 30 3b 0a 20 20 20 20 7d  t = 100.0;.    }
65e0: 0a 20 20 7d 0a 0a 20 20 72 65 74 75 72 6e 20 53  .  }..  return S
65f0: 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a 0a 2f 2a 0a  QLITE_OK;.}../*.
6600: 2a 2a 20 52 65 67 69 73 74 65 72 20 74 68 65 20  ** Register the 
6610: 22 66 73 64 69 72 22 20 76 69 72 74 75 61 6c 20  "fsdir" virtual 
6620: 74 61 62 6c 65 2e 0a 2a 2f 0a 73 74 61 74 69 63  table..*/.static
6630: 20 69 6e 74 20 66 73 64 69 72 52 65 67 69 73 74   int fsdirRegist
6640: 65 72 28 73 71 6c 69 74 65 33 20 2a 64 62 29 7b  er(sqlite3 *db){
6650: 0a 20 20 73 74 61 74 69 63 20 73 71 6c 69 74 65  .  static sqlite
6660: 33 5f 6d 6f 64 75 6c 65 20 66 73 64 69 72 4d 6f  3_module fsdirMo
6670: 64 75 6c 65 20 3d 20 7b 0a 20 20 20 20 30 2c 20  dule = {.    0, 
6680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6690: 20 20 20 20 20 20 20 20 2f 2a 20 69 56 65 72 73          /* iVers
66a0: 69 6f 6e 20 2a 2f 0a 20 20 20 20 30 2c 20 20 20  ion */.    0,   
66b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
66c0: 20 20 20 20 20 20 2f 2a 20 78 43 72 65 61 74 65        /* xCreate
66d0: 20 2a 2f 0a 20 20 20 20 66 73 64 69 72 43 6f 6e   */.    fsdirCon
66e0: 6e 65 63 74 2c 20 20 20 20 20 20 20 20 20 20 20  nect,           
66f0: 20 20 20 2f 2a 20 78 43 6f 6e 6e 65 63 74 20 2a     /* xConnect *
6700: 2f 0a 20 20 20 20 66 73 64 69 72 42 65 73 74 49  /.    fsdirBestI
6710: 6e 64 65 78 2c 20 20 20 20 20 20 20 20 20 20 20  ndex,           
6720: 20 2f 2a 20 78 42 65 73 74 49 6e 64 65 78 20 2a   /* xBestIndex *
6730: 2f 0a 20 20 20 20 66 73 64 69 72 44 69 73 63 6f  /.    fsdirDisco
6740: 6e 6e 65 63 74 2c 20 20 20 20 20 20 20 20 20 20  nnect,          
6750: 20 2f 2a 20 78 44 69 73 63 6f 6e 6e 65 63 74 20   /* xDisconnect 
6760: 2a 2f 0a 20 20 20 20 30 2c 20 20 20 20 20 20 20  */.    0,       
6770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6780: 20 20 2f 2a 20 78 44 65 73 74 72 6f 79 20 2a 2f    /* xDestroy */
6790: 0a 20 20 20 20 66 73 64 69 72 4f 70 65 6e 2c 20  .    fsdirOpen, 
67a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
67b0: 2f 2a 20 78 4f 70 65 6e 20 2d 20 6f 70 65 6e 20  /* xOpen - open 
67c0: 61 20 63 75 72 73 6f 72 20 2a 2f 0a 20 20 20 20  a cursor */.    
67d0: 66 73 64 69 72 43 6c 6f 73 65 2c 20 20 20 20 20  fsdirClose,     
67e0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 78 43             /* xC
67f0: 6c 6f 73 65 20 2d 20 63 6c 6f 73 65 20 61 20 63  lose - close a c
6800: 75 72 73 6f 72 20 2a 2f 0a 20 20 20 20 66 73 64  ursor */.    fsd
6810: 69 72 46 69 6c 74 65 72 2c 20 20 20 20 20 20 20  irFilter,       
6820: 20 20 20 20 20 20 20 20 2f 2a 20 78 46 69 6c 74          /* xFilt
6830: 65 72 20 2d 20 63 6f 6e 66 69 67 75 72 65 20 73  er - configure s
6840: 63 61 6e 20 63 6f 6e 73 74 72 61 69 6e 74 73 20  can constraints 
6850: 2a 2f 0a 20 20 20 20 66 73 64 69 72 4e 65 78 74  */.    fsdirNext
6860: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
6870: 20 20 2f 2a 20 78 4e 65 78 74 20 2d 20 61 64 76    /* xNext - adv
6880: 61 6e 63 65 20 61 20 63 75 72 73 6f 72 20 2a 2f  ance a cursor */
6890: 0a 20 20 20 20 66 73 64 69 72 45 6f 66 2c 20 20  .    fsdirEof,  
68a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
68b0: 2f 2a 20 78 45 6f 66 20 2d 20 63 68 65 63 6b 20  /* xEof - check 
68c0: 66 6f 72 20 65 6e 64 20 6f 66 20 73 63 61 6e 20  for end of scan 
68d0: 2a 2f 0a 20 20 20 20 66 73 64 69 72 43 6f 6c 75  */.    fsdirColu
68e0: 6d 6e 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  mn,             
68f0: 20 20 2f 2a 20 78 43 6f 6c 75 6d 6e 20 2d 20 72    /* xColumn - r
6900: 65 61 64 20 64 61 74 61 20 2a 2f 0a 20 20 20 20  ead data */.    
6910: 66 73 64 69 72 52 6f 77 69 64 2c 20 20 20 20 20  fsdirRowid,     
6920: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 78 52             /* xR
6930: 6f 77 69 64 20 2d 20 72 65 61 64 20 64 61 74 61  owid - read data
6940: 20 2a 2f 0a 20 20 20 20 30 2c 20 20 20 20 20 20   */.    0,      
6950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6960: 20 20 20 2f 2a 20 78 55 70 64 61 74 65 20 2a 2f     /* xUpdate */
6970: 0a 20 20 20 20 30 2c 20 20 20 20 20 20 20 20 20  .    0,         
6980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6990: 2f 2a 20 78 42 65 67 69 6e 20 2a 2f 0a 20 20 20  /* xBegin */.   
69a0: 20 30 2c 20 20 20 20 20 20 20 20 20 20 20 20 20   0,             
69b0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 78              /* x
69c0: 53 79 6e 63 20 2a 2f 0a 20 20 20 20 30 2c 20 20  Sync */.    0,  
69d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
69e0: 20 20 20 20 20 20 20 2f 2a 20 78 43 6f 6d 6d 69         /* xCommi
69f0: 74 20 2a 2f 0a 20 20 20 20 30 2c 20 20 20 20 20  t */.    0,     
6a00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6a10: 20 20 20 20 2f 2a 20 78 52 6f 6c 6c 62 61 63 6b      /* xRollback
6a20: 20 2a 2f 0a 20 20 20 20 30 2c 20 20 20 20 20 20   */.    0,      
6a30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6a40: 20 20 20 2f 2a 20 78 46 69 6e 64 4d 65 74 68 6f     /* xFindMetho
6a50: 64 20 2a 2f 0a 20 20 20 20 30 2c 20 20 20 20 20  d */.    0,     
6a60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6a70: 20 20 20 20 2f 2a 20 78 52 65 6e 61 6d 65 20 2a      /* xRename *
6a80: 2f 0a 20 20 20 20 30 2c 20 20 20 20 20 20 20 20  /.    0,        
6a90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6aa0: 20 2f 2a 20 78 53 61 76 65 70 6f 69 6e 74 20 2a   /* xSavepoint *
6ab0: 2f 0a 20 20 20 20 30 2c 20 20 20 20 20 20 20 20  /.    0,        
6ac0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6ad0: 20 2f 2a 20 78 52 65 6c 65 61 73 65 20 2a 2f 0a   /* xRelease */.
6ae0: 20 20 20 20 30 2c 20 20 20 20 20 20 20 20 20 20      0,          
6af0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
6b00: 2a 20 78 52 6f 6c 6c 62 61 63 6b 54 6f 20 2a 2f  * xRollbackTo */
6b10: 0a 20 20 20 20 30 2c 20 20 20 20 20 20 20 20 20  .    0,         
6b20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6b30: 2f 2a 20 78 53 68 61 64 6f 77 4e 61 6d 65 20 2a  /* xShadowName *
6b40: 2f 0a 20 20 7d 3b 0a 0a 20 20 69 6e 74 20 72 63  /.  };..  int rc
6b50: 20 3d 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74   = sqlite3_creat
6b60: 65 5f 6d 6f 64 75 6c 65 28 64 62 2c 20 22 66 73  e_module(db, "fs
6b70: 64 69 72 22 2c 20 26 66 73 64 69 72 4d 6f 64 75  dir", &fsdirModu
6b80: 6c 65 2c 20 30 29 3b 0a 20 20 72 65 74 75 72 6e  le, 0);.  return
6b90: 20 72 63 3b 0a 7d 0a 23 65 6c 73 65 20 20 20 20   rc;.}.#else    
6ba0: 20 20 20 20 20 2f 2a 20 53 51 4c 49 54 45 5f 4f       /* SQLITE_O
6bb0: 4d 49 54 5f 56 49 52 54 55 41 4c 54 41 42 4c 45  MIT_VIRTUALTABLE
6bc0: 20 2a 2f 0a 23 20 64 65 66 69 6e 65 20 66 73 64   */.# define fsd
6bd0: 69 72 52 65 67 69 73 74 65 72 28 78 29 20 53 51  irRegister(x) SQ
6be0: 4c 49 54 45 5f 4f 4b 0a 23 65 6e 64 69 66 0a 0a  LITE_OK.#endif..
6bf0: 23 69 66 64 65 66 20 5f 57 49 4e 33 32 0a 5f 5f  #ifdef _WIN32.__
6c00: 64 65 63 6c 73 70 65 63 28 64 6c 6c 65 78 70 6f  declspec(dllexpo
6c10: 72 74 29 0a 23 65 6e 64 69 66 0a 69 6e 74 20 73  rt).#endif.int s
6c20: 71 6c 69 74 65 33 5f 66 69 6c 65 69 6f 5f 69 6e  qlite3_fileio_in
6c30: 69 74 28 0a 20 20 73 71 6c 69 74 65 33 20 2a 64  it(.  sqlite3 *d
6c40: 62 2c 20 0a 20 20 63 68 61 72 20 2a 2a 70 7a 45  b, .  char **pzE
6c50: 72 72 4d 73 67 2c 20 0a 20 20 63 6f 6e 73 74 20  rrMsg, .  const 
6c60: 73 71 6c 69 74 65 33 5f 61 70 69 5f 72 6f 75 74  sqlite3_api_rout
6c70: 69 6e 65 73 20 2a 70 41 70 69 0a 29 7b 0a 20 20  ines *pApi.){.  
6c80: 69 6e 74 20 72 63 20 3d 20 53 51 4c 49 54 45 5f  int rc = SQLITE_
6c90: 4f 4b 3b 0a 20 20 53 51 4c 49 54 45 5f 45 58 54  OK;.  SQLITE_EXT
6ca0: 45 4e 53 49 4f 4e 5f 49 4e 49 54 32 28 70 41 70  ENSION_INIT2(pAp
6cb0: 69 29 3b 0a 20 20 28 76 6f 69 64 29 70 7a 45 72  i);.  (void)pzEr
6cc0: 72 4d 73 67 3b 20 20 2f 2a 20 55 6e 75 73 65 64  rMsg;  /* Unused
6cd0: 20 70 61 72 61 6d 65 74 65 72 20 2a 2f 0a 20 20   parameter */.  
6ce0: 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 63 72 65  rc = sqlite3_cre
6cf0: 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c  ate_function(db,
6d00: 20 22 72 65 61 64 66 69 6c 65 22 2c 20 31 2c 20   "readfile", 1, 
6d10: 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 2c 0a  SQLITE_UTF8, 0,.
6d20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6d30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72                 r
6d40: 65 61 64 66 69 6c 65 46 75 6e 63 2c 20 30 2c 20  eadfileFunc, 0, 
6d50: 30 29 3b 0a 20 20 69 66 28 20 72 63 3d 3d 53 51  0);.  if( rc==SQ
6d60: 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 72  LITE_OK ){.    r
6d70: 63 20 3d 20 73 71 6c 69 74 65 33 5f 63 72 65 61  c = sqlite3_crea
6d80: 74 65 5f 66 75 6e 63 74 69 6f 6e 28 64 62 2c 20  te_function(db, 
6d90: 22 77 72 69 74 65 66 69 6c 65 22 2c 20 2d 31 2c  "writefile", -1,
6da0: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 2c   SQLITE_UTF8, 0,
6db0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
6dc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6dd0: 20 20 77 72 69 74 65 66 69 6c 65 46 75 6e 63 2c    writefileFunc,
6de0: 20 30 2c 20 30 29 3b 0a 20 20 7d 0a 20 20 69 66   0, 0);.  }.  if
6df0: 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20  ( rc==SQLITE_OK 
6e00: 29 7b 0a 20 20 20 20 72 63 20 3d 20 73 71 6c 69  ){.    rc = sqli
6e10: 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74  te3_create_funct
6e20: 69 6f 6e 28 64 62 2c 20 22 6c 73 6d 6f 64 65 22  ion(db, "lsmode"
6e30: 2c 20 31 2c 20 53 51 4c 49 54 45 5f 55 54 46 38  , 1, SQLITE_UTF8
6e40: 2c 20 30 2c 0a 20 20 20 20 20 20 20 20 20 20 20  , 0,.           
6e50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6e60: 20 20 20 20 20 20 6c 73 4d 6f 64 65 46 75 6e 63        lsModeFunc
6e70: 2c 20 30 2c 20 30 29 3b 0a 20 20 7d 0a 20 20 69  , 0, 0);.  }.  i
6e80: 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b  f( rc==SQLITE_OK
6e90: 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 66 73 64   ){.    rc = fsd
6ea0: 69 72 52 65 67 69 73 74 65 72 28 64 62 29 3b 0a  irRegister(db);.
6eb0: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 72 63 3b    }.  return rc;
6ec0: 0a 7d 0a                                         .}.