| 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 |
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?, 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)), pre-write-inode(inode, dirs, files), 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, ri[inodekey(m)] ∈ 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 ⊦ ⟨ {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 := ?⟩ ( 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
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?, 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, ri[inodekey(m)] ∈ 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 ⊦ ⟨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, pre-write-inode(inode, dirs, files), adr1 ∈ fs0