| ino = ROOT_INO, afs-cons(dirs, files), of-cons(of, dirs, files) ⊦ ∀ ino, err. ⌊err⌋ ∨ err = ESUCCESS ∧ ispath(p, ROOT_INO, ino, dirs, files) ∧ px-parent(user, p, ROOT_INO, dirs, files) ∨ err = ENOENT ∧ ¬ ispath(p, ROOT_INO, dirs, files) ∨ err = EACCESS ∧ p ≠ ε ∧ (∃ p'. p' ⊑ parent(p) ∧ ispath(p', ROOT_INO, dirs, files) ∧ ¬ px(user, p', ROOT_INO, dirs, files)) → ⟪if err = ESUCCESS then let isdir = false in vfs_may_open#(ino, isdir, MODE_W, user, dirs, files, asynced; inode, err); if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced); pageno := 0; if err = ESUCCESS then pageno := inode.size / VFS_PAGE_SIZE; if err = ESUCCESS then {buf-opt := none; afs_truncate#(n, pageno; buf-opt, inode, isdir0, err, dirs, files, asynced)}⟫ (of-cons(of, dirs, files) ∧ afs-cons(dirs, files)) |
afs-cons(dirs, files), of-cons(of, dirs, files), ⌊err⌋ ∨ err = ESUCCESS ∧ ispath(p, ROOT_INO, ino0, dirs, files) ∧ px-parent(user, p, ROOT_INO, dirs, files) ∨ err = ENOENT ∧ ¬ ispath(p, ROOT_INO, dirs, files) ∨ err = EACCESS ∧ p ≠ ε ∧ p' ⊑ parent(p) ∧ ispath(p', ROOT_INO, dirs, files) ∧ ¬ px(user, p', ROOT_INO, dirs, files) ⊦ ⟪if err = ESUCCESS then let isdir = false in vfs_may_open#(ino0, isdir, MODE_W, user, dirs, files, asynced; inode, err); if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced); pageno := 0; if err = ESUCCESS then pageno := inode.size / VFS_PAGE_SIZE; if err = ESUCCESS then {buf-opt := none; afs_truncate#(n, pageno; buf-opt, inode, isdir0, err, dirs, files, asynced)}⟫ (of-cons(of, dirs, files) ∧ afs-cons(dirs, files))