| # entries0 = m0 + 1, # links(entries0[str], dirs0) = m + 1, files0[entries0[str]] = mkfile(m1, md1, m + 1, content0), dirs0[ino1] = mkdir(m0 + 1, md0, # links(ino1, dirs0), m3, entries0), files = files1[ino, files1[ino].size:= inode.size][ino, files1[ino, files1[ino].size:= inode.size][ino].meta:= inode.meta], files1 = files0[entries0[str], mkfile(m1, md1, m, content0)], ino = inode.ino, inode = mkinode(entries0[str], md1, false, # links(entries0[str], dirs0), 0, m1), root[q].dir?, root.dir?, dom of < ino0, abs(root, ROOT_INO)(dirs0), afs-cons(dirs0, files0), fids-cons(root, abs-files(files0), abs-of(of)), ispath(q, ROOT_INO, ino1, dirs0, files0), of-cons(of, dirs0, files0), pw(user, md0), px(user, md0), px-parent(user, q, ROOT_INO, dirs0, files0), ino ∈ files1, ino1 ∈ dirs0, entries0[str] ∈ files0, str ∈ entries0, dirs ≡ dirs0[ino1, mkdir(m0, md0, # links(ino1, dirs0), m3, entries0 -- str)], psynced → asynced0, links(ino1, dirs0) ≠ ∅ ∨ ino1 = ROOT_INO ⊦ [err := ESUCCESS; asynced := ?; vfs_put_inode#(getinode(entries0[str], dirs, files), of, asynced; err, dirs, files)] ( of-cons(of, dirs, files) ∧ afs-cons(dirs, files) → ⟨fs := abs-files(files0); posix_unlink#(q + str ', user, abs-of(of); err1, root, fs; psynced)⟩ (fs = abs-files(files) ∧ abs(root, ROOT_INO)(dirs) ∧ (psynced → asynced) ∧ err = err1)), entries0 = ∅, root[q + str '].dir?, entries0[str] ∈ dirs0 |
# links(entries0[str], dirs0) = m + 1, # entries0 = m0 + 1, dirs0[ino1] = mkdir(m0 + 1, md0, # links(ino1, dirs0), m3, entries0), files0[entries0[str]] = mkfile(m1, md1, m + 1, content0), err = ESUCCESS, files = files1[ino, files1[ino].size:= inode.size][ino, files1[ino, files1[ino].size:= inode.size][ino].meta:= inode.meta], files1 = files0[entries0[str], mkfile(m1, md1, m, content0)], ino = inode.ino, inode = mkinode(entries0[str], md1, false, # links(entries0[str], dirs0), 0, m1), root.dir?, root[q].dir?, dom of < ino0, abs(root, ROOT_INO)(dirs0), afs-cons(dirs0, files0), fids-cons(root, abs-files(files0), abs-of(of)), ispath(q, ROOT_INO, ino1, dirs0, files0), of-cons(of, dirs0, files0), pw(user, md0), px(user, md0), px-parent(user, q, ROOT_INO, dirs0, files0), str ∈ entries0, entries0[str] ∈ files0, ino1 ∈ dirs0, ino ∈ files1, dirs ≡ dirs0[ino1, mkdir(m0, md0, # links(ino1, dirs0), m3, entries0 -- str)], psynced → asynced0, links(ino1, dirs0) ≠ ∅ ∨ ino1 = ROOT_INO ⊦ [asynced := ?; vfs_put_inode#(getinode(entries0[str], dirs, files), of, asynced; err, dirs, files)] ( of-cons(of, dirs, files) ∧ afs-cons(dirs, files) → ⟨fs := abs-files(files0); posix_unlink#(q + str ', user, abs-of(of); err1, root, fs; psynced)⟩ (fs = abs-files(files) ∧ abs(root, ROOT_INO)(dirs) ∧ (psynced → asynced) ∧ err = err1)), entries0 = ∅, root[q + str '].dir?, entries0[str] ∈ dirs0