| fs[ri[inodekey(m0)]].nlink = 0 ∧ m0 ≠ ROOT_INO ↔ inodekey(m0) ∈ ro, adr = adr2, adr0 = adr1, inode = mkinode(m0, md, false, fs[ri[inodekey(m0)]].nlink, fs[ri[inodekey(m0)]].nsubdirs, m4), nd = nd1, nd0 = truncnode(inodekey(m0), min(n, m4)), nd1 = inodenode(inodekey(m0), md, false, fs[ri[inodekey(m0)]].nlink, fs[ri[inodekey(m0)]].nsubdirs, n), fs[ri[inodekey(m0)]].inode?, 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(m0) ∈ ri, ri[inodekey(m0)] ∈ fs, buf-opt.some? → # buf-opt.buf = VFS_PAGE_SIZE ⊦ ⟪if ri-cons(ri, fs) ∧ node-cons(nd0.key, nd0) ∧ node-cons(nd.key, nd) then { choose adr1, adr2 with new(adr1 ' + adr2 ', fs) ∧ ¬ dups(adr1 ' + adr2 ') in {adr0 := adr1, adr := adr2; fs := fs[adr0, nd0][adr, nd], log := (log + adr0) + adr, err := ESUCCESS} ifnone err := ENOSPC or {fail#(; ; err); adr0 := ?, adr := ?}; boolvar := ?} else abort; if err = ESUCCESS then {aubifs_core_index_store#(inodekey(m0), adr, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_truncate#(inodekey(m0), min(n, m4), 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)), fs[ri[inodekey(m0)]].directory, m4 ≤ n ∧ m4 % VFS_PAGE_SIZE ≠ 0 |
fs[ri[inodekey(m0)]].nlink = 0 ∧ m0 ≠ ROOT_INO ↔ inodekey(m0) ∈ ro, adr = adr2, adr0 = adr1, inode = mkinode(m0, md, false, fs[ri[inodekey(m0)]].nlink, fs[ri[inodekey(m0)]].nsubdirs, m4), nd = nd1, nd0 = truncnode(inodekey(m0), min(n, m4)), nd1 = inodenode(inodekey(m0), md, false, fs[ri[inodekey(m0)]].nlink, fs[ri[inodekey(m0)]].nsubdirs, n), fs[ri[inodekey(m0)]].inode?, ro.inodes?, fo.inodes?, file-node-cons(fs, ri), log-cons(log, fs), node-cons(nd0.key, nd0), node-cons(nd.key, nd), 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), ri[inodekey(m0)] ∈ fs, inodekey(m0) ∈ ri, buf-opt.some? → # buf-opt.buf = VFS_PAGE_SIZE ⊦ ⟪ choose adr1, adr2 with new(adr1 ' + adr2 ', fs) ∧ ¬ dups(adr1 ' + adr2 ') in {adr0 := adr1, adr := adr2; fs := fs[adr0, nd0][adr, nd], log := (log + adr0) + adr, err := ESUCCESS} ifnone err := ENOSPC or {fail#(; ; err); adr0 := ?, adr := ?}; boolvar := ?; if err = ESUCCESS then {aubifs_core_index_store#(inodekey(m0), adr, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_truncate#(inodekey(m0), min(n, m4), 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)), fs[ri[inodekey(m0)]].directory, m4 ≤ n ∧ m4 % VFS_PAGE_SIZE ≠ 0
fs[ri[inodekey(m0)]].nlink = 0 ∧ m0 ≠ ROOT_INO ↔ inodekey(m0) ∈ ro, adr = adr2, adr0 = adr1, inode = mkinode(m0, md, false, fs[ri[inodekey(m0)]].nlink, fs[ri[inodekey(m0)]].nsubdirs, m4), nd = nd1, nd0 = truncnode(inodekey(m0), min(n, m4)), nd1 = inodenode(inodekey(m0), md, false, fs[ri[inodekey(m0)]].nlink, fs[ri[inodekey(m0)]].nsubdirs, n), fs[ri[inodekey(m0)]].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-inj(ri), ri-inj(fi), ubifs-cons(fs, ri, ro, fi, fo, log), ri[inodekey(m0)] ∈ fs, inodekey(m0) ∈ ri, buf-opt.some? → # buf-opt.buf = VFS_PAGE_SIZE ⊦ ⟪abort; if err = ESUCCESS then {aubifs_core_index_store#(inodekey(m0), adr, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_truncate#(inodekey(m0), min(n, m4), 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)), fs[ri[inodekey(m0)]].directory, m4 ≤ n ∧ m4 % VFS_PAGE_SIZE ≠ 0, ri-cons(ri, fs) ∧ node-cons(nd0.key, nd0) ∧ node-cons(nd.key, nd)