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::accessRecordIdentity {identifier} {
set result {recordSource unknown driver {} pool unknown requestIdentifierUnique false}
if {[::nsmcp::logRecordParser validConnectionIdentifier $identifier]} {
dict set result recordSource connection
dict set result pool [lindex [split $identifier :] 2]
dict set result requestIdentifierUnique true
} elseif {[regexp {^-driver:([^:\s]+):[0-9]+(?:-(.+))?-$} $identifier -> driver pool]} {
dict set result recordSource driver
dict set result driver [expr {[string length [encoding convertto utf-8 $driver]]<=128 ? $driver : "unknown"}]
if {$pool ne {} && [string length [encoding convertto utf-8 $pool]]<=128} {dict set result pool $pool}
}
return $result
}
