| isdir ↔ false, inode.directory ↔ isdir, err = EACCESS, err0 = ESUCCESS, err1 = ESUCCESS, ino = ino0, inode = getinode(ino, dirs, files), mode = MODE_W, pageno = 0, afs-cons(dirs, files), ispath(p, ROOT_INO, ino0, dirs, files), of-cons(of, dirs, files), pre-iget(ino, dirs, files), px-parent(user, p, ROOT_INO, dirs, files), (mode = MODE_R ∨ mode = MODE_RW) ∧ ¬ pr(user, inode.meta) ∨ (mode = MODE_W ∨ mode = MODE_RW) ∧ ¬ pw(user, inode.meta) ⊦ ⟪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)) |
inode.directory ↔ isdir, isdir ↔ false, err = EACCESS, err0 = ESUCCESS, err1 = ESUCCESS, ino = ino0, inode = getinode(ino, dirs, files), mode = MODE_W, pageno = 0, afs-cons(dirs, files), ispath(p, ROOT_INO, ino0, dirs, files), of-cons(of, dirs, files), pre-iget(ino, dirs, files), px-parent(user, p, ROOT_INO, dirs, files), (mode = MODE_R ∨ mode = MODE_RW) ∧ ¬ pr(user, inode.meta) ∨ (mode = MODE_W ∨ mode = MODE_RW) ∧ ¬ pw(user, inode.meta) ⊦ ⟪skip; 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))
Used simplifier rules: ⊦ ESUCCESS ≠ EACCESS; (s)