| m3 + 1 = fs[ri[inodekey(fs[ri[dentrykey(m1, str)]].ino)]].nlink, m = fs[ri[dentrykey(m1, str)]].ino, nd = inodenode(inodekey(m), md, false, m3, fs[ri[inodekey(m)]].nsubdirs, m2), nd1 = inodenode(inodekey(m1), md0, true, fs[ri[inodekey(m1)]].nlink, fs[ri[inodekey(m1)]].nsubdirs, fs[ri[inodekey(m1)]].size - 1), fs[ri[inodekey(m1)]].directory, fs[ri[inodekey(m1)]].inode?, fs[ri[inodekey(m)]].inode?, fo.inodes?, ro.inodes?, file-node-cons(fs, ri), log-cons(log, fs), orphans-cons(fs, ri, ro), replay-cons-strong(fs, ri, ro, fi, fo, log), ri-inj(fi), ri-inj(ri), ubifs-cons(fs, ri, ro, fi, fo, log), inodekey(m1) ∈ ri, ri[inodekey(m1)] ∈ fs, inodekey(fs[ri[dentrykey(m1, str)]].ino) ∈ ri, dentrykey(m1, str) ∈ ri, ri[inodekey(m)] ∈ fs, inodekey(m) ∈ ri, 1 ≤ fs[ri[inodekey(m1)]].size, m3 = 0 → links(fs[ri[dentrykey(m1, str)]].ino, fs, ri) = ∅ ++ dentrykey(m1, str), fs[ri[inodekey(m1)]].nlink ≠ 0 ∨ m1 = ROOT_INO ⊦ ⟪aubifs_core_journal_add3#(nd1, dentrynode(dentrykey(m1, str), 0), nd, ri, fi, ro, fo; adr1, adr0, adr, fs, log; boolvar, err); if err = ESUCCESS then {aubifs_core_index_store#(inodekey(m1), adr1, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_remove#(dentrykey(m1, str), fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_store#(inodekey(m), adr, fi, ro, fo, fs, log, boolvar; ri); if m3 = 0 then aubifs_core_orphans_insert#(inodekey(m), ri, fi, fo, fs, log, boolvar; ro); dent := negdentry(str); p_inode := mkinode(m1, nd1.meta, nd1.directory, nd1.nlink, nd1.nsubdirs, nd1.size); c_inode0 := mkinode(m, nd.meta, nd.directory, nd.nlink, nd.nsubdirs, nd.size)}⟫ (ubifs-cons(fs, ri, ro, fi, fo, log) ∧ replay-cons-strong(fs, ri, ro, fi, fo, log) ∧ file-node-cons(fs, ri) ∧ orphans-cons(fs, ri, ro)), fs[ri[dentrykey(m1, str)]].ino = ROOT_INO, fs[ri[inodekey(m1)]].size = 0, fs[ri[inodekey(fs[ri[dentrykey(m1, str)]].ino)]].directory, inodekey(m1) ∈ ro, inodekey(fs[ri[dentrykey(m1, str)]].ino) ∈ ro |
m3 + 1 = fs[ri[inodekey(fs[ri[dentrykey(m1, str)]].ino)]].nlink, adr4 = adr1, m = fs[ri[dentrykey(m1, str)]].ino, nd = inodenode(inodekey(m), md, false, m3, fs[ri[inodekey(m)]].nsubdirs, m2), nd0 = dentrynode(dentrykey(m1, str), 0), nd1 = inodenode(inodekey(m1), md0, true, fs[ri[inodekey(m1)]].nlink, fs[ri[inodekey(m1)]].nsubdirs, fs[ri[inodekey(m1)]].size - 1), fs[ri[inodekey(m1)]].directory, fs[ri[inodekey(m)]].inode?, fs[ri[inodekey(m1)]].inode?, ro.inodes?, fo.inodes?, file-node-cons(fs, ri), log-cons(log, fs), orphans-cons(fs, ri, ro), replay-cons-strong(fs, ri, ro, fi, fo, log), ri-inj(ri), ri-inj(fi), ubifs-cons(fs, ri, ro, fi, fo, log), inodekey(m) ∈ ri, ri[inodekey(m)] ∈ fs, dentrykey(m1, str) ∈ ri, inodekey(fs[ri[dentrykey(m1, str)]].ino) ∈ ri, ri[inodekey(m1)] ∈ fs, inodekey(m1) ∈ ri, 1 ≤ fs[ri[inodekey(m1)]].size, m3 = 0 → links(fs[ri[dentrykey(m1, str)]].ino, fs, ri) = ∅ ++ dentrykey(m1, str), fs[ri[inodekey(m1)]].nlink ≠ 0 ∨ m1 = ROOT_INO ⊦ ⟪if ri-cons(ri, fs) ∧ node-cons(nd1.key, nd1) ∧ node-cons(nd0.key, nd0) ∧ node-cons(nd.key, nd) then { choose adr1, adr2, adr3 with new(adr1 ' + (adr2 ' + adr3), fs) ∧ ¬ dups(adr1 ' + adr2 ' + adr3 ') in {adr4 := adr1, adr0 := adr2, adr := adr3; fs := fs[adr4, nd1][adr0, nd0][adr, nd], log := ((log + adr4) + adr0) + adr, err := ESUCCESS} ifnone err := ENOSPC or {fail#(; ; err); adr4 := ?, adr0 := ?, adr := ?}; boolvar := ?} else abort; if err = ESUCCESS then {aubifs_core_index_store#(inodekey(m1), adr4, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_remove#(dentrykey(m1, str), fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_store#(inodekey(m), adr, fi, ro, fo, fs, log, boolvar; ri); if m3 = 0 then aubifs_core_orphans_insert#(inodekey(m), ri, fi, fo, fs, log, boolvar; ro); dent := negdentry(str); p_inode := mkinode(m1, nd1.meta, nd1.directory, nd1.nlink, nd1.nsubdirs, nd1.size); c_inode0 := mkinode(m, nd.meta, nd.directory, nd.nlink, nd.nsubdirs, nd.size)}⟫ (ubifs-cons(fs, ri, ro, fi, fo, log) ∧ replay-cons-strong(fs, ri, ro, fi, fo, log) ∧ file-node-cons(fs, ri) ∧ orphans-cons(fs, ri, ro)), fs[ri[dentrykey(m1, str)]].ino = ROOT_INO, fs[ri[inodekey(m1)]].size = 0, fs[ri[inodekey(fs[ri[dentrykey(m1, str)]].ino)]].directory, inodekey(fs[ri[dentrykey(m1, str)]].ino) ∈ ro, inodekey(m1) ∈ ro
Used simplifier rules: aubifs_core_journal_add3# (ND1, ND2, ND3, RI, FI, RO, FO ; ADR1, ADR2, ADR3, FS, LOG ; CSYNCED, ERR ) {if ri-cons(RI, FS) ∧ node-cons(ND1.key, ND1) ∧ node-cons(ND2.key, ND2) ∧ node-cons(ND3.key, ND3) then { choose adr1, adr2, adr3 with new(adr1 ' + (adr2 ' + adr3), FS) ∧ ¬ dups(adr1 ' + adr2 ' + adr3 ') in {ADR1 := adr1, ADR2 := adr2, ADR3 := adr3; FS := FS[ADR1, ND1][ADR2, ND2][ADR3, ND3], LOG := ((LOG + ADR1) + ADR2) + ADR3, ERR := ESUCCESS} ifnone ERR := ENOSPC or {fail#(; ; ERR); ADR1 := ?, ADR2 := ?, ADR3 := ?}; CSYNCED := ?} else abort };