| 1 = fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].nlink, abs-children(fs[ri[dentrykey(m, str)]].ino, fs, ri) = ∅, dentrykeys(inodekey(fs[ri[dentrykey(m, str)]].ino), ri) = ∅, dirs = abs-dirs(fs, ri), files = abs-files(fs, ri), links(fs[ri[dentrykey(m, str)]].ino, fs, ri) = ∅ ++ dentrykey(m, str), old_dent = mkdentry(str, fs[ri[dentrykey(m, str)]].ino), p_inode0 = mkinode(m, md, true, fs[ri[inodekey(m)]].nlink, fs[ri[inodekey(m)]].nsubdirs, fs[ri[inodekey(m)]].size), p_inode1 = mkinode (fs[ri[dentrykey(m, str)]].ino, md0, true, 1, fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].nsubdirs, fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].size), fs[ri[dentrykey(m, str)]].ino ≠ ROOT_INO, fs[ri[dentrykey(m, str)]].ino ≠ 0, fs[ri[inodekey(m)]].nsubdirs ≠ 0, fs[ri[inodekey(m)]].size ≠ 0, m ≠ 0, fs[ri[inodekey(m)]].directory, fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].directory, fo.inodes?, orphans(fs, ri).inodes?, afs-cons(abs-dirs(fs, ri), abs-files(fs, ri)), file-node-cons(fs, ri), log-cons(log, fs), orphans-cons(fs, ri, orphans(fs, ri)), replay-cons-strong(fs, ri, orphans(fs, ri), fi, fo, log), ri-cons(ri, fs), ri-inj(fi), ri-inj(ri), ubifs-cons(fs, ri, orphans(fs, ri), fi, fo, log), dentrykey(m, str) ∈ ri, inodekey(fs[ri[dentrykey(m, str)]].ino) ∈ ri, inodekey(m) ∈ ri, 1 ≤ fs[ri[inodekey(m)]].size, 1 ≤ fs[ri[inodekey(m)]].nsubdirs, asynced → boolvar0, ∀ adr, adr0, adr1. adr ∈ fs ∨ adr0 ∈ fs ∨ adr1 ∈ fs ∨ adr = adr0 ∨ adr = adr1 ∨ adr0 = adr1, fs[ri[inodekey(m)]].nlink ≠ 0 ∨ m = ROOT_INO, links(m, abs-dirs(fs, ri)) ≠ ∅ ∨ m = ROOT_INO ⊦ ⟨afs_rmdir#(; p_inode0, p_inode1, old_dent, err0, dirs, files; asynced)⟩ ( dirs = abs-dirs(fs, ri) ∧ files = abs-files(fs, ri) ∧ (asynced → boolvar) ∧ mkinode(m, md, true, fs[ri[inodekey(m)]].nlink, fs[ri[inodekey(m)]].nsubdirs, fs[ri[inodekey(m)]].size) = p_inode0 ∧ mkinode (fs[ri[dentrykey(m, str)]].ino, md0, true, 1, fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].nsubdirs, fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].size) = p_inode1 ∧ mkdentry(str, fs[ri[dentrykey(m, str)]].ino) = old_dent ∧ ENOSPC = err0), fs[ri[inodekey(m)]].nlink = 0 ∧ m ≠ ROOT_INO |
1 = fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].nlink, abs-children(fs[ri[dentrykey(m, str)]].ino, fs, ri) = ∅, c_inode = p_inode1, dent = old_dent, dentrykeys(inodekey(fs[ri[dentrykey(m, str)]].ino), ri) = ∅, dirs = abs-dirs(fs, ri), err = err0, files = abs-files(fs, ri), links(fs[ri[dentrykey(m, str)]].ino, fs, ri) = ∅ ++ dentrykey(m, str), old_dent = mkdentry(str, fs[ri[dentrykey(m, str)]].ino), p_inode = p_inode0, p_inode0 = mkinode(m, md, true, fs[ri[inodekey(m)]].nlink, fs[ri[inodekey(m)]].nsubdirs, fs[ri[inodekey(m)]].size), p_inode1 = mkinode (fs[ri[dentrykey(m, str)]].ino, md0, true, 1, fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].nsubdirs, fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].size), fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].directory, fs[ri[inodekey(m)]].directory, orphans(fs, ri).inodes?, fo.inodes?, afs-cons(abs-dirs(fs, ri), abs-files(fs, ri)), file-node-cons(fs, ri), log-cons(log, fs), orphans-cons(fs, ri, orphans(fs, ri)), replay-cons-strong(fs, ri, orphans(fs, ri), fi, fo, log), ri-cons(ri, fs), ri-inj(ri), ri-inj(fi), ubifs-cons(fs, ri, orphans(fs, ri), fi, fo, log), inodekey(m) ∈ ri, inodekey(fs[ri[dentrykey(m, str)]].ino) ∈ ri, dentrykey(m, str) ∈ ri, 1 ≤ fs[ri[inodekey(m)]].nsubdirs, 1 ≤ fs[ri[inodekey(m)]].size, asynced → boolvar0, ∀ adr, adr0, adr1. adr ∈ fs ∨ adr0 ∈ fs ∨ adr1 ∈ fs ∨ adr = adr0 ∨ adr = adr1 ∨ adr0 = adr1, links(m, abs-dirs(fs, ri)) ≠ ∅ ∨ m = ROOT_INO, fs[ri[inodekey(m)]].nlink ≠ 0 ∨ m = ROOT_INO ⊦ ⟨if pre-rmdir(p_inode, c_inode, dent, dirs, files) then { let p_ino = p_inode.ino in {dirs[p_ino].entries := dirs[p_ino].entries -- dent.name; dirs[p_ino].size := dirs[p_ino].size - 1; dirs[p_ino].nsubdirs := dirs[p_ino].nsubdirs - 1; let ino = dent.ino in afs_drop_nlink#(ino; dirs, files); dent := negdentry(dent.name); afs_inode_sync#(p_inode; dirs, files); afs_inode_sync#(c_inode; dirs, files); p_inode := getinode(p_inode.ino, dirs, files); c_inode := getinode(c_inode.ino, dirs, files); err := ESUCCESS} or fail#(; ; err); asynced := ?} else abort⟩ ( dirs = abs-dirs(fs, ri) ∧ files = abs-files(fs, ri) ∧ (asynced → boolvar) ∧ mkinode(m, md, true, fs[ri[inodekey(m)]].nlink, fs[ri[inodekey(m)]].nsubdirs, fs[ri[inodekey(m)]].size) = p_inode ∧ mkinode (fs[ri[dentrykey(m, str)]].ino, md0, true, 1, fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].nsubdirs, fs[ri[inodekey(fs[ri[dentrykey(m, str)]].ino)]].size) = c_inode ∧ mkdentry(str, fs[ri[dentrykey(m, str)]].ino) = dent ∧ ENOSPC = err), fs[ri[dentrykey(m, str)]].ino = ROOT_INO, fs[ri[dentrykey(m, str)]].ino = 0, fs[ri[inodekey(m)]].nsubdirs = 0, fs[ri[inodekey(m)]].size = 0, m = 0, fs[ri[inodekey(m)]].nlink = 0 ∧ m ≠ ROOT_INO
Used simplifier rules: afs_rmdir#(; P_INODE, C_INODE, DENT, ERR, DIRS, FILES; ASYNCED) {if pre-rmdir(P_INODE, C_INODE, DENT, DIRS, FILES) then { let P_INO = P_INODE.ino in {DIRS[P_INO].entries := DIRS[P_INO].entries -- DENT.name; DIRS[P_INO].size := DIRS[P_INO].size - 1; DIRS[P_INO].nsubdirs := DIRS[P_INO].nsubdirs - 1; let INO = DENT.ino in afs_drop_nlink#(INO; DIRS, FILES); DENT := negdentry(DENT.name); afs_inode_sync#(P_INODE; DIRS, FILES); afs_inode_sync#(C_INODE; DIRS, FILES); P_INODE := getinode(P_INODE.ino, DIRS, FILES); C_INODE := getinode(C_INODE.ino, DIRS, FILES); ERR := ESUCCESS} or fail#(; ; ERR); ASYNCED := ?} else abort };