| boolvar ↔ boolvar0, fs[adr] = inodenode(inodekey(ino), md, boolvar1, m, m0, m1), key = inodekey(ino), ri0 = ri, adr ∈ fs, m ≠ 0 ∨ ino = ROOT_INO ⊦ ⟪if ¬ adr ∈ ri ∧ adr ∈ fs ∧ key-cons(key, fs[adr]) then ri[key] := adr else abort; nd := fs[adr]; if nd.dentry? then if nd.ino ≠ 0 then aubifs_core_index_store#(nd.key, adr, fi, ro, fo, fs, log, boolvar0; ri) else aubifs_core_index_remove#(nd.key, fi, ro, fo, fs, log, boolvar0; ri); err := ESUCCESS; boolvar := boolvar0; if nd.data? then {let key = inodekey(nd.key.ino) in aubifs_core_index_contains#(key, ri, fi, ro, fo, fs, log, boolvar0; boolvar; err); if err = ESUCCESS ∧ boolvar then aubifs_core_index_store#(nd.key, adr, fi, ro, fo, fs, log, boolvar0; ri)}; if nd.trunc? then aubifs_core_index_truncate#(nd.key, nd.size, fi, ro, fo, fs, log, boolvar0; ri)⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → ri = replay-one(adr, fs[adr], ri0))), ino = 0, adr ∈ ri |
boolvar ↔ boolvar0, fs[adr] = inodenode(inodekey(ino), md, boolvar1, m, m0, m1), key = inodekey(ino), ri0 = ri, adr ∈ fs, m ≠ 0 ∨ ino = ROOT_INO ⊦ ⟪ri[key] := adr; nd := fs[adr]; if nd.dentry? then if nd.ino ≠ 0 then aubifs_core_index_store#(nd.key, adr, fi, ro, fo, fs, log, boolvar0; ri) else aubifs_core_index_remove#(nd.key, fi, ro, fo, fs, log, boolvar0; ri); err := ESUCCESS; boolvar := boolvar0; if nd.data? then {let key = inodekey(nd.key.ino) in aubifs_core_index_contains#(key, ri, fi, ro, fo, fs, log, boolvar0; boolvar; err); if err = ESUCCESS ∧ boolvar then aubifs_core_index_store#(nd.key, adr, fi, ro, fo, fs, log, boolvar0; ri)}; if nd.trunc? then aubifs_core_index_truncate#(nd.key, nd.size, fi, ro, fo, fs, log, boolvar0; ri)⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → ri = replay-one(adr, fs[adr], ri0))), ino = 0, adr ∈ ri
Used simplifier rules: ⊦ key-cons(inodekey(ino), nd) ↔ nd.inode? ∧ nd.key = inodekey(ino) ∧ ino ≠ 0; (s)% ⊦ inodenode(key, md, boolvar, m, m0, m1).inode?; (s)% ⊦ inodenode(key, md, boolvar, m, m0, m1).key = key; (s)% ⊦ inodekey(m) = inodekey(m0) ↔ m = m0; (s)