nsmcp::AccessRecordSupport method accessIngestionObserve (protected)

 <instance of nsmcp::AccessRecordSupport> accessIngestionObserve \
    [ -observer observer ] [ -bytes bytes ] [ -batch batch ] phase

Defined in /usr/local/ns/tcl/nsmcp/log-traffic-record-00-support.tcl

Publish progress through the instance's observer callback. Orchestration may override the callback for one invocation without retaining its token on the object. An explicit empty override disables dispatch even when the instance has an observer.

Switches:

-observer (optional)

Optional invocation-local callback override.

-bytes (optional, defaults to "0")

Committed source bytes for this event.

-batch (optional)

Optional committed-batch statistics.

Parameters:

phase (required)

Progress phase name.

Returns:

The callback result, or an empty result when disabled.

Testcases:

No testcase defined.

Source code:

if {![info exists observer]} {
    if {[info exists :observer]} {
        set observer ${:observer}
    } else {
        set observer {}
    }
}
if {$observer ne {}} {
    set call [list {*}$observer $phase $bytes]
    if {$batch ne {}} {
        lappend call $batch
    }
    return [uplevel #0 $call]
}

XQL Not present:

Generic, PostgreSQL, Oracle