| asynced ↔ asynced0, pcache[datakey(m, n0)] = mkpentry(true, buf0), files0[m] = mkfile(m1, md0, # links(m, dirs), content), files[m] = mkfile(m0, md1, # links(m, dirs), content0), asynced0, err = ESUCCESS, ino = m, key = datakey(ino, pageno), pageno = n0, pe = pcache[key], n0 * VFS_PAGE_SIZE < m2, afs-cons(dirs, files), afs-cons(dirs, files0), dcache-cons(dcache, dirs, files), dcache-cons(dcache, dirs, files0), icache-cons(icache, dirs, files), icache-cons(icache, dirs, files0), pcache-cons(pcache, dirs, files), pcache-cons(pcache0, dirs, files0), synced(dirs, icache, pcache), synced(dirs, icache, pcache0), datakey(m, n0) ∈ pcache, m ∈ files, m ∈ files0, key ∈ pcache ⊦ ⟪buf := pe.page; asynced := true; err := ESUCCESS; n := n0; inode := mkinode(m, md, false, # links(m, dirs), 0, m2); if err = ESUCCESS then afs_writepage#(inode, n, buf, dirs; err, files; asynced1); if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced1); if err = ESUCCESS then {asynced := false; pcache_set_status#(m, n, asynced; err, pcache)}; n := n + 1⟫ ( icache-cons(icache, dirs, files) ∧ dcache-cons(dcache, dirs, files) ∧ pcache-cons(pcache, dirs, files) ∧ synced(dirs, icache, pcache) ∧ afs-cons(dirs, files) ∧ m ∈ files ∧ # links(m, dirs) = files[m].nlink ∧ inode.size + VFS_PAGE_SIZE - n * VFS_PAGE_SIZE < inode.size + VFS_PAGE_SIZE - n0 * VFS_PAGE_SIZE) |
asynced ↔ asynced0, files[m] = mkfile(m0, md1, # links(m, dirs), content0), files0[m] = mkfile(m1, md0, # links(m, dirs), content), pcache[datakey(m, n0)] = mkpentry(true, buf0), asynced0, err = ESUCCESS, ino = m, key = datakey(ino, pageno), pageno = n0, pe = pcache[key], n0 * VFS_PAGE_SIZE < m2, afs-cons(dirs, files0), afs-cons(dirs, files), dcache-cons(dcache, dirs, files0), dcache-cons(dcache, dirs, files), icache-cons(icache, dirs, files0), icache-cons(icache, dirs, files), pcache-cons(pcache0, dirs, files0), pcache-cons(pcache, dirs, files), synced(dirs, icache, pcache0), synced(dirs, icache, pcache), key ∈ pcache, m ∈ files0, m ∈ files, datakey(m, n0) ∈ pcache ⊦ ⟪asynced := true; err := ESUCCESS; n := n0; inode := mkinode(m, md, false, # links(m, dirs), 0, m2); if err = ESUCCESS then afs_writepage#(inode, n, pe.page, dirs; err, files; asynced1); if err = ESUCCESS then afs_check_commit#(dirs, files; err; asynced1); if err = ESUCCESS then {asynced := false; pcache_set_status#(m, n, asynced; err, pcache)}; n := n + 1⟫ ( icache-cons(icache, dirs, files) ∧ dcache-cons(dcache, dirs, files) ∧ pcache-cons(pcache, dirs, files) ∧ synced(dirs, icache, pcache) ∧ afs-cons(dirs, files) ∧ m ∈ files ∧ # links(m, dirs) = files[m].nlink ∧ inode.size + VFS_PAGE_SIZE - n * VFS_PAGE_SIZE < inode.size + VFS_PAGE_SIZE - n0 * VFS_PAGE_SIZE)