| # buf2 = EB_PAGE_SIZE, apebs[m2] = mkpeb(aehdr1, avhdr, buf0, m1, false), pebs[m2] = mkpeb(buf1, m, false), aehdr = aehdr0, err = ESUCCESS, m2 < # pebs, m2 < # apebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, m, false), mkpeb(aehdr1, avhdr, buf0, m1, false)), mtd-cons(pebs), ubi-io-inv(apebs), EB_PAGE_SIZE ≤ PEB_SIZE, err = ESUCCESS → buf2 = subarray(buf1, 0, EB_PAGE_SIZE), err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟪if buf2 = emptypage then aehdr := empty else let ehdr = ? in {decode_echeader#(EB_PAGE_SIZE, buf2; ehdr; err); if err = ESUCCESS then aehdr := aechdr(ehdr.ec)}⟫ ⟨aubi_io_read_echdr#(m2, apebs; aehdr0; isbad, err0)⟩ (aehdr = aehdr0 ∧ (bitflips ↔ isbad) ∧ err = err0) |
# buf2 = EB_PAGE_SIZE, pebs[m2] = mkpeb(buf1, m, false), apebs[m2] = mkpeb(aehdr1, avhdr, buf0, m1, false), aehdr = aehdr0, buf2 = emptypage, err = ESUCCESS, m2 < # apebs, m2 < # pebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, m, false), mkpeb(aehdr1, avhdr, buf0, m1, false)), mtd-cons(pebs), ubi-io-inv(apebs), EB_PAGE_SIZE ≤ PEB_SIZE, err = ESUCCESS → buf2 = subarray(buf1, 0, EB_PAGE_SIZE), err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟪aehdr := empty⟫ ⟨aubi_io_read_echdr#(m2, apebs; aehdr0; isbad, err0)⟩ (aehdr = aehdr0 ∧ (bitflips ↔ isbad) ∧ err = err0)
# buf2 = EB_PAGE_SIZE, pebs[m2] = mkpeb(buf1, m, false), apebs[m2] = mkpeb(aehdr1, avhdr, buf0, m1, false), aehdr = aehdr0, err = ESUCCESS, m2 < # apebs, m2 < # pebs, abs(pebs, apebs), abs-peb(mkpeb(buf1, m, false), mkpeb(aehdr1, avhdr, buf0, m1, false)), mtd-cons(pebs), ubi-io-inv(apebs), EB_PAGE_SIZE ≤ PEB_SIZE, err = ESUCCESS → buf2 = subarray(buf1, 0, EB_PAGE_SIZE), err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟪let ehdr = ? in {decode_echeader#(EB_PAGE_SIZE, buf2; ehdr; err); if err = ESUCCESS then aehdr := aechdr(ehdr.ec)}⟫ ⟨aubi_io_read_echdr#(m2, apebs; aehdr0; isbad, err0)⟩ (aehdr = aehdr0 ∧ (bitflips ↔ isbad) ∧ err = err0), buf2 = emptypage