| ⟨vfs_walk#(p, user, dirs, files, asynced; ino1, err0)⟩ (ino1 = ino0 ∧ err0 = ESUCCESS), isdir ↔ false, inode.directory ↔ isdir, err = ESUCCESS, err0 = ESUCCESS, ino = ino0, ino1 = ROOT_INO, inode = getinode(ino, dirs, files), mode = MODE_R, 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) ⊦ ⟪afs_fsync#(inode, isdir0, dirs, files; ; asynced, err); if err = ESUCCESS then afs_sync#(dirs, files; ; asynced, err)⟫ true, (mode = MODE_R ∨ mode = MODE_RW) ∧ ¬ pr(user, inode.meta), (mode = MODE_W ∨ mode = MODE_RW) ∧ ¬ pw(user, inode.meta) |
⟨vfs_walk#(p, user, dirs, files, asynced; ino1, err)⟩ (ino1 = ino0 ∧ err = ESUCCESS), err = ESUCCESS, ino1 = ROOT_INO, afs-cons(dirs, files), ispath(p, ROOT_INO, ino0, dirs, files), of-cons(of, dirs, files), pr(user, files[ino0].meta), px-parent(user, p, ROOT_INO, dirs, files), ino0 ∈ files, ¬ ino0 ∈ dirs ⊦ ⟪afs_fsync#(mkinode(ino0, files[ino0].meta, false, files[ino0].nlink, 0, files[ino0].size), isdir0, dirs, files; ; asynced, err); if err = ESUCCESS then afs_sync#(dirs, files; ; asynced, err)⟫ true
Used simplifier rules: path-in-end: ⊦ ispath(p, n, m, dirs, files) ∧ ¬ m ∈ files → m ∈ dirs; (forward) from specification afs-base% ⊦ mkinode(m, md, boolvar, m0, m1, m2).meta = md; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).directory ↔ boolvar; (s)% ⊦ MODE_R ≠ MODE_RW; (s)% ⊦ MODE_R ≠ MODE_W; (s)% ⊦ valid-ino(ino, dirs, files) ↔ ino ∈ dirs ∨ ino ∈ files; (s)% ⊦ pre-iget(ino, dirs, files) ↔ valid-ino(ino, dirs, files); (s)%⊦ getinode(ino, dirs, files) = (ino ∈ dirs ⊃ mkinode (ino, dirs[ino].meta, true, dirs[ino].nlink, dirs[ino].nsubdirs, dirs[ino].size) ;mkinode (ino, files[ino].meta, false, files[ino].nlink, 0, files[ino].size) ); (s)