http_auth::site_node_authorize (public)

 http_auth::site_node_authorize [ -user_id user_id ] [ -url url ]

Defined in packages/acs-tcl/tcl/http-auth-procs.tcl

Procedure to take HTTP authenticated user_id and check site_node permissions. Default if http auth is proc is not specified.

Switches:
-user_id (optional)
-url (optional)

Partial Call Graph (max 5 caller/called nodes):
%3 permission::permission_p permission::permission_p (public) site_node::get_element site_node::get_element (public) http_auth::site_node_authorize http_auth::site_node_authorize http_auth::site_node_authorize->permission::permission_p http_auth::site_node_authorize->site_node::get_element

Testcases:
No testcase defined.
Source code:
    set node_id [site_node::get_element -element node_id -url $url]
    if {[permission::permission_p  -party_id $user_id  -privilege read  -object_id $node_id]} {
        return filter_ok
    }
    ns_returnunauthorized
    return filter_return
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: