gitlab.com/CoiaPrant/sqlite3@v1.19.1/testdata/tcl/mallocM.test (about) 1 # 2017 March 13 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 # Further OOM tests. 12 # 13 14 set testdir [file dirname $argv0] 15 source $testdir/tester.tcl 16 source $testdir/malloc_common.tcl 17 set testprefix mallocM 18 19 sqlite3_db_config_lookaside db 0 0 0 20 21 do_execsql_test 1.0 { 22 CREATE TABLE t1(x); 23 } 24 do_faultsim_test 1 -faults oom* -body { 25 execsql { 26 SELECT 'abc' FROM ( SELECT 'xyz' FROM t1 WHERE (SELECT 1) ) 27 } 28 } -test { 29 faultsim_test_result {0 {}} 30 } 31 32 do_execsql_test 2.0.1 { SELECT instr(x'', x'') } {1} 33 do_execsql_test 2.0.2 { SELECT instr(x'12345678', x'') } {1} 34 do_execsql_test 2.0.3 { SELECT instr(x'', x'1234') } {0} 35 36 do_faultsim_test 2.1 -faults oom* -body { 37 execsql { SELECT instr (x'00', zeroblob(1)) } 38 } -test { 39 faultsim_test_result {0 1} 40 } 41 42 do_faultsim_test 2.2 -faults oom* -body { 43 execsql { SELECT instr (zeroblob(1), x'00') } 44 } -test { 45 faultsim_test_result {0 1} 46 } 47 48 finish_test