auth::self_registration (public)

 auth::self_registration

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

Check AllowSelfRegister parameter and set user message if self registration not allowed.

Partial Call Graph (max 5 caller/called nodes):
%3 test_auth__self_registration auth__self_registration (test acs-authentication) auth::self_registration auth::self_registration test_auth__self_registration->auth::self_registration ad_conn ad_conn (public) auth::self_registration->ad_conn auth::require_login auth::require_login (public) auth::self_registration->auth::require_login parameter::get_from_package_key parameter::get_from_package_key (public) auth::self_registration->parameter::get_from_package_key util_user_message util_user_message (public) auth::self_registration->util_user_message packages/acs-subsite/lib/user-new.tcl packages/acs-subsite/ lib/user-new.tcl packages/acs-subsite/lib/user-new.tcl->auth::self_registration

Testcases:
auth__self_registration
Source code:
    if { [string is false [parameter::get_from_package_key  -package_key acs-authentication  -parameter AllowSelfRegister]] } {
        if {[ad_conn session_id] ne ""} {
            util_user_message -message "Self registration is not allowed"
        } else {
            ns_log notice "auth::self_registration: cannot set user_message 'Self registration is not allowed'"
        }
        auth::require_login
    }
Generic XQL file:
packages/acs-authentication/tcl/authentication-procs.xql

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

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

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