| pebs[m3] = mkpeb(buf1, 2 * EB_PAGE_SIZE + m2, false), apebs[m3] = mkpeb(aehdr, avhdr, buf0, m2, false), m = m1, m0 = m3, n0 = n, n1 = n2, avhdr.valid?, aehdr.valid?, m3 < # pebs, m3 < # apebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, 2 * EB_PAGE_SIZE + m2, false), mkpeb(aehdr, avhdr, buf0, m2, false)), is-aligned(n, EB_PAGE_SIZE), is-aligned(m1, EB_PAGE_SIZE), mtd-cons(pebs), ubi-io-inv(apebs), n2 + n ≤ # buf, m1 + n ≤ LEB_SIZE, m2 ≤ m1, ⌊err0⌋ ⊦ ⟨if ubi-io-write-data-pre(m0, m, n1, n0, buf, apebs) then {fail_or_success#(; ; err); if err = ESUCCESS then apebs[m0] := mkpeb (apebs[m0].echdr, apebs[m0].vidhdr, subarray(apebs[m0].data, 0, m) + subarray(buf, n1, n0) + mkempbuf(LEB_SIZE - m - n0), m + n0, apebs[m0].bad) else choose n with (n < n0 ∨ n = 0 ∧ n0 = 0) ∧ is-aligned(n, EB_PAGE_SIZE) in if n ≠ 0 then apebs[m0] := mkpeb (apebs[m0].echdr, apebs[m0].vidhdr, subarray(apebs[m0].data, 0, m) + subarray(buf, n1, n) + mkempbuf(LEB_SIZE - m - n), m + n, apebs[m0].bad)} else abort⟩ (abs(pebs, apebs) ∧ err0 = err) |
apebs[m3] = mkpeb(aehdr, avhdr, buf0, m2, false), pebs[m3] = mkpeb(buf1, 2 * EB_PAGE_SIZE + m2, false), m = m1, m0 = m3, n0 = n, n1 = n2, aehdr.valid?, avhdr.valid?, m3 < # apebs, m3 < # pebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, 2 * EB_PAGE_SIZE + m2, false), mkpeb(aehdr, avhdr, buf0, m2, false)), is-aligned(m1, EB_PAGE_SIZE), is-aligned(n, EB_PAGE_SIZE), mtd-cons(pebs), ubi-io-inv(apebs), ubi-io-write-data-pre(m0, m, n1, n0, buf, apebs), m2 ≤ m1, m1 + n ≤ LEB_SIZE, n2 + n ≤ # buf, ⌊err0⌋ ⊦ ⟨fail_or_success#(; ; err); if err = ESUCCESS then apebs[m0] := mkpeb (apebs[m0].echdr, apebs[m0].vidhdr, subarray(apebs[m0].data, 0, m) + subarray(buf, n1, n0) + mkempbuf(LEB_SIZE - m - n0), m + n0, apebs[m0].bad) else choose n with (n < n0 ∨ n = 0 ∧ n0 = 0) ∧ is-aligned(n, EB_PAGE_SIZE) in if n ≠ 0 then apebs[m0] := mkpeb (apebs[m0].echdr, apebs[m0].vidhdr, subarray(apebs[m0].data, 0, m) + subarray(buf, n1, n) + mkempbuf(LEB_SIZE - m - n), m + n, apebs[m0].bad)⟩ (abs(pebs, apebs) ∧ err0 = err)
apebs[m3] = mkpeb(aehdr, avhdr, buf0, m2, false), pebs[m3] = mkpeb(buf1, 2 * EB_PAGE_SIZE + m2, false), m = m1, m0 = m3, n0 = n, n1 = n2, aehdr.valid?, avhdr.valid?, m3 < # apebs, m3 < # pebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, 2 * EB_PAGE_SIZE + m2, false), mkpeb(aehdr, avhdr, buf0, m2, false)), is-aligned(m1, EB_PAGE_SIZE), is-aligned(n, EB_PAGE_SIZE), mtd-cons(pebs), ubi-io-inv(apebs), m2 ≤ m1, m1 + n ≤ LEB_SIZE, n2 + n ≤ # buf, ⌊err0⌋ ⊦ ⟨abort⟩ (abs(pebs, apebs) ∧ err0 = err), ubi-io-write-data-pre(m0, m, n1, n0, buf, apebs)