[Imprint][Data Privacy Statement][E-Mail]

View long theorem info. View the proof. Back to main index. View the specification. View theorem base summary, View theorem base listing, the used properties by spec, the dependency list, the symbol table,

Proof step 873 from proof refine-truncate (previous step)

fs0[ri0[inodekey(m)]] = inodenode(key0, md0, false, m1, 0, m4), ri = ri0[inodekey(m), adr2], m2 % VFS_PAGE_SIZE ≠ 0, adr1 ≠ adr2, orphans(fs0, ri0).inodes?, fo.inodes?, afs-cons(abs-dirs(fs0, ri0), abs-files(fs0, ri0)), file-node-cons(fs0, ri0), log-cons(log0, fs0), orphans-cons(fs0, ri0, orphans(fs0, ri0)), replay-cons-strong(fs0, ri0, orphans(fs0, ri0), fi, fo, log0), ri-inj(ri0), ri-inj(fi), ubifs-cons(fs0, ri0, orphans(fs0, ri0), fi, fo, log0), inodekey(m) ∈ ri0, ri0[inodekey(m)] ∈ fs0, m2 ≤ n, ¬ buf-opt0.some?, ¬ datakey(m, m2 / VFS_PAGE_SIZE) ∈ ri0, ¬ adr1 ∈ fs0, ¬ adr2 ∈ fs0, asynced → boolvar0 ⊦ [aubifs_core_index_truncate# (inodekey(m), m2, fi, orphans(fs0, ri0), fo, fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n)], (log0 + adr1 ') + adr2 ', boolvar4 ; ri); boolvar1 := false; inode := mkinode (m, inodenode(inodekey(m), md, false, m1, 0, n).meta, inodenode(inodekey(m), md, false, m1, 0, n).directory, inodenode(inodekey(m), md, false, m1, 0, n).nlink, inodenode(inodekey(m), md, false, m1, 0, n).nsubdirs, inodenode(inodekey(m), md, false, m1, 0, n).size); buf-opt := buf-opt0; if boolvar1 then buf-opt := some(inodenode(inodekey(m), md, false, m1, 0, n).data)] ( ubifs-cons (fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n)], ri, orphans(fs0, ri0), fi, fo, (log0 + adr1 ') + adr2 ') ∧ replay-cons-strong (fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n)], ri, orphans(fs0, ri0), fi, fo, (log0 + adr1 ') + adr2 ') ∧ file-node-cons(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n)], ri) ∧ orphans-cons(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n)], ri, orphans(fs0, ri0)) ∧ ri-inj(ri) ∧ m ≠ 0 → ⟨p_inode := mkinode(m, md, false, m1, 0, m2); files := abs-files(fs0, ri0); dirs := abs-dirs(fs0, ri0); afs_truncate#(n, m2 / VFS_PAGE_SIZE; buf-opt0, p_inode, boolvar2, err1, dirs, files, asynced)⟩ ( dirs = abs-dirs(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n)], ri) ∧ files = abs-files(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n)], ri) ∧ orphans (abs-dirs(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n)], ri), abs-files(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n)], ri)) = abs-keys(orphans(fs0, ri0)) ∧ (asynced → boolvar4) ∧ buf-opt = buf-opt0 ∧ inode = p_inode ∧ (boolvar1 ↔ boolvar2) ∧ ESUCCESS = err1))

Heuristic unfold applied rule call right

And obtained the following new goals

Proof step 874:
boolvar ↔ boolvar4, fs0[ri0[inodekey(m)]] = inodenode(key0, md0, false, m1, 0, m4), fs = fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n0)], key = inodekey(m), log = (log0 + adr1 ') + adr2 ', n = m2, ri = ri0[inodekey(m), adr2], ro = orphans(fs0, ri0), fo.inodes?, orphans(fs0, ri0).inodes?, afs-cons(abs-dirs(fs0, ri0), abs-files(fs0, ri0)), file-node-cons(fs0, ri0), log-cons(log0, fs0), orphans-cons(fs0, ri0, orphans(fs0, ri0)), replay-cons-strong(fs0, ri0, orphans(fs0, ri0), fi, fo, log0), ri-inj(fi), ri-inj(ri0), ubifs-cons(fs0, ri0, orphans(fs0, ri0), fi, fo, log0), ri0[inodekey(m)] ∈ fs0, inodekey(m) ∈ ri0, m2 ≤ n0, asynced → boolvar0 ⊦ [let ks = datakeys(key, n, ri) in ri := ri \ ks; boolvar1 := false; inode := mkinode (m, inodenode(inodekey(m), md, false, m1, 0, n0).meta, inodenode(inodekey(m), md, false, m1, 0, n0).directory, inodenode(inodekey(m), md, false, m1, 0, n0).nlink, inodenode(inodekey(m), md, false, m1, 0, n0).nsubdirs, inodenode(inodekey(m), md, false, m1, 0, n0).size); buf-opt := buf-opt0; if boolvar1 then buf-opt := some(inodenode(inodekey(m), md, false, m1, 0, n0).data)] ( ubifs-cons (fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n0)], ri, orphans(fs0, ri0), fi, fo, (log0 + adr1 ') + adr2 ') ∧ replay-cons-strong (fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n0)], ri, orphans(fs0, ri0), fi, fo, (log0 + adr1 ') + adr2 ') ∧ file-node-cons(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n0)], ri) ∧ orphans-cons(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n0)], ri, orphans(fs0, ri0)) ∧ ri-inj(ri) ∧ m ≠ 0 → ⟨p_inode := mkinode(m, md, false, m1, 0, m2); files := abs-files(fs0, ri0); dirs := abs-dirs(fs0, ri0); afs_truncate#(n0, m2 / VFS_PAGE_SIZE; buf-opt0, p_inode, boolvar2, err1, dirs, files, asynced)⟩ ( dirs = abs-dirs(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n0)], ri) ∧ files = abs-files(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n0)], ri) ∧ orphans (abs-dirs(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n0)], ri), abs-files(fs0[adr1, truncnode(inodekey(m), m2)][adr2, inodenode(inodekey(m), md, false, m1, 0, n0)], ri)) = abs-keys(orphans(fs0, ri0)) ∧ (asynced → boolvar4) ∧ buf-opt = buf-opt0 ∧ inode = p_inode ∧ (boolvar1 ↔ boolvar2) ∧ ESUCCESS = err1)), m2 % VFS_PAGE_SIZE = 0, adr1 = adr2, buf-opt0.some?, datakey(m, m2 / VFS_PAGE_SIZE) ∈ ri0, adr1 ∈ fs0, adr2 ∈ fs0

Rule argument

pos: right 1

Additional information

Used simplifier rules: aubifs_core_index_truncate#(KEY, N, FI, RO, FO, FS, LOG, CSYNCED; RI) {let KS = datakeys(KEY, N, RI) in RI := RI \ KS};