| apebs[m2] = mkpeb(aehdr1, avhdr, buf0, m1, false), pebs[m2] = mkpeb(buf1, m, boolvar), ¬ boolvar, buf = mkbuf(EB_PAGE_SIZE), m2 < # pebs, m2 < # apebs, abs(pebs, apebs), mtd-cons(pebs), ubi-io-inv(apebs) ⊦ ⟪ubi_io_read#(m2, 0, 0, EB_PAGE_SIZE, pebs; buf; bitflips, err); aehdr := aehdr0; if err = ESUCCESS then if buf = mkempbuf(# buf) then aehdr := empty else let ehdr = ? in {decode_echeader#(EB_PAGE_SIZE, buf; 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) |
apebs[m2] = mkpeb(aehdr1, avhdr, buf0, m1, false), pebs[m2] = mkpeb(buf1, m, false), buf = mkbuf(EB_PAGE_SIZE), 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) ⊦ ⟪ubi_io_read#(m2, 0, 0, EB_PAGE_SIZE, pebs; buf; bitflips, err); aehdr := aehdr0; if err = ESUCCESS then if buf = mkempbuf(# buf) then aehdr := empty else let ehdr = ? in {decode_echeader#(EB_PAGE_SIZE, buf; 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)
Used simplifier rules: abs-bad: ⊦ n < # apebs ∧ abs(pebs, apebs) ∧ pebs[n] = mkpeb(buf0, m0, boolvar0) ∧ apebs[n] = mkpeb(aehdr, avhdr, buf, m1, boolvar1) → (boolvar0 ↔ boolvar1); (forward) from specification ubi-io-abs%abs-fwd: ⊦ n < # pebs ∧ pebs[n] = peb ∧ abs(pebs, apebs) → n < # apebs ∧ abs-peb(peb, apebs[n]); (forward) from specification ubi-io-abs