OLD | NEW |
1 # 2011 March 29 | 1 # 2011 March 29 |
2 # | 2 # |
3 # The author disclaims copyright to this source code. In place of | 3 # The author disclaims copyright to this source code. In place of |
4 # a legal notice, here is a blessing: | 4 # a legal notice, here is a blessing: |
5 # | 5 # |
6 # May you do good and not evil. | 6 # May you do good and not evil. |
7 # May you find forgiveness for yourself and forgive others. | 7 # May you find forgiveness for yourself and forgive others. |
8 # May you share freely, never taking more than you give. | 8 # May you share freely, never taking more than you give. |
9 # | 9 # |
10 #*********************************************************************** | 10 #*********************************************************************** |
(...skipping 41 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
52 # | 52 # |
53 do_test 2.1.1 { test_syscall exists open } 1 | 53 do_test 2.1.1 { test_syscall exists open } 1 |
54 do_test 2.1.2 { test_syscall exists nosuchcall } 0 | 54 do_test 2.1.2 { test_syscall exists nosuchcall } 0 |
55 | 55 |
56 #------------------------------------------------------------------------- | 56 #------------------------------------------------------------------------- |
57 # Tests for the xNextSystemCall method. | 57 # Tests for the xNextSystemCall method. |
58 # | 58 # |
59 foreach s { | 59 foreach s { |
60 open close access getcwd stat fstat ftruncate | 60 open close access getcwd stat fstat ftruncate |
61 fcntl read pread write pwrite fchmod fallocate | 61 fcntl read pread write pwrite fchmod fallocate |
62 pread64 pwrite64 unlink openDirectory | 62 pread64 pwrite64 unlink openDirectory mkdir rmdir |
| 63 statvfs fchown umask mmap munmap mremap |
| 64 getpagesize |
63 } { | 65 } { |
64 if {[test_syscall exists $s]} {lappend syscall_list $s} | 66 if {[test_syscall exists $s]} {lappend syscall_list $s} |
65 } | 67 } |
66 do_test 3.1 { lsort [test_syscall list] } [lsort $syscall_list] | 68 do_test 3.1 { lsort [test_syscall list] } [lsort $syscall_list] |
67 | 69 |
68 #------------------------------------------------------------------------- | 70 #------------------------------------------------------------------------- |
69 # This test verifies that if a call to open() fails and errno is set to | 71 # This test verifies that if a call to open() fails and errno is set to |
70 # EINTR, the call is retried. If it succeeds, execution continues as if | 72 # EINTR, the call is retried. If it succeeds, execution continues as if |
71 # nothing happened. | 73 # nothing happened. |
72 # | 74 # |
(...skipping 194 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
267 5 49 64 | 269 5 49 64 |
268 } { | 270 } { |
269 do_test 8.4.$tn { | 271 do_test 8.4.$tn { |
270 file_control_sizehint_test db main $hint | 272 file_control_sizehint_test db main $hint |
271 file size test.db | 273 file size test.db |
272 } $size | 274 } $size |
273 } | 275 } |
274 | 276 |
275 test_syscall reset | 277 test_syscall reset |
276 finish_test | 278 finish_test |
OLD | NEW |