| dirs0[ino1] = mkdir(m5, md2, # links(ino1, dirs0), m10, entries1), entries[str] = entries2[str], dirs0[ino0] = mkdir(m2, md1, # links(ino0, dirs0), m8, entries), entries0[str] = entries2[str], files0[entries2[str]] = mkfile(m0, md6, # links(entries2[str], dirs0), content0), dirs0[m11] = mkdir(m1, md5, # links(m11, dirs0), m9, entries3), dirs0[ino2] = mkdir(m4, md3, # links(ino2, dirs0), m6, entries0), entries1[str] = entries2[str], dirs0[ino3] = mkdir(m7, md4, # links(ino3, dirs0), m12, entries2), afs-cons(dirs0, files0), afs-cons (dirs0[m11, mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]])], files0[entries2[str], mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0)]), dcache-cons(dcache, dirs0, files0), synced(dirs0, icache0, pcache), str ∈ entries1, ino1 ∈ dirs0, str ∈ entries, ino0 ∈ dirs0, ino2 ∈ dirs0, str ∈ entries0, ino3 ∈ dirs0, str ∈ entries2, m11 ∈ dirs0, entries2[str] ∈ files0, asynced1 → synced(files0, icache0, pcache), links(ino1, dirs0) ≠ ∅ ∨ ino1 = ROOT_INO, links(ino0, dirs0) ≠ ∅ ∨ ino0 = ROOT_INO, links(ino2, dirs0) ≠ ∅ ∨ ino2 = ROOT_INO, links(m11, dirs0) ≠ ∅ ∨ m11 = ROOT_INO, links(ino3, dirs0) ≠ ∅ ∨ ino3 = ROOT_INO ⊦ str0 ∈ entries3, ∀ key. key ∈ dcache[dentrykey(m11, str0), mkdentry(str0, entries2[str])] → key.dentry? ∧ key.name = dcache[dentrykey(m11, str0), mkdentry(str0, entries2[str])][key].name ∧ valid-dentry (key.ino, dcache[dentrykey(m11, str0), mkdentry(str0, entries2[str])][key], dirs0[m11, mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]])], files0[entries2[str], mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0)]) |
dirs0[ino3] = mkdir(m7, md4, # links(ino3, dirs0), m12, entries2), entries1[str] = entries2[str], dirs0[ino2] = mkdir(m4, md3, # links(ino2, dirs0), m6, entries0), dirs0[m11] = mkdir(m1, md5, # links(m11, dirs0), m9, entries3), files0[entries2[str]] = mkfile(m0, md6, # links(entries2[str], dirs0), content0), entries0[str] = entries2[str], dirs0[ino0] = mkdir(m2, md1, # links(ino0, dirs0), m8, entries), entries[str] = entries2[str], dirs0[ino1] = mkdir(m5, md2, # links(ino1, dirs0), m10, entries1), afs-cons (dirs0[m11, mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]])], files0[entries2[str], mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0)]), afs-cons(dirs0, files0), dcache-cons(dcache, dirs0, files0), synced(dirs0, icache0, pcache), key ∈ dcache[dentrykey(m11, str0), mkdentry(str0, entries2[str])], entries2[str] ∈ files0, m11 ∈ dirs0, str ∈ entries2, ino3 ∈ dirs0, str ∈ entries0, ino2 ∈ dirs0, ino0 ∈ dirs0, str ∈ entries, ino1 ∈ dirs0, str ∈ entries1, asynced1 → synced(files0, icache0, pcache), links(ino3, dirs0) ≠ ∅ ∨ ino3 = ROOT_INO, links(m11, dirs0) ≠ ∅ ∨ m11 = ROOT_INO, links(ino2, dirs0) ≠ ∅ ∨ ino2 = ROOT_INO, links(ino0, dirs0) ≠ ∅ ∨ ino0 = ROOT_INO, links(ino1, dirs0) ≠ ∅ ∨ ino1 = ROOT_INO ⊦ str0 ∈ entries3, key.dentry? ∧ key.name = dcache[dentrykey(m11, str0), mkdentry(str0, entries2[str])][key].name ∧ key.ino ∈ dirs0 ∧ ((entries2[str] = key.ino ⊃ links(key.ino, dirs0) ++ mklink(m11, str0);links(key.ino, dirs0)) ≠ ∅ ∨ key.ino = ROOT_INO) ∧ ( dcache[dentrykey(m11, str0), mkdentry(str0, entries2[str])][key].ino ∈ dirs0 ∨ dcache[dentrykey(m11, str0), mkdentry(str0, entries2[str])][key].ino ∈ files0) ∧ dcache[dentrykey(m11, str0), mkdentry(str0, entries2[str])][key].name ∈ (key.ino = m11 ⊃ mkdir(m1 + 1, md0, # links(key.ino, dirs0), m9, entries3[str0, entries2[str]]);dirs0[key.ino]).entries ∧ dcache[dentrykey(m11, str0), mkdentry(str0, entries2[str])][key].ino = (key.ino = m11 ⊃ mkdir(m1 + 1, md0, # links(key.ino, dirs0), m9, entries3[str0, entries2[str]]);dirs0[key.ino]).entries [dcache[dentrykey(m11, str0), mkdentry(str0, entries2[str])][key].name ] ∧ dcache[dentrykey(m11, str0), mkdentry(str0, entries2[str])][key].dentry?
Used simplifier rules: ⊦ dirs[ino, ad][ino0] = (ino0 = ino ∧ ino ∈ dirs ⊃ ad;dirs[ino0]); (s)% ⊦ ino ∈ files[ino0, af] ↔ ino ∈ files; (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)%⊦ p_ino ∈ dirs → links (ino0, dirs[p_ino, mkdir(m0, md, n, n0, entries[str, ino])]) = (ino = ino0 ⊃ links(ino0, dirs[p_ino, mkdir(m0, md, n, n0, entries)]) ++ mklink(p_ino, str) ;(str ∈ entries ∧ entries[str] = ino0 ⊃ links(ino0, dirs[p_ino, mkdir(m0, md, n, n0, entries)]) -- mklink(p_ino, str) ;links(ino0, dirs[p_ino, mkdir(m0, md, n, n0, entries)]) ) ); (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)