| ⟨afs_inode_sync#(new_inode.size:= m0; dirs, files1); inode := getinode(inode.ino, dirs, files1); err := ESUCCESS⟩ ( ino = ino1 ∧ ino0 = ino3 ∧ (isdir ↔ isdir0) ∧ pageno = pageno0 ∧ buf-opt = buf-opt1 ∧ files1 = files0 ∧ dirs = dirs0 ∧ inode = inode0 ∧ err = ESUCCESS), isdir ↔ inode.size ≤ m0 ∧ ino ≠ 0 ∧ (m0 / VFS_PAGE_SIZE ∈ content ∨ buf-opt.some?), files0[ino4] = mkfile(m, md0, m1, content1), files[ino4] = mkfile(m0, md, # links(ino4, dirs), content0), buf-opt = none, content = files[inode.ino].content, files1 = files[ino2, files[ino2].content:= (content upto ino0)], ino = inode.size % VFS_PAGE_SIZE, ino0 = min(m0, inode.size), ino2 = inode.ino, ino5 = 0, ino6 = 0, inode = mkinode(ino4, md, false, # links(ino4, dirs), 0, m0), ¬ isdir, new_inode = inode, afs-cons(dirs, files), afs-cons(dirs0, files0), files ~ files0, ino4 ∈ files, n0 ≤ # buf0, inode.size ≤ m0 → ino ≠ 0 → VFS_PAGE_SIZE ≠ 0 ⊦ VFS_PAGE_SIZE = 0, ino4 ∈ files0 ∧ m = m0 |
⟨inode := getinode(inode.ino, dirs1, files2); err := ESUCCESS⟩ ( ino = ino1 ∧ ino0 = ino3 ∧ (isdir ↔ isdir0) ∧ pageno = pageno0 ∧ buf-opt = buf-opt1 ∧ files2 = files0 ∧ dirs1 = dirs0 ∧ inode = inode0 ∧ err = ESUCCESS), ⟨afs_inode_sync#(new_inode.size:= m0; dirs, files1)⟩ (dirs = dirs1 ∧ files1 = files2), isdir ↔ inode.size ≤ m0 ∧ ino ≠ 0 ∧ (m0 / VFS_PAGE_SIZE ∈ content ∨ buf-opt.some?), files[ino4] = mkfile(m0, md, # links(ino4, dirs), content0), files0[ino4] = mkfile(m, md0, m1, content1), buf-opt = none, content = files[inode.ino].content, files1 = files[ino2, files[ino2].content:= (content upto ino0)], ino = inode.size % VFS_PAGE_SIZE, ino0 = min(m0, inode.size), ino2 = inode.ino, ino5 = 0, ino6 = 0, inode = mkinode(ino4, md, false, # links(ino4, dirs), 0, m0), ¬ isdir, new_inode = inode, afs-cons(dirs0, files0), afs-cons(dirs, files), files ~ files0, ino4 ∈ files, n0 ≤ # buf0, inode.size ≤ m0 → ino ≠ 0 → VFS_PAGE_SIZE ≠ 0 ⊦ VFS_PAGE_SIZE = 0, ino4 ∈ files0 ∧ m = m0