| # buf = VFS_PAGE_SIZE, dirs = abs-dirs(fs, ri), err = err0, files = abs-files(fs, ri), ro = 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, ¬ fs[ri[inodekey(m)]].directory, asynced → boolvar ⊦ ⟪aubifs_writepage#(mkinode(m, md, boolvar0, m0, m1, m2), pageno, buf, fi, orphans(fs, ri), fo; err, ri, fs, log, boolvar)⟫ ⟨afs_writepage#(mkinode(m, md, boolvar0, 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(ro) ∧ (asynced → boolvar) ∧ err = err0) |
# 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
Used simplifier rules: aubifs_writepage# (INODE, PAGENO, PBUF, FI, RO, FO; ERR, RI, FS, LOG, CSYNCED) {if pre-writepage(INODE, PAGENO, PBUF, FS, RI) then choose EXISTS, KEY1, ADR1, ND1 with EXISTS in let INO = INODE.ino in {KEY1 := datakey(INO, PAGENO); ND1 := datanode(KEY1, PBUF); aubifs_core_journal_add1# (ND1, RI, FI, RO, FO; ADR1, FS, LOG; CSYNCED, ERR); if ERR = ESUCCESS then aubifs_core_index_store# (KEY1, ADR1, FI, RO, FO, FS, LOG, CSYNCED; RI) else if ¬ EXISTS then aubifs_core_index_remove# (KEY1, FI, RO, FO, FS, LOG, CSYNCED; RI)} else abort };