| fs[ri[inodekey(m)]].nlink = 0 ∧ m ≠ ROOT_INO ↔ inodekey(m) ∈ ro, adr = adr2, adr0 = adr1, inode = mkinode(m, md, false, fs[ri[inodekey(m)]].nlink, fs[ri[inodekey(m)]].nsubdirs, m2), nd = nd1, nd0 = truncnode(inodekey(m), m2), nd1 = inodenode(inodekey(m), md, false, fs[ri[inodekey(m)]].nlink, fs[ri[inodekey(m)]].nsubdirs, n), fs[ri[inodekey(m)]].inode?, fo.inodes?, ro.inodes?, file-node-cons(fs, ri), log-cons(log, fs), node-cons(nd.key, nd), node-cons(nd0.key, nd0), orphans-cons(fs, ri, ro), replay-cons-strong(fs, ri, ro, fi, fo, log), ri-cons(ri, fs), ri-inj(fi), ri-inj(ri), ubifs-cons(fs, ri, ro, fi, fo, log), ri[inodekey(m)] ∈ fs, inodekey(m) ∈ ri, m2 ≤ n ⊦ ⟪fail#(; ; err); adr0 := ?, adr := ?; boolvar := ?; if err = ESUCCESS then {aubifs_core_index_store#(inodekey(m), adr, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_truncate#(inodekey(m), m2, fi, ro, fo, fs, log, boolvar; ri); boolvar1 := false; inode := mkinode(inode.ino, nd1.meta, nd1.directory, nd1.nlink, nd1.nsubdirs, nd1.size); if boolvar1 then buf-opt := some(nd.data)}⟫ (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)), m2 % VFS_PAGE_SIZE = 0, fs[ri[inodekey(m)]].directory, buf-opt.some?, datakey(m, m2 / VFS_PAGE_SIZE) ∈ ri |
fs[ri[inodekey(m)]].nlink = 0 ∧ m ≠ ROOT_INO ↔ inodekey(m) ∈ ro, m2 % VFS_PAGE_SIZE ≠ 0, m ≠ 0, fs[ri[inodekey(m)]].inode?, 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-cons(ri, fs), ri-inj(ri), ri-inj(fi), ubifs-cons(fs, ri, ro, fi, fo, log), inodekey(m) ∈ ri, ri[inodekey(m)] ∈ fs, m2 ≤ n, ¬ fs[ri[inodekey(m)]].directory, ¬ buf-opt.some?, ¬ datakey(m, m2 / VFS_PAGE_SIZE) ∈ ri ⊦ ⟪fail#(; ; err); adr0 := ?, adr := ?; boolvar := ?; if err = ESUCCESS then {ri0 := ri; ri1 := ri; ri2 := ri; aubifs_core_index_store#(inodekey(m), adr, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_truncate#(inodekey(m), m2, fi, ro, fo, fs, log, boolvar; ri); boolvar1 := false; inode := mkinode (mkinode(m, md, false, fs[ri2[inodekey(m)]].nlink, fs[ri2[inodekey(m)]].nsubdirs, m2).ino, inodenode(inodekey(m), md, false, fs[ri0[inodekey(m)]].nlink, fs[ri0[inodekey(m)]].nsubdirs, n).meta, inodenode(inodekey(m), md, false, fs[ri0[inodekey(m)]].nlink, fs[ri0[inodekey(m)]].nsubdirs, n).directory, inodenode(inodekey(m), md, false, fs[ri0[inodekey(m)]].nlink, fs[ri0[inodekey(m)]].nsubdirs, n).nlink, inodenode(inodekey(m), md, false, fs[ri0[inodekey(m)]].nlink, fs[ri0[inodekey(m)]].nsubdirs, n).nsubdirs, inodenode(inodekey(m), md, false, fs[ri0[inodekey(m)]].nlink, fs[ri0[inodekey(m)]].nsubdirs, n).size); if boolvar1 then buf-opt := some(inodenode(inodekey(m), md, false, fs[ri1[inodekey(m)]].nlink, fs[ri1[inodekey(m)]].nsubdirs, n).data)}⟫ (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))
Used simplifier rules: ⊦ inodekey(m).ino = m; (s)%⊦ node-cons(key0, inodenode(key1, md, boolvar, n, n0, m)) ↔ key0.inode? ∧ key0.ino ≠ 0; (s)% ⊦ inodenode(key, md, boolvar, m, m0, m1).key = key; (s)% ⊦ inodekey(m).inode?; (s)% ⊦ node-cons(key0, truncnode(key1, n)) ↔ key0.inode?; (s)% ⊦ truncnode(key, m).key = key; (s)