| # buf = VFS_PAGE_SIZE, afs-cons(dirs, files), dcache-cons(dcache, dirs, files), icache-cons(icache, dirs, files), pcache-cons(pcache, dirs, files), synced(dirs, icache, pcache), m ∈ files, asynced → synced(files, icache, pcache) ⊦ ⟪cache_writepage#(mkinode(m, md, boolvar, m0, m1, m2), pageno, buf, asynced, dirs; err, files, pcache, asynced0)⟫ ( icache-cons(icache, dirs, files) ∧ dcache-cons(dcache, dirs, files) ∧ pcache-cons(pcache, dirs, files) ∧ synced(dirs, icache, pcache) ∧ (asynced → synced(files, icache, pcache)) ∧ afs-cons(dirs, files)) |
# buf = VFS_PAGE_SIZE, asynced1 ↔ asynced, inode = mkinode(m, md, boolvar, m0, m1, m2), afs-cons(dirs, files), dcache-cons(dcache, dirs, files), icache-cons(icache, dirs, files), pcache-cons(pcache, dirs, files), synced(dirs, icache, pcache), m ∈ files, asynced → synced(files, icache, pcache) ⊦ ⟪if pre-writepage(inode, pageno, buf, dirs, files) then let asynced = true in {if asynced1 then {afs_writepage#(inode, pageno, buf, dirs; err, files; asynced0); asynced := false} else err := ESUCCESS; if err = ESUCCESS then pcache_set#(inode.ino, pageno, buf, asynced; err, pcache)} else abort⟫ ( icache-cons(icache, dirs, files) ∧ dcache-cons(dcache, dirs, files) ∧ pcache-cons(pcache, dirs, files) ∧ synced(dirs, icache, pcache) ∧ (asynced → synced(files, icache, pcache)) ∧ afs-cons(dirs, files))
Used simplifier rules: writepage: ⊦ ;