| cache_dirs[m] = mkdir(m0, md0, # links(m, cache_dirs), m3, entries), afs_files = (cache_files ⊕ cache_pcache) ⊕ cache_icache, cache_dirs0 = cache_dirs, dirs = cache_dirs, err = err0, files = afs_files, inode = mkinode(m, md, true, # links(m, cache_dirs), m3, 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), icache-cons(cache_icache, cache_dirs, cache_files), pcache-cons(cache_pcache, cache_dirs, cache_files), synced(cache_dirs, cache_icache, cache_pcache), m ∈ cache_dirs, cache_sync → synced(cache_files, cache_icache, cache_pcache) ⊦ ⟨if pre-write-inode(inode, dirs, files) then { {if inode.directory then dirs[inode.ino].meta := inode.meta else {files[inode.ino].meta := inode.meta; files[inode.ino].size := inode.size}; err := ESUCCESS} or fail#(; ; err); asynced := ?} else abort⟩ (dirs = cache_dirs0[m, cache_dirs0[m].meta:= md] ∧ files = (cache_files ⊕ cache_pcache) ⊕ cache_icache ∧ (asynced ↔ asynced0) ∧ ESUCCESS = err), m ∈ cache_icache |
cache_dirs[m] = mkdir(m0, md0, # links(m, cache_dirs), m3, entries), afs_files = (cache_files ⊕ cache_pcache) ⊕ cache_icache, cache_dirs0 = cache_dirs, dirs = cache_dirs, err = err0, files = afs_files, inode = mkinode(m, md, true, # links(m, cache_dirs), m3, m0), afs-cons(cache_dirs, (cache_files ⊕ cache_pcache) ⊕ cache_icache), afs-cons(cache_dirs, cache_files), dcache-cons(cache_dcache, cache_dirs, cache_files), icache-cons(cache_icache, cache_dirs, cache_files), pcache-cons(cache_pcache, cache_dirs, cache_files), pre-write-inode(inode, dirs, files), synced(cache_dirs, cache_icache, cache_pcache), m ∈ cache_dirs, cache_sync → synced(cache_files, cache_icache, cache_pcache) ⊦ ⟨ {if inode.directory then dirs[inode.ino].meta := inode.meta else {files[inode.ino].meta := inode.meta; files[inode.ino].size := inode.size}; err := ESUCCESS} or fail#(; ; err); asynced := ?⟩ (dirs = cache_dirs0[m, cache_dirs0[m].meta:= md] ∧ files = (cache_files ⊕ cache_pcache) ⊕ cache_icache ∧ (asynced ↔ asynced0) ∧ ESUCCESS = err), m ∈ cache_icache
cache_dirs[m] = mkdir(m0, md0, # links(m, cache_dirs), m3, entries), afs_files = (cache_files ⊕ cache_pcache) ⊕ cache_icache, cache_dirs0 = cache_dirs, dirs = cache_dirs, err = err0, files = afs_files, inode = mkinode(m, md, true, # links(m, cache_dirs), m3, m0), afs-cons(cache_dirs, (cache_files ⊕ cache_pcache) ⊕ cache_icache), afs-cons(cache_dirs, cache_files), dcache-cons(cache_dcache, cache_dirs, cache_files), icache-cons(cache_icache, cache_dirs, cache_files), pcache-cons(cache_pcache, cache_dirs, cache_files), synced(cache_dirs, cache_icache, cache_pcache), m ∈ cache_dirs, cache_sync → synced(cache_files, cache_icache, cache_pcache) ⊦ ⟨abort⟩ (dirs = cache_dirs0[m, cache_dirs0[m].meta:= md] ∧ files = (cache_files ⊕ cache_pcache) ⊕ cache_icache ∧ (asynced ↔ asynced0) ∧ ESUCCESS = err), pre-write-inode(inode, dirs, files), m ∈ cache_icache