/ Hex Artifact Content
Login

Artifact 5f653159e0f552f0552d43259890c1089391dcca:


0000: 23 20 32 30 31 33 2d 30 37 2d 31 31 0a 23 0a 23  # 2013-07-11.#.#
0010: 20 54 68 65 20 61 75 74 68 6f 72 20 64 69 73 63   The author disc
0020: 6c 61 69 6d 73 20 63 6f 70 79 72 69 67 68 74 20  laims copyright 
0030: 74 6f 20 74 68 69 73 20 73 6f 75 72 63 65 20 63  to this source c
0040: 6f 64 65 2e 20 20 49 6e 20 70 6c 61 63 65 20 6f  ode.  In place o
0050: 66 0a 23 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69  f.# a legal noti
0060: 63 65 2c 20 68 65 72 65 20 69 73 20 61 20 62 6c  ce, here is a bl
0070: 65 73 73 69 6e 67 3a 0a 23 0a 23 20 20 20 20 4d  essing:.#.#    M
0080: 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61  ay you do good a
0090: 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 23 20 20  nd not evil..#  
00a0: 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 66    May you find f
00b0: 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 79  orgiveness for y
00c0: 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 67  ourself and forg
00d0: 69 76 65 20 6f 74 68 65 72 73 2e 0a 23 20 20 20  ive others..#   
00e0: 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20 66   May you share f
00f0: 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61 6b  reely, never tak
0100: 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79 6f  ing more than yo
0110: 75 20 67 69 76 65 2e 0a 23 0a 23 2a 2a 2a 2a 2a  u 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 0a 23 20 54 68 69 73 20 66 69 6c 65 20 69  **.# This file i
0170: 6d 70 6c 65 6d 65 6e 74 73 20 72 65 67 72 65 73  mplements regres
0180: 73 69 6f 6e 20 74 65 73 74 73 20 66 6f 72 20 53  sion tests for S
0190: 51 4c 69 74 65 20 6c 69 62 72 61 72 79 2e 0a 23  QLite library..#
01a0: 0a 23 20 54 68 69 73 20 66 69 6c 65 20 74 65 73  .# This file tes
01b0: 74 73 20 74 68 65 20 22 71 75 65 72 79 5f 6f 6e  ts the "query_on
01c0: 6c 79 22 20 70 72 61 67 6d 61 2e 0a 23 0a 0a 73  ly" pragma..#..s
01d0: 65 74 20 74 65 73 74 64 69 72 20 5b 66 69 6c 65  et testdir [file
01e0: 20 64 69 72 6e 61 6d 65 20 24 61 72 67 76 30 5d   dirname $argv0]
01f0: 0a 73 6f 75 72 63 65 20 24 74 65 73 74 64 69 72  .source $testdir
0200: 2f 74 65 73 74 65 72 2e 74 63 6c 0a 0a 64 6f 5f  /tester.tcl..do_
0210: 65 78 65 63 73 71 6c 5f 74 65 73 74 20 71 75 65  execsql_test que
0220: 72 79 6f 6e 6c 79 2d 31 2e 31 20 7b 0a 20 20 43  ryonly-1.1 {.  C
0230: 52 45 41 54 45 20 54 41 42 4c 45 20 74 31 28 61  REATE TABLE t1(a
0240: 29 3b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f  );.  INSERT INTO
0250: 20 74 31 20 56 41 4c 55 45 53 28 31 32 33 29 2c   t1 VALUES(123),
0260: 28 34 35 36 29 3b 0a 20 20 53 45 4c 45 43 54 20  (456);.  SELECT 
0270: 61 20 46 52 4f 4d 20 74 31 20 4f 52 44 45 52 20  a FROM t1 ORDER 
0280: 42 59 20 61 3b 0a 7d 20 7b 31 32 33 20 34 35 36  BY a;.} {123 456
0290: 7d 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73  }.do_execsql_tes
02a0: 74 20 71 75 65 72 79 6f 6e 6c 79 2d 31 2e 32 20  t queryonly-1.2 
02b0: 7b 0a 20 20 50 52 41 47 4d 41 20 71 75 65 72 79  {.  PRAGMA query
02c0: 5f 6f 6e 6c 79 3b 0a 7d 20 7b 30 7d 0a 64 6f 5f  _only;.} {0}.do_
02d0: 65 78 65 63 73 71 6c 5f 74 65 73 74 20 71 75 65  execsql_test que
02e0: 72 79 6f 6e 6c 79 2d 31 2e 33 20 7b 0a 20 20 50  ryonly-1.3 {.  P
02f0: 52 41 47 4d 41 20 71 75 65 72 79 5f 6f 6e 6c 79  RAGMA query_only
0300: 3d 4f 4e 3b 0a 20 20 50 52 41 47 4d 41 20 71 75  =ON;.  PRAGMA qu
0310: 65 72 79 5f 6f 6e 6c 79 3b 0a 7d 20 7b 31 7d 0a  ery_only;.} {1}.
0320: 64 6f 5f 74 65 73 74 20 71 75 65 72 79 6f 6e 6c  do_test queryonl
0330: 79 2d 31 2e 34 20 7b 0a 20 20 63 61 74 63 68 73  y-1.4 {.  catchs
0340: 71 6c 20 7b 49 4e 53 45 52 54 20 49 4e 54 4f 20  ql {INSERT INTO 
0350: 74 31 20 56 41 4c 55 45 53 28 37 38 39 29 3b 7d  t1 VALUES(789);}
0360: 0a 7d 20 7b 31 20 7b 61 74 74 65 6d 70 74 20 74  .} {1 {attempt t
0370: 6f 20 77 72 69 74 65 20 61 20 72 65 61 64 6f 6e  o write a readon
0380: 6c 79 20 64 61 74 61 62 61 73 65 7d 7d 0a 64 6f  ly database}}.do
0390: 5f 74 65 73 74 20 71 75 65 72 79 6f 6e 6c 79 2d  _test queryonly-
03a0: 31 2e 35 20 7b 0a 20 20 63 61 74 63 68 73 71 6c  1.5 {.  catchsql
03b0: 20 7b 44 45 4c 45 54 45 20 46 52 4f 4d 20 74 31   {DELETE FROM t1
03c0: 3b 7d 0a 7d 20 7b 31 20 7b 61 74 74 65 6d 70 74  ;}.} {1 {attempt
03d0: 20 74 6f 20 77 72 69 74 65 20 61 20 72 65 61 64   to write a read
03e0: 6f 6e 6c 79 20 64 61 74 61 62 61 73 65 7d 7d 0a  only database}}.
03f0: 64 6f 5f 74 65 73 74 20 71 75 65 72 79 6f 6e 6c  do_test queryonl
0400: 79 2d 31 2e 36 20 7b 0a 20 20 63 61 74 63 68 73  y-1.6 {.  catchs
0410: 71 6c 20 7b 55 50 44 41 54 45 20 74 31 20 53 45  ql {UPDATE t1 SE
0420: 54 20 61 3d 61 2b 31 3b 7d 0a 7d 20 7b 31 20 7b  T a=a+1;}.} {1 {
0430: 61 74 74 65 6d 70 74 20 74 6f 20 77 72 69 74 65  attempt to write
0440: 20 61 20 72 65 61 64 6f 6e 6c 79 20 64 61 74 61   a readonly data
0450: 62 61 73 65 7d 7d 0a 64 6f 5f 74 65 73 74 20 71  base}}.do_test q
0460: 75 65 72 79 6f 6e 6c 79 2d 31 2e 37 20 7b 0a 20  ueryonly-1.7 {. 
0470: 20 63 61 74 63 68 73 71 6c 20 7b 43 52 45 41 54   catchsql {CREAT
0480: 45 20 54 41 42 4c 45 20 74 32 28 62 29 3b 7d 0a  E TABLE t2(b);}.
0490: 7d 20 7b 31 20 7b 61 74 74 65 6d 70 74 20 74 6f  } {1 {attempt to
04a0: 20 77 72 69 74 65 20 61 20 72 65 61 64 6f 6e 6c   write a readonl
04b0: 79 20 64 61 74 61 62 61 73 65 7d 7d 0a 64 6f 5f  y database}}.do_
04c0: 74 65 73 74 20 71 75 65 72 79 6f 6e 6c 79 2d 31  test queryonly-1
04d0: 2e 38 20 7b 0a 20 20 63 61 74 63 68 73 71 6c 20  .8 {.  catchsql 
04e0: 7b 43 52 45 41 54 45 20 49 4e 44 45 58 20 74 31  {CREATE INDEX t1
04f0: 61 20 4f 4e 20 74 31 28 61 29 3b 7d 0a 7d 20 7b  a ON t1(a);}.} {
0500: 31 20 7b 61 74 74 65 6d 70 74 20 74 6f 20 77 72  1 {attempt to wr
0510: 69 74 65 20 61 20 72 65 61 64 6f 6e 6c 79 20 64  ite a readonly d
0520: 61 74 61 62 61 73 65 7d 7d 0a 64 6f 5f 74 65 73  atabase}}.do_tes
0530: 74 20 71 75 65 72 79 6f 6e 6c 79 2d 31 2e 39 20  t queryonly-1.9 
0540: 7b 0a 20 20 63 61 74 63 68 73 71 6c 20 7b 44 52  {.  catchsql {DR
0550: 4f 50 20 54 41 42 4c 45 20 74 31 3b 7d 0a 7d 20  OP TABLE t1;}.} 
0560: 7b 31 20 7b 61 74 74 65 6d 70 74 20 74 6f 20 77  {1 {attempt to w
0570: 72 69 74 65 20 61 20 72 65 61 64 6f 6e 6c 79 20  rite a readonly 
0580: 64 61 74 61 62 61 73 65 7d 7d 0a 64 6f 5f 74 65  database}}.do_te
0590: 73 74 20 71 75 65 72 79 6f 6e 6c 79 2d 31 2e 31  st queryonly-1.1
05a0: 30 20 7b 0a 20 20 63 61 74 63 68 73 71 6c 20 7b  0 {.  catchsql {
05b0: 41 4e 41 4c 59 5a 45 3b 7d 0a 7d 20 7b 31 20 7b  ANALYZE;}.} {1 {
05c0: 61 74 74 65 6d 70 74 20 74 6f 20 77 72 69 74 65  attempt to write
05d0: 20 61 20 72 65 61 64 6f 6e 6c 79 20 64 61 74 61   a readonly data
05e0: 62 61 73 65 7d 7d 0a 64 6f 5f 65 78 65 63 73 71  base}}.do_execsq
05f0: 6c 5f 74 65 73 74 20 71 75 65 72 79 6f 6e 6c 79  l_test queryonly
0600: 2d 31 2e 31 31 20 7b 0a 20 20 53 45 4c 45 43 54  -1.11 {.  SELECT
0610: 20 61 20 46 52 4f 4d 20 74 31 20 4f 52 44 45 52   a FROM t1 ORDER
0620: 20 42 59 20 61 3b 0a 7d 20 7b 31 32 33 20 34 35   BY a;.} {123 45
0630: 36 7d 0a 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74  6}..do_execsql_t
0640: 65 73 74 20 71 75 65 72 79 6f 6e 6c 79 2d 32 2e  est queryonly-2.
0650: 32 20 7b 0a 20 20 50 52 41 47 4d 41 20 71 75 65  2 {.  PRAGMA que
0660: 72 79 5f 6f 6e 6c 79 3b 0a 7d 20 7b 31 7d 0a 64  ry_only;.} {1}.d
0670: 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74 20 71  o_execsql_test q
0680: 75 65 72 79 6f 6e 6c 79 2d 32 2e 33 20 7b 0a 20  ueryonly-2.3 {. 
0690: 20 50 52 41 47 4d 41 20 71 75 65 72 79 5f 6f 6e   PRAGMA query_on
06a0: 6c 79 3d 4f 46 46 3b 0a 20 20 50 52 41 47 4d 41  ly=OFF;.  PRAGMA
06b0: 20 71 75 65 72 79 5f 6f 6e 6c 79 3b 0a 7d 20 7b   query_only;.} {
06c0: 30 7d 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65  0}.do_execsql_te
06d0: 73 74 20 71 75 65 72 79 6f 6e 6c 79 2d 32 2e 34  st queryonly-2.4
06e0: 20 7b 0a 20 20 49 4e 53 45 52 54 20 49 4e 54 4f   {.  INSERT INTO
06f0: 20 74 31 20 56 41 4c 55 45 53 28 37 38 39 29 3b   t1 VALUES(789);
0700: 0a 20 20 53 45 4c 45 43 54 20 61 20 46 52 4f 4d  .  SELECT a FROM
0710: 20 74 31 20 4f 52 44 45 52 20 42 59 20 61 3b 0a   t1 ORDER BY a;.
0720: 7d 20 7b 31 32 33 20 34 35 36 20 37 38 39 7d 0a  } {123 456 789}.
0730: 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74 20  do_execsql_test 
0740: 71 75 65 72 79 6f 6e 6c 79 2d 32 2e 35 20 7b 0a  queryonly-2.5 {.
0750: 20 20 55 50 44 41 54 45 20 74 31 20 53 45 54 20    UPDATE t1 SET 
0760: 61 3d 61 2b 31 3b 0a 20 20 53 45 4c 45 43 54 20  a=a+1;.  SELECT 
0770: 61 20 46 52 4f 4d 20 74 31 20 4f 52 44 45 52 20  a FROM t1 ORDER 
0780: 42 59 20 61 3b 0a 7d 20 7b 31 32 34 20 34 35 37  BY a;.} {124 457
0790: 20 37 39 30 7d 0a 0a 66 69 6e 69 73 68 5f 74 65   790}..finish_te
07a0: 73 74 0a                                         st.