| # apebs = # wlar, LEB_SIZE = n1 + n0, apebs0 = apebs, n = n0, q0 = q, vols0 = vols, vtblpnum0 = vtblpnum, vtblpnum1 = EB_PAGE_SIZE, vtblpnum2 = vtblpnum3, vtblpnum3 < # vols[v], bflipset-cons(bflipset, wlar), is-aligned(n0, EB_PAGE_SIZE), ubi-io-inv(apebs), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, vtblpnum), valid-eraseq(q), valid-eraseq(wlar, q), valid-eraseq(apebs, q), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum), valid-wl(apebs, wlar), v ∈ vols, n0 ≤ LEB_SIZE, n0 ≤ # buf ⊦ ⟪if n ≤ LEB_SIZE ∧ n ≤ # buf ∧ v ∈ vols ∧ vtblpnum2 < # vols[v] ∧ is-aligned(n, EB_PAGE_SIZE) then let vtblpnum = ? in {ubi_wl_get_peb#(; vtblpnum, wlar, q, apebs; err); if err = ESUCCESS then ubi_atomic_leb_change#(v, vtblpnum2, vtblpnum, n, buf, vtblpnum1; vols, wlar, q, bflipset, vtblpnum0, sqnum, apebs; err); if err ≠ ESUCCESS then debug#("ubi: change to PEB " + vtblpnum.toString + " failed")} else abort⟫ ( # apebs = # wlar ∧ unique-sqns(apebs) ∧ valid-global-sqn(apebs, sqnum) ∧ valid-wl(apebs, wlar) ∧ valid-eraseq(q) ∧ valid-eraseq(wlar, q) ∧ valid-eraseq(apebs, q) ∧ ¬ VTBL_VOLID ∈ vols ∧ bflipset-cons(bflipset, wlar) ∧ valid-ebatbl(apebs, wlar, vols, vtblpnum0) ∧ valid-vtbl(apebs, vols, wlar, vtblpnum0) ∧ ubi-io-inv(apebs) ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err ≠ ESUCCESS → vols = vols0 ∧ id(apebs, apebs0, mapped-pebs(vols0)) ∧ q.lebrefs ⊆ q0.lebrefs) ∧ ( err = ESUCCESS → v ∈ vols0 ∧ vtblpnum3 < # vols0[v] ∧ q.lebrefs ⊆ q0.lebrefs ++ (v × vtblpnum3) ∧ (vols0[v][vtblpnum3] ≠ unmapped → id(apebs, apebs0, mapped-pebs(vols0) -- vols0[v][vtblpnum3].pnum)) ∧ (vols0[v][vtblpnum3] = unmapped → id(apebs, apebs0, mapped-pebs(vols0))) ∧ (∃ n. vols = vols0[v, vols0[v][vtblpnum3, ⌜n⌝ ]] ∧ apebs[n].data = subarray(buf, 0, n0) + mkempbuf(n1) ∧ apebs[n].fill = align↑(datasize(buf, n0), EB_PAGE_SIZE)))), VTBL_VOLID ∈ vols, vtblpnum ∈ q |
# apebs = # wlar, LEB_SIZE = n1 + n0, apebs0 = apebs, n = n0, q0 = q, vols0 = vols, vtblpnum0 = vtblpnum, vtblpnum1 = EB_PAGE_SIZE, vtblpnum2 = vtblpnum3, vtblpnum3 < # vols[v], bflipset-cons(bflipset, wlar), is-aligned(n0, EB_PAGE_SIZE), ubi-io-inv(apebs), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, vtblpnum), valid-eraseq(apebs, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum), valid-wl(apebs, wlar), v ∈ vols, n0 ≤ # buf, n0 ≤ LEB_SIZE ⊦ ⟪let vtblpnum = ? in {ubi_wl_get_peb#(; vtblpnum, wlar, q, apebs; err); if err = ESUCCESS then ubi_atomic_leb_change#(v, vtblpnum2, vtblpnum, n, buf, vtblpnum1; vols, wlar, q, bflipset, vtblpnum0, sqnum, apebs; err); if err ≠ ESUCCESS then debug#("ubi: change to PEB " + vtblpnum.toString + " failed")}⟫ ( # apebs = # wlar ∧ unique-sqns(apebs) ∧ valid-global-sqn(apebs, sqnum) ∧ valid-wl(apebs, wlar) ∧ valid-eraseq(q) ∧ valid-eraseq(wlar, q) ∧ valid-eraseq(apebs, q) ∧ ¬ VTBL_VOLID ∈ vols ∧ bflipset-cons(bflipset, wlar) ∧ valid-ebatbl(apebs, wlar, vols, vtblpnum0) ∧ valid-vtbl(apebs, vols, wlar, vtblpnum0) ∧ ubi-io-inv(apebs) ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err ≠ ESUCCESS → vols = vols0 ∧ id(apebs, apebs0, mapped-pebs(vols0)) ∧ q.lebrefs ⊆ q0.lebrefs) ∧ ( err = ESUCCESS → v ∈ vols0 ∧ vtblpnum3 < # vols0[v] ∧ q.lebrefs ⊆ q0.lebrefs ++ (v × vtblpnum3) ∧ (vols0[v][vtblpnum3] ≠ unmapped → id(apebs, apebs0, mapped-pebs(vols0) -- vols0[v][vtblpnum3].pnum)) ∧ (vols0[v][vtblpnum3] = unmapped → id(apebs, apebs0, mapped-pebs(vols0))) ∧ (∃ n. vols = vols0[v, vols0[v][vtblpnum3, ⌜n⌝ ]] ∧ apebs[n].data = subarray(buf, 0, n0) + mkempbuf(n1) ∧ apebs[n].fill = align↑(datasize(buf, n0), EB_PAGE_SIZE)))), vtblpnum ∈ q, VTBL_VOLID ∈ vols