| m = 0, m0 = EB_PAGE_SIZE, mtd-cons(pebs) ⊦ ⟪err := ESUCCESS; n := # pebs; while m < n ∧ err = ESUCCESS do {/* (inv-format : invariant m ≤ n ∧ n = # pebs ∧ mtd-cons(pebs) ∧ (err = ESUCCESS → ubi-io-initial(subarray(pebs, 0, m))) ∧ (err = ESUCCESS ∨ ⌊err⌋ ) wfbound n - m) */; let isbad = ? in {mtd_asm_isbad#(m, pebs; ; isbad, err); if err = ESUCCESS ∧ ¬ isbad then let aehdr = ?, bitflips = ? in {ubi_io_read_echdr#(m, m0, pebs; aehdr; bitflips, err); let n = (err = ESUCCESS ∧ aehdr.valid? ⊃ aehdr.ec + 1;0) in {mtd_asm_erase#(m; pebs; err); if err = ESUCCESS then ubi_io_write_echdr#(m, aechdr(n), m0; pebs; err)}}}; m := m + 1}⟫ ((err = ESUCCESS → m0 = EB_PAGE_SIZE ∧ mtd-cons(pebs)) ∧ (err = ESUCCESS → ubi-io-initial(pebs)) ∧ (err = ESUCCESS ∨ ⌊err⌋ )) |
err = ESUCCESS, m = 0, m0 = EB_PAGE_SIZE, mtd-cons(pebs) ⊦ ⟪n := # pebs; while m < n ∧ err = ESUCCESS do {/* (inv-format : invariant m ≤ n ∧ n = # pebs ∧ mtd-cons(pebs) ∧ (err = ESUCCESS → ubi-io-initial(subarray(pebs, 0, m))) ∧ (err = ESUCCESS ∨ ⌊err⌋ ) wfbound n - m) */; let isbad = ? in {mtd_asm_isbad#(m, pebs; ; isbad, err); if err = ESUCCESS ∧ ¬ isbad then let aehdr = ?, bitflips = ? in {ubi_io_read_echdr#(m, m0, pebs; aehdr; bitflips, err); let n = (err = ESUCCESS ∧ aehdr.valid? ⊃ aehdr.ec + 1;0) in {mtd_asm_erase#(m; pebs; err); if err = ESUCCESS then ubi_io_write_echdr#(m, aechdr(n), m0; pebs; err)}}}; m := m + 1}⟫ ((err = ESUCCESS → m0 = EB_PAGE_SIZE ∧ mtd-cons(pebs)) ∧ (err = ESUCCESS → ubi-io-initial(pebs)) ∧ (err = ESUCCESS ∨ ⌊err⌋ ))