| ⟪afs_create_ino#(m, md, ino; dent, err, dirs, files)⟫ 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), ino ≠ 0, afs-cons(dirs, files), m ∈ dirs, ¬ str ∈ entries, ¬ str ∈ dirs[m].entries, ¬ ino ∈ files, ¬ ino ∈ dirs, links(m, dirs) ≠ ∅ ∨ m = ROOT_INO ⊦ ⟪afs_create_ino#(m, md, ino; dent, err, dirs, files); afs_inode_sync#(p_inode; dirs, files); p_inode := (p_inode.ino ∈ dirs ⊃ mkinode(p_inode.ino, dirs[p_inode.ino].meta, true, dirs[p_inode.ino].nlink, dirs[p_inode.ino].nsubdirs, dirs[p_inode.ino].size) ;mkinode(p_inode.ino, files[p_inode.ino].meta, false, files[p_inode.ino].nlink, 0, files[p_inode.ino].size) ); c_inode := getinode(dent.ino, dirs, files); asynced := ?⟫ afs-cons(dirs, files) |
⟨afs_create_ino#(m, md, ino; dent, err, dirs, files)⟩ (dent = dent0 ∧ err = err0 ∧ dirs = dirs0 ∧ files = files0), # 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), afs-cons(dirs0, files0), m ∈ dirs, links(m, dirs) ≠ ∅ ∨ m = ROOT_INO ⊦ ⟪afs_inode_sync#(p_inode; dirs0, files0); p_inode := (p_inode.ino ∈ dirs0 ⊃ mkinode(p_inode.ino, dirs0[p_inode.ino].meta, true, dirs0[p_inode.ino].nlink, dirs0[p_inode.ino].nsubdirs, dirs0[p_inode.ino].size) ;mkinode(p_inode.ino, files0[p_inode.ino].meta, false, files0[p_inode.ino].nlink, 0, files0[p_inode.ino].size) ); c_inode := getinode(dent0.ino, dirs0, files0); asynced := ?⟫ afs-cons(dirs0, files0), ino = 0, str ∈ entries, str ∈ dirs[m].entries, ino ∈ files, ino ∈ dirs