| fo.inodes?, ro.inodes?, file-node-cons(fs, ri), log-cons(log, fs), orphans-cons(fs, ri, ro), pre-truncate(inode, n, pageno, buf-opt, 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) ⊦ ⟪aubifs_truncate#(n, pageno, fi, ro, fo; buf-opt, inode, boolvar, err, ri, fs, log, boolvar0)⟫ ( 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)) |
inode.nlink = fs[ri[inodekey(inode.ino)]].nlink, inode.nsubdirs = fs[ri[inodekey(inode.ino)]].nsubdirs, inode.nlink = 0 ∧ inode.ino ≠ ROOT_INO ↔ inodekey(inode.ino) ∈ ro, 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(inode.ino) ∈ ri, ¬ fs[ri[inodekey(inode.ino)]].directory, ¬ inode.directory, buf-opt.some? → # buf-opt.buf = VFS_PAGE_SIZE ⊦ ⟪aubifs_truncate#(n, inode.size / VFS_PAGE_SIZE, fi, ro, fo; buf-opt, inode, boolvar, err, ri, fs, log, boolvar0)⟫ (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))
Used simplifier rules: ⊦ ubifs-cons(fs, ri, ro, fi, fo, log) → log-cons(log, fs); (ss)% ⊦ ubifs-cons(fs, ri, ro, fi, fo, log) → ri-inj(ri); (ss)%⊦ valid-file-ino(ino, fs, ri) ↔ inodekey(ino) ∈ ri ∧ ¬ fs[ri[inodekey(ino)]].directory; (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)