| # buf = VFS_PAGE_SIZE, fs0 = fs, fs3 = fs, 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 → boolvar2 ⊦ ⟪aubifs_core_journal_add1#(datanode(datakey(m, pageno), buf), ri, fi, orphans(fs, ri), fo; adr, fs, log; boolvar2, err); ro0 := orphans(fs0, ri); files := abs-files(fs0, ri); dirs := abs-dirs(fs3, ri); if err = ESUCCESS then aubifs_core_index_store#(datakey(m, pageno), adr, fi, orphans(fs0, ri), fo, fs, log, boolvar2; 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 → boolvar2) ∧ err = err0), fs[ri[inodekey(m)]].directory |
# buf = VFS_PAGE_SIZE, fs0 = fs, fs3 = fs, nd = datanode(datakey(m, pageno), buf), ro = 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 → boolvar2 ⊦ ⟪if ri-cons(ri, fs) ∧ node-cons(nd.key, nd) then { choose adr1 with new(adr1 ', fs) ∧ ¬ dups(adr1 ') in {adr := adr1; fs[adr] := nd, log := log + adr, err := ESUCCESS} ifnone err := ENOSPC or {fail#(; ; err); adr := ?}; boolvar := ?} else abort; ro0 := orphans(fs0, ri); files := abs-files(fs0, ri); dirs := abs-dirs(fs3, ri); boolvar2 := boolvar; if err = ESUCCESS then aubifs_core_index_store#(datakey(m, pageno), adr, fi, orphans(fs0, ri), fo, fs, log, boolvar2; 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 → boolvar2) ∧ err = err0), fs[ri[inodekey(m)]].directory
Used simplifier rules: aubifs_core_journal_add1# (ND1, RI, FI, RO, FO; ADR1, FS, LOG; CSYNCED, ERR) {if ri-cons(RI, FS) ∧ node-cons(ND1.key, ND1) then { choose adr1 with new(adr1 ', FS) ∧ ¬ dups(adr1 ') in {ADR1 := adr1; FS[ADR1] := ND1, LOG := LOG + ADR1, ERR := ESUCCESS} ifnone ERR := ENOSPC or {fail#(; ; ERR); ADR1 := ?}; CSYNCED := ?} else abort };