nsmcp::FileCredentials method describeUnlocked (protected)

 <instance of nsmcp::FileCredentials[i]> describeUnlocked

Defined in /usr/local/ns/tcl/nsmcp/lib/credentials.tcl

Testcases:
No testcase defined.
Source code:
set result {}
foreach name [lsort [nsv_array names ${:store}]] {
    set metadata [nsv_get ${:store} $name]
    set current [${:authenticator} credentialInfo [dict get $metadata digest]]
    set status revoked
    if {$current ne ""} {
        set status active
        if {[dict get $current expires] != 0 && [dict get $current expires] <= [clock seconds]} {set status expired}
    }
    dict set metadata status $status
    dict set result $name $metadata
}
return $result
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: