mirror of
https://github.com/sqlite/sqlite.git
synced 2025-07-30 19:03:16 +03:00
Another test for overflow in strftime(). It was not broken. (CVS 3969)
FossilOrigin-Name: 5800d0327ebc122e679ef860b58098b3c08eb709
This commit is contained in:
@ -12,7 +12,7 @@
|
||||
# This file contains tests to verify that the limits defined in
|
||||
# sqlite source file limits.h are enforced.
|
||||
#
|
||||
# $Id: sqllimits1.test,v 1.7 2007/05/10 10:46:57 danielk1977 Exp $
|
||||
# $Id: sqllimits1.test,v 1.8 2007/05/10 11:43:53 danielk1977 Exp $
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
@ -423,6 +423,21 @@ do_test sqllimits-1.11.2 {
|
||||
}
|
||||
} {1 {LIKE or GLOB pattern too complex}}
|
||||
|
||||
#--------------------------------------------------------------------
|
||||
# This test case doesn't really belong with the other limits tests.
|
||||
# It is in this file because it is taxing to run, like the limits tests.
|
||||
#
|
||||
do_test sqllimits-1.12.1 {
|
||||
set ::N [expr int(([expr pow(2,32)]/50) + 1)]
|
||||
expr (($::N*50) & 0xffffffff)<55
|
||||
} {1}
|
||||
do_test sqllimits-1.12.2 {
|
||||
set ::format "[string repeat A 60][string repeat "%J" $::N]"
|
||||
catchsql {
|
||||
SELECT strftime($::format, 1);
|
||||
}
|
||||
} {1 {string or blob too big}}
|
||||
|
||||
finish_test
|
||||
|
||||
|
||||
|
Reference in New Issue
Block a user