| apebs[m1] = mkpeb(aehdr, avhdr, buf0, 0, false), pebs[m1] = mkpeb(buf1, 2 * EB_PAGE_SIZE, false), n = align↑(datasize(buf, n), EB_PAGE_SIZE), datasize(buf, n) ≠ 0, aehdr.valid?, avhdr.valid?, m1 < # apebs, m1 < # pebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, 2 * EB_PAGE_SIZE, false), mkpeb(aehdr, avhdr, buf0, 0, false)), is-aligned(n, EB_PAGE_SIZE), mtd-cons(pebs), ubi-io-inv(apebs), n ≤ LEB_SIZE, n ≤ # buf ⊦ ⟪mtd_asm_write#(m1, 2 * EB_PAGE_SIZE, 0, n, buf; pebs; err)⟫ ⟨aubi_io_write_data_wl#(m1, n, buf; apebs; err0)⟩ (abs(pebs, apebs) ∧ err = err0) |
pebs[m1] = mkpeb(buf1, 2 * EB_PAGE_SIZE, false), apebs[m1] = mkpeb(aehdr, avhdr, buf0, 0, false), m = 2 * EB_PAGE_SIZE, m0 = m1, n = align↑(datasize(buf, n), EB_PAGE_SIZE), n0 = n, n1 = 0, avhdr.valid?, aehdr.valid?, m1 < # pebs, m1 < # apebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, 2 * EB_PAGE_SIZE, false), mkpeb(aehdr, avhdr, buf0, 0, false)), is-aligned(n, EB_PAGE_SIZE), mtd-cons(pebs), ubi-io-inv(apebs), n ≤ # buf, n ≤ LEB_SIZE ⊦ ⟪if m0 < # pebs ∧ ¬ pebs[m0].bad ∧ pebs[m0].fill ≤ m ∧ m + n0 ≤ PEB_SIZE ∧ n1 + n0 ≤ # buf ∧ is-aligned(m, EB_PAGE_SIZE) ∧ is-aligned(n0, EB_PAGE_SIZE) then {fail_or_success#(; ; err); if err = ESUCCESS then {pebs[m0].data := copy(buf, n1, pebs[m0].data, m, n0); pebs[m0].fill := m + n0} else choose n with (n < n0 ∨ n = 0 ∧ n0 = 0) ∧ is-aligned(n, EB_PAGE_SIZE) in if n ≠ 0 then {pebs[m0].data := copy(buf, n1, pebs[m0].data, m, n); pebs[m0].fill := m + n}} else abort⟫ ⟨aubi_io_write_data_wl#(m1, n, buf; apebs; err0)⟩ (abs(pebs, apebs) ∧ err = err0), datasize(buf, n) = 0
Used simplifier rules: mtd_asm_write#(PNUM, OFFSET, N0, N, BUF; PEBS; ERR) {if PNUM < # PEBS ∧ ¬ PEBS[PNUM].bad ∧ PEBS[PNUM].fill ≤ OFFSET ∧ OFFSET + N ≤ PEB_SIZE ∧ N0 + N ≤ # BUF ∧ is-aligned(OFFSET, EB_PAGE_SIZE) ∧ is-aligned(N, EB_PAGE_SIZE) then {fail_or_success#(; ; ERR); if ERR = ESUCCESS then {PEBS[PNUM].data := copy(BUF, N0, PEBS[PNUM].data, OFFSET, N); PEBS[PNUM].fill := OFFSET + N} else choose N1 with (N1 < N ∨ N1 = 0 ∧ N = 0) ∧ is-aligned(N1, EB_PAGE_SIZE) in if N1 ≠ 0 then {PEBS[PNUM].data := copy(BUF, N0, PEBS[PNUM].data, OFFSET, N1); PEBS[PNUM].fill := OFFSET + N1}} else abort };