| as ∩ range ri = ∅, ro.inodes?, fo.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(ri), ri-inj(fi), ubifs-cons(fs, ri, ro, fi, fo, log) ⊦ ubifs-cons(fs \ as, ri, ro, ri, ro, []) |
fs[ri[key]].key = key, as ∩ range ri = ∅, 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), key ∈ ri, ri[key] ∈ fs, key.inode? → fs[ri[key]].inode? ∧ key.ino ≠ 0, key.dentry? → fs[ri[key]].dentry? ∧ inodekey(key.ino) ∈ ri ∧ inodekey(fs[ri[key]].ino) ∈ ri ∧ ¬ inodekey(key.ino) ∈ ro ∧ ¬ inodekey(fs[ri[key]].ino) ∈ ro ∧ fs[ri[inodekey(key.ino)]].directory, key.data? → fs[ri[key]].data? ∧ inodekey(key.ino) ∈ ri ∧ ¬ fs[ri[inodekey(key.ino)]].directory ∧ # fs[ri[key]].data = VFS_PAGE_SIZE ⊦ (fs \ as)[ri[key]].key = key ∧ (key.inode? → (fs \ as)[ri[key]].inode? ∧ key.ino ≠ 0) ∧ ( key.dentry? → (fs \ as)[ri[key]].dentry? ∧ inodekey(key.ino) ∈ ri ∧ inodekey((fs \ as)[ri[key]].ino) ∈ ri ∧ ¬ inodekey(key.ino) ∈ ro ∧ ¬ inodekey((fs \ as)[ri[key]].ino) ∈ ro ∧ (fs \ as)[ri[inodekey(key.ino)]].directory) ∧ ( key.data? → (fs \ as)[ri[key]].data? ∧ inodekey(key.ino) ∈ ri ∧ ¬ (fs \ as)[ri[inodekey(key.ino)]].directory ∧ # (fs \ as)[ri[key]].data = VFS_PAGE_SIZE)
Used simplifier rules: ubifs-cons-reduce: ⊦ ubifs-cons(fs0, ri0, ro0, fi0, fo0, log0) → ( ubifs-cons(fs1, ri1, ro1, fi1, fo1, log1) ↔ ¬ inodekey(0) ∈ ri1 ∧ (ro0.inodes? → ro1.inodes?) ∧ (fo0.inodes? → fo1.inodes?) ∧ (ro0 ⊆ dom ri0 → (∀ key. key ∈ ro1 → key ∈ ri1)) ∧ (fo0 ⊆ dom fi0 → (∀ key. key ∈ fo1 → key ∈ fi1)) ∧ (¬ dups(log0) → ¬ dups(log1)) ∧ (∀ key. ( key ∈ ri0 → ri0[key] ∈ fs0 ∧ fs0[ri0[key]].key = key ∧ (key.inode? → fs0[ri0[key]].inode? ∧ key.ino ≠ 0) ∧ ( key.dentry? → fs0[ri0[key]].dentry? ∧ inodekey(key.ino) ∈ ri0 ∧ inodekey(fs0[ri0[key]].ino) ∈ ri0 ∧ ¬ inodekey(key.ino) ∈ ro0 ∧ ¬ inodekey(fs0[ri0[key]].ino) ∈ ro0 ∧ fs0[ri0[inodekey(key.ino)]].directory) ∧ ( key.data? → fs0[ri0[key]].data? ∧ inodekey(key.ino) ∈ ri0 ∧ ¬ fs0[ri0[inodekey(key.ino)]].directory ∧ # fs0[ri0[key]].data = VFS_PAGE_SIZE)) → key ∈ ri1 → ri1[key] ∈ fs1 ∧ fs1[ri1[key]].key = key ∧ (key.inode? → fs1[ri1[key]].inode? ∧ key.ino ≠ 0) ∧ ( key.dentry? → fs1[ri1[key]].dentry? ∧ inodekey(key.ino) ∈ ri1 ∧ inodekey(fs1[ri1[key]].ino) ∈ ri1 ∧ ¬ inodekey(key.ino) ∈ ro1 ∧ ¬ inodekey(fs1[ri1[key]].ino) ∈ ro1 ∧ fs1[ri1[inodekey(key.ino)]].directory) ∧ ( key.data? → fs1[ri1[key]].data? ∧ inodekey(key.ino) ∈ ri1 ∧ ¬ fs1[ri1[inodekey(key.ino)]].directory ∧ # fs1[ri1[key]].data = VFS_PAGE_SIZE)) ∧ (∀ adr. ( adr ∈ log0 → adr ∈ fs0 ∧ ( fs0[adr].inode? → fs0[adr].key.inode? ∧ fs0[adr].key.ino ≠ 0) ∧ (fs0[adr].dentry? → fs0[adr].key.dentry?) ∧ (fs0[adr].data? → fs0[adr].key.data?) ∧ (fs0[adr].trunc? → fs0[adr].key.inode?)) → adr ∈ log1 → adr ∈ fs1 ∧ ( fs1[adr].inode? → fs1[adr].key.inode? ∧ fs1[adr].key.ino ≠ 0) ∧ (fs1[adr].dentry? → fs1[adr].key.dentry?) ∧ (fs1[adr].data? → fs1[adr].key.data?) ∧ (fs1[adr].trunc? → fs1[adr].key.inode?)));% ⊦ ¬ adr ∈ []; (s)% ⊦ key ∈ ri ∧ as ∩ range ri = ∅ → ¬ ri[key] ∈ as; (s)%int-c: ⊦ as ∩ as0 = as0 ∩ as; from specification set-union[node-store]%int-a: ⊦ (as ∩ as0) ∩ as1 = as ∩ as0 ∩ as1; from specification set-union[node-store]% ⊦ adr ∈ fs \ as ↔ adr ∈ fs ∧ ¬ adr ∈ as; (ws)% ⊦ ¬ dups([]); (s)% ⊦ ubifs-cons(fs, ri, ro, fi, fo, log) → ¬ dups(log); (s)% ⊦ ubifs-cons(fs, ri, ro, fi, fo, log) ∧ key ∈ ro → key ∈ ri; (ss)% ⊦ ubifs-cons(fs, ri, ro, fi, fo, log) → ¬ inodekey(0) ∈ ri; (s)