This procedure is defined in the server but not documented via ad_proc or proc_doc and may be intended as a private interface.
The procedure is defined as:
proc nsmcp::accessUnifiedRestore {state} {
set files {}
foreach file [dict get $state files] {
if {[dict exists $file prefixHash]} {
set f [open [dict get $file path] rb]
try {
set prefix [read $f [dict get $file prefixLength]]
} finally {
close $f
}
if {[ns_crypto::md string -digest sha256 -binary -- $prefix] ne [dict get $file prefixHash]} {
error "backfill source changed"
}
dict set file prefix $prefix
dict unset file prefixHash
dict unset file prefixLength
}
lappend files $file
}
dict set state files $files
return $state
}
