auth::authority::get (public)

 auth::authority::get [ -authority_id authority_id ] [ -array array ]

Defined in packages/acs-authentication/tcl/authority-procs.tcl

Get info about an authority and return the authority_id. If no authority is specified, then return

Switches:
-authority_id (optional)
The authority you want to get. If not specified, return the default authority
-array (optional)
Name of an array into which the detailed attributes should be delivered
Returns:
authority_id
Author:
Lars Pind <lars@collaboraid.biz>

Partial Call Graph (max 5 caller/called nodes):
%3 test_auth_authority_api auth_authority_api (test acs-authentication) auth::authority::get auth::authority::get test_auth_authority_api->auth::authority::get test_auth_authority_edit auth_authority_edit (test acs-authentication) test_auth_authority_edit->auth::authority::get test_auth_driver_get_parameter_values auth_driver_get_parameter_values (test acs-authentication) test_auth_driver_get_parameter_values->auth::authority::get auth::authority::get_authority_options auth::authority::get_authority_options (public) auth::authority::get->auth::authority::get_authority_options auth::authority::get_not_cached auth::authority::get_not_cached (private) auth::authority::get->auth::authority::get_not_cached util_memoize util_memoize (public) auth::authority::get->util_memoize acs_user::get_by_username acs_user::get_by_username (public) acs_user::get_by_username->auth::authority::get auth::authority::batch_sync auth::authority::batch_sync (public) auth::authority::batch_sync->auth::authority::get auth::authority::get_element auth::authority::get_element (public) auth::authority::get_element->auth::authority::get auth::get_local_account auth::get_local_account (private) auth::get_local_account->auth::authority::get auth::get_register_authority auth::get_register_authority (public) auth::get_register_authority->auth::authority::get

Testcases:
auth_authority_api, auth_driver_get_parameter_values, auth_authority_edit
Source code:

    if {$authority_id eq ""} {
        #
        # Get the default authority (in future probably for the
        # specified or current subsite).
        #
        set authority_id [lindex [auth::authority::get_authority_options] 0 1]
    }

    if {[info exists array]} {
        upvar $array row
        array set row [util_memoize [list auth::authority::get_not_cached $authority_id]]
    }

    return $authority_id
Generic XQL file:
packages/acs-authentication/tcl/authority-procs.xql

PostgreSQL XQL file:
packages/acs-authentication/tcl/authority-procs-postgresql.xql

Oracle XQL file:
packages/acs-authentication/tcl/authority-procs-oracle.xql

[ hide source ] | [ make this the default ]
Show another procedure: