[Imprint][Data Privacy Statement][E-Mail]

View long theorem info. View the proof. Back to main index. View the specification. View theorem base summary, View theorem base listing, the used properties by spec, the dependency list, the symbol table,

Proof step 25 from proof wlar-erase-worker-helper (previous step)

wlar[n] = wl-entry(m0, stat0), apebs0[n] = mkpeb(aehdr0, avhdr, buf, m1, false), aehdr = aechdr(wlar[n, wlar[n].ec:= (wlar[n].ec + 1)][n].ec), apebs = apebs0[n, mkpeb(empty, empty, mkempbuf(LEB_SIZE), 0, false)], vtblpnum = n, n < # wlar[n, wlar[n].ec:= (wlar[n].ec + 1)], n < # wlar, n < # apebs0 ⊦ [if ubi-io-write-echdr-pre(vtblpnum, aehdr, apebs) then {fail_or_success#(; ; err); if err = ESUCCESS then apebs[vtblpnum].echdr := aehdr else choose aehdr with ¬ aehdr.valid? in apebs[vtblpnum].echdr := aehdr} else abort; vtblpnum1 := 1; wlar1 := wlar[n, wlar[n].ec:= (wlar[n].ec + 1)]; vtblpnum0 := n; err0 := err; while err0 ≠ ESUCCESS ∧ vtblpnum1 ≤ UBI_ERASE_RETRIES do {wlar1[vtblpnum0].ec := wlar1[vtblpnum0].ec + 1; aubi_io_sync_erase#(vtblpnum0; apebs; err0); if err0 = ESUCCESS then aubi_io_write_echdr#(vtblpnum0, aechdr(wlar1[vtblpnum0].ec); apebs; err0) else debug#("ubi: erase of PEB " + vtblpnum0.toString + " failed"); vtblpnum1 := vtblpnum1 + 1}; if err0 = ESUCCESS then wlar1[vtblpnum0] := wl-entry(wlar1[vtblpnum0].ec, free) else {aubi_io_markbad#(vtblpnum0; apebs; err0); if err0 = 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)]

Heuristic symbolic execution applied rule if positive right

And obtained the following new goals

Proof step 26:
apebs0[n] = mkpeb(aehdr0, avhdr, buf, m1, false), wlar[n] = wl-entry(m0, stat0), aehdr = aechdr(wlar[n, wlar[n].ec:= (wlar[n].ec + 1)][n].ec), apebs = apebs0[n, mkpeb(empty, empty, mkempbuf(LEB_SIZE), 0, false)], vtblpnum = n, n < # apebs0, n < # wlar, n < # wlar[n, wlar[n].ec:= (wlar[n].ec + 1)] ⊦ [fail_or_success#(; ; err); if err = ESUCCESS then apebs[vtblpnum].echdr := aehdr else choose aehdr with ¬ aehdr.valid? in apebs[vtblpnum].echdr := aehdr; vtblpnum1 := 1; wlar1 := wlar[n, wlar[n].ec:= (wlar[n].ec + 1)]; vtblpnum0 := n; err0 := err; while err0 ≠ ESUCCESS ∧ vtblpnum1 ≤ UBI_ERASE_RETRIES do {wlar1[vtblpnum0].ec := wlar1[vtblpnum0].ec + 1; aubi_io_sync_erase#(vtblpnum0; apebs; err0); if err0 = ESUCCESS then aubi_io_write_echdr#(vtblpnum0, aechdr(wlar1[vtblpnum0].ec); apebs; err0) else debug#("ubi: erase of PEB " + vtblpnum0.toString + " failed"); vtblpnum1 := vtblpnum1 + 1}; if err0 = ESUCCESS then wlar1[vtblpnum0] := wl-entry(wlar1[vtblpnum0].ec, free) else {aubi_io_markbad#(vtblpnum0; apebs; err0); if err0 = 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)]

Rule argument

pos: right 1

Additional information

Used simplifier rules: ⊦ wl-entry(m, stat).ec = m; (s)% ⊦ wl-entry(m, stat).ec:= m0 = wl-entry(m0, stat); (s)% ⊦ m < # wlar → wlar[m, wle][m] = wle; (s)%⊦ ubi-io-write-echdr-pre(n, aehdr, apebs) ↔ n < # apebs ∧ ¬ apebs[n].bad ∧ aehdr.valid? ∧ apebs[n].echdr = empty; (s)% ⊦ # apebs[n, apeb] = # apebs; (s)% ⊦ m < # apebs → apebs[m, apeb][m] = apeb; (s)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).bad ↔ boolvar; (s)% ⊦ aechdr(m).valid?; (s)% ⊦ mkpeb(aehdr, avhdr, buf, m, boolvar).echdr = aehdr; (s)