nsmcp::codeUpstreamPath

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::codeUpstreamPath {path emptyAllowed} {
    
    if {$emptyAllowed && $path eq {}} {
        return $path
    }
    if {[string length $path]>1024 || ![regexp {^[A-Za-z0-9_+./-]+$} $path] || [string index $path 0] eq "/"} {
        error "invalid-upstream-path"
    }
    foreach part [split [string trimright $path /] /] {
        if {$part in {{} . ..}} {
            error "invalid-upstream-path"
        }
    }
    return $path

}