| # buf-opt.buf = VFS_PAGE_SIZE, fs[ri[inodekey(m0)]].nlink = 0 ∧ m0 ≠ ROOT_INO ↔ inodekey(m0) ∈ ro, VFS_PAGE_SIZE = n0 + m4 % VFS_PAGE_SIZE, adr4 = adr1, inode = mkinode(m0, md, false, fs[ri[inodekey(m0)]].nlink, fs[ri[inodekey(m0)]].nsubdirs, m4), nd = datanode(datakey(m0, m4 / VFS_PAGE_SIZE), fill(datanode(datakey(m0, m4 / VFS_PAGE_SIZE), buf-opt.buf).data, zero, m4 % VFS_PAGE_SIZE, n0)), nd0 = inodenode(inodekey(m0), md, false, fs[ri[inodekey(m0)]].nlink, fs[ri[inodekey(m0)]].nsubdirs, n), nd1 = truncnode(inodekey(m0), m4), datanode(datakey(m0, m4 / VFS_PAGE_SIZE), buf-opt.buf).data?, fs[ri[inodekey(m0)]].inode?, fo.inodes?, ro.inodes?, buf-opt.some?, 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, m4 ≤ n, m4 % VFS_PAGE_SIZE + n0 ≤ # datanode(datakey(m0, m4 / VFS_PAGE_SIZE), buf-opt.buf).data, ∀ adr1, adr2, adr3. ¬(new(adr1 ' + (adr2 ' + adr3), fs) ∧ ¬ dups(adr1 ' + adr2 ' + adr3 ')) ⊦ ⟪err := ENOSPC; boolvar := ?; boolvar0 := boolvar; if err = ESUCCESS then aubifs_core_index_store#(datakey(m0, m4 / VFS_PAGE_SIZE), adr, fi, ro, fo, fs, log, boolvar0; ri); if err = ESUCCESS then {aubifs_core_index_store#(inodekey(m0), adr0, fi, ro, fo, fs, log, boolvar0; ri); aubifs_core_index_truncate#(inodekey(m0), m4, fi, ro, fo, fs, log, boolvar0; ri); boolvar1 := true; inode := mkinode(inode.ino, nd0.meta, nd0.directory, nd0.nlink, nd0.nsubdirs, nd0.size); if boolvar1 then buf-opt0 := some (datanode (datakey(m0, m4 / VFS_PAGE_SIZE), fill(datanode(datakey(m0, m4 / VFS_PAGE_SIZE), buf-opt.buf).data, zero, m4 % VFS_PAGE_SIZE, n0)) .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)), m4 % VFS_PAGE_SIZE = 0, VFS_PAGE_SIZE = 0, fs[ri[inodekey(m0)]].directory |
# buf-opt.buf = VFS_PAGE_SIZE, fs[ri[inodekey(m0)]].nlink = 0 ∧ m0 ≠ ROOT_INO ↔ inodekey(m0) ∈ ro, VFS_PAGE_SIZE = n0 + m4 % VFS_PAGE_SIZE, adr4 = adr1, err = ENOSPC, inode = mkinode(m0, md, false, fs[ri[inodekey(m0)]].nlink, fs[ri[inodekey(m0)]].nsubdirs, m4), nd = datanode(datakey(m0, m4 / VFS_PAGE_SIZE), fill(datanode(datakey(m0, m4 / VFS_PAGE_SIZE), buf-opt.buf).data, zero, m4 % VFS_PAGE_SIZE, n0)), nd0 = inodenode(inodekey(m0), md, false, fs[ri[inodekey(m0)]].nlink, fs[ri[inodekey(m0)]].nsubdirs, n), nd1 = truncnode(inodekey(m0), m4), datanode(datakey(m0, m4 / VFS_PAGE_SIZE), buf-opt.buf).data?, fs[ri[inodekey(m0)]].inode?, ro.inodes?, fo.inodes?, buf-opt.some?, 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, m4 % VFS_PAGE_SIZE + n0 ≤ # datanode(datakey(m0, m4 / VFS_PAGE_SIZE), buf-opt.buf).data, m4 ≤ n, ∀ adr1, adr2, adr3. ¬(new(adr1 ' + (adr2 ' + adr3), fs) ∧ ¬ dups(adr1 ' + adr2 ' + adr3 ')) ⊦ ⟪boolvar := ?; boolvar0 := boolvar; if err = ESUCCESS then aubifs_core_index_store#(datakey(m0, m4 / VFS_PAGE_SIZE), adr, fi, ro, fo, fs, log, boolvar0; ri); if err = ESUCCESS then {aubifs_core_index_store#(inodekey(m0), adr0, fi, ro, fo, fs, log, boolvar0; ri); aubifs_core_index_truncate#(inodekey(m0), m4, fi, ro, fo, fs, log, boolvar0; ri); boolvar1 := true; inode := mkinode(inode.ino, nd0.meta, nd0.directory, nd0.nlink, nd0.nsubdirs, nd0.size); if boolvar1 then buf-opt0 := some (datanode (datakey(m0, m4 / VFS_PAGE_SIZE), fill(datanode(datakey(m0, m4 / VFS_PAGE_SIZE), buf-opt.buf).data, zero, m4 % VFS_PAGE_SIZE, n0)) .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)), m4 % VFS_PAGE_SIZE = 0, VFS_PAGE_SIZE = 0, fs[ri[inodekey(m0)]].directory