| dirs = abs-dirs(fs0, ri), files = abs-files(fs0, ri), m ≠ 0, orphans(fs0, ri).inodes?, fo.inodes?, afs-cons(abs-dirs(fs0, ri), abs-files(fs0, ri)), file-node-cons(fs0, ri), log-cons(log0, fs0), orphans-cons(fs0, ri, orphans(fs0, ri)), replay-cons-strong(fs0, ri, orphans(fs0, ri), fi, fo, log0), ri-cons(ri, fs0), ri-inj(ri), ri-inj(fi), ubifs-cons(fs0, ri, orphans(fs0, ri), fi, fo, log0), inodekey(m) ∈ ri, ¬ adr1 ∈ fs0, asynced → boolvar1, ¬ fs0[ri[inodekey(m)]].directory ∧ ¬ boolvar0 ∨ fs0[ri[inodekey(m)]].directory ∧ boolvar0 ∧ m2 = fs0[ri[inodekey(m)]].size, fs0[ri[inodekey(m)]].directory ∧ m2 = fs0[ri[inodekey(m)]].size ∧ boolvar0 ∨ ¬ fs0[ri[inodekey(m)]].directory ∧ fs0[ri[inodekey(m)]].nsubdirs = 0 ∧ ¬ boolvar0 ⊦ ⟨afs_write_inode#(mkinode(m, md, boolvar0, fs0[ri[inodekey(m)]].nlink, fs0[ri[inodekey(m)]].nsubdirs, m2); err0, dirs, files; asynced)⟩ ( afs-cons(dirs, files) → dirs = abs-dirs (fs0[adr1, inodenode(inodekey(m), md, boolvar0, fs0[ri[inodekey(m)]].nlink, fs0[ri[inodekey(m)]].nsubdirs, m2)], ri[inodekey(m), adr1]) ∧ files = abs-files (fs0[adr1, inodenode(inodekey(m), md, boolvar0, fs0[ri[inodekey(m)]].nlink, fs0[ri[inodekey(m)]].nsubdirs, m2)], ri[inodekey(m), adr1]) ∧ orphans (fs0[adr1, inodenode(inodekey(m), md, boolvar0, fs0[ri[inodekey(m)]].nlink, fs0[ri[inodekey(m)]].nsubdirs, m2)], ri[inodekey(m), adr1]) = orphans(fs0, ri) ∧ (asynced → boolvar) ∧ ESUCCESS = err0) |
dirs = abs-dirs(fs0, ri), err = err0, files = abs-files(fs0, ri), inode = mkinode(m, md, boolvar0, fs0[ri[inodekey(m)]].nlink, fs0[ri[inodekey(m)]].nsubdirs, m2), fs0[ri[inodekey(m)]].inode?, fo.inodes?, orphans(fs0, ri).inodes?, afs-cons(abs-dirs(fs0, ri), abs-files(fs0, ri)), file-node-cons(fs0, ri), log-cons(log0, fs0), orphans-cons(fs0, ri, orphans(fs0, ri)), replay-cons-strong(fs0, ri, orphans(fs0, ri), fi, fo, log0), ri-cons(ri, fs0), ri-inj(fi), ri-inj(ri), ubifs-cons(fs0, ri, orphans(fs0, ri), fi, fo, log0), ri[inodekey(m)] ∈ fs0, inodekey(m) ∈ ri, asynced → boolvar1, fs0[ri[inodekey(m)]].directory ∧ m2 = fs0[ri[inodekey(m)]].size ∧ boolvar0 ∨ ¬ fs0[ri[inodekey(m)]].directory ∧ fs0[ri[inodekey(m)]].nsubdirs = 0 ∧ ¬ boolvar0, ¬ fs0[ri[inodekey(m)]].directory ∧ ¬ boolvar0 ∨ fs0[ri[inodekey(m)]].directory ∧ boolvar0 ∧ m2 = fs0[ri[inodekey(m)]].size ⊦ ⟨if pre-write-inode(inode, dirs, files) then { {if inode.directory then dirs[inode.ino].meta := inode.meta else {files[inode.ino].meta := inode.meta; files[inode.ino].size := inode.size}; err := ESUCCESS} or fail#(; ; err); asynced := ?} else abort⟩ ( afs-cons(dirs, files) → dirs = abs-dirs (fs0[adr1, inodenode(inodekey(m), md, boolvar0, fs0[ri[inodekey(m)]].nlink, fs0[ri[inodekey(m)]].nsubdirs, m2)], ri[inodekey(m), adr1]) ∧ files = abs-files (fs0[adr1, inodenode(inodekey(m), md, boolvar0, fs0[ri[inodekey(m)]].nlink, fs0[ri[inodekey(m)]].nsubdirs, m2)], ri[inodekey(m), adr1]) ∧ orphans (fs0[adr1, inodenode(inodekey(m), md, boolvar0, fs0[ri[inodekey(m)]].nlink, fs0[ri[inodekey(m)]].nsubdirs, m2)], ri[inodekey(m), adr1]) = orphans(fs0, ri) ∧ (asynced → boolvar) ∧ ESUCCESS = err), m = 0, adr1 ∈ fs0
Used simplifier rules: afs_write_inode#(INODE; ERR, DIRS, FILES; ASYNCED) {if pre-write-inode(INODE, DIRS, FILES) then { {if INODE.directory then DIRS[INODE.ino].meta := INODE.meta else {FILES[INODE.ino].meta := INODE.meta; FILES[INODE.ino].size := INODE.size}; ERR := ESUCCESS} or fail#(; ; ERR); ASYNCED := ?} else abort };%⊦ inodekey(ino) ∈ ri ∧ ri[inodekey(ino)] ∈ fs ∧ ubifs-cons(fs, ri, ro, fi, fo, log) → fs[ri[inodekey(ino)]].inode?; (ss)% ⊦ key ∈ ri ∧ ri-cons(ri, fs) → ri[key] ∈ fs; (ss)