| # buf-opt.buf = VFS_PAGE_SIZE, VFS_PAGE_SIZE = n0 + m2 % VFS_PAGE_SIZE, dirs[key.ino] = mkdir(m0, md0, m4, m5, entries), files0[m3] = mkfile(m1, md1, # links(m3, dirs), content0), buf-opt.some?, afs-cons (dirs, files0[m3, mkfile(m, md, # links(m3, dirs), content0[m2 / VFS_PAGE_SIZE, fill(buf-opt.buf, zero, m2 % VFS_PAGE_SIZE, n0)] upto m2)]), afs-cons(dirs, files0), synced(dirs, icache, pcache0), key ∈ dcache, m3 ∈ files0, m2 ≤ m, asynced1 → synced(files0, icache, pcache0), ∀ key. key ∈ pcache0 → key.data?, ∀ key. key ∈ dcache → key.dentry? ∧ key.name = dcache[key].name ∧ valid-dentry(key.ino, dcache[key], dirs, files0) ⊦ m2 % VFS_PAGE_SIZE = 0, 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 ∈ files0) ∧ dcache[key].name ∈ entries ∧ dcache[key].ino = entries[dcache[key].name] ∧ dcache[key].dentry? |
# buf-opt.buf = VFS_PAGE_SIZE, VFS_PAGE_SIZE = n0 + m2 % VFS_PAGE_SIZE, files0[m3] = mkfile(m1, md1, # links(m3, dirs), content0), dirs[key.ino] = mkdir(m0, md0, m4, m5, entries), buf-opt.some?, afs-cons(dirs, files0), afs-cons (dirs, files0[m3, mkfile(m, md, # links(m3, dirs), content0[m2 / VFS_PAGE_SIZE, fill(buf-opt.buf, zero, m2 % VFS_PAGE_SIZE, n0)] upto m2)]), synced(dirs, icache, pcache0), m3 ∈ files0, key ∈ dcache, m2 ≤ m, asynced1 → synced(files0, icache, pcache0), ∀ key. key ∈ pcache0 → key.data?, ∀ key0. key0 ∈ dcache → key0.dentry? ∧ key0.name = dcache[key0].name ∧ key0.ino ∈ dirs ∧ (links(key0.ino, dirs) ≠ ∅ ∨ key0.ino = ROOT_INO) ∧ (dcache[key0].ino ∈ dirs ∨ dcache[key0].ino ∈ files0) ∧ dcache[key0].name ∈ dirs[key0.ino].entries ∧ dcache[key0].ino = dirs[key0.ino].entries[dcache[key0].name] ∧ dcache[key0].dentry? ⊦ m2 % VFS_PAGE_SIZE = 0, 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 ∈ files0) ∧ dcache[key].name ∈ entries ∧ dcache[key].ino = entries[dcache[key].name] ∧ dcache[key].dentry?
Used simplifier rules: ⊦ valid-ino(ino, dirs, files) ↔ ino ∈ dirs ∨ ino ∈ files; (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)