Class ::nsmcp::UnifiedAccessDatabase

::nsmcp::UnifiedAccessDatabase[i] create ... \
           [ -maxBytes (default "68719476736") ] \
           [ -settings:required settings:required ]

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

Class Relations

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

Methods (to be applied on instances)

  • connect (scripted, public)

     <instance of nsmcp::UnifiedAccessDatabase[i]> connect

    Open a readable unified access-record session. Retry eligible store-lock failures and establish compatibility views, closing the adapter on setup errors.

    Returns:
    A UnifiedAccessSession object.

    Testcases:
    No testcase defined.
    set store [:accessRecordRetry ${:settings} [list :accessRecordReaderOpen ${:settings}]]
    if {![$store available]} {
        $store close
        error "access store pool checkout timed out"
    }
    try {
        $store legacyViews
    } on error {message options} {
        $store close
        return -options $options $message
    }
    return [::nsmcp::UnifiedAccessSession new -adapter $store]
  • path (scripted, public)

     <instance of nsmcp::UnifiedAccessDatabase[i]> path

    Compute this server's access-record database path. Use the configured record directory and the server-name hash shared by the record store.

    Returns:
    The server-specific SQLite filename.

    Testcases:
    No testcase defined.
    return [file join [dict get ${:settings} directory] access-records-[ns_crypto::md string -digest sha256 -- [ns_info server]].sqlite3]