| boolvar4 ↔ boolvar, boolvar1 ↔ boolvar2, 0 = fs[ri[inodekey(m)]].nsubdirs, adr = adr3, adr0 = adr1, adr2 = adr, buf-opt = buf-opt0, dirs = abs-dirs(fs, ri), err = ENOSPC, files = abs-files(fs, ri), inode = mkinode(m, md, false, m0, 0, m2), m0 = fs[ri[inodekey(m)]].nlink, nd = inodenode(inodekey(m), md, false, m0, 0, n), nd0 = truncnode(inodekey(m), min(n, m2)), p_inode = mkinode(m, md, false, m0, 0, m2), 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)), orphans-cons(fs, ri, ro0), replay-cons-strong(fs, ri, orphans(fs, ri), fi, fo, log), replay-cons-strong(fs, ri, ro0, fi, fo, log), ri-inj(ri), ri-inj(fi), ubifs-cons(fs, ri, orphans(fs, ri), fi, fo, log), ubifs-cons(fs, ri, ro0, fi, fo, log), inodekey(m) ∈ ri, asynced → boolvar0, buf-opt0.some? → # buf-opt0.buf = VFS_PAGE_SIZE, ∀ adr1, adr2. ¬(new(adr1 ' + adr2 ', fs) ∧ ¬ dups(adr1 ' + adr2 ')) ⊦ ⟨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, m2 ≤ n ∧ m2 % VFS_PAGE_SIZE ≠ 0 |
boolvar1 ↔ boolvar2, 0 = fs[ri[inodekey(m)]].nsubdirs, buf-opt = buf-opt0, dirs = abs-dirs(fs, ri), files = abs-files(fs, ri), p_inode = mkinode(m, md, false, fs[ri[inodekey(m)]].nlink, 0, m2), 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 → boolvar0, ∀ adr, adr0. adr ∈ fs ∨ adr0 ∈ fs ∨ adr = adr0 ⊦ ⟨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) ∧ (asynced → boolvar4) ∧ buf-opt = buf-opt0 ∧ mkinode(m, md, false, fs[ri[inodekey(m)]].nlink, 0, m2) = p_inode ∧ (boolvar1 ↔ boolvar2) ∧ ENOSPC = err0), m2 ≤ n ∧ m2 % VFS_PAGE_SIZE ≠ 0
Used simplifier rules: ⊦ abs-keys(orphans(fs0, ri0)) = abs-keys(orphans(fs, ri)) ↔ orphans(fs0, ri0) = 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)% ⊦ dups(adr ' + adr0 ') ↔ adr = adr0; (s)%a: ⊦ (ax + ax0) + ax1 = ax + ax0 + ax1; from specification list[address-list-set]% ⊦ new(adr ', fs) ↔ ¬ adr ∈ fs; (s)% ⊦ new(adr ' + log, fs) ↔ ¬ adr ∈ fs ∧ new(log, fs); (s)