| # links(m, dirs0) = m1, dirs0[m] = mkdir(m0, md2, # links(m, dirs0), m2, entries0), dent = negdentry(str), dirs = ( dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]] [p_ino, dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino] .size:= (dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino].size + 1) ] [p_ino, dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]] [p_ino, dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino] .size:= (dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino].size + 1) ] [p_ino ] .nsubdirs:= ( dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]] [p_ino, dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino] .size:= (dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino].size + 1) ] [p_ino ] .nsubdirs + 1) ] ++ ino )[ino, mkdir(0, md, 1, 0, ∅) ], p_ino = m, afs-cons(dirs0, files), m ∈ dirs0, links(m, dirs0) ≠ ∅ ∨ m = ROOT_INO ⊦ [err := ESUCCESS] ( afs-cons(dirs, files) → ⟪afs_inode_sync#(mkinode(m, md0, true, m1, m2, m0); dirs, files); p_inode := (m ∈ dirs ⊃ mkinode(m, dirs[m].meta, true, dirs[m].nlink, dirs[m].nsubdirs, dirs[m].size) ;mkinode(m, files[m].meta, false, files[m].nlink, 0, files[m].size) ); c_inode := getinode(mkdentry(dent.name, ino).ino, dirs, files); asynced := ?⟫ afs-cons(dirs, files)), ino = 0, ino ∈ dirs0, ino ∈ files, str ∈ entries0 |
# links(m, dirs0) = m1, dirs0[m] = mkdir(m0, md2, # links(m, dirs0), m2, entries0), dent = negdentry(str), dirs = ( dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]] [p_ino, dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino] .size:= (dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino].size + 1) ] [p_ino, dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]] [p_ino, dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino] .size:= (dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino].size + 1) ] [p_ino ] .nsubdirs:= ( dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]] [p_ino, dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino] .size:= (dirs0[p_ino, dirs0[p_ino].entries:= dirs0[p_ino].entries[dent.name, ino]][p_ino].size + 1) ] [p_ino ] .nsubdirs + 1) ] ++ ino )[ino, mkdir(0, md, 1, 0, ∅) ], p_ino = m, afs-cons(dirs, files), afs-cons(dirs0, files), m ∈ dirs0, links(m, dirs0) ≠ ∅ ∨ m = ROOT_INO ⊦ ⟪afs_inode_sync#(mkinode(m, md0, true, m1, m2, m0); dirs, files); p_inode := (m ∈ dirs ⊃ mkinode(m, dirs[m].meta, true, dirs[m].nlink, dirs[m].nsubdirs, dirs[m].size) ;mkinode(m, files[m].meta, false, files[m].nlink, 0, files[m].size) ); c_inode := getinode(mkdentry(dent.name, ino).ino, dirs, files); asynced := ?⟫ afs-cons(dirs, files), ino = 0, str ∈ entries0, ino ∈ files, ino ∈ dirs0