| # avol0 = # lpt0 + m11, avol0[0] = mapped(buf), avol0[m3] = mapped(buf0), avol0[m2] = mapped(buf1), adr1 = adr2, avol4 = avol1, log1 = log2, lpt1 = lpt2, m4 = m5, orphans = ns1, disk-layout(mksb(adr0, m0, m2, m3, m9, m10, m11), # lpt0), ebm-vol-inv(avol0), ebm-vol-inv(subarray(avol0, m11, # lpt0)), is-encoded(mksb(adr0, m0, m2, m3, m9, m10, m11), buf), is-encoded(lpt0, lebs(avol0, m10, lptlebs(# lpt0, LEB_SIZE))), is-encoded(log0, buf1), is-encoded-pad(ns0, m9, buf0), mapped-full?(avol0, m10, lptlebs(# lpt0, LEB_SIZE)), m11 ≤ # avol0, avol0 ⊆ avol1, m1 ≠ LEB_SIZE → # buf1 = m1 ⊦ [persistence_io_recover#(; adr1, m4, orphans, log1, lpt1, sb0, logoff, m6, m7, avol1; err)] ( ( err = ESUCCESS → (∃ lpt5, log4, orphans2. disk-layout(sb0, # lpt5) ∧ sb0.main + # lpt5 = # avol1 ∧ avol1[0].mapped? ∧ is-encoded(sb0, avol1[0].data) ∧ avol1[sb0.orph].mapped? ∧ is-encoded-pad(orphans2, sb0.orphsize, avol1[sb0.orph].data) ∧ avol1[sb0.log].mapped? ∧ (logoff ≠ LEB_SIZE → # avol1[sb0.log].data = logoff) ∧ is-encoded(log4, avol1[sb0.log].data) ∧ mapped-full?(avol1, sb0.lpt, lptlebs(# lpt5, LEB_SIZE)) ∧ is-encoded(lpt5, lebs(avol1, sb0.lpt, lptlebs(# lpt5, LEB_SIZE)))) ∧ m6 = EB_PAGE_SIZE ∧ m7 = LEB_SIZE ∧ ebm-vol-inv(avol1)) ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ( err = ESUCCESS → sb0 = mksb(adr0, m0, m2, m3, m9, m10, m11) ∧ # avol1 = # avol0 ∧ adr1 = adr0 ∧ m4 = m0 ∧ # lpt1 = # avol1 - m11 ∧ is-encoded(lpt1, lebs(avol1, m10, lptlebs(# avol1 - m11, LEB_SIZE))) ∧ lebs(avol1, m10, lptlebs(# avol1 - m11, LEB_SIZE)) = lebs(avol0, m10, lptlebs(# avol1 - m11, LEB_SIZE)) ∧ is-encoded(log1, avol1[m2].data) ∧ is-encoded-pad(orphans, m9, avol1[m3].data) ∧ avol1[m3] = avol0[m3] ∧ avol1[m2] = avol0[m2]) → (err = ESUCCESS → avol4 = avol1) → ( err = ESUCCESS → (∃ avol. subarray(avol0, m11, # lpt0) ⊆ avol ∧ ⟨adr := adr0, m := m0; apersistence_io_recover#(; adr2, m5, ns1, log2, lpt2, adr, m, log0, lpt0, ns0, avol; err0)⟩ ( m = sb0.maxino ∧ adr = sb0.indexaddr ∧ # avol1 = sb0.main + (# avol1 - sb0.main) ∧ avol = subarray(avol1, sb0.main, # avol1 - sb0.main) ∧ is-encoded(log0, avol1[sb0.log].data) ∧ is-encoded(lpt0, lebs(avol1, sb0.lpt, lptlebs(# avol1 - sb0.main, LEB_SIZE))) ∧ is-encoded-pad(ns0, sb0.orphsize, avol1[sb0.orph].data) ∧ adr1 = adr2 ∧ m4 = m5 ∧ orphans = ns1 ∧ log1 = log2 ∧ lpt1 = lpt2 ∧ ESUCCESS = err0))) ∧ ( err ≠ ESUCCESS → (∀ adr, m, log, avol, lpt, ns. ⟨apersistence_io_recover#(; adr2, m5, ns1, log2, lpt2, adr3, m8, plog0, lpt3, ns2, avol3; err0)⟩ ( adr = adr3 ∧ m = m8 ∧ log = plog0 ∧ avol = avol3 ∧ lpt = lpt3 ∧ ns = ns2 ∧ adr1 = adr2 ∧ m4 = m5 ∧ orphans = ns1 ∧ log1 = log2 ∧ lpt1 = lpt2 ∧ err = err0)))) |
# avol0 = # lpt0 + m11, avol0[m2] = mapped(buf1), avol0[m3] = mapped(buf0), avol0[0] = mapped(buf), adr1 = adr2, avol4 = avol1, log1 = log2, lpt1 = lpt2, m4 = m5, orphans = ns1, disk-layout(mksb(adr0, m0, m2, m3, m9, m10, m11), # lpt0), ebm-vol-inv(subarray(avol0, m11, # lpt0)), ebm-vol-inv(avol0), is-encoded(log0, buf1), is-encoded(lpt0, lebs(avol0, m10, lptlebs(# lpt0, LEB_SIZE))), is-encoded(mksb(adr0, m0, m2, m3, m9, m10, m11), buf), is-encoded-pad(ns0, m9, buf0), mapped-full?(avol0, m10, lptlebs(# lpt0, LEB_SIZE)), m11 ≤ # avol0, avol0 ⊆ avol1, m1 ≠ LEB_SIZE → # buf1 = m1 ⊦ ∀ adr1, m4, orphans, log1, lpt1, sb0, logoff, m6, m7, avol1, err. ( err = ESUCCESS → (∃ lpt5, log4, orphans2. disk-layout(sb0, # lpt5) ∧ sb0.main + # lpt5 = # avol1 ∧ avol1[0].mapped? ∧ is-encoded(sb0, avol1[0].data) ∧ avol1[sb0.orph].mapped? ∧ is-encoded-pad(orphans2, sb0.orphsize, avol1[sb0.orph].data) ∧ avol1[sb0.log].mapped? ∧ (logoff ≠ LEB_SIZE → # avol1[sb0.log].data = logoff) ∧ is-encoded(log4, avol1[sb0.log].data) ∧ mapped-full?(avol1, sb0.lpt, lptlebs(# lpt5, LEB_SIZE)) ∧ is-encoded(lpt5, lebs(avol1, sb0.lpt, lptlebs(# lpt5, LEB_SIZE)))) ∧ m6 = EB_PAGE_SIZE ∧ m7 = LEB_SIZE ∧ ebm-vol-inv(avol1)) ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ( err = ESUCCESS → sb0 = mksb(adr0, m0, m2, m3, m9, m10, m11) ∧ # avol1 = # avol0 ∧ adr1 = adr0 ∧ m4 = m0 ∧ # lpt1 = # avol1 - m11 ∧ is-encoded(lpt1, lebs(avol1, m10, lptlebs(# avol1 - m11, LEB_SIZE))) ∧ lebs(avol1, m10, lptlebs(# avol1 - m11, LEB_SIZE)) = lebs(avol0, m10, lptlebs(# avol1 - m11, LEB_SIZE)) ∧ is-encoded(log1, avol1[m2].data) ∧ is-encoded-pad(orphans, m9, avol1[m3].data) ∧ avol1[m3] = avol0[m3] ∧ avol1[m2] = avol0[m2]) → (err = ESUCCESS → avol4 = avol1) → ( err = ESUCCESS → (∃ avol. subarray(avol0, m11, # lpt0) ⊆ avol ∧ ⟨adr := adr0, m := m0; apersistence_io_recover#(; adr2, m5, ns1, log2, lpt2, adr, m, log0, lpt0, ns0, avol; err0)⟩ ( m = sb0.maxino ∧ adr = sb0.indexaddr ∧ # avol1 = sb0.main + (# avol1 - sb0.main) ∧ avol = subarray(avol1, sb0.main, # avol1 - sb0.main) ∧ is-encoded(log0, avol1[sb0.log].data) ∧ is-encoded(lpt0, lebs(avol1, sb0.lpt, lptlebs(# avol1 - sb0.main, LEB_SIZE))) ∧ is-encoded-pad(ns0, sb0.orphsize, avol1[sb0.orph].data) ∧ adr1 = adr2 ∧ m4 = m5 ∧ orphans = ns1 ∧ log1 = log2 ∧ lpt1 = lpt2 ∧ ESUCCESS = err0))) ∧ ( err ≠ ESUCCESS → (∀ adr, m, log, avol, lpt, ns. ⟨apersistence_io_recover#(; adr2, m5, ns1, log2, lpt2, adr3, m8, plog0, lpt3, ns2, avol3; err0)⟩ ( adr = adr3 ∧ m = m8 ∧ log = plog0 ∧ avol = avol3 ∧ lpt = lpt3 ∧ ns = ns2 ∧ adr1 = adr2 ∧ m4 = m5 ∧ orphans = ns1 ∧ log1 = log2 ∧ lpt1 = lpt2 ∧ err = err0)))