| icache0[m] = mkientry(true, mkinode(m0, md, boolvar, m1, m2, m3)), err = ESUCCESS, files = files0, inode = mkinode(m0, md, boolvar, m1, m2, m3), icache-cons(icache0, dirs, files0), pre-write-inode(inode, dirs, files), m ∈ icache0 ⊦ [fail#(; ; err); asynced := ?; icache1 := icache0; if err = ESUCCESS then {asynced := false; icache_set_status#(m, asynced; err, icache1)}] (m0 = m ∧ (∀ ino0. ino0 ≠ m ∧ ino0 ∈ files0 → ino0 ∈ files ∧ (files ⊕ icache1)[ino0] = (files0 ⊕ icache0)[ino0])) |
icache0[m] = mkientry(true, mkinode(m0, md, boolvar, m1, m2, m3)), icache-cons(icache0, dirs, files0), m ∈ icache0, m0 ∈ dirs ∧ m1 = dirs[m0].nlink ∧ m3 = dirs[m0].size ∧ m2 = dirs[m0].nsubdirs ∧ boolvar ∨ m0 ∈ files0 ∧ m1 = files0[m0].nlink ∧ m2 = 0 ∧ ¬ boolvar ⊦ [fail#(; ; err); asynced := ?; icache1 := icache0; if err = ESUCCESS then {asynced := false; icache_set_status#(m, asynced; err, icache1)}] (m0 = m ∧ (∀ ino. ino ≠ m ∧ ino ∈ files0 → (files0 ⊕ icache1)[ino] = (files0 ⊕ icache0)[ino]))
Used simplifier rules: ⊦ 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)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).directory ↔ boolvar; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).nsubdirs = m1; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).size = m2; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).nlink = m0; (s)% ⊦ valid-dir-ino(ino, dirs, files) ↔ ino ∈ dirs; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).ino = m; (s)%⊦ valid-dir-inode(inode, dirs, files) ↔ valid-dir-ino(inode.ino, dirs, files) ∧ inode.nlink = dirs[inode.ino].nlink ∧ inode.size = dirs[inode.ino].size ∧ inode.nsubdirs = dirs[inode.ino].nsubdirs ∧ inode.directory; (s)%⊦ valid-wb-inode(inode, dirs, files) ↔ valid-dir-inode(inode, dirs, files) ∨ valid-file-inode(inode, dirs, files); (s)%⊦ pre-write-inode(inode, dirs, files) ↔ valid-wb-inode(inode, dirs, files); (s)