| # buf = VFS_PAGE_SIZE, nd = datanode(datakey(m, pageno), buf), fo.inodes?, ro.inodes?, file-node-cons(fs, ri), log-cons(log, fs), orphans-cons(fs, ri, ro), replay-cons-strong(fs, ri, ro, fi, fo, log), ri-inj(fi), ri-inj(ri), ubifs-cons(fs, ri, ro, fi, fo, log), inodekey(m) ∈ ri ⊦ ⟪choose adr1 with new(adr1 ', fs) ∧ ¬ dups(adr1 ') in {adr := adr1; fs[adr] := nd, log := log + adr, err := ESUCCESS} ifnone err := ENOSPC; boolvar := ?; if err = ESUCCESS then aubifs_core_index_store#(datakey(m, pageno), adr, fi, ro, fo, fs, log, boolvar; ri)⟫ (ubifs-cons(fs, ri, ro, fi, fo, log) ∧ replay-cons-strong(fs, ri, ro, fi, fo, log) ∧ file-node-cons(fs, ri) ∧ orphans-cons(fs, ri, ro)), fs[ri[inodekey(m)]].directory |
# buf = VFS_PAGE_SIZE, nd = datanode(datakey(m, pageno), buf), ro.inodes?, fo.inodes?, file-node-cons(fs, ri), log-cons(log, fs), new(adr1 ', fs), orphans-cons(fs, ri, ro), replay-cons-strong(fs, ri, ro, fi, fo, log), ri-inj(ri), ri-inj(fi), ubifs-cons(fs, ri, ro, fi, fo, log), inodekey(m) ∈ ri ⊦ ⟪adr := adr1; fs[adr] := nd, log := log + adr, err := ESUCCESS; boolvar := ?; if err = ESUCCESS then aubifs_core_index_store#(datakey(m, pageno), adr, fi, ro, fo, fs, log, boolvar; ri)⟫ (ubifs-cons(fs, ri, ro, fi, fo, log) ∧ replay-cons-strong(fs, ri, ro, fi, fo, log) ∧ file-node-cons(fs, ri) ∧ orphans-cons(fs, ri, ro)), fs[ri[inodekey(m)]].directory, dups(adr1 ')
# buf = VFS_PAGE_SIZE, nd = datanode(datakey(m, pageno), buf), ro.inodes?, fo.inodes?, file-node-cons(fs, ri), log-cons(log, fs), orphans-cons(fs, ri, ro), replay-cons-strong(fs, ri, ro, fi, fo, log), ri-inj(ri), ri-inj(fi), ubifs-cons(fs, ri, ro, fi, fo, log), inodekey(m) ∈ ri, ∀ adr1. ¬(new(adr1 ', fs) ∧ ¬ dups(adr1 ')) ⊦ ⟪err := ENOSPC; boolvar := ?; if err = ESUCCESS then aubifs_core_index_store#(datakey(m, pageno), adr, fi, ro, fo, fs, log, boolvar; ri)⟫ (ubifs-cons(fs, ri, ro, fi, fo, log) ∧ replay-cons-strong(fs, ri, ro, fi, fo, log) ∧ file-node-cons(fs, ri) ∧ orphans-cons(fs, ri, ro)), fs[ri[inodekey(m)]].directory