| # links(m, dirs) = dirs[m].nlink, dirs[m] = mkdir(dirs[m].size, md1, dirs[m].nlink, dirs[m].nsubdirs, entries), dent = negdentry(str), p_inode = mkinode(m, md0, true, dirs[m].nlink, dirs[m].nsubdirs, dirs[m].size), afs-cons(dirs, files), m ∈ dirs, ¬ str ∈ dirs[m].entries, ¬ str ∈ entries, links(m, dirs) ≠ ∅ ∨ m = ROOT_INO ⊦ ⟪ {choose ino with ¬ ino ∈ dirs ∧ ¬ ino ∈ files ∧ ino ≠ 0 in afs_create_ino#(p_inode.ino, md, ino; dent, err, dirs, files); afs_inode_sync#(p_inode; dirs, files); p_inode := getinode(p_inode.ino, dirs, files); c_inode := getinode(dent.ino, dirs, files)} or fail#(; ; err); asynced := ?⟫ afs-cons(dirs, files) |
# links(m, dirs) = dirs[m].nlink, dirs[m] = mkdir(dirs[m].size, md1, dirs[m].nlink, dirs[m].nsubdirs, entries), dent = negdentry(str), p_inode = mkinode(m, md0, true, dirs[m].nlink, dirs[m].nsubdirs, dirs[m].size), afs-cons(dirs, files), m ∈ dirs, links(m, dirs) ≠ ∅ ∨ m = ROOT_INO ⊦ ⟪choose ino with ¬ ino ∈ dirs ∧ ¬ ino ∈ files ∧ ino ≠ 0 in afs_create_ino#(p_inode.ino, md, ino; dent, err, dirs, files); afs_inode_sync#(p_inode; dirs, files); p_inode := getinode(p_inode.ino, dirs, files); c_inode := getinode(dent.ino, dirs, files); asynced := ?⟫ afs-cons(dirs, files), str ∈ dirs[m].entries, str ∈ entries
# links(m, dirs) = dirs[m].nlink, dirs[m] = mkdir(dirs[m].size, md1, dirs[m].nlink, dirs[m].nsubdirs, entries), dent = negdentry(str), p_inode = mkinode(m, md0, true, dirs[m].nlink, dirs[m].nsubdirs, dirs[m].size), afs-cons(dirs, files), m ∈ dirs, links(m, dirs) ≠ ∅ ∨ m = ROOT_INO ⊦ ⟪fail#(; ; err); asynced := ?⟫ afs-cons(dirs, files), str ∈ dirs[m].entries, str ∈ entries