Index: third_party/sqlite/sqlite-src-3070603/test/mallocB.test |
diff --git a/third_party/sqlite/sqlite-src-3070603/test/mallocB.test b/third_party/sqlite/sqlite-src-3070603/test/mallocB.test |
new file mode 100644 |
index 0000000000000000000000000000000000000000..73468b5099f2967d2f34af11602fe9109489c1a1 |
--- /dev/null |
+++ b/third_party/sqlite/sqlite-src-3070603/test/mallocB.test |
@@ -0,0 +1,51 @@ |
+# 2007 May 30 |
+# |
+# The author disclaims copyright to this source code. In place of |
+# a legal notice, here is a blessing: |
+# |
+# May you do good and not evil. |
+# May you find forgiveness for yourself and forgive others. |
+# May you share freely, never taking more than you give. |
+# |
+#*********************************************************************** |
+# This file contains additional out-of-memory checks (see malloc.tcl). |
+# These were all discovered by fuzzy generation of SQL. Apart from |
+# that they have little in common. |
+# |
+# |
+# $Id: mallocB.test,v 1.9 2008/02/18 22:24:58 drh Exp $ |
+ |
+set testdir [file dirname $argv0] |
+source $testdir/tester.tcl |
+source $testdir/malloc_common.tcl |
+ |
+# Only run these tests if memory debugging is turned on. |
+# |
+if {!$MEMDEBUG} { |
+ puts "Skipping mallocB tests: not compiled with -DSQLITE_MEMDEBUG..." |
+ finish_test |
+ return |
+} |
+source $testdir/malloc_common.tcl |
+ |
+do_malloc_test mallocB-1 -sqlbody {SELECT - 456} |
+do_malloc_test mallocB-2 -sqlbody {SELECT - 456.1} |
+do_malloc_test mallocB-3 -sqlbody {SELECT random()} |
+do_malloc_test mallocB-4 -sqlbody {SELECT length(zeroblob(1000))} |
+ifcapable subquery { |
+ do_malloc_test mallocB-5 -sqlbody {SELECT * FROM (SELECT 1) GROUP BY 1;} |
+} |
+ |
+# The following test checks that there are no resource leaks following a |
+# malloc() failure in sqlite3_set_auxdata(). |
+# |
+# Note: This problem was not discovered by fuzzy generation of SQL. Not |
+# that it really matters. |
+# |
+do_malloc_test mallocB-6 -sqlbody { SELECT test_auxdata('hello world'); } |
+ |
+do_malloc_test mallocB-7 -sqlbody { |
+ SELECT strftime(hex(randomblob(50)) || '%Y', 'now') |
+} |
+ |
+finish_test |