/ Hex Artifact Content
Login

Artifact c4a469f29f135f4d76c55b1f2a52f36e209466cc:


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 37 20 32 30 30 39 2f 30 34 2f 30 39 20 30  1.7 2009/04/09 0
0250: 31 3a 32 33 3a 34 39 20 64 72 68 20 45 78 70 20  1:23:49 drh Exp 
0260: 24 0a 23 0a 0a 73 71 6c 69 74 65 33 5f 73 68 75  $.#..sqlite3_shu
0270: 74 64 6f 77 6e 0a 23 73 71 6c 69 74 65 33 5f 63  tdown.#sqlite3_c
0280: 6f 6e 66 69 67 5f 73 63 72 61 74 63 68 20 32 39  onfig_scratch 29
0290: 30 30 30 20 31 0a 73 65 74 20 6f 6c 64 5f 6c 6f  000 1.set old_lo
02a0: 6f 6b 61 73 69 64 65 20 5b 73 71 6c 69 74 65 33  okaside [sqlite3
02b0: 5f 63 6f 6e 66 69 67 5f 6c 6f 6f 6b 61 73 69 64  _config_lookasid
02c0: 65 20 32 30 34 38 20 33 30 30 5d 0a 23 73 71 6c  e 2048 300].#sql
02d0: 69 74 65 33 5f 63 6f 6e 66 69 67 5f 70 61 67 65  ite3_config_page
02e0: 63 61 63 68 65 20 31 30 32 34 20 31 31 30 30 30  cache 1024 11000
02f0: 0a 73 65 74 20 74 65 73 74 64 69 72 20 5b 66 69  .set testdir [fi
0300: 6c 65 20 64 69 72 6e 61 6d 65 20 24 61 72 67 76  le dirname $argv
0310: 30 5d 0a 73 6f 75 72 63 65 20 24 74 65 73 74 64  0].source $testd
0320: 69 72 2f 74 65 73 74 65 72 2e 74 63 6c 0a 73 70  ir/tester.tcl.sp
0330: 65 65 64 5f 74 72 69 61 6c 5f 69 6e 69 74 20 73  eed_trial_init s
0340: 70 65 65 64 31 0a 0a 23 20 53 65 74 20 61 20 75  peed1..# Set a u
0350: 6e 69 66 6f 72 6d 20 72 61 6e 64 6f 6d 20 73 65  niform random se
0360: 65 64 0a 65 78 70 72 20 73 72 61 6e 64 28 30 29  ed.expr srand(0)
0370: 0a 0a 23 20 54 68 65 20 6e 75 6d 62 65 72 5f 6e  ..# The number_n
0380: 61 6d 65 20 70 72 6f 63 65 64 75 72 65 20 62 65  ame procedure be
0390: 6c 6f 77 20 63 6f 6e 76 65 72 74 73 20 69 74 73  low converts its
03a0: 20 61 72 67 6d 65 6e 74 20 28 61 6e 20 69 6e 74   argment (an int
03b0: 65 67 65 72 29 0a 23 20 69 6e 74 6f 20 61 20 73  eger).# into a s
03c0: 74 72 69 6e 67 20 77 68 69 63 68 20 69 73 20 74  tring which is t
03d0: 68 65 20 45 6e 67 6c 69 73 68 2d 6c 61 6e 67 75  he English-langu
03e0: 61 67 65 20 6e 61 6d 65 20 66 6f 72 20 74 68 61  age name for tha
03f0: 74 20 6e 75 6d 62 65 72 2e 0a 23 0a 23 20 45 78  t number..#.# Ex
0400: 61 6d 70 6c 65 3a 0a 23 0a 23 20 20 20 20 20 70  ample:.#.#     p
0410: 75 74 73 20 5b 6e 75 6d 62 65 72 5f 6e 61 6d 65  uts [number_name
0420: 20 31 32 33 5d 20 20 20 2d 3e 20 20 22 6f 6e 65   123]   ->  "one
0430: 20 68 75 6e 64 72 65 64 20 74 77 65 6e 74 79 20   hundred twenty 
0440: 74 68 72 65 65 22 0a 23 0a 73 65 74 20 6f 6e 65  three".#.set one
0450: 73 20 7b 7a 65 72 6f 20 6f 6e 65 20 74 77 6f 20  s {zero one two 
0460: 74 68 72 65 65 20 66 6f 75 72 20 66 69 76 65 20  three four five 
0470: 73 69 78 20 73 65 76 65 6e 20 65 69 67 68 74 20  six seven eight 
0480: 6e 69 6e 65 0a 20 20 20 20 20 20 20 20 20 20 74  nine.          t
0490: 65 6e 20 65 6c 65 76 65 6e 20 74 77 65 6c 76 65  en eleven twelve
04a0: 20 74 68 69 72 74 65 65 6e 20 66 6f 75 72 74 65   thirteen fourte
04b0: 65 6e 20 66 69 66 74 65 65 6e 20 73 69 78 74 65  en fifteen sixte
04c0: 65 6e 20 73 65 76 65 6e 74 65 65 6e 0a 20 20 20  en seventeen.   
04d0: 20 20 20 20 20 20 20 65 69 67 68 74 65 65 6e 20         eighteen 
04e0: 6e 69 6e 65 74 65 65 6e 7d 0a 73 65 74 20 74 65  nineteen}.set te
04f0: 6e 73 20 7b 7b 7d 20 74 65 6e 20 74 77 65 6e 74  ns {{} ten twent
0500: 79 20 74 68 69 72 74 79 20 66 6f 72 74 79 20 66  y thirty forty f
0510: 69 66 74 79 20 73 69 78 74 79 20 73 65 76 65 6e  ifty sixty seven
0520: 74 79 20 65 69 67 68 74 79 20 6e 69 6e 65 74 79  ty eighty ninety
0530: 7d 0a 70 72 6f 63 20 6e 75 6d 62 65 72 5f 6e 61  }.proc number_na
0540: 6d 65 20 7b 6e 7d 20 7b 0a 20 20 69 66 20 7b 24  me {n} {.  if {$
0550: 6e 3e 3d 31 30 30 30 7d 20 7b 0a 20 20 20 20 73  n>=1000} {.    s
0560: 65 74 20 74 78 74 20 22 5b 6e 75 6d 62 65 72 5f  et txt "[number_
0570: 6e 61 6d 65 20 5b 65 78 70 72 20 7b 24 6e 2f 31  name [expr {$n/1
0580: 30 30 30 7d 5d 5d 20 74 68 6f 75 73 61 6e 64 22  000}]] thousand"
0590: 0a 20 20 20 20 73 65 74 20 6e 20 5b 65 78 70 72  .    set n [expr
05a0: 20 7b 24 6e 25 31 30 30 30 7d 5d 0a 20 20 7d 20   {$n%1000}].  } 
05b0: 65 6c 73 65 20 7b 0a 20 20 20 20 73 65 74 20 74  else {.    set t
05c0: 78 74 20 7b 7d 0a 20 20 7d 0a 20 20 69 66 20 7b  xt {}.  }.  if {
05d0: 24 6e 3e 3d 31 30 30 7d 20 7b 0a 20 20 20 20 61  $n>=100} {.    a
05e0: 70 70 65 6e 64 20 74 78 74 20 22 20 5b 6c 69 6e  ppend txt " [lin
05f0: 64 65 78 20 24 3a 3a 6f 6e 65 73 20 5b 65 78 70  dex $::ones [exp
0600: 72 20 7b 24 6e 2f 31 30 30 7d 5d 5d 20 68 75 6e  r {$n/100}]] hun
0610: 64 72 65 64 22 0a 20 20 20 20 73 65 74 20 6e 20  dred".    set n 
0620: 5b 65 78 70 72 20 7b 24 6e 25 31 30 30 7d 5d 0a  [expr {$n%100}].
0630: 20 20 7d 0a 20 20 69 66 20 7b 24 6e 3e 3d 32 30    }.  if {$n>=20
0640: 7d 20 7b 0a 20 20 20 20 61 70 70 65 6e 64 20 74  } {.    append t
0650: 78 74 20 22 20 5b 6c 69 6e 64 65 78 20 24 3a 3a  xt " [lindex $::
0660: 74 65 6e 73 20 5b 65 78 70 72 20 7b 24 6e 2f 31  tens [expr {$n/1
0670: 30 7d 5d 5d 22 0a 20 20 20 20 73 65 74 20 6e 20  0}]]".    set n 
0680: 5b 65 78 70 72 20 7b 24 6e 25 31 30 7d 5d 0a 20  [expr {$n%10}]. 
0690: 20 7d 0a 20 20 69 66 20 7b 24 6e 3e 30 7d 20 7b   }.  if {$n>0} {
06a0: 0a 20 20 20 20 61 70 70 65 6e 64 20 74 78 74 20  .    append txt 
06b0: 22 20 5b 6c 69 6e 64 65 78 20 24 3a 3a 6f 6e 65  " [lindex $::one
06c0: 73 20 24 6e 5d 22 0a 20 20 7d 0a 20 20 73 65 74  s $n]".  }.  set
06d0: 20 74 78 74 20 5b 73 74 72 69 6e 67 20 74 72 69   txt [string tri
06e0: 6d 20 24 74 78 74 5d 0a 20 20 69 66 20 7b 24 74  m $txt].  if {$t
06f0: 78 74 3d 3d 22 22 7d 20 7b 73 65 74 20 74 78 74  xt==""} {set txt
0700: 20 7a 65 72 6f 7d 0a 20 20 72 65 74 75 72 6e 20   zero}.  return 
0710: 24 74 78 74 0a 7d 0a 0a 23 20 43 72 65 61 74 65  $txt.}..# Create
0720: 20 61 20 64 61 74 61 62 61 73 65 20 73 63 68 65   a database sche
0730: 6d 61 2e 0a 23 0a 64 6f 5f 74 65 73 74 20 73 70  ma..#.do_test sp
0740: 65 65 64 31 70 2d 31 2e 30 20 7b 0a 20 20 65 78  eed1p-1.0 {.  ex
0750: 65 63 73 71 6c 20 7b 0a 20 20 20 20 50 52 41 47  ecsql {.    PRAG
0760: 4d 41 20 70 61 67 65 5f 73 69 7a 65 3d 31 30 32  MA page_size=102
0770: 34 3b 0a 20 20 20 20 50 52 41 47 4d 41 20 63 61  4;.    PRAGMA ca
0780: 63 68 65 5f 73 69 7a 65 3d 35 30 30 3b 0a 20 20  che_size=500;.  
0790: 20 20 50 52 41 47 4d 41 20 6c 6f 63 6b 69 6e 67    PRAGMA locking
07a0: 5f 6d 6f 64 65 3d 45 58 43 4c 55 53 49 56 45 3b  _mode=EXCLUSIVE;
07b0: 0a 20 20 20 20 43 52 45 41 54 45 20 54 41 42 4c  .    CREATE TABL
07c0: 45 20 74 31 28 61 20 49 4e 54 45 47 45 52 2c 20  E t1(a INTEGER, 
07d0: 62 20 49 4e 54 45 47 45 52 2c 20 63 20 54 45 58  b INTEGER, c TEX
07e0: 54 29 3b 0a 20 20 20 20 43 52 45 41 54 45 20 54  T);.    CREATE T
07f0: 41 42 4c 45 20 74 32 28 61 20 49 4e 54 45 47 45  ABLE t2(a INTEGE
0800: 52 2c 20 62 20 49 4e 54 45 47 45 52 2c 20 63 20  R, b INTEGER, c 
0810: 54 45 58 54 29 3b 0a 20 20 20 20 43 52 45 41 54  TEXT);.    CREAT
0820: 45 20 49 4e 44 45 58 20 69 32 61 20 4f 4e 20 74  E INDEX i2a ON t
0830: 32 28 61 29 3b 0a 20 20 20 20 43 52 45 41 54 45  2(a);.    CREATE
0840: 20 49 4e 44 45 58 20 69 32 62 20 4f 4e 20 74 32   INDEX i2b ON t2
0850: 28 62 29 3b 0a 20 20 7d 0a 20 20 65 78 65 63 73  (b);.  }.  execs
0860: 71 6c 20 7b 0a 20 20 20 20 53 45 4c 45 43 54 20  ql {.    SELECT 
0870: 6e 61 6d 65 20 46 52 4f 4d 20 73 71 6c 69 74 65  name FROM sqlite
0880: 5f 6d 61 73 74 65 72 20 4f 52 44 45 52 20 42 59  _master ORDER BY
0890: 20 31 3b 0a 20 20 7d 0a 7d 20 7b 69 32 61 20 69   1;.  }.} {i2a i
08a0: 32 62 20 74 31 20 74 32 7d 0a 0a 0a 23 20 35 30  2b t1 t2}...# 50
08b0: 30 30 30 20 49 4e 53 45 52 54 73 20 6f 6e 20 61  000 INSERTs on a
08c0: 6e 20 75 6e 69 6e 64 65 78 65 64 20 74 61 62 6c  n unindexed tabl
08d0: 65 0a 23 0a 73 65 74 20 6c 69 73 74 20 7b 7d 0a  e.#.set list {}.
08e0: 66 6f 72 20 7b 73 65 74 20 69 20 31 7d 20 7b 24  for {set i 1} {$
08f0: 69 3c 3d 35 30 30 30 30 7d 20 7b 69 6e 63 72 20  i<=50000} {incr 
0900: 69 7d 20 7b 0a 20 20 73 65 74 20 72 20 5b 65 78  i} {.  set r [ex
0910: 70 72 20 7b 69 6e 74 28 72 61 6e 64 28 29 2a 35  pr {int(rand()*5
0920: 30 30 30 30 30 29 7d 5d 0a 20 20 73 65 74 20 78  00000)}].  set x
0930: 20 5b 6e 75 6d 62 65 72 5f 6e 61 6d 65 20 24 72   [number_name $r
0940: 5d 0a 20 20 6c 61 70 70 65 6e 64 20 6c 69 73 74  ].  lappend list
0950: 20 24 69 20 24 72 20 24 78 0a 7d 0a 73 65 74 20   $i $r $x.}.set 
0960: 73 63 72 69 70 74 20 7b 0a 20 20 66 6f 72 65 61  script {.  forea
0970: 63 68 20 7b 69 20 72 20 78 7d 20 24 3a 3a 6c 69  ch {i r x} $::li
0980: 73 74 20 7b 0a 20 20 20 20 64 62 20 65 76 61 6c  st {.    db eval
0990: 20 7b 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31   {INSERT INTO t1
09a0: 20 56 41 4c 55 45 53 28 24 69 2c 24 72 2c 24 78   VALUES($i,$r,$x
09b0: 29 7d 0a 20 20 7d 0a 7d 0a 64 62 20 65 76 61 6c  )}.  }.}.db eval
09c0: 20 42 45 47 49 4e 0a 73 70 65 65 64 5f 74 72 69   BEGIN.speed_tri
09d0: 61 6c 5f 74 63 6c 20 73 70 65 65 64 31 70 2d 69  al_tcl speed1p-i
09e0: 6e 73 65 72 74 31 20 35 30 30 30 30 20 72 6f 77  nsert1 50000 row
09f0: 20 24 73 63 72 69 70 74 0a 64 62 20 65 76 61 6c   $script.db eval
0a00: 20 43 4f 4d 4d 49 54 0a 0a 23 20 35 30 30 30 30   COMMIT..# 50000
0a10: 20 49 4e 53 45 52 54 73 20 6f 6e 20 61 6e 20 69   INSERTs on an i
0a20: 6e 64 65 78 65 64 20 74 61 62 6c 65 0a 23 0a 73  ndexed table.#.s
0a30: 65 74 20 6c 69 73 74 20 7b 7d 0a 66 6f 72 20 7b  et list {}.for {
0a40: 73 65 74 20 69 20 31 7d 20 7b 24 69 3c 3d 35 30  set i 1} {$i<=50
0a50: 30 30 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b 0a  000} {incr i} {.
0a60: 20 20 73 65 74 20 72 20 5b 65 78 70 72 20 7b 69    set r [expr {i
0a70: 6e 74 28 72 61 6e 64 28 29 2a 35 30 30 30 30 30  nt(rand()*500000
0a80: 29 7d 5d 0a 20 20 73 65 74 20 78 20 5b 6e 75 6d  )}].  set x [num
0a90: 62 65 72 5f 6e 61 6d 65 20 24 72 5d 0a 20 20 6c  ber_name $r].  l
0aa0: 61 70 70 65 6e 64 20 6c 69 73 74 20 24 69 20 24  append list $i $
0ab0: 72 20 24 78 0a 7d 0a 73 65 74 20 73 63 72 69 70  r $x.}.set scrip
0ac0: 74 20 7b 0a 20 20 66 6f 72 65 61 63 68 20 7b 69  t {.  foreach {i
0ad0: 20 72 20 78 7d 20 24 3a 3a 6c 69 73 74 20 7b 0a   r x} $::list {.
0ae0: 20 20 20 20 64 62 20 65 76 61 6c 20 7b 49 4e 53      db eval {INS
0af0: 45 52 54 20 49 4e 54 4f 20 74 32 20 56 41 4c 55  ERT INTO t2 VALU
0b00: 45 53 28 24 69 2c 24 72 2c 24 78 29 7d 0a 20 20  ES($i,$r,$x)}.  
0b10: 7d 0a 7d 0a 64 62 20 65 76 61 6c 20 42 45 47 49  }.}.db eval BEGI
0b20: 4e 0a 73 70 65 65 64 5f 74 72 69 61 6c 5f 74 63  N.speed_trial_tc
0b30: 6c 20 73 70 65 65 64 31 70 2d 69 6e 73 65 72 74  l speed1p-insert
0b40: 32 20 35 30 30 30 30 20 72 6f 77 20 24 73 63 72  2 50000 row $scr
0b50: 69 70 74 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d  ipt.db eval COMM
0b60: 49 54 0a 0a 0a 0a 23 20 35 30 20 53 45 4c 45 43  IT....# 50 SELEC
0b70: 54 73 20 6f 6e 20 61 6e 20 69 6e 74 65 67 65 72  Ts on an integer
0b80: 20 63 6f 6d 70 61 72 69 73 6f 6e 2e 20 20 54 68   comparison.  Th
0b90: 65 72 65 20 69 73 20 6e 6f 20 69 6e 64 65 78 20  ere is no index 
0ba0: 73 6f 0a 23 20 61 20 66 75 6c 6c 20 74 61 62 6c  so.# a full tabl
0bb0: 65 20 73 63 61 6e 20 69 73 20 72 65 71 75 69 72  e scan is requir
0bc0: 65 64 2e 0a 23 0a 73 65 74 20 6c 69 73 74 20 7b  ed..#.set list {
0bd0: 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20 30 7d 20  }.for {set i 0} 
0be0: 7b 24 69 3c 35 30 7d 20 7b 69 6e 63 72 20 69 7d  {$i<50} {incr i}
0bf0: 20 7b 0a 20 20 73 65 74 20 6c 77 72 20 5b 65 78   {.  set lwr [ex
0c00: 70 72 20 7b 24 69 2a 31 30 30 7d 5d 0a 20 20 73  pr {$i*100}].  s
0c10: 65 74 20 75 70 72 20 5b 65 78 70 72 20 7b 28 24  et upr [expr {($
0c20: 69 2b 31 30 29 2a 31 30 30 7d 5d 0a 20 20 6c 61  i+10)*100}].  la
0c30: 70 70 65 6e 64 20 6c 69 73 74 20 24 6c 77 72 20  ppend list $lwr 
0c40: 24 75 70 72 0a 7d 0a 73 65 74 20 73 63 72 69 70  $upr.}.set scrip
0c50: 74 20 7b 0a 20 20 66 6f 72 65 61 63 68 20 7b 6c  t {.  foreach {l
0c60: 77 72 20 75 70 72 7d 20 24 3a 3a 6c 69 73 74 20  wr upr} $::list 
0c70: 7b 0a 20 20 20 20 64 62 20 65 76 61 6c 20 20 7b  {.    db eval  {
0c80: 53 45 4c 45 43 54 20 63 6f 75 6e 74 28 2a 29 2c  SELECT count(*),
0c90: 20 61 76 67 28 62 29 20 46 52 4f 4d 20 74 31 20   avg(b) FROM t1 
0ca0: 57 48 45 52 45 20 62 3e 3d 24 6c 77 72 20 41 4e  WHERE b>=$lwr AN
0cb0: 44 20 62 3c 24 75 70 72 7d 0a 20 20 7d 0a 7d 0a  D b<$upr}.  }.}.
0cc0: 64 62 20 65 76 61 6c 20 42 45 47 49 4e 0a 73 70  db eval BEGIN.sp
0cd0: 65 65 64 5f 74 72 69 61 6c 5f 74 63 6c 20 73 70  eed_trial_tcl sp
0ce0: 65 65 64 31 70 2d 73 65 6c 65 63 74 31 20 5b 65  eed1p-select1 [e
0cf0: 78 70 72 20 7b 35 30 2a 35 30 30 30 30 7d 5d 20  xpr {50*50000}] 
0d00: 72 6f 77 20 24 73 63 72 69 70 74 0a 64 62 20 65  row $script.db e
0d10: 76 61 6c 20 43 4f 4d 4d 49 54 0a 0a 23 20 35 30  val COMMIT..# 50
0d20: 20 53 45 4c 45 43 54 73 20 6f 6e 20 61 6e 20 4c   SELECTs on an L
0d30: 49 4b 45 20 63 6f 6d 70 61 72 69 73 6f 6e 2e 20  IKE comparison. 
0d40: 20 54 68 65 72 65 20 69 73 20 6e 6f 20 69 6e 64   There is no ind
0d50: 65 78 20 73 6f 20 61 20 66 75 6c 6c 0a 23 20 74  ex so a full.# t
0d60: 61 62 6c 65 20 73 63 61 6e 20 69 73 20 72 65 71  able scan is req
0d70: 75 69 72 65 64 2e 0a 23 0a 73 65 74 20 6c 69 73  uired..#.set lis
0d80: 74 20 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20  t {}.for {set i 
0d90: 30 7d 20 7b 24 69 3c 35 30 7d 20 7b 69 6e 63 72  0} {$i<50} {incr
0da0: 20 69 7d 20 7b 0a 20 20 6c 61 70 70 65 6e 64 20   i} {.  lappend 
0db0: 6c 69 73 74 20 22 25 5b 6e 75 6d 62 65 72 5f 6e  list "%[number_n
0dc0: 61 6d 65 20 24 69 5d 25 22 0a 7d 0a 73 65 74 20  ame $i]%".}.set 
0dd0: 73 63 72 69 70 74 20 7b 0a 20 20 66 6f 72 65 61  script {.  forea
0de0: 63 68 20 70 61 74 74 65 72 6e 20 24 3a 3a 6c 69  ch pattern $::li
0df0: 73 74 20 7b 0a 20 20 20 20 64 62 20 65 76 61 6c  st {.    db eval
0e00: 20 7b 53 45 4c 45 43 54 20 63 6f 75 6e 74 28 2a   {SELECT count(*
0e10: 29 2c 20 61 76 67 28 62 29 20 46 52 4f 4d 20 74  ), avg(b) FROM t
0e20: 31 20 57 48 45 52 45 20 63 20 4c 49 4b 45 20 24  1 WHERE c LIKE $
0e30: 70 61 74 74 65 72 6e 7d 0a 20 20 7d 0a 7d 0a 64  pattern}.  }.}.d
0e40: 62 20 65 76 61 6c 20 42 45 47 49 4e 0a 73 70 65  b eval BEGIN.spe
0e50: 65 64 5f 74 72 69 61 6c 5f 74 63 6c 20 73 70 65  ed_trial_tcl spe
0e60: 65 64 31 70 2d 73 65 6c 65 63 74 32 20 5b 65 78  ed1p-select2 [ex
0e70: 70 72 20 7b 35 30 2a 35 30 30 30 30 7d 5d 20 72  pr {50*50000}] r
0e80: 6f 77 20 24 73 63 72 69 70 74 0a 64 62 20 65 76  ow $script.db ev
0e90: 61 6c 20 43 4f 4d 4d 49 54 0a 0a 23 20 43 72 65  al COMMIT..# Cre
0ea0: 61 74 65 20 69 6e 64 69 63 65 73 0a 23 0a 64 62  ate indices.#.db
0eb0: 20 65 76 61 6c 20 42 45 47 49 4e 0a 73 70 65 65   eval BEGIN.spee
0ec0: 64 5f 74 72 69 61 6c 20 73 70 65 65 64 31 70 2d  d_trial speed1p-
0ed0: 63 72 65 61 74 65 69 64 78 20 31 35 30 30 30 30  createidx 150000
0ee0: 20 72 6f 77 20 7b 0a 20 20 43 52 45 41 54 45 20   row {.  CREATE 
0ef0: 49 4e 44 45 58 20 69 31 61 20 4f 4e 20 74 31 28  INDEX i1a ON t1(
0f00: 61 29 3b 0a 20 20 43 52 45 41 54 45 20 49 4e 44  a);.  CREATE IND
0f10: 45 58 20 69 31 62 20 4f 4e 20 74 31 28 62 29 3b  EX i1b ON t1(b);
0f20: 0a 20 20 43 52 45 41 54 45 20 49 4e 44 45 58 20  .  CREATE INDEX 
0f30: 69 31 63 20 4f 4e 20 74 31 28 63 29 3b 0a 7d 0a  i1c ON t1(c);.}.
0f40: 64 62 20 65 76 61 6c 20 43 4f 4d 4d 49 54 0a 0a  db eval COMMIT..
0f50: 23 20 35 30 30 30 20 53 45 4c 45 43 54 73 20 6f  # 5000 SELECTs o
0f60: 6e 20 61 6e 20 69 6e 74 65 67 65 72 20 63 6f 6d  n an integer com
0f70: 70 61 72 69 73 6f 6e 20 77 68 65 72 65 20 74 68  parison where th
0f80: 65 20 69 6e 74 65 67 65 72 20 69 73 0a 23 20 69  e integer is.# i
0f90: 6e 64 65 78 65 64 2e 0a 23 0a 73 65 74 20 6c 69  ndexed..#.set li
0fa0: 73 74 20 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69  st {}.for {set i
0fb0: 20 30 7d 20 7b 24 69 3c 35 30 30 30 7d 20 7b 69   0} {$i<5000} {i
0fc0: 6e 63 72 20 69 7d 20 7b 0a 20 20 73 65 74 20 6c  ncr i} {.  set l
0fd0: 77 72 20 5b 65 78 70 72 20 7b 24 69 2a 31 30 30  wr [expr {$i*100
0fe0: 7d 5d 0a 20 20 73 65 74 20 75 70 72 20 5b 65 78  }].  set upr [ex
0ff0: 70 72 20 7b 28 24 69 2b 31 30 29 2a 31 30 30 7d  pr {($i+10)*100}
1000: 5d 0a 20 20 6c 61 70 70 65 6e 64 20 6c 69 73 74  ].  lappend list
1010: 20 24 6c 77 72 20 24 75 70 72 0a 7d 0a 73 65 74   $lwr $upr.}.set
1020: 20 73 63 72 69 70 74 20 7b 0a 20 20 66 6f 72 65   script {.  fore
1030: 61 63 68 20 7b 6c 77 72 20 75 70 72 7d 20 24 3a  ach {lwr upr} $:
1040: 3a 6c 69 73 74 20 7b 0a 20 20 20 20 64 62 20 65  :list {.    db e
1050: 76 61 6c 20 7b 53 45 4c 45 43 54 20 63 6f 75 6e  val {SELECT coun
1060: 74 28 2a 29 2c 20 61 76 67 28 62 29 20 46 52 4f  t(*), avg(b) FRO
1070: 4d 20 74 31 20 57 48 45 52 45 20 62 3e 3d 24 6c  M t1 WHERE b>=$l
1080: 77 72 20 41 4e 44 20 62 3c 24 75 70 72 7d 0a 20  wr AND b<$upr}. 
1090: 20 7d 0a 7d 0a 64 62 20 65 76 61 6c 20 42 45 47   }.}.db eval BEG
10a0: 49 4e 0a 73 70 65 65 64 5f 74 72 69 61 6c 5f 74  IN.speed_trial_t
10b0: 63 6c 20 73 70 65 65 64 31 70 2d 73 65 6c 65 63  cl speed1p-selec
10c0: 74 33 20 35 30 30 30 20 73 74 6d 74 20 24 73 63  t3 5000 stmt $sc
10d0: 72 69 70 74 0a 64 62 20 65 76 61 6c 20 43 4f 4d  ript.db eval COM
10e0: 4d 49 54 0a 0a 23 20 31 30 30 30 30 30 20 72 61  MIT..# 100000 ra
10f0: 6e 64 6f 6d 20 53 45 4c 45 43 54 73 20 61 67 61  ndom SELECTs aga
1100: 69 6e 73 74 20 72 6f 77 69 64 2e 0a 23 0a 73 65  inst rowid..#.se
1110: 74 20 6c 69 73 74 20 7b 7d 0a 66 6f 72 20 7b 73  t list {}.for {s
1120: 65 74 20 69 20 31 7d 20 7b 24 69 3c 3d 31 30 30  et i 1} {$i<=100
1130: 30 30 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b 0a  000} {incr i} {.
1140: 20 20 73 65 74 20 69 64 20 5b 65 78 70 72 20 7b    set id [expr {
1150: 69 6e 74 28 72 61 6e 64 28 29 2a 35 30 30 30 30  int(rand()*50000
1160: 29 2b 31 7d 5d 0a 20 20 6c 61 70 70 65 6e 64 20  )+1}].  lappend 
1170: 6c 69 73 74 20 24 69 64 0a 7d 0a 73 65 74 20 73  list $id.}.set s
1180: 63 72 69 70 74 20 7b 0a 20 20 66 6f 72 65 61 63  cript {.  foreac
1190: 68 20 69 64 20 24 3a 3a 6c 69 73 74 20 7b 0a 20  h id $::list {. 
11a0: 20 20 20 64 62 20 65 76 61 6c 20 7b 53 45 4c 45     db eval {SELE
11b0: 43 54 20 63 20 46 52 4f 4d 20 74 31 20 57 48 45  CT c FROM t1 WHE
11c0: 52 45 20 72 6f 77 69 64 3d 24 69 64 7d 0a 20 20  RE rowid=$id}.  
11d0: 7d 0a 7d 0a 64 62 20 65 76 61 6c 20 42 45 47 49  }.}.db eval BEGI
11e0: 4e 0a 73 70 65 65 64 5f 74 72 69 61 6c 5f 74 63  N.speed_trial_tc
11f0: 6c 20 73 70 65 65 64 31 70 2d 73 65 6c 65 63 74  l speed1p-select
1200: 34 20 31 30 30 30 30 30 20 72 6f 77 20 24 73 63  4 100000 row $sc
1210: 72 69 70 74 0a 64 62 20 65 76 61 6c 20 43 4f 4d  ript.db eval COM
1220: 4d 49 54 0a 0a 23 20 31 30 30 30 30 30 20 72 61  MIT..# 100000 ra
1230: 6e 64 6f 6d 20 53 45 4c 45 43 54 73 20 61 67 61  ndom SELECTs aga
1240: 69 6e 73 74 20 61 20 75 6e 69 71 75 65 20 69 6e  inst a unique in
1250: 64 65 78 65 64 20 63 6f 6c 75 6d 6e 2e 0a 23 0a  dexed column..#.
1260: 73 65 74 20 6c 69 73 74 20 7b 7d 0a 66 6f 72 20  set list {}.for 
1270: 7b 73 65 74 20 69 20 31 7d 20 7b 24 69 3c 3d 31  {set i 1} {$i<=1
1280: 30 30 30 30 30 7d 20 7b 69 6e 63 72 20 69 7d 20  00000} {incr i} 
1290: 7b 0a 20 20 73 65 74 20 69 64 20 5b 65 78 70 72  {.  set id [expr
12a0: 20 7b 69 6e 74 28 72 61 6e 64 28 29 2a 35 30 30   {int(rand()*500
12b0: 30 30 29 2b 31 7d 5d 0a 20 20 6c 61 70 70 65 6e  00)+1}].  lappen
12c0: 64 20 6c 69 73 74 20 24 69 64 0a 7d 0a 73 65 74  d list $id.}.set
12d0: 20 73 63 72 69 70 74 20 7b 0a 20 20 66 6f 72 65   script {.  fore
12e0: 61 63 68 20 69 64 20 24 3a 3a 6c 69 73 74 20 7b  ach id $::list {
12f0: 0a 20 20 20 20 64 62 20 65 76 61 6c 20 7b 53 45  .    db eval {SE
1300: 4c 45 43 54 20 63 20 46 52 4f 4d 20 74 31 20 57  LECT c FROM t1 W
1310: 48 45 52 45 20 61 3d 24 69 64 7d 0a 20 20 7d 0a  HERE a=$id}.  }.
1320: 7d 0a 64 62 20 65 76 61 6c 20 42 45 47 49 4e 0a  }.db eval BEGIN.
1330: 73 70 65 65 64 5f 74 72 69 61 6c 5f 74 63 6c 20  speed_trial_tcl 
1340: 73 70 65 65 64 31 70 2d 73 65 6c 65 63 74 35 20  speed1p-select5 
1350: 31 30 30 30 30 30 20 72 6f 77 20 24 73 63 72 69  100000 row $scri
1360: 70 74 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d 49  pt.db eval COMMI
1370: 54 0a 0a 23 20 35 30 30 30 30 20 72 61 6e 64 6f  T..# 50000 rando
1380: 6d 20 53 45 4c 45 43 54 73 20 61 67 61 69 6e 73  m SELECTs agains
1390: 74 20 61 6e 20 69 6e 64 65 78 65 64 20 63 6f 6c  t an indexed col
13a0: 75 6d 6e 20 74 65 78 74 20 63 6f 6c 75 6d 6e 0a  umn text column.
13b0: 23 0a 73 65 74 20 6c 69 73 74 20 5b 64 62 20 65  #.set list [db e
13c0: 76 61 6c 20 7b 53 45 4c 45 43 54 20 63 20 46 52  val {SELECT c FR
13d0: 4f 4d 20 74 31 20 4f 52 44 45 52 20 42 59 20 72  OM t1 ORDER BY r
13e0: 61 6e 64 6f 6d 28 29 20 4c 49 4d 49 54 20 35 30  andom() LIMIT 50
13f0: 30 30 30 7d 5d 0a 73 65 74 20 73 63 72 69 70 74  000}].set script
1400: 20 7b 0a 20 20 66 6f 72 65 61 63 68 20 63 20 24   {.  foreach c $
1410: 3a 3a 6c 69 73 74 20 7b 0a 20 20 20 20 64 62 20  ::list {.    db 
1420: 65 76 61 6c 20 7b 53 45 4c 45 43 54 20 63 20 46  eval {SELECT c F
1430: 52 4f 4d 20 74 31 20 57 48 45 52 45 20 63 3d 24  ROM t1 WHERE c=$
1440: 63 7d 0a 20 20 7d 0a 7d 0a 64 62 20 65 76 61 6c  c}.  }.}.db eval
1450: 20 42 45 47 49 4e 0a 73 70 65 65 64 5f 74 72 69   BEGIN.speed_tri
1460: 61 6c 5f 74 63 6c 20 73 70 65 65 64 31 70 2d 73  al_tcl speed1p-s
1470: 65 6c 65 63 74 36 20 35 30 30 30 30 20 72 6f 77  elect6 50000 row
1480: 20 24 73 63 72 69 70 74 0a 64 62 20 65 76 61 6c   $script.db eval
1490: 20 43 4f 4d 4d 49 54 0a 0a 0a 23 20 56 61 63 75   COMMIT...# Vacu
14a0: 75 6d 0a 73 70 65 65 64 5f 74 72 69 61 6c 20 73  um.speed_trial s
14b0: 70 65 65 64 31 70 2d 76 61 63 75 75 6d 20 31 30  peed1p-vacuum 10
14c0: 30 30 30 30 20 72 6f 77 20 56 41 43 55 55 4d 0a  0000 row VACUUM.
14d0: 0a 23 20 35 30 30 30 20 75 70 64 61 74 65 73 20  .# 5000 updates 
14e0: 6f 66 20 72 61 6e 67 65 73 20 77 68 65 72 65 20  of ranges where 
14f0: 74 68 65 20 66 69 65 6c 64 20 62 65 69 6e 67 20  the field being 
1500: 63 6f 6d 70 61 72 65 64 20 69 73 20 69 6e 64 65  compared is inde
1510: 78 65 64 2e 0a 23 0a 73 65 74 20 6c 69 73 74 20  xed..#.set list 
1520: 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69 20 30 7d  {}.for {set i 0}
1530: 20 7b 24 69 3c 35 30 30 30 7d 20 7b 69 6e 63 72   {$i<5000} {incr
1540: 20 69 7d 20 7b 0a 20 20 73 65 74 20 6c 77 72 20   i} {.  set lwr 
1550: 5b 65 78 70 72 20 7b 24 69 2a 32 7d 5d 0a 20 20  [expr {$i*2}].  
1560: 73 65 74 20 75 70 72 20 5b 65 78 70 72 20 7b 28  set upr [expr {(
1570: 24 69 2b 31 29 2a 32 7d 5d 0a 20 20 6c 61 70 70  $i+1)*2}].  lapp
1580: 65 6e 64 20 6c 69 73 74 20 24 6c 77 72 20 24 75  end list $lwr $u
1590: 70 72 0a 7d 0a 73 65 74 20 73 63 72 69 70 74 20  pr.}.set script 
15a0: 7b 0a 20 20 66 6f 72 65 61 63 68 20 7b 6c 77 72  {.  foreach {lwr
15b0: 20 75 70 72 7d 20 24 3a 3a 6c 69 73 74 20 7b 0a   upr} $::list {.
15c0: 20 20 20 20 64 62 20 65 76 61 6c 20 7b 55 50 44      db eval {UPD
15d0: 41 54 45 20 74 31 20 53 45 54 20 62 3d 62 2a 32  ATE t1 SET b=b*2
15e0: 20 57 48 45 52 45 20 61 3e 3d 24 6c 77 72 20 41   WHERE a>=$lwr A
15f0: 4e 44 20 61 3c 24 75 70 72 7d 0a 20 20 7d 0a 7d  ND a<$upr}.  }.}
1600: 0a 64 62 20 65 76 61 6c 20 42 45 47 49 4e 0a 73  .db eval BEGIN.s
1610: 70 65 65 64 5f 74 72 69 61 6c 5f 74 63 6c 20 73  peed_trial_tcl s
1620: 70 65 65 64 31 70 2d 75 70 64 61 74 65 31 20 35  peed1p-update1 5
1630: 30 30 30 20 73 74 6d 74 20 24 73 63 72 69 70 74  000 stmt $script
1640: 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d 49 54 0a  .db eval COMMIT.
1650: 0a 23 20 35 30 30 30 30 20 73 69 6e 67 6c 65 2d  .# 50000 single-
1660: 72 6f 77 20 75 70 64 61 74 65 73 2e 20 20 41 6e  row updates.  An
1670: 20 69 6e 64 65 78 20 69 73 20 75 73 65 64 20 74   index is used t
1680: 6f 20 66 69 6e 64 20 74 68 65 20 72 6f 77 20 71  o find the row q
1690: 75 69 63 6b 6c 79 2e 0a 23 0a 73 65 74 20 6c 69  uickly..#.set li
16a0: 73 74 20 7b 7d 0a 66 6f 72 20 7b 73 65 74 20 69  st {}.for {set i
16b0: 20 30 7d 20 7b 24 69 3c 35 30 30 30 30 7d 20 7b   0} {$i<50000} {
16c0: 69 6e 63 72 20 69 7d 20 7b 0a 20 20 73 65 74 20  incr i} {.  set 
16d0: 72 20 5b 65 78 70 72 20 7b 69 6e 74 28 72 61 6e  r [expr {int(ran
16e0: 64 28 29 2a 35 30 30 30 30 30 29 7d 5d 0a 20 20  d()*500000)}].  
16f0: 6c 61 70 70 65 6e 64 20 6c 69 73 74 20 24 69 20  lappend list $i 
1700: 24 72 0a 7d 0a 73 65 74 20 73 63 72 69 70 74 20  $r.}.set script 
1710: 7b 0a 20 20 66 6f 72 65 61 63 68 20 7b 69 20 72  {.  foreach {i r
1720: 7d 20 24 3a 3a 6c 69 73 74 20 7b 0a 20 20 20 20  } $::list {.    
1730: 64 62 20 65 76 61 6c 20 7b 55 50 44 41 54 45 20  db eval {UPDATE 
1740: 74 31 20 53 45 54 20 62 3d 24 72 20 57 48 45 52  t1 SET b=$r WHER
1750: 45 20 61 3d 24 69 7d 0a 20 20 7d 0a 7d 0a 64 62  E a=$i}.  }.}.db
1760: 20 65 76 61 6c 20 42 45 47 49 4e 0a 73 70 65 65   eval BEGIN.spee
1770: 64 5f 74 72 69 61 6c 5f 74 63 6c 20 73 70 65 65  d_trial_tcl spee
1780: 64 31 70 2d 75 70 64 61 74 65 32 20 35 30 30 30  d1p-update2 5000
1790: 30 20 72 6f 77 20 24 73 63 72 69 70 74 0a 64 62  0 row $script.db
17a0: 20 65 76 61 6c 20 43 4f 4d 4d 49 54 0a 0a 23 20   eval COMMIT..# 
17b0: 31 20 62 69 67 20 74 65 78 74 20 75 70 64 61 74  1 big text updat
17c0: 65 20 74 68 61 74 20 74 6f 75 63 68 65 73 20 65  e that touches e
17d0: 76 65 72 79 20 72 6f 77 20 69 6e 20 74 68 65 20  very row in the 
17e0: 74 61 62 6c 65 2e 0a 23 0a 73 70 65 65 64 5f 74  table..#.speed_t
17f0: 72 69 61 6c 20 73 70 65 65 64 31 70 2d 75 70 64  rial speed1p-upd
1800: 61 74 65 33 20 35 30 30 30 30 20 72 6f 77 20 7b  ate3 50000 row {
1810: 0a 20 20 55 50 44 41 54 45 20 74 31 20 53 45 54  .  UPDATE t1 SET
1820: 20 63 3d 61 3b 0a 7d 0a 0a 23 20 4d 61 6e 79 20   c=a;.}..# Many 
1830: 69 6e 64 69 76 69 64 75 61 6c 20 74 65 78 74 20  individual text 
1840: 75 70 64 61 74 65 73 2e 20 20 45 61 63 68 20 72  updates.  Each r
1850: 6f 77 20 69 6e 20 74 68 65 20 74 61 62 6c 65 20  ow in the table 
1860: 69 73 0a 23 20 74 6f 75 63 68 65 64 20 74 68 72  is.# touched thr
1870: 6f 75 67 68 20 61 6e 20 69 6e 64 65 78 2e 0a 23  ough an index..#
1880: 0a 73 65 74 20 6c 69 73 74 20 7b 7d 0a 66 6f 72  .set list {}.for
1890: 20 7b 73 65 74 20 69 20 31 7d 20 7b 24 69 3c 3d   {set i 1} {$i<=
18a0: 35 30 30 30 30 7d 20 7b 69 6e 63 72 20 69 7d 20  50000} {incr i} 
18b0: 7b 0a 20 20 73 65 74 20 72 20 5b 65 78 70 72 20  {.  set r [expr 
18c0: 7b 69 6e 74 28 72 61 6e 64 28 29 2a 35 30 30 30  {int(rand()*5000
18d0: 30 30 29 7d 5d 0a 20 20 6c 61 70 70 65 6e 64 20  00)}].  lappend 
18e0: 6c 69 73 74 20 24 69 20 5b 6e 75 6d 62 65 72 5f  list $i [number_
18f0: 6e 61 6d 65 20 24 72 5d 0a 7d 0a 73 65 74 20 73  name $r].}.set s
1900: 63 72 69 70 74 20 7b 0a 20 20 66 6f 72 65 61 63  cript {.  foreac
1910: 68 20 7b 69 20 78 7d 20 24 3a 3a 6c 69 73 74 20  h {i x} $::list 
1920: 7b 0a 20 20 20 20 64 62 20 65 76 61 6c 20 7b 55  {.    db eval {U
1930: 50 44 41 54 45 20 74 31 20 53 45 54 20 63 3d 24  PDATE t1 SET c=$
1940: 78 20 57 48 45 52 45 20 61 3d 24 69 7d 0a 20 20  x WHERE a=$i}.  
1950: 7d 0a 7d 0a 64 62 20 65 76 61 6c 20 42 45 47 49  }.}.db eval BEGI
1960: 4e 0a 73 70 65 65 64 5f 74 72 69 61 6c 5f 74 63  N.speed_trial_tc
1970: 6c 20 73 70 65 65 64 31 70 2d 75 70 64 61 74 65  l speed1p-update
1980: 34 20 35 30 30 30 30 20 72 6f 77 20 24 73 63 72  4 50000 row $scr
1990: 69 70 74 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d  ipt.db eval COMM
19a0: 49 54 0a 0a 23 20 44 65 6c 65 74 65 20 61 6c 6c  IT..# Delete all
19b0: 20 63 6f 6e 74 65 6e 74 20 69 6e 20 61 20 74 61   content in a ta
19c0: 62 6c 65 2e 0a 23 0a 73 70 65 65 64 5f 74 72 69  ble..#.speed_tri
19d0: 61 6c 20 73 70 65 65 64 31 70 2d 64 65 6c 65 74  al speed1p-delet
19e0: 65 31 20 35 30 30 30 30 20 72 6f 77 20 7b 44 45  e1 50000 row {DE
19f0: 4c 45 54 45 20 46 52 4f 4d 20 74 31 7d 0a 0a 23  LETE FROM t1}..#
1a00: 20 43 6f 70 79 20 6f 6e 65 20 74 61 62 6c 65 20   Copy one table 
1a10: 69 6e 74 6f 20 61 6e 6f 74 68 65 72 0a 23 0a 73  into another.#.s
1a20: 70 65 65 64 5f 74 72 69 61 6c 20 73 70 65 65 64  peed_trial speed
1a30: 31 70 2d 63 6f 70 79 31 20 35 30 30 30 30 20 72  1p-copy1 50000 r
1a40: 6f 77 20 7b 49 4e 53 45 52 54 20 49 4e 54 4f 20  ow {INSERT INTO 
1a50: 74 31 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d  t1 SELECT * FROM
1a60: 20 74 32 7d 0a 0a 23 20 44 65 6c 65 74 65 20 61   t2}..# Delete a
1a70: 6c 6c 20 63 6f 6e 74 65 6e 74 20 69 6e 20 61 20  ll content in a 
1a80: 74 61 62 6c 65 2c 20 6f 6e 65 20 72 6f 77 20 61  table, one row a
1a90: 74 20 61 20 74 69 6d 65 2e 0a 23 0a 73 70 65 65  t a time..#.spee
1aa0: 64 5f 74 72 69 61 6c 20 73 70 65 65 64 31 70 2d  d_trial speed1p-
1ab0: 64 65 6c 65 74 65 32 20 35 30 30 30 30 20 72 6f  delete2 50000 ro
1ac0: 77 20 7b 44 45 4c 45 54 45 20 46 52 4f 4d 20 74  w {DELETE FROM t
1ad0: 31 20 57 48 45 52 45 20 31 7d 0a 0a 23 20 52 65  1 WHERE 1}..# Re
1ae0: 66 69 6c 6c 20 74 68 65 20 74 61 62 6c 65 20 79  fill the table y
1af0: 65 74 20 61 67 61 69 6e 0a 23 0a 73 70 65 65 64  et again.#.speed
1b00: 5f 74 72 69 61 6c 20 73 70 65 65 64 31 70 2d 63  _trial speed1p-c
1b10: 6f 70 79 32 20 35 30 30 30 30 20 72 6f 77 20 7b  opy2 50000 row {
1b20: 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31 20 53  INSERT INTO t1 S
1b30: 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74 32 7d  ELECT * FROM t2}
1b40: 0a 0a 23 20 44 72 6f 70 20 74 68 65 20 74 61 62  ..# Drop the tab
1b50: 6c 65 20 61 6e 64 20 72 65 63 72 65 61 74 65 20  le and recreate 
1b60: 69 74 20 77 69 74 68 6f 75 74 20 69 74 73 20 69  it without its i
1b70: 6e 64 69 63 65 73 2e 0a 23 0a 64 62 20 65 76 61  ndices..#.db eva
1b80: 6c 20 42 45 47 49 4e 0a 73 70 65 65 64 5f 74 72  l BEGIN.speed_tr
1b90: 69 61 6c 20 73 70 65 65 64 31 70 2d 64 72 6f 70  ial speed1p-drop
1ba0: 31 20 35 30 30 30 30 20 72 6f 77 20 7b 0a 20 20  1 50000 row {.  
1bb0: 20 44 52 4f 50 20 54 41 42 4c 45 20 74 31 3b 0a   DROP TABLE t1;.
1bc0: 20 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20     CREATE TABLE 
1bd0: 74 31 28 61 20 49 4e 54 45 47 45 52 2c 20 62 20  t1(a INTEGER, b 
1be0: 49 4e 54 45 47 45 52 2c 20 63 20 54 45 58 54 29  INTEGER, c TEXT)
1bf0: 3b 0a 7d 0a 64 62 20 65 76 61 6c 20 43 4f 4d 4d  ;.}.db eval COMM
1c00: 49 54 0a 0a 23 20 52 65 66 69 6c 6c 20 74 68 65  IT..# Refill the
1c10: 20 74 61 62 6c 65 20 79 65 74 20 61 67 61 69 6e   table yet again
1c20: 2e 20 20 54 68 69 73 20 63 6f 70 79 20 73 68 6f  .  This copy sho
1c30: 75 6c 64 20 62 65 20 66 61 73 74 65 72 20 62 65  uld be faster be
1c40: 63 61 75 73 65 0a 23 20 74 68 65 72 65 20 61 72  cause.# there ar
1c50: 65 20 6e 6f 20 69 6e 64 69 63 65 73 20 74 6f 20  e no indices to 
1c60: 64 65 61 6c 20 77 69 74 68 2e 0a 23 0a 73 70 65  deal with..#.spe
1c70: 65 64 5f 74 72 69 61 6c 20 73 70 65 65 64 31 70  ed_trial speed1p
1c80: 2d 63 6f 70 79 33 20 35 30 30 30 30 20 72 6f 77  -copy3 50000 row
1c90: 20 7b 49 4e 53 45 52 54 20 49 4e 54 4f 20 74 31   {INSERT INTO t1
1ca0: 20 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20 74   SELECT * FROM t
1cb0: 32 7d 0a 0a 23 20 53 65 6c 65 63 74 20 32 30 30  2}..# Select 200
1cc0: 30 30 20 72 6f 77 73 20 66 72 6f 6d 20 74 68 65  00 rows from the
1cd0: 20 74 61 62 6c 65 20 61 74 20 72 61 6e 64 6f 6d   table at random
1ce0: 2e 0a 23 0a 73 70 65 65 64 5f 74 72 69 61 6c 20  ..#.speed_trial 
1cf0: 73 70 65 65 64 31 70 2d 72 61 6e 64 6f 6d 31 20  speed1p-random1 
1d00: 35 30 30 30 30 20 72 6f 77 20 7b 0a 20 20 53 45  50000 row {.  SE
1d10: 4c 45 43 54 20 72 6f 77 69 64 20 46 52 4f 4d 20  LECT rowid FROM 
1d20: 74 31 20 4f 52 44 45 52 20 42 59 20 72 61 6e 64  t1 ORDER BY rand
1d30: 6f 6d 28 29 20 4c 49 4d 49 54 20 32 30 30 30 30  om() LIMIT 20000
1d40: 0a 7d 0a 0a 23 20 44 65 6c 65 74 65 20 32 30 30  .}..# Delete 200
1d50: 30 30 20 72 61 6e 64 6f 6d 20 72 6f 77 73 20 66  00 random rows f
1d60: 72 6f 6d 20 74 68 65 20 74 61 62 6c 65 2e 0a 23  rom the table..#
1d70: 0a 73 70 65 65 64 5f 74 72 69 61 6c 20 73 70 65  .speed_trial spe
1d80: 65 64 31 70 2d 72 61 6e 64 6f 6d 2d 64 65 6c 31  ed1p-random-del1
1d90: 20 32 30 30 30 30 20 72 6f 77 20 7b 0a 20 20 44   20000 row {.  D
1da0: 45 4c 45 54 45 20 46 52 4f 4d 20 74 31 20 57 48  ELETE FROM t1 WH
1db0: 45 52 45 20 72 6f 77 69 64 20 49 4e 0a 20 20 20  ERE rowid IN.   
1dc0: 20 28 53 45 4c 45 43 54 20 72 6f 77 69 64 20 46   (SELECT rowid F
1dd0: 52 4f 4d 20 74 31 20 4f 52 44 45 52 20 42 59 20  ROM t1 ORDER BY 
1de0: 72 61 6e 64 6f 6d 28 29 20 4c 49 4d 49 54 20 32  random() LIMIT 2
1df0: 30 30 30 30 29 0a 7d 0a 64 6f 5f 74 65 73 74 20  0000).}.do_test 
1e00: 73 70 65 65 64 31 70 2d 31 2e 31 20 7b 0a 20 20  speed1p-1.1 {.  
1e10: 64 62 20 6f 6e 65 20 7b 53 45 4c 45 43 54 20 63  db one {SELECT c
1e20: 6f 75 6e 74 28 2a 29 20 46 52 4f 4d 20 74 31 7d  ount(*) FROM t1}
1e30: 0a 7d 20 33 30 30 30 30 0a 20 20 20 20 0a 23 20  .} 30000.    .# 
1e40: 44 65 6c 65 74 65 20 32 30 30 30 30 20 6d 6f 72  Delete 20000 mor
1e50: 65 20 72 6f 77 73 20 61 74 20 72 61 6e 64 6f 6d  e rows at random
1e60: 20 66 72 6f 6d 20 74 68 65 20 74 61 62 6c 65 2e   from the table.
1e70: 0a 23 0a 73 70 65 65 64 5f 74 72 69 61 6c 20 73  .#.speed_trial s
1e80: 70 65 65 64 31 70 2d 72 61 6e 64 6f 6d 2d 64 65  peed1p-random-de
1e90: 6c 32 20 32 30 30 30 30 20 72 6f 77 20 7b 0a 20  l2 20000 row {. 
1ea0: 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 74 31 20   DELETE FROM t1 
1eb0: 57 48 45 52 45 20 72 6f 77 69 64 20 49 4e 0a 20  WHERE rowid IN. 
1ec0: 20 20 20 28 53 45 4c 45 43 54 20 72 6f 77 69 64     (SELECT rowid
1ed0: 20 46 52 4f 4d 20 74 31 20 4f 52 44 45 52 20 42   FROM t1 ORDER B
1ee0: 59 20 72 61 6e 64 6f 6d 28 29 20 4c 49 4d 49 54  Y random() LIMIT
1ef0: 20 32 30 30 30 30 29 0a 7d 0a 64 6f 5f 74 65 73   20000).}.do_tes
1f00: 74 20 73 70 65 65 64 31 70 2d 31 2e 32 20 7b 0a  t speed1p-1.2 {.
1f10: 20 20 64 62 20 6f 6e 65 20 7b 53 45 4c 45 43 54    db one {SELECT
1f20: 20 63 6f 75 6e 74 28 2a 29 20 46 52 4f 4d 20 74   count(*) FROM t
1f30: 31 7d 0a 7d 20 31 30 30 30 30 0a 73 70 65 65 64  1}.} 10000.speed
1f40: 5f 74 72 69 61 6c 5f 73 75 6d 6d 61 72 79 20 73  _trial_summary s
1f50: 70 65 65 64 31 0a 0a 64 62 20 63 6c 6f 73 65 0a  peed1..db close.
1f60: 73 71 6c 69 74 65 33 5f 73 68 75 74 64 6f 77 6e  sqlite3_shutdown
1f70: 0a 65 76 61 6c 20 73 71 6c 69 74 65 33 5f 63 6f  .eval sqlite3_co
1f80: 6e 66 69 67 5f 6c 6f 6f 6b 61 73 69 64 65 20 24  nfig_lookaside $
1f90: 6f 6c 64 5f 6c 6f 6f 6b 61 73 69 64 65 0a 73 71  old_lookaside.sq
1fa0: 6c 69 74 65 33 5f 69 6e 69 74 69 61 6c 69 7a 65  lite3_initialize
1fb0: 0a 61 75 74 6f 69 6e 73 74 61 6c 6c 5f 74 65 73  .autoinstall_tes
1fc0: 74 5f 66 75 6e 63 74 69 6f 6e 73 0a 66 69 6e 69  t_functions.fini
1fd0: 73 68 5f 74 65 73 74 0a                          sh_test.