third_party/sqlite/sqlite-src-3080704/test/zerodamage.test - Issue 2363173002: [sqlite] Remove obsolete reference version 3.8.7.4.

Side by Side Diff: third_party/sqlite/sqlite-src-3080704/test/zerodamage.test

Issue 2363173002: [sqlite] Remove obsolete reference version 3.8.7.4. (Closed)

Patch Set: Created 4 years, 2 months ago

Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.

Jump to:

OLD	NEW
	(Empty)
1 # 2011 December 21

2 #

3 # The author disclaims copyright to this source code. In place of

4 # a legal notice, here is a blessing:

5 #

6 # May you do good and not evil.

7 # May you find forgiveness for yourself and forgive others.

8 # May you share freely, never taking more than you give.

9 #

10 #***********************************************************************

11 #

12 # This file implements tests of the SQLITE_IOCAP_POWERSAFE_OVERWRITE property

13 # and the SQLITE_FCNTL_POWERSAFE_OVERWRITE file-control for manipulating it.

14 #

15 # The name of this file comes from the fact that we used to call the

16 # POWERSAFE_OVERWRITE property ZERO_DAMAGE.

17 #

18

19 set testdir [file dirname $argv0]

20 source $testdir/tester.tcl

21 set testprefix zerodamage

22

23 ifcapable !vtab {

24 finish_test

25 return

26 }

27

28 # POWERSAFE_OVERWRITE defaults to true

29 #

30 do_test zerodamage-1.0 {

31 file_control_powersafe_overwrite db -1

32 } {0 1}

33

34 # Check the ability to turn zero-damage on and off.

35 #

36 do_test zerodamage-1.1 {

37 file_control_powersafe_overwrite db 0

38 file_control_powersafe_overwrite db -1

39 } {0 0}

40 do_test zerodamage-1.2 {

41 file_control_powersafe_overwrite db 1

42 file_control_powersafe_overwrite db -1

43 } {0 1}

44

45 # Run a transaction with zero-damage on, a small page size and a much larger

46 # sectorsize. Verify that the maximum journal size is small - that the

47 # rollback journal is not being padded.

48 #

49 do_test zerodamage-2.0 {

50 db close

51 testvfs tv -default 1

52 tv sectorsize 8192

53 sqlite3 db file:test.db?psow=TRUE -uri 1

54 unset -nocomplain ::max_journal_size

55 set ::max_journal_size 0

56 proc xDeleteCallback {method file args} {

57 set sz [file size $file]

58 if {$sz>$::max_journal_size} {set ::max_journal_size $sz}

59 }

60 tv filter xDelete

61 tv script xDeleteCallback

62 load_static_extension db wholenumber

63 db eval {

64 PRAGMA page_size=1024;

65 PRAGMA journal_mode=DELETE;

66 PRAGMA cache_size=5;

67 CREATE VIRTUAL TABLE nums USING wholenumber;

68 CREATE TABLE t1(x, y);

69 INSERT INTO t1 SELECT value, randomblob(100) FROM nums

70 WHERE value BETWEEN 1 AND 400;

71 }

72 set ::max_journal_size 0

73 db eval {

74 UPDATE t1 SET y=randomblob(50) WHERE x=123;

75 }

76 concat [file_control_powersafe_overwrite db -1] [set ::max_journal_size]

77 } {0 1 2576}

78

79 # Repeat the previous step with zero-damage turned off. This time the

80 # maximum rollback journal size should be much larger.

81 #

82 do_test zerodamage-2.1 {

83 set ::max_journal_size 0

84 db close

85 sqlite3 db file:test.db?psow=FALSE -uri 1

86 db eval {

87 UPDATE t1 SET y=randomblob(50) WHERE x=124;

88 }

89 concat [file_control_powersafe_overwrite db -1] [set ::max_journal_size]

90 } {0 0 24704}

91

92 ifcapable wal {

93 # Run a WAL-mode transaction with POWERSAFE_OVERWRITE on to verify that the

94 # WAL file does not get too big.

95 #

96 do_test zerodamage-3.0 {

97 db eval {

98 PRAGMA journal_mode=WAL;

99 }

100 db close

101 sqlite3 db file:test.db?psow=TRUE -uri 1

102 db eval {

103 UPDATE t1 SET y=randomblob(50) WHERE x=124;

104 }

105 file size test.db-wal

106 } {1080}

107

108 # Repeat the previous with POWERSAFE_OVERWRITE off. Verify that the WAL file

109 # is padded.

110 #

111 do_test zerodamage-3.1 {

112 db close

113 sqlite3 db file:test.db?psow=FALSE -uri 1

114 db eval {

115 UPDATE t1 SET y=randomblob(50) WHERE x=124;

116 }

117 file size test.db-wal

118 } {16800}

119 }

120

121 finish_test

OLD	NEW