| VFS_PAGE_SIZE = n0 + (ino2 + ino5) % VFS_PAGE_SIZE, buf = mkbuf(VFS_PAGE_SIZE), err = ESUCCESS, min(ino1 - ino2 + ino5, n0) ≠ 0, ino2 + ino5 ≤ ino1, ino5 = 0 → files = files1 ⊦ [afs_readpage#(inode, (ino2 + ino5) / VFS_PAGE_SIZE, dirs, files, asynced; buf, err); if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced); if err = ESUCCESS then {buf := copy(buf0, ino5, buf, (ino2 + ino5) % VFS_PAGE_SIZE, min(ino1 - ino2 + ino5, n0)); afs_writepage#(inode, (ino2 + ino5) / VFS_PAGE_SIZE, buf, dirs; err, files; asynced)}; n := min(ino1 - ino2 + ino5, n0); if err = ESUCCESS then ino5 := ino5 + n] (ino5 = 0 → files = files1) |
VFS_PAGE_SIZE = n0 + (ino2 + ino5) % VFS_PAGE_SIZE, buf = mkbuf(VFS_PAGE_SIZE), err = ESUCCESS, pageno = (ino2 + ino5) / VFS_PAGE_SIZE, ino2 + ino5 ≤ ino1, ino5 = 0 → files = files1 ⊦ [if pre-readpage(inode, pageno, buf, dirs, files) then { {if pageno ∈ files[inode.ino].content then buf := files[inode.ino].content[pageno] else buf := zeropage; err := ESUCCESS} or fail#(; ; err)} else abort; if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced); if err = ESUCCESS then {buf := copy(buf0, ino5, buf, (ino2 + ino5) % VFS_PAGE_SIZE, min(ino1 - ino2 + ino5, n0)); afs_writepage#(inode, (ino2 + ino5) / VFS_PAGE_SIZE, buf, dirs; err, files; asynced)}; n := min(ino1 - ino2 + ino5, n0); if err = ESUCCESS then ino5 := ino5 + n] (ino5 = 0 → files = files1), VFS_PAGE_SIZE = 0, min(ino1 - ino2 + ino5, n0) = 0
Used simplifier rules: afs_readpage#(INODE, PAGENO, DIRS, FILES, ASYNCED; PBUF, ERR) {if pre-readpage(INODE, PAGENO, PBUF, DIRS, FILES) then { {if PAGENO ∈ FILES[INODE.ino].content then PBUF := FILES[INODE.ino].content[PAGENO] else PBUF := zeropage; ERR := ESUCCESS} or fail#(; ; ERR)} else abort };