| # buf2 = n2 + n0 + n, # buf1 = # buf2, # apebs = # wlar, # vols[v] = # avols[v], avols[v][vtblpnum5] = mapped(buf0, m0), vols[v][vtblpnum5] = ⌜n1⌝ , apebs[n1] = mkpeb(aehdr, avhdr, buf0, m, false), n1 < # wlar, vtblpnum5 < # avols[v], bflipset-cons(bflipset, wlar), ebm-cons(avols), range=(buf1, 0, buf2, 0, n0), range=(buf1, n0 + n, buf2, n0 + n, n2), ubi-io-inv(apebs), ubi-io-peb-inv(mkpeb(aehdr, avhdr, buf0, m, false)), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, vtblpnum3), valid-eraseq(q), valid-eraseq(wlar, q), valid-eraseq(apebs, q), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum3), valid-wl(apebs, wlar), v ∈ avols, v ∈ vols, vtblpnum4 + n ≤ LEB_SIZE, n0 + n ≤ # buf2, m ≤ m0, ⌊err0⌋ , ¬ VTBL_VOLID ∈ vols ⊦ ⟨ebm_read#(v, vtblpnum5, vtblpnum4, n0, n, avols; buf2; err1)⟩ (buf1 = buf2 ∧ err0 = err1) |
# vols[v] = # avols[v], # apebs = # wlar, # buf1 = # buf2, # buf2 = n2 + n0 + n, apebs[n1] = mkpeb(aehdr, avhdr, buf, m, false), vols[v][vtblpnum5] = ⌜n1⌝ , avols[v][vtblpnum5] = mapped(buf, m0), buf0 = buf2, vtblpnum = vtblpnum4, vtblpnum0 = vtblpnum5, vtblpnum5 < # avols[v], n1 < # wlar, bflipset-cons(bflipset, wlar), ebm-cons(avols), range=(buf1, n0 + n, buf2, n0 + n, n2), range=(buf1, 0, buf2, 0, n0), ubi-io-inv(apebs), ubi-io-peb-inv(mkpeb(aehdr, avhdr, buf, m, false)), unique-sqns(apebs), valid-ebatbl(apebs, wlar, vols, vtblpnum3), valid-eraseq(apebs, q), valid-eraseq(wlar, q), valid-eraseq(q), valid-global-sqn(apebs, sqnum), valid-vtbl(apebs, vols, wlar, vtblpnum3), valid-wl(apebs, wlar), v ∈ vols, v ∈ avols, m ≤ m0, n0 + n ≤ # buf2, vtblpnum4 + n ≤ LEB_SIZE, ⌊err0⌋ ⊦ ⟨if v ∈ avols ∧ vtblpnum0 < # avols[v] ∧ vtblpnum + n ≤ LEB_SIZE ∧ n0 + n ≤ # buf0 then {fail_or_success#(; ; err); if err = ESUCCESS then if ¬ avols[v][vtblpnum0].mapped? then buf0 := fill(buf0, empty, n0, n) else buf0 := copy(avols[v][vtblpnum0].data, vtblpnum, buf0, n0, n) else choose buf with # buf = # buf0 ∧ range=(buf, 0, buf0, 0, n0) ∧ range=(buf, n0 + n, buf0, n0 + n, # buf0 - n0 + n) in buf0 := buf} else abort⟩ (buf1 = buf0 ∧ err0 = err), VTBL_VOLID ∈ vols
Used simplifier rules: ebm_read#(VOLID, LNUM, OFFSET, N0, N, AVOLS; BUF; ERR) {if VOLID ∈ AVOLS ∧ LNUM < # AVOLS[VOLID] ∧ OFFSET + N ≤ LEB_SIZE ∧ N0 + N ≤ # BUF then {fail_or_success#(; ; ERR); if ERR = ESUCCESS then if ¬ AVOLS[VOLID][LNUM].mapped? then BUF := fill(BUF, empty, N0, N) else BUF := copy(AVOLS[VOLID][LNUM].data, OFFSET, BUF, N0, N) else choose BUF0 with # BUF0 = # BUF ∧ range=(BUF0, 0, BUF, 0, N0) ∧ range=(BUF0, N0 + N, BUF, N0 + N, # BUF - N0 + N) in BUF := BUF0} else abort };