| ⟨if ino ∈ dirs then dirs[ino].meta := inode.meta⟩ (dirs = dirs0 ∧ files = files0), files1[m] = mkfile(m0, md0, m1, content0), buf-opt = buf-opt0, dirs = dirs1, files = files1[m, mkfile(m0, md0, m1, content0 upto min(n0, m2))], ino = inode.ino, inode = mkinode(m, md, false, m1, 0, n0), inode0 = mkinode(m, md, false, m1, 0, m2), m ∈ files1, buf-opt0.some? → # buf-opt0.buf = VFS_PAGE_SIZE ⊦ ⟨afs_truncate#(n0, m2 / VFS_PAGE_SIZE; buf-opt, inode0, boolvar1, err, dirs1, files1, boolvar2)⟩ ( buf-opt = buf-opt0 ∧ inode0 = (m ∈ dirs0 ⊃ mkinode(m, dirs0[m].meta, true, dirs0[m].nlink, dirs0[m].nsubdirs, dirs0[m].size) ;mkinode(m, files0[m].meta, false, files0[m].nlink, 0, files0[m].size) ) ∧ ¬ boolvar1 ∧ err = ESUCCESS ∧ dirs1 = dirs0 ∧ files1 = files0), ino ∈ files, m2 ≤ n0 ∧ m2 % VFS_PAGE_SIZE ≠ 0 ∧ (m2 / VFS_PAGE_SIZE ∈ content0 ∨ buf-opt0.some?) |
⟨dirs[ino].meta := inode.meta⟩ (dirs = dirs0 ∧ files = files0), files1[m] = mkfile(m0, md0, m1, content0), buf-opt = buf-opt0, dirs = dirs1, files = files1[m, mkfile(m0, md0, m1, content0 upto min(n0, m2))], ino = inode.ino, inode = mkinode(m, md, false, m1, 0, n0), inode0 = mkinode(m, md, false, m1, 0, m2), m ∈ files1, ino ∈ dirs, buf-opt0.some? → # buf-opt0.buf = VFS_PAGE_SIZE ⊦ ⟨afs_truncate#(n0, m2 / VFS_PAGE_SIZE; buf-opt, inode0, boolvar1, err, dirs1, files1, boolvar2)⟩ ( buf-opt = buf-opt0 ∧ inode0 = (m ∈ dirs0 ⊃ mkinode(m, dirs0[m].meta, true, dirs0[m].nlink, dirs0[m].nsubdirs, dirs0[m].size) ;mkinode(m, files0[m].meta, false, files0[m].nlink, 0, files0[m].size) ) ∧ ¬ boolvar1 ∧ err = ESUCCESS ∧ dirs1 = dirs0 ∧ files1 = files0), ino ∈ files, m2 ≤ n0 ∧ m2 % VFS_PAGE_SIZE ≠ 0 ∧ (m2 / VFS_PAGE_SIZE ∈ content0 ∨ buf-opt0.some?)
⟨skip⟩ (dirs = dirs0 ∧ files = files0), files1[m] = mkfile(m0, md0, m1, content0), buf-opt = buf-opt0, dirs = dirs1, files = files1[m, mkfile(m0, md0, m1, content0 upto min(n0, m2))], ino = inode.ino, inode = mkinode(m, md, false, m1, 0, n0), inode0 = mkinode(m, md, false, m1, 0, m2), m ∈ files1, buf-opt0.some? → # buf-opt0.buf = VFS_PAGE_SIZE ⊦ ⟨afs_truncate#(n0, m2 / VFS_PAGE_SIZE; buf-opt, inode0, boolvar1, err, dirs1, files1, boolvar2)⟩ ( buf-opt = buf-opt0 ∧ inode0 = (m ∈ dirs0 ⊃ mkinode(m, dirs0[m].meta, true, dirs0[m].nlink, dirs0[m].nsubdirs, dirs0[m].size) ;mkinode(m, files0[m].meta, false, files0[m].nlink, 0, files0[m].size) ) ∧ ¬ boolvar1 ∧ err = ESUCCESS ∧ dirs1 = dirs0 ∧ files1 = files0), ino ∈ files, ino ∈ dirs, m2 ≤ n0 ∧ m2 % VFS_PAGE_SIZE ≠ 0 ∧ (m2 / VFS_PAGE_SIZE ∈ content0 ∨ buf-opt0.some?)