auth::login_attempts::record (private)

 auth::login_attempts::record [ -login_attempt_key login_attempt_key ]

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

Record a failed login attempt

Switches:

-login_attempt_key (optional, defaults to "[ad_conn peeraddr]-[ad_conn subsite_id]")

Identifier of this login attempt. Defaults to "[ad_conn peeraddr]-[ad_conn subsite]"

Partial Call Graph (max 5 caller/called nodes):

Testcases:

auth__login_attempts

Source code:

    if { [parameter::get_from_package_key -parameter "MaxConsecutiveFailedLoginAttempts" -package_key "acs-authentication" -default 0] } {

        set max_age [parameter::get_from_package_key  -parameter "MaxConsecutiveFailedLoginAttemptsLockoutTime"  -package_key "acs-authentication"  -default 21600]

        ::auth::login_attempts::login_attempt_incr -key $login_attempt_key -max_age $max_age
    }

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