| # buf = VFS_PAGE_SIZE, boolvar0 ↔ boolvar, dirs = abs-dirs(fs, ri), err = err0, files = abs-files(fs, ri), inode = mkinode(m, md, boolvar1, m0, m1, m2), ro = orphans(fs, ri), ro0 = orphans(fs, ri), 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-inj(ri), ri-inj(fi), ubifs-cons(fs, ri, orphans(fs, ri), fi, fo, log), inodekey(m) ∈ ri, asynced → boolvar ⊦ ⟪if pre-writepage(inode, pageno, buf, fs, ri) then choose boolvar, key, adr, nd with boolvar in let ino = inode.ino in {key := datakey(ino, pageno); nd := datanode(key, buf); aubifs_core_journal_add1#(nd, ri, fi, ro, fo; adr, fs, log; boolvar0, err); if err = ESUCCESS then aubifs_core_index_store#(key, adr, fi, ro, fo, fs, log, boolvar0; ri) else if ¬ boolvar then aubifs_core_index_remove#(key, fi, ro, fo, fs, log, boolvar0; ri)} else abort⟫ ⟨afs_writepage#(mkinode(m, md, boolvar1, m0, m1, m2), pageno, buf, dirs; err0, files; asynced)⟩ ( dirs = abs-dirs(fs, ri) ∧ files = abs-files(fs, ri) ∧ orphans(abs-dirs(fs, ri), abs-files(fs, ri)) = abs-keys(ro0) ∧ (asynced → boolvar0) ∧ err = err0), fs[ri[inodekey(m)]].directory |
# buf = VFS_PAGE_SIZE, boolvar0 ↔ boolvar, dirs = abs-dirs(fs, ri), err = err0, files = abs-files(fs, ri), inode = mkinode(m, md, boolvar1, m0, m1, m2), ro = orphans(fs, ri), ro0 = orphans(fs, ri), 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-inj(fi), ri-inj(ri), ubifs-cons(fs, ri, orphans(fs, ri), fi, fo, log), inodekey(m) ∈ ri, asynced → boolvar ⊦ ⟪choose boolvar, key, adr, nd with boolvar in let ino = inode.ino in {key := datakey(ino, pageno); nd := datanode(key, buf); aubifs_core_journal_add1#(nd, ri, fi, ro, fo; adr, fs, log; boolvar0, err); if err = ESUCCESS then aubifs_core_index_store#(key, adr, fi, ro, fo, fs, log, boolvar0; ri) else if ¬ boolvar then aubifs_core_index_remove#(key, fi, ro, fo, fs, log, boolvar0; ri)}⟫ ⟨afs_writepage#(mkinode(m, md, boolvar1, m0, m1, m2), pageno, buf, dirs; err0, files; asynced)⟩ ( dirs = abs-dirs(fs, ri) ∧ files = abs-files(fs, ri) ∧ orphans(abs-dirs(fs, ri), abs-files(fs, ri)) = abs-keys(ro0) ∧ (asynced → boolvar0) ∧ err = err0), fs[ri[inodekey(m)]].directory
Used simplifier rules: ⊦ pre-writepage(inode, n, buf, fs, ri) ↔ valid-file-ino(inode.ino, fs, ri) ∧ # buf = VFS_PAGE_SIZE; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).ino = m; (s)%⊦ valid-file-ino(ino, fs, ri) ↔ inodekey(ino) ∈ ri ∧ ¬ fs[ri[inodekey(ino)]].directory; (s)