NAME

OpusVL::AppKit::RolesFor::Auth

VERSION

version 6

SYNOPSIS

    package FailLogin;
    use Moose;
    with 'OpusVL::AppKit::RolesFor::Auth';

    sub check_password 
    {
        my ($self, $user, $password) = @_;
        return 0;
    }

DESCRIPTION

This role is used to supply a method for authenticating a users password.

NAME

OpusVL::AppKit::RolesFor::Auth

METHODS

check_password

The role expects the classes that support it to implement the check_password method which should take a username and password and return 0 or 1 depending on whether the password is correct.

    $obj->check_password('user', 'password'); # return 0 or 1

SEE ALSO

See OpusVL::AppKit::LDAPAuth for an example of this role in use.

AUTHOR

Colin Newell <colin@opusvl.com>

COPYRIGHT AND LICENSE

This software is copyright (c) 2016 by OpusVL.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.