| boolvar0 ↔ boolvar1, buf-opt = buf-opt0, dirs = abs-dirs(fs, ri), err = err0, fi0 = fi, files = abs-files(fs, ri), fo0 = fo, inode = mkinode(m, md, false, fs[ri[inodekey(m)]].nlink, 0, m2), m0 = fs[ri[inodekey(m)]].nlink, n0 = n, pageno0 = m2 / VFS_PAGE_SIZE, ro = orphans(fs, ri), ro0 = orphans(fs, ri), orphans(fs, ri).inodes?, fo.inodes?, afs-cons(abs-dirs(fs, ri), abs-files(fs, ri)), file-node-cons(fs, ri), log-cons(log, fs), orphans-cons(fs, ri, orphans(fs, ri)), pre-truncate(inode, n, m2 / VFS_PAGE_SIZE, buf-opt, fs, ri, orphans(fs, ri)), replay-cons-strong(fs, ri, orphans(fs, ri), fi, fo, log), ri-inj(ri), ri-inj(fi), ubifs-cons(fs, ri, orphans(fs, ri), fi, fo, log), inodekey(m) ∈ ri, asynced → boolvar, buf-opt0.some? → # buf-opt0.buf = VFS_PAGE_SIZE ⊦ [aubifs_truncate#(n, m2 / VFS_PAGE_SIZE, fi, orphans(fs, ri), fo; buf-opt, inode, boolvar0, err, ri, fs, log, boolvar)] ( ubifs-cons(fs, ri, ro0, fi0, fo0, log) ∧ replay-cons-strong(fs, ri, ro0, fi0, fo0, 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, boolvar1, 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(ro) ∧ (asynced → boolvar) ∧ buf-opt = buf-opt0 ∧ inode = p_inode ∧ (boolvar0 ↔ boolvar1) ∧ err = err0)), fs[ri[inodekey(m)]].directory |
boolvar0 ↔ boolvar1, 0 = fs[ri[inodekey(m)]].nsubdirs, buf-opt = buf-opt0, dirs = abs-dirs(fs, ri), err = err0, files = abs-files(fs, ri), inode = mkinode(m, md, false, fs[ri[inodekey(m)]].nlink, 0, m2), m0 = fs[ri[inodekey(m)]].nlink, ro = 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), 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, ¬ fs[ri[inodekey(m)]].directory, buf-opt0.some? → # buf-opt0.buf = VFS_PAGE_SIZE, asynced → boolvar ⊦ [aubifs_truncate#(n, m2 / VFS_PAGE_SIZE, fi, orphans(fs, ri), fo; buf-opt, inode, boolvar0, err, ri, fs, log, boolvar)] ( 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) ∧ 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, boolvar1, 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(ro) ∧ (asynced → boolvar) ∧ buf-opt = buf-opt0 ∧ inode = p_inode ∧ (boolvar0 ↔ boolvar1) ∧ err = err0))
Used simplifier rules: ⊦ mkinode(m, md, boolvar, m0, m1, m2).size = m2; (s)% ⊦ inodekey(m).ino = m; (s)% ⊦ inodekey(m).inode?; (s)%⊦ key ∈ orphans(fs, ri) ↔ key.inode? ∧ key ∈ ri ∧ fs[ri[key]].nlink = 0 ∧ key.ino ≠ ROOT_INO; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).nsubdirs = m1; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).nlink = m0; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).directory ↔ boolvar; (s)%⊦ valid-file-ino(ino, fs, ri) ↔ inodekey(ino) ∈ ri ∧ ¬ fs[ri[inodekey(ino)]].directory; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).ino = m; (s)%⊦ valid-file-inode(inode, fs, ri) ↔ valid-file-ino(inode.ino, fs, ri) ∧ (inode.directory ↔ fs[ri[inodekey(inode.ino)]].directory) ∧ inode.nlink = fs[ri[inodekey(inode.ino)]].nlink ∧ inode.nsubdirs = fs[ri[inodekey(inode.ino)]].nsubdirs; (s)%⊦ pre-truncate(inode, n, pageno, buf-opt, fs, ri, ro) ↔ valid-file-inode(inode, fs, ri) ∧ ( fs[ri[inodekey(inode.ino)]].nlink = 0 ∧ inode.ino ≠ ROOT_INO ↔ inodekey(inode.ino) ∈ ro) ∧ pageno = inode.size / VFS_PAGE_SIZE ∧ (buf-opt.some? → # buf-opt.buf = VFS_PAGE_SIZE); (s)