| m1 + n1 = m1 / VFS_PAGE_SIZE * VFS_PAGE_SIZE + VFS_PAGE_SIZE, VFS_PAGE_SIZE = n3 + (m0 + ino0) % VFS_PAGE_SIZE, of[fd] = mkfile(m, mode, m0), files1[m] = mkfile(m1, md1, # links(m, dirs), content0), dirs[m] = mkdir(m8, md3, m9, m10, entries), files[m] = mkfile(m2, md0, m7, content), m1 = n2 + m1 / VFS_PAGE_SIZE * VFS_PAGE_SIZE, dom of < ino3, afs-cons(dirs, files), afs-cons(dirs, files1), of-cons (of, dirs, files[m, mkfile(m2, md0, m7, content[(m0 + ino0) / VFS_PAGE_SIZE, copy(buf0, ino0, zeropage, (m0 + ino0) % VFS_PAGE_SIZE, min(n4, n3))])]), of-cons(of, dirs, files1), of-cons(of, dirs, files), fd ∈ of, m1 / VFS_PAGE_SIZE ∈ content0, m ∈ files1, ROOT_INO ∈ dirs, ino0 + min(n4, n3) ≤ # buf0, (m0 + ino0) % VFS_PAGE_SIZE + min(n4, n3) ≤ VFS_PAGE_SIZE, n2 + n1 ≤ VFS_PAGE_SIZE, n4 + ino0 ≤ # buf0, ino0 ≤ # buf0 ⊦ n4 + ino0 = 0, min(n4, n3) = 0, n2 = 0, (m0 + ino0) / VFS_PAGE_SIZE ∈ content, mode ≠ MODE_W ∧ mode ≠ MODE_RW, (m ∈ files → m7 = # links(m, dirs)) ∧ ( m ∈ files ∧ n ∈ content[(m0 + ino0) / VFS_PAGE_SIZE, copy(buf0, ino0, zeropage, (m0 + ino0) % VFS_PAGE_SIZE, min(n4, n3))] → # content[(m0 + ino0) / VFS_PAGE_SIZE, copy(buf0, ino0, zeropage, (m0 + ino0) % VFS_PAGE_SIZE, min(n4, n3))][n] = VFS_PAGE_SIZE) |
Used simplifier rules: ⊦ n ≠ n0 → (n ∈ content[n0, buf] ↔ n ∈ content); (s)% ⊦ n ∈ content ∧ ¬ n0 ∈ content → content[n0, buf][n] = content[n]; (s)%⊦ afs-cons(dirs, files) ∧ ino ∈ files ∧ files[ino] = mkfile(m, md, n0, content) ∧ n ∈ content → # content[n] = VFS_PAGE_SIZE; (s)%afs-cons-file-nlink: ⊦ afs-cons(dirs, files) ∧ ino ∈ files ∧ files[ino] = mkfile(m, md, n, content) → # links(ino, dirs) = n; (forward) from specification afs-base% ⊦ n ∈ content[n0, buf] ↔ n = n0 ∨ n ∈ content; (ws)% ⊦ content[n, buf][n] = buf; (s)% ⊦ # copy(buf, m, buf0, m0, n) = # buf0; (s)% ⊦ # zeropage = VFS_PAGE_SIZE; (s) Used formulas: n = (m0 + ino0) / VFS_PAGE_SIZE