Lines Matching refs:file

11 # This file implements regression tests for SQLite library.  The
12 # focus of this file is testing that SQLite can follow symbolic links.
15 set testdir [file dirname $argv0]
35   file link test.db2 test.db
38 } [file join [pwd] test.db]
46 } {1 {unable to open database file}}
59 # Test that if the symlink points to a file that does not exists, it is
66   file exists test.db
70   file exists test.db
74 } [file join [pwd] test.db]
81   # Note: Tcl [file link] command is too smart to create loops of symlinks.
84 } {1 {unable to open database file}}
91 } {1 {unable to open database file}}
96 } {1 {unable to open database file}}
99 # Test that journal and wal files are created next to the real file,
108   file link test.db2 test.db
109   file link test.db3 test.db2
116     file exists test.db-journal
123     file exists test.db-journal
126     list [file exists test2.db-journal] [file exists test3.db-journal]
134     file exists test.db-wal
137     list [file exists test2.db-wal] [file exists test3.db-wal]
156 } {unable to open database file}
163   file mkdir x
164   file mkdir y
165   file mkdir z
167   file link y/test.db ../x/test.db
168   file link z/test.db ../y/test.db
182   list [file exists x/test.db-wal] [file exists y/test.db-wal]
191   list [file exists x/test.db-wal] [file exists y/test.db-wal] \
192        [file exists z/test.db-wal]
197   file mkdir w
198   file link w/test.db [file join [pwd] x/test.db] 
207   list [file exists x/test.db-wal] [file exists w/test.db-wal]