::nsmcp::warningRequestMetadata

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::warningRequestMetadata {text redactor} {
    
    set result {authenticationState unknown authenticationSource unavailable}
    if {[regexp -line {^:[ \t]+(?:GET|POST|HEAD|PUT|DELETE|OPTIONS|PATCH|CONNECT|TRACE) [^\r\n]* user_id ([^ \t\r\n]+)(?: user_agent[^\r\n]*)?[ \t]*$} $text -> id]
        && [regexp {^[0-9]{1,18}$} $id]} {
        scan $id %lld value
        dict set result authenticationState [expr {$value == 0 ? "anonymous" : "authenticated"}]
        dict set result authenticationSource system-log
    }
    return [dict merge $result [::nsmcp::warningUserAgent $text $redactor]]

}