| # buf-opt.buf = VFS_PAGE_SIZE, asynced ↔ false, VFS_PAGE_SIZE = n0 + m2 % VFS_PAGE_SIZE, files0[m3] = mkfile(m1, md1, # links(m3, dirs), content0), buf = some(fill(buf-opt.buf, zero, m2 % VFS_PAGE_SIZE, n0)).buf, err = ESUCCESS, ino = m3, pageno = m2 / VFS_PAGE_SIZE, pcache = truncate(m3, m2, pcache0), some(fill(buf-opt.buf, zero, m2 % VFS_PAGE_SIZE, n0)).some?, 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), dcache-cons(dcache, dirs, files0), icache-cons(icache, dirs, files0), pcache-cons(pcache0, dirs, files0), synced(dirs, icache, pcache0), m3 ∈ files0, m2 % VFS_PAGE_SIZE + n0 ≤ # buf-opt.buf, m2 ≤ m, asynced1 → synced(files0, icache, pcache0), ∀ key. key ∈ pcache0 → key.data? ⊦ ⟪let key = datakey(ino, pageno), pe = mkpentry(asynced, buf) in pcache[key] := pe; skip⟫ ( icache-cons (icache[m3, mkientry(false, mkinode(m3, md, false, # links(m3, dirs), 0, m))], 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)]) ∧ dcache-cons (dcache, 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)]) ∧ pcache-cons (pcache, 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[m3, mkientry(false, mkinode(m3, md, false, # links(m3, dirs), 0, m))], pcache) ∧ ( asynced1 → synced (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)], icache[m3, mkientry(false, mkinode(m3, md, false, # links(m3, dirs), 0, m))], pcache))), m2 % VFS_PAGE_SIZE = 0, VFS_PAGE_SIZE = 0 |
# buf-opt.buf = VFS_PAGE_SIZE, asynced ↔ false, VFS_PAGE_SIZE = n0 + m2 % VFS_PAGE_SIZE, files0[m3] = mkfile(m1, md1, # links(m3, dirs), content0), buf = some(fill(buf-opt.buf, zero, m2 % VFS_PAGE_SIZE, n0)).buf, err = ESUCCESS, ino = m3, key = datakey(ino, pageno), pageno = m2 / VFS_PAGE_SIZE, pcache = truncate(m3, m2, pcache0), pe = mkpentry(asynced, buf), buf-opt.some?, some(fill(buf-opt.buf, zero, m2 % VFS_PAGE_SIZE, n0)).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)]), dcache-cons(dcache, dirs, files0), icache-cons(icache, dirs, files0), pcache-cons(pcache0, dirs, files0), synced(dirs, icache, pcache0), m3 ∈ files0, m2 ≤ m, m2 % VFS_PAGE_SIZE + n0 ≤ # buf-opt.buf, asynced1 → synced(files0, icache, pcache0), ∀ key. key ∈ pcache0 → key.data? ⊦ ⟪pcache[key] := pe; skip⟫ ( icache-cons (icache[m3, mkientry(false, mkinode(m3, md, false, # links(m3, dirs), 0, m))], 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)]) ∧ dcache-cons (dcache, 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)]) ∧ pcache-cons (pcache, 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[m3, mkientry(false, mkinode(m3, md, false, # links(m3, dirs), 0, m))], pcache) ∧ ( asynced1 → synced (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)], icache[m3, mkientry(false, mkinode(m3, md, false, # links(m3, dirs), 0, m))], pcache))), m2 % VFS_PAGE_SIZE = 0, VFS_PAGE_SIZE = 0