Class ::nsmcp::LogCorrelation

::nsmcp::LogCorrelation[i] create ... \
           [ -accessSearches (default "") ] \
           [ -parser (default "::nsmcp::logRecordParser") ] \
           [ -systemSearch:required systemSearch:required ]

Defined in /usr/local/ns/tcl/nsmcp/lib/log-record.tcl

Class Relations

  • class: ::nx::Class[i]
  • superclass: ::nx::Object[i]
::nx::Class create ::nsmcp::LogCorrelation \
     -superclass ::nx::Object

Methods (to be applied on instances)

  • entries (scripted, public)

     <instance of nsmcp::LogCorrelation[i]> entries level
    Parameters:
    level (required)

    Testcases:
    No testcase defined.
    if {![regexp {^[A-Za-z][A-Za-z0-9_()-]*$} $level]} {
        error "expected a log severity name"
    }
    return [${:systemSearch} search "${level}:" $level]
  • errors (scripted, public)

     <instance of nsmcp::LogCorrelation[i]> errors

    Testcases:
    No testcase defined.
    return [:entries Error]
  • requestContext (scripted, public)

     <instance of nsmcp::LogCorrelation[i]> requestContext identifier
    Parameters:
    identifier (required)

    Testcases:
    No testcase defined.
    if {![${:parser} validRequestIdentifier $identifier]} {
        error "expected a complete dash-delimited NaviServer log-thread identifier"
    }
    set access {}
    if {[${:parser} validConnectionIdentifier $identifier]} {
        foreach source ${:accessSearches} {
            dict set access $source [$source search $identifier {} access]
        }
    }
    return [dict create requestIdentifier $identifier  system [${:systemSearch} search $identifier {} system] access $access]
  • results (scripted, public)

     <instance of nsmcp::LogCorrelation[i]> results handle [ cursor ] \
        [ limit ]
    Parameters:
    handle (required)
    cursor (optional, defaults to "0")
    limit (optional, defaults to "20")

    Testcases:
    No testcase defined.
    foreach source [list ${:systemSearch} {*}${:accessSearches}] {
        try {return [$source results $handle $cursor $limit]} trap {NSMCP RESULT UNKNOWN} {} {
            # Try the next configured source, never a caller-supplied path.
        }
    }
    return -code error -errorcode {NSMCP RESULT UNKNOWN} "unknown or expired result handle"