| boolvar0 ↔ boolvar1, buf-opt = buf-opt0, dirs = abs-dirs(fs, ri), err = err0, files = abs-files(fs, ri), inode = p_inode, orphans(dirs, files) = abs-keys(ro), fo.inodes?, ro.inodes?, afs-cons(dirs, files), file-node-cons(fs, ri), log-cons(log, fs), orphans-cons(fs, ri, ro), pre-truncate(inode, n, pageno, buf-opt, dirs, files), replay-cons-strong(fs, ri, ro, fi, fo, log), ri-inj(fi), ri-inj(ri), ubifs-cons(fs, ri, ro, fi, fo, log), asynced → boolvar ⊦ ⟪aubifs_truncate#(n, pageno, fi, ro, fo; buf-opt, inode, boolvar0, err, ri, fs, log, boolvar)⟫ ⟨afs_truncate#(n, pageno; buf-opt0, p_inode, boolvar1, err0, dirs, files, asynced)⟩ ( (dirs = abs-dirs(fs, ri) ∧ files = abs-files(fs, ri) ∧ orphans(dirs, files) = abs-keys(ro) ∧ (asynced → boolvar)) ∧ buf-opt = buf-opt0 ∧ inode = p_inode ∧ (boolvar0 ↔ boolvar1) ∧ err = err0) |
p_inode.nlink = fs[ri[inodekey(p_inode.ino)]].nlink, p_inode.nsubdirs = 0, boolvar0 ↔ boolvar1, buf-opt = buf-opt0, dirs = abs-dirs(fs, ri), err = err0, files = abs-files(fs, ri), inode = p_inode, 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(p_inode.ino) ∈ ri, ¬ fs[ri[inodekey(p_inode.ino)]].directory, ¬ p_inode.directory, buf-opt0.some? → # buf-opt0.buf = VFS_PAGE_SIZE, asynced → boolvar ⊦ ⟪aubifs_truncate#(n, p_inode.size / VFS_PAGE_SIZE, fi, orphans(fs, ri), fo; buf-opt, inode, boolvar0, err, ri, fs, log, boolvar)⟫ ⟨afs_truncate#(n, p_inode.size / 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: ⊦ mkfile(m, md, m0, content).nlink = m0; (s)%⊦ abs-file(ino, fs, ri) = mkfile (fs[ri[inodekey(ino)]].size, fs[ri[inodekey(ino)]].meta, fs[ri[inodekey(ino)]].nlink, abs-content(ino, fs, ri)); (s)%⊦ inodekey(ino) ∈ ri ∧ ¬ fs[ri[inodekey(ino)]].directory → abs-files(fs, ri)[ino] = abs-file(ino, fs, ri); (s)%⊦ ino ∈ abs-files(fs, ri) ↔ inodekey(ino) ∈ ri ∧ ¬ fs[ri[inodekey(ino)]].directory; (s)% ⊦ valid-file-ino(ino, dirs, files) ↔ ino ∈ files; (s)%⊦ valid-file-inode(inode, dirs, files) ↔ valid-file-ino(inode.ino, dirs, files) ∧ inode.nlink = files[inode.ino].nlink ∧ inode.nsubdirs = 0 ∧ ¬ inode.directory; (s)%⊦ pre-truncate(inode, n, pageno, buf-opt, dirs, files) ↔ valid-file-inode(inode, dirs, files) ∧ pageno = inode.size / VFS_PAGE_SIZE ∧ (buf-opt.some? → # buf-opt.buf = VFS_PAGE_SIZE); (s)%⊦ ro.inodes? → (abs-keys(ro) = abs-keys(orphans(fs, ri)) ↔ ro = orphans(fs, ri)); (s)%⊦ afs-cons(abs-dirs(fs, ri), abs-files(fs, ri)) → orphans(abs-dirs(fs, ri), abs-files(fs, ri)) = abs-keys(orphans(fs, ri)); (s)