/ Hex Artifact Content
Login

Artifact dfc8b18a23e9e5289104145b712cdb887c2d840c2d70dc09ce5dbeba8ed8d47c:


0000: 23 20 44 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20  # Documentation 
0010: 66 6f 72 20 74 68 69 73 20 73 63 72 69 70 74 2e  for this script.
0020: 20 54 68 69 73 20 6d 61 79 20 62 65 20 6f 75 74   This may be out
0030: 70 75 74 20 74 6f 20 73 74 64 65 72 72 0a 23 20  put to stderr.# 
0040: 69 66 20 74 68 65 20 73 63 72 69 70 74 20 69 73  if the script is
0050: 20 69 6e 76 6f 6b 65 64 20 69 6e 63 6f 72 72 65   invoked incorre
0060: 63 74 6c 79 2e 0a 73 65 74 20 3a 3a 55 53 41 47  ctly..set ::USAG
0070: 45 5f 4d 45 53 53 41 47 45 20 7b 0a 54 68 69 73  E_MESSAGE {.This
0080: 20 54 63 6c 20 73 63 72 69 70 74 20 69 73 20 75   Tcl script is u
0090: 73 65 64 20 74 6f 20 74 65 73 74 20 74 68 65 20  sed to test the 
00a0: 76 61 72 69 6f 75 73 20 63 6f 6d 70 69 6c 65 20  various compile 
00b0: 74 69 6d 65 20 6f 70 74 69 6f 6e 73 20 0a 61 76  time options .av
00c0: 61 69 6c 61 62 6c 65 20 66 6f 72 20 6f 6d 69 74  ailable for omit
00d0: 74 69 6e 67 20 63 6f 64 65 20 28 74 68 65 20 53  ting code (the S
00e0: 51 4c 49 54 45 5f 4f 4d 49 54 5f 78 78 78 20 6f  QLITE_OMIT_xxx o
00f0: 70 74 69 6f 6e 73 29 2e 20 49 74 0a 73 68 6f 75  ptions). It.shou
0100: 6c 64 20 62 65 20 69 6e 76 6f 6b 65 64 20 61 73  ld be invoked as
0110: 20 66 6f 6c 6c 6f 77 73 3a 0a 0a 20 20 20 20 3c   follows:..    <
0120: 73 63 72 69 70 74 3e 20 3f 74 65 73 74 2d 73 79  script> ?test-sy
0130: 6d 62 6f 6c 3f 20 3f 2d 6d 61 6b 65 66 69 6c 65  mbol? ?-makefile
0140: 20 50 41 54 48 2d 54 4f 2d 4d 41 4b 45 46 49 4c   PATH-TO-MAKEFIL
0150: 45 3f 20 3f 2d 73 6b 69 70 5f 72 75 6e 3f 0a 0a  E? ?-skip_run?..
0160: 54 68 65 20 64 65 66 61 75 6c 74 20 76 61 6c 75  The default valu
0170: 65 20 66 6f 72 20 3a 3a 4d 41 4b 45 46 49 4c 45  e for ::MAKEFILE
0180: 20 69 73 20 22 2e 2e 2f 4d 61 6b 65 66 69 6c 65   is "../Makefile
0190: 2e 6c 69 6e 75 78 2e 67 63 63 22 2e 0a 0a 49 66  .linux.gcc"...If
01a0: 20 2d 73 6b 69 70 5f 72 75 6e 20 6f 70 74 69 6f   -skip_run optio
01b0: 6e 20 69 73 20 67 69 76 65 6e 20 74 68 65 6e 20  n is given then 
01c0: 6f 6e 6c 79 20 74 68 65 20 63 6f 6d 70 69 6c 65  only the compile
01d0: 20 70 61 72 74 20 69 73 20 61 74 74 65 6d 70 74   part is attempt
01e0: 65 64 2e 0a 0a 54 68 69 73 20 73 63 72 69 70 74  ed...This script
01f0: 20 62 75 69 6c 64 73 20 74 68 65 20 74 65 73 74   builds the test
0200: 66 69 78 74 75 72 65 20 70 72 6f 67 72 61 6d 20  fixture program 
0210: 61 6e 64 20 72 75 6e 73 20 74 68 65 20 53 51 4c  and runs the SQL
0220: 69 74 65 20 74 65 73 74 20 73 75 69 74 65 0a 6f  ite test suite.o
0230: 6e 63 65 20 77 69 74 68 20 65 61 63 68 20 53 51  nce with each SQ
0240: 4c 49 54 45 5f 4f 4d 49 54 5f 20 6f 70 74 69 6f  LITE_OMIT_ optio
0250: 6e 20 64 65 66 69 6e 65 64 20 61 6e 64 20 74 68  n defined and th
0260: 65 6e 20 6f 6e 63 65 20 77 69 74 68 20 61 6c 6c  en once with all
0270: 20 6f 70 74 69 6f 6e 73 0a 64 65 66 69 6e 65 64   options.defined
0280: 20 74 6f 67 65 74 68 65 72 2e 20 45 61 63 68 20   together. Each 
0290: 72 75 6e 20 69 73 20 70 65 72 66 6f 72 6d 65 64  run is performed
02a0: 20 69 6e 20 61 20 73 65 70 65 72 61 74 65 20 64   in a seperate d
02b0: 69 72 65 63 74 6f 72 79 20 63 72 65 61 74 65 64  irectory created
02c0: 0a 61 73 20 61 20 73 75 62 2d 64 69 72 65 63 74  .as a sub-direct
02d0: 6f 72 79 20 6f 66 20 74 68 65 20 63 75 72 72 65  ory of the curre
02e0: 6e 74 20 64 69 72 65 63 74 6f 72 79 20 62 79 20  nt directory by 
02f0: 74 68 65 20 73 63 72 69 70 74 2e 20 54 68 65 20  the script. The 
0300: 6f 75 74 70 75 74 0a 6f 66 20 74 68 65 20 62 75  output.of the bu
0310: 69 6c 64 20 69 73 20 73 61 76 65 64 20 69 6e 20  ild is saved in 
0320: 3c 73 75 62 2d 64 69 72 65 63 74 6f 72 79 3e 2f  <sub-directory>/
0330: 62 75 69 6c 64 2e 6c 6f 67 2e 20 54 68 65 20 6f  build.log. The o
0340: 75 74 70 75 74 20 6f 66 20 74 68 65 0a 74 65 73  utput of the.tes
0350: 74 2d 73 75 69 74 65 20 69 73 20 73 61 76 65 64  t-suite is saved
0360: 20 69 6e 20 3c 73 75 62 2d 64 69 72 65 63 74 6f   in <sub-directo
0370: 72 79 3e 2f 74 65 73 74 2e 6c 6f 67 2e 0a 0a 41  ry>/test.log...A
0380: 6c 6d 6f 73 74 20 61 6e 79 20 53 51 4c 69 74 65  lmost any SQLite
0390: 20 6d 61 6b 65 66 69 6c 65 20 28 65 78 63 65 70   makefile (excep
03a0: 74 20 74 68 6f 73 65 20 67 65 6e 65 72 61 74 65  t those generate
03b0: 64 20 62 79 20 63 6f 6e 66 69 67 75 72 65 20 2d  d by configure -
03c0: 20 73 65 65 20 62 65 6c 6f 77 29 0a 73 68 6f 75   see below).shou
03d0: 6c 64 20 77 6f 72 6b 2e 20 54 68 65 20 66 6f 6c  ld work. The fol
03e0: 6c 6f 77 69 6e 67 20 70 72 6f 70 65 72 74 69 65  lowing propertie
03f0: 73 20 61 72 65 20 72 65 71 75 69 72 65 64 3a 0a  s are required:.
0400: 0a 20 20 2a 20 54 68 65 20 6d 61 6b 65 66 69 6c  .  * The makefil
0410: 65 20 73 68 6f 75 6c 64 20 73 75 70 70 6f 72 74  e should support
0420: 20 74 68 65 20 22 74 65 73 74 66 69 78 74 75 72   the "testfixtur
0430: 65 22 20 74 61 72 67 65 74 2e 0a 20 20 2a 20 54  e" target..  * T
0440: 68 65 20 6d 61 6b 65 66 69 6c 65 20 73 68 6f 75  he makefile shou
0450: 6c 64 20 73 75 70 70 6f 72 74 20 74 68 65 20 22  ld support the "
0460: 74 65 73 74 22 20 74 61 72 67 65 74 2e 0a 20 20  test" target..  
0470: 2a 20 54 68 65 20 6d 61 6b 65 66 69 6c 65 20 73  * The makefile s
0480: 68 6f 75 6c 64 20 73 75 70 70 6f 72 74 20 74 68  hould support th
0490: 65 20 76 61 72 69 61 62 6c 65 20 22 4f 50 54 53  e variable "OPTS
04a0: 22 20 61 73 20 61 20 77 61 79 20 74 6f 20 70 61  " as a way to pa
04b0: 73 73 0a 20 20 20 20 6f 70 74 69 6f 6e 73 20 66  ss.    options f
04c0: 72 6f 6d 20 74 68 65 20 6d 61 6b 65 20 63 6f 6d  rom the make com
04d0: 6d 61 6e 64 20 6c 69 6e 65 20 74 6f 20 6c 65 6d  mand line to lem
04e0: 6f 6e 20 61 6e 64 20 74 68 65 20 43 20 63 6f 6d  on and the C com
04f0: 70 69 6c 65 72 2e 0a 0a 4d 6f 72 65 20 70 72 65  piler...More pre
0500: 63 69 73 65 6c 79 2c 20 74 68 65 20 66 6f 6c 6c  cisely, the foll
0510: 6f 77 69 6e 67 20 74 77 6f 20 69 6e 76 6f 63 61  owing two invoca
0520: 74 69 6f 6e 73 20 6d 75 73 74 20 62 65 20 73 75  tions must be su
0530: 70 70 6f 72 74 65 64 3a 0a 0a 20 20 24 3a 3a 4d  pported:..  $::M
0540: 41 4b 45 42 49 4e 20 2d 66 20 24 3a 3a 4d 41 4b  AKEBIN -f $::MAK
0550: 45 46 49 4c 45 20 74 65 73 74 66 69 78 74 75 72  EFILE testfixtur
0560: 65 20 4f 50 54 53 3d 22 2d 44 53 51 4c 49 54 45  e OPTS="-DSQLITE
0570: 5f 4f 4d 49 54 5f 41 4c 54 45 52 54 41 42 4c 45  _OMIT_ALTERTABLE
0580: 3d 31 22 0a 20 20 24 3a 3a 4d 41 4b 45 42 49 4e  =1".  $::MAKEBIN
0590: 20 2d 66 20 24 3a 3a 4d 41 4b 45 46 49 4c 45 20   -f $::MAKEFILE 
05a0: 74 65 73 74 0a 0a 4d 61 6b 65 66 69 6c 65 73 20  test..Makefiles 
05b0: 67 65 6e 65 72 61 74 65 64 20 62 79 20 74 68 65  generated by the
05c0: 20 73 71 6c 69 74 65 20 63 6f 6e 66 69 67 75 72   sqlite configur
05d0: 65 20 70 72 6f 67 72 61 6d 20 63 61 6e 6e 6f 74  e program cannot
05e0: 20 62 65 20 75 73 65 64 20 61 73 0a 74 68 65 79   be used as.they
05f0: 20 64 6f 20 6e 6f 74 20 72 65 73 70 65 63 74 20   do not respect 
0600: 74 68 65 20 4f 50 54 53 20 76 61 72 69 61 62 6c  the OPTS variabl
0610: 65 2e 0a 7d 0a 0a 0a 23 20 42 75 69 6c 64 20 61  e..}...# Build a
0620: 20 74 65 73 74 66 69 78 74 75 72 65 20 65 78 65   testfixture exe
0630: 63 75 74 61 62 6c 65 20 61 6e 64 20 72 75 6e 20  cutable and run 
0640: 71 75 69 63 6b 2e 74 65 73 74 20 75 73 69 6e 67  quick.test using
0650: 20 69 74 2e 20 54 68 65 20 66 69 72 73 74 0a 23   it. The first.#
0660: 20 70 61 72 61 6d 65 74 65 72 20 69 73 20 74 68   parameter is th
0670: 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 64 69  e name of the di
0680: 72 65 63 74 6f 72 79 20 74 6f 20 63 72 65 61 74  rectory to creat
0690: 65 20 61 6e 64 20 75 73 65 20 74 6f 20 72 75 6e  e and use to run
06a0: 20 74 68 65 0a 23 20 74 65 73 74 20 69 6e 2e 20   the.# test in. 
06b0: 54 68 65 20 73 65 63 6f 6e 64 20 70 61 72 61 6d  The second param
06c0: 65 74 65 72 20 69 73 20 61 20 6c 69 73 74 20 6f  eter is a list o
06d0: 66 20 4f 4d 49 54 20 73 79 6d 62 6f 6c 73 20 74  f OMIT symbols t
06e0: 6f 20 64 65 66 69 6e 65 0a 23 20 77 68 65 6e 20  o define.# when 
06f0: 64 6f 69 6e 67 20 73 6f 2e 20 46 6f 72 20 65 78  doing so. For ex
0700: 61 6d 70 6c 65 3a 0a 23 0a 23 20 20 20 20 20 72  ample:.#.#     r
0710: 75 6e 5f 71 75 69 63 6b 5f 74 65 73 74 20 2f 74  un_quick_test /t
0720: 6d 70 2f 74 65 73 74 64 69 72 20 7b 53 51 4c 49  mp/testdir {SQLI
0730: 54 45 5f 4f 4d 49 54 5f 54 52 49 47 47 45 52 20  TE_OMIT_TRIGGER 
0740: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 56 49 45 57  SQLITE_OMIT_VIEW
0750: 7d 0a 23 0a 23 0a 70 72 6f 63 20 72 75 6e 5f 71  }.#.#.proc run_q
0760: 75 69 63 6b 5f 74 65 73 74 20 7b 64 69 72 20 6f  uick_test {dir o
0770: 6d 69 74 5f 73 79 6d 62 6f 6c 5f 6c 69 73 74 7d  mit_symbol_list}
0780: 20 7b 0a 20 20 23 20 43 6f 6d 70 69 6c 65 20 74   {.  # Compile t
0790: 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 65 20  he value of the 
07a0: 4f 50 54 53 20 4d 61 6b 65 66 69 6c 65 20 76 61  OPTS Makefile va
07b0: 72 69 61 62 6c 65 2e 0a 20 20 73 65 74 20 6f 70  riable..  set op
07c0: 74 73 20 22 22 0a 20 20 69 66 20 7b 24 3a 3a 74  ts "".  if {$::t
07d0: 63 6c 5f 70 6c 61 74 66 6f 72 6d 28 70 6c 61 74  cl_platform(plat
07e0: 66 6f 72 6d 29 3d 3d 22 77 69 6e 64 6f 77 73 22  form)=="windows"
07f0: 7d 20 7b 0a 20 20 20 20 61 70 70 65 6e 64 20 6f  } {.    append o
0800: 70 74 73 20 22 4f 50 54 53 20 2b 3d 20 2d 44 53  pts "OPTS += -DS
0810: 51 4c 49 54 45 5f 4f 53 5f 57 49 4e 3d 31 5c 6e  QLITE_OS_WIN=1\n
0820: 22 0a 20 20 20 20 73 65 74 20 74 61 72 67 65 74  ".    set target
0830: 20 22 74 65 73 74 66 69 78 74 75 72 65 2e 65 78   "testfixture.ex
0840: 65 22 0a 20 20 7d 20 65 6c 73 65 20 7b 0a 20 20  e".  } else {.  
0850: 20 20 61 70 70 65 6e 64 20 6f 70 74 73 20 22 4f    append opts "O
0860: 50 54 53 20 2b 3d 20 2d 44 53 51 4c 49 54 45 5f  PTS += -DSQLITE_
0870: 4f 53 5f 55 4e 49 58 3d 31 5c 6e 22 0a 20 20 7d  OS_UNIX=1\n".  }
0880: 0a 20 20 66 6f 72 65 61 63 68 20 73 79 6d 20 24  .  foreach sym $
0890: 6f 6d 69 74 5f 73 79 6d 62 6f 6c 5f 6c 69 73 74  omit_symbol_list
08a0: 20 7b 0a 20 20 20 20 61 70 70 65 6e 64 20 6f 70   {.    append op
08b0: 74 73 20 22 4f 50 54 53 20 2b 3d 20 2d 44 24 7b  ts "OPTS += -D${
08c0: 73 79 6d 7d 3d 31 5c 6e 22 0a 20 20 7d 0a 0a 20  sym}=1\n".  }.. 
08d0: 20 23 20 43 72 65 61 74 65 20 74 68 65 20 64 69   # Create the di
08e0: 72 65 63 74 6f 72 79 20 61 6e 64 20 64 6f 20 74  rectory and do t
08f0: 68 65 20 62 75 69 6c 64 2e 20 49 66 20 61 6e 20  he build. If an 
0900: 65 72 72 6f 72 20 6f 63 63 75 72 73 20 72 65 74  error occurs ret
0910: 75 72 6e 0a 20 20 23 20 65 61 72 6c 79 20 77 69  urn.  # early wi
0920: 74 68 6f 75 74 20 61 74 74 65 6d 70 74 69 6e 67  thout attempting
0930: 20 74 6f 20 72 75 6e 20 74 68 65 20 74 65 73 74   to run the test
0940: 20 73 75 69 74 65 2e 0a 20 20 66 69 6c 65 20 6d   suite..  file m
0950: 6b 64 69 72 20 24 64 69 72 0a 20 20 70 75 74 73  kdir $dir.  puts
0960: 20 2d 6e 6f 6e 65 77 6c 69 6e 65 20 22 42 75 69   -nonewline "Bui
0970: 6c 64 69 6e 67 20 24 64 69 72 2e 2e 2e 22 0a 20  lding $dir...". 
0980: 20 66 6c 75 73 68 20 73 74 64 6f 75 74 0a 20 20   flush stdout.  
0990: 63 61 74 63 68 20 7b 0a 20 20 20 20 66 69 6c 65  catch {.    file
09a0: 20 63 6f 70 79 20 2d 66 6f 72 63 65 20 2e 2f 63   copy -force ./c
09b0: 6f 6e 66 69 67 2e 68 20 24 64 69 72 0a 20 20 20  onfig.h $dir.   
09c0: 20 66 69 6c 65 20 63 6f 70 79 20 2d 66 6f 72 63   file copy -forc
09d0: 65 20 2e 2f 6c 69 62 74 6f 6f 6c 20 24 64 69 72  e ./libtool $dir
09e0: 0a 20 20 7d 0a 20 20 73 65 74 20 66 64 20 5b 6f  .  }.  set fd [o
09f0: 70 65 6e 20 24 3a 3a 4d 41 4b 45 46 49 4c 45 5d  pen $::MAKEFILE]
0a00: 0a 20 20 73 65 74 20 6d 6b 66 69 6c 65 20 5b 72  .  set mkfile [r
0a10: 65 61 64 20 24 66 64 5d 0a 20 20 63 6c 6f 73 65  ead $fd].  close
0a20: 20 24 66 64 0a 20 20 72 65 67 73 75 62 20 7b 5c   $fd.  regsub {\
0a30: 6e 69 6e 63 6c 75 64 65 7d 20 24 6d 6b 66 69 6c  ninclude} $mkfil
0a40: 65 20 22 5c 6e 24 6f 70 74 73 5c 6e 69 6e 63 6c  e "\n$opts\nincl
0a50: 75 64 65 22 20 6d 6b 66 69 6c 65 0a 20 20 73 65  ude" mkfile.  se
0a60: 74 20 66 64 20 5b 6f 70 65 6e 20 24 64 69 72 2f  t fd [open $dir/
0a70: 6d 61 6b 65 66 69 6c 65 20 77 5d 0a 20 20 70 75  makefile w].  pu
0a80: 74 73 20 24 66 64 20 24 6d 6b 66 69 6c 65 0a 20  ts $fd $mkfile. 
0a90: 20 63 6c 6f 73 65 20 24 66 64 0a 20 20 0a 20 20   close $fd.  .  
0aa0: 73 65 74 20 72 63 20 5b 63 61 74 63 68 20 7b 0a  set rc [catch {.
0ab0: 20 20 20 20 65 78 65 63 20 24 3a 3a 4d 41 4b 45      exec $::MAKE
0ac0: 42 49 4e 20 2d 43 20 24 64 69 72 20 2d 66 20 6d  BIN -C $dir -f m
0ad0: 61 6b 65 66 69 6c 65 20 63 6c 65 61 6e 20 24 3a  akefile clean $:
0ae0: 3a 54 41 52 47 45 54 20 3e 26 20 24 64 69 72 2f  :TARGET >& $dir/
0af0: 62 75 69 6c 64 2e 6c 6f 67 0a 20 20 7d 5d 0a 20  build.log.  }]. 
0b00: 20 69 66 20 7b 24 72 63 7d 20 7b 0a 20 20 20 20   if {$rc} {.    
0b10: 70 75 74 73 20 22 4e 6f 20 67 6f 6f 64 2e 20 53  puts "No good. S
0b20: 65 65 20 24 64 69 72 2f 62 75 69 6c 64 2e 6c 6f  ee $dir/build.lo
0b30: 67 2e 22 0a 20 20 20 20 72 65 74 75 72 6e 0a 20  g.".    return. 
0b40: 20 7d 20 65 6c 73 65 20 7b 0a 20 20 20 20 70 75   } else {.    pu
0b50: 74 73 20 22 4f 6b 22 0a 20 20 7d 0a 20 20 0a 20  ts "Ok".  }.  . 
0b60: 20 23 20 43 72 65 61 74 65 20 61 6e 20 65 6d 70   # Create an emp
0b70: 74 79 20 66 69 6c 65 20 22 24 64 69 72 2f 73 71  ty file "$dir/sq
0b80: 6c 69 74 65 33 22 2e 20 54 68 69 73 20 69 73 20  lite3". This is 
0b90: 74 6f 20 74 72 69 63 6b 20 74 68 65 20 6d 61 6b  to trick the mak
0ba0: 65 66 69 6c 65 20 6f 75 74 20 0a 20 20 23 20 6f  efile out .  # o
0bb0: 66 20 74 72 79 69 6e 67 20 74 6f 20 62 75 69 6c  f trying to buil
0bc0: 64 20 74 68 65 20 73 71 6c 69 74 65 20 73 68 65  d the sqlite she
0bd0: 6c 6c 2e 20 54 68 65 20 73 71 6c 69 74 65 20 73  ll. The sqlite s
0be0: 68 65 6c 6c 20 77 6f 6e 27 74 20 62 75 69 6c 64  hell won't build
0bf0: 20 0a 20 20 23 20 77 69 74 68 20 73 6f 6d 65 20   .  # with some 
0c00: 6f 66 20 74 68 65 20 4f 4d 49 54 20 6f 70 74 69  of the OMIT opti
0c10: 6f 6e 73 20 28 69 2e 65 20 4f 4d 49 54 5f 43 4f  ons (i.e OMIT_CO
0c20: 4d 50 4c 45 54 45 29 2e 0a 20 20 73 65 74 20 73  MPLETE)..  set s
0c30: 71 6c 69 74 65 33 5f 64 75 6d 6d 79 20 24 64 69  qlite3_dummy $di
0c40: 72 2f 73 71 6c 69 74 65 33 0a 20 20 69 66 20 7b  r/sqlite3.  if {
0c50: 24 3a 3a 74 63 6c 5f 70 6c 61 74 66 6f 72 6d 28  $::tcl_platform(
0c60: 70 6c 61 74 66 6f 72 6d 29 3d 3d 22 77 69 6e 64  platform)=="wind
0c70: 6f 77 73 22 7d 20 7b 0a 20 20 20 20 61 70 70 65  ows"} {.    appe
0c80: 6e 64 20 73 71 6c 69 74 65 33 5f 64 75 6d 6d 79  nd sqlite3_dummy
0c90: 20 22 2e 65 78 65 22 0a 20 20 7d 0a 20 20 69 66   ".exe".  }.  if
0ca0: 20 7b 21 5b 66 69 6c 65 20 65 78 69 73 74 73 20   {![file exists 
0cb0: 24 73 71 6c 69 74 65 33 5f 64 75 6d 6d 79 5d 7d  $sqlite3_dummy]}
0cc0: 20 7b 0a 20 20 20 20 73 65 74 20 77 72 20 5b 6f   {.    set wr [o
0cd0: 70 65 6e 20 24 73 71 6c 69 74 65 33 5f 64 75 6d  pen $sqlite3_dum
0ce0: 6d 79 20 77 5d 0a 20 20 20 20 70 75 74 73 20 24  my w].    puts $
0cf0: 77 72 20 22 64 75 6d 6d 79 22 0a 20 20 20 20 63  wr "dummy".    c
0d00: 6c 6f 73 65 20 24 77 72 0a 20 20 7d 0a 0a 20 20  lose $wr.  }..  
0d10: 69 66 20 7b 24 3a 3a 53 4b 49 50 5f 52 55 4e 7d  if {$::SKIP_RUN}
0d20: 20 7b 0a 20 20 20 20 20 20 70 75 74 73 20 22 53   {.      puts "S
0d30: 6b 69 70 20 74 65 73 74 69 6e 67 20 24 64 69 72  kip testing $dir
0d40: 2e 22 0a 20 20 7d 20 65 6c 73 65 20 7b 0a 20 20  .".  } else {.  
0d50: 20 20 23 20 52 75 6e 20 74 68 65 20 74 65 73 74    # Run the test
0d60: 20 73 75 69 74 65 2e 0a 20 20 20 20 70 75 74 73   suite..    puts
0d70: 20 2d 6e 6f 6e 65 77 6c 69 6e 65 20 22 54 65 73   -nonewline "Tes
0d80: 74 69 6e 67 20 24 64 69 72 2e 2e 2e 22 0a 20 20  ting $dir...".  
0d90: 20 20 66 6c 75 73 68 20 73 74 64 6f 75 74 0a 20    flush stdout. 
0da0: 20 20 20 73 65 74 20 72 63 20 5b 63 61 74 63 68     set rc [catch
0db0: 20 7b 0a 20 20 20 20 20 20 65 78 65 63 20 24 3a   {.      exec $:
0dc0: 3a 4d 41 4b 45 42 49 4e 20 2d 43 20 24 64 69 72  :MAKEBIN -C $dir
0dd0: 20 2d 66 20 6d 61 6b 65 66 69 6c 65 20 74 65 73   -f makefile tes
0de0: 74 20 3e 26 20 24 64 69 72 2f 74 65 73 74 2e 6c  t >& $dir/test.l
0df0: 6f 67 0a 20 20 20 20 7d 5d 0a 20 20 20 20 69 66  og.    }].    if
0e00: 20 7b 24 72 63 7d 20 7b 0a 20 20 20 20 20 20 70   {$rc} {.      p
0e10: 75 74 73 20 22 4e 6f 20 67 6f 6f 64 2e 20 53 65  uts "No good. Se
0e20: 65 20 24 64 69 72 2f 74 65 73 74 2e 6c 6f 67 2e  e $dir/test.log.
0e30: 22 0a 20 20 20 20 7d 20 65 6c 73 65 20 7b 0a 20  ".    } else {. 
0e40: 20 20 20 20 20 70 75 74 73 20 22 4f 6b 22 0a 20       puts "Ok". 
0e50: 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 0a 23 20 54     }.  }.}...# T
0e60: 68 69 73 20 70 72 6f 63 20 70 72 6f 63 65 73 73  his proc process
0e70: 65 73 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 6c  es the command l
0e80: 69 6e 65 20 6f 70 74 69 6f 6e 73 20 70 61 73 73  ine options pass
0e90: 65 64 20 74 6f 20 74 68 69 73 20 73 63 72 69 70  ed to this scrip
0ea0: 74 2e 0a 23 20 43 75 72 72 65 6e 74 6c 79 20 74  t..# Currently t
0eb0: 68 65 20 6f 6e 6c 79 20 6f 70 74 69 6f 6e 20 73  he only option s
0ec0: 75 70 70 6f 72 74 65 64 20 69 73 20 22 2d 6d 61  upported is "-ma
0ed0: 6b 65 66 69 6c 65 22 2c 20 64 65 66 61 75 6c 74  kefile", default
0ee0: 0a 23 20 22 2e 2e 2f 4d 61 6b 65 66 69 6c 65 2e  .# "../Makefile.
0ef0: 6c 69 6e 75 78 2d 67 63 63 22 2e 20 53 65 74 20  linux-gcc". Set 
0f00: 74 68 65 20 3a 3a 4d 41 4b 45 46 49 4c 45 20 76  the ::MAKEFILE v
0f10: 61 72 69 61 62 6c 65 20 74 6f 20 74 68 65 20 76  ariable to the v
0f20: 61 6c 75 65 20 6f 66 20 74 68 69 73 0a 23 20 6f  alue of this.# o
0f30: 70 74 69 6f 6e 2e 0a 23 0a 70 72 6f 63 20 70 72  ption..#.proc pr
0f40: 6f 63 65 73 73 5f 6f 70 74 69 6f 6e 73 20 7b 61  ocess_options {a
0f50: 72 67 76 7d 20 7b 0a 20 20 73 65 74 20 3a 3a 4d  rgv} {.  set ::M
0f60: 41 4b 45 42 49 4e 20 6d 61 6b 65 20 20 20 20 20  AKEBIN make     
0f70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0f80: 20 20 20 3b 23 20 44 65 66 61 75 6c 74 20 76 61     ;# Default va
0f90: 6c 75 65 0a 20 20 69 66 20 7b 24 3a 3a 74 63 6c  lue.  if {$::tcl
0fa0: 5f 70 6c 61 74 66 6f 72 6d 28 70 6c 61 74 66 6f  _platform(platfo
0fb0: 72 6d 29 3d 3d 22 77 69 6e 64 6f 77 73 22 7d 20  rm)=="windows"} 
0fc0: 7b 0a 20 20 20 20 73 65 74 20 3a 3a 4d 41 4b 45  {.    set ::MAKE
0fd0: 46 49 4c 45 20 2e 2f 4d 61 6b 65 66 69 6c 65 20  FILE ./Makefile 
0fe0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 23                ;#
0ff0: 20 44 65 66 61 75 6c 74 20 76 61 6c 75 65 20 6f   Default value o
1000: 6e 20 57 69 6e 64 6f 77 73 0a 20 20 7d 20 65 6c  n Windows.  } el
1010: 73 65 20 7b 0a 20 20 20 20 73 65 74 20 3a 3a 4d  se {.    set ::M
1020: 41 4b 45 46 49 4c 45 20 2e 2f 4d 61 6b 65 66 69  AKEFILE ./Makefi
1030: 6c 65 2e 6c 69 6e 75 78 2d 67 63 63 20 20 20 20  le.linux-gcc    
1040: 20 3b 23 20 44 65 66 61 75 6c 74 20 76 61 6c 75   ;# Default valu
1050: 65 0a 20 20 7d 0a 20 20 73 65 74 20 3a 3a 53 4b  e.  }.  set ::SK
1060: 49 50 5f 52 55 4e 20 30 20 20 20 20 20 20 20 20  IP_RUN 0        
1070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1080: 20 20 3b 23 20 44 65 66 61 75 6c 74 20 74 6f 20    ;# Default to 
1090: 61 74 74 65 6d 70 74 20 74 65 73 74 0a 20 20 73  attempt test.  s
10a0: 65 74 20 3a 3a 54 41 52 47 45 54 20 74 65 73 74  et ::TARGET test
10b0: 66 69 78 74 75 72 65 20 20 20 20 20 20 20 20 20  fixture         
10c0: 20 20 20 20 20 20 20 20 20 3b 23 20 44 65 66 61           ;# Defa
10d0: 75 6c 74 20 74 68 69 6e 67 20 74 6f 20 62 75 69  ult thing to bui
10e0: 6c 64 0a 0a 20 20 66 6f 72 20 7b 73 65 74 20 69  ld..  for {set i
10f0: 20 30 7d 20 7b 24 69 20 3c 20 5b 6c 6c 65 6e 67   0} {$i < [lleng
1100: 74 68 20 24 61 72 67 76 5d 7d 20 7b 69 6e 63 72  th $argv]} {incr
1110: 20 69 7d 20 7b 0a 20 20 20 20 73 77 69 74 63 68   i} {.    switch
1120: 20 2d 72 65 67 65 78 70 20 2d 2d 20 5b 6c 69 6e   -regexp -- [lin
1130: 64 65 78 20 24 61 72 67 76 20 24 69 5d 20 7b 0a  dex $argv $i] {.
1140: 20 20 20 20 20 20 2d 7b 31 2c 32 7d 6d 61 6b 65        -{1,2}make
1150: 66 69 6c 65 20 7b 0a 20 20 20 20 20 20 20 20 69  file {.        i
1160: 6e 63 72 20 69 0a 20 20 20 20 20 20 20 20 73 65  ncr i.        se
1170: 74 20 3a 3a 4d 41 4b 45 46 49 4c 45 20 5b 6c 69  t ::MAKEFILE [li
1180: 6e 64 65 78 20 24 61 72 67 76 20 24 69 5d 0a 20  ndex $argv $i]. 
1190: 20 20 20 20 20 7d 0a 20 20 0a 20 20 20 20 20 20       }.  .      
11a0: 2d 7b 31 2c 32 7d 6e 6d 61 6b 65 20 7b 0a 20 20  -{1,2}nmake {.  
11b0: 20 20 20 20 20 20 73 65 74 20 3a 3a 4d 41 4b 45        set ::MAKE
11c0: 42 49 4e 20 6e 6d 61 6b 65 0a 20 20 20 20 20 20  BIN nmake.      
11d0: 20 20 73 65 74 20 3a 3a 4d 41 4b 45 46 49 4c 45    set ::MAKEFILE
11e0: 20 2e 2f 4d 61 6b 65 66 69 6c 65 2e 6d 73 63 0a   ./Makefile.msc.
11f0: 20 20 20 20 20 20 7d 0a 0a 20 20 20 20 20 20 2d        }..      -
1200: 7b 31 2c 32 7d 74 61 72 67 65 74 20 7b 0a 20 20  {1,2}target {.  
1210: 20 20 20 20 20 20 69 6e 63 72 20 69 0a 20 20 20        incr i.   
1220: 20 20 20 20 20 73 65 74 20 3a 3a 54 41 52 47 45       set ::TARGE
1230: 54 20 5b 6c 69 6e 64 65 78 20 24 61 72 67 76 20  T [lindex $argv 
1240: 24 69 5d 0a 20 20 20 20 20 20 7d 0a 0a 20 20 20  $i].      }..   
1250: 20 20 20 2d 7b 31 2c 32 7d 73 6b 69 70 5f 72 75     -{1,2}skip_ru
1260: 6e 20 7b 0a 20 20 20 20 20 20 20 20 73 65 74 20  n {.        set 
1270: 3a 3a 53 4b 49 50 5f 52 55 4e 20 31 0a 20 20 20  ::SKIP_RUN 1.   
1280: 20 20 20 7d 0a 0a 20 20 20 20 20 20 2d 7b 31 2c     }..      -{1,
1290: 32 7d 68 65 6c 70 20 7b 0a 20 20 20 20 20 20 20  2}help {.       
12a0: 20 70 75 74 73 20 24 3a 3a 55 53 41 47 45 5f 4d   puts $::USAGE_M
12b0: 45 53 53 41 47 45 0a 20 20 20 20 20 20 20 20 65  ESSAGE.        e
12c0: 78 69 74 0a 20 20 20 20 20 20 7d 0a 0a 20 20 20  xit.      }..   
12d0: 20 20 20 2d 2e 2a 20 7b 0a 20 20 20 20 20 20 20     -.* {.       
12e0: 20 70 75 74 73 20 73 74 64 65 72 72 20 22 55 6e   puts stderr "Un
12f0: 6b 6e 6f 77 6e 20 6f 70 74 69 6f 6e 3a 20 5b 6c  known option: [l
1300: 69 6e 64 65 78 20 24 61 72 67 76 20 69 5d 22 0a  index $argv i]".
1310: 20 20 20 20 20 20 20 20 70 75 74 73 20 73 74 64          puts std
1320: 65 72 72 20 24 3a 3a 55 53 41 47 45 5f 4d 45 53  err $::USAGE_MES
1330: 53 41 47 45 0a 20 20 20 20 20 20 20 20 65 78 69  SAGE.        exi
1340: 74 20 31 0a 20 20 20 20 20 20 7d 0a 0a 20 20 20  t 1.      }..   
1350: 20 20 20 64 65 66 61 75 6c 74 20 7b 0a 20 20 20     default {.   
1360: 20 20 20 20 20 69 66 20 7b 5b 69 6e 66 6f 20 65       if {[info e
1370: 78 69 73 74 73 20 3a 3a 53 59 4d 42 4f 4c 5d 7d  xists ::SYMBOL]}
1380: 20 7b 0a 20 20 20 20 20 20 20 20 20 20 70 75 74   {.          put
1390: 73 20 73 74 64 65 72 72 20 5b 73 74 72 69 6e 67  s stderr [string
13a0: 20 74 72 69 6d 20 24 3a 3a 55 53 41 47 45 5f 4d   trim $::USAGE_M
13b0: 45 53 53 41 47 45 5d 0a 20 20 20 20 20 20 20 20  ESSAGE].        
13c0: 20 20 65 78 69 74 20 2d 31 0a 20 20 20 20 20 20    exit -1.      
13d0: 20 20 7d 0a 20 20 20 20 20 20 20 20 73 65 74 20    }.        set 
13e0: 3a 3a 53 59 4d 42 4f 4c 20 5b 6c 69 6e 64 65 78  ::SYMBOL [lindex
13f0: 20 24 61 72 67 76 20 24 69 5d 0a 20 20 20 20 20   $argv $i].     
1400: 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 73 65 74   }.    }.    set
1410: 20 3a 3a 4d 41 4b 45 46 49 4c 45 20 5b 66 69 6c   ::MAKEFILE [fil
1420: 65 20 6e 6f 72 6d 61 6c 69 7a 65 20 24 3a 3a 4d  e normalize $::M
1430: 41 4b 45 46 49 4c 45 5d 0a 20 20 7d 0a 7d 0a 0a  AKEFILE].  }.}..
1440: 23 20 4d 61 69 6e 20 72 6f 75 74 69 6e 65 2e 0a  # Main routine..
1450: 23 0a 0a 70 72 6f 63 20 6d 61 69 6e 20 7b 61 72  #..proc main {ar
1460: 67 76 7d 20 7b 0a 20 20 23 20 4c 69 73 74 20 6f  gv} {.  # List o
1470: 66 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 58 58  f SQLITE_OMIT_XX
1480: 58 20 73 79 6d 62 6f 6c 73 20 73 75 70 70 6f 72  X symbols suppor
1490: 74 65 64 20 62 79 20 53 51 4c 69 74 65 2e 0a 20  ted by SQLite.. 
14a0: 20 73 65 74 20 3a 3a 4f 4d 49 54 5f 53 59 4d 42   set ::OMIT_SYMB
14b0: 4f 4c 53 20 5b 6c 69 73 74 20 5c 0a 20 20 20 20  OLS [list \.    
14c0: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 41 4c 54 45  SQLITE_OMIT_ALTE
14d0: 52 54 41 42 4c 45 20 5c 0a 20 20 20 20 53 51 4c  RTABLE \.    SQL
14e0: 49 54 45 5f 4f 4d 49 54 5f 41 4e 41 4c 59 5a 45  ITE_OMIT_ANALYZE
14f0: 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d   \.    SQLITE_OM
1500: 49 54 5f 41 54 54 41 43 48 20 5c 0a 20 20 20 20  IT_ATTACH \.    
1510: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 41 55 54 48  SQLITE_OMIT_AUTH
1520: 4f 52 49 5a 41 54 49 4f 4e 20 5c 0a 20 20 20 20  ORIZATION \.    
1530: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 41 55 54 4f  SQLITE_OMIT_AUTO
1540: 49 4e 43 52 45 4d 45 4e 54 20 5c 0a 20 20 20 20  INCREMENT \.    
1550: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 41 55 54 4f  SQLITE_OMIT_AUTO
1560: 49 4e 49 54 20 5c 0a 20 20 20 20 53 51 4c 49 54  INIT \.    SQLIT
1570: 45 5f 4f 4d 49 54 5f 41 55 54 4f 4d 41 54 49 43  E_OMIT_AUTOMATIC
1580: 5f 49 4e 44 45 58 20 5c 0a 20 20 20 20 53 51 4c  _INDEX \.    SQL
1590: 49 54 45 5f 4f 4d 49 54 5f 41 55 54 4f 52 45 53  ITE_OMIT_AUTORES
15a0: 45 54 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f  ET \.    SQLITE_
15b0: 4f 4d 49 54 5f 41 55 54 4f 56 41 43 55 55 4d 20  OMIT_AUTOVACUUM 
15c0: 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49  \.    SQLITE_OMI
15d0: 54 5f 42 45 54 57 45 45 4e 5f 4f 50 54 49 4d 49  T_BETWEEN_OPTIMI
15e0: 5a 41 54 49 4f 4e 20 5c 0a 20 20 20 20 53 51 4c  ZATION \.    SQL
15f0: 49 54 45 5f 4f 4d 49 54 5f 42 4c 4f 42 5f 4c 49  ITE_OMIT_BLOB_LI
1600: 54 45 52 41 4c 20 5c 0a 20 20 20 20 53 51 4c 49  TERAL \.    SQLI
1610: 54 45 5f 4f 4d 49 54 5f 42 54 52 45 45 43 4f 55  TE_OMIT_BTREECOU
1620: 4e 54 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f  NT \.    SQLITE_
1630: 4f 4d 49 54 5f 42 55 49 4c 54 49 4e 5f 54 45 53  OMIT_BUILTIN_TES
1640: 54 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f  T \.    SQLITE_O
1650: 4d 49 54 5f 43 41 53 54 20 5c 0a 20 20 20 20 53  MIT_CAST \.    S
1660: 51 4c 49 54 45 5f 4f 4d 49 54 5f 43 48 45 43 4b  QLITE_OMIT_CHECK
1670: 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d   \.    SQLITE_OM
1680: 49 54 5f 43 4f 4d 50 49 4c 45 4f 50 54 49 4f 4e  IT_COMPILEOPTION
1690: 5f 44 49 41 47 53 20 5c 0a 20 20 20 20 53 51 4c  _DIAGS \.    SQL
16a0: 49 54 45 5f 4f 4d 49 54 5f 43 4f 4d 50 4c 45 54  ITE_OMIT_COMPLET
16b0: 45 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f  E \.    SQLITE_O
16c0: 4d 49 54 5f 43 4f 4d 50 4f 55 4e 44 5f 53 45 4c  MIT_COMPOUND_SEL
16d0: 45 43 54 20 5c 0a 20 20 20 20 53 51 4c 49 54 45  ECT \.    SQLITE
16e0: 5f 4f 4d 49 54 5f 43 54 45 20 5c 0a 20 20 20 20  _OMIT_CTE \.    
16f0: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 44 41 54 45  SQLITE_OMIT_DATE
1700: 54 49 4d 45 5f 46 55 4e 43 53 20 5c 0a 20 20 20  TIME_FUNCS \.   
1710: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 44 45 43   SQLITE_OMIT_DEC
1720: 4c 54 59 50 45 20 5c 0a 20 20 20 20 53 51 4c 49  LTYPE \.    SQLI
1730: 54 45 5f 4f 4d 49 54 5f 44 45 50 52 45 43 41 54  TE_OMIT_DEPRECAT
1740: 45 44 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f  ED \.    SQLITE_
1750: 4f 4d 49 54 5f 45 58 50 4c 41 49 4e 20 5c 0a 20  OMIT_EXPLAIN \. 
1760: 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46     SQLITE_OMIT_F
1770: 4c 41 47 5f 50 52 41 47 4d 41 53 20 5c 0a 20 20  LAG_PRAGMAS \.  
1780: 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46 4c    SQLITE_OMIT_FL
1790: 4f 41 54 49 4e 47 5f 50 4f 49 4e 54 20 5c 0a 20  OATING_POINT \. 
17a0: 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 46     SQLITE_OMIT_F
17b0: 4f 52 45 49 47 4e 5f 4b 45 59 20 5c 0a 20 20 20  OREIGN_KEY \.   
17c0: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 47 45 54   SQLITE_OMIT_GET
17d0: 5f 54 41 42 4c 45 20 5c 0a 20 20 20 20 53 51 4c  _TABLE \.    SQL
17e0: 49 54 45 5f 4f 4d 49 54 5f 49 4e 43 52 42 4c 4f  ITE_OMIT_INCRBLO
17f0: 42 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f  B \.    SQLITE_O
1800: 4d 49 54 5f 49 4e 54 45 47 52 49 54 59 5f 43 48  MIT_INTEGRITY_CH
1810: 45 43 4b 20 5c 0a 20 20 20 20 53 51 4c 49 54 45  ECK \.    SQLITE
1820: 5f 4f 4d 49 54 5f 4c 49 4b 45 5f 4f 50 54 49 4d  _OMIT_LIKE_OPTIM
1830: 49 5a 41 54 49 4f 4e 20 5c 0a 20 20 20 20 53 51  IZATION \.    SQ
1840: 4c 49 54 45 5f 4f 4d 49 54 5f 4c 4f 41 44 5f 45  LITE_OMIT_LOAD_E
1850: 58 54 45 4e 53 49 4f 4e 20 5c 0a 20 20 20 20 53  XTENSION \.    S
1860: 51 4c 49 54 45 5f 4f 4d 49 54 5f 4c 4f 43 41 4c  QLITE_OMIT_LOCAL
1870: 54 49 4d 45 20 5c 0a 20 20 20 20 53 51 4c 49 54  TIME \.    SQLIT
1880: 45 5f 4f 4d 49 54 5f 4c 4f 4f 4b 41 53 49 44 45  E_OMIT_LOOKASIDE
1890: 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d   \.    SQLITE_OM
18a0: 49 54 5f 4d 45 4d 4f 52 59 44 42 20 5c 0a 20 20  IT_MEMORYDB \.  
18b0: 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 4f 52    SQLITE_OMIT_OR
18c0: 5f 4f 50 54 49 4d 49 5a 41 54 49 4f 4e 20 5c 0a  _OPTIMIZATION \.
18d0: 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f      SQLITE_OMIT_
18e0: 50 41 47 45 52 5f 50 52 41 47 4d 41 53 20 5c 0a  PAGER_PRAGMAS \.
18f0: 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f      SQLITE_OMIT_
1900: 50 52 41 47 4d 41 20 5c 0a 20 20 20 20 53 51 4c  PRAGMA \.    SQL
1910: 49 54 45 5f 4f 4d 49 54 5f 50 52 4f 47 52 45 53  ITE_OMIT_PROGRES
1920: 53 5f 43 41 4c 4c 42 41 43 4b 20 5c 0a 20 20 20  S_CALLBACK \.   
1930: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 51 55 49   SQLITE_OMIT_QUI
1940: 43 4b 42 41 4c 41 4e 43 45 20 5c 0a 20 20 20 20  CKBALANCE \.    
1950: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 52 45 49 4e  SQLITE_OMIT_REIN
1960: 44 45 58 20 5c 0a 20 20 20 20 53 51 4c 49 54 45  DEX \.    SQLITE
1970: 5f 4f 4d 49 54 5f 53 43 48 45 4d 41 5f 50 52 41  _OMIT_SCHEMA_PRA
1980: 47 4d 41 53 20 5c 0a 20 20 20 20 53 51 4c 49 54  GMAS \.    SQLIT
1990: 45 5f 4f 4d 49 54 5f 53 43 48 45 4d 41 5f 56 45  E_OMIT_SCHEMA_VE
19a0: 52 53 49 4f 4e 5f 50 52 41 47 4d 41 53 20 5c 0a  RSION_PRAGMAS \.
19b0: 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f      SQLITE_OMIT_
19c0: 53 48 41 52 45 44 5f 43 41 43 48 45 20 5c 0a 20  SHARED_CACHE \. 
19d0: 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 53     SQLITE_OMIT_S
19e0: 55 42 51 55 45 52 59 20 5c 0a 20 20 20 20 53 51  UBQUERY \.    SQ
19f0: 4c 49 54 45 5f 4f 4d 49 54 5f 54 43 4c 5f 56 41  LITE_OMIT_TCL_VA
1a00: 52 49 41 42 4c 45 20 5c 0a 20 20 20 20 53 51 4c  RIABLE \.    SQL
1a10: 49 54 45 5f 4f 4d 49 54 5f 54 45 4d 50 44 42 20  ITE_OMIT_TEMPDB 
1a20: 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49  \.    SQLITE_OMI
1a30: 54 5f 54 52 41 43 45 20 5c 0a 20 20 20 20 53 51  T_TRACE \.    SQ
1a40: 4c 49 54 45 5f 4f 4d 49 54 5f 54 52 49 47 47 45  LITE_OMIT_TRIGGE
1a50: 52 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f  R \.    SQLITE_O
1a60: 4d 49 54 5f 54 52 55 4e 43 41 54 45 5f 4f 50 54  MIT_TRUNCATE_OPT
1a70: 49 4d 49 5a 41 54 49 4f 4e 20 5c 0a 20 20 20 20  IMIZATION \.    
1a80: 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 55 4e 49 51  SQLITE_OMIT_UNIQ
1a90: 55 45 5f 45 4e 46 4f 52 43 45 4d 45 4e 54 20 5c  UE_ENFORCEMENT \
1aa0: 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54  .    SQLITE_OMIT
1ab0: 5f 55 54 46 31 36 20 5c 0a 20 20 20 20 53 51 4c  _UTF16 \.    SQL
1ac0: 49 54 45 5f 4f 4d 49 54 5f 56 41 43 55 55 4d 20  ITE_OMIT_VACUUM 
1ad0: 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f 4d 49  \.    SQLITE_OMI
1ae0: 54 5f 56 49 45 57 20 5c 0a 20 20 20 20 53 51 4c  T_VIEW \.    SQL
1af0: 49 54 45 5f 4f 4d 49 54 5f 56 49 52 54 55 41 4c  ITE_OMIT_VIRTUAL
1b00: 54 41 42 4c 45 20 5c 0a 20 20 20 20 53 51 4c 49  TABLE \.    SQLI
1b10: 54 45 5f 4f 4d 49 54 5f 57 41 4c 20 5c 0a 20 20  TE_OMIT_WAL \.  
1b20: 20 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 57 53    SQLITE_OMIT_WS
1b30: 44 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 4f  D \.    SQLITE_O
1b40: 4d 49 54 5f 58 46 45 52 5f 4f 50 54 20 5c 0a 20  MIT_XFER_OPT \. 
1b50: 20 5d 0a 0a 20 20 73 65 74 20 3a 3a 45 4e 41 42   ]..  set ::ENAB
1b60: 4c 45 5f 53 59 4d 42 4f 4c 53 20 5b 6c 69 73 74  LE_SYMBOLS [list
1b70: 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 44 49   \.    SQLITE_DI
1b80: 53 41 42 4c 45 5f 44 49 52 53 59 4e 43 20 5c 0a  SABLE_DIRSYNC \.
1b90: 20 20 20 20 53 51 4c 49 54 45 5f 44 49 53 41 42      SQLITE_DISAB
1ba0: 4c 45 5f 4c 46 53 20 5c 0a 20 20 20 20 53 51 4c  LE_LFS \.    SQL
1bb0: 49 54 45 5f 45 4e 41 42 4c 45 5f 41 54 4f 4d 49  ITE_ENABLE_ATOMI
1bc0: 43 5f 57 52 49 54 45 20 5c 0a 20 20 20 20 53 51  C_WRITE \.    SQ
1bd0: 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 43 4f 4c 55  LITE_ENABLE_COLU
1be0: 4d 4e 5f 4d 45 54 41 44 41 54 41 20 5c 0a 20 20  MN_METADATA \.  
1bf0: 20 20 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f    SQLITE_ENABLE_
1c00: 45 58 50 45 4e 53 49 56 45 5f 41 53 53 45 52 54  EXPENSIVE_ASSERT
1c10: 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f 45 4e   \.    SQLITE_EN
1c20: 41 42 4c 45 5f 46 54 53 33 20 5c 0a 20 20 20 20  ABLE_FTS3 \.    
1c30: 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 46 54  SQLITE_ENABLE_FT
1c40: 53 33 5f 50 41 52 45 4e 54 48 45 53 49 53 20 5c  S3_PARENTHESIS \
1c50: 0a 20 20 20 20 53 51 4c 49 54 45 5f 45 4e 41 42  .    SQLITE_ENAB
1c60: 4c 45 5f 46 54 53 34 20 5c 0a 20 20 20 20 53 51  LE_FTS4 \.    SQ
1c70: 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 49 4f 54 52  LITE_ENABLE_IOTR
1c80: 41 43 45 20 5c 0a 20 20 20 20 53 51 4c 49 54 45  ACE \.    SQLITE
1c90: 5f 45 4e 41 42 4c 45 5f 4c 4f 41 44 5f 45 58 54  _ENABLE_LOAD_EXT
1ca0: 45 4e 53 49 4f 4e 20 5c 0a 20 20 20 20 53 51 4c  ENSION \.    SQL
1cb0: 49 54 45 5f 45 4e 41 42 4c 45 5f 4c 4f 43 4b 49  ITE_ENABLE_LOCKI
1cc0: 4e 47 5f 53 54 59 4c 45 20 5c 0a 20 20 20 20 53  NG_STYLE \.    S
1cd0: 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 4d 45 4d  QLITE_ENABLE_MEM
1ce0: 4f 52 59 5f 4d 41 4e 41 47 45 4d 45 4e 54 20 5c  ORY_MANAGEMENT \
1cf0: 0a 20 20 20 20 53 51 4c 49 54 45 5f 45 4e 41 42  .    SQLITE_ENAB
1d00: 4c 45 5f 4d 45 4d 53 59 53 33 20 5c 0a 20 20 20  LE_MEMSYS3 \.   
1d10: 20 53 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 4d   SQLITE_ENABLE_M
1d20: 45 4d 53 59 53 35 20 5c 0a 20 20 20 20 53 51 4c  EMSYS5 \.    SQL
1d30: 49 54 45 5f 45 4e 41 42 4c 45 5f 4f 56 45 52 53  ITE_ENABLE_OVERS
1d40: 49 5a 45 5f 43 45 4c 4c 5f 43 48 45 43 4b 20 5c  IZE_CELL_CHECK \
1d50: 0a 20 20 20 20 53 51 4c 49 54 45 5f 45 4e 41 42  .    SQLITE_ENAB
1d60: 4c 45 5f 52 54 52 45 45 20 5c 0a 20 20 20 20 53  LE_RTREE \.    S
1d70: 51 4c 49 54 45 5f 45 4e 41 42 4c 45 5f 53 54 41  QLITE_ENABLE_STA
1d80: 54 33 20 5c 0a 20 20 20 20 53 51 4c 49 54 45 5f  T3 \.    SQLITE_
1d90: 45 4e 41 42 4c 45 5f 55 4e 4c 4f 43 4b 5f 4e 4f  ENABLE_UNLOCK_NO
1da0: 54 49 46 59 20 5c 0a 20 20 20 20 53 51 4c 49 54  TIFY \.    SQLIT
1db0: 45 5f 45 4e 41 42 4c 45 5f 55 50 44 41 54 45 5f  E_ENABLE_UPDATE_
1dc0: 44 45 4c 45 54 45 5f 4c 49 4d 49 54 20 5c 0a 20  DELETE_LIMIT \. 
1dd0: 20 5d 0a 0a 20 20 23 20 50 72 6f 63 65 73 73 20   ]..  # Process 
1de0: 61 6e 79 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65  any command line
1df0: 20 6f 70 74 69 6f 6e 73 2e 0a 20 20 70 72 6f 63   options..  proc
1e00: 65 73 73 5f 6f 70 74 69 6f 6e 73 20 24 61 72 67  ess_options $arg
1e10: 76 0a 0a 20 20 69 66 20 7b 5b 69 6e 66 6f 20 65  v..  if {[info e
1e20: 78 69 73 74 73 20 3a 3a 53 59 4d 42 4f 4c 5d 20  xists ::SYMBOL] 
1e30: 7d 20 7b 0a 20 20 20 20 73 65 74 20 73 79 6d 20  } {.    set sym 
1e40: 24 3a 3a 53 59 4d 42 4f 4c 0a 0a 20 20 20 20 69  $::SYMBOL..    i
1e50: 66 20 7b 5b 6c 73 65 61 72 63 68 20 24 3a 3a 4f  f {[lsearch $::O
1e60: 4d 49 54 5f 53 59 4d 42 4f 4c 53 20 24 73 79 6d  MIT_SYMBOLS $sym
1e70: 5d 3c 30 20 26 26 20 5b 6c 73 65 61 72 63 68 20  ]<0 && [lsearch 
1e80: 24 3a 3a 45 4e 41 42 4c 45 5f 53 59 4d 42 4f 4c  $::ENABLE_SYMBOL
1e90: 53 20 24 73 79 6d 5d 3c 30 7d 20 7b 0a 20 20 20  S $sym]<0} {.   
1ea0: 20 20 20 70 75 74 73 20 73 74 64 65 72 72 20 22     puts stderr "
1eb0: 4e 6f 20 73 75 63 68 20 73 79 6d 62 6f 6c 3a 20  No such symbol: 
1ec0: 24 73 79 6d 22 0a 20 20 20 20 20 20 65 78 69 74  $sym".      exit
1ed0: 20 2d 31 0a 20 20 20 20 7d 0a 0a 20 20 20 20 73   -1.    }..    s
1ee0: 65 74 20 64 69 72 6e 61 6d 65 20 22 74 65 73 74  et dirname "test
1ef0: 5f 5b 72 65 67 73 75 62 20 2d 6e 6f 63 61 73 65  _[regsub -nocase
1f00: 20 7b 5e 78 2a 53 51 4c 49 54 45 5f 7d 20 24 73   {^x*SQLITE_} $s
1f10: 79 6d 20 7b 7d 5d 22 0a 20 20 20 20 72 75 6e 5f  ym {}]".    run_
1f20: 71 75 69 63 6b 5f 74 65 73 74 20 24 64 69 72 6e  quick_test $dirn
1f30: 61 6d 65 20 24 73 79 6d 0a 20 20 7d 20 65 6c 73  ame $sym.  } els
1f40: 65 20 7b 0a 20 20 20 20 23 20 46 69 72 73 74 20  e {.    # First 
1f50: 74 72 79 20 61 20 74 65 73 74 20 77 69 74 68 20  try a test with 
1f60: 61 6c 6c 20 4f 4d 49 54 20 73 79 6d 62 6f 6c 73  all OMIT symbols
1f70: 20 65 78 63 65 70 74 20 53 51 4c 49 54 45 5f 4f   except SQLITE_O
1f80: 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49  MIT_FLOATING_POI
1f90: 4e 54 20 0a 20 20 20 20 23 20 61 6e 64 20 53 51  NT .    # and SQ
1fa0: 4c 49 54 45 5f 4f 4d 49 54 5f 50 52 41 47 4d 41  LITE_OMIT_PRAGMA
1fb0: 20 64 65 66 69 6e 65 64 2e 20 54 68 65 20 66 6f   defined. The fo
1fc0: 72 6d 65 72 20 64 6f 65 73 6e 27 74 20 77 6f 72  rmer doesn't wor
1fd0: 6b 20 28 63 61 75 73 65 73 20 73 65 67 66 61 75  k (causes segfau
1fe0: 6c 74 73 29 0a 20 20 20 20 23 20 61 6e 64 20 74  lts).    # and t
1ff0: 68 65 20 6c 61 74 74 65 72 20 69 73 20 63 75 72  he latter is cur
2000: 72 65 6e 74 6c 79 20 69 6e 63 6f 6d 70 61 74 69  rently incompati
2010: 62 6c 65 20 77 69 74 68 20 74 68 65 20 74 65 73  ble with the tes
2020: 74 20 73 75 69 74 65 20 28 74 68 69 73 20 73 68  t suite (this sh
2030: 6f 75 6c 64 0a 20 20 20 20 23 20 62 65 20 66 69  ould.    # be fi
2040: 78 65 64 2c 20 62 75 74 20 69 74 20 77 69 6c 6c  xed, but it will
2050: 20 62 65 20 61 20 6c 6f 74 20 6f 66 20 77 6f 72   be a lot of wor
2060: 6b 29 2e 0a 20 20 20 20 73 65 74 20 61 6c 6c 73  k)..    set alls
2070: 79 6d 73 20 5b 6c 69 73 74 5d 0a 20 20 20 20 66  yms [list].    f
2080: 6f 72 65 61 63 68 20 73 20 24 3a 3a 4f 4d 49 54  oreach s $::OMIT
2090: 5f 53 59 4d 42 4f 4c 53 20 7b 0a 20 20 20 20 20  _SYMBOLS {.     
20a0: 20 69 66 20 7b 24 73 21 3d 22 53 51 4c 49 54 45   if {$s!="SQLITE
20b0: 5f 4f 4d 49 54 5f 46 4c 4f 41 54 49 4e 47 5f 50  _OMIT_FLOATING_P
20c0: 4f 49 4e 54 22 20 26 26 20 24 73 21 3d 22 53 51  OINT" && $s!="SQ
20d0: 4c 49 54 45 5f 4f 4d 49 54 5f 50 52 41 47 4d 41  LITE_OMIT_PRAGMA
20e0: 22 7d 20 7b 0a 20 20 20 20 20 20 20 20 6c 61 70  "} {.        lap
20f0: 70 65 6e 64 20 61 6c 6c 73 79 6d 73 20 24 73 0a  pend allsyms $s.
2100: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20        }.    }.  
2110: 20 20 72 75 6e 5f 71 75 69 63 6b 5f 74 65 73 74    run_quick_test
2120: 20 74 65 73 74 5f 4f 4d 49 54 5f 45 56 45 52 59   test_OMIT_EVERY
2130: 54 48 49 4e 47 20 24 61 6c 6c 73 79 6d 73 0a 20  THING $allsyms. 
2140: 20 0a 20 20 20 20 23 20 4e 6f 77 20 74 72 79 20   .    # Now try 
2150: 6f 6e 65 20 71 75 69 63 6b 2e 74 65 73 74 20 77  one quick.test w
2160: 69 74 68 20 65 61 63 68 20 6f 66 20 74 68 65 20  ith each of the 
2170: 4f 4d 49 54 20 73 79 6d 62 6f 6c 73 20 64 65 66  OMIT symbols def
2180: 69 6e 65 64 2e 20 49 6e 63 6c 75 64 65 64 0a 20  ined. Included. 
2190: 20 20 20 23 20 61 72 65 20 74 68 65 20 4f 4d 49     # are the OMI
21a0: 54 5f 46 4c 4f 41 54 49 4e 47 5f 50 4f 49 4e 54  T_FLOATING_POINT
21b0: 20 61 6e 64 20 4f 4d 49 54 5f 50 52 41 47 4d 41   and OMIT_PRAGMA
21c0: 20 73 79 6d 62 6f 6c 73 2c 20 65 76 65 6e 20 74   symbols, even t
21d0: 68 6f 75 67 68 20 77 65 0a 20 20 20 20 23 20 6b  hough we.    # k
21e0: 6e 6f 77 20 74 68 65 79 20 77 69 6c 6c 20 66 61  now they will fa
21f0: 69 6c 2e 20 49 74 27 73 20 67 6f 6f 64 20 74 6f  il. It's good to
2200: 20 62 65 20 72 65 6d 69 6e 64 65 64 20 6f 66 20   be reminded of 
2210: 74 68 69 73 20 66 72 6f 6d 20 74 69 6d 65 20 74  this from time t
2220: 6f 20 74 69 6d 65 2e 0a 20 20 20 20 66 6f 72 65  o time..    fore
2230: 61 63 68 20 73 79 6d 20 24 3a 3a 4f 4d 49 54 5f  ach sym $::OMIT_
2240: 53 59 4d 42 4f 4c 53 20 7b 0a 20 20 20 20 20 20  SYMBOLS {.      
2250: 73 65 74 20 64 69 72 6e 61 6d 65 20 22 74 65 73  set dirname "tes
2260: 74 5f 5b 72 65 67 73 75 62 20 2d 6e 6f 63 61 73  t_[regsub -nocas
2270: 65 20 7b 5e 78 2a 53 51 4c 49 54 45 5f 7d 20 24  e {^x*SQLITE_} $
2280: 73 79 6d 20 7b 7d 5d 22 0a 20 20 20 20 20 20 72  sym {}]".      r
2290: 75 6e 5f 71 75 69 63 6b 5f 74 65 73 74 20 24 64  un_quick_test $d
22a0: 69 72 6e 61 6d 65 20 24 73 79 6d 0a 20 20 20 20  irname $sym.    
22b0: 7d 0a 20 20 0a 20 20 20 20 23 20 54 72 79 20 74  }.  .    # Try t
22c0: 68 65 20 45 4e 41 42 4c 45 2f 44 49 53 41 42 4c  he ENABLE/DISABL
22d0: 45 20 73 79 6d 62 6f 6c 73 20 6f 6e 65 20 61 74  E symbols one at
22e0: 20 61 20 74 69 6d 65 2e 20 20 0a 20 20 20 20 23   a time.  .    #
22f0: 20 57 65 20 64 6f 6e 27 74 20 64 6f 20 74 68 65   We don't do the
2300: 6d 20 61 6c 6c 20 61 74 20 6f 6e 63 65 20 73 69  m all at once si
2310: 6e 63 65 20 73 6f 6d 65 20 61 72 65 20 63 6f 6e  nce some are con
2320: 66 6c 69 63 74 69 6e 67 2e 0a 20 20 20 20 66 6f  flicting..    fo
2330: 72 65 61 63 68 20 73 79 6d 20 24 3a 3a 45 4e 41  reach sym $::ENA
2340: 42 4c 45 5f 53 59 4d 42 4f 4c 53 20 7b 0a 20 20  BLE_SYMBOLS {.  
2350: 20 20 20 20 73 65 74 20 64 69 72 6e 61 6d 65 20      set dirname 
2360: 22 74 65 73 74 5f 5b 72 65 67 73 75 62 20 2d 6e  "test_[regsub -n
2370: 6f 63 61 73 65 20 7b 5e 78 2a 53 51 4c 49 54 45  ocase {^x*SQLITE
2380: 5f 7d 20 24 73 79 6d 20 7b 7d 5d 22 0a 20 20 20  _} $sym {}]".   
2390: 20 20 20 72 75 6e 5f 71 75 69 63 6b 5f 74 65 73     run_quick_tes
23a0: 74 20 24 64 69 72 6e 61 6d 65 20 24 73 79 6d 0a  t $dirname $sym.
23b0: 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 6d 61 69      }.  }.}..mai
23c0: 6e 20 24 61 72 67 76 0a                          n $argv.