nsmcp::AccessRecordStoreSQLite method retentionFloor (protected)

 <instance of nsmcp::AccessRecordStoreSQLite> retentionFloor

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

Testcases:

No testcase defined.

Source code:

set floor [:stateGet retentionFloor 0]
if {[:dict getdef ${:settings} unified false]} {
    # A paused writer cannot prune or advance persisted metadata.
    # Readers still enforce current event-age retention immediately.
    set current  [expr {wide(floor(([clock seconds]-[dict get ${:settings} retention])/60.0))*60}]
    set floor [expr {max($floor,$current)}]
}
return $floor

XQL Not present:

Generic, PostgreSQL, Oracle