/ Hex Artifact Content
Login

Artifact 7f046639ffd70e6b1deb38684ef2208a43b45df3:


0000: 23 20 32 30 30 38 20 4d 61 72 63 68 20 32 31 0a  # 2008 March 21.
0010: 23 0a 23 20 54 68 65 20 61 75 74 68 6f 72 20 64  #.# The author d
0020: 69 73 63 6c 61 69 6d 73 20 63 6f 70 79 72 69 67  isclaims copyrig
0030: 68 74 20 74 6f 20 74 68 69 73 20 73 6f 75 72 63  ht to this sourc
0040: 65 20 63 6f 64 65 2e 20 20 49 6e 20 70 6c 61 63  e code.  In plac
0050: 65 20 6f 66 0a 23 20 61 20 6c 65 67 61 6c 20 6e  e of.# a legal n
0060: 6f 74 69 63 65 2c 20 68 65 72 65 20 69 73 20 61  otice, here is a
0070: 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a 23 20 20   blessing:.#.#  
0080: 20 20 4d 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f    May you do goo
0090: 64 20 61 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a  d and not evil..
00a0: 23 20 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e  #    May you fin
00b0: 64 20 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f  d forgiveness fo
00c0: 72 20 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66  r yourself and f
00d0: 6f 72 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 23  orgive others..#
00e0: 20 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72      May you shar
00f0: 65 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20  e freely, never 
0100: 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e  taking more than
0110: 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a 23 2a 2a   you give..#.#**
0120: 2a 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 0a 23 20 54 68 69 73 20 66  *******.# This f
0170: 69 6c 65 20 69 6d 70 6c 65 6d 65 6e 74 73 20 72  ile implements r
0180: 65 67 72 65 73 73 69 6f 6e 20 74 65 73 74 73 20  egression tests 
0190: 66 6f 72 20 53 51 4c 69 74 65 20 6c 69 62 72 61  for SQLite libra
01a0: 72 79 2e 20 20 54 68 65 0a 23 20 66 6f 63 75 73  ry.  The.# focus
01b0: 20 6f 66 20 74 68 69 73 20 73 63 72 69 70 74 20   of this script 
01c0: 69 73 20 6d 65 61 73 75 72 69 6e 67 20 65 78 65  is measuring exe
01d0: 63 75 74 69 6e 67 20 73 70 65 65 64 2e 20 20 0a  cuting speed.  .
01e0: 23 0a 23 20 54 68 69 73 20 69 73 20 61 20 63 6f  #.# This is a co
01f0: 70 79 20 6f 66 20 73 70 65 65 64 31 2e 74 65 73  py of speed1.tes
0200: 74 20 6d 6f 64 69 66 69 65 64 20 74 6f 20 75 73  t modified to us
0210: 65 72 20 70 72 65 70 61 72 65 64 20 73 74 61 74  er prepared stat
0220: 65 6d 65 6e 74 73 2e 0a 23 0a 23 20 24 49 64 3a  ements..#.# $Id:
0230: 20 73 70 65 65 64 31 70 2e 74 65 73 74 2c 76 20   speed1p.test,v 
0240: 31 2e 36 20 32 30 30 38 2f 31 30 2f 31 35 20 31  1.6 2008/10/15 1
0250: 31 3a 34 33 3a 35 35 20 64 61 6e 69 65 6c 6b 31  1:43:55 danielk1
0260: 39 37 37 20 45 78 70 20 24 0a 23 0a 0a 73 71 6c  977 Exp $.#..sql
0270: 69 74 65 33 5f 73 68 75 74 64 6f 77 6e 0a 23 73  ite3_shutdown.#s
0280: 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f 73 63  qlite3_config_sc
0290: 72 61 74 63 68 20 32 39 30 30 30 20 31 0a 73 65  ratch 29000 1.se
02a0: 74 20 6f 6c 64 5f 6c 6f 6f 6b 61 73 69 64 65 20  t old_lookaside 
02b0: 5b 73 71 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f  [sqlite3_config_
02c0: 6c 6f 6f 6b 61 73 69 64 65 20 32 30 34 38 20 33  lookaside 2048 3
02d0: 30 30 5d 0a 23 73 71 6c 69 74 65 33 5f 63 6f 6e  00].#sqlite3_con
02e0: 66 69 67 5f 70 61 67 65 63 61 63 68 65 20 31 30  fig_pagecache 10
02f0: 32 34 20 31 31 30 30 30 0a 73 65 74 20 74 65 73  24 11000.set tes
0300: 74 64 69 72 20 5b 66 69 6c 65 20 64 69 72 6e 61  tdir [file dirna
0310: 6d 65 20 24 61 72 67 76 30 5d 0a 73 6f 75 72 63  me $argv0].sourc
0320: 65 20 24 74 65 73 74 64 69 72 2f 74 65 73 74 65  e $testdir/teste
0330: 72 2e 74 63 6c 0a 73 70 65 65 64 5f 74 72 69 61  r.tcl.speed_tria
0340: 6c 5f 69 6e 69 74 20 73 70 65 65 64 31 0a 0a 23  l_init speed1..#
0350: 20 53 65 74 20 61 20 75 6e 69 66 6f 72 6d 20 72   Set a uniform r
0360: 61 6e 64 6f 6d 20 73 65 65 64 0a 65 78 70 72 20  andom seed.expr 
0370: 73 72 61 6e 64 28 30 29 0a 0a 23 20 54 68 65 20  srand(0)..# The 
0380: 6e 75 6d 62 65 72 5f 6e 61 6d 65 20 70 72 6f 63  number_name proc
0390: 65 64 75 72 65 20 62 65 6c 6f 77 20 63 6f 6e 76  edure below conv
03a0: 65 72 74 73 20 69 74 73 20 61 72 67 6d 65 6e 74  erts its argment
03b0: 20 28 61 6e 20 69 6e 74 65 67 65 72 29 0a 23 20   (an integer).# 
03c0: 69 6e 74 6f 20 61 20 73 74 72 69 6e 67 20 77 68  into a string wh
03d0: 69 63 68 20 69 73 20 74 68 65 20 45 6e 67 6c 69  ich is the Engli
03e0: 73 68 2d 6c 61 6e 67 75 61 67 65 20 6e 61 6d 65  sh-language name
03f0: 20 66 6f 72 20 74 68 61 74 20 6e 75 6d 62 65 72   for that number
0400: 2e 0a 23 0a 23 20 45 78 61 6d 70 6c 65 3a 0a 23  ..#.# Example:.#
0410: 0a 23 20 20 20 20 20 70 75 74 73 20 5b 6e 75 6d  .#     puts [num
0420: 62 65 72 5f 6e 61 6d 65 20 31 32 33 5d 20 20 20  ber_name 123]   
0430: 2d 3e 20 20 22 6f 6e 65 20 68 75 6e 64 72 65 64  ->  "one hundred
0440: 20 74 77 65 6e 74 79 20 74 68 72 65 65 22 0a 23   twenty three".#
0450: 0a 73 65 74 20 6f 6e 65 73 20 7b 7a 65 72 6f 20  .set ones {zero 
0460: 6f 6e 65 20 74 77 6f 20 74 68 72 65 65 20 66 6f  one two three fo
0470: 75 72 20 66 69 76 65 20 73 69 78 20 73 65 76 65  ur five six seve
0480: 6e 20 65 69 67 68 74 20 6e 69 6e 65 0a 20 20 20  n eight nine.   
0490: 20 20 20 20 20 20 20 74 65 6e 20 65 6c 65 76 65         ten eleve
04a0: 6e 20 74 77 65 6c 76 65 20 74 68 69 72 74 65 65  n twelve thirtee
04b0: 6e 20 66 6f 75 72 74 65 65 6e 20 66 69 66 74 65  n fourteen fifte
04c0: 65 6e 20 73 69 78 74 65 65 6e 20 73 65 76 65 6e  en sixteen seven
04d0: 74 65 65 6e 0a 20 20 20 20 20 20 20 20 20 20 65  teen.          e
04e0: 69 67 68 74 65 65 6e 20 6e 69 6e 65 74 65 65 6e  ighteen nineteen
04f0: 7d 0a 73 65 74 20 74 65 6e 73 20 7b 7b 7d 20 74  }.set tens {{} t
0500: 65 6e 20 74 77 65 6e 74 79 20 74 68 69 72 74 79  en twenty thirty
0510: 20 66 6f 72 74 79 20 66 69 66 74 79 20 73 69 78   forty fifty six
0520: 74 79 20 73 65 76 65 6e 74 79 20 65 69 67 68 74  ty seventy eight
0530: 79 20 6e 69 6e 65 74 79 7d 0a 70 72 6f 63 20 6e  y ninety}.proc n
0540: 75 6d 62 65 72 5f 6e 61 6d 65 20 7b 6e 7d 20 7b  umber_name {n} {
0550: 0a 20 20 69 66 20 7b 24 6e 3e 3d 31 30 30 30 7d  .  if {$n>=1000}
0560: 20 7b 0a 20 20 20 20 73 65 74 20 74 78 74 20 22   {.    set txt "
0570: 5b 6e 75 6d 62 65 72 5f 6e 61 6d 65 20 5b 65 78  [number_name [ex
0580: 70 72 20 7b 24 6e 2f 31 30 30 30 7d 5d 5d 20 74  pr {$n/1000}]] t
0590: 68 6f 75 73 61 6e 64 22 0a 20 20 20 20 73 65 74  housand".    set
05a0: 20 6e 20 5b 65 78 70 72 20 7b 24 6e 25 31 30 30   n [expr {$n%100
05b0: 30 7d 5d 0a 20 20 7d 20 65 6c 73 65 20 7b 0a 20  0}].  } else {. 
05c0: 20 20 20 73 65 74 20 74 78 74 20 7b 7d 0a 20 20     set txt {}.  
05d0: 7d 0a 20 20 69 66 20 7b 24 6e 3e 3d 31 30 30 7d  }.  if {$n>=100}
05e0: 20 7b 0a 20 20 20 20 61 70 70 65 6e 64 20 74 78   {.    append tx
05f0: 74 20 22 20 5b 6c 69 6e 64 65 78 20 24 3a 3a 6f  t " [lindex $::o
0600: 6e 65 73 20 5b 65 78 70 72 20 7b 24 6e 2f 31 30  nes [expr {$n/10
0610: 30 7d 5d 5d 20 68 75 6e 64 72 65 64 22 0a 20 20  0}]] hundred".  
0620: 20 20 73 65 74 20 6e 20 5b 65 78 70 72 20 7b 24    set n [expr {$
0630: 6e 25 31 30 30 7d 5d 0a 20 20 7d 0a 20 20 69 66  n%100}].  }.  if
0640: 20 7b 24 6e 3e 3d 32 30 7d 20 7b 0a 20 20 20 20   {$n>=20} {.    
0650: 61 70 70 65 6e 64 20 74 78 74 20 22 20 5b 6c 69  append txt " [li
0660: 6e 64 65 78 20 24 3a 3a 74 65 6e 73 20 5b 65 78  ndex $::tens [ex
0670: 70 72 20 7b 24 6e 2f 31 30 7d 5d 5d 22 0a 20 20  pr {$n/10}]]".  
0680: 20 20 73 65 74 20 6e 20 5b 65 78 70 72 20 7b 24    set n [expr {$
0690: 6e 25 31 30 7d 5d 0a 20 20 7d 0a 20 20 69 66 20  n%10}].  }.  if 
06a0: 7b 24 6e 3e 30 7d 20 7b 0a 20 20 20 20 61 70 70  {$n>0} {.    app
06b0: 65 6e 64 20 74 78 74 20 22 20 5b 6c 69 6e 64 65  end txt " [linde
06c0: 78 20 24 3a 3a 6f 6e 65 73 20 24 6e 5d 22 0a 20  x $::ones $n]". 
06d0: 20 7d 0a 20 20 73 65 74 20 74 78 74 20 5b 73 74   }.  set txt [st
06e0: 72 69 6e 67 20 74 72 69 6d 20 24 74 78 74 5d 0a  ring trim $txt].
06f0: 20 20 69 66 20 7b 24 74 78 74 3d 3d 22 22 7d 20    if {$txt==""} 
0700: 7b 73 65 74 20 74 78 74 20 7a 65 72 6f 7d 0a 20  {set txt zero}. 
0710: 20 72 65 74 75 72 6e 20 24 74 78 74 0a 7d 0a 0a   return $txt.}..
0720: 23 20 43 72 65 61 74 65 20 61 20 64 61 74 61 62  # Create a datab
0730: 61 73 65 20 73 63 68 65 6d 61 2e 0a 23 0a 64 6f  ase schema..#.do
0740: 5f 74 65 73 74 20 73 70 65 65 64 31 70 2d 31 2e  _test speed1p-1.
0750: 30 20 7b 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a  0 {.  execsql {.
0760: 20 20 20 20 50 52 41 47 4d 41 20 70 61 67 65 5f      PRAGMA page_
0770: 73 69 7a 65 3d 31 30 32 34 3b 0a 20 20 20 20 50  size=1024;.    P
0780: 52 41 47 4d 41 20 63 61 63 68 65 5f 73 69 7a 65  RAGMA cache_size
0790: 3d 35 30 30 3b 0a 20 20 20 20 50 52 41 47 4d 41  =500;.    PRAGMA
07a0: 20 6c 6f 63 6b 69 6e 67 5f 6d 6f 64 65 3d 45 58   locking_mode=EX
07b0: 43 4c 55 53 49 56 45 3b 0a 20 20 20 20 43 52 45  CLUSIVE;.    CRE
07c0: 41 54 45 20 54 41 42 4c 45 20 74 31 28 61 20 49  ATE TABLE t1(a I
07d0: 4e 54 45 47 45 52 2c 20 62 20 49 4e 54 45 47 45  NTEGER, b INTEGE
07e0: 52 2c 20 63 20 54 45 58 54 29 3b 0a 20 20 20 20  R, c TEXT);.    
07f0: 43 52 45 41 54 45 20 54 41 42 4c 45 20 74 32 28  CREATE TABLE t2(
0800: 61 20 49 4e 54 45 47 45 52 2c 20 62 20 49 4e 54  a INTEGER, b INT
0810: 45 47 45 52 2c 20 63 20 54 45 58 54 29 3b 0a 20  EGER, c TEXT);. 
0820: 20 20 20 43 52 45 41 54 45 20 49 4e 44 45 58 20     CREATE INDEX 
0830: 69 32 61 20 4f 4e 20 74 32 28 61 29 3b 0a 20 20  i2a ON t2(a);.  
0840: 20 20 43 52 45 41 54 45 20 49 4e 44 45 58 20 69    CREATE INDEX i
0850: 32 62 20 4f 4e 20 74 32 28 62 29 3b 0a 20 20 7d  2b ON t2(b);.  }
0860: 0a 20 20 65 78 65 63 73 71 6c 20 7b 0a 20 20 20  .  execsql {.   
0870: 20 53 45 4c 45 43 54 20 6e 61 6d 65 20 46 52 4f   SELECT name FRO
0880: 4d 20 73 71 6c 69 74 65 5f 6d 61 73 74 65 72 20  M sqlite_master 
0890: 4f 52 44 45 52 20 42 59 20 31 3b 0a 20 20 7d 0a  ORDER BY 1;.  }.
08a0: 7d 20 7b 69 32 61 20 69 32 62 20 74 31 20 74 32  } {i2a i2b t1 t2
08b0: 7d 0a 0a 0a 23 20 35 30 30 30 30 20 49 4e 53 45  }...# 50000 INSE
08c0: 52 54 73 20 6f 6e 20 61 6e 20 75 6e 69 6e 64 65  RTs on an uninde
08d0: 78 65 64 20 74 61 62 6c 65 0a 23 0a 73 65 74 20  xed table.#.set 
08e0: 6c 69 73 74 20 7b 7d 0a 66 6f 72 20 7b 73 65 74  list {}.for {set
08f0: 20 69 20 31 7d 20 7b 24 69 3c 3d 35 30 30 30 30   i 1} {$i<=50000
0900: 7d 20 7b 69 6e 63 72 20 69 7d 20 7b 0a 20 20 73  } {incr i} {.  s
0910: 65 74 20 72 20 5b 65 78 70 72 20 7b 69 6e 74 28  et r [expr {int(
0920: 72 61 6e 64 28 29 2a 35 30 30 30 30 30 29 7d 5d  rand()*500000)}]
0930: 0a 20 20 73 65 74 20 78 20 5b 6e 75 6d 62 65 72  .  set x [number
0940: 5f 6e 61 6d 65 20 24 72 5d 0a 20 20 6c 61 70 70  _name $r].  lapp
0950: 65 6e 64 20 6c 69 73 74 20 24 69 20 24 72 20 24  end list $i $r $
0960: 78 0a 7d 0a 73 65 74 20 73 63 72 69 70 74 20 7b  x.}.set script {
0970: 0a 20 20 66 6f 72 65 61 63 68 20 7b 69 20 72 20  .  foreach {i r 
0980: 78 7d 20 24 3a 3a 6c 69 73 74 20 7b 0a 20 20 20  x} $::list {.   
0990: 20 64 62 20 65 76 61 6c 20 7b 49 4e 53 45 52 54   db eval {INSERT
09a0: 20 49 4e 54 4f 20 74 31 20 56 41 4c 55 45 53 28   INTO t1 VALUES(
09b0: 24 69 2c 24 72 2c 24 78 29 7d 0a 20 20 7d 0a 7d  $i,$r,$x)}.  }.}
09c0: 0a 64 62 20 65 76 61 6c 20 42 45 47 49 4e 0a 73  .db eval BEGIN.s
09d0: 70 65 65 64 5f 74 72 69 61 6c 5f 74 63 6c 20 73  peed_trial_tcl s
09e0: 70 65 65 64 31 70 2d 69 6e 73 65 72 74 31 20 35  peed1p-insert1 5
09f0: 30 30 30 30 20 72 6f 77 20 24 73 63 72 69 70 74  0000 row $script
0a00: 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d 49 54 0a  .db eval COMMIT.
0a10: 0a 23 20 35 30 30 30 30 20 49 4e 53 45 52 54 73  .# 50000 INSERTs
0a20: 20 6f 6e 20 61 6e 20 69 6e 64 65 78 65 64 20 74   on an indexed t
0a30: 61 62 6c 65 0a 23 0a 73 65 74 20 6c 69 73 74 20  able.#.set list 
0a40: 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20 31 7d  {}.for {set i 1}
0a50: 20 7b 24 69 3c 3d 35 30 30 30 30 7d 20 7b 69 6e   {$i<=50000} {in
0a60: 63 72 20 69 7d 20 7b 0a 20 20 73 65 74 20 72 20  cr i} {.  set r 
0a70: 5b 65 78 70 72 20 7b 69 6e 74 28 72 61 6e 64 28  [expr {int(rand(
0a80: 29 2a 35 30 30 30 30 30 29 7d 5d 0a 20 20 73 65  )*500000)}].  se
0a90: 74 20 78 20 5b 6e 75 6d 62 65 72 5f 6e 61 6d 65  t x [number_name
0aa0: 20 24 72 5d 0a 20 20 6c 61 70 70 65 6e 64 20 6c   $r].  lappend l
0ab0: 69 73 74 20 24 69 20 24 72 20 24 78 0a 7d 0a 73  ist $i $r $x.}.s
0ac0: 65 74 20 73 63 72 69 70 74 20 7b 0a 20 20 66 6f  et script {.  fo
0ad0: 72 65 61 63 68 20 7b 69 20 72 20 78 7d 20 24 3a  reach {i r x} $:
0ae0: 3a 6c 69 73 74 20 7b 0a 20 20 20 20 64 62 20 65  :list {.    db e
0af0: 76 61 6c 20 7b 49 4e 53 45 52 54 20 49 4e 54 4f  val {INSERT INTO
0b00: 20 74 32 20 56 41 4c 55 45 53 28 24 69 2c 24 72   t2 VALUES($i,$r
0b10: 2c 24 78 29 7d 0a 20 20 7d 0a 7d 0a 64 62 20 65  ,$x)}.  }.}.db e
0b20: 76 61 6c 20 42 45 47 49 4e 0a 73 70 65 65 64 5f  val BEGIN.speed_
0b30: 74 72 69 61 6c 5f 74 63 6c 20 73 70 65 65 64 31  trial_tcl speed1
0b40: 70 2d 69 6e 73 65 72 74 32 20 35 30 30 30 30 20  p-insert2 50000 
0b50: 72 6f 77 20 24 73 63 72 69 70 74 0a 64 62 20 65  row $script.db e
0b60: 76 61 6c 20 43 4f 4d 4d 49 54 0a 0a 0a 0a 23 20  val COMMIT....# 
0b70: 35 30 20 53 45 4c 45 43 54 73 20 6f 6e 20 61 6e  50 SELECTs on an
0b80: 20 69 6e 74 65 67 65 72 20 63 6f 6d 70 61 72 69   integer compari
0b90: 73 6f 6e 2e 20 20 54 68 65 72 65 20 69 73 20 6e  son.  There is n
0ba0: 6f 20 69 6e 64 65 78 20 73 6f 0a 23 20 61 20 66  o index so.# a f
0bb0: 75 6c 6c 20 74 61 62 6c 65 20 73 63 61 6e 20 69  ull table scan i
0bc0: 73 20 72 65 71 75 69 72 65 64 2e 0a 23 0a 73 65  s required..#.se
0bd0: 74 20 6c 69 73 74 20 7b 7d 0a 66 6f 72 20 7b 73  t list {}.for {s
0be0: 65 74 20 69 20 30 7d 20 7b 24 69 3c 35 30 7d 20  et i 0} {$i<50} 
0bf0: 7b 69 6e 63 72 20 69 7d 20 7b 0a 20 20 73 65 74  {incr i} {.  set
0c00: 20 6c 77 72 20 5b 65 78 70 72 20 7b 24 69 2a 31   lwr [expr {$i*1
0c10: 30 30 7d 5d 0a 20 20 73 65 74 20 75 70 72 20 5b  00}].  set upr [
0c20: 65 78 70 72 20 7b 28 24 69 2b 31 30 29 2a 31 30  expr {($i+10)*10
0c30: 30 7d 5d 0a 20 20 6c 61 70 70 65 6e 64 20 6c 69  0}].  lappend li
0c40: 73 74 20 24 6c 77 72 20 24 75 70 72 0a 7d 0a 73  st $lwr $upr.}.s
0c50: 65 74 20 73 63 72 69 70 74 20 7b 0a 20 20 66 6f  et script {.  fo
0c60: 72 65 61 63 68 20 7b 6c 77 72 20 75 70 72 7d 20  reach {lwr upr} 
0c70: 24 3a 3a 6c 69 73 74 20 7b 0a 20 20 20 20 64 62  $::list {.    db
0c80: 20 65 76 61 6c 20 20 7b 53 45 4c 45 43 54 20 63   eval  {SELECT c
0c90: 6f 75 6e 74 28 2a 29 2c 20 61 76 67 28 62 29 20  ount(*), avg(b) 
0ca0: 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20 62 3e  FROM t1 WHERE b>
0cb0: 3d 24 6c 77 72 20 41 4e 44 20 62 3c 24 75 70 72  =$lwr AND b<$upr
0cc0: 7d 0a 20 20 7d 0a 7d 0a 64 62 20 65 76 61 6c 20  }.  }.}.db eval 
0cd0: 42 45 47 49 4e 0a 73 70 65 65 64 5f 74 72 69 61  BEGIN.speed_tria
0ce0: 6c 5f 74 63 6c 20 73 70 65 65 64 31 70 2d 73 65  l_tcl speed1p-se
0cf0: 6c 65 63 74 31 20 5b 65 78 70 72 20 7b 35 30 2a  lect1 [expr {50*
0d00: 35 30 30 30 30 7d 5d 20 72 6f 77 20 24 73 63 72  50000}] row $scr
0d10: 69 70 74 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d  ipt.db eval COMM
0d20: 49 54 0a 0a 23 20 35 30 20 53 45 4c 45 43 54 73  IT..# 50 SELECTs
0d30: 20 6f 6e 20 61 6e 20 4c 49 4b 45 20 63 6f 6d 70   on an LIKE comp
0d40: 61 72 69 73 6f 6e 2e 20 20 54 68 65 72 65 20 69  arison.  There i
0d50: 73 20 6e 6f 20 69 6e 64 65 78 20 73 6f 20 61 20  s no index so a 
0d60: 66 75 6c 6c 0a 23 20 74 61 62 6c 65 20 73 63 61  full.# table sca
0d70: 6e 20 69 73 20 72 65 71 75 69 72 65 64 2e 0a 23  n is required..#
0d80: 0a 73 65 74 20 6c 69 73 74 20 7b 7d 0a 66 6f 72  .set list {}.for
0d90: 20 7b 73 65 74 20 69 20 30 7d 20 7b 24 69 3c 35   {set i 0} {$i<5
0da0: 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b 0a 20 20  0} {incr i} {.  
0db0: 6c 61 70 70 65 6e 64 20 6c 69 73 74 20 22 25 5b  lappend list "%[
0dc0: 6e 75 6d 62 65 72 5f 6e 61 6d 65 20 24 69 5d 25  number_name $i]%
0dd0: 22 0a 7d 0a 73 65 74 20 73 63 72 69 70 74 20 7b  ".}.set script {
0de0: 0a 20 20 66 6f 72 65 61 63 68 20 70 61 74 74 65  .  foreach patte
0df0: 72 6e 20 24 3a 3a 6c 69 73 74 20 7b 0a 20 20 20  rn $::list {.   
0e00: 20 64 62 20 65 76 61 6c 20 7b 53 45 4c 45 43 54   db eval {SELECT
0e10: 20 63 6f 75 6e 74 28 2a 29 2c 20 61 76 67 28 62   count(*), avg(b
0e20: 29 20 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20  ) FROM t1 WHERE 
0e30: 63 20 4c 49 4b 45 20 24 70 61 74 74 65 72 6e 7d  c LIKE $pattern}
0e40: 0a 20 20 7d 0a 7d 0a 64 62 20 65 76 61 6c 20 42  .  }.}.db eval B
0e50: 45 47 49 4e 0a 73 70 65 65 64 5f 74 72 69 61 6c  EGIN.speed_trial
0e60: 5f 74 63 6c 20 73 70 65 65 64 31 70 2d 73 65 6c  _tcl speed1p-sel
0e70: 65 63 74 32 20 5b 65 78 70 72 20 7b 35 30 2a 35  ect2 [expr {50*5
0e80: 30 30 30 30 7d 5d 20 72 6f 77 20 24 73 63 72 69  0000}] row $scri
0e90: 70 74 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d 49  pt.db eval COMMI
0ea0: 54 0a 0a 23 20 43 72 65 61 74 65 20 69 6e 64 69  T..# Create indi
0eb0: 63 65 73 0a 23 0a 64 62 20 65 76 61 6c 20 42 45  ces.#.db eval BE
0ec0: 47 49 4e 0a 73 70 65 65 64 5f 74 72 69 61 6c 20  GIN.speed_trial 
0ed0: 73 70 65 65 64 31 70 2d 63 72 65 61 74 65 69 64  speed1p-createid
0ee0: 78 20 31 35 30 30 30 30 20 72 6f 77 20 7b 0a 20  x 150000 row {. 
0ef0: 20 43 52 45 41 54 45 20 49 4e 44 45 58 20 69 31   CREATE INDEX i1
0f00: 61 20 4f 4e 20 74 31 28 61 29 3b 0a 20 20 43 52  a ON t1(a);.  CR
0f10: 45 41 54 45 20 49 4e 44 45 58 20 69 31 62 20 4f  EATE INDEX i1b O
0f20: 4e 20 74 31 28 62 29 3b 0a 20 20 43 52 45 41 54  N t1(b);.  CREAT
0f30: 45 20 49 4e 44 45 58 20 69 31 63 20 4f 4e 20 74  E INDEX i1c ON t
0f40: 31 28 63 29 3b 0a 7d 0a 64 62 20 65 76 61 6c 20  1(c);.}.db eval 
0f50: 43 4f 4d 4d 49 54 0a 0a 23 20 35 30 30 30 20 53  COMMIT..# 5000 S
0f60: 45 4c 45 43 54 73 20 6f 6e 20 61 6e 20 69 6e 74  ELECTs on an int
0f70: 65 67 65 72 20 63 6f 6d 70 61 72 69 73 6f 6e 20  eger comparison 
0f80: 77 68 65 72 65 20 74 68 65 20 69 6e 74 65 67 65  where the intege
0f90: 72 20 69 73 0a 23 20 69 6e 64 65 78 65 64 2e 0a  r is.# indexed..
0fa0: 23 0a 73 65 74 20 6c 69 73 74 20 7b 7d 0a 66 6f  #.set list {}.fo
0fb0: 72 20 7b 73 65 74 20 69 20 30 7d 20 7b 24 69 3c  r {set i 0} {$i<
0fc0: 35 30 30 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b  5000} {incr i} {
0fd0: 0a 20 20 73 65 74 20 6c 77 72 20 5b 65 78 70 72  .  set lwr [expr
0fe0: 20 7b 24 69 2a 31 30 30 7d 5d 0a 20 20 73 65 74   {$i*100}].  set
0ff0: 20 75 70 72 20 5b 65 78 70 72 20 7b 28 24 69 2b   upr [expr {($i+
1000: 31 30 29 2a 31 30 30 7d 5d 0a 20 20 6c 61 70 70  10)*100}].  lapp
1010: 65 6e 64 20 6c 69 73 74 20 24 6c 77 72 20 24 75  end list $lwr $u
1020: 70 72 0a 7d 0a 73 65 74 20 73 63 72 69 70 74 20  pr.}.set script 
1030: 7b 0a 20 20 66 6f 72 65 61 63 68 20 7b 6c 77 72  {.  foreach {lwr
1040: 20 75 70 72 7d 20 24 3a 3a 6c 69 73 74 20 7b 0a   upr} $::list {.
1050: 20 20 20 20 64 62 20 65 76 61 6c 20 7b 53 45 4c      db eval {SEL
1060: 45 43 54 20 63 6f 75 6e 74 28 2a 29 2c 20 61 76  ECT count(*), av
1070: 67 28 62 29 20 46 52 4f 4d 20 74 31 20 57 48 45  g(b) FROM t1 WHE
1080: 52 45 20 62 3e 3d 24 6c 77 72 20 41 4e 44 20 62  RE b>=$lwr AND b
1090: 3c 24 75 70 72 7d 0a 20 20 7d 0a 7d 0a 64 62 20  <$upr}.  }.}.db 
10a0: 65 76 61 6c 20 42 45 47 49 4e 0a 73 70 65 65 64  eval BEGIN.speed
10b0: 5f 74 72 69 61 6c 5f 74 63 6c 20 73 70 65 65 64  _trial_tcl speed
10c0: 31 70 2d 73 65 6c 65 63 74 33 20 35 30 30 30 20  1p-select3 5000 
10d0: 73 74 6d 74 20 24 73 63 72 69 70 74 0a 64 62 20  stmt $script.db 
10e0: 65 76 61 6c 20 43 4f 4d 4d 49 54 0a 0a 23 20 31  eval COMMIT..# 1
10f0: 30 30 30 30 30 20 72 61 6e 64 6f 6d 20 53 45 4c  00000 random SEL
1100: 45 43 54 73 20 61 67 61 69 6e 73 74 20 72 6f 77  ECTs against row
1110: 69 64 2e 0a 23 0a 73 65 74 20 6c 69 73 74 20 7b  id..#.set list {
1120: 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20 31 7d 20  }.for {set i 1} 
1130: 7b 24 69 3c 3d 31 30 30 30 30 30 7d 20 7b 69 6e  {$i<=100000} {in
1140: 63 72 20 69 7d 20 7b 0a 20 20 73 65 74 20 69 64  cr i} {.  set id
1150: 20 5b 65 78 70 72 20 7b 69 6e 74 28 72 61 6e 64   [expr {int(rand
1160: 28 29 2a 35 30 30 30 30 29 2b 31 7d 5d 0a 20 20  ()*50000)+1}].  
1170: 6c 61 70 70 65 6e 64 20 6c 69 73 74 20 24 69 64  lappend list $id
1180: 0a 7d 0a 73 65 74 20 73 63 72 69 70 74 20 7b 0a  .}.set script {.
1190: 20 20 66 6f 72 65 61 63 68 20 69 64 20 24 3a 3a    foreach id $::
11a0: 6c 69 73 74 20 7b 0a 20 20 20 20 64 62 20 65 76  list {.    db ev
11b0: 61 6c 20 7b 53 45 4c 45 43 54 20 63 20 46 52 4f  al {SELECT c FRO
11c0: 4d 20 74 31 20 57 48 45 52 45 20 72 6f 77 69 64  M t1 WHERE rowid
11d0: 3d 24 69 64 7d 0a 20 20 7d 0a 7d 0a 64 62 20 65  =$id}.  }.}.db e
11e0: 76 61 6c 20 42 45 47 49 4e 0a 73 70 65 65 64 5f  val BEGIN.speed_
11f0: 74 72 69 61 6c 5f 74 63 6c 20 73 70 65 65 64 31  trial_tcl speed1
1200: 70 2d 73 65 6c 65 63 74 34 20 31 30 30 30 30 30  p-select4 100000
1210: 20 72 6f 77 20 24 73 63 72 69 70 74 0a 64 62 20   row $script.db 
1220: 65 76 61 6c 20 43 4f 4d 4d 49 54 0a 0a 23 20 31  eval COMMIT..# 1
1230: 30 30 30 30 30 20 72 61 6e 64 6f 6d 20 53 45 4c  00000 random SEL
1240: 45 43 54 73 20 61 67 61 69 6e 73 74 20 61 20 75  ECTs against a u
1250: 6e 69 71 75 65 20 69 6e 64 65 78 65 64 20 63 6f  nique indexed co
1260: 6c 75 6d 6e 2e 0a 23 0a 73 65 74 20 6c 69 73 74  lumn..#.set list
1270: 20 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20 31   {}.for {set i 1
1280: 7d 20 7b 24 69 3c 3d 31 30 30 30 30 30 7d 20 7b  } {$i<=100000} {
1290: 69 6e 63 72 20 69 7d 20 7b 0a 20 20 73 65 74 20  incr i} {.  set 
12a0: 69 64 20 5b 65 78 70 72 20 7b 69 6e 74 28 72 61  id [expr {int(ra
12b0: 6e 64 28 29 2a 35 30 30 30 30 29 2b 31 7d 5d 0a  nd()*50000)+1}].
12c0: 20 20 6c 61 70 70 65 6e 64 20 6c 69 73 74 20 24    lappend list $
12d0: 69 64 0a 7d 0a 73 65 74 20 73 63 72 69 70 74 20  id.}.set script 
12e0: 7b 0a 20 20 66 6f 72 65 61 63 68 20 69 64 20 24  {.  foreach id $
12f0: 3a 3a 6c 69 73 74 20 7b 0a 20 20 20 20 64 62 20  ::list {.    db 
1300: 65 76 61 6c 20 7b 53 45 4c 45 43 54 20 63 20 46  eval {SELECT c F
1310: 52 4f 4d 20 74 31 20 57 48 45 52 45 20 61 3d 24  ROM t1 WHERE a=$
1320: 69 64 7d 0a 20 20 7d 0a 7d 0a 64 62 20 65 76 61  id}.  }.}.db eva
1330: 6c 20 42 45 47 49 4e 0a 73 70 65 65 64 5f 74 72  l BEGIN.speed_tr
1340: 69 61 6c 5f 74 63 6c 20 73 70 65 65 64 31 70 2d  ial_tcl speed1p-
1350: 73 65 6c 65 63 74 35 20 31 30 30 30 30 30 20 72  select5 100000 r
1360: 6f 77 20 24 73 63 72 69 70 74 0a 64 62 20 65 76  ow $script.db ev
1370: 61 6c 20 43 4f 4d 4d 49 54 0a 0a 23 20 35 30 30  al COMMIT..# 500
1380: 30 30 20 72 61 6e 64 6f 6d 20 53 45 4c 45 43 54  00 random SELECT
1390: 73 20 61 67 61 69 6e 73 74 20 61 6e 20 69 6e 64  s against an ind
13a0: 65 78 65 64 20 63 6f 6c 75 6d 6e 20 74 65 78 74  exed column text
13b0: 20 63 6f 6c 75 6d 6e 0a 23 0a 73 65 74 20 6c 69   column.#.set li
13c0: 73 74 20 5b 64 62 20 65 76 61 6c 20 7b 53 45 4c  st [db eval {SEL
13d0: 45 43 54 20 63 20 46 52 4f 4d 20 74 31 20 4f 52  ECT c FROM t1 OR
13e0: 44 45 52 20 42 59 20 72 61 6e 64 6f 6d 28 29 20  DER BY random() 
13f0: 4c 49 4d 49 54 20 35 30 30 30 30 7d 5d 0a 73 65  LIMIT 50000}].se
1400: 74 20 73 63 72 69 70 74 20 7b 0a 20 20 66 6f 72  t script {.  for
1410: 65 61 63 68 20 63 20 24 3a 3a 6c 69 73 74 20 7b  each c $::list {
1420: 0a 20 20 20 20 64 62 20 65 76 61 6c 20 7b 53 45  .    db eval {SE
1430: 4c 45 43 54 20 63 20 46 52 4f 4d 20 74 31 20 57  LECT c FROM t1 W
1440: 48 45 52 45 20 63 3d 24 63 7d 0a 20 20 7d 0a 7d  HERE c=$c}.  }.}
1450: 0a 64 62 20 65 76 61 6c 20 42 45 47 49 4e 0a 73  .db eval BEGIN.s
1460: 70 65 65 64 5f 74 72 69 61 6c 5f 74 63 6c 20 73  peed_trial_tcl s
1470: 70 65 65 64 31 70 2d 73 65 6c 65 63 74 36 20 35  peed1p-select6 5
1480: 30 30 30 30 20 72 6f 77 20 24 73 63 72 69 70 74  0000 row $script
1490: 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d 49 54 0a  .db eval COMMIT.
14a0: 0a 0a 23 20 56 61 63 75 75 6d 0a 73 70 65 65 64  ..# Vacuum.speed
14b0: 5f 74 72 69 61 6c 20 73 70 65 65 64 31 70 2d 76  _trial speed1p-v
14c0: 61 63 75 75 6d 20 31 30 30 30 30 30 20 72 6f 77  acuum 100000 row
14d0: 20 56 41 43 55 55 4d 0a 0a 23 20 35 30 30 30 20   VACUUM..# 5000 
14e0: 75 70 64 61 74 65 73 20 6f 66 20 72 61 6e 67 65  updates of range
14f0: 73 20 77 68 65 72 65 20 74 68 65 20 66 69 65 6c  s where the fiel
1500: 64 20 62 65 69 6e 67 20 63 6f 6d 70 61 72 65 64  d being compared
1510: 20 69 73 20 69 6e 64 65 78 65 64 2e 0a 23 0a 73   is indexed..#.s
1520: 65 74 20 6c 69 73 74 20 7b 7d 0a 66 6f 72 20 7b  et list {}.for {
1530: 73 65 74 20 69 20 30 7d 20 7b 24 69 3c 35 30 30  set i 0} {$i<500
1540: 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b 0a 20 20  0} {incr i} {.  
1550: 73 65 74 20 6c 77 72 20 5b 65 78 70 72 20 7b 24  set lwr [expr {$
1560: 69 2a 32 7d 5d 0a 20 20 73 65 74 20 75 70 72 20  i*2}].  set upr 
1570: 5b 65 78 70 72 20 7b 28 24 69 2b 31 29 2a 32 7d  [expr {($i+1)*2}
1580: 5d 0a 20 20 6c 61 70 70 65 6e 64 20 6c 69 73 74  ].  lappend list
1590: 20 24 6c 77 72 20 24 75 70 72 0a 7d 0a 73 65 74   $lwr $upr.}.set
15a0: 20 73 63 72 69 70 74 20 7b 0a 20 20 66 6f 72 65   script {.  fore
15b0: 61 63 68 20 7b 6c 77 72 20 75 70 72 7d 20 24 3a  ach {lwr upr} $:
15c0: 3a 6c 69 73 74 20 7b 0a 20 20 20 20 64 62 20 65  :list {.    db e
15d0: 76 61 6c 20 7b 55 50 44 41 54 45 20 74 31 20 53  val {UPDATE t1 S
15e0: 45 54 20 62 3d 62 2a 32 20 57 48 45 52 45 20 61  ET b=b*2 WHERE a
15f0: 3e 3d 24 6c 77 72 20 41 4e 44 20 61 3c 24 75 70  >=$lwr AND a<$up
1600: 72 7d 0a 20 20 7d 0a 7d 0a 64 62 20 65 76 61 6c  r}.  }.}.db eval
1610: 20 42 45 47 49 4e 0a 73 70 65 65 64 5f 74 72 69   BEGIN.speed_tri
1620: 61 6c 5f 74 63 6c 20 73 70 65 65 64 31 70 2d 75  al_tcl speed1p-u
1630: 70 64 61 74 65 31 20 35 30 30 30 20 73 74 6d 74  pdate1 5000 stmt
1640: 20 24 73 63 72 69 70 74 0a 64 62 20 65 76 61 6c   $script.db eval
1650: 20 43 4f 4d 4d 49 54 0a 0a 23 20 35 30 30 30 30   COMMIT..# 50000
1660: 20 73 69 6e 67 6c 65 2d 72 6f 77 20 75 70 64 61   single-row upda
1670: 74 65 73 2e 20 20 41 6e 20 69 6e 64 65 78 20 69  tes.  An index i
1680: 73 20 75 73 65 64 20 74 6f 20 66 69 6e 64 20 74  s used to find t
1690: 68 65 20 72 6f 77 20 71 75 69 63 6b 6c 79 2e 0a  he row quickly..
16a0: 23 0a 73 65 74 20 6c 69 73 74 20 7b 7d 0a 66 6f  #.set list {}.fo
16b0: 72 20 7b 73 65 74 20 69 20 30 7d 20 7b 24 69 3c  r {set i 0} {$i<
16c0: 35 30 30 30 30 7d 20 7b 69 6e 63 72 20 69 7d 20  50000} {incr i} 
16d0: 7b 0a 20 20 73 65 74 20 72 20 5b 65 78 70 72 20  {.  set r [expr 
16e0: 7b 69 6e 74 28 72 61 6e 64 28 29 2a 35 30 30 30  {int(rand()*5000
16f0: 30 30 29 7d 5d 0a 20 20 6c 61 70 70 65 6e 64 20  00)}].  lappend 
1700: 6c 69 73 74 20 24 69 20 24 72 0a 7d 0a 73 65 74  list $i $r.}.set
1710: 20 73 63 72 69 70 74 20 7b 0a 20 20 66 6f 72 65   script {.  fore
1720: 61 63 68 20 7b 69 20 72 7d 20 24 3a 3a 6c 69 73  ach {i r} $::lis
1730: 74 20 7b 0a 20 20 20 20 64 62 20 65 76 61 6c 20  t {.    db eval 
1740: 7b 55 50 44 41 54 45 20 74 31 20 53 45 54 20 62  {UPDATE t1 SET b
1750: 3d 24 72 20 57 48 45 52 45 20 61 3d 24 69 7d 0a  =$r WHERE a=$i}.
1760: 20 20 7d 0a 7d 0a 64 62 20 65 76 61 6c 20 42 45    }.}.db eval BE
1770: 47 49 4e 0a 73 70 65 65 64 5f 74 72 69 61 6c 5f  GIN.speed_trial_
1780: 74 63 6c 20 73 70 65 65 64 31 70 2d 75 70 64 61  tcl speed1p-upda
1790: 74 65 32 20 35 30 30 30 30 20 72 6f 77 20 24 73  te2 50000 row $s
17a0: 63 72 69 70 74 0a 64 62 20 65 76 61 6c 20 43 4f  cript.db eval CO
17b0: 4d 4d 49 54 0a 0a 23 20 31 20 62 69 67 20 74 65  MMIT..# 1 big te
17c0: 78 74 20 75 70 64 61 74 65 20 74 68 61 74 20 74  xt update that t
17d0: 6f 75 63 68 65 73 20 65 76 65 72 79 20 72 6f 77  ouches every row
17e0: 20 69 6e 20 74 68 65 20 74 61 62 6c 65 2e 0a 23   in the table..#
17f0: 0a 73 70 65 65 64 5f 74 72 69 61 6c 20 73 70 65  .speed_trial spe
1800: 65 64 31 70 2d 75 70 64 61 74 65 33 20 35 30 30  ed1p-update3 500
1810: 30 30 20 72 6f 77 20 7b 0a 20 20 55 50 44 41 54  00 row {.  UPDAT
1820: 45 20 74 31 20 53 45 54 20 63 3d 61 3b 0a 7d 0a  E t1 SET c=a;.}.
1830: 0a 23 20 4d 61 6e 79 20 69 6e 64 69 76 69 64 75  .# Many individu
1840: 61 6c 20 74 65 78 74 20 75 70 64 61 74 65 73 2e  al text updates.
1850: 20 20 45 61 63 68 20 72 6f 77 20 69 6e 20 74 68    Each row in th
1860: 65 20 74 61 62 6c 65 20 69 73 0a 23 20 74 6f 75  e table is.# tou
1870: 63 68 65 64 20 74 68 72 6f 75 67 68 20 61 6e 20  ched through an 
1880: 69 6e 64 65 78 2e 0a 23 0a 73 65 74 20 6c 69 73  index..#.set lis
1890: 74 20 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20  t {}.for {set i 
18a0: 31 7d 20 7b 24 69 3c 3d 35 30 30 30 30 7d 20 7b  1} {$i<=50000} {
18b0: 69 6e 63 72 20 69 7d 20 7b 0a 20 20 73 65 74 20  incr i} {.  set 
18c0: 72 20 5b 65 78 70 72 20 7b 69 6e 74 28 72 61 6e  r [expr {int(ran
18d0: 64 28 29 2a 35 30 30 30 30 30 29 7d 5d 0a 20 20  d()*500000)}].  
18e0: 6c 61 70 70 65 6e 64 20 6c 69 73 74 20 24 69 20  lappend list $i 
18f0: 5b 6e 75 6d 62 65 72 5f 6e 61 6d 65 20 24 72 5d  [number_name $r]
1900: 0a 7d 0a 73 65 74 20 73 63 72 69 70 74 20 7b 0a  .}.set script {.
1910: 20 20 66 6f 72 65 61 63 68 20 7b 69 20 78 7d 20    foreach {i x} 
1920: 24 3a 3a 6c 69 73 74 20 7b 0a 20 20 20 20 64 62  $::list {.    db
1930: 20 65 76 61 6c 20 7b 55 50 44 41 54 45 20 74 31   eval {UPDATE t1
1940: 20 53 45 54 20 63 3d 24 78 20 57 48 45 52 45 20   SET c=$x WHERE 
1950: 61 3d 24 69 7d 0a 20 20 7d 0a 7d 0a 64 62 20 65  a=$i}.  }.}.db e
1960: 76 61 6c 20 42 45 47 49 4e 0a 73 70 65 65 64 5f  val BEGIN.speed_
1970: 74 72 69 61 6c 5f 74 63 6c 20 73 70 65 65 64 31  trial_tcl speed1
1980: 70 2d 75 70 64 61 74 65 34 20 35 30 30 30 30 20  p-update4 50000 
1990: 72 6f 77 20 24 73 63 72 69 70 74 0a 64 62 20 65  row $script.db e
19a0: 76 61 6c 20 43 4f 4d 4d 49 54 0a 0a 23 20 44 65  val COMMIT..# De
19b0: 6c 65 74 65 20 61 6c 6c 20 63 6f 6e 74 65 6e 74  lete all content
19c0: 20 69 6e 20 61 20 74 61 62 6c 65 2e 0a 23 0a 73   in a table..#.s
19d0: 70 65 65 64 5f 74 72 69 61 6c 20 73 70 65 65 64  peed_trial speed
19e0: 31 70 2d 64 65 6c 65 74 65 31 20 35 30 30 30 30  1p-delete1 50000
19f0: 20 72 6f 77 20 7b 44 45 4c 45 54 45 20 46 52 4f   row {DELETE FRO
1a00: 4d 20 74 31 7d 0a 0a 23 20 43 6f 70 79 20 6f 6e  M t1}..# Copy on
1a10: 65 20 74 61 62 6c 65 20 69 6e 74 6f 20 61 6e 6f  e table into ano
1a20: 74 68 65 72 0a 23 0a 73 70 65 65 64 5f 74 72 69  ther.#.speed_tri
1a30: 61 6c 20 73 70 65 65 64 31 70 2d 63 6f 70 79 31  al speed1p-copy1
1a40: 20 35 30 30 30 30 20 72 6f 77 20 7b 49 4e 53 45   50000 row {INSE
1a50: 52 54 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 43  RT INTO t1 SELEC
1a60: 54 20 2a 20 46 52 4f 4d 20 74 32 7d 0a 0a 23 20  T * FROM t2}..# 
1a70: 44 65 6c 65 74 65 20 61 6c 6c 20 63 6f 6e 74 65  Delete all conte
1a80: 6e 74 20 69 6e 20 61 20 74 61 62 6c 65 2c 20 6f  nt in a table, o
1a90: 6e 65 20 72 6f 77 20 61 74 20 61 20 74 69 6d 65  ne row at a time
1aa0: 2e 0a 23 0a 73 70 65 65 64 5f 74 72 69 61 6c 20  ..#.speed_trial 
1ab0: 73 70 65 65 64 31 70 2d 64 65 6c 65 74 65 32 20  speed1p-delete2 
1ac0: 35 30 30 30 30 20 72 6f 77 20 7b 44 45 4c 45 54  50000 row {DELET
1ad0: 45 20 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20  E FROM t1 WHERE 
1ae0: 31 7d 0a 0a 23 20 52 65 66 69 6c 6c 20 74 68 65  1}..# Refill the
1af0: 20 74 61 62 6c 65 20 79 65 74 20 61 67 61 69 6e   table yet again
1b00: 0a 23 0a 73 70 65 65 64 5f 74 72 69 61 6c 20 73  .#.speed_trial s
1b10: 70 65 65 64 31 70 2d 63 6f 70 79 32 20 35 30 30  peed1p-copy2 500
1b20: 30 30 20 72 6f 77 20 7b 49 4e 53 45 52 54 20 49  00 row {INSERT I
1b30: 4e 54 4f 20 74 31 20 53 45 4c 45 43 54 20 2a 20  NTO t1 SELECT * 
1b40: 46 52 4f 4d 20 74 32 7d 0a 0a 23 20 44 72 6f 70  FROM t2}..# Drop
1b50: 20 74 68 65 20 74 61 62 6c 65 20 61 6e 64 20 72   the table and r
1b60: 65 63 72 65 61 74 65 20 69 74 20 77 69 74 68 6f  ecreate it witho
1b70: 75 74 20 69 74 73 20 69 6e 64 69 63 65 73 2e 0a  ut its indices..
1b80: 23 0a 64 62 20 65 76 61 6c 20 42 45 47 49 4e 0a  #.db eval BEGIN.
1b90: 73 70 65 65 64 5f 74 72 69 61 6c 20 73 70 65 65  speed_trial spee
1ba0: 64 31 70 2d 64 72 6f 70 31 20 35 30 30 30 30 20  d1p-drop1 50000 
1bb0: 72 6f 77 20 7b 0a 20 20 20 44 52 4f 50 20 54 41  row {.   DROP TA
1bc0: 42 4c 45 20 74 31 3b 0a 20 20 20 43 52 45 41 54  BLE t1;.   CREAT
1bd0: 45 20 54 41 42 4c 45 20 74 31 28 61 20 49 4e 54  E TABLE t1(a INT
1be0: 45 47 45 52 2c 20 62 20 49 4e 54 45 47 45 52 2c  EGER, b INTEGER,
1bf0: 20 63 20 54 45 58 54 29 3b 0a 7d 0a 64 62 20 65   c TEXT);.}.db e
1c00: 76 61 6c 20 43 4f 4d 4d 49 54 0a 0a 23 20 52 65  val COMMIT..# Re
1c10: 66 69 6c 6c 20 74 68 65 20 74 61 62 6c 65 20 79  fill the table y
1c20: 65 74 20 61 67 61 69 6e 2e 20 20 54 68 69 73 20  et again.  This 
1c30: 63 6f 70 79 20 73 68 6f 75 6c 64 20 62 65 20 66  copy should be f
1c40: 61 73 74 65 72 20 62 65 63 61 75 73 65 0a 23 20  aster because.# 
1c50: 74 68 65 72 65 20 61 72 65 20 6e 6f 20 69 6e 64  there are no ind
1c60: 69 63 65 73 20 74 6f 20 64 65 61 6c 20 77 69 74  ices to deal wit
1c70: 68 2e 0a 23 0a 73 70 65 65 64 5f 74 72 69 61 6c  h..#.speed_trial
1c80: 20 73 70 65 65 64 31 70 2d 63 6f 70 79 33 20 35   speed1p-copy3 5
1c90: 30 30 30 30 20 72 6f 77 20 7b 49 4e 53 45 52 54  0000 row {INSERT
1ca0: 20 49 4e 54 4f 20 74 31 20 53 45 4c 45 43 54 20   INTO t1 SELECT 
1cb0: 2a 20 46 52 4f 4d 20 74 32 7d 0a 0a 23 20 53 65  * FROM t2}..# Se
1cc0: 6c 65 63 74 20 32 30 30 30 30 20 72 6f 77 73 20  lect 20000 rows 
1cd0: 66 72 6f 6d 20 74 68 65 20 74 61 62 6c 65 20 61  from the table a
1ce0: 74 20 72 61 6e 64 6f 6d 2e 0a 23 0a 73 70 65 65  t random..#.spee
1cf0: 64 5f 74 72 69 61 6c 20 73 70 65 65 64 31 70 2d  d_trial speed1p-
1d00: 72 61 6e 64 6f 6d 31 20 35 30 30 30 30 20 72 6f  random1 50000 ro
1d10: 77 20 7b 0a 20 20 53 45 4c 45 43 54 20 72 6f 77  w {.  SELECT row
1d20: 69 64 20 46 52 4f 4d 20 74 31 20 4f 52 44 45 52  id FROM t1 ORDER
1d30: 20 42 59 20 72 61 6e 64 6f 6d 28 29 20 4c 49 4d   BY random() LIM
1d40: 49 54 20 32 30 30 30 30 0a 7d 0a 0a 23 20 44 65  IT 20000.}..# De
1d50: 6c 65 74 65 20 32 30 30 30 30 20 72 61 6e 64 6f  lete 20000 rando
1d60: 6d 20 72 6f 77 73 20 66 72 6f 6d 20 74 68 65 20  m rows from the 
1d70: 74 61 62 6c 65 2e 0a 23 0a 73 70 65 65 64 5f 74  table..#.speed_t
1d80: 72 69 61 6c 20 73 70 65 65 64 31 70 2d 72 61 6e  rial speed1p-ran
1d90: 64 6f 6d 2d 64 65 6c 31 20 32 30 30 30 30 20 72  dom-del1 20000 r
1da0: 6f 77 20 7b 0a 20 20 44 45 4c 45 54 45 20 46 52  ow {.  DELETE FR
1db0: 4f 4d 20 74 31 20 57 48 45 52 45 20 72 6f 77 69  OM t1 WHERE rowi
1dc0: 64 20 49 4e 0a 20 20 20 20 28 53 45 4c 45 43 54  d IN.    (SELECT
1dd0: 20 72 6f 77 69 64 20 46 52 4f 4d 20 74 31 20 4f   rowid FROM t1 O
1de0: 52 44 45 52 20 42 59 20 72 61 6e 64 6f 6d 28 29  RDER BY random()
1df0: 20 4c 49 4d 49 54 20 32 30 30 30 30 29 0a 7d 0a   LIMIT 20000).}.
1e00: 64 6f 5f 74 65 73 74 20 73 70 65 65 64 31 70 2d  do_test speed1p-
1e10: 31 2e 31 20 7b 0a 20 20 64 62 20 6f 6e 65 20 7b  1.1 {.  db one {
1e20: 53 45 4c 45 43 54 20 63 6f 75 6e 74 28 2a 29 20  SELECT count(*) 
1e30: 46 52 4f 4d 20 74 31 7d 0a 7d 20 33 30 30 30 30  FROM t1}.} 30000
1e40: 0a 20 20 20 20 0a 23 20 44 65 6c 65 74 65 20 32  .    .# Delete 2
1e50: 30 30 30 30 20 6d 6f 72 65 20 72 6f 77 73 20 61  0000 more rows a
1e60: 74 20 72 61 6e 64 6f 6d 20 66 72 6f 6d 20 74 68  t random from th
1e70: 65 20 74 61 62 6c 65 2e 0a 23 0a 73 70 65 65 64  e table..#.speed
1e80: 5f 74 72 69 61 6c 20 73 70 65 65 64 31 70 2d 72  _trial speed1p-r
1e90: 61 6e 64 6f 6d 2d 64 65 6c 32 20 32 30 30 30 30  andom-del2 20000
1ea0: 20 72 6f 77 20 7b 0a 20 20 44 45 4c 45 54 45 20   row {.  DELETE 
1eb0: 46 52 4f 4d 20 74 31 20 57 48 45 52 45 20 72 6f  FROM t1 WHERE ro
1ec0: 77 69 64 20 49 4e 0a 20 20 20 20 28 53 45 4c 45  wid IN.    (SELE
1ed0: 43 54 20 72 6f 77 69 64 20 46 52 4f 4d 20 74 31  CT rowid FROM t1
1ee0: 20 4f 52 44 45 52 20 42 59 20 72 61 6e 64 6f 6d   ORDER BY random
1ef0: 28 29 20 4c 49 4d 49 54 20 32 30 30 30 30 29 0a  () LIMIT 20000).
1f00: 7d 0a 64 6f 5f 74 65 73 74 20 73 70 65 65 64 31  }.do_test speed1
1f10: 70 2d 31 2e 32 20 7b 0a 20 20 64 62 20 6f 6e 65  p-1.2 {.  db one
1f20: 20 7b 53 45 4c 45 43 54 20 63 6f 75 6e 74 28 2a   {SELECT count(*
1f30: 29 20 46 52 4f 4d 20 74 31 7d 0a 7d 20 31 30 30  ) FROM t1}.} 100
1f40: 30 30 0a 73 70 65 65 64 5f 74 72 69 61 6c 5f 73  00.speed_trial_s
1f50: 75 6d 6d 61 72 79 20 73 70 65 65 64 31 0a 0a 64  ummary speed1..d
1f60: 62 20 63 6c 6f 73 65 0a 73 71 6c 69 74 65 33 5f  b close.sqlite3_
1f70: 73 68 75 74 64 6f 77 6e 0a 65 76 61 6c 20 73 71  shutdown.eval sq
1f80: 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f 6c 6f 6f  lite3_config_loo
1f90: 6b 61 73 69 64 65 20 24 6f 6c 64 5f 6c 6f 6f 6b  kaside $old_look
1fa0: 61 73 69 64 65 0a 66 69 6e 69 73 68 5f 74 65 73  aside.finish_tes
1fb0: 74 0a                                            t.