System.Data.SQLite
Hex Artifact Content
Not logged in

Artifact 20d3194a28e0b334e7ae192486275f4e4161d04d:


0000: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0010: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0020: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0030: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0040: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 0d  ###############.
0050: 0a 23 0d 0a 23 20 74 6b 74 2d 64 34 37 32 38 61  .#..# tkt-d4728a
0060: 65 63 62 37 2e 65 61 67 6c 65 20 2d 2d 0d 0a 23  ecb7.eagle --..#
0070: 0d 0a 23 20 57 72 69 74 74 65 6e 20 62 79 20 4a  ..# Written by J
0080: 6f 65 20 4d 69 73 74 61 63 68 6b 69 6e 2e 0d 0a  oe Mistachkin...
0090: 23 20 52 65 6c 65 61 73 65 64 20 74 6f 20 74 68  # Released to th
00a0: 65 20 70 75 62 6c 69 63 20 64 6f 6d 61 69 6e 2c  e public domain,
00b0: 20 75 73 65 20 61 74 20 79 6f 75 72 20 6f 77 6e   use at your own
00c0: 20 72 69 73 6b 21 0d 0a 23 0d 0a 23 23 23 23 23   risk!..#..#####
00d0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
00e0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
00f0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0100: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0110: 23 23 23 23 23 23 23 23 23 23 0d 0a 0d 0a 70 61  ##########....pa
0120: 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 45 61  ckage require Ea
0130: 67 6c 65 0d 0a 70 61 63 6b 61 67 65 20 72 65 71  gle..package req
0140: 75 69 72 65 20 45 61 67 6c 65 2e 4c 69 62 72 61  uire Eagle.Libra
0150: 72 79 0d 0a 70 61 63 6b 61 67 65 20 72 65 71 75  ry..package requ
0160: 69 72 65 20 45 61 67 6c 65 2e 54 65 73 74 0d 0a  ire Eagle.Test..
0170: 0d 0a 72 75 6e 54 65 73 74 50 72 6f 6c 6f 67 75  ..runTestPrologu
0180: 65 0d 0a 0d 0a 23 23 23 23 23 23 23 23 23 23 23  e....###########
0190: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
01a0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
01b0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
01c0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
01d0: 23 23 23 23 0d 0a 0d 0a 70 61 63 6b 61 67 65 20  ####....package 
01e0: 72 65 71 75 69 72 65 20 53 79 73 74 65 6d 2e 44  require System.D
01f0: 61 74 61 2e 53 51 4c 69 74 65 2e 54 65 73 74 0d  ata.SQLite.Test.
0200: 0a 72 75 6e 53 51 4c 69 74 65 54 65 73 74 50 72  .runSQLiteTestPr
0210: 6f 6c 6f 67 75 65 0d 0a 0d 0a 23 23 23 23 23 23  ologue....######
0220: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0230: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0240: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0250: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0260: 23 23 23 23 23 23 23 23 23 0d 0a 0d 0a 6d 6f 76  #########....mov
0270: 65 53 79 73 74 65 6d 44 61 74 61 53 51 4c 69 74  eSystemDataSQLit
0280: 65 44 6c 6c 43 6f 6e 66 69 67 20 66 61 6c 73 65  eDllConfig false
0290: 0d 0a 0d 0a 23 23 23 23 23 23 23 23 23 23 23 23  ....############
02a0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
02b0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
02c0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
02d0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
02e0: 23 23 23 0d 0a 0d 0a 73 65 74 20 64 34 37 32 5f  ###....set d472_
02f0: 62 69 6e 61 72 79 5f 64 69 72 65 63 74 6f 72 79  binary_directory
0300: 20 5b 73 74 72 69 6e 67 20 6d 61 70 20 5b 6c 69   [string map [li
0310: 73 74 20 5c 5c 20 2f 5d 20 5b 67 65 74 42 69 6e  st \\ /] [getBin
0320: 61 72 79 44 69 72 65 63 74 6f 72 79 5d 5d 0d 0a  aryDirectory]]..
0330: 73 65 74 20 64 34 37 32 5f 74 61 72 67 65 74 5f  set d472_target_
0340: 66 72 61 6d 65 77 6f 72 6b 20 5b 73 74 72 69 6e  framework [strin
0350: 67 20 6d 61 70 20 5b 6c 69 73 74 20 46 78 20 22  g map [list Fx "
0360: 22 5d 20 5b 67 65 74 42 75 69 6c 64 4e 65 74 46  "] [getBuildNetF
0370: 78 5d 5d 0d 0a 0d 0a 23 23 23 23 23 23 23 23 23  x]]....#########
0380: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0390: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
03a0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
03b0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
03c0: 23 23 23 23 23 23 0d 0a 0d 0a 72 75 6e 54 65 73  ######....runTes
03d0: 74 20 7b 74 65 73 74 20 74 6b 74 2d 64 34 37 32  t {test tkt-d472
03e0: 38 61 65 63 62 37 2d 31 2e 31 20 7b 74 6f 6b 65  8aecb7-1.1 {toke
03f0: 6e 73 20 69 6e 20 65 6e 76 69 72 6f 6e 6d 65 6e  ns in environmen
0400: 74 20 76 61 72 69 61 62 6c 65 7d 20 2d 73 65 74  t variable} -set
0410: 75 70 20 5c 0d 0a 20 20 20 20 5b 67 65 74 41 70  up \..    [getAp
0420: 70 44 6f 6d 61 69 6e 50 72 65 61 6d 62 6c 65 5d  pDomainPreamble]
0430: 20 2d 62 6f 64 79 20 7b 0d 0a 20 20 70 61 63 6b   -body {..  pack
0440: 61 67 65 20 72 65 71 75 69 72 65 20 45 61 67 6c  age require Eagl
0450: 65 2e 4c 69 62 72 61 72 79 0d 0a 20 20 70 61 63  e.Library..  pac
0460: 6b 61 67 65 20 72 65 71 75 69 72 65 20 45 61 67  kage require Eag
0470: 6c 65 2e 54 65 73 74 0d 0a 20 20 70 61 63 6b 61  le.Test..  packa
0480: 67 65 20 72 65 71 75 69 72 65 20 53 79 73 74 65  ge require Syste
0490: 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65 2e 54 65  m.Data.SQLite.Te
04a0: 73 74 0d 0a 0d 0a 20 20 73 61 76 65 45 6e 76 69  st....  saveEnvi
04b0: 72 6f 6e 6d 65 6e 74 56 61 72 69 61 62 6c 65 73  ronmentVariables
04c0: 20 5b 6c 69 73 74 20 64 34 37 32 5f 31 20 64 34   [list d472_1 d4
04d0: 37 32 5f 32 20 64 34 37 32 5f 33 5d 20 73 61 76  72_2 d472_3] sav
04e0: 65 64 45 6e 76 0d 0a 0d 0a 20 20 73 65 74 20 65  edEnv....  set e
04f0: 6e 76 28 64 34 37 32 5f 31 29 20 7b 70 72 66 78  nv(d472_1) {prfx
0500: 31 2f 25 50 72 65 4c 6f 61 64 53 51 4c 69 74 65  1/%PreLoadSQLite
0510: 5f 41 73 73 65 6d 62 6c 79 44 69 72 65 63 74 6f  _AssemblyDirecto
0520: 72 79 25 2f 73 75 66 78 31 7d 0d 0a 20 20 73 65  ry%/sufx1}..  se
0530: 74 20 65 6e 76 28 64 34 37 32 5f 32 29 20 7b 70  t env(d472_2) {p
0540: 72 66 78 32 2f 25 50 72 65 4c 6f 61 64 53 51 4c  rfx2/%PreLoadSQL
0550: 69 74 65 5f 54 61 72 67 65 74 46 72 61 6d 65 77  ite_TargetFramew
0560: 6f 72 6b 25 2f 73 75 66 78 32 7d 0d 0a 20 20 73  ork%/sufx2}..  s
0570: 65 74 20 65 6e 76 28 64 34 37 32 5f 33 29 20 7b  et env(d472_3) {
0580: 70 72 66 78 33 2f 25 50 72 65 4c 6f 61 64 53 51  prfx3/%PreLoadSQ
0590: 4c 69 74 65 5f 58 6d 6c 43 6f 6e 66 69 67 44 69  Lite_XmlConfigDi
05a0: 72 65 63 74 6f 72 79 25 2f 73 75 66 78 33 7d 0d  rectory%/sufx3}.
05b0: 0a 0d 0a 20 20 6f 62 6a 65 63 74 20 6c 6f 61 64  ...  object load
05c0: 20 2d 6c 6f 61 64 74 79 70 65 20 46 69 6c 65 20   -loadtype File 
05d0: 5b 66 69 6c 65 20 6a 6f 69 6e 20 5c 0d 0a 20 20  [file join \..  
05e0: 20 20 20 20 5b 67 65 74 42 69 6e 61 72 79 44 69      [getBinaryDi
05f0: 72 65 63 74 6f 72 79 5d 20 53 79 73 74 65 6d 2e  rectory] System.
0600: 44 61 74 61 2e 53 51 4c 69 74 65 2e 64 6c 6c 5d  Data.SQLite.dll]
0610: 0d 0a 0d 0a 20 20 73 65 74 20 72 65 73 75 6c 74  ....  set result
0620: 20 5b 6c 69 73 74 5d 0d 0a 0d 0a 20 20 6c 61 70   [list]....  lap
0630: 70 65 6e 64 20 72 65 73 75 6c 74 20 5b 73 74 72  pend result [str
0640: 69 6e 67 20 6d 61 70 20 5b 6c 69 73 74 20 5c 5c  ing map [list \\
0650: 20 2f 5d 20 5b 6f 62 6a 65 63 74 20 69 6e 76 6f   /] [object invo
0660: 6b 65 20 2d 66 6c 61 67 73 20 2b 4e 6f 6e 50 75  ke -flags +NonPu
0670: 62 6c 69 63 20 5c 0d 0a 20 20 20 20 20 20 53 79  blic \..      Sy
0680: 73 74 65 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65  stem.Data.SQLite
0690: 2e 55 6e 73 61 66 65 4e 61 74 69 76 65 4d 65 74  .UnsafeNativeMet
06a0: 68 6f 64 73 20 47 65 74 53 65 74 74 69 6e 67 56  hods GetSettingV
06b0: 61 6c 75 65 20 64 34 37 32 5f 31 20 6e 75 6c 6c  alue d472_1 null
06c0: 5d 5d 0d 0a 0d 0a 20 20 6c 61 70 70 65 6e 64 20  ]]....  lappend 
06d0: 72 65 73 75 6c 74 20 5b 73 74 72 69 6e 67 20 6d  result [string m
06e0: 61 70 20 5b 6c 69 73 74 20 5c 5c 20 2f 5d 20 5b  ap [list \\ /] [
06f0: 6f 62 6a 65 63 74 20 69 6e 76 6f 6b 65 20 2d 66  object invoke -f
0700: 6c 61 67 73 20 2b 4e 6f 6e 50 75 62 6c 69 63 20  lags +NonPublic 
0710: 5c 0d 0a 20 20 20 20 20 20 53 79 73 74 65 6d 2e  \..      System.
0720: 44 61 74 61 2e 53 51 4c 69 74 65 2e 55 6e 73 61  Data.SQLite.Unsa
0730: 66 65 4e 61 74 69 76 65 4d 65 74 68 6f 64 73 20  feNativeMethods 
0740: 47 65 74 53 65 74 74 69 6e 67 56 61 6c 75 65 20  GetSettingValue 
0750: 64 34 37 32 5f 32 20 6e 75 6c 6c 5d 5d 0d 0a 0d  d472_2 null]]...
0760: 0a 20 20 6c 61 70 70 65 6e 64 20 72 65 73 75 6c  .  lappend resul
0770: 74 20 5b 73 74 72 69 6e 67 20 6d 61 70 20 5b 6c  t [string map [l
0780: 69 73 74 20 5c 5c 20 2f 5d 20 5b 6f 62 6a 65 63  ist \\ /] [objec
0790: 74 20 69 6e 76 6f 6b 65 20 2d 66 6c 61 67 73 20  t invoke -flags 
07a0: 2b 4e 6f 6e 50 75 62 6c 69 63 20 5c 0d 0a 20 20  +NonPublic \..  
07b0: 20 20 20 20 53 79 73 74 65 6d 2e 44 61 74 61 2e      System.Data.
07c0: 53 51 4c 69 74 65 2e 55 6e 73 61 66 65 4e 61 74  SQLite.UnsafeNat
07d0: 69 76 65 4d 65 74 68 6f 64 73 20 47 65 74 53 65  iveMethods GetSe
07e0: 74 74 69 6e 67 56 61 6c 75 65 20 64 34 37 32 5f  ttingValue d472_
07f0: 33 20 6e 75 6c 6c 5d 5d 0d 0a 0d 0a 20 20 73 65  3 null]]....  se
0800: 74 20 72 65 73 75 6c 74 0d 0a 7d 20 2d 63 6c 65  t result..} -cle
0810: 61 6e 75 70 20 7b 0d 0a 20 20 72 65 73 74 6f 72  anup {..  restor
0820: 65 45 6e 76 69 72 6f 6e 6d 65 6e 74 56 61 72 69  eEnvironmentVari
0830: 61 62 6c 65 73 20 5b 6c 69 73 74 20 64 34 37 32  ables [list d472
0840: 5f 31 20 64 34 37 32 5f 32 20 64 34 37 32 5f 33  _1 d472_2 d472_3
0850: 5d 20 73 61 76 65 64 45 6e 76 0d 0a 0d 0a 20 20  ] savedEnv....  
0860: 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69  unset -nocomplai
0870: 6e 20 72 65 73 75 6c 74 0d 0a 7d 20 2d 69 73 6f  n result..} -iso
0880: 6c 61 74 69 6f 6e 4c 65 76 65 6c 20 41 70 70 44  lationLevel AppD
0890: 6f 6d 61 69 6e 20 2d 63 6f 6e 73 74 72 61 69 6e  omain -constrain
08a0: 74 73 20 7b 65 61 67 6c 65 20 63 6f 6d 6d 61 6e  ts {eagle comman
08b0: 64 2e 6f 62 6a 65 63 74 5c 0d 0a 63 6f 6d 70 69  d.object\..compi
08c0: 6c 65 2e 49 53 4f 4c 41 54 45 44 5f 49 4e 54 45  le.ISOLATED_INTE
08d0: 52 50 52 45 54 45 52 53 20 53 79 73 74 65 6d 2e  RPRETERS System.
08e0: 44 61 74 61 2e 53 51 4c 69 74 65 5c 0d 0a 64 65  Data.SQLite\..de
08f0: 66 69 6e 65 43 6f 6e 73 74 61 6e 74 2e 53 79 73  fineConstant.Sys
0900: 74 65 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65 2e  tem.Data.SQLite.
0910: 55 53 45 5f 49 4e 54 45 52 4f 50 5f 44 4c 4c 7d  USE_INTEROP_DLL}
0920: 20 2d 72 65 73 75 6c 74 20 5b 6c 69 73 74 20 5b   -result [list [
0930: 61 70 70 65 6e 64 41 72 67 73 20 5c 0d 0a 70 72  appendArgs \..pr
0940: 66 78 31 2f 20 24 64 34 37 32 5f 62 69 6e 61 72  fx1/ $d472_binar
0950: 79 5f 64 69 72 65 63 74 6f 72 79 20 2f 73 75 66  y_directory /suf
0960: 78 31 5d 20 5b 61 70 70 65 6e 64 41 72 67 73 20  x1] [appendArgs 
0970: 70 72 66 78 32 2f 20 5c 0d 0a 24 64 34 37 32 5f  prfx2/ \..$d472_
0980: 74 61 72 67 65 74 5f 66 72 61 6d 65 77 6f 72 6b  target_framework
0990: 20 2f 73 75 66 78 32 5d 20 70 72 66 78 33 2f 25   /sufx2] prfx3/%
09a0: 50 72 65 4c 6f 61 64 53 51 4c 69 74 65 5f 58 6d  PreLoadSQLite_Xm
09b0: 6c 43 6f 6e 66 69 67 44 69 72 65 63 74 6f 72 79  lConfigDirectory
09c0: 25 2f 73 75 66 78 33 5d 7d 0d 0a 0d 0a 23 23 23  %/sufx3]}....###
09d0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
09e0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
09f0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0a00: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
0a10: 23 23 23 23 23 23 23 23 23 23 23 23 0d 0a 0d 0a  ############....
0a20: 23 0d 0a 23 20 48 41 43 4b 3a 20 54 68 69 73 20  #..# HACK: This 
0a30: 74 65 73 74 20 72 65 6c 69 65 73 20 28 69 6e 64  test relies (ind
0a40: 69 72 65 63 74 6c 79 29 20 75 70 6f 6e 20 74 68  irectly) upon th
0a50: 65 20 43 6f 64 65 42 61 73 65 20 70 72 6f 70 65  e CodeBase prope
0a60: 72 74 79 20 62 65 69 6e 67 20 73 65 74 20 6f 6e  rty being set on
0a70: 0d 0a 23 20 20 20 20 20 20 20 74 68 65 20 61 73  ..#       the as
0a80: 73 65 6d 62 6c 79 20 6c 6f 61 64 65 64 20 76 69  sembly loaded vi
0a90: 61 20 69 74 73 20 62 79 74 65 73 20 74 6f 20 74  a its bytes to t
0aa0: 68 65 20 45 61 67 6c 65 20 63 6f 72 65 20 6c 69  he Eagle core li
0ab0: 62 72 61 72 79 20 61 73 73 65 6d 62 6c 79 0d 0a  brary assembly..
0ac0: 23 20 20 20 20 20 20 20 66 69 6c 65 20 6e 61 6d  #       file nam
0ad0: 65 20 28 69 2e 65 2e 20 62 65 63 61 75 73 65 20  e (i.e. because 
0ae0: 69 74 20 69 73 20 74 68 65 20 63 61 6c 6c 69 6e  it is the callin
0af0: 67 20 61 73 73 65 6d 62 6c 79 29 2e 20 20 54 68  g assembly).  Th
0b00: 69 73 20 61 70 70 65 61 72 73 20 74 6f 0d 0a 23  is appears to..#
0b10: 20 20 20 20 20 20 20 62 65 20 6e 6f 6e 2d 70 6f         be non-po
0b20: 72 74 61 62 6c 65 20 61 6e 64 20 77 69 6c 6c 20  rtable and will 
0b30: 6e 6f 74 20 77 6f 72 6b 20 6f 6e 20 4d 6f 6e 6f  not work on Mono
0b40: 2e 0d 0a 23 0d 0a 72 75 6e 54 65 73 74 20 7b 74  ...#..runTest {t
0b50: 65 73 74 20 74 6b 74 2d 64 34 37 32 38 61 65 63  est tkt-d4728aec
0b60: 62 37 2d 31 2e 32 20 7b 74 6f 6b 65 6e 73 20 69  b7-1.2 {tokens i
0b70: 6e 20 58 4d 4c 20 63 6f 6e 66 69 67 75 72 61 74  n XML configurat
0b80: 69 6f 6e 20 66 69 6c 65 7d 20 2d 73 65 74 75 70  ion file} -setup
0b90: 20 5c 0d 0a 20 20 20 20 5b 67 65 74 41 70 70 44   \..    [getAppD
0ba0: 6f 6d 61 69 6e 50 72 65 61 6d 62 6c 65 5d 20 2d  omainPreamble] -
0bb0: 62 6f 64 79 20 7b 0d 0a 20 20 70 61 63 6b 61 67  body {..  packag
0bc0: 65 20 72 65 71 75 69 72 65 20 45 61 67 6c 65 2e  e require Eagle.
0bd0: 4c 69 62 72 61 72 79 0d 0a 20 20 70 61 63 6b 61  Library..  packa
0be0: 67 65 20 72 65 71 75 69 72 65 20 45 61 67 6c 65  ge require Eagle
0bf0: 2e 54 65 73 74 0d 0a 20 20 70 61 63 6b 61 67 65  .Test..  package
0c00: 20 72 65 71 75 69 72 65 20 53 79 73 74 65 6d 2e   require System.
0c10: 44 61 74 61 2e 53 51 4c 69 74 65 2e 54 65 73 74  Data.SQLite.Test
0c20: 0d 0a 0d 0a 20 20 6d 6f 76 65 53 79 73 74 65 6d  ....  moveSystem
0c30: 44 61 74 61 53 51 4c 69 74 65 44 6c 6c 43 6f 6e  DataSQLiteDllCon
0c40: 66 69 67 20 66 61 6c 73 65 0d 0a 0d 0a 20 20 73  fig false....  s
0c50: 65 74 20 66 69 6c 65 4e 61 6d 65 20 5b 77 72 69  et fileName [wri
0c60: 74 65 53 79 73 74 65 6d 44 61 74 61 53 51 4c 69  teSystemDataSQLi
0c70: 74 65 44 6c 6c 43 6f 6e 66 69 67 20 5b 73 74 72  teDllConfig [str
0c80: 69 6e 67 20 74 72 69 6d 20 7b 0d 0a 20 20 20 20  ing trim {..    
0c90: 3c 3f 78 6d 6c 20 76 65 72 73 69 6f 6e 3d 22 31  <?xml version="1
0ca0: 2e 30 22 3f 3e 0d 0a 20 20 20 20 3c 63 6f 6e 66  .0"?>..    <conf
0cb0: 69 67 75 72 61 74 69 6f 6e 3e 0d 0a 20 20 20 20  iguration>..    
0cc0: 20 20 3c 61 70 70 53 65 74 74 69 6e 67 73 3e 0d    <appSettings>.
0cd0: 0a 20 20 20 20 20 20 20 20 3c 61 64 64 20 6b 65  .        <add ke
0ce0: 79 3d 22 64 34 37 32 5f 31 22 0d 0a 20 20 20 20  y="d472_1"..    
0cf0: 20 20 20 20 20 20 20 20 20 76 61 6c 75 65 3d 22           value="
0d00: 70 72 66 78 31 2f 25 50 72 65 4c 6f 61 64 53 51  prfx1/%PreLoadSQ
0d10: 4c 69 74 65 5f 41 73 73 65 6d 62 6c 79 44 69 72  Lite_AssemblyDir
0d20: 65 63 74 6f 72 79 25 2f 73 75 66 78 31 22 20 2f  ectory%/sufx1" /
0d30: 3e 0d 0a 20 20 20 20 20 20 20 20 3c 61 64 64 20  >..        <add 
0d40: 6b 65 79 3d 22 64 34 37 32 5f 32 22 0d 0a 20 20  key="d472_2"..  
0d50: 20 20 20 20 20 20 20 20 20 20 20 76 61 6c 75 65             value
0d60: 3d 22 70 72 66 78 32 2f 25 50 72 65 4c 6f 61 64  ="prfx2/%PreLoad
0d70: 53 51 4c 69 74 65 5f 54 61 72 67 65 74 46 72 61  SQLite_TargetFra
0d80: 6d 65 77 6f 72 6b 25 2f 73 75 66 78 32 22 20 2f  mework%/sufx2" /
0d90: 3e 0d 0a 20 20 20 20 20 20 20 20 3c 61 64 64 20  >..        <add 
0da0: 6b 65 79 3d 22 64 34 37 32 5f 33 22 0d 0a 20 20  key="d472_3"..  
0db0: 20 20 20 20 20 20 20 20 20 20 20 76 61 6c 75 65             value
0dc0: 3d 22 70 72 66 78 33 2f 25 50 72 65 4c 6f 61 64  ="prfx3/%PreLoad
0dd0: 53 51 4c 69 74 65 5f 58 6d 6c 43 6f 6e 66 69 67  SQLite_XmlConfig
0de0: 44 69 72 65 63 74 6f 72 79 25 2f 73 75 66 78 33  Directory%/sufx3
0df0: 22 20 2f 3e 0d 0a 20 20 20 20 20 20 3c 2f 61 70  " />..      </ap
0e00: 70 53 65 74 74 69 6e 67 73 3e 0d 0a 20 20 20 20  pSettings>..    
0e10: 3c 2f 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 3e  </configuration>
0e20: 0d 0a 20 20 7d 5d 5d 0d 0a 0d 0a 20 20 6f 62 6a  ..  }]]....  obj
0e30: 65 63 74 20 6c 6f 61 64 20 2d 6c 6f 61 64 74 79  ect load -loadty
0e40: 70 65 20 42 79 74 65 73 20 5b 62 61 73 65 36 34  pe Bytes [base64
0e50: 20 65 6e 63 6f 64 65 20 5b 72 65 61 64 46 69 6c   encode [readFil
0e60: 65 20 5b 66 69 6c 65 20 6a 6f 69 6e 20 5c 0d 0a  e [file join \..
0e70: 20 20 20 20 20 20 5b 67 65 74 42 69 6e 61 72 79        [getBinary
0e80: 44 69 72 65 63 74 6f 72 79 5d 20 53 79 73 74 65  Directory] Syste
0e90: 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65 2e 64 6c  m.Data.SQLite.dl
0ea0: 6c 5d 5d 5d 0d 0a 0d 0a 20 20 73 65 74 20 72 65  l]]]....  set re
0eb0: 73 75 6c 74 20 5b 6c 69 73 74 5d 0d 0a 0d 0a 20  sult [list].... 
0ec0: 20 6c 61 70 70 65 6e 64 20 72 65 73 75 6c 74 20   lappend result 
0ed0: 5b 73 74 72 69 6e 67 20 6d 61 70 20 5b 6c 69 73  [string map [lis
0ee0: 74 20 5c 5c 20 2f 5d 20 5b 6f 62 6a 65 63 74 20  t \\ /] [object 
0ef0: 69 6e 76 6f 6b 65 20 2d 66 6c 61 67 73 20 2b 4e  invoke -flags +N
0f00: 6f 6e 50 75 62 6c 69 63 20 5c 0d 0a 20 20 20 20  onPublic \..    
0f10: 20 20 53 79 73 74 65 6d 2e 44 61 74 61 2e 53 51    System.Data.SQ
0f20: 4c 69 74 65 2e 55 6e 73 61 66 65 4e 61 74 69 76  Lite.UnsafeNativ
0f30: 65 4d 65 74 68 6f 64 73 20 47 65 74 53 65 74 74  eMethods GetSett
0f40: 69 6e 67 56 61 6c 75 65 20 64 34 37 32 5f 31 20  ingValue d472_1 
0f50: 6e 75 6c 6c 5d 5d 0d 0a 0d 0a 20 20 6c 61 70 70  null]]....  lapp
0f60: 65 6e 64 20 72 65 73 75 6c 74 20 5b 73 74 72 69  end result [stri
0f70: 6e 67 20 6d 61 70 20 5b 6c 69 73 74 20 5c 5c 20  ng map [list \\ 
0f80: 2f 5d 20 5b 6f 62 6a 65 63 74 20 69 6e 76 6f 6b  /] [object invok
0f90: 65 20 2d 66 6c 61 67 73 20 2b 4e 6f 6e 50 75 62  e -flags +NonPub
0fa0: 6c 69 63 20 5c 0d 0a 20 20 20 20 20 20 53 79 73  lic \..      Sys
0fb0: 74 65 6d 2e 44 61 74 61 2e 53 51 4c 69 74 65 2e  tem.Data.SQLite.
0fc0: 55 6e 73 61 66 65 4e 61 74 69 76 65 4d 65 74 68  UnsafeNativeMeth
0fd0: 6f 64 73 20 47 65 74 53 65 74 74 69 6e 67 56 61  ods GetSettingVa
0fe0: 6c 75 65 20 64 34 37 32 5f 32 20 6e 75 6c 6c 5d  lue d472_2 null]
0ff0: 5d 0d 0a 0d 0a 20 20 6c 61 70 70 65 6e 64 20 72  ]....  lappend r
1000: 65 73 75 6c 74 20 5b 73 74 72 69 6e 67 20 6d 61  esult [string ma
1010: 70 20 5b 6c 69 73 74 20 5c 5c 20 2f 5d 20 5b 6f  p [list \\ /] [o
1020: 62 6a 65 63 74 20 69 6e 76 6f 6b 65 20 2d 66 6c  bject invoke -fl
1030: 61 67 73 20 2b 4e 6f 6e 50 75 62 6c 69 63 20 5c  ags +NonPublic \
1040: 0d 0a 20 20 20 20 20 20 53 79 73 74 65 6d 2e 44  ..      System.D
1050: 61 74 61 2e 53 51 4c 69 74 65 2e 55 6e 73 61 66  ata.SQLite.Unsaf
1060: 65 4e 61 74 69 76 65 4d 65 74 68 6f 64 73 20 47  eNativeMethods G
1070: 65 74 53 65 74 74 69 6e 67 56 61 6c 75 65 20 64  etSettingValue d
1080: 34 37 32 5f 33 20 6e 75 6c 6c 5d 5d 0d 0a 0d 0a  472_3 null]]....
1090: 20 20 73 65 74 20 72 65 73 75 6c 74 0d 0a 7d 20    set result..} 
10a0: 2d 63 6c 65 61 6e 75 70 20 7b 0d 0a 20 20 63 61  -cleanup {..  ca
10b0: 74 63 68 20 7b 66 69 6c 65 20 64 65 6c 65 74 65  tch {file delete
10c0: 20 24 66 69 6c 65 4e 61 6d 65 7d 0d 0a 0d 0a 20   $fileName}.... 
10d0: 20 75 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61   unset -nocompla
10e0: 69 6e 20 72 65 73 75 6c 74 20 66 69 6c 65 4e 61  in result fileNa
10f0: 6d 65 0d 0a 0d 0a 20 20 6d 6f 76 65 53 79 73 74  me....  moveSyst
1100: 65 6d 44 61 74 61 53 51 4c 69 74 65 44 6c 6c 43  emDataSQLiteDllC
1110: 6f 6e 66 69 67 20 74 72 75 65 0d 0a 7d 20 2d 69  onfig true..} -i
1120: 73 6f 6c 61 74 69 6f 6e 4c 65 76 65 6c 20 41 70  solationLevel Ap
1130: 70 44 6f 6d 61 69 6e 20 2d 63 6f 6e 73 74 72 61  pDomain -constra
1140: 69 6e 74 73 20 7b 65 61 67 6c 65 20 63 6f 6d 6d  ints {eagle comm
1150: 61 6e 64 2e 6f 62 6a 65 63 74 20 64 6f 74 4e 65  and.object dotNe
1160: 74 5c 0d 0a 63 6f 6d 70 69 6c 65 2e 49 53 4f 4c  t\..compile.ISOL
1170: 41 54 45 44 5f 49 4e 54 45 52 50 52 45 54 45 52  ATED_INTERPRETER
1180: 53 20 53 79 73 74 65 6d 2e 44 61 74 61 2e 53 51  S System.Data.SQ
1190: 4c 69 74 65 5c 0d 0a 64 65 66 69 6e 65 43 6f 6e  Lite\..defineCon
11a0: 73 74 61 6e 74 2e 53 79 73 74 65 6d 2e 44 61 74  stant.System.Dat
11b0: 61 2e 53 51 4c 69 74 65 2e 55 53 45 5f 49 4e 54  a.SQLite.USE_INT
11c0: 45 52 4f 50 5f 44 4c 4c 7d 20 2d 72 65 73 75 6c  EROP_DLL} -resul
11d0: 74 20 5b 6c 69 73 74 20 5b 61 70 70 65 6e 64 41  t [list [appendA
11e0: 72 67 73 20 5c 0d 0a 70 72 66 78 31 2f 20 24 64  rgs \..prfx1/ $d
11f0: 34 37 32 5f 62 69 6e 61 72 79 5f 64 69 72 65 63  472_binary_direc
1200: 74 6f 72 79 20 2f 73 75 66 78 31 5d 20 5b 61 70  tory /sufx1] [ap
1210: 70 65 6e 64 41 72 67 73 20 70 72 66 78 32 2f 20  pendArgs prfx2/ 
1220: 5c 0d 0a 24 64 34 37 32 5f 74 61 72 67 65 74 5f  \..$d472_target_
1230: 66 72 61 6d 65 77 6f 72 6b 20 2f 73 75 66 78 32  framework /sufx2
1240: 5d 20 5b 61 70 70 65 6e 64 41 72 67 73 20 70 72  ] [appendArgs pr
1250: 66 78 33 2f 20 24 64 34 37 32 5f 62 69 6e 61 72  fx3/ $d472_binar
1260: 79 5f 64 69 72 65 63 74 6f 72 79 20 5c 0d 0a 2f  y_directory \../
1270: 73 75 66 78 33 5d 5d 7d 0d 0a 0d 0a 23 23 23 23  sufx3]]}....####
1280: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1290: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
12a0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
12b0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
12c0: 23 23 23 23 23 23 23 23 23 23 23 0d 0a 0d 0a 75  ###########....u
12d0: 6e 73 65 74 20 2d 6e 6f 63 6f 6d 70 6c 61 69 6e  nset -nocomplain
12e0: 20 64 34 37 32 5f 74 61 72 67 65 74 5f 66 72 61   d472_target_fra
12f0: 6d 65 77 6f 72 6b 20 64 34 37 32 5f 62 69 6e 61  mework d472_bina
1300: 72 79 5f 64 69 72 65 63 74 6f 72 79 0d 0a 0d 0a  ry_directory....
1310: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1320: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1330: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1340: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
1350: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 0d  ###############.
1360: 0a 0d 0a 6d 6f 76 65 53 79 73 74 65 6d 44 61 74  ...moveSystemDat
1370: 61 53 51 4c 69 74 65 44 6c 6c 43 6f 6e 66 69 67  aSQLiteDllConfig
1380: 20 74 72 75 65 0d 0a 0d 0a 23 23 23 23 23 23 23   true....#######
1390: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
13a0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
13b0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
13c0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23  ################
13d0: 23 23 23 23 23 23 23 23 0d 0a 0d 0a 72 75 6e 53  ########....runS
13e0: 51 4c 69 74 65 54 65 73 74 45 70 69 6c 6f 67 75  QLiteTestEpilogu
13f0: 65 0d 0a 72 75 6e 54 65 73 74 45 70 69 6c 6f 67  e..runTestEpilog
1400: 75 65 0d 0a                                      ue..