auth::login_attempts::threshold_reached_p (private)

 auth::login_attempts::threshold_reached_p \
    [ -login_attempt_key login_attempt_key ]

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

Check if the maximum number of consecutive failed login attempts has been reached

Switches:
-login_attempt_key
(defaults to "[ad_conn peeraddr]-[ad_conn subsite_id]") (optional)
Identifier of this login attempt. Defaults to "[ad_conn peeraddr]-[ad_conn subsite]"
Returns:
1 if limit has been reached otherwise 0

Partial Call Graph (max 5 caller/called nodes):
%3 test_auth__login_attempts auth__login_attempts (test acs-authentication) auth::login_attempts::threshold_reached_p auth::login_attempts::threshold_reached_p test_auth__login_attempts->auth::login_attempts::threshold_reached_p auth::login_attempts::get auth::login_attempts::get (private) auth::login_attempts::threshold_reached_p->auth::login_attempts::get parameter::get_from_package_key parameter::get_from_package_key (public) auth::login_attempts::threshold_reached_p->parameter::get_from_package_key auth::authenticate auth::authenticate (public) auth::authenticate->auth::login_attempts::threshold_reached_p

Testcases:
auth__login_attempts
Source code:

    set max_failed_login_attempts [parameter::get_from_package_key  -parameter "MaxConsecutiveFailedLoginAttempts"  -package_key "acs-authentication"  -default 0]

    if {$max_failed_login_attempts > 0
        && [::auth::login_attempts::get -key $login_attempt_key] > $max_failed_login_attempts
    } {
        return 1
    } else {
        return 0
    }
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: