| files[ino0] = mkfile(m, md, m0, content), err = ESUCCESS, afs-cons(dirs, files), ispath(p, ROOT_INO, ino0, dirs, files), of-cons(of, dirs, files), pw(user, md), px-parent(user, p, ROOT_INO, dirs, files), ino0 ∈ files ⊦ ⟪afs_check_commit#(dirs, files; err; asynced); pageno := 0; inode := (ino0 ∈ dirs ⊃ mkinode(ino0, dirs[ino0].meta, true, dirs[ino0].nlink, dirs[ino0].nsubdirs, dirs[ino0].size);mkinode(ino0, md, false, m0, 0, m)); if err = ESUCCESS then pageno := inode.size / VFS_PAGE_SIZE; if err = ESUCCESS then {buf-opt := none; afs_truncate#(n, pageno; buf-opt, inode, isdir0, err, dirs, files, asynced)}⟫ (of-cons(of, dirs, files) ∧ afs-cons(dirs, files)), ino0 ∈ dirs |
files[ino0] = mkfile(m, md, # links(ino0, dirs), content), err = ESUCCESS, afs-cons(dirs, files), ispath(p, ROOT_INO, ino0, dirs, files), of-cons(of, dirs, files), pw(user, md), px-parent(user, p, ROOT_INO, dirs, files), ino0 ∈ files, ¬ ino0 ∈ dirs ⊦ ⟪afs_check_commit#(dirs, files; err; asynced); pageno := 0; inode := (ino0 ∈ dirs ⊃ mkinode(ino0, dirs[ino0].meta, true, dirs[ino0].nlink, dirs[ino0].nsubdirs, dirs[ino0].size) ;mkinode(ino0, md, false, # links(ino0, dirs), 0, m) ); if err = ESUCCESS then pageno := inode.size / VFS_PAGE_SIZE; if err = ESUCCESS then {buf-opt := none; afs_truncate#(n, pageno; buf-opt, inode, isdir0, err, dirs, files, asynced)}⟫ (of-cons(of, dirs, files) ∧ afs-cons(dirs, files))
Used simplifier rules: afs-cons-file-nlink: ⊦ afs-cons(dirs, files) ∧ ino ∈ files ∧ files[ino] = mkfile(m, md, n, content) → # links(ino, dirs) = n; (forward) from specification afs-base