/ Hex Artifact Content
Login

Artifact 4d29103d1e16fcbf90135d1c637b833688492b063b2971dfb5dc6ba76555cfee:


0000: 23 20 32 30 31 37 20 41 75 67 75 73 74 20 31 37  # 2017 August 17
0010: 0a 23 0a 23 20 54 68 65 20 61 75 74 68 6f 72 20  .#.# The author 
0020: 64 69 73 63 6c 61 69 6d 73 20 63 6f 70 79 72 69  disclaims copyri
0030: 67 68 74 20 74 6f 20 74 68 69 73 20 73 6f 75 72  ght to this sour
0040: 63 65 20 63 6f 64 65 2e 20 20 49 6e 20 70 6c 61  ce code.  In pla
0050: 63 65 20 6f 66 0a 23 20 61 20 6c 65 67 61 6c 20  ce of.# a legal 
0060: 6e 6f 74 69 63 65 2c 20 68 65 72 65 20 69 73 20  notice, here is 
0070: 61 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a 23 20  a blessing:.#.# 
0080: 20 20 20 4d 61 79 20 79 6f 75 20 64 6f 20 67 6f     May you do go
0090: 6f 64 20 61 6e 64 20 6e 6f 74 20 65 76 69 6c 2e  od and not evil.
00a0: 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20 66 69  .#    May you fi
00b0: 6e 64 20 66 6f 72 67 69 76 65 6e 65 73 73 20 66  nd forgiveness f
00c0: 6f 72 20 79 6f 75 72 73 65 6c 66 20 61 6e 64 20  or yourself and 
00d0: 66 6f 72 67 69 76 65 20 6f 74 68 65 72 73 2e 0a  forgive others..
00e0: 23 20 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61  #    May you sha
00f0: 72 65 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72  re freely, never
0100: 20 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61   taking more tha
0110: 6e 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a 23 2a  n 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 0a 23 0a 23 0a 0a 0a 69 66 20  ******.#.#...if 
0170: 7b 21 5b 69 6e 66 6f 20 65 78 69 73 74 73 20 74  {![info exists t
0180: 65 73 74 64 69 72 5d 7d 20 7b 0a 20 20 73 65 74  estdir]} {.  set
0190: 20 74 65 73 74 64 69 72 20 5b 66 69 6c 65 20 6a   testdir [file j
01a0: 6f 69 6e 20 5b 66 69 6c 65 20 64 69 72 6e 61 6d  oin [file dirnam
01b0: 65 20 5b 69 6e 66 6f 20 73 63 72 69 70 74 5d 5d  e [info script]]
01c0: 20 2e 2e 20 2e 2e 20 74 65 73 74 5d 0a 7d 20 0a   .. .. test].} .
01d0: 73 6f 75 72 63 65 20 24 74 65 73 74 64 69 72 2f  source $testdir/
01e0: 74 65 73 74 65 72 2e 74 63 6c 0a 73 65 74 20 74  tester.tcl.set t
01f0: 65 73 74 70 72 65 66 69 78 20 72 74 72 65 65 63  estprefix rtreec
0200: 68 65 63 6b 0a 0a 69 66 63 61 70 61 62 6c 65 20  heck..ifcapable 
0210: 21 72 74 72 65 65 20 7b 0a 20 20 66 69 6e 69 73  !rtree {.  finis
0220: 68 5f 74 65 73 74 0a 20 20 72 65 74 75 72 6e 0a  h_test.  return.
0230: 7d 0a 0a 70 72 6f 63 20 73 77 61 70 5f 69 6e 74  }..proc swap_int
0240: 33 32 20 7b 62 6c 6f 62 20 69 30 20 69 31 7d 20  32 {blob i0 i1} 
0250: 7b 0a 20 20 62 69 6e 61 72 79 20 73 63 61 6e 20  {.  binary scan 
0260: 24 62 6c 6f 62 20 49 2a 20 4c 0a 0a 20 20 73 65  $blob I* L..  se
0270: 74 20 61 20 5b 6c 69 6e 64 65 78 20 24 4c 20 24  t a [lindex $L $
0280: 69 30 5d 0a 20 20 73 65 74 20 62 20 5b 6c 69 6e  i0].  set b [lin
0290: 64 65 78 20 24 4c 20 24 69 31 5d 0a 0a 20 20 6c  dex $L $i1]..  l
02a0: 73 65 74 20 4c 20 24 69 30 20 24 62 0a 20 20 6c  set L $i0 $b.  l
02b0: 73 65 74 20 4c 20 24 69 31 20 24 61 0a 0a 20 20  set L $i1 $a..  
02c0: 62 69 6e 61 72 79 20 66 6f 72 6d 61 74 20 49 2a  binary format I*
02d0: 20 24 4c 0a 7d 0a 0a 70 72 6f 63 20 73 65 74 5f   $L.}..proc set_
02e0: 69 6e 74 33 32 20 7b 62 6c 6f 62 20 69 64 78 20  int32 {blob idx 
02f0: 76 61 6c 7d 20 7b 0a 20 20 62 69 6e 61 72 79 20  val} {.  binary 
0300: 73 63 61 6e 20 24 62 6c 6f 62 20 49 2a 20 4c 0a  scan $blob I* L.
0310: 20 20 6c 73 65 74 20 4c 20 24 69 64 78 20 24 76    lset L $idx $v
0320: 61 6c 0a 20 20 62 69 6e 61 72 79 20 66 6f 72 6d  al.  binary form
0330: 61 74 20 49 2a 20 24 4c 0a 7d 0a 0a 64 6f 5f 63  at I* $L.}..do_c
0340: 61 74 63 68 73 71 6c 5f 74 65 73 74 20 31 2e 30  atchsql_test 1.0
0350: 20 7b 0a 20 20 53 45 4c 45 43 54 20 72 74 72 65   {.  SELECT rtre
0360: 65 63 68 65 63 6b 28 29 3b 0a 7d 20 7b 31 20 7b  echeck();.} {1 {
0370: 77 72 6f 6e 67 20 6e 75 6d 62 65 72 20 6f 66 20  wrong number of 
0380: 61 72 67 75 6d 65 6e 74 73 20 74 6f 20 66 75 6e  arguments to fun
0390: 63 74 69 6f 6e 20 72 74 72 65 65 63 68 65 63 6b  ction rtreecheck
03a0: 28 29 7d 7d 0a 0a 64 6f 5f 63 61 74 63 68 73 71  ()}}..do_catchsq
03b0: 6c 5f 74 65 73 74 20 31 2e 31 20 7b 0a 20 20 53  l_test 1.1 {.  S
03c0: 45 4c 45 43 54 20 72 74 72 65 65 63 68 65 63 6b  ELECT rtreecheck
03d0: 28 30 2c 30 2c 30 29 3b 0a 7d 20 7b 31 20 7b 77  (0,0,0);.} {1 {w
03e0: 72 6f 6e 67 20 6e 75 6d 62 65 72 20 6f 66 20 61  rong number of a
03f0: 72 67 75 6d 65 6e 74 73 20 74 6f 20 66 75 6e 63  rguments to func
0400: 74 69 6f 6e 20 72 74 72 65 65 63 68 65 63 6b 28  tion rtreecheck(
0410: 29 7d 7d 0a 0a 0a 70 72 6f 63 20 73 65 74 75 70  )}}...proc setup
0420: 5f 73 69 6d 70 6c 65 5f 64 62 20 7b 7b 6d 6f 64  _simple_db {{mod
0430: 75 6c 65 20 72 74 72 65 65 7d 7d 20 7b 0a 20 20  ule rtree}} {.  
0440: 72 65 73 65 74 5f 64 62 0a 20 20 64 62 20 66 75  reset_db.  db fu
0450: 6e 63 20 73 77 61 70 5f 69 6e 74 33 32 20 73 77  nc swap_int32 sw
0460: 61 70 5f 69 6e 74 33 32 0a 20 20 65 78 65 63 73  ap_int32.  execs
0470: 71 6c 20 22 0a 20 20 20 20 43 52 45 41 54 45 20  ql ".    CREATE 
0480: 56 49 52 54 55 41 4c 20 54 41 42 4c 45 20 72 31  VIRTUAL TABLE r1
0490: 20 55 53 49 4e 47 20 24 6d 6f 64 75 6c 65 20 28   USING $module (
04a0: 69 64 2c 20 78 31 2c 20 78 32 2c 20 79 31 2c 20  id, x1, x2, y1, 
04b0: 79 32 29 3b 0a 20 20 20 20 49 4e 53 45 52 54 20  y2);.    INSERT 
04c0: 49 4e 54 4f 20 72 31 20 56 41 4c 55 45 53 28 31  INTO r1 VALUES(1
04d0: 2c 20 20 35 2c 20 35 2c 20 35 2c 20 35 29 3b 20  ,  5, 5, 5, 5); 
04e0: 20 2d 2d 20 20 33 0a 20 20 20 20 49 4e 53 45 52   --  3.    INSER
04f0: 54 20 49 4e 54 4f 20 72 31 20 56 41 4c 55 45 53  T INTO r1 VALUES
0500: 28 32 2c 20 20 36 2c 20 36 2c 20 36 2c 20 36 29  (2,  6, 6, 6, 6)
0510: 3b 20 20 2d 2d 20 20 39 0a 20 20 20 20 49 4e 53  ;  --  9.    INS
0520: 45 52 54 20 49 4e 54 4f 20 72 31 20 56 41 4c 55  ERT INTO r1 VALU
0530: 45 53 28 33 2c 20 20 37 2c 20 37 2c 20 37 2c 20  ES(3,  7, 7, 7, 
0540: 37 29 3b 20 20 2d 2d 20 31 35 0a 20 20 20 20 49  7);  -- 15.    I
0550: 4e 53 45 52 54 20 49 4e 54 4f 20 72 31 20 56 41  NSERT INTO r1 VA
0560: 4c 55 45 53 28 34 2c 20 20 38 2c 20 38 2c 20 38  LUES(4,  8, 8, 8
0570: 2c 20 38 29 3b 20 20 2d 2d 20 32 31 0a 20 20 20  , 8);  -- 21.   
0580: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 72 31 20   INSERT INTO r1 
0590: 56 41 4c 55 45 53 28 35 2c 20 20 39 2c 20 39 2c  VALUES(5,  9, 9,
05a0: 20 39 2c 20 39 29 3b 20 20 2d 2d 20 32 37 0a 20   9, 9);  -- 27. 
05b0: 20 22 0a 7d 0a 0a 73 65 74 75 70 5f 73 69 6d 70   ".}..setup_simp
05c0: 6c 65 5f 64 62 0a 64 6f 5f 65 78 65 63 73 71 6c  le_db.do_execsql
05d0: 5f 74 65 73 74 20 32 2e 31 20 7b 20 0a 20 20 53  _test 2.1 { .  S
05e0: 45 4c 45 43 54 20 72 74 72 65 65 63 68 65 63 6b  ELECT rtreecheck
05f0: 28 27 72 31 27 29 20 0a 7d 20 7b 6f 6b 7d 0a 0a  ('r1') .} {ok}..
0600: 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74 20  do_execsql_test 
0610: 32 2e 32 20 7b 0a 20 20 55 50 44 41 54 45 20 72  2.2 {.  UPDATE r
0620: 31 5f 6e 6f 64 65 20 53 45 54 20 64 61 74 61 20  1_node SET data 
0630: 3d 20 73 77 61 70 5f 69 6e 74 33 32 28 64 61 74  = swap_int32(dat
0640: 61 2c 20 33 2c 20 39 29 3b 0a 20 20 55 50 44 41  a, 3, 9);.  UPDA
0650: 54 45 20 72 31 5f 6e 6f 64 65 20 53 45 54 20 64  TE r1_node SET d
0660: 61 74 61 20 3d 20 73 77 61 70 5f 69 6e 74 33 32  ata = swap_int32
0670: 28 64 61 74 61 2c 20 32 33 2c 20 32 39 29 3b 0a  (data, 23, 29);.
0680: 7d 0a 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65  }..do_execsql_te
0690: 73 74 20 32 2e 33 20 7b 20 0a 20 20 53 45 4c 45  st 2.3 { .  SELE
06a0: 43 54 20 72 74 72 65 65 63 68 65 63 6b 28 27 72  CT rtreecheck('r
06b0: 31 27 29 20 0a 7d 20 7b 7b 44 69 6d 65 6e 73 69  1') .} {{Dimensi
06c0: 6f 6e 20 30 20 6f 66 20 63 65 6c 6c 20 30 20 6f  on 0 of cell 0 o
06d0: 6e 20 6e 6f 64 65 20 31 20 69 73 20 63 6f 72 72  n node 1 is corr
06e0: 75 70 74 0a 44 69 6d 65 6e 73 69 6f 6e 20 31 20  upt.Dimension 1 
06f0: 6f 66 20 63 65 6c 6c 20 33 20 6f 6e 20 6e 6f 64  of cell 3 on nod
0700: 65 20 31 20 69 73 20 63 6f 72 72 75 70 74 7d 7d  e 1 is corrupt}}
0710: 0a 0a 73 65 74 75 70 5f 73 69 6d 70 6c 65 5f 64  ..setup_simple_d
0720: 62 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73  b.do_execsql_tes
0730: 74 20 32 2e 34 20 7b 0a 20 20 44 45 4c 45 54 45  t 2.4 {.  DELETE
0740: 20 46 52 4f 4d 20 72 31 5f 72 6f 77 69 64 20 57   FROM r1_rowid W
0750: 48 45 52 45 20 72 6f 77 69 64 20 3d 20 33 3b 0a  HERE rowid = 3;.
0760: 20 20 53 45 4c 45 43 54 20 72 74 72 65 65 63 68    SELECT rtreech
0770: 65 63 6b 28 27 72 31 27 29 20 0a 7d 20 7b 7b 4d  eck('r1') .} {{M
0780: 61 70 70 69 6e 67 20 28 33 20 2d 3e 20 31 29 20  apping (3 -> 1) 
0790: 6d 69 73 73 69 6e 67 20 66 72 6f 6d 20 25 5f 72  missing from %_r
07a0: 6f 77 69 64 20 74 61 62 6c 65 0a 57 72 6f 6e 67  owid table.Wrong
07b0: 20 6e 75 6d 62 65 72 20 6f 66 20 65 6e 74 72 69   number of entri
07c0: 65 73 20 69 6e 20 25 5f 72 6f 77 69 64 20 74 61  es in %_rowid ta
07d0: 62 6c 65 20 2d 20 65 78 70 65 63 74 65 64 20 35  ble - expected 5
07e0: 2c 20 61 63 74 75 61 6c 20 34 7d 7d 0a 0a 73 65  , actual 4}}..se
07f0: 74 75 70 5f 73 69 6d 70 6c 65 5f 64 62 0a 64 6f  tup_simple_db.do
0800: 5f 65 78 65 63 73 71 6c 5f 74 65 73 74 20 32 2e  _execsql_test 2.
0810: 35 20 7b 0a 20 20 55 50 44 41 54 45 20 72 31 5f  5 {.  UPDATE r1_
0820: 72 6f 77 69 64 20 53 45 54 20 6e 6f 64 65 6e 6f  rowid SET nodeno
0830: 3d 32 20 57 48 45 52 45 20 72 6f 77 69 64 3d 33  =2 WHERE rowid=3
0840: 3b 0a 20 20 53 45 4c 45 43 54 20 72 74 72 65 65  ;.  SELECT rtree
0850: 63 68 65 63 6b 28 27 72 31 27 29 20 0a 7d 20 7b  check('r1') .} {
0860: 7b 46 6f 75 6e 64 20 28 33 20 2d 3e 20 32 29 20  {Found (3 -> 2) 
0870: 69 6e 20 25 5f 72 6f 77 69 64 20 74 61 62 6c 65  in %_rowid table
0880: 2c 20 65 78 70 65 63 74 65 64 20 28 33 20 2d 3e  , expected (3 ->
0890: 20 31 29 7d 7d 0a 0a 72 65 73 65 74 5f 64 62 0a   1)}}..reset_db.
08a0: 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74 20  do_execsql_test 
08b0: 33 2e 30 20 7b 20 0a 20 20 43 52 45 41 54 45 20  3.0 { .  CREATE 
08c0: 56 49 52 54 55 41 4c 20 54 41 42 4c 45 20 72 31  VIRTUAL TABLE r1
08d0: 20 55 53 49 4e 47 20 72 74 72 65 65 5f 69 33 32   USING rtree_i32
08e0: 28 69 64 2c 20 78 31 2c 20 78 32 29 3b 0a 20 20  (id, x1, x2);.  
08f0: 49 4e 53 45 52 54 20 49 4e 54 4f 20 72 31 20 56  INSERT INTO r1 V
0900: 41 4c 55 45 53 28 31 2c 20 30 78 37 46 46 46 46  ALUES(1, 0x7FFFF
0910: 46 46 46 2a 2d 31 2c 20 30 78 37 46 46 46 46 46  FFF*-1, 0x7FFFFF
0920: 46 46 29 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e  FF);.  INSERT IN
0930: 54 4f 20 72 31 20 56 41 4c 55 45 53 28 32 2c 20  TO r1 VALUES(2, 
0940: 30 78 37 46 46 46 46 46 46 46 2a 2d 31 2c 20 35  0x7FFFFFFF*-1, 5
0950: 29 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f  );.  INSERT INTO
0960: 20 72 31 20 56 41 4c 55 45 53 28 33 2c 20 2d 35   r1 VALUES(3, -5
0970: 2c 20 35 29 3b 0a 20 20 49 4e 53 45 52 54 20 49  , 5);.  INSERT I
0980: 4e 54 4f 20 72 31 20 56 41 4c 55 45 53 28 34 2c  NTO r1 VALUES(4,
0990: 20 35 2c 20 30 78 31 31 31 31 31 31 31 31 29 3b   5, 0x11111111);
09a0: 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 72  .  INSERT INTO r
09b0: 31 20 56 41 4c 55 45 53 28 35 2c 20 35 2c 20 30  1 VALUES(5, 5, 0
09c0: 78 30 30 38 30 30 30 30 30 29 3b 0a 20 20 49 4e  x00800000);.  IN
09d0: 53 45 52 54 20 49 4e 54 4f 20 72 31 20 56 41 4c  SERT INTO r1 VAL
09e0: 55 45 53 28 36 2c 20 35 2c 20 30 78 30 30 30 30  UES(6, 5, 0x0000
09f0: 38 30 30 30 29 3b 0a 20 20 49 4e 53 45 52 54 20  8000);.  INSERT 
0a00: 49 4e 54 4f 20 72 31 20 56 41 4c 55 45 53 28 37  INTO r1 VALUES(7
0a10: 2c 20 35 2c 20 30 78 30 30 30 30 30 30 38 30 29  , 5, 0x00000080)
0a20: 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20  ;.  INSERT INTO 
0a30: 72 31 20 56 41 4c 55 45 53 28 38 2c 20 35 2c 20  r1 VALUES(8, 5, 
0a40: 30 78 34 30 34 39 30 66 64 62 29 3b 0a 20 20 49  0x40490fdb);.  I
0a50: 4e 53 45 52 54 20 49 4e 54 4f 20 72 31 20 56 41  NSERT INTO r1 VA
0a60: 4c 55 45 53 28 39 2c 20 30 78 37 66 38 30 30 30  LUES(9, 0x7f8000
0a70: 30 30 2c 20 30 78 37 66 39 30 30 30 30 30 29 3b  00, 0x7f900000);
0a80: 0a 20 20 53 45 4c 45 43 54 20 72 74 72 65 65 63  .  SELECT rtreec
0a90: 68 65 63 6b 28 27 72 31 27 29 20 0a 7d 20 7b 6f  heck('r1') .} {o
0aa0: 6b 7d 0a 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74  k}..do_execsql_t
0ab0: 65 73 74 20 33 2e 31 20 7b 20 0a 20 20 43 52 45  est 3.1 { .  CRE
0ac0: 41 54 45 20 56 49 52 54 55 41 4c 20 54 41 42 4c  ATE VIRTUAL TABL
0ad0: 45 20 72 32 20 55 53 49 4e 47 20 72 74 72 65 65  E r2 USING rtree
0ae0: 5f 69 33 32 28 69 64 2c 20 78 31 2c 20 78 32 29  _i32(id, x1, x2)
0af0: 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f 20  ;.  INSERT INTO 
0b00: 72 32 20 56 41 4c 55 45 53 28 32 2c 20 2d 31 2a  r2 VALUES(2, -1*
0b10: 28 31 3c 3c 33 31 29 2c 20 2d 31 2a 28 31 3c 3c  (1<<31), -1*(1<<
0b20: 33 31 29 2b 35 29 3b 0a 20 20 53 45 4c 45 43 54  31)+5);.  SELECT
0b30: 20 72 74 72 65 65 63 68 65 63 6b 28 27 72 32 27   rtreecheck('r2'
0b40: 29 20 0a 7d 20 7b 6f 6b 7d 0a 0a 64 6f 5f 65 78  ) .} {ok}..do_ex
0b50: 65 63 73 71 6c 5f 74 65 73 74 20 33 2e 32 20 7b  ecsql_test 3.2 {
0b60: 0a 20 20 42 45 47 49 4e 3b 0a 20 20 20 20 55 50  .  BEGIN;.    UP
0b70: 44 41 54 45 20 72 32 5f 6e 6f 64 65 20 53 45 54  DATE r2_node SET
0b80: 20 64 61 74 61 20 3d 20 58 27 31 32 33 34 35 36   data = X'123456
0b90: 27 3b 0a 20 20 20 20 53 45 4c 45 43 54 20 72 74  ';.    SELECT rt
0ba0: 72 65 65 63 68 65 63 6b 28 27 72 32 27 29 21 3d  reecheck('r2')!=
0bb0: 22 6f 6b 22 3b 0a 7d 20 7b 31 7d 0a 0a 64 6f 5f  "ok";.} {1}..do_
0bc0: 65 78 65 63 73 71 6c 5f 74 65 73 74 20 33 2e 33  execsql_test 3.3
0bd0: 20 7b 0a 20 20 52 4f 4c 4c 42 41 43 4b 3b 0a 20   {.  ROLLBACK;. 
0be0: 20 55 50 44 41 54 45 20 72 32 5f 6e 6f 64 65 20   UPDATE r2_node 
0bf0: 53 45 54 20 64 61 74 61 20 3d 20 58 27 30 30 30  SET data = X'000
0c00: 30 31 32 33 34 27 3b 0a 20 20 53 45 4c 45 43 54  01234';.  SELECT
0c10: 20 72 74 72 65 65 63 68 65 63 6b 28 27 72 32 27   rtreecheck('r2'
0c20: 29 21 3d 22 6f 6b 22 3b 0a 7d 20 7b 31 7d 0a 0a  )!="ok";.} {1}..
0c30: 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74 20  do_execsql_test 
0c40: 34 2e 30 20 7b 0a 20 20 43 52 45 41 54 45 20 54  4.0 {.  CREATE T
0c50: 41 42 4c 45 20 6e 6f 74 61 6e 72 74 72 65 65 28  ABLE notanrtree(
0c60: 69 29 3b 0a 20 20 53 45 4c 45 43 54 20 72 74 72  i);.  SELECT rtr
0c70: 65 65 63 68 65 63 6b 28 27 6e 6f 74 61 6e 72 74  eecheck('notanrt
0c80: 72 65 65 27 29 3b 0a 7d 20 7b 7b 53 63 68 65 6d  ree');.} {{Schem
0c90: 61 20 63 6f 72 72 75 70 74 20 6f 72 20 6e 6f 74  a corrupt or not
0ca0: 20 61 6e 20 72 74 72 65 65 7d 7d 0a 0a 23 2d 2d   an rtree}}..#--
0cb0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0cc0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0cd0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0ce0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0cf0: 2d 2d 2d 2d 2d 2d 2d 0a 23 0a 72 65 73 65 74 5f  -------.#.reset_
0d00: 64 62 0a 64 62 20 66 75 6e 63 20 73 65 74 5f 69  db.db func set_i
0d10: 6e 74 33 32 20 73 65 74 5f 69 6e 74 33 32 0a 64  nt32 set_int32.d
0d20: 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74 20 35  o_execsql_test 5
0d30: 2e 30 20 7b 0a 20 20 43 52 45 41 54 45 20 56 49  .0 {.  CREATE VI
0d40: 52 54 55 41 4c 20 54 41 42 4c 45 20 72 33 20 55  RTUAL TABLE r3 U
0d50: 53 49 4e 47 20 72 74 72 65 65 5f 69 33 32 28 69  SING rtree_i32(i
0d60: 64 2c 20 78 31 2c 20 78 32 2c 20 79 31 2c 20 79  d, x1, x2, y1, y
0d70: 32 29 3b 0a 20 20 57 49 54 48 20 78 28 69 29 20  2);.  WITH x(i) 
0d80: 41 53 20 28 0a 20 20 20 20 53 45 4c 45 43 54 20  AS (.    SELECT 
0d90: 31 20 55 4e 49 4f 4e 20 41 4c 4c 20 53 45 4c 45  1 UNION ALL SELE
0da0: 43 54 20 69 2b 31 20 46 52 4f 4d 20 78 20 57 48  CT i+1 FROM x WH
0db0: 45 52 45 20 69 3c 31 30 30 30 0a 20 20 29 0a 20  ERE i<1000.  ). 
0dc0: 20 49 4e 53 45 52 54 20 49 4e 54 4f 20 72 33 20   INSERT INTO r3 
0dd0: 53 45 4c 45 43 54 20 69 2c 20 69 2c 20 69 2c 20  SELECT i, i, i, 
0de0: 69 2c 20 69 20 46 52 4f 4d 20 78 3b 0a 7d 0a 64  i, i FROM x;.}.d
0df0: 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74 20 35  o_execsql_test 5
0e00: 2e 31 20 7b 0a 20 20 42 45 47 49 4e 3b 0a 20 20  .1 {.  BEGIN;.  
0e10: 20 20 55 50 44 41 54 45 20 72 33 5f 6e 6f 64 65    UPDATE r3_node
0e20: 20 53 45 54 20 64 61 74 61 20 3d 20 73 65 74 5f   SET data = set_
0e30: 69 6e 74 33 32 28 64 61 74 61 2c 20 33 2c 20 35  int32(data, 3, 5
0e40: 30 30 30 29 3b 0a 20 20 20 20 55 50 44 41 54 45  000);.    UPDATE
0e50: 20 72 33 5f 6e 6f 64 65 20 53 45 54 20 64 61 74   r3_node SET dat
0e60: 61 20 3d 20 73 65 74 5f 69 6e 74 33 32 28 64 61  a = set_int32(da
0e70: 74 61 2c 20 34 2c 20 35 30 30 30 29 3b 0a 20 20  ta, 4, 5000);.  
0e80: 20 20 53 45 4c 45 43 54 20 72 74 72 65 65 63 68    SELECT rtreech
0e90: 65 63 6b 28 27 72 33 27 29 3d 3d 27 6f 6b 27 0a  eck('r3')=='ok'.
0ea0: 7d 20 30 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74  } 0.do_execsql_t
0eb0: 65 73 74 20 35 2e 32 20 7b 0a 20 20 52 4f 4c 4c  est 5.2 {.  ROLL
0ec0: 42 41 43 4b 3b 0a 20 20 42 45 47 49 4e 3b 0a 20  BACK;.  BEGIN;. 
0ed0: 20 20 20 55 50 44 41 54 45 20 72 33 5f 6e 6f 64     UPDATE r3_nod
0ee0: 65 20 53 45 54 20 64 61 74 61 20 3d 20 73 65 74  e SET data = set
0ef0: 5f 69 6e 74 33 32 28 64 61 74 61 2c 20 33 2c 20  _int32(data, 3, 
0f00: 30 29 3b 0a 20 20 20 20 55 50 44 41 54 45 20 72  0);.    UPDATE r
0f10: 33 5f 6e 6f 64 65 20 53 45 54 20 64 61 74 61 20  3_node SET data 
0f20: 3d 20 73 65 74 5f 69 6e 74 33 32 28 64 61 74 61  = set_int32(data
0f30: 2c 20 34 2c 20 30 29 3b 0a 20 20 20 20 53 45 4c  , 4, 0);.    SEL
0f40: 45 43 54 20 72 74 72 65 65 63 68 65 63 6b 28 27  ECT rtreecheck('
0f50: 72 33 27 29 3d 3d 27 6f 6b 27 0a 7d 20 30 0a 0a  r3')=='ok'.} 0..
0f60: 66 69 6e 69 73 68 5f 74 65 73 74 0a 0a           finish_test..