nsmcp::UnifiedAccessAnalytics method summaryLocked (protected)

 <instance of nsmcp::UnifiedAccessAnalytics[i]> summaryLocked \
    options

Defined in /usr/local/ns/tcl/nsmcp/log-traffic-unified.tcl

Parameters:
options (required)

Testcases:
No testcase defined.
Source code:
set result [next [list $options]]
# The original raw-log retention history is never certified by a DB
# snapshot. Report ingestion completion separately from that assurance.
set coverage [dict get $result coverage]
dict set coverage windowComplete false
set reasons [dict get $coverage incompleteReasons]
lappend reasons source-retention-unverified
dict set coverage incompleteReasons [lsort -unique $reasons]
dict set coverage continuousStore true
set overview [${:db} overview]
set capacity [dict get $overview storage]
foreach {field key} {storageMaxBytes maxBytes storageMainMaxBytes mainMaxBytes storageMainAllocatedBytes mainAllocatedBytes storageDiskBytes diskBytes storageLimitExceeded limitExceeded storageMinimumBudgetBytes minimumBudgetBytes} {
    dict set coverage $field [dict get $capacity $key]
}
set failed [nsv_exists nsmcp:access-store:[ns_info server] lastFailure]
dict set coverage writerFailure $failed
set reasons [dict get $coverage incompleteReasons]
if {$failed} {
    lappend reasons writer-paused
}
if {[dict get $capacity limitExceeded]} {
    lappend reasons storage-limit-exceeded
}
dict set coverage incompleteReasons [lsort -unique $reasons]
dict set coverage writerFailureClass [expr {$failed ? [lindex [dict get [nsv_get nsmcp:access-store:[ns_info server] lastFailure] code] 2] : {}}]
dict set coverage ingestionLagSeconds [dict get $overview ingestionLagSeconds]
dict set result coverage $coverage
return $result
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: