sec_get_session_info session_idWhat it does:
Returns information for a session, in the form [list $user_id $token $secure_token $last_ip $last_hit].Defined in: /web/philip/packages/acs-core/security-procs.tcl
Source code:
set db [ns_db gethandle log] set sql " select user_id, token, secure_token, last_ip, last_hit from sec_sessions where session_id = $session_id " set selection [ns_db 0or1row $db $sql] ns_db releasehandle $db if { $selection == "" } { sec_log "No row in sec_sessions for session_id $session_id!" return } set_variables_after_query return [list $user_id $token $secure_token $last_ip $last_hit]