| cache_icache[m] = mkientry(boolvar, mkinode(m1, md1, boolvar0, m2, m4, m5)), cache_dirs[m] = mkdir(m0, md2, # links(m, cache_dirs), m6, entries0), afs-cons(cache_dirs, (cache_files ⊕ cache_pcache) ⊕ cache_icache), afs-cons(cache_dirs, cache_files), dcache-cons(cache_dcache, cache_dirs, cache_files), pcache-cons(cache_pcache, cache_dirs, cache_files), synced(cache_dirs, cache_icache, cache_pcache), m ∈ cache_icache, m ∈ cache_dirs, ino ∈ cache_files, cache_sync → synced(cache_files, cache_icache, cache_pcache), m ∈ cache_icache → cache_icache[m].inode.ino = m ∧ (cache_icache[m].dirty ⊃ valid-file-inode(cache_icache[m].inode, cache_dirs, cache_files) ;valid-ino(m, cache_dirs, cache_files) ∧ valid-inode(cache_icache[m].inode, cache_dirs, cache_files) ), ∀ ino. ino ∈ cache_icache → cache_icache[ino].inode.ino = ino ∧ (cache_icache[ino].dirty ⊃ valid-file-inode(cache_icache[ino].inode, cache_dirs, cache_files) ;valid-ino(ino, cache_dirs, cache_files) ∧ valid-inode(cache_icache[ino].inode, cache_dirs, cache_files) ) ⊦ ((cache_files ⊕ cache_pcache) ⊕ cache_icache)[ino] = ((cache_files ⊕ cache_pcache) ⊕ cache_icache[m1, mkientry(false, mkinode(m1, md, boolvar0, m2, m4, m5))])[ino] |
cache_dirs[m1] = mkdir(m0, md2, # links(m1, cache_dirs), m6, entries0), cache_icache[m1] = mkientry(false, mkinode(m1, md2, true, # links(m1, cache_dirs), m6, m0)), afs-cons(cache_dirs, cache_files), afs-cons(cache_dirs, (cache_files ⊕ cache_pcache) ⊕ cache_icache), dcache-cons(cache_dcache, cache_dirs, cache_files), pcache-cons(cache_pcache, cache_dirs, cache_files), synced(cache_dirs, cache_icache, cache_pcache), m1 ∈ cache_dirs, m1 ∈ cache_icache, ino ∈ cache_files, cache_sync → synced(cache_files, cache_icache, cache_pcache), ∀ ino0. ino0 ∈ cache_icache → cache_icache[ino0].inode.ino = ino0 ∧ (cache_icache[ino0].dirty ⊃ cache_icache[ino0].inode.ino ∈ cache_files ∧ cache_icache[ino0].inode.nlink = cache_files[cache_icache[ino0].inode.ino].nlink ∧ cache_icache[ino0].inode.nsubdirs = 0 ∧ ¬ cache_icache[ino0].inode.directory ; (ino0 ∈ cache_dirs ∨ ino0 ∈ cache_files) ∧ cache_icache[ino0].inode = (cache_icache[ino0].inode.ino ∈ cache_dirs ⊃ mkinode (cache_icache[ino0].inode.ino, cache_dirs[cache_icache[ino0].inode.ino].meta, true, cache_dirs[cache_icache[ino0].inode.ino].nlink, cache_dirs[cache_icache[ino0].inode.ino].nsubdirs, cache_dirs[cache_icache[ino0].inode.ino].size) ;mkinode (cache_icache[ino0].inode.ino, cache_files[cache_icache[ino0].inode.ino].meta, false, cache_files[cache_icache[ino0].inode.ino].nlink, 0, cache_files[cache_icache[ino0].inode.ino].size) ) ) ⊦ ((cache_files ⊕ cache_pcache) ⊕ cache_icache)[ino] = ((cache_files ⊕ cache_pcache) ⊕ cache_icache[m1, mkientry(false, mkinode(m1, md, true, # links(m1, cache_dirs), m6, m0))])[ino]
Used simplifier rules: ⊦ mkinode(m, md, boolvar, m0, m1, m2) = mkinode(m3, md0, boolvar0, m4, m5, m6) ↔ m = m3 ∧ md = md0 ∧ (boolvar ↔ boolvar0) ∧ m0 = m4 ∧ m1 = m5 ∧ m2 = m6; (ws)% ⊦ mkdir(m, md, m0, m1, entries).size = m; (s)% ⊦ mkdir(m, md, m0, m1, entries).nsubdirs = m1; (s)% ⊦ mkdir(m, md, m0, m1, entries).nlink = m0; (s)% ⊦ mkdir(m, md, m0, m1, entries).meta = md; (s)% ⊦ afs-cons(dirs, files) ∧ ino ∈ dirs → ¬ ino ∈ files; (s)% ⊦ mkientry(boolvar, inode).dirty ↔ boolvar; (s)% ⊦ mkinode(m, md, boolvar, m0, m1, m2).ino = m; (s)% ⊦ mkientry(boolvar, inode).inode = inode; (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)% ⊦ valid-ino(ino, dirs, files) ↔ ino ∈ dirs ∨ 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)