| # avol0 = sb.main + # avol2, # lpt0 = # avol2, adr0 = sb.indexaddr, adr1 = adr2, avol1 = avol1, avol2 = subarray(avol0, sb.main, # avol0 - sb.main), avol4 = avol1, log1 = log2, lpt1 = lpt2, m0 = sb.maxino, m2 = EB_PAGE_SIZE, m3 = LEB_SIZE, m4 = m5, orphans = ns1, ebm-vol-inv(avol2), ebm-vol-inv(avol0), is-encoded(log0, avol0[sb.log].data), is-encoded(lpt0, lebs(avol0, sb.lpt, lptlebs(# avol2, LEB_SIZE))), is-encoded-pad(ns0, sb.orphsize, avol0[sb.orph].data), avol0 ⊆ avol1, ∃ lpt1, log1, orphans. persistence-io-inv(sb, m1, avol0, lpt1, log1, orphans) ⊦ ⟪persistence_io_recover#(; adr1, m4, orphans, log1, lpt1, sb0, logoff, m6, m7, avol1; err)⟫ ( (err = ESUCCESS → avol4 = avol1) → ( err = ESUCCESS → (∃ adr, m, plog, avol, lpt, ns. (adr = adr0 ∧ m = m0 ∧ plog = log0 ∧ lpt = lpt0 ∧ avol2 ⊆ avol ∧ ns = ns0) ∧ ⟨apersistence_io_recover#(; adr2, m5, ns1, log2, lpt2, adr, m, plog, lpt, ns, avol; err0)⟩ ( ( m = sb0.maxino ∧ adr = sb0.indexaddr ∧ # avol1 = sb0.main + # avol ∧ avol = subarray(avol1, sb0.main, # avol1 - sb0.main) ∧ is-encoded(plog, avol1[sb0.log].data) ∧ is-encoded(lpt, lebs(avol1, sb0.lpt, lptlebs(# avol, LEB_SIZE))) ∧ is-encoded-pad(ns, sb0.orphsize, avol1[sb0.orph].data)) ∧ adr1 = adr2 ∧ m4 = m5 ∧ orphans = ns1 ∧ log1 = log2 ∧ lpt1 = lpt2 ∧ err = 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)))) |
avol ⊆ avol0, ∃ lpt, log, orphans. persistence-io-inv(sb, m, avol, lpt, log, orphans), m0 = EB_PAGE_SIZE, m1 = LEB_SIZE, ebm-vol-inv(avol) ⊦ ⟪persistence_io_recover#(; adr, m2, orphans, log, lpt, sb0, logoff, m3, m4, avol0; err)⟫ ( ( err = ESUCCESS → (∃ lpt, log, orphans. persistence-io-inv(sb0, logoff, avol0, lpt, log, orphans)) ∧ m3 = EB_PAGE_SIZE ∧ m4 = LEB_SIZE ∧ ebm-vol-inv(avol0)) ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ( err = ESUCCESS → sb0 = sb ∧ # avol0 = # avol ∧ adr = sb0.indexaddr ∧ m2 = sb0.maxino ∧ # lpt = # avol0 - sb0.main ∧ is-encoded(lpt, lebs(avol0, sb0.lpt, lptlebs(# avol0 - sb0.main, LEB_SIZE))) ∧ lebs(avol0, sb0.lpt, lptlebs(# avol0 - sb0.main, LEB_SIZE)) = lebs(avol, sb0.lpt, lptlebs(# avol0 - sb0.main, LEB_SIZE)) ∧ is-encoded(log, avol0[sb0.log].data) ∧ is-encoded-pad(orphans, sb0.orphsize, avol0[sb0.orph].data) ∧ avol0[sb0.orph] = avol[sb0.orph] ∧ avol0[sb0.log] = avol[sb0.log]))
# lpt0 = # avol2, # avol0 = sb.main + # avol2, adr0 = sb.indexaddr, adr1 = adr2, avol1 = avol1, avol2 = subarray(avol0, sb.main, # avol0 - sb.main), avol4 = avol1, log1 = log2, lpt1 = lpt2, m0 = sb.maxino, m2 = EB_PAGE_SIZE, m3 = LEB_SIZE, m4 = m5, orphans = ns1, ebm-vol-inv(avol0), ebm-vol-inv(avol2), is-encoded(lpt0, lebs(avol0, sb.lpt, lptlebs(# avol2, LEB_SIZE))), is-encoded(log0, avol0[sb.log].data), is-encoded-pad(ns0, sb.orphsize, avol0[sb.orph].data), avol0 ⊆ avol1, ∃ lpt1, log1, orphans. persistence-io-inv(sb, m1, avol0, lpt1, log1, orphans) ⊦ avol0 ⊆ avol1 ∧ (∃ lpt, log, orphans. persistence-io-inv(sb, m1, avol0, lpt, log, orphans)) ∧ m2 = EB_PAGE_SIZE ∧ m3 = LEB_SIZE ∧ ebm-vol-inv(avol0)
# lpt0 = # avol2, # avol0 = sb.main + # avol2, adr0 = sb.indexaddr, adr1 = adr2, avol1 = avol1, avol2 = subarray(avol0, sb.main, # avol0 - sb.main), avol4 = avol1, avol5 = avol0, log1 = log2, lpt1 = lpt2, m0 = sb.maxino, m10 = m2, m11 = m3, m2 = EB_PAGE_SIZE, m3 = LEB_SIZE, m4 = m5, m9 = m1, orphans = ns1, sb1 = sb, ebm-vol-inv(avol2), ebm-vol-inv(avol0), is-encoded(lpt0, lebs(avol0, sb.lpt, lptlebs(# avol2, LEB_SIZE))), is-encoded(log0, avol0[sb.log].data), is-encoded-pad(ns0, sb.orphsize, avol0[sb.orph].data), avol0 ⊆ avol1, ∃ lpt1, log1, orphans. persistence-io-inv(sb, m1, avol0, lpt1, log1, orphans), ∃ lpt, log, orphans. persistence-io-inv(sb, m1, avol0, lpt, log, orphans) ⊦ [persistence_io_recover#(; adr1, m4, orphans, log1, lpt1, sb0, logoff, m6, m7, avol1; err)] ( ( err = ESUCCESS → (∃ lpt, log, orphans. persistence-io-inv(sb0, logoff, avol1, lpt, log, orphans)) ∧ m6 = EB_PAGE_SIZE ∧ m7 = LEB_SIZE ∧ ebm-vol-inv(avol1)) ∧ (err = ESUCCESS ∨ ⌊err⌋ ) ∧ ( err = ESUCCESS → sb0 = sb1 ∧ # avol1 = # avol5 ∧ adr1 = sb0.indexaddr ∧ m4 = sb0.maxino ∧ # lpt1 = # avol1 - sb0.main ∧ is-encoded(lpt1, lebs(avol1, sb0.lpt, lptlebs(# avol1 - sb0.main, LEB_SIZE))) ∧ lebs(avol1, sb0.lpt, lptlebs(# avol1 - sb0.main, LEB_SIZE)) = lebs(avol5, sb0.lpt, lptlebs(# avol1 - sb0.main, LEB_SIZE)) ∧ is-encoded(log1, avol1[sb0.log].data) ∧ is-encoded-pad(orphans, sb0.orphsize, avol1[sb0.orph].data) ∧ avol1[sb0.orph] = avol5[sb0.orph] ∧ avol1[sb0.log] = avol5[sb0.log]) → (err = ESUCCESS → avol4 = avol1) → ( err = ESUCCESS → (∃ adr, m, plog, avol, lpt, ns. (adr = adr0 ∧ m = m0 ∧ plog = log0 ∧ lpt = lpt0 ∧ avol2 ⊆ avol ∧ ns = ns0) ∧ ⟨apersistence_io_recover#(; adr2, m5, ns1, log2, lpt2, adr, m, plog, lpt, ns, avol; err0)⟩ ( ( m = sb0.maxino ∧ adr = sb0.indexaddr ∧ # avol1 = sb0.main + # avol ∧ avol = subarray(avol1, sb0.main, # avol1 - sb0.main) ∧ is-encoded(plog, avol1[sb0.log].data) ∧ is-encoded(lpt, lebs(avol1, sb0.lpt, lptlebs(# avol, LEB_SIZE))) ∧ is-encoded-pad(ns, sb0.orphsize, avol1[sb0.orph].data)) ∧ adr1 = adr2 ∧ m4 = m5 ∧ orphans = ns1 ∧ log1 = log2 ∧ lpt1 = lpt2 ∧ err = 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))))