| 0 = fs[ri[inodekey(m)]].nsubdirs, adr = adr4, adr0 = adr3, dirs = abs-dirs(fs, ri), files = abs-files(fs, ri), m0 = fs[ri[inodekey(m)]].nlink, nd = inodenode(inodekey(m), md, false, m0, 0, n), nd0 = truncnode(inodekey(m), min(n, m2)), ro = orphans(fs, ri), ro0 = 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), new(adr1 ' + adr2 ', 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, buf-opt0.some? → # buf-opt0.buf = VFS_PAGE_SIZE, asynced → boolvar4 ⊦ [fs := fs[adr1, nd0][adr2, nd], log := (log + adr1) + adr2, err := ESUCCESS; boolvar := ?; nd0 := inodenode(inodekey(m), md, false, m0, 0, n); buf-opt := buf-opt0; boolvar1 := boolvar2; inode := mkinode(m, md, false, m0, 0, m2); boolvar4 := boolvar, adr4 := adr2; if err = ESUCCESS then {aubifs_core_index_store#(inodekey(m), adr4, fi, ro0, fo, fs, log, boolvar4; ri); aubifs_core_index_truncate#(inodekey(m), min(n, m2), fi, ro0, fo, fs, log, boolvar4; ri); boolvar1 := false; inode := mkinode(inode.ino, nd0.meta, nd0.directory, nd0.nlink, nd0.nsubdirs, nd0.size); if boolvar1 then buf-opt := some(nd.data)}] ( ubifs-cons(fs, ri, ro0, fi, fo, log) ∧ replay-cons-strong(fs, ri, ro0, fi, fo, log) ∧ file-node-cons(fs, ri) ∧ orphans-cons(fs, ri, ro0) ∧ ri-inj(ri) ∧ log-cons(log, fs) → ⟨p_inode := mkinode(m, md, false, m0, 0, m2); afs_truncate#(n, m2 / VFS_PAGE_SIZE; buf-opt0, p_inode, boolvar2, err0, dirs, 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 → boolvar4) ∧ buf-opt = buf-opt0 ∧ inode = p_inode ∧ (boolvar1 ↔ boolvar2) ∧ err = err0)), fs[ri[inodekey(m)]].directory, dups(adr1 ' + adr2 '), m2 ≤ n ∧ m2 % VFS_PAGE_SIZE ≠ 0 |
0 = fs0[ri[inodekey(m)]].nsubdirs, adr = adr4, adr0 = adr3, dirs = abs-dirs(fs0, ri), err = ESUCCESS, files = abs-files(fs0, ri), fs = fs0[adr1, nd0][adr2, nd], log = (log0 + adr1) + adr2, m0 = fs0[ri[inodekey(m)]].nlink, nd = inodenode(inodekey(m), md, false, m0, 0, n), nd0 = truncnode(inodekey(m), min(n, m2)), ro = orphans(fs0, ri), ro0 = orphans(fs0, ri), orphans(fs0, ri).inodes?, fo.inodes?, afs-cons(abs-dirs(fs0, ri), abs-files(fs0, ri)), file-node-cons(fs0, ri), log-cons(log0, fs0), new(adr1 ' + adr2 ', fs0), orphans-cons(fs0, ri, orphans(fs0, ri)), replay-cons-strong(fs0, ri, orphans(fs0, ri), fi, fo, log0), ri-inj(ri), ri-inj(fi), ubifs-cons(fs0, ri, orphans(fs0, ri), fi, fo, log0), inodekey(m) ∈ ri, asynced → boolvar4, buf-opt0.some? → # buf-opt0.buf = VFS_PAGE_SIZE ⊦ [boolvar := ?; nd0 := inodenode(inodekey(m), md, false, m0, 0, n); buf-opt := buf-opt0; boolvar1 := boolvar2; inode := mkinode(m, md, false, m0, 0, m2); boolvar4 := boolvar, adr4 := adr2; if err = ESUCCESS then {aubifs_core_index_store#(inodekey(m), adr4, fi, ro0, fo, fs, log, boolvar4; ri); aubifs_core_index_truncate#(inodekey(m), min(n, m2), fi, ro0, fo, fs, log, boolvar4; ri); boolvar1 := false; inode := mkinode(inode.ino, nd0.meta, nd0.directory, nd0.nlink, nd0.nsubdirs, nd0.size); if boolvar1 then buf-opt := some(nd.data)}] ( ubifs-cons(fs, ri, ro0, fi, fo, log) ∧ replay-cons-strong(fs, ri, ro0, fi, fo, log) ∧ file-node-cons(fs, ri) ∧ orphans-cons(fs, ri, ro0) ∧ ri-inj(ri) ∧ log-cons(log, fs) → ⟨p_inode := mkinode(m, md, false, m0, 0, m2); afs_truncate#(n, m2 / VFS_PAGE_SIZE; buf-opt0, p_inode, boolvar2, err0, dirs, 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 → boolvar4) ∧ buf-opt = buf-opt0 ∧ inode = p_inode ∧ (boolvar1 ↔ boolvar2) ∧ err = err0)), fs0[ri[inodekey(m)]].directory, dups(adr1 ' + adr2 '), m2 ≤ n ∧ m2 % VFS_PAGE_SIZE ≠ 0