1: # 2011 June 21
2: #
3: # May you do good and not evil.
4: # May you find forgiveness for yourself and forgive others.
5: # May you share freely, never taking more than you give.
6: #
7: #***********************************************************************
8: #
9: # This file contains tests for SQLite. Specifically, it tests that SQLite
10: # does not crash and an error is returned if localhost() fails. This
11: # is the problem reported by ticket bd484a090c.
12: #
13:
14: set testdir [file dirname $argv0]
15: source $testdir/tester.tcl
16:
17: set testprefix tkt-bd484a090c
18:
19:
20: do_test 1.1 {
21: lindex [catchsql { SELECT datetime('now', 'localtime') }] 0
22: } {0}
23: do_test 1.2 {
24: lindex [catchsql { SELECT datetime('now', 'utc') }] 0
25: } {0}
26:
27: sqlite3_test_control SQLITE_TESTCTRL_LOCALTIME_FAULT 1
28:
29: do_test 2.1 {
30: catchsql { SELECT datetime('now', 'localtime') }
31: } {1 {local time unavailable}}
32: do_test 2.2 {
33: catchsql { SELECT datetime('now', 'utc') }
34: } {1 {local time unavailable}}
35:
36: sqlite3_test_control SQLITE_TESTCTRL_LOCALTIME_FAULT 0
37:
38: finish_test
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>