| VFS_PAGE_SIZE = n3 + (n0 + n2) % VFS_PAGE_SIZE, buf = mkbuf(VFS_PAGE_SIZE), min(n1 - n0 + n2, n3) ≠ 0, write-inv(n0, n1, inode, buf1, n2, dirs, files0, files1), n0 + n2 ≤ n1 ⊦ [afs_readpage#(inode, (n0 + n2) / VFS_PAGE_SIZE, dirs, files1, asynced; buf, err); if err = ESUCCESS then afs_check_commit#(dirs, files1; err; asynced); if err = ESUCCESS then {buf := copy(buf1, n2, buf, (n0 + n2) % VFS_PAGE_SIZE, min(n1 - n0 + n2, n3)); afs_writepage#(inode, (n0 + n2) / VFS_PAGE_SIZE, buf, dirs; err, files1; asynced)}; n := min(n1 - n0 + n2, n3); if err = ESUCCESS then n2 := n2 + n] write-inv(n0, n1, inode, buf1, n2, dirs, files0, files1) |
⊦ [afs_readpage#(inode, n, dirs, files, asynced; buf, err)] (err = ESUCCESS ∧ buf = getpage(n, files[inode.ino].content) ∨ ⌊err⌋ )
asynced0 ↔ asynced, VFS_PAGE_SIZE = n3 + (n0 + n2) % VFS_PAGE_SIZE, buf = mkbuf(VFS_PAGE_SIZE), dirs0 = dirs, files2 = files1, inode0 = inode, n4 = (n0 + n2) / VFS_PAGE_SIZE, write-inv(n0, n1, inode, buf1, n2, dirs, files0, files1), n0 + n2 ≤ n1 ⊦ [afs_readpage#(inode, (n0 + n2) / VFS_PAGE_SIZE, dirs, files1, asynced; buf, err)] ( err = ESUCCESS ∧ buf = getpage(n4, files2[inode0.ino].content) ∨ ⌊err⌋ → [if err = ESUCCESS then afs_check_commit#(dirs, files1; err; asynced); if err = ESUCCESS then {buf := copy(buf1, n2, buf, (n0 + n2) % VFS_PAGE_SIZE, min(n1 - n0 + n2, n3)); afs_writepage#(inode, (n0 + n2) / VFS_PAGE_SIZE, buf, dirs; err, files1; asynced)}; n := min(n1 - n0 + n2, n3); if err = ESUCCESS then n2 := n2 + n] write-inv(n0, n1, inode, buf1, n2, dirs, files0, files1)), min(n1 - n0 + n2, n3) = 0