| # buf = VFS_PAGE_SIZE, asynced1 ↔ asynced0, 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-readpage(inode, pageno, buf, dirs, files) then let asynced0 = false, ino = inode.ino in {pcache_get#(ino, pageno, pcache; asynced0, buf, err); if ¬ asynced0 ∨ err ≠ ESUCCESS then {afs_readpage#(inode, pageno, dirs, files, asynced1; buf, err); if err = ESUCCESS ∧ buf ≠ zeropage then let asynced = false in pcache_set#(ino, pageno, buf, asynced; err, pcache)}} else abort⟫ (pcache-cons(pcache, dirs, files) ∧ synced(dirs, icache, pcache) ∧ (asynced → synced(files, icache, pcache))) |
# buf = VFS_PAGE_SIZE, asynced1 ↔ asynced0, 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) ⊦ ⟪let asynced0 = false, ino = inode.ino in {pcache_get#(ino, pageno, pcache; asynced0, buf, err); if ¬ asynced0 ∨ err ≠ ESUCCESS then {afs_readpage#(inode, pageno, dirs, files, asynced1; buf, err); if err = ESUCCESS ∧ buf ≠ zeropage then let asynced = false in pcache_set#(ino, pageno, buf, asynced; err, pcache)}}⟫ (pcache-cons(pcache, dirs, files) ∧ synced(dirs, icache, pcache) ∧ (asynced → synced(files, icache, pcache)))
Used simplifier rules: ⊦ pre-readpage(inode, n, buf, dirs, files) ↔ valid-file-ino(inode.ino, dirs, files) ∧ # buf = VFS_PAGE_SIZE; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).ino = m; (s)% ⊦ valid-file-ino(ino, dirs, files) ↔ ino ∈ files; (s)