/ Hex Artifact Content
Login

Artifact d95f59046fa749b0d0822edf18a717788c8f318d:


0000: 23 20 32 30 31 35 20 4d 61 72 20 31 33 0a 23 0a  # 2015 Mar 13.#.
0010: 23 20 54 68 65 20 61 75 74 68 6f 72 20 64 69 73  # The author dis
0020: 63 6c 61 69 6d 73 20 63 6f 70 79 72 69 67 68 74  claims copyright
0030: 20 74 6f 20 74 68 69 73 20 73 6f 75 72 63 65 20   to this source 
0040: 63 6f 64 65 2e 20 20 49 6e 20 70 6c 61 63 65 20  code.  In place 
0050: 6f 66 0a 23 20 61 20 6c 65 67 61 6c 20 6e 6f 74  of.# a legal not
0060: 69 63 65 2c 20 68 65 72 65 20 69 73 20 61 20 62  ice, here is a b
0070: 6c 65 73 73 69 6e 67 3a 0a 23 0a 23 20 20 20 20  lessing:.#.#    
0080: 4d 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20  May you do good 
0090: 61 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 23 20  and not evil..# 
00a0: 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20     May you find 
00b0: 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20  forgiveness for 
00c0: 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72  yourself and for
00d0: 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 23 20 20  give others..#  
00e0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
00f0: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0100: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0110: 6f 75 20 67 69 76 65 2e 0a 23 0a 23 2a 2a 2a 2a  ou 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 0a 23 0a 23 20 43 72 61 73 68 20 74 65  ***.#.# Crash te
0170: 73 74 73 20 66 6f 72 20 74 68 65 20 6d 75 6c 74  sts for the mult
0180: 69 70 6c 65 78 20 6d 6f 64 75 6c 65 20 77 69 74  iplex module wit
0190: 68 20 38 2e 33 20 66 69 6c 65 6e 61 6d 65 73 20  h 8.3 filenames 
01a0: 65 6e 61 62 6c 65 64 2e 0a 23 0a 0a 73 65 74 20  enabled..#..set 
01b0: 74 65 73 74 64 69 72 20 5b 66 69 6c 65 20 64 69  testdir [file di
01c0: 72 6e 61 6d 65 20 24 61 72 67 76 30 5d 0a 73 6f  rname $argv0].so
01d0: 75 72 63 65 20 24 74 65 73 74 64 69 72 2f 74 65  urce $testdir/te
01e0: 73 74 65 72 2e 74 63 6c 0a 73 65 74 20 74 65 73  ster.tcl.set tes
01f0: 74 70 72 65 66 69 78 20 63 72 61 73 68 4d 0a 0a  tprefix crashM..
0200: 69 66 63 61 70 61 62 6c 65 20 21 63 72 61 73 68  ifcapable !crash
0210: 74 65 73 74 7c 7c 21 38 5f 33 5f 6e 61 6d 65 73  test||!8_3_names
0220: 20 7b 0a 20 20 66 69 6e 69 73 68 5f 74 65 73 74   {.  finish_test
0230: 0a 20 20 72 65 74 75 72 6e 0a 7d 0a 0a 64 62 20  .  return.}..db 
0240: 63 6c 6f 73 65 0a 73 71 6c 69 74 65 33 5f 73 68  close.sqlite3_sh
0250: 75 74 64 6f 77 6e 0a 73 71 6c 69 74 65 33 5f 63  utdown.sqlite3_c
0260: 6f 6e 66 69 67 5f 75 72 69 20 31 0a 0a 66 6f 72  onfig_uri 1..for
0270: 65 61 63 68 20 66 20 5b 67 6c 6f 62 20 2d 6e 6f  each f [glob -no
0280: 63 6f 6d 70 6c 61 69 6e 20 74 65 73 74 31 2e 2a  complain test1.*
0290: 20 74 65 73 74 32 2e 2a 5d 20 7b 20 66 6f 72 63   test2.*] { forc
02a0: 65 64 65 6c 65 74 65 20 24 66 20 7d 0a 73 71 6c  edelete $f }.sql
02b0: 69 74 65 33 5f 6d 75 6c 74 69 70 6c 65 78 5f 69  ite3_multiplex_i
02c0: 6e 69 74 69 61 6c 69 7a 65 20 22 22 20 31 0a 73  nitialize "" 1.s
02d0: 71 6c 69 74 65 33 20 64 62 20 66 69 6c 65 3a 74  qlite3 db file:t
02e0: 65 73 74 31 2e 64 62 3f 38 5f 33 5f 6e 61 6d 65  est1.db?8_3_name
02f0: 73 3d 31 0a 73 71 6c 69 74 65 33 5f 6d 75 6c 74  s=1.sqlite3_mult
0300: 69 70 6c 65 78 5f 63 6f 6e 74 72 6f 6c 20 64 62  iplex_control db
0310: 20 6d 61 69 6e 20 63 68 75 6e 6b 5f 73 69 7a 65   main chunk_size
0320: 20 5b 65 78 70 72 20 36 34 2a 31 30 32 34 5d 0a   [expr 64*1024].
0330: 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74  .do_execsql_test
0340: 20 31 2e 30 20 7b 0a 20 20 41 54 54 41 43 48 20   1.0 {.  ATTACH 
0350: 27 66 69 6c 65 3a 74 65 73 74 32 2e 64 62 3f 38  'file:test2.db?8
0360: 5f 33 5f 6e 61 6d 65 73 3d 31 27 20 41 53 20 61  _3_names=1' AS a
0370: 75 78 3b 0a 0a 20 20 43 52 45 41 54 45 20 54 41  ux;..  CREATE TA
0380: 42 4c 45 20 74 31 28 78 2c 20 79 29 3b 0a 20 20  BLE t1(x, y);.  
0390: 43 52 45 41 54 45 20 49 4e 44 45 58 20 74 31 78  CREATE INDEX t1x
03a0: 20 4f 4e 20 74 31 28 78 29 3b 0a 20 20 43 52 45   ON t1(x);.  CRE
03b0: 41 54 45 20 49 4e 44 45 58 20 74 31 79 20 4f 4e  ATE INDEX t1y ON
03c0: 20 74 31 28 79 29 3b 0a 0a 20 20 43 52 45 41 54   t1(y);..  CREAT
03d0: 45 20 54 41 42 4c 45 20 61 75 78 2e 74 32 28 78  E TABLE aux.t2(x
03e0: 2c 20 79 29 3b 0a 20 20 43 52 45 41 54 45 20 49  , y);.  CREATE I
03f0: 4e 44 45 58 20 61 75 78 2e 74 32 78 20 4f 4e 20  NDEX aux.t2x ON 
0400: 74 32 28 78 29 3b 0a 20 20 43 52 45 41 54 45 20  t2(x);.  CREATE 
0410: 49 4e 44 45 58 20 61 75 78 2e 74 32 79 20 4f 4e  INDEX aux.t2y ON
0420: 20 74 32 28 79 29 3b 0a 0a 20 20 57 49 54 48 20   t2(y);..  WITH 
0430: 73 28 61 29 20 41 53 20 28 0a 20 20 20 20 53 45  s(a) AS (.    SE
0440: 4c 45 43 54 20 31 20 55 4e 49 4f 4e 20 41 4c 4c  LECT 1 UNION ALL
0450: 20 53 45 4c 45 43 54 20 61 2b 31 20 46 52 4f 4d   SELECT a+1 FROM
0460: 20 73 20 57 48 45 52 45 20 61 3c 31 30 30 30 0a   s WHERE a<1000.
0470: 20 20 29 0a 20 20 49 4e 53 45 52 54 20 49 4e 54    ).  INSERT INT
0480: 4f 20 74 31 20 53 45 4c 45 43 54 20 61 2c 20 72  O t1 SELECT a, r
0490: 61 6e 64 6f 6d 62 6c 6f 62 28 35 30 30 29 20 46  andomblob(500) F
04a0: 52 4f 4d 20 73 3b 0a 0a 20 20 57 49 54 48 20 73  ROM s;..  WITH s
04b0: 28 61 29 20 41 53 20 28 0a 20 20 20 20 53 45 4c  (a) AS (.    SEL
04c0: 45 43 54 20 31 20 55 4e 49 4f 4e 20 41 4c 4c 20  ECT 1 UNION ALL 
04d0: 53 45 4c 45 43 54 20 61 2b 31 20 46 52 4f 4d 20  SELECT a+1 FROM 
04e0: 73 20 57 48 45 52 45 20 61 3c 31 30 30 30 0a 20  s WHERE a<1000. 
04f0: 20 29 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f   ).  INSERT INTO
0500: 20 74 32 20 53 45 4c 45 43 54 20 61 2c 20 72 61   t2 SELECT a, ra
0510: 6e 64 6f 6d 62 6c 6f 62 28 35 30 30 29 20 46 52  ndomblob(500) FR
0520: 4f 4d 20 73 3b 0a 7d 20 7b 7d 0a 0a 66 6f 72 20  OM s;.} {}..for 
0530: 7b 73 65 74 20 69 20 30 7d 20 7b 24 69 20 3c 20  {set i 0} {$i < 
0540: 32 30 7d 20 7b 69 6e 63 72 20 69 7d 20 7b 0a 20  20} {incr i} {. 
0550: 20 64 6f 5f 74 65 73 74 20 32 2e 24 69 2e 31 20   do_test 2.$i.1 
0560: 7b 0a 20 20 20 20 63 72 61 73 68 73 71 6c 20 2d  {.    crashsql -
0570: 64 65 6c 61 79 20 31 20 2d 66 69 6c 65 20 74 65  delay 1 -file te
0580: 73 74 31 2e 64 62 20 2d 6f 70 65 6e 64 62 20 7b  st1.db -opendb {
0590: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 73  .      sqlite3_s
05a0: 68 75 74 64 6f 77 6e 0a 20 20 20 20 20 20 73 71  hutdown.      sq
05b0: 6c 69 74 65 33 5f 63 6f 6e 66 69 67 5f 75 72 69  lite3_config_uri
05c0: 20 31 0a 20 20 20 20 20 20 73 71 6c 69 74 65 33   1.      sqlite3
05d0: 5f 6d 75 6c 74 69 70 6c 65 78 5f 69 6e 69 74 69  _multiplex_initi
05e0: 61 6c 69 7a 65 20 63 72 61 73 68 20 31 0a 20 20  alize crash 1.  
05f0: 20 20 20 20 73 71 6c 69 74 65 33 20 64 62 20 66      sqlite3 db f
0600: 69 6c 65 3a 74 65 73 74 31 2e 64 62 3f 38 5f 33  ile:test1.db?8_3
0610: 5f 6e 61 6d 65 73 3d 31 0a 20 20 20 20 20 20 73  _names=1.      s
0620: 71 6c 69 74 65 33 5f 6d 75 6c 74 69 70 6c 65 78  qlite3_multiplex
0630: 5f 63 6f 6e 74 72 6f 6c 20 64 62 20 6d 61 69 6e  _control db main
0640: 20 63 68 75 6e 6b 5f 73 69 7a 65 20 5b 65 78 70   chunk_size [exp
0650: 72 20 36 34 2a 31 30 32 34 5d 0a 20 20 20 20 7d  r 64*1024].    }
0660: 20 7b 0a 20 20 20 20 20 20 41 54 54 41 43 48 20   {.      ATTACH 
0670: 27 66 69 6c 65 3a 74 65 73 74 32 2e 64 62 3f 38  'file:test2.db?8
0680: 5f 33 5f 6e 61 6d 65 73 3d 31 27 20 41 53 20 61  _3_names=1' AS a
0690: 75 78 3b 0a 20 20 20 20 20 20 42 45 47 49 4e 3b  ux;.      BEGIN;
06a0: 0a 20 20 20 20 20 20 20 20 55 50 44 41 54 45 20  .        UPDATE 
06b0: 74 31 20 53 45 54 20 79 20 3d 20 72 61 6e 64 6f  t1 SET y = rando
06c0: 6d 62 6c 6f 62 28 35 30 30 29 20 57 48 45 52 45  mblob(500) WHERE
06d0: 20 28 78 25 31 30 29 3d 3d 30 3b 0a 20 20 20 20   (x%10)==0;.    
06e0: 20 20 20 20 55 50 44 41 54 45 20 74 32 20 53 45      UPDATE t2 SE
06f0: 54 20 79 20 3d 20 72 61 6e 64 6f 6d 62 6c 6f 62  T y = randomblob
0700: 28 35 30 30 29 20 57 48 45 52 45 20 28 78 25 31  (500) WHERE (x%1
0710: 30 29 3d 3d 30 3b 0a 20 20 20 20 20 20 43 4f 4d  0)==0;.      COM
0720: 4d 49 54 3b 0a 20 20 20 20 7d 0a 20 20 7d 20 7b  MIT;.    }.  } {
0730: 31 20 7b 63 68 69 6c 64 20 70 72 6f 63 65 73 73  1 {child process
0740: 20 65 78 69 74 65 64 20 61 62 6e 6f 72 6d 61 6c   exited abnormal
0750: 6c 79 7d 7d 0a 0a 20 20 64 6f 5f 65 78 65 63 73  ly}}..  do_execs
0760: 71 6c 5f 74 65 73 74 20 32 2e 24 69 2e 32 20 7b  ql_test 2.$i.2 {
0770: 0a 20 20 20 20 50 52 41 47 4d 41 20 6d 61 69 6e  .    PRAGMA main
0780: 2e 69 6e 74 65 67 72 69 74 79 5f 63 68 65 63 6b  .integrity_check
0790: 3b 0a 20 20 20 20 50 52 41 47 4d 41 20 61 75 78  ;.    PRAGMA aux
07a0: 2e 69 6e 74 65 67 72 69 74 79 5f 63 68 65 63 6b  .integrity_check
07b0: 3b 0a 20 20 7d 20 7b 6f 6b 20 6f 6b 7d 0a 7d 0a  ;.  } {ok ok}.}.
07c0: 0a 63 61 74 63 68 20 7b 20 64 62 20 63 6c 6f 73  .catch { db clos
07d0: 65 20 7d 0a 73 71 6c 69 74 65 33 5f 6d 75 6c 74  e }.sqlite3_mult
07e0: 69 70 6c 65 78 5f 73 68 75 74 64 6f 77 6e 0a 66  iplex_shutdown.f
07f0: 69 6e 69 73 68 5f 74 65 73 74 0a                 inish_test.