| icache[m] = mkientry(boolvar, mkinode(m1, md1, boolvar0, m3, m4, m5)), dirs[m] = mkdir(m0, md0, # links(m, dirs), m2, entries), afs-cons(dirs[m, mkdir(m0, md, # links(m, dirs), m2, entries)], files), afs-cons(dirs, files), dcache-cons(dcache, dirs, files), synced(dirs, icache, pcache), m ∈ icache, m ∈ dirs, asynced2 → synced(files, icache, pcache) ⊦ ∀ key. key ∈ dcache → key.dentry? ∧ key.name = dcache[key].name ∧ valid-dentry(key.ino, dcache[key], dirs[m, mkdir(m0, md, # links(m, dirs), m2, entries)], files) |
dirs[m] = mkdir(m0, md0, # links(m, dirs), m2, entries), icache[m] = mkientry(boolvar, mkinode(m1, md1, boolvar0, m3, m4, m5)), afs-cons(dirs, files), afs-cons(dirs[m, mkdir(m0, md, # links(m, dirs), m2, entries)], files), dcache-cons(dcache, dirs, files), synced(dirs, icache, pcache), key ∈ dcache, m ∈ dirs, m ∈ icache, asynced2 → synced(files, icache, pcache) ⊦ key.dentry? ∧ key.name = dcache[key].name ∧ key.ino ∈ dirs ∧ (links(key.ino, dirs) ≠ ∅ ∨ key.ino = ROOT_INO) ∧ (dcache[key].ino ∈ dirs ∨ dcache[key].ino ∈ files) ∧ dcache[key].name ∈ (key.ino = m ⊃ mkdir(m0, md, # links(key.ino, dirs), m2, entries);dirs[key.ino]).entries ∧ dcache[key].ino = (key.ino = m ⊃ mkdir(m0, md, # links(key.ino, dirs), m2, entries);dirs[key.ino]).entries[dcache[key].name] ∧ dcache[key].dentry?
Used simplifier rules: ⊦ dirs[ino, ad][ino0] = (ino0 = ino ∧ ino ∈ dirs ⊃ ad;dirs[ino0]); (s)% ⊦ valid-ino(ino, dirs, files) ↔ ino ∈ dirs ∨ ino ∈ files; (s)%⊦ ino ∈ dirs ∧ dirs[ino] = mkdir(m0, md0, n1, n2, entries) → links(ino0, dirs[ino, mkdir(m, md, n, n0, entries)]) = links(ino0, dirs); (s)% ⊦ ino ∈ dirs[ino0, ad] ↔ ino ∈ dirs; (s)%⊦ valid-parent-ino(ino, dirs, files) ↔ ino ∈ dirs ∧ (links(ino, dirs) ≠ ∅ ∨ ino = ROOT_INO); (s)%⊦ valid-dentry(ino, dent, dirs, files) ↔ valid-parent-ino(ino, dirs, files) ∧ valid-ino(dent.ino, dirs, files) ∧ dent.name ∈ dirs[ino].entries ∧ dent.ino = dirs[ino].entries[dent.name] ∧ dent.dentry?; (s)