/ Hex Artifact Content
Login

Artifact 53177056baf6556dcbdcf032bbdfc41c1aa74ded:


0000: 23 20 32 30 30 36 20 4e 6f 76 65 6d 62 65 72 20  # 2006 November 
0010: 32 33 0a 23 0a 23 20 54 68 65 20 61 75 74 68 6f  23.#.# 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 23 20 61 20 6c 65 67 61  lace of.# a lega
0060: 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72 65 20 69  l notice, here i
0070: 73 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a  s a blessing:.#.
0080: 23 20 20 20 20 4d 61 79 20 79 6f 75 20 64 6f 20  #    May you do 
0090: 67 6f 6f 64 20 61 6e 64 20 6e 6f 74 20 65 76 69  good and not evi
00a0: 6c 2e 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20  l..#    May you 
00b0: 66 69 6e 64 20 66 6f 72 67 69 76 65 6e 65 73 73  find forgiveness
00c0: 20 66 6f 72 20 79 6f 75 72 73 65 6c 66 20 61 6e   for yourself an
00d0: 64 20 66 6f 72 67 69 76 65 20 6f 74 68 65 72 73  d forgive others
00e0: 2e 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20 73  ..#    May you s
00f0: 68 61 72 65 20 66 72 65 65 6c 79 2c 20 6e 65 76  hare freely, nev
0100: 65 72 20 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74  er taking more t
0110: 68 61 6e 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a  han you give..#.
0120: 23 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  #***************
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 0a 23 20 54 68 69  **********.# Thi
0170: 73 20 66 69 6c 65 20 69 6d 70 6c 65 6d 65 6e 74  s file implement
0180: 73 20 72 65 67 72 65 73 73 69 6f 6e 20 74 65 73  s regression tes
0190: 74 73 20 66 6f 72 20 53 51 4c 69 74 65 20 6c 69  ts for SQLite li
01a0: 62 72 61 72 79 2e 20 20 54 68 65 0a 23 20 66 6f  brary.  The.# fo
01b0: 63 75 73 20 6f 66 20 74 68 69 73 20 73 63 72 69  cus of this scri
01c0: 70 74 20 69 73 20 6d 65 61 73 75 72 69 6e 67 20  pt is measuring 
01d0: 65 78 65 63 75 74 69 6e 67 20 73 70 65 65 64 2e  executing speed.
01e0: 0a 23 0a 23 20 24 49 64 3a 20 73 70 65 65 64 32  .#.# $Id: speed2
01f0: 2e 74 65 73 74 2c 76 20 31 2e 37 20 32 30 30 37  .test,v 1.7 2007
0200: 2f 30 34 2f 31 36 20 31 35 3a 30 32 3a 32 30 20  /04/16 15:02:20 
0210: 64 72 68 20 45 78 70 20 24 0a 23 0a 0a 73 65 74  drh Exp $.#..set
0220: 20 74 65 73 74 64 69 72 20 5b 66 69 6c 65 20 64   testdir [file d
0230: 69 72 6e 61 6d 65 20 24 61 72 67 76 30 5d 0a 73  irname $argv0].s
0240: 6f 75 72 63 65 20 24 74 65 73 74 64 69 72 2f 74  ource $testdir/t
0250: 65 73 74 65 72 2e 74 63 6c 0a 73 70 65 65 64 5f  ester.tcl.speed_
0260: 74 72 69 61 6c 5f 69 6e 69 74 20 73 70 65 65 64  trial_init speed
0270: 32 0a 0a 23 20 53 65 74 20 61 20 75 6e 69 66 6f  2..# Set a unifo
0280: 72 6d 20 72 61 6e 64 6f 6d 20 73 65 65 64 0a 65  rm random seed.e
0290: 78 70 72 20 73 72 61 6e 64 28 30 29 0a 0a 73 65  xpr srand(0)..se
02a0: 74 20 73 71 6c 6f 75 74 20 5b 6f 70 65 6e 20 73  t sqlout [open s
02b0: 70 65 65 64 32 2e 74 78 74 20 77 5d 0a 70 72 6f  peed2.txt w].pro
02c0: 63 20 74 72 61 63 65 73 71 6c 20 7b 73 71 6c 7d  c tracesql {sql}
02d0: 20 7b 0a 20 20 70 75 74 73 20 24 3a 3a 73 71 6c   {.  puts $::sql
02e0: 6f 75 74 20 24 73 71 6c 5c 3b 0a 7d 0a 23 64 62  out $sql\;.}.#db
02f0: 20 74 72 61 63 65 20 74 72 61 63 65 73 71 6c 0a   trace tracesql.
0300: 0a 23 20 54 68 65 20 6e 75 6d 62 65 72 5f 6e 61  .# The number_na
0310: 6d 65 20 70 72 6f 63 65 64 75 72 65 20 62 65 6c  me procedure bel
0320: 6f 77 20 63 6f 6e 76 65 72 74 73 20 69 74 73 20  ow converts its 
0330: 61 72 67 6d 65 6e 74 20 28 61 6e 20 69 6e 74 65  argment (an inte
0340: 67 65 72 29 0a 23 20 69 6e 74 6f 20 61 20 73 74  ger).# into a st
0350: 72 69 6e 67 20 77 68 69 63 68 20 69 73 20 74 68  ring which is th
0360: 65 20 45 6e 67 6c 69 73 68 2d 6c 61 6e 67 75 61  e English-langua
0370: 67 65 20 6e 61 6d 65 20 66 6f 72 20 74 68 61 74  ge name for that
0380: 20 6e 75 6d 62 65 72 2e 0a 23 0a 23 20 45 78 61   number..#.# Exa
0390: 6d 70 6c 65 3a 0a 23 0a 23 20 20 20 20 20 70 75  mple:.#.#     pu
03a0: 74 73 20 5b 6e 75 6d 62 65 72 5f 6e 61 6d 65 20  ts [number_name 
03b0: 31 32 33 5d 20 20 20 2d 3e 20 20 22 6f 6e 65 20  123]   ->  "one 
03c0: 68 75 6e 64 72 65 64 20 74 77 65 6e 74 79 20 74  hundred twenty t
03d0: 68 72 65 65 22 0a 23 0a 73 65 74 20 6f 6e 65 73  hree".#.set ones
03e0: 20 7b 7a 65 72 6f 20 6f 6e 65 20 74 77 6f 20 74   {zero one two t
03f0: 68 72 65 65 20 66 6f 75 72 20 66 69 76 65 20 73  hree four five s
0400: 69 78 20 73 65 76 65 6e 20 65 69 67 68 74 20 6e  ix seven eight n
0410: 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 74 65  ine.          te
0420: 6e 20 65 6c 65 76 65 6e 20 74 77 65 6c 76 65 20  n eleven twelve 
0430: 74 68 69 72 74 65 65 6e 20 66 6f 75 72 74 65 65  thirteen fourtee
0440: 6e 20 66 69 66 74 65 65 6e 20 73 69 78 74 65 65  n fifteen sixtee
0450: 6e 20 73 65 76 65 6e 74 65 65 6e 0a 20 20 20 20  n seventeen.    
0460: 20 20 20 20 20 20 65 69 67 68 74 65 65 6e 20 6e        eighteen n
0470: 69 6e 65 74 65 65 6e 7d 0a 73 65 74 20 74 65 6e  ineteen}.set ten
0480: 73 20 7b 7b 7d 20 74 65 6e 20 74 77 65 6e 74 79  s {{} ten twenty
0490: 20 74 68 69 72 74 79 20 66 6f 72 74 79 20 66 69   thirty forty fi
04a0: 66 74 79 20 73 69 78 74 79 20 73 65 76 65 6e 74  fty sixty sevent
04b0: 79 20 65 69 67 68 74 79 20 6e 69 6e 65 74 79 7d  y eighty ninety}
04c0: 0a 70 72 6f 63 20 6e 75 6d 62 65 72 5f 6e 61 6d  .proc number_nam
04d0: 65 20 7b 6e 7d 20 7b 0a 20 20 69 66 20 7b 24 6e  e {n} {.  if {$n
04e0: 3e 3d 31 30 30 30 7d 20 7b 0a 20 20 20 20 73 65  >=1000} {.    se
04f0: 74 20 74 78 74 20 22 5b 6e 75 6d 62 65 72 5f 6e  t txt "[number_n
0500: 61 6d 65 20 5b 65 78 70 72 20 7b 24 6e 2f 31 30  ame [expr {$n/10
0510: 30 30 7d 5d 5d 20 74 68 6f 75 73 61 6e 64 22 0a  00}]] thousand".
0520: 20 20 20 20 73 65 74 20 6e 20 5b 65 78 70 72 20      set n [expr 
0530: 7b 24 6e 25 31 30 30 30 7d 5d 0a 20 20 7d 20 65  {$n%1000}].  } e
0540: 6c 73 65 20 7b 0a 20 20 20 20 73 65 74 20 74 78  lse {.    set tx
0550: 74 20 7b 7d 0a 20 20 7d 0a 20 20 69 66 20 7b 24  t {}.  }.  if {$
0560: 6e 3e 3d 31 30 30 7d 20 7b 0a 20 20 20 20 61 70  n>=100} {.    ap
0570: 70 65 6e 64 20 74 78 74 20 22 20 5b 6c 69 6e 64  pend txt " [lind
0580: 65 78 20 24 3a 3a 6f 6e 65 73 20 5b 65 78 70 72  ex $::ones [expr
0590: 20 7b 24 6e 2f 31 30 30 7d 5d 5d 20 68 75 6e 64   {$n/100}]] hund
05a0: 72 65 64 22 0a 20 20 20 20 73 65 74 20 6e 20 5b  red".    set n [
05b0: 65 78 70 72 20 7b 24 6e 25 31 30 30 7d 5d 0a 20  expr {$n%100}]. 
05c0: 20 7d 0a 20 20 69 66 20 7b 24 6e 3e 3d 32 30 7d   }.  if {$n>=20}
05d0: 20 7b 0a 20 20 20 20 61 70 70 65 6e 64 20 74 78   {.    append tx
05e0: 74 20 22 20 5b 6c 69 6e 64 65 78 20 24 3a 3a 74  t " [lindex $::t
05f0: 65 6e 73 20 5b 65 78 70 72 20 7b 24 6e 2f 31 30  ens [expr {$n/10
0600: 7d 5d 5d 22 0a 20 20 20 20 73 65 74 20 6e 20 5b  }]]".    set n [
0610: 65 78 70 72 20 7b 24 6e 25 31 30 7d 5d 0a 20 20  expr {$n%10}].  
0620: 7d 0a 20 20 69 66 20 7b 24 6e 3e 30 7d 20 7b 0a  }.  if {$n>0} {.
0630: 20 20 20 20 61 70 70 65 6e 64 20 74 78 74 20 22      append txt "
0640: 20 5b 6c 69 6e 64 65 78 20 24 3a 3a 6f 6e 65 73   [lindex $::ones
0650: 20 24 6e 5d 22 0a 20 20 7d 0a 20 20 73 65 74 20   $n]".  }.  set 
0660: 74 78 74 20 5b 73 74 72 69 6e 67 20 74 72 69 6d  txt [string trim
0670: 20 24 74 78 74 5d 0a 20 20 69 66 20 7b 24 74 78   $txt].  if {$tx
0680: 74 3d 3d 22 22 7d 20 7b 73 65 74 20 74 78 74 20  t==""} {set txt 
0690: 7a 65 72 6f 7d 0a 20 20 72 65 74 75 72 6e 20 24  zero}.  return $
06a0: 74 78 74 0a 7d 0a 0a 23 20 43 72 65 61 74 65 20  txt.}..# Create 
06b0: 61 20 64 61 74 61 62 61 73 65 20 73 63 68 65 6d  a database schem
06c0: 61 2e 0a 23 0a 64 6f 5f 74 65 73 74 20 73 70 65  a..#.do_test spe
06d0: 65 64 32 2d 31 2e 30 20 7b 0a 20 20 65 78 65 63  ed2-1.0 {.  exec
06e0: 73 71 6c 20 7b 0a 20 20 20 20 50 52 41 47 4d 41  sql {.    PRAGMA
06f0: 20 70 61 67 65 5f 73 69 7a 65 3d 31 30 32 34 3b   page_size=1024;
0700: 0a 20 20 20 20 50 52 41 47 4d 41 20 63 61 63 68  .    PRAGMA cach
0710: 65 5f 73 69 7a 65 3d 38 31 39 32 3b 0a 20 20 20  e_size=8192;.   
0720: 20 50 52 41 47 4d 41 20 6c 6f 63 6b 69 6e 67 5f   PRAGMA locking_
0730: 6d 6f 64 65 3d 45 58 43 4c 55 53 49 56 45 3b 0a  mode=EXCLUSIVE;.
0740: 20 20 20 20 43 52 45 41 54 45 20 54 41 42 4c 45      CREATE TABLE
0750: 20 74 31 28 61 20 49 4e 54 45 47 45 52 2c 20 62   t1(a INTEGER, b
0760: 20 49 4e 54 45 47 45 52 2c 20 63 20 54 45 58 54   INTEGER, c TEXT
0770: 29 3b 0a 20 20 20 20 43 52 45 41 54 45 20 54 41  );.    CREATE TA
0780: 42 4c 45 20 74 32 28 61 20 49 4e 54 45 47 45 52  BLE t2(a INTEGER
0790: 2c 20 62 20 49 4e 54 45 47 45 52 2c 20 63 20 54  , b INTEGER, c T
07a0: 45 58 54 29 3b 0a 20 20 20 20 43 52 45 41 54 45  EXT);.    CREATE
07b0: 20 49 4e 44 45 58 20 69 32 61 20 4f 4e 20 74 32   INDEX i2a ON t2
07c0: 28 61 29 3b 0a 20 20 20 20 43 52 45 41 54 45 20  (a);.    CREATE 
07d0: 49 4e 44 45 58 20 69 32 62 20 4f 4e 20 74 32 28  INDEX i2b ON t2(
07e0: 62 29 3b 0a 20 20 7d 0a 20 20 65 78 65 63 73 71  b);.  }.  execsq
07f0: 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 54 20 6e  l {.    SELECT n
0800: 61 6d 65 20 46 52 4f 4d 20 73 71 6c 69 74 65 5f  ame FROM sqlite_
0810: 6d 61 73 74 65 72 20 4f 52 44 45 52 20 42 59 20  master ORDER BY 
0820: 31 3b 0a 20 20 7d 0a 7d 20 7b 69 32 61 20 69 32  1;.  }.} {i2a i2
0830: 62 20 74 31 20 74 32 7d 0a 0a 0a 23 20 35 30 30  b t1 t2}...# 500
0840: 30 30 20 49 4e 53 45 52 54 73 20 6f 6e 20 61 6e  00 INSERTs on an
0850: 20 75 6e 69 6e 64 65 78 65 64 20 74 61 62 6c 65   unindexed table
0860: 0a 23 0a 73 65 74 20 73 71 6c 20 7b 7d 0a 66 6f  .#.set sql {}.fo
0870: 72 20 7b 73 65 74 20 69 20 31 7d 20 7b 24 69 3c  r {set i 1} {$i<
0880: 3d 35 30 30 30 30 7d 20 7b 69 6e 63 72 20 69 7d  =50000} {incr i}
0890: 20 7b 0a 20 20 73 65 74 20 72 20 5b 65 78 70 72   {.  set r [expr
08a0: 20 7b 69 6e 74 28 72 61 6e 64 28 29 2a 35 30 30   {int(rand()*500
08b0: 30 30 30 29 7d 5d 0a 20 20 61 70 70 65 6e 64 20  000)}].  append 
08c0: 73 71 6c 20 22 49 4e 53 45 52 54 20 49 4e 54 4f  sql "INSERT INTO
08d0: 20 74 31 20 56 41 4c 55 45 53 28 24 69 2c 24 72   t1 VALUES($i,$r
08e0: 2c 27 5b 6e 75 6d 62 65 72 5f 6e 61 6d 65 20 24  ,'[number_name $
08f0: 72 5d 27 29 3b 5c 6e 22 0a 7d 0a 64 62 20 65 76  r]');\n".}.db ev
0900: 61 6c 20 42 45 47 49 4e 0a 73 70 65 65 64 5f 74  al BEGIN.speed_t
0910: 72 69 61 6c 20 73 70 65 65 64 32 2d 69 6e 73 65  rial speed2-inse
0920: 72 74 31 20 35 30 30 30 30 20 72 6f 77 20 24 73  rt1 50000 row $s
0930: 71 6c 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d 49  ql.db eval COMMI
0940: 54 0a 0a 23 20 35 30 30 30 30 20 49 4e 53 45 52  T..# 50000 INSER
0950: 54 73 20 6f 6e 20 61 6e 20 69 6e 64 65 78 65 64  Ts on an indexed
0960: 20 74 61 62 6c 65 0a 23 0a 73 65 74 20 73 71 6c   table.#.set sql
0970: 20 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20 31   {}.for {set i 1
0980: 7d 20 7b 24 69 3c 3d 35 30 30 30 30 7d 20 7b 69  } {$i<=50000} {i
0990: 6e 63 72 20 69 7d 20 7b 0a 20 20 73 65 74 20 72  ncr i} {.  set r
09a0: 20 5b 65 78 70 72 20 7b 69 6e 74 28 72 61 6e 64   [expr {int(rand
09b0: 28 29 2a 35 30 30 30 30 30 29 7d 5d 0a 20 20 61  ()*500000)}].  a
09c0: 70 70 65 6e 64 20 73 71 6c 20 22 49 4e 53 45 52  ppend sql "INSER
09d0: 54 20 49 4e 54 4f 20 74 32 20 56 41 4c 55 45 53  T INTO t2 VALUES
09e0: 28 24 69 2c 24 72 2c 27 5b 6e 75 6d 62 65 72 5f  ($i,$r,'[number_
09f0: 6e 61 6d 65 20 24 72 5d 27 29 3b 5c 6e 22 0a 7d  name $r]');\n".}
0a00: 0a 64 62 20 65 76 61 6c 20 42 45 47 49 4e 0a 73  .db eval BEGIN.s
0a10: 70 65 65 64 5f 74 72 69 61 6c 20 73 70 65 65 64  peed_trial speed
0a20: 32 2d 69 6e 73 65 72 74 32 20 35 30 30 30 30 20  2-insert2 50000 
0a30: 72 6f 77 20 24 73 71 6c 0a 64 62 20 65 76 61 6c  row $sql.db eval
0a40: 20 43 4f 4d 4d 49 54 0a 0a 0a 0a 23 20 35 30 20   COMMIT....# 50 
0a50: 53 45 4c 45 43 54 73 20 6f 6e 20 61 6e 20 69 6e  SELECTs on an in
0a60: 74 65 67 65 72 20 63 6f 6d 70 61 72 69 73 6f 6e  teger comparison
0a70: 2e 20 20 54 68 65 72 65 20 69 73 20 6e 6f 20 69  .  There is no i
0a80: 6e 64 65 78 20 73 6f 0a 23 20 61 20 66 75 6c 6c  ndex so.# a full
0a90: 20 74 61 62 6c 65 20 73 63 61 6e 20 69 73 20 72   table scan is r
0aa0: 65 71 75 69 72 65 64 2e 0a 23 0a 73 65 74 20 73  equired..#.set s
0ab0: 71 6c 20 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69  ql {}.for {set i
0ac0: 20 30 7d 20 7b 24 69 3c 35 30 7d 20 7b 69 6e 63   0} {$i<50} {inc
0ad0: 72 20 69 7d 20 7b 0a 20 20 73 65 74 20 6c 77 72  r i} {.  set lwr
0ae0: 20 5b 65 78 70 72 20 7b 24 69 2a 31 30 30 7d 5d   [expr {$i*100}]
0af0: 0a 20 20 73 65 74 20 75 70 72 20 5b 65 78 70 72  .  set upr [expr
0b00: 20 7b 28 24 69 2b 31 30 29 2a 31 30 30 7d 5d 0a   {($i+10)*100}].
0b10: 20 20 61 70 70 65 6e 64 20 73 71 6c 20 22 53 45    append sql "SE
0b20: 4c 45 43 54 20 63 6f 75 6e 74 28 2a 29 2c 20 61  LECT count(*), a
0b30: 76 67 28 62 29 20 46 52 4f 4d 20 74 31 20 57 48  vg(b) FROM t1 WH
0b40: 45 52 45 20 62 3e 3d 24 6c 77 72 20 41 4e 44 20  ERE b>=$lwr AND 
0b50: 62 3c 24 75 70 72 3b 22 0a 7d 0a 73 70 65 65 64  b<$upr;".}.speed
0b60: 5f 74 72 69 61 6c 20 73 70 65 65 64 32 2d 73 65  _trial speed2-se
0b70: 6c 65 63 74 31 61 20 5b 65 78 70 72 20 7b 35 30  lect1a [expr {50
0b80: 2a 35 30 30 30 30 7d 5d 20 72 6f 77 20 24 73 71  *50000}] row $sq
0b90: 6c 0a 0a 23 20 35 30 20 53 45 4c 45 43 54 73 20  l..# 50 SELECTs 
0ba0: 6f 6e 20 61 6e 20 4c 49 4b 45 20 63 6f 6d 70 61  on an LIKE compa
0bb0: 72 69 73 6f 6e 2e 20 20 54 68 65 72 65 20 69 73  rison.  There is
0bc0: 20 6e 6f 20 69 6e 64 65 78 20 73 6f 20 61 20 66   no index so a f
0bd0: 75 6c 6c 0a 23 20 74 61 62 6c 65 20 73 63 61 6e  ull.# table scan
0be0: 20 69 73 20 72 65 71 75 69 72 65 64 2e 0a 23 0a   is required..#.
0bf0: 73 65 74 20 73 71 6c 20 7b 7d 0a 66 6f 72 20 7b  set sql {}.for {
0c00: 73 65 74 20 69 20 30 7d 20 7b 24 69 3c 35 30 7d  set i 0} {$i<50}
0c10: 20 7b 69 6e 63 72 20 69 7d 20 7b 0a 20 20 61 70   {incr i} {.  ap
0c20: 70 65 6e 64 20 73 71 6c 20 5c 0a 20 20 20 20 22  pend sql \.    "
0c30: 53 45 4c 45 43 54 20 63 6f 75 6e 74 28 2a 29 2c  SELECT count(*),
0c40: 20 61 76 67 28 62 29 20 46 52 4f 4d 20 74 31 20   avg(b) FROM t1 
0c50: 57 48 45 52 45 20 63 20 4c 49 4b 45 20 27 25 5b  WHERE c LIKE '%[
0c60: 6e 75 6d 62 65 72 5f 6e 61 6d 65 20 24 69 5d 25  number_name $i]%
0c70: 27 3b 22 0a 7d 0a 73 70 65 65 64 5f 74 72 69 61  ';".}.speed_tria
0c80: 6c 20 73 70 65 65 64 32 2d 73 65 6c 65 63 74 32  l speed2-select2
0c90: 61 20 5b 65 78 70 72 20 7b 35 30 2a 35 30 30 30  a [expr {50*5000
0ca0: 30 7d 5d 20 72 6f 77 20 24 73 71 6c 0a 0a 23 20  0}] row $sql..# 
0cb0: 56 61 63 75 75 6d 0a 73 70 65 65 64 5f 74 72 69  Vacuum.speed_tri
0cc0: 61 6c 20 73 70 65 65 64 32 2d 76 61 63 75 75 6d  al speed2-vacuum
0cd0: 31 20 31 30 30 30 30 30 20 72 6f 77 20 56 41 43  1 100000 row VAC
0ce0: 55 55 4d 0a 0a 23 20 35 30 20 53 45 4c 45 43 54  UUM..# 50 SELECT
0cf0: 73 20 6f 6e 20 61 6e 20 69 6e 74 65 67 65 72 20  s on an integer 
0d00: 63 6f 6d 70 61 72 69 73 6f 6e 2e 20 20 54 68 65  comparison.  The
0d10: 72 65 20 69 73 20 6e 6f 20 69 6e 64 65 78 20 73  re is no index s
0d20: 6f 0a 23 20 61 20 66 75 6c 6c 20 74 61 62 6c 65  o.# a full table
0d30: 20 73 63 61 6e 20 69 73 20 72 65 71 75 69 72 65   scan is require
0d40: 64 2e 0a 23 0a 73 65 74 20 73 71 6c 20 7b 7d 0a  d..#.set sql {}.
0d50: 66 6f 72 20 7b 73 65 74 20 69 20 30 7d 20 7b 24  for {set i 0} {$
0d60: 69 3c 35 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b  i<50} {incr i} {
0d70: 0a 20 20 73 65 74 20 6c 77 72 20 5b 65 78 70 72  .  set lwr [expr
0d80: 20 7b 24 69 2a 31 30 30 7d 5d 0a 20 20 73 65 74   {$i*100}].  set
0d90: 20 75 70 72 20 5b 65 78 70 72 20 7b 28 24 69 2b   upr [expr {($i+
0da0: 31 30 29 2a 31 30 30 7d 5d 0a 20 20 61 70 70 65  10)*100}].  appe
0db0: 6e 64 20 73 71 6c 20 22 53 45 4c 45 43 54 20 63  nd sql "SELECT c
0dc0: 6f 75 6e 74 28 2a 29 2c 20 61 76 67 28 62 29 20  ount(*), avg(b) 
0dd0: 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20 62 3e  FROM t1 WHERE b>
0de0: 3d 24 6c 77 72 20 41 4e 44 20 62 3c 24 75 70 72  =$lwr AND b<$upr
0df0: 3b 22 0a 7d 0a 73 70 65 65 64 5f 74 72 69 61 6c  ;".}.speed_trial
0e00: 20 73 70 65 65 64 32 2d 73 65 6c 65 63 74 31 62   speed2-select1b
0e10: 20 5b 65 78 70 72 20 7b 35 30 2a 35 30 30 30 30   [expr {50*50000
0e20: 7d 5d 20 72 6f 77 20 24 73 71 6c 0a 0a 23 20 35  }] row $sql..# 5
0e30: 30 20 53 45 4c 45 43 54 73 20 6f 6e 20 61 6e 20  0 SELECTs on an 
0e40: 4c 49 4b 45 20 63 6f 6d 70 61 72 69 73 6f 6e 2e  LIKE comparison.
0e50: 20 20 54 68 65 72 65 20 69 73 20 6e 6f 20 69 6e    There is no in
0e60: 64 65 78 20 73 6f 20 61 20 66 75 6c 6c 0a 23 20  dex so a full.# 
0e70: 74 61 62 6c 65 20 73 63 61 6e 20 69 73 20 72 65  table scan is re
0e80: 71 75 69 72 65 64 2e 0a 23 0a 73 65 74 20 73 71  quired..#.set sq
0e90: 6c 20 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20  l {}.for {set i 
0ea0: 30 7d 20 7b 24 69 3c 35 30 7d 20 7b 69 6e 63 72  0} {$i<50} {incr
0eb0: 20 69 7d 20 7b 0a 20 20 61 70 70 65 6e 64 20 73   i} {.  append s
0ec0: 71 6c 20 5c 0a 20 20 20 20 22 53 45 4c 45 43 54  ql \.    "SELECT
0ed0: 20 63 6f 75 6e 74 28 2a 29 2c 20 61 76 67 28 62   count(*), avg(b
0ee0: 29 20 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20  ) FROM t1 WHERE 
0ef0: 63 20 4c 49 4b 45 20 27 25 5b 6e 75 6d 62 65 72  c LIKE '%[number
0f00: 5f 6e 61 6d 65 20 24 69 5d 25 27 3b 22 0a 7d 0a  _name $i]%';".}.
0f10: 73 70 65 65 64 5f 74 72 69 61 6c 20 73 70 65 65  speed_trial spee
0f20: 64 32 2d 73 65 6c 65 63 74 32 62 20 5b 65 78 70  d2-select2b [exp
0f30: 72 20 7b 35 30 2a 35 30 30 30 30 7d 5d 20 72 6f  r {50*50000}] ro
0f40: 77 20 24 73 71 6c 0a 0a 23 20 43 72 65 61 74 65  w $sql..# Create
0f50: 20 69 6e 64 69 63 65 73 0a 23 0a 64 62 20 65 76   indices.#.db ev
0f60: 61 6c 20 42 45 47 49 4e 0a 73 70 65 65 64 5f 74  al BEGIN.speed_t
0f70: 72 69 61 6c 20 73 70 65 65 64 32 2d 63 72 65 61  rial speed2-crea
0f80: 74 65 69 64 78 20 31 35 30 30 30 30 20 72 6f 77  teidx 150000 row
0f90: 20 7b 0a 20 20 43 52 45 41 54 45 20 49 4e 44 45   {.  CREATE INDE
0fa0: 58 20 69 31 61 20 4f 4e 20 74 31 28 61 29 3b 0a  X i1a ON t1(a);.
0fb0: 20 20 43 52 45 41 54 45 20 49 4e 44 45 58 20 69    CREATE INDEX i
0fc0: 31 62 20 4f 4e 20 74 31 28 62 29 3b 0a 20 20 43  1b ON t1(b);.  C
0fd0: 52 45 41 54 45 20 49 4e 44 45 58 20 69 31 63 20  REATE INDEX i1c 
0fe0: 4f 4e 20 74 31 28 63 29 3b 0a 7d 0a 64 62 20 65  ON t1(c);.}.db e
0ff0: 76 61 6c 20 43 4f 4d 4d 49 54 0a 0a 23 20 35 30  val COMMIT..# 50
1000: 30 30 20 53 45 4c 45 43 54 73 20 6f 6e 20 61 6e  00 SELECTs on an
1010: 20 69 6e 74 65 67 65 72 20 63 6f 6d 70 61 72 69   integer compari
1020: 73 6f 6e 20 77 68 65 72 65 20 74 68 65 20 69 6e  son where the in
1030: 74 65 67 65 72 20 69 73 0a 23 20 69 6e 64 65 78  teger is.# index
1040: 65 64 2e 0a 23 0a 73 65 74 20 73 71 6c 20 7b 7d  ed..#.set sql {}
1050: 0a 66 6f 72 20 7b 73 65 74 20 69 20 30 7d 20 7b  .for {set i 0} {
1060: 24 69 3c 35 30 30 30 7d 20 7b 69 6e 63 72 20 69  $i<5000} {incr i
1070: 7d 20 7b 0a 20 20 73 65 74 20 6c 77 72 20 5b 65  } {.  set lwr [e
1080: 78 70 72 20 7b 24 69 2a 31 30 30 7d 5d 0a 20 20  xpr {$i*100}].  
1090: 73 65 74 20 75 70 72 20 5b 65 78 70 72 20 7b 28  set upr [expr {(
10a0: 24 69 2b 31 30 29 2a 31 30 30 7d 5d 0a 20 20 61  $i+10)*100}].  a
10b0: 70 70 65 6e 64 20 73 71 6c 20 22 53 45 4c 45 43  ppend sql "SELEC
10c0: 54 20 63 6f 75 6e 74 28 2a 29 2c 20 61 76 67 28  T count(*), avg(
10d0: 62 29 20 46 52 4f 4d 20 74 31 20 57 48 45 52 45  b) FROM t1 WHERE
10e0: 20 62 3e 3d 24 6c 77 72 20 41 4e 44 20 62 3c 24   b>=$lwr AND b<$
10f0: 75 70 72 3b 22 0a 7d 0a 73 70 65 65 64 5f 74 72  upr;".}.speed_tr
1100: 69 61 6c 20 73 70 65 65 64 32 2d 73 65 6c 65 63  ial speed2-selec
1110: 74 33 61 20 35 30 30 30 20 73 74 6d 74 20 24 73  t3a 5000 stmt $s
1120: 71 6c 0a 0a 23 20 31 30 30 30 30 30 20 72 61 6e  ql..# 100000 ran
1130: 64 6f 6d 20 53 45 4c 45 43 54 73 20 61 67 61 69  dom SELECTs agai
1140: 6e 73 74 20 72 6f 77 69 64 2e 0a 23 0a 73 65 74  nst rowid..#.set
1150: 20 73 71 6c 20 7b 7d 0a 66 6f 72 20 7b 73 65 74   sql {}.for {set
1160: 20 69 20 31 7d 20 7b 24 69 3c 3d 31 30 30 30 30   i 1} {$i<=10000
1170: 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b 0a 20 20  0} {incr i} {.  
1180: 73 65 74 20 69 64 20 5b 65 78 70 72 20 7b 69 6e  set id [expr {in
1190: 74 28 72 61 6e 64 28 29 2a 35 30 30 30 30 29 2b  t(rand()*50000)+
11a0: 31 7d 5d 0a 20 20 61 70 70 65 6e 64 20 73 71 6c  1}].  append sql
11b0: 20 22 53 45 4c 45 43 54 20 63 3d 3d 27 68 69 27   "SELECT c=='hi'
11c0: 20 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20 72   FROM t1 WHERE r
11d0: 6f 77 69 64 3d 24 69 64 3b 5c 6e 22 0a 7d 0a 73  owid=$id;\n".}.s
11e0: 70 65 65 64 5f 74 72 69 61 6c 20 73 70 65 65 64  peed_trial speed
11f0: 32 2d 73 65 6c 65 63 74 34 61 20 31 30 30 30 30  2-select4a 10000
1200: 30 20 72 6f 77 20 24 73 71 6c 0a 0a 23 20 31 30  0 row $sql..# 10
1210: 30 30 30 30 20 72 61 6e 64 6f 6d 20 53 45 4c 45  0000 random SELE
1220: 43 54 73 20 61 67 61 69 6e 73 74 20 61 20 75 6e  CTs against a un
1230: 69 71 75 65 20 69 6e 64 65 78 65 64 20 63 6f 6c  ique indexed col
1240: 75 6d 6e 2e 0a 23 0a 73 65 74 20 73 71 6c 20 7b  umn..#.set sql {
1250: 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20 31 7d 20  }.for {set i 1} 
1260: 7b 24 69 3c 3d 31 30 30 30 30 30 7d 20 7b 69 6e  {$i<=100000} {in
1270: 63 72 20 69 7d 20 7b 0a 20 20 73 65 74 20 69 64  cr i} {.  set id
1280: 20 5b 65 78 70 72 20 7b 69 6e 74 28 72 61 6e 64   [expr {int(rand
1290: 28 29 2a 35 30 30 30 30 29 2b 31 7d 5d 0a 20 20  ()*50000)+1}].  
12a0: 61 70 70 65 6e 64 20 73 71 6c 20 22 53 45 4c 45  append sql "SELE
12b0: 43 54 20 63 20 46 52 4f 4d 20 74 31 20 57 48 45  CT c FROM t1 WHE
12c0: 52 45 20 61 3d 24 69 64 3b 22 0a 7d 0a 73 70 65  RE a=$id;".}.spe
12d0: 65 64 5f 74 72 69 61 6c 20 73 70 65 65 64 32 2d  ed_trial speed2-
12e0: 73 65 6c 65 63 74 35 61 20 31 30 30 30 30 30 20  select5a 100000 
12f0: 72 6f 77 20 24 73 71 6c 0a 0a 23 20 35 30 30 30  row $sql..# 5000
1300: 30 20 72 61 6e 64 6f 6d 20 53 45 4c 45 43 54 73  0 random SELECTs
1310: 20 61 67 61 69 6e 73 74 20 61 6e 20 69 6e 64 65   against an inde
1320: 78 65 64 20 63 6f 6c 75 6d 6e 20 74 65 78 74 20  xed column text 
1330: 63 6f 6c 75 6d 6e 0a 23 0a 73 65 74 20 73 71 6c  column.#.set sql
1340: 20 7b 7d 0a 64 62 20 65 76 61 6c 20 7b 53 45 4c   {}.db eval {SEL
1350: 45 43 54 20 63 20 46 52 4f 4d 20 74 31 20 4f 52  ECT c FROM t1 OR
1360: 44 45 52 20 42 59 20 72 61 6e 64 6f 6d 28 29 20  DER BY random() 
1370: 4c 49 4d 49 54 20 35 30 30 30 30 7d 20 7b 0a 20  LIMIT 50000} {. 
1380: 20 61 70 70 65 6e 64 20 73 71 6c 20 22 53 45 4c   append sql "SEL
1390: 45 43 54 20 63 20 46 52 4f 4d 20 74 31 20 57 48  ECT c FROM t1 WH
13a0: 45 52 45 20 63 3d 27 24 63 27 3b 22 0a 7d 0a 73  ERE c='$c';".}.s
13b0: 70 65 65 64 5f 74 72 69 61 6c 20 73 70 65 65 64  peed_trial speed
13c0: 32 2d 73 65 6c 65 63 74 36 61 20 35 30 30 30 30  2-select6a 50000
13d0: 20 72 6f 77 20 24 73 71 6c 0a 0a 23 20 56 61 63   row $sql..# Vac
13e0: 75 75 6d 0a 73 70 65 65 64 5f 74 72 69 61 6c 20  uum.speed_trial 
13f0: 73 70 65 65 64 32 2d 76 61 63 75 75 6d 32 20 31  speed2-vacuum2 1
1400: 30 30 30 30 30 20 72 6f 77 20 56 41 43 55 55 4d  00000 row VACUUM
1410: 0a 0a 0a 23 20 35 30 30 30 20 53 45 4c 45 43 54  ...# 5000 SELECT
1420: 73 20 6f 6e 20 61 6e 20 69 6e 74 65 67 65 72 20  s on an integer 
1430: 63 6f 6d 70 61 72 69 73 6f 6e 20 77 68 65 72 65  comparison where
1440: 20 74 68 65 20 69 6e 74 65 67 65 72 20 69 73 0a   the integer is.
1450: 23 20 69 6e 64 65 78 65 64 2e 0a 23 0a 73 65 74  # indexed..#.set
1460: 20 73 71 6c 20 7b 7d 0a 66 6f 72 20 7b 73 65 74   sql {}.for {set
1470: 20 69 20 30 7d 20 7b 24 69 3c 35 30 30 30 7d 20   i 0} {$i<5000} 
1480: 7b 69 6e 63 72 20 69 7d 20 7b 0a 20 20 73 65 74  {incr i} {.  set
1490: 20 6c 77 72 20 5b 65 78 70 72 20 7b 24 69 2a 31   lwr [expr {$i*1
14a0: 30 30 7d 5d 0a 20 20 73 65 74 20 75 70 72 20 5b  00}].  set upr [
14b0: 65 78 70 72 20 7b 28 24 69 2b 31 30 29 2a 31 30  expr {($i+10)*10
14c0: 30 7d 5d 0a 20 20 61 70 70 65 6e 64 20 73 71 6c  0}].  append sql
14d0: 20 22 53 45 4c 45 43 54 20 63 6f 75 6e 74 28 2a   "SELECT count(*
14e0: 29 2c 20 61 76 67 28 62 29 20 46 52 4f 4d 20 74  ), avg(b) FROM t
14f0: 31 20 57 48 45 52 45 20 62 3e 3d 24 6c 77 72 20  1 WHERE b>=$lwr 
1500: 41 4e 44 20 62 3c 24 75 70 72 3b 22 0a 7d 0a 73  AND b<$upr;".}.s
1510: 70 65 65 64 5f 74 72 69 61 6c 20 73 70 65 65 64  peed_trial speed
1520: 32 2d 73 65 6c 65 63 74 33 62 20 35 30 30 30 20  2-select3b 5000 
1530: 73 74 6d 74 20 24 73 71 6c 0a 0a 23 20 31 30 30  stmt $sql..# 100
1540: 30 30 30 20 72 61 6e 64 6f 6d 20 53 45 4c 45 43  000 random SELEC
1550: 54 73 20 61 67 61 69 6e 73 74 20 72 6f 77 69 64  Ts against rowid
1560: 2e 0a 23 0a 73 65 74 20 73 71 6c 20 7b 7d 0a 66  ..#.set sql {}.f
1570: 6f 72 20 7b 73 65 74 20 69 20 31 7d 20 7b 24 69  or {set i 1} {$i
1580: 3c 3d 31 30 30 30 30 30 7d 20 7b 69 6e 63 72 20  <=100000} {incr 
1590: 69 7d 20 7b 0a 20 20 73 65 74 20 69 64 20 5b 65  i} {.  set id [e
15a0: 78 70 72 20 7b 69 6e 74 28 72 61 6e 64 28 29 2a  xpr {int(rand()*
15b0: 35 30 30 30 30 29 2b 31 7d 5d 0a 20 20 61 70 70  50000)+1}].  app
15c0: 65 6e 64 20 73 71 6c 20 22 53 45 4c 45 43 54 20  end sql "SELECT 
15d0: 63 3d 3d 27 68 69 27 20 46 52 4f 4d 20 74 31 20  c=='hi' FROM t1 
15e0: 57 48 45 52 45 20 72 6f 77 69 64 3d 24 69 64 3b  WHERE rowid=$id;
15f0: 5c 6e 22 0a 7d 0a 73 70 65 65 64 5f 74 72 69 61  \n".}.speed_tria
1600: 6c 20 73 70 65 65 64 32 2d 73 65 6c 65 63 74 34  l speed2-select4
1610: 62 20 31 30 30 30 30 30 20 72 6f 77 20 24 73 71  b 100000 row $sq
1620: 6c 0a 0a 23 20 31 30 30 30 30 30 20 72 61 6e 64  l..# 100000 rand
1630: 6f 6d 20 53 45 4c 45 43 54 73 20 61 67 61 69 6e  om SELECTs again
1640: 73 74 20 61 20 75 6e 69 71 75 65 20 69 6e 64 65  st a unique inde
1650: 78 65 64 20 63 6f 6c 75 6d 6e 2e 0a 23 0a 73 65  xed column..#.se
1660: 74 20 73 71 6c 20 7b 7d 0a 66 6f 72 20 7b 73 65  t sql {}.for {se
1670: 74 20 69 20 31 7d 20 7b 24 69 3c 3d 31 30 30 30  t i 1} {$i<=1000
1680: 30 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b 0a 20  00} {incr i} {. 
1690: 20 73 65 74 20 69 64 20 5b 65 78 70 72 20 7b 69   set id [expr {i
16a0: 6e 74 28 72 61 6e 64 28 29 2a 35 30 30 30 30 29  nt(rand()*50000)
16b0: 2b 31 7d 5d 0a 20 20 61 70 70 65 6e 64 20 73 71  +1}].  append sq
16c0: 6c 20 22 53 45 4c 45 43 54 20 63 20 46 52 4f 4d  l "SELECT c FROM
16d0: 20 74 31 20 57 48 45 52 45 20 61 3d 24 69 64 3b   t1 WHERE a=$id;
16e0: 22 0a 7d 0a 73 70 65 65 64 5f 74 72 69 61 6c 20  ".}.speed_trial 
16f0: 73 70 65 65 64 32 2d 73 65 6c 65 63 74 35 62 20  speed2-select5b 
1700: 31 30 30 30 30 30 20 72 6f 77 20 24 73 71 6c 0a  100000 row $sql.
1710: 0a 23 20 35 30 30 30 30 20 72 61 6e 64 6f 6d 20  .# 50000 random 
1720: 53 45 4c 45 43 54 73 20 61 67 61 69 6e 73 74 20  SELECTs against 
1730: 61 6e 20 69 6e 64 65 78 65 64 20 63 6f 6c 75 6d  an indexed colum
1740: 6e 20 74 65 78 74 20 63 6f 6c 75 6d 6e 0a 23 0a  n text column.#.
1750: 73 65 74 20 73 71 6c 20 7b 7d 0a 64 62 20 65 76  set sql {}.db ev
1760: 61 6c 20 7b 53 45 4c 45 43 54 20 63 20 46 52 4f  al {SELECT c FRO
1770: 4d 20 74 31 20 4f 52 44 45 52 20 42 59 20 72 61  M t1 ORDER BY ra
1780: 6e 64 6f 6d 28 29 20 4c 49 4d 49 54 20 35 30 30  ndom() LIMIT 500
1790: 30 30 7d 20 7b 0a 20 20 61 70 70 65 6e 64 20 73  00} {.  append s
17a0: 71 6c 20 22 53 45 4c 45 43 54 20 63 20 46 52 4f  ql "SELECT c FRO
17b0: 4d 20 74 31 20 57 48 45 52 45 20 63 3d 27 24 63  M t1 WHERE c='$c
17c0: 27 3b 22 0a 7d 0a 73 70 65 65 64 5f 74 72 69 61  ';".}.speed_tria
17d0: 6c 20 73 70 65 65 64 32 2d 73 65 6c 65 63 74 36  l speed2-select6
17e0: 62 20 35 30 30 30 30 20 72 6f 77 20 24 73 71 6c  b 50000 row $sql
17f0: 0a 0a 23 20 35 30 30 30 20 75 70 64 61 74 65 73  ..# 5000 updates
1800: 20 6f 66 20 72 61 6e 67 65 73 20 77 68 65 72 65   of ranges where
1810: 20 74 68 65 20 66 69 65 6c 64 20 62 65 69 6e 67   the field being
1820: 20 63 6f 6d 70 61 72 65 64 20 69 73 20 69 6e 64   compared is ind
1830: 65 78 65 64 2e 0a 23 0a 73 65 74 20 73 71 6c 20  exed..#.set sql 
1840: 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20 30 7d  {}.for {set i 0}
1850: 20 7b 24 69 3c 35 30 30 30 7d 20 7b 69 6e 63 72   {$i<5000} {incr
1860: 20 69 7d 20 7b 0a 20 20 73 65 74 20 6c 77 72 20   i} {.  set lwr 
1870: 5b 65 78 70 72 20 7b 24 69 2a 32 7d 5d 0a 20 20  [expr {$i*2}].  
1880: 73 65 74 20 75 70 72 20 5b 65 78 70 72 20 7b 28  set upr [expr {(
1890: 24 69 2b 31 29 2a 32 7d 5d 0a 20 20 61 70 70 65  $i+1)*2}].  appe
18a0: 6e 64 20 73 71 6c 20 22 55 50 44 41 54 45 20 74  nd sql "UPDATE t
18b0: 31 20 53 45 54 20 62 3d 62 2a 32 20 57 48 45 52  1 SET b=b*2 WHER
18c0: 45 20 61 3e 3d 24 6c 77 72 20 41 4e 44 20 61 3c  E a>=$lwr AND a<
18d0: 24 75 70 72 3b 22 0a 7d 0a 64 62 20 65 76 61 6c  $upr;".}.db eval
18e0: 20 42 45 47 49 4e 0a 73 70 65 65 64 5f 74 72 69   BEGIN.speed_tri
18f0: 61 6c 20 73 70 65 65 64 32 2d 75 70 64 61 74 65  al speed2-update
1900: 31 20 35 30 30 30 20 73 74 6d 74 20 24 73 71 6c  1 5000 stmt $sql
1910: 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d 49 54 0a  .db eval COMMIT.
1920: 0a 23 20 35 30 30 30 30 20 73 69 6e 67 6c 65 2d  .# 50000 single-
1930: 72 6f 77 20 75 70 64 61 74 65 73 2e 20 20 41 6e  row updates.  An
1940: 20 69 6e 64 65 78 20 69 73 20 75 73 65 64 20 74   index is used t
1950: 6f 20 66 69 6e 64 20 74 68 65 20 72 6f 77 20 71  o find the row q
1960: 75 69 63 6b 6c 79 2e 0a 23 0a 73 65 74 20 73 71  uickly..#.set sq
1970: 6c 20 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20  l {}.for {set i 
1980: 30 7d 20 7b 24 69 3c 35 30 30 30 30 7d 20 7b 69  0} {$i<50000} {i
1990: 6e 63 72 20 69 7d 20 7b 0a 20 20 73 65 74 20 72  ncr i} {.  set r
19a0: 20 5b 65 78 70 72 20 7b 69 6e 74 28 72 61 6e 64   [expr {int(rand
19b0: 28 29 2a 35 30 30 30 30 30 29 7d 5d 0a 20 20 61  ()*500000)}].  a
19c0: 70 70 65 6e 64 20 73 71 6c 20 22 55 50 44 41 54  ppend sql "UPDAT
19d0: 45 20 74 31 20 53 45 54 20 62 3d 24 72 20 57 48  E t1 SET b=$r WH
19e0: 45 52 45 20 61 3d 24 69 3b 22 0a 7d 0a 64 62 20  ERE a=$i;".}.db 
19f0: 65 76 61 6c 20 42 45 47 49 4e 0a 73 70 65 65 64  eval BEGIN.speed
1a00: 5f 74 72 69 61 6c 20 73 70 65 65 64 32 2d 75 70  _trial speed2-up
1a10: 64 61 74 65 32 20 35 30 30 30 30 20 72 6f 77 20  date2 50000 row 
1a20: 24 73 71 6c 0a 64 62 20 65 76 61 6c 20 43 4f 4d  $sql.db eval COM
1a30: 4d 49 54 0a 0a 23 20 31 20 62 69 67 20 74 65 78  MIT..# 1 big tex
1a40: 74 20 75 70 64 61 74 65 20 74 68 61 74 20 74 6f  t update that to
1a50: 75 63 68 65 73 20 65 76 65 72 79 20 72 6f 77 20  uches every row 
1a60: 69 6e 20 74 68 65 20 74 61 62 6c 65 2e 0a 23 0a  in the table..#.
1a70: 73 70 65 65 64 5f 74 72 69 61 6c 20 73 70 65 65  speed_trial spee
1a80: 64 32 2d 75 70 64 61 74 65 33 20 35 30 30 30 30  d2-update3 50000
1a90: 20 72 6f 77 20 7b 0a 20 20 55 50 44 41 54 45 20   row {.  UPDATE 
1aa0: 74 31 20 53 45 54 20 63 3d 61 3b 0a 7d 0a 0a 23  t1 SET c=a;.}..#
1ab0: 20 4d 61 6e 79 20 69 6e 64 69 76 69 64 75 61 6c   Many individual
1ac0: 20 74 65 78 74 20 75 70 64 61 74 65 73 2e 20 20   text updates.  
1ad0: 45 61 63 68 20 72 6f 77 20 69 6e 20 74 68 65 20  Each row in the 
1ae0: 74 61 62 6c 65 20 69 73 0a 23 20 74 6f 75 63 68  table is.# touch
1af0: 65 64 20 74 68 72 6f 75 67 68 20 61 6e 20 69 6e  ed through an in
1b00: 64 65 78 2e 0a 23 0a 73 65 74 20 73 71 6c 20 7b  dex..#.set sql {
1b10: 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20 31 7d 20  }.for {set i 1} 
1b20: 7b 24 69 3c 3d 35 30 30 30 30 7d 20 7b 69 6e 63  {$i<=50000} {inc
1b30: 72 20 69 7d 20 7b 0a 20 20 73 65 74 20 72 20 5b  r i} {.  set r [
1b40: 65 78 70 72 20 7b 69 6e 74 28 72 61 6e 64 28 29  expr {int(rand()
1b50: 2a 35 30 30 30 30 30 29 7d 5d 0a 20 20 61 70 70  *500000)}].  app
1b60: 65 6e 64 20 73 71 6c 20 22 55 50 44 41 54 45 20  end sql "UPDATE 
1b70: 74 31 20 53 45 54 20 63 3d 27 5b 6e 75 6d 62 65  t1 SET c='[numbe
1b80: 72 5f 6e 61 6d 65 20 24 72 5d 27 20 57 48 45 52  r_name $r]' WHER
1b90: 45 20 61 3d 24 69 3b 22 0a 7d 0a 64 62 20 65 76  E a=$i;".}.db ev
1ba0: 61 6c 20 42 45 47 49 4e 0a 73 70 65 65 64 5f 74  al BEGIN.speed_t
1bb0: 72 69 61 6c 20 73 70 65 65 64 32 2d 75 70 64 61  rial speed2-upda
1bc0: 74 65 34 20 35 30 30 30 30 20 72 6f 77 20 24 73  te4 50000 row $s
1bd0: 71 6c 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d 49  ql.db eval COMMI
1be0: 54 0a 0a 23 20 44 65 6c 65 74 65 20 61 6c 6c 20  T..# Delete all 
1bf0: 63 6f 6e 74 65 6e 74 20 69 6e 20 61 20 74 61 62  content in a tab
1c00: 6c 65 2e 0a 23 0a 73 70 65 65 64 5f 74 72 69 61  le..#.speed_tria
1c10: 6c 20 73 70 65 65 64 32 2d 64 65 6c 65 74 65 31  l speed2-delete1
1c20: 20 35 30 30 30 30 20 72 6f 77 20 7b 44 45 4c 45   50000 row {DELE
1c30: 54 45 20 46 52 4f 4d 20 74 31 7d 0a 0a 23 20 43  TE FROM t1}..# C
1c40: 6f 70 79 20 6f 6e 65 20 74 61 62 6c 65 20 69 6e  opy one table in
1c50: 74 6f 20 61 6e 6f 74 68 65 72 0a 23 0a 73 70 65  to another.#.spe
1c60: 65 64 5f 74 72 69 61 6c 20 73 70 65 65 64 32 2d  ed_trial speed2-
1c70: 63 6f 70 79 31 20 35 30 30 30 30 20 72 6f 77 20  copy1 50000 row 
1c80: 7b 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20  {INSERT INTO t1 
1c90: 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74 32  SELECT * FROM t2
1ca0: 7d 0a 0a 23 20 44 65 6c 65 74 65 20 61 6c 6c 20  }..# Delete all 
1cb0: 63 6f 6e 74 65 6e 74 20 69 6e 20 61 20 74 61 62  content in a tab
1cc0: 6c 65 2c 20 6f 6e 65 20 72 6f 77 20 61 74 20 61  le, one row at a
1cd0: 20 74 69 6d 65 2e 0a 23 0a 73 70 65 65 64 5f 74   time..#.speed_t
1ce0: 72 69 61 6c 20 73 70 65 65 64 32 2d 64 65 6c 65  rial speed2-dele
1cf0: 74 65 32 20 35 30 30 30 30 20 72 6f 77 20 7b 44  te2 50000 row {D
1d00: 45 4c 45 54 45 20 46 52 4f 4d 20 74 31 20 57 48  ELETE FROM t1 WH
1d10: 45 52 45 20 31 7d 0a 0a 23 20 52 65 66 69 6c 6c  ERE 1}..# Refill
1d20: 20 74 68 65 20 74 61 62 6c 65 20 79 65 74 20 61   the table yet a
1d30: 67 61 69 6e 0a 23 0a 73 70 65 65 64 5f 74 72 69  gain.#.speed_tri
1d40: 61 6c 20 73 70 65 65 64 32 2d 63 6f 70 79 32 20  al speed2-copy2 
1d50: 35 30 30 30 30 20 72 6f 77 20 7b 49 4e 53 45 52  50000 row {INSER
1d60: 54 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 43 54  T INTO t1 SELECT
1d70: 20 2a 20 46 52 4f 4d 20 74 32 7d 0a 0a 23 20 44   * FROM t2}..# D
1d80: 72 6f 70 20 74 68 65 20 74 61 62 6c 65 20 61 6e  rop the table an
1d90: 64 20 72 65 63 72 65 61 74 65 20 69 74 20 77 69  d recreate it wi
1da0: 74 68 6f 75 74 20 69 74 73 20 69 6e 64 69 63 65  thout its indice
1db0: 73 2e 0a 23 0a 64 62 20 65 76 61 6c 20 42 45 47  s..#.db eval BEG
1dc0: 49 4e 0a 73 70 65 65 64 5f 74 72 69 61 6c 20 73  IN.speed_trial s
1dd0: 70 65 65 64 32 2d 64 72 6f 70 31 20 35 30 30 30  peed2-drop1 5000
1de0: 30 20 72 6f 77 20 7b 0a 20 20 20 44 52 4f 50 20  0 row {.   DROP 
1df0: 54 41 42 4c 45 20 74 31 3b 0a 20 20 20 43 52 45  TABLE t1;.   CRE
1e00: 41 54 45 20 54 41 42 4c 45 20 74 31 28 61 20 49  ATE TABLE t1(a I
1e10: 4e 54 45 47 45 52 2c 20 62 20 49 4e 54 45 47 45  NTEGER, b INTEGE
1e20: 52 2c 20 63 20 54 45 58 54 29 3b 0a 7d 0a 64 62  R, c TEXT);.}.db
1e30: 20 65 76 61 6c 20 43 4f 4d 4d 49 54 0a 0a 23 20   eval COMMIT..# 
1e40: 52 65 66 69 6c 6c 20 74 68 65 20 74 61 62 6c 65  Refill the table
1e50: 20 79 65 74 20 61 67 61 69 6e 2e 20 20 54 68 69   yet again.  Thi
1e60: 73 20 63 6f 70 79 20 73 68 6f 75 6c 64 20 62 65  s copy should be
1e70: 20 66 61 73 74 65 72 20 62 65 63 61 75 73 65 0a   faster because.
1e80: 23 20 74 68 65 72 65 20 61 72 65 20 6e 6f 20 69  # there are no i
1e90: 6e 64 69 63 65 73 20 74 6f 20 64 65 61 6c 20 77  ndices to deal w
1ea0: 69 74 68 2e 0a 23 0a 73 70 65 65 64 5f 74 72 69  ith..#.speed_tri
1eb0: 61 6c 20 73 70 65 65 64 32 2d 63 6f 70 79 33 20  al speed2-copy3 
1ec0: 35 30 30 30 30 20 72 6f 77 20 7b 49 4e 53 45 52  50000 row {INSER
1ed0: 54 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 43 54  T INTO t1 SELECT
1ee0: 20 2a 20 46 52 4f 4d 20 74 32 7d 0a 0a 23 20 53   * FROM t2}..# S
1ef0: 65 6c 65 63 74 20 32 30 30 30 30 20 72 6f 77 73  elect 20000 rows
1f00: 20 66 72 6f 6d 20 74 68 65 20 74 61 62 6c 65 20   from the table 
1f10: 61 74 20 72 61 6e 64 6f 6d 2e 0a 23 0a 73 70 65  at random..#.spe
1f20: 65 64 5f 74 72 69 61 6c 20 73 70 65 65 64 32 2d  ed_trial speed2-
1f30: 72 61 6e 64 6f 6d 31 20 35 30 30 30 30 20 72 6f  random1 50000 ro
1f40: 77 20 7b 0a 20 20 53 45 4c 45 43 54 20 72 6f 77  w {.  SELECT row
1f50: 69 64 20 46 52 4f 4d 20 74 31 20 4f 52 44 45 52  id FROM t1 ORDER
1f60: 20 42 59 20 72 61 6e 64 6f 6d 28 29 20 4c 49 4d   BY random() LIM
1f70: 49 54 20 32 30 30 30 30 0a 7d 0a 0a 23 20 44 65  IT 20000.}..# De
1f80: 6c 65 74 65 20 32 30 30 30 30 20 72 61 6e 64 6f  lete 20000 rando
1f90: 6d 20 72 6f 77 73 20 66 72 6f 6d 20 74 68 65 20  m rows from the 
1fa0: 74 61 62 6c 65 2e 0a 23 0a 73 70 65 65 64 5f 74  table..#.speed_t
1fb0: 72 69 61 6c 20 73 70 65 65 64 32 2d 72 61 6e 64  rial speed2-rand
1fc0: 6f 6d 2d 64 65 6c 31 20 32 30 30 30 30 20 72 6f  om-del1 20000 ro
1fd0: 77 20 7b 0a 20 20 44 45 4c 45 54 45 20 46 52 4f  w {.  DELETE FRO
1fe0: 4d 20 74 31 20 57 48 45 52 45 20 72 6f 77 69 64  M t1 WHERE rowid
1ff0: 20 49 4e 0a 20 20 20 20 28 53 45 4c 45 43 54 20   IN.    (SELECT 
2000: 72 6f 77 69 64 20 46 52 4f 4d 20 74 31 20 4f 52  rowid FROM t1 OR
2010: 44 45 52 20 42 59 20 72 61 6e 64 6f 6d 28 29 20  DER BY random() 
2020: 4c 49 4d 49 54 20 32 30 30 30 30 29 0a 7d 0a 64  LIMIT 20000).}.d
2030: 6f 5f 74 65 73 74 20 73 70 65 65 64 32 2d 31 2e  o_test speed2-1.
2040: 31 20 7b 0a 20 20 64 62 20 6f 6e 65 20 7b 53 45  1 {.  db one {SE
2050: 4c 45 43 54 20 63 6f 75 6e 74 28 2a 29 20 46 52  LECT count(*) FR
2060: 4f 4d 20 74 31 7d 0a 7d 20 33 30 30 30 30 0a 0a  OM t1}.} 30000..
2070: 20 20 20 20 0a 23 20 44 65 6c 65 74 65 20 32 30      .# Delete 20
2080: 30 30 30 20 6d 6f 72 65 20 72 6f 77 73 20 61 74  000 more rows at
2090: 20 72 61 6e 64 6f 6d 20 66 72 6f 6d 20 74 68 65   random from the
20a0: 20 74 61 62 6c 65 2e 0a 23 0a 73 70 65 65 64 5f   table..#.speed_
20b0: 74 72 69 61 6c 20 73 70 65 65 64 32 2d 72 61 6e  trial speed2-ran
20c0: 64 6f 6d 2d 64 65 6c 32 20 32 30 30 30 30 20 72  dom-del2 20000 r
20d0: 6f 77 20 7b 0a 20 20 44 45 4c 45 54 45 20 46 52  ow {.  DELETE FR
20e0: 4f 4d 20 74 31 20 57 48 45 52 45 20 72 6f 77 69  OM t1 WHERE rowi
20f0: 64 20 49 4e 0a 20 20 20 20 28 53 45 4c 45 43 54  d IN.    (SELECT
2100: 20 72 6f 77 69 64 20 46 52 4f 4d 20 74 31 20 4f   rowid FROM t1 O
2110: 52 44 45 52 20 42 59 20 72 61 6e 64 6f 6d 28 29  RDER BY random()
2120: 20 4c 49 4d 49 54 20 32 30 30 30 30 29 0a 7d 0a   LIMIT 20000).}.
2130: 64 6f 5f 74 65 73 74 20 73 70 65 65 64 32 2d 31  do_test speed2-1
2140: 2e 32 20 7b 0a 20 20 64 62 20 6f 6e 65 20 7b 53  .2 {.  db one {S
2150: 45 4c 45 43 54 20 63 6f 75 6e 74 28 2a 29 20 46  ELECT count(*) F
2160: 52 4f 4d 20 74 31 7d 0a 7d 20 31 30 30 30 30 0a  ROM t1}.} 10000.
2170: 73 70 65 65 64 5f 74 72 69 61 6c 5f 73 75 6d 6d  speed_trial_summ
2180: 61 72 79 20 73 70 65 65 64 32 0a 0a 0a 66 69 6e  ary speed2...fin
2190: 69 73 68 5f 74 65 73 74 0a                       ish_test.