nsmcp::AccessRecordStoreSQLite method overview (public)

 <instance of nsmcp::AccessRecordStoreSQLite> overview

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

Testcases:

No testcase defined.

Source code:

set report [:stateGet continuous {}]; set observed [:stateGet observations {}]
set floor [:stateGet retentionFloor 0]; set now [clock seconds]
set first [expr {[dict exists $observed first] && [dict get $observed first]>0 ? [dict get $observed first] : {}}]
set latest [expr {[dict exists $observed latest] && [dict get $observed latest]>0 ? [dict get $observed latest] : {}}]
set completed [expr {[dict exists $observed completed] && [dict get $observed completed]>0 ? [dict get $observed completed] : {}}]
set size [expr {[dict exists $report observedSize] ? [dict get $report observedSize] : 0}]
set cursor [expr {[dict exists $report cursor] ? [dict get $report cursor] : 0}]
set history [expr {[dict exists $report historyUnreadBytes] ? [dict get $report historyUnreadBytes] : 1}]
set unsupported [expr {[dict exists $report unsupportedCompressed] ? [dict get $report unsupportedCompressed] : 0}]
if {$unsupported} {incr history $unsupported}
set recent [expr {[dict exists $report recentFrom] ? [dict get $report recentFrom] : $now}]
set updated [expr {[dict exists $report updatedAt] ? [dict get $report updatedAt] : 0}]
return [dict create observedSize $size cursor $cursor historyEnd $history historyCursor 0 recentFrom $recent initialOffset 0 recentInitialized [expr {$updated>0}] seek {}  updatedAt $updated firstObserved $first latestObserved $latest latestCompletionObserved $completed pending [expr {[dict exists $report pending] ? [dict get $report pending] : 0}] generation 1 rotationGaps 0 lastRotationAt 0  malformed [expr {[dict exists $observed malformed] ? [dict get $observed malformed] : 0}] oversized [expr {[dict exists $observed oversized] ? [dict get $observed oversized] : 0}] lastMalformedAt {}  ingestionLagSeconds [expr {[dict exists $report caughtUp] && [dict get $report caughtUp] ? max(0,$now-$updated) : ($completed eq {} ? max(0,$now-$updated) : max(0,$now-$completed))}] retentionFloor $floor]

XQL Not present:

Generic, PostgreSQL, Oracle