| asynced1 ↔ asynced, files = files0, inode = mkinode(m, md, boolvar, m0, m1, m2), pcache0 = pcache ⊦ [err := ESUCCESS; let n = 0, ino = inode.ino, asynced0 = ?, asynced = ? in while n * VFS_PAGE_SIZE < inode.size ∧ err = ESUCCESS do {/* (fsync-pages-overwrite : invariant afs-cons(dirs, files) ∧ pcache-cons(pcache, dirs, files) ∧ getinode(ino, dirs, files) = getinode(ino, dirs, files`) ∧ ino = inode.ino ∧ ino ∈ files ∧ (∀ key. (key ∈ pcache ↔ key ∈ pcache`) ∧ pcache[key].page = (pcache`)[key].page ∧ (pcache[key].dirty → (pcache`)[key].dirty)) ∧ ( err = ESUCCESS → (∀ pageno. (pageno < n ⊃ (pageno ∈ files[ino].content ↔ pageno ∈ (files` ⊕ pcache`)[ino].content) ∧ files[ino].content[pageno] = (files` ⊕ pcache`)[ino].content[pageno] ; (pageno ∈ files[ino].content ↔ pageno ∈ (files`)[ino].content) ∧ files[ino].content[pageno] = (files`)[ino].content[pageno] )))) */; pcache_check_page#(ino, n, pcache; asynced0, asynced, err); if asynced0 ∧ asynced then let buf = ? in {pcache_get#(ino, n, pcache; asynced0, buf, err); 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#(ino, n, asynced; err, pcache)}}; n := n + 1}] ∀ ino. ino ≠ m ∧ ino ∈ files0 → ino ∈ files ∧ mkfile(files[ino].size, files[ino].meta, files[ino].nlink, files[ino].content ⊕ mkcontent(ino, pcache)) = mkfile(files0[ino].size, files0[ino].meta, files0[ino].nlink, files0[ino].content ⊕ mkcontent(ino, pcache0)) |
asynced1 ↔ asynced, files = files0, inode = mkinode(m, md, boolvar, m0, m1, m2), pcache0 = pcache ⊦ [let n = 0, ino = inode.ino, asynced0 = ?, asynced = ? in {err := ESUCCESS; while n * VFS_PAGE_SIZE < inode.size ∧ err = ESUCCESS do {/* (fsync-pages-overwrite : invariant afs-cons(dirs, files) ∧ pcache-cons(pcache, dirs, files) ∧ getinode(ino, dirs, files) = getinode(ino, dirs, files`) ∧ ino = inode.ino ∧ ino ∈ files ∧ (∀ key. (key ∈ pcache ↔ key ∈ pcache`) ∧ pcache[key].page = (pcache`)[key].page ∧ (pcache[key].dirty → (pcache`)[key].dirty)) ∧ ( err = ESUCCESS → (∀ pageno. (pageno < n ⊃ (pageno ∈ files[ino].content ↔ pageno ∈ (files` ⊕ pcache`)[ino].content) ∧ files[ino].content[pageno] = (files` ⊕ pcache`)[ino].content[pageno] ; (pageno ∈ files[ino].content ↔ pageno ∈ (files`)[ino].content) ∧ files[ino].content[pageno] = (files`)[ino].content[pageno] )))) */; pcache_check_page#(ino, n, pcache; asynced0, asynced, err); if asynced0 ∧ asynced then let buf = ? in {pcache_get#(ino, n, pcache; asynced0, buf, err); 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#(ino, n, asynced; err, pcache)}}; n := n + 1}}] ∀ ino. ino ≠ m ∧ ino ∈ files0 → ino ∈ files ∧ mkfile(files[ino].size, files[ino].meta, files[ino].nlink, files[ino].content ⊕ mkcontent(ino, pcache)) = mkfile(files0[ino].size, files0[ino].meta, files0[ino].nlink, files0[ino].content ⊕ mkcontent(ino, pcache0))