<recover-action-3> ( -- action )

Vocabulary

furnace.auth.features.recover-password

Inputs

None

Outputs

action

an object

Definition

USING: accessors furnace.actions furnace.auth
furnace.auth.providers furnace.redirection html.forms
http.server.responses kernel urls validators ;

IN: furnace.auth.features.recover-password

: <recover-action-3> ( -- action )
    <page-action> [
        {
            { "username" [ v-username ] }
            { "ticket" [ v-required ] }
        } validate-params
    ] >>init
    { realm "features/recover-password/recover-3" } >>template [
        {
            { "username" [ v-username ] }
            { "ticket" [ v-required ] }
            { "new-password" [ v-password ] }
            { "verify-password" [ v-password ] }
        } validate-params same-password-twice
    ] >>validate [
        "ticket" value "username" value users claim-ticket [
            "new-password" value >>encoded-password
            users update-user
            URL" %24realm/recover-4" <redirect>
        ] [ <403> ] if*
    ] >>submit ;