| dirs0[ino3] = mkdir(m7, md4, # links(ino3, dirs0), m12, entries2), entries1[str] = entries2[str], dirs0[ino2] = mkdir(m4, md3, # links(ino2, dirs0), m6, entries0), dirs0[m11] = mkdir(m1, md5, # links(m11, dirs0), m9, entries3), files0[entries2[str]] = mkfile(m0, md6, # links(entries2[str], dirs0), content0), entries0[str] = entries2[str], dirs0[ino0] = mkdir(m2, md1, # links(ino0, dirs0), m8, entries), entries[str] = entries2[str], dirs0[ino1] = mkdir(m5, md2, # links(ino1, dirs0), m10, entries1), afs-cons (dirs0[m11, mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]])], files0[entries2[str], mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0)]), afs-cons(dirs0, files0), icache-cons(icache0, dirs0, files0), synced(dirs0, icache0, pcache), entries2[str] ∈ files0, m11 ∈ dirs0, str ∈ entries2, ino3 ∈ dirs0, str ∈ entries0, ino2 ∈ dirs0, ino0 ∈ dirs0, str ∈ entries, ino1 ∈ dirs0, str ∈ entries1, asynced1 → synced(files0, icache0, pcache), links(ino3, dirs0) ≠ ∅ ∨ ino3 = ROOT_INO, links(m11, dirs0) ≠ ∅ ∨ m11 = ROOT_INO, links(ino2, dirs0) ≠ ∅ ∨ ino2 = ROOT_INO, links(ino0, dirs0) ≠ ∅ ∨ ino0 = ROOT_INO, links(ino1, dirs0) ≠ ∅ ∨ ino1 = ROOT_INO ⊦ str0 ∈ entries3, ∀ ino. ino ∈ icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] → icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino = ino ∧ (icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .dirty ⊃ valid-file-inode (icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode, dirs0[m11, mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]])], files0[entries2[str], mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0)]) ; valid-ino (ino, dirs0[m11, mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]])], files0[entries2[str], mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0)]) ∧ valid-inode (icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode, dirs0[m11, mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]])], files0[entries2[str], mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0)]) ) |
dirs0[ino1] = mkdir(m5, md2, # links(ino1, dirs0), m10, entries1), entries[str] = entries2[str], dirs0[ino0] = mkdir(m2, md1, # links(ino0, dirs0), m8, entries), entries0[str] = entries2[str], files0[entries2[str]] = mkfile(m0, md6, # links(entries2[str], dirs0), content0), dirs0[m11] = mkdir(m1, md5, # links(m11, dirs0), m9, entries3), dirs0[ino2] = mkdir(m4, md3, # links(ino2, dirs0), m6, entries0), entries1[str] = entries2[str], dirs0[ino3] = mkdir(m7, md4, # links(ino3, dirs0), m12, entries2), afs-cons(dirs0, files0), afs-cons (dirs0[m11, mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]])], files0[entries2[str], mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0)]), icache-cons(icache0, dirs0, files0), synced(dirs0, icache0, pcache), ino ∈ icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ], str ∈ entries1, ino1 ∈ dirs0, str ∈ entries, ino0 ∈ dirs0, ino2 ∈ dirs0, str ∈ entries0, ino3 ∈ dirs0, str ∈ entries2, m11 ∈ dirs0, entries2[str] ∈ files0, asynced1 → synced(files0, icache0, pcache), links(ino1, dirs0) ≠ ∅ ∨ ino1 = ROOT_INO, links(ino0, dirs0) ≠ ∅ ∨ ino0 = ROOT_INO, links(ino2, dirs0) ≠ ∅ ∨ ino2 = ROOT_INO, links(m11, dirs0) ≠ ∅ ∨ m11 = ROOT_INO, links(ino3, dirs0) ≠ ∅ ∨ ino3 = ROOT_INO ⊦ str0 ∈ entries3, icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino = ino ∧ (icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .dirty ⊃ icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino ∈ files0 ∧ icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .nlink = ( icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino = entries2[str] ⊃ mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0) ;files0 [icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino ] ) .nlink ∧ icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .nsubdirs = 0 ∧ ¬ icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .directory ; (ino ∈ dirs0 ∨ ino ∈ files0) ∧ icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode = ( icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino ∈ dirs0 ⊃ mkinode (icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino, ( icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino = m11 ⊃ mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]]) ;dirs0 [icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino ] ) .meta, true, ( icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino = m11 ⊃ mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]]) ;dirs0 [icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino ] ) .nlink, ( icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino = m11 ⊃ mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]]) ;dirs0 [icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino ] ) .nsubdirs, ( icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino = m11 ⊃ mkdir(m1 + 1, md0, # links(m11, dirs0), m9, entries3[str0, entries2[str]]) ;dirs0 [icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino ] ) .size) ;mkinode (icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino, ( icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino = entries2[str] ⊃ mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0) ;files0 [icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino ] ) .meta, false, ( icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino = entries2[str] ⊃ mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0) ;files0 [icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino ] ) .nlink, 0, ( icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino = entries2[str] ⊃ mkfile(m15, md, # links(entries2[str], dirs0) + 1, content0) ;files0 [icache0[m11, mkientry(false, mkinode(m11, md0, true, # links(m11, dirs0), m9, m1 + 1))] [entries2[str], mkientry(false, mkinode(entries2[str], md, false, # links(entries2[str], dirs0) + 1, 0, m15)) ] [ino ] .inode .ino ] ) .size) ) )
Used simplifier rules: ⊦ dirs[ino, ad][ino0] = (ino0 = ino ∧ ino ∈ dirs ⊃ ad;dirs[ino0]); (s)%⊦ getinode(ino, dirs, files) = (ino ∈ dirs ⊃ mkinode (ino, dirs[ino].meta, true, dirs[ino].nlink, dirs[ino].nsubdirs, dirs[ino].size) ;mkinode (ino, files[ino].meta, false, files[ino].nlink, 0, files[ino].size) ); (s)%⊦ valid-inode(inode, dirs, files) ↔ inode = getinode(inode.ino, dirs, files); (s)% ⊦ ino ∈ dirs[ino0, ad] ↔ ino ∈ dirs; (s)% ⊦ valid-ino(ino, dirs, files) ↔ ino ∈ dirs ∨ ino ∈ files; (s)% ⊦ files[ino, af][ino0] = (ino0 = ino ∧ ino ∈ files ⊃ af;files[ino0]); (s)% ⊦ ino ∈ files[ino0, af] ↔ ino ∈ files; (s)% ⊦ valid-file-ino(ino, dirs, files) ↔ ino ∈ files; (s)%⊦ valid-file-inode(inode, dirs, files) ↔ valid-file-ino(inode.ino, dirs, files) ∧ inode.nlink = files[inode.ino].nlink ∧ inode.nsubdirs = 0 ∧ ¬ inode.directory; (s)