| wlar[n] = wl-entry(m0, stat0), apebs[n] = mkpeb(aehdr, avhdr, buf, m1, boolvar), ¬ boolvar, n < # wlar, n < # apebs ⊦ [fail_or_success#(; ; err); if err = ESUCCESS then apebs[n] := mkpeb(empty, empty, mkempbuf(LEB_SIZE), 0, false) else {{vtblpnum := n; choose apeb with ubi-io-peb-inv(apeb) ∧ ¬ apeb.bad ∧ ¬ apeb.vidhdr.valid? in apebs[vtblpnum] := apeb} or skip}; wlar1 := wlar[n, wlar[n].ec:= (wlar[n].ec + 1)]; vtblpnum0 := n; if err = ESUCCESS then aubi_io_write_echdr#(vtblpnum0, aechdr(wlar1[vtblpnum0].ec); apebs; err) else debug#("ubi: erase of PEB " + vtblpnum0.toString + " failed"); vtblpnum1 := 1; while err ≠ ESUCCESS ∧ vtblpnum1 ≤ UBI_ERASE_RETRIES do {wlar1[vtblpnum0].ec := wlar1[vtblpnum0].ec + 1; aubi_io_sync_erase#(vtblpnum0; apebs; err); if err = ESUCCESS then aubi_io_write_echdr#(vtblpnum0, aechdr(wlar1[vtblpnum0].ec); apebs; err) else debug#("ubi: erase of PEB " + vtblpnum0.toString + " failed"); vtblpnum1 := vtblpnum1 + 1}; if err = ESUCCESS then wlar1[vtblpnum0] := wl-entry(wlar1[vtblpnum0].ec, free) else {aubi_io_markbad#(vtblpnum0; apebs; err); if err = ESUCCESS then wlar1[vtblpnum0] := wl-entry(wlar1[vtblpnum0].ec, erroneous) else debug#("ubi: marking PEB " + vtblpnum0.toString + " as bad failed")}] ∃ m, stat. m ≠ 0 ∧ m ≤ UBI_ERASE_RETRIES + 1 ∧ wlar1 = wlar[n, wl-entry(m0 + m, stat)] |
apebs[n] = mkpeb(aehdr, avhdr, buf, m1, false), wlar[n] = wl-entry(m0, stat0), n < # apebs, n < # wlar ⊦ [fail_or_success#(; ; err); if err = ESUCCESS then apebs[n] := mkpeb(empty, empty, mkempbuf(LEB_SIZE), 0, false) else {{vtblpnum := n; choose apeb with ubi-io-peb-inv(apeb) ∧ ¬ apeb.bad ∧ ¬ apeb.vidhdr.valid? in apebs[vtblpnum] := apeb} or skip}; wlar1 := wlar[n, wlar[n].ec:= (wlar[n].ec + 1)]; vtblpnum0 := n; if err = ESUCCESS then aubi_io_write_echdr#(vtblpnum0, aechdr(wlar1[vtblpnum0].ec); apebs; err) else debug#("ubi: erase of PEB " + vtblpnum0.toString + " failed"); vtblpnum1 := 1; while err ≠ ESUCCESS ∧ vtblpnum1 ≤ UBI_ERASE_RETRIES do {wlar1[vtblpnum0].ec := wlar1[vtblpnum0].ec + 1; aubi_io_sync_erase#(vtblpnum0; apebs; err); if err = ESUCCESS then aubi_io_write_echdr#(vtblpnum0, aechdr(wlar1[vtblpnum0].ec); apebs; err) else debug#("ubi: erase of PEB " + vtblpnum0.toString + " failed"); vtblpnum1 := vtblpnum1 + 1}; if err = ESUCCESS then wlar1[vtblpnum0] := wl-entry(wlar1[vtblpnum0].ec, free) else {aubi_io_markbad#(vtblpnum0; apebs; err); if err = ESUCCESS then wlar1[vtblpnum0] := wl-entry(wlar1[vtblpnum0].ec, erroneous) else debug#("ubi: marking PEB " + vtblpnum0.toString + " as bad failed")}] ∃ m, stat. m ≠ 0 ∧ m ≤ UBI_ERASE_RETRIES + 1 ∧ wlar1 = wlar[n, wl-entry(m0 + m, stat)]