| boolvar0, m = fs[ri[dentrykey(m1, str)]].ino, m0 = fs[ri[inodekey(fs[ri[dentrykey(m1, str)]].ino)]].nlink, m3 = fs[ri[inodekey(m1)]].nlink, m4 = fs[ri[inodekey(m1)]].nsubdirs, m5 = fs[ri[inodekey(m1)]].size, p_inode = mkinode(m1, md0, boolvar0, m3, m4, m5), fs[ri[inodekey(m1)]].directory, 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, inodekey(fs[ri[dentrykey(m1, str)]].ino) ∈ ri, dentrykey(m1, str) ∈ ri, 1 ≤ m5, fs[ri[inodekey(fs[ri[dentrykey(m1, str)]].ino)]].nlink = 1 → links(fs[ri[dentrykey(m1, str)]].ino, fs, ri) = ∅ ++ dentrykey(m1, str), m3 ≠ 0 ∨ m1 = ROOT_INO ⊦ ⟪key0 := dentrykey(m1, str); key := inodekey(m); nd1 := inodenode(inodekey(m1), md0, boolvar0, m3, m4, m5 - 1); nd0 := dentrynode(key0, 0); nd := inodenode(key, md, false, m0 - 1, fs[ri[inodekey(m)]].nsubdirs, m2); aubifs_core_journal_add3#(nd1, nd0, 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#(key0, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_store#(key, adr, fi, ro, fo, fs, log, boolvar; ri); if m0 = 1 then aubifs_core_orphans_insert#(key, ri, fi, fo, fs, log, boolvar; ro); dent := negdentry(str); p_inode := mkinode(p_inode.ino, 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(fs[ri[dentrykey(m1, str)]].ino)]].nlink = 0, m5 = 0, fs[ri[inodekey(fs[ri[dentrykey(m1, str)]].ino)]].directory, inodekey(m1) ∈ ro, inodekey(fs[ri[dentrykey(m1, str)]].ino) ∈ ro |
m = fs[ri[dentrykey(m1, str)]].ino, m0 = fs[ri[inodekey(fs[ri[dentrykey(m1, str)]].ino)]].nlink, fs[ri[dentrykey(m1, str)]].ino ≠ ROOT_INO, fs[ri[inodekey(fs[ri[dentrykey(m1, str)]].ino)]].nlink ≠ 0, fs[ri[inodekey(m1)]].size ≠ 0, fs[ri[inodekey(m1)]].directory, 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, inodekey(fs[ri[dentrykey(m1, str)]].ino) ∈ ri, dentrykey(m1, str) ∈ ri, 1 ≤ fs[ri[inodekey(m1)]].size, ¬ fs[ri[inodekey(fs[ri[dentrykey(m1, str)]].ino)]].directory, ¬ inodekey(m1) ∈ ro, ¬ inodekey(fs[ri[dentrykey(m1, str)]].ino) ∈ ro, fs[ri[inodekey(fs[ri[dentrykey(m1, str)]].ino)]].nlink = 1 → links(fs[ri[dentrykey(m1, str)]].ino, fs, ri) = ∅ ++ dentrykey(m1, str), fs[ri[inodekey(m1)]].nlink ≠ 0 ∨ m1 = ROOT_INO ⊦ ⟪key0 := dentrykey(m1, str); key := inodekey(m); nd1 := inodenode(inodekey(m1), md0, true, fs[ri[inodekey(m1)]].nlink, fs[ri[inodekey(m1)]].nsubdirs, fs[ri[inodekey(m1)]].size - 1); nd0 := dentrynode(key0, 0); nd := inodenode(key, md, false, m0 - 1, fs[ri[inodekey(m)]].nsubdirs, m2); aubifs_core_journal_add3#(nd1, nd0, 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#(key0, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_store#(key, adr, fi, ro, fo, fs, log, boolvar; ri); if m0 = 1 then aubifs_core_orphans_insert#(key, 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))
Used simplifier rules: not-zero: 0 < n ⊦ (* n) ≤ m → m ≠ 0; (forward) from specification nat%ubifs-parent-in: ⊦ dentrykey(ino, str) ∈ ri ∧ ubifs-cons(fs, ri, ro, fi, fo, log) → inodekey(ino) ∈ ri; (forward) from specification aubifs-inv% ⊦ mkinode(m, md, boolvar, m0, m1, m2).ino = m; (s)