| # apebs = # wlar, apebs[n4] = mkpeb(aehdr, avhdr, buf2, m0, false), vols[v][vtblpnum3] = ⌜n4⌝ , avols[v][vtblpnum3] = mapped(buf2, m), wlar[n4] = wl-entry(m1, used), buf0 = mkbuf(vtblpnum5 + n1), err = ESUCCESS, err = err0, aehdr.valid?, avhdr.valid?, vtblpnum3 < # vols[v], vtblpnum3 < # avols[v], n4 < # wlar, abs(avols, apebs, vols, q), bflipset-cons(bflipset, wlar), ebm-cons(avols), is-aligned(vtblpnum5, EB_PAGE_SIZE), is-aligned(n1, EB_PAGE_SIZE), ubi-io-inv(apebs), ubi-io-peb-inv(mkpeb(aehdr, avhdr, buf2, m0, false)), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, vtblpnum4), valid-eraseq(q), valid-eraseq(wlar, q), valid-eraseq(apebs, q), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum4), valid-wl(apebs, wlar), v ∈ vols, v ∈ avols, vtblpnum5 ≤ LEB_SIZE, m ≤ LEB_SIZE, m0 ≤ LEB_SIZE, vtblpnum5 + n1 ≤ LEB_SIZE, n3 + n1 ≤ # buf, n1 + n3 ≤ # buf, m ≤ vtblpnum5, m0 ≤ vtblpnum5, ⌊err2⌋ , ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪buf0 := copy(apebs[vols[v][vtblpnum3].pnum].data, 0, buf0, 0, vtblpnum5); err2 := err, buf1 := buf0; if err2 = ESUCCESS then {buf1 := copy(buf, n3, buf1, vtblpnum5, n1); debug#("ubi: moving data from PEB " + vols[v][vtblpnum3].pnum.toString); ubi_change#(v, vtblpnum3, vtblpnum5 + n1, buf1, EB_PAGE_SIZE; vols, wlar, q, bflipset, vtblpnum4, sqnum, apebs; err2)} else debug#("ubi: failed to read data from PEB " + vols[v][vtblpnum3].pnum.toString)⟫ ⟨ebm_write#(v, vtblpnum3, vtblpnum5, n3, n1, buf; avols; err1)⟩ (abs(avols, apebs, vols, q) ∧ err2 = err1), n1 = 0, vtblpnum4 = n4, VTBL_VOLID ∈ vols |
# apebs = # wlar, wlar[n4] = wl-entry(m1, used), avols[v][vtblpnum3] = mapped(buf2, m), vols[v][vtblpnum3] = ⌜n4⌝ , apebs[n4] = mkpeb(aehdr, avhdr, buf2, m0, false), buf0 = mkbuf(vtblpnum5 + n1), err = err0, err = ESUCCESS, avhdr.valid?, aehdr.valid?, vols[v][vtblpnum3].pnum < # apebs, n4 < # wlar, vtblpnum3 < # avols[v], vtblpnum3 < # vols[v], abs(avols, apebs, vols, q), bflipset-cons(bflipset, wlar), ebm-cons(avols), is-aligned(n1, EB_PAGE_SIZE), is-aligned(vtblpnum5, EB_PAGE_SIZE), ubi-io-inv(apebs), ubi-io-peb-inv(mkpeb(aehdr, avhdr, buf2, m0, false)), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, vtblpnum4), valid-eraseq(apebs, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum4), valid-wl(apebs, wlar), v ∈ avols, v ∈ vols, 0 + vtblpnum5 ≤ # apebs[vols[v][vtblpnum3].pnum].data, 0 + vtblpnum5 ≤ # buf0, m0 ≤ vtblpnum5, m ≤ vtblpnum5, n1 + n3 ≤ # buf, n3 + n1 ≤ # buf, vtblpnum5 + n1 ≤ LEB_SIZE, m0 ≤ LEB_SIZE, m ≤ LEB_SIZE, vtblpnum5 ≤ LEB_SIZE, ⌊err2⌋ , ⌊err0⌋ ∨ err0 = ESUCCESS ⊦ ⟪err2 := err, buf1 := copy(apebs[vols[v][vtblpnum3].pnum].data, 0, buf0, 0, vtblpnum5); if err2 = ESUCCESS then {buf1 := copy(buf, n3, buf1, vtblpnum5, n1); debug#("ubi: moving data from PEB " + vols[v][vtblpnum3].pnum.toString); ubi_change#(v, vtblpnum3, vtblpnum5 + n1, buf1, EB_PAGE_SIZE; vols, wlar, q, bflipset, vtblpnum4, sqnum, apebs; err2)} else debug#("ubi: failed to read data from PEB " + vols[v][vtblpnum3].pnum.toString)⟫ ⟨ebm_write#(v, vtblpnum3, vtblpnum5, n3, n1, buf; avols; err1)⟩ (abs(avols, apebs, vols, q) ∧ err2 = err1), vols[v][vtblpnum3] = unmapped, n1 = 0, vtblpnum4 = n4, VTBL_VOLID ∈ vols
Used simplifier rules: ⊦ ¬ ⌊ESUCCESS⌋ ; (s)% ⊦ n + 0 = n; (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic% ⊦ # mkbuf(n) = n; (s)% ⊦ m ≤ m + n; (s)%⊦ v ∈ avols ∧ m < # avols[v] ∧ abs(avols, apebs, vols, q) → m < # vols[v]; (ss)% ⊦ v ∈ avols ∧ abs(avols, apebs, vols, q) → v ∈ vols; (ss)% ⊦ ⌜m⌝ .pnum = m; (s)% ⊦ unmapped ≠ ⌜m⌝ ; (s)% ⊦ m ≤ n ↔ ¬ n < m; (ss)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic%fle: ⊦ m < n ∧ n ≤ n0 → m < n0; (forward) from specification nat% ⊦ m < n → n ≠ 0; (s)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).data = buf; (s)%⊦ v ∈ avols ∧ m < # avols[v] ∧ avols[v][m] = mapped(buf, n) ∧ ebm-cons(avols) → # buf = LEB_SIZE; (s)% ⊦ ¬ n < n; (s)