| adr4 = adr1, fs0 = fs, nd = inodenode(inodekey(n), md, false, 1, 0, 0), nd0 = dentrynode(dentrykey(m, str), n), nd1 = inodenode(inodekey(m), md0, true, fs[ri[inodekey(m)]].nlink, fs[ri[inodekey(m)]].nsubdirs, fs[ri[inodekey(m)]].size + 1), fs[ri[inodekey(m)]].directory, 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), ri[inodekey(m)] ∈ fs, inodekey(m) ∈ ri, fs[ri[inodekey(m)]].nlink ≠ 0 ∨ m = ROOT_INO ⊦ ⟪ 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 := ?; if err = ESUCCESS then {ri0 := ri; ri1 := ri; ri2 := ri; aubifs_core_index_store#(inodekey(m), adr4, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_store#(dentrykey(m, str), adr0, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_store#(inodekey(n), adr, fi, ro, fo, fs, log, boolvar; ri); dent := mkdentry(str, n); p_inode := mkinode (mkinode(m, md0, true, fs0[ri2[inodekey(m)]].nlink, fs0[ri1[inodekey(m)]].nsubdirs, fs0[ri0[inodekey(m)]].size).ino, nd1.meta, nd1.directory, nd1.nlink, nd1.nsubdirs, nd1.size); c_inode := mkinode (n, inodenode(inodekey(n), md, false, 1, 0, 0).meta, inodenode(inodekey(n), md, false, 1, 0, 0).directory, inodenode(inodekey(n), md, false, 1, 0, 0).nlink, inodenode(inodekey(n), md, false, 1, 0, 0).nsubdirs, inodenode(inodekey(n), md, false, 1, 0, 0).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)), n = 0, inodekey(n) ∈ ri, inodekey(n) ∈ fo, dentrykey(m, str) ∈ ri, inodekey(m) ∈ ro |
adr4 = adr1, fs0 = fs, nd = inodenode(inodekey(n), md, false, 1, 0, 0), nd0 = dentrynode(dentrykey(m, str), n), nd1 = inodenode(inodekey(m), md0, true, fs[ri[inodekey(m)]].nlink, fs[ri[inodekey(m)]].nsubdirs, fs[ri[inodekey(m)]].size + 1), fs[ri[inodekey(m)]].directory, fs[ri[inodekey(m)]].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, fs[ri[inodekey(m)]].nlink ≠ 0 ∨ m = ROOT_INO ⊦ ⟪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; boolvar := ?; if err = ESUCCESS then {ri0 := ri; ri1 := ri; ri2 := ri; aubifs_core_index_store#(inodekey(m), adr4, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_store#(dentrykey(m, str), adr0, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_store#(inodekey(n), adr, fi, ro, fo, fs, log, boolvar; ri); dent := mkdentry(str, n); p_inode := mkinode (mkinode(m, md0, true, fs0[ri2[inodekey(m)]].nlink, fs0[ri1[inodekey(m)]].nsubdirs, fs0[ri0[inodekey(m)]].size).ino, nd1.meta, nd1.directory, nd1.nlink, nd1.nsubdirs, nd1.size); c_inode := mkinode (n, inodenode(inodekey(n), md, false, 1, 0, 0).meta, inodenode(inodekey(n), md, false, 1, 0, 0).directory, inodenode(inodekey(n), md, false, 1, 0, 0).nlink, inodenode(inodekey(n), md, false, 1, 0, 0).nsubdirs, inodenode(inodekey(n), md, false, 1, 0, 0).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)), n = 0, inodekey(m) ∈ ro, dentrykey(m, str) ∈ ri, inodekey(n) ∈ fo, inodekey(n) ∈ ri
adr4 = adr1, fs0 = fs, nd = inodenode(inodekey(n), md, false, 1, 0, 0), nd0 = dentrynode(dentrykey(m, str), n), nd1 = inodenode(inodekey(m), md0, true, fs[ri[inodekey(m)]].nlink, fs[ri[inodekey(m)]].nsubdirs, fs[ri[inodekey(m)]].size + 1), fs[ri[inodekey(m)]].directory, fs[ri[inodekey(m)]].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, fs[ri[inodekey(m)]].nlink ≠ 0 ∨ m = ROOT_INO ⊦ ⟪fail#(; ; err); adr4 := ?, adr0 := ?, adr := ?; boolvar := ?; if err = ESUCCESS then {ri0 := ri; ri1 := ri; ri2 := ri; aubifs_core_index_store#(inodekey(m), adr4, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_store#(dentrykey(m, str), adr0, fi, ro, fo, fs, log, boolvar; ri); aubifs_core_index_store#(inodekey(n), adr, fi, ro, fo, fs, log, boolvar; ri); dent := mkdentry(str, n); p_inode := mkinode (mkinode(m, md0, true, fs0[ri2[inodekey(m)]].nlink, fs0[ri1[inodekey(m)]].nsubdirs, fs0[ri0[inodekey(m)]].size).ino, nd1.meta, nd1.directory, nd1.nlink, nd1.nsubdirs, nd1.size); c_inode := mkinode (n, inodenode(inodekey(n), md, false, 1, 0, 0).meta, inodenode(inodekey(n), md, false, 1, 0, 0).directory, inodenode(inodekey(n), md, false, 1, 0, 0).nlink, inodenode(inodekey(n), md, false, 1, 0, 0).nsubdirs, inodenode(inodekey(n), md, false, 1, 0, 0).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)), n = 0, inodekey(m) ∈ ro, dentrykey(m, str) ∈ ri, inodekey(n) ∈ fo, inodekey(n) ∈ ri