auth::local::password::ResetPassword (private)

 auth::local::password::ResetPassword username parameters \
    [ authority_id ]

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

Implements the ResetPassword operation of the auth_password service contract for the local account implementation.

Parameters:

username (required)

parameters (required)

authority_id (optional)

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

Testcases:

auth_password_implementations

Source code:

    array set result {
        password_status ok
        password_message {}
    }

    set user_id [acs_user::get_by_username -authority_id $authority_id -username $username]
    if { $user_id eq "" } {
        set result(password_status) "no_account"
        return [array get result]
    }

    # Reset the password
    set password [ad_generate_random_string]

    ad_change_password $user_id $password

    # We return the new password here and let the OpenACS framework send the email with the new password
    set result(password) $password
    return [array get result]

XQL Not present:

PostgreSQL, Oracle

Generic XQL file:

packages/acs-authentication/tcl/local-procs.xql