/ Hex Artifact Content
Login
☰Home Timeline Branches
Download

Artifact 1a110aa3ce1e8384ab69a8463d08fd735789b62fa7808d55d4ee45406f42e084:

0000: 23 20 32 30 31 38 2d 31 32 2d 30 37 0a 23 0a 23  # 2018-12-07.#.#
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 20 20  QLite library.  
01a0: 54 68 65 0a 23 20 66 6f 63 75 73 20 6f 66 20 74  The.# focus of t
01b0: 68 69 73 20 66 69 6c 65 20 69 73 20 74 65 73 74  his file is test
01c0: 69 6e 67 20 74 68 65 20 56 41 43 55 55 4d 20 49  ing the VACUUM I
01d0: 4e 54 4f 20 73 74 61 74 65 6d 65 6e 74 2e 0a 23  NTO statement..#
01e0: 0a 0a 73 65 74 20 74 65 73 74 64 69 72 20 5b 66  ..set testdir [f
01f0: 69 6c 65 20 64 69 72 6e 61 6d 65 20 24 61 72 67  ile dirname $arg
0200: 76 30 5d 0a 73 6f 75 72 63 65 20 24 74 65 73 74  v0].source $test
0210: 64 69 72 2f 74 65 73 74 65 72 2e 74 63 6c 0a 0a  dir/tester.tcl..
0220: 23 20 49 66 20 74 68 65 20 56 41 43 55 55 4d 20  # If the VACUUM 
0230: 73 74 61 74 65 6d 65 6e 74 20 69 73 20 64 69 73  statement is dis
0240: 61 62 6c 65 64 20 69 6e 20 74 68 65 20 63 75 72  abled in the cur
0250: 72 65 6e 74 20 62 75 69 6c 64 2c 20 73 6b 69 70  rent build, skip
0260: 20 61 6c 6c 0a 23 20 74 68 65 20 74 65 73 74 73   all.# the tests
0270: 20 69 6e 20 74 68 69 73 20 66 69 6c 65 2e 0a 23   in this file..#
0280: 0a 69 66 63 61 70 61 62 6c 65 20 7b 21 76 61 63  .ifcapable {!vac
0290: 75 75 6d 7d 20 7b 0a 20 20 6f 6d 69 74 5f 74 65  uum} {.  omit_te
02a0: 73 74 20 76 61 63 75 75 6d 2e 74 65 73 74 20 7b  st vacuum.test {
02b0: 43 6f 6d 70 69 6c 65 64 20 77 69 74 68 20 53 51  Compiled with SQ
02c0: 4c 49 54 45 5f 4f 4d 49 54 5f 56 41 43 55 55 4d  LITE_OMIT_VACUUM
02d0: 7d 0a 20 20 66 69 6e 69 73 68 5f 74 65 73 74 0a  }.  finish_test.
02e0: 20 20 72 65 74 75 72 6e 0a 7d 0a 0a 66 6f 72 63    return.}..forc
02f0: 65 64 65 6c 65 74 65 20 6f 75 74 2e 64 62 0a 64  edelete out.db.d
0300: 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74 20 76  o_execsql_test v
0310: 61 63 75 75 6d 2d 69 6e 74 6f 2d 31 30 30 20 7b  acuum-into-100 {
0320: 0a 20 20 43 52 45 41 54 45 20 54 41 42 4c 45 20  .  CREATE TABLE 
0330: 74 31 28 61 20 49 4e 54 45 47 45 52 20 50 52 49  t1(a INTEGER PRI
0340: 4d 41 52 59 20 4b 45 59 2c 20 62 29 3b 0a 20 20  MARY KEY, b);.  
0350: 57 49 54 48 20 52 45 43 55 52 53 49 56 45 20 63  WITH RECURSIVE c
0360: 28 78 29 20 41 53 20 28 56 41 4c 55 45 53 28 31  (x) AS (VALUES(1
0370: 29 20 55 4e 49 4f 4e 20 41 4c 4c 20 53 45 4c 45  ) UNION ALL SELE
0380: 43 54 20 78 2b 31 20 46 52 4f 4d 20 63 20 57 48  CT x+1 FROM c WH
0390: 45 52 45 20 78 3c 31 30 30 29 0a 20 20 49 4e 53  ERE x<100).  INS
03a0: 45 52 54 20 49 4e 54 4f 20 74 31 28 61 2c 62 29  ERT INTO t1(a,b)
03b0: 20 53 45 4c 45 43 54 20 78 2c 20 72 61 6e 64 6f   SELECT x, rando
03c0: 6d 62 6c 6f 62 28 36 30 30 29 20 46 52 4f 4d 20  mblob(600) FROM 
03d0: 63 3b 0a 20 20 43 52 45 41 54 45 20 49 4e 44 45  c;.  CREATE INDE
03e0: 58 20 74 31 62 20 4f 4e 20 74 31 28 62 29 3b 0a  X t1b ON t1(b);.
03f0: 20 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 74 31    DELETE FROM t1
0400: 20 57 48 45 52 45 20 61 25 32 3b 0a 20 20 53 45   WHERE a%2;.  SE
0410: 4c 45 43 54 20 63 6f 75 6e 74 28 2a 29 2c 20 73  LECT count(*), s
0420: 75 6d 28 61 29 2c 20 73 75 6d 28 6c 65 6e 67 74  um(a), sum(lengt
0430: 68 28 62 29 29 20 46 52 4f 4d 20 74 31 3b 0a 7d  h(b)) FROM t1;.}
0440: 20 7b 35 30 20 32 35 35 30 20 33 30 30 30 30 7d   {50 2550 30000}
0450: 0a 64 6f 5f 65 78 65 63 73 71 6c 5f 74 65 73 74  .do_execsql_test
0460: 20 76 61 63 75 75 6d 2d 69 6e 74 6f 2d 31 31 30   vacuum-into-110
0470: 20 7b 0a 20 20 56 41 43 55 55 4d 20 6d 61 69 6e   {.  VACUUM main
0480: 20 49 4e 54 4f 20 27 6f 75 74 2e 64 62 27 3b 0a   INTO 'out.db';.
0490: 7d 20 7b 7d 0a 73 71 6c 69 74 65 33 20 64 62 32  } {}.sqlite3 db2
04a0: 20 6f 75 74 2e 64 62 0a 64 6f 5f 74 65 73 74 20   out.db.do_test 
04b0: 76 61 63 75 75 6d 2d 69 6e 74 6f 2d 31 32 30 20  vacuum-into-120 
04c0: 7b 0a 20 20 64 62 32 20 65 76 61 6c 20 7b 53 45  {.  db2 eval {SE
04d0: 4c 45 43 54 20 63 6f 75 6e 74 28 2a 29 2c 20 73  LECT count(*), s
04e0: 75 6d 28 61 29 2c 20 73 75 6d 28 6c 65 6e 67 74  um(a), sum(lengt
04f0: 68 28 62 29 29 20 46 52 4f 4d 20 74 31 7d 0a 7d  h(b)) FROM t1}.}
0500: 20 7b 35 30 20 32 35 35 30 20 33 30 30 30 30 7d   {50 2550 30000}
0510: 0a 64 6f 5f 63 61 74 63 68 73 71 6c 5f 74 65 73  .do_catchsql_tes
0520: 74 20 76 61 63 75 75 6d 2d 69 6e 74 6f 2d 31 33  t vacuum-into-13
0530: 30 20 7b 0a 20 20 56 41 43 55 55 4d 20 49 4e 54  0 {.  VACUUM INT
0540: 4f 20 27 6f 75 74 2e 64 62 27 3b 0a 7d 20 7b 31  O 'out.db';.} {1
0550: 20 7b 6f 75 74 70 75 74 20 66 69 6c 65 20 61 6c   {output file al
0560: 72 65 61 64 79 20 65 78 69 73 74 73 7d 7d 0a 66  ready exists}}.f
0570: 6f 72 63 65 64 65 6c 65 74 65 20 6f 75 74 32 2e  orcedelete out2.
0580: 64 62 0a 64 6f 5f 63 61 74 63 68 73 71 6c 5f 74  db.do_catchsql_t
0590: 65 73 74 20 76 61 63 75 75 6d 2d 69 6e 74 6f 2d  est vacuum-into-
05a0: 31 34 30 20 7b 0a 20 20 56 41 43 55 55 4d 20 49  140 {.  VACUUM I
05b0: 4e 54 4f 20 27 6f 75 74 32 2e 64 62 27 3b 0a 7d  NTO 'out2.db';.}
05c0: 20 7b 30 20 7b 7d 7d 0a 64 6f 5f 63 61 74 63 68   {0 {}}.do_catch
05d0: 73 71 6c 5f 74 65 73 74 20 76 61 63 75 75 6d 2d  sql_test vacuum-
05e0: 69 6e 74 6f 2d 31 35 30 20 7b 0a 20 20 56 41 43  into-150 {.  VAC
05f0: 55 55 4d 20 49 4e 54 4f 20 27 6f 75 74 32 2e 64  UUM INTO 'out2.d
0600: 62 27 3b 0a 7d 20 7b 31 20 7b 6f 75 74 70 75 74  b';.} {1 {output
0610: 20 66 69 6c 65 20 61 6c 72 65 61 64 79 20 65 78   file already ex
0620: 69 73 74 73 7d 7d 0a 0a 64 6f 5f 63 61 74 63 68  ists}}..do_catch
0630: 73 71 6c 5f 74 65 73 74 20 76 61 63 75 75 6d 2d  sql_test vacuum-
0640: 69 6e 74 6f 2d 32 30 30 20 7b 0a 20 20 56 41 43  into-200 {.  VAC
0650: 55 55 4d 20 6d 61 69 6e 20 49 4e 54 4f 20 27 3a  UUM main INTO ':
0660: 6d 65 6d 6f 72 79 3a 27 3b 0a 7d 20 7b 30 20 7b  memory:';.} {0 {
0670: 7d 7d 0a 0a 23 20 54 68 65 20 49 4e 54 4f 20 61  }}..# The INTO a
0680: 72 67 75 6d 65 6e 74 20 63 61 6e 20 62 65 20 61  rgument can be a
0690: 6e 20 61 72 62 69 74 72 61 72 79 20 65 78 70 72  n arbitrary expr
06a0: 65 73 73 69 6f 6e 2e 0a 23 0a 64 6f 5f 65 78 65  ession..#.do_exe
06b0: 63 73 71 6c 5f 74 65 73 74 20 76 61 63 75 75 6d  csql_test vacuum
06c0: 2d 69 6e 74 6f 2d 33 30 30 20 7b 0a 20 20 43 52  -into-300 {.  CR
06d0: 45 41 54 45 20 54 41 42 4c 45 20 74 32 28 6e 61  EATE TABLE t2(na
06e0: 6d 65 20 54 45 58 54 29 3b 0a 20 20 49 4e 53 45  me TEXT);.  INSE
06f0: 52 54 20 49 4e 54 4f 20 74 32 20 56 41 4c 55 45  RT INTO t2 VALUE
0700: 53 28 27 3a 6d 65 6d 6f 72 79 3a 27 29 3b 0a 20  S(':memory:');. 
0710: 20 56 41 43 55 55 4d 20 6d 61 69 6e 20 49 4e 54   VACUUM main INT
0720: 4f 20 28 53 45 4c 45 43 54 20 6e 61 6d 65 20 46  O (SELECT name F
0730: 52 4f 4d 20 74 32 29 3b 0a 7d 20 7b 7d 0a 64 6f  ROM t2);.} {}.do
0740: 5f 63 61 74 63 68 73 71 6c 5f 74 65 73 74 20 76  _catchsql_test v
0750: 61 63 75 75 6d 2d 69 6e 74 6f 2d 33 31 30 20 7b  acuum-into-310 {
0760: 0a 20 20 56 41 43 55 55 4d 20 49 4e 54 4f 20 6e  .  VACUUM INTO n
0770: 75 6c 6c 3b 0a 7d 20 7b 31 20 7b 6e 6f 6e 2d 74  ull;.} {1 {non-t
0780: 65 78 74 20 66 69 6c 65 6e 61 6d 65 7d 7d 0a 64  ext filename}}.d
0790: 6f 5f 63 61 74 63 68 73 71 6c 5f 74 65 73 74 20  o_catchsql_test 
07a0: 76 61 63 75 75 6d 2d 69 6e 74 6f 2d 33 32 30 20  vacuum-into-320 
07b0: 7b 0a 20 20 56 41 43 55 55 4d 20 49 4e 54 4f 20  {.  VACUUM INTO 
07c0: 78 3b 0a 7d 20 7b 31 20 7b 6e 6f 20 73 75 63 68  x;.} {1 {no such
07d0: 20 63 6f 6c 75 6d 6e 3a 20 78 7d 7d 0a 7d 20 7b   column: x}}.} {
07e0: 31 20 7b 6e 6f 20 73 75 63 68 20 63 6f 6c 75 6d  1 {no such colum
07f0: 6e 3a 20 6e 6f 73 75 63 68 63 6f 6c 7d 7d 0a 64  n: nosuchcol}}.d
0800: 6f 5f 63 61 74 63 68 73 71 6c 5f 74 65 73 74 20  o_catchsql_test 
0810: 76 61 63 75 75 6d 2d 69 6e 74 6f 2d 33 33 30 20  vacuum-into-330 
0820: 7b 0a 20 20 56 41 43 55 55 4d 20 49 4e 54 4f 20  {.  VACUUM INTO 
0830: 74 31 2e 6e 6f 73 75 63 68 63 6f 6c 3b 0a 7d 20  t1.nosuchcol;.} 
0840: 7b 31 20 7b 6e 6f 20 73 75 63 68 20 63 6f 6c 75  {1 {no such colu
0850: 6d 6e 3a 20 74 31 2e 6e 6f 73 75 63 68 63 6f 6c  mn: t1.nosuchcol
0860: 7d 7d 0a 0a 66 6f 72 63 65 64 65 6c 65 74 65 20  }}..forcedelete 
0870: 74 65 73 74 2e 64 62 32 0a 64 62 20 66 75 6e 63  test.db2.db func
0880: 20 74 61 72 67 65 74 20 74 61 72 67 65 74 0a 70   target target.p
0890: 72 6f 63 20 74 61 72 67 65 74 20 7b 7d 20 7b 20  roc target {} { 
08a0: 72 65 74 75 72 6e 20 22 74 65 73 74 2e 64 62 32  return "test.db2
08b0: 22 20 7d 0a 64 6f 5f 74 65 73 74 20 76 61 63 75  " }.do_test vacu
08c0: 75 6d 2d 69 6e 74 6f 2d 34 31 30 20 7b 0a 20 20  um-into-410 {.  
08d0: 65 78 65 63 73 71 6c 20 7b 20 56 41 43 55 55 4d  execsql { VACUUM
08e0: 20 49 4e 54 4f 20 74 61 72 67 65 74 28 29 20 7d   INTO target() }
08f0: 0a 20 20 66 69 6c 65 20 65 78 69 73 74 73 20 74  .  file exists t
0900: 65 73 74 2e 64 62 32 0a 7d 20 31 0a 64 6f 5f 63  est.db2.} 1.do_c
0910: 61 74 63 68 73 71 6c 5f 74 65 73 74 20 76 61 63  atchsql_test vac
0920: 75 75 6d 2d 69 6e 74 6f 2d 34 32 30 20 7b 0a 20  uum-into-420 {. 
0930: 20 56 41 43 55 55 4d 20 49 4e 54 4f 20 74 61 72   VACUUM INTO tar
0940: 67 65 74 32 28 29 0a 7d 20 7b 31 20 7b 6e 6f 20  get2().} {1 {no 
0950: 73 75 63 68 20 66 75 6e 63 74 69 6f 6e 3a 20 74  such function: t
0960: 61 72 67 65 74 32 7d 7d 0a 0a 0a 66 69 6e 69 73  arget2}}...finis
0970: 68 5f 74 65 73 74 0a                             h_test.
This page was generated in about 0.004s by Fossil 2.14 [39b114c19f] 2020-11-24 00:10:53