| (key.ino = m1 ⊃ mkdir(m0 + 1, md1, # links(key.ino, dirs0), m4, entries1[str, ino0]);mkdir(m5, md3, m6, m7, entries0)) = mkdir(m, md0, m2, m3, entries), dirs0[key.ino] = mkdir(m5, md3, m6, m7, entries0), dirs0[m1] = mkdir(m0, md2, # links(m1, dirs0), m4, entries1), afs-cons(dirs0, files0), afs-cons(dirs0[m1, mkdir(m0 + 1, md1, # links(m1, dirs0), m4, entries1[str, ino0])], (files0 ++ ino0)[ino0, mkfile(0, md, 1, ∅)]), synced(dirs0, icache0, pcache), key ∈ dcache[dentrykey(m1, str), mkdentry(str, ino0)], m1 ∈ dirs0, asynced1 → synced(files0, icache0, pcache), key ∈ dcache → key.dentry? ∧ key.name = dcache[key].name ∧ key.ino ∈ dirs0 ∧ (links(key.ino, dirs0) ≠ ∅ ∨ key.ino = ROOT_INO) ∧ (dcache[key].ino ∈ dirs0 ∨ dcache[key].ino ∈ files0) ∧ dcache[key].name ∈ entries0 ∧ dcache[key].ino = entries0[dcache[key].name] ∧ dcache[key].dentry?, ∀ key0. key0 ∈ dcache → key0.dentry? ∧ key0.name = dcache[key0].name ∧ key0.ino ∈ dirs0 ∧ (links(key0.ino, dirs0) ≠ ∅ ∨ key0.ino = ROOT_INO) ∧ (dcache[key0].ino ∈ dirs0 ∨ dcache[key0].ino ∈ files0) ∧ dcache[key0].name ∈ dirs0[key0.ino].entries ∧ dcache[key0].ino = dirs0[key0.ino].entries[dcache[key0].name] ∧ dcache[key0].dentry?, links(m1, dirs0) ≠ ∅ ∨ m1 = ROOT_INO ⊦ ino0 = 0, ino0 ∈ dirs0, ino0 ∈ files0, str ∈ entries1, key.dentry? ∧ key.name = dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].name ∧ key.ino ∈ dirs0 ∧ (links(key.ino, dirs0) ≠ ∅ ∨ key.ino = ROOT_INO) ∧ ( dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].ino ∈ dirs0 ∨ dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].ino = ino0 ∨ dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].ino ∈ files0) ∧ dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].name ∈ entries ∧ dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].ino = entries[dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].name] ∧ dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].dentry? |
(key.ino = m1 ⊃ mkdir(m0 + 1, md1, # links(key.ino, dirs0), m4, entries1[str, ino0]);mkdir(m5, md3, m6, m7, entries0)) = mkdir(m, md0, m2, m3, entries), dirs0[m1] = mkdir(m0, md2, # links(m1, dirs0), m4, entries1), dirs0[key.ino] = mkdir(m5, md3, m6, m7, entries0), afs-cons(dirs0[m1, mkdir(m0 + 1, md1, # links(m1, dirs0), m4, entries1[str, ino0])], (files0 ++ ino0)[ino0, mkfile(0, md, 1, ∅)]), afs-cons(dirs0, files0), synced(dirs0, icache0, pcache), m1 ∈ dirs0, key ∈ dcache[dentrykey(m1, str), mkdentry(str, ino0)], key ∈ dcache → key.dentry? ∧ key.name = dcache[key].name ∧ key.ino ∈ dirs0 ∧ (links(key.ino, dirs0) ≠ ∅ ∨ key.ino = ROOT_INO) ∧ (dcache[key].ino ∈ dirs0 ∨ dcache[key].ino ∈ files0) ∧ dcache[key].name ∈ entries0 ∧ dcache[key].ino = entries0[dcache[key].name] ∧ dcache[key].dentry?, asynced1 → synced(files0, icache0, pcache), ∀ key0. key0 ∈ dcache → key0.dentry? ∧ key0.name = dcache[key0].name ∧ key0.ino ∈ dirs0 ∧ (links(key0.ino, dirs0) ≠ ∅ ∨ key0.ino = ROOT_INO) ∧ (dcache[key0].ino ∈ dirs0 ∨ dcache[key0].ino ∈ files0) ∧ dcache[key0].name ∈ dirs0[key0.ino].entries ∧ dcache[key0].ino = dirs0[key0.ino].entries[dcache[key0].name] ∧ dcache[key0].dentry?, links(m1, dirs0) ≠ ∅ ∨ m1 = ROOT_INO ⊦ ino0 = 0, key = dentrykey(m1, str), str ∈ entries1, ino0 ∈ files0, ino0 ∈ dirs0, key.dentry? ∧ key.name = dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].name ∧ key.ino ∈ dirs0 ∧ (links(key.ino, dirs0) ≠ ∅ ∨ key.ino = ROOT_INO) ∧ ( dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].ino ∈ dirs0 ∨ dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].ino = ino0 ∨ dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].ino ∈ files0) ∧ dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].name ∈ entries ∧ dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].ino = entries[dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].name] ∧ dcache[dentrykey(m1, str), mkdentry(str, ino0)][key].dentry?
Used simplifier rules: ⊦ dentrykey(m, str).ino = m; (s)%⊦ mkdir(m, md, m0, m1, entries) = mkdir(m2, md0, m3, m4, entries0) ↔ m = m2 ∧ md = md0 ∧ m0 = m3 ∧ m1 = m4 ∧ entries = entries0; (ws)% ⊦ key ∈ dcache[key, dent]; (s)% ⊦ dentrykey(m, str).dentry?; (s)% ⊦ dentrykey(m, str).name = str; (s)% ⊦ dcache[key, dent][key] = dent; (s)% ⊦ mkdentry(str, m).name = str; (s)% ⊦ mkdentry(str, m).ino = m; (s)% ⊦ mkdentry(str, m).dentry?; (s)%afs-cons-dir-nlink: ⊦ afs-cons(dirs, files) ∧ ino ∈ dirs ∧ dirs[ino] = mkdir(n0, md, n, n1, entries) → # links(ino, dirs) = n; (forward) from specification afs-base% ⊦ str ∈ entries[str, ino]; (s)% ⊦ entries[str, ino][str] = ino; (s) Used formulas: key = dentrykey(m1, str)