lemonldap-ng/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Lib/Captcha.pm

package Lemonldap::NG::Portal::Lib::Captcha;

# Old Captcha API, this is only a wrapper around Captcha::SecurityImage

use strict;
use Mouse;
use MIME::Base64;

our $VERSION = '2.0.15';

extends 'Lemonldap::NG::Common::Module';

has module => (
    is      => 'rw',
    handles => [
        qw(setCaptcha validateCaptcha getCaptcha ott width height lines scramble fgColor bgColor rndmax timeout )
    ]
);

sub init {
    my ($self) = @_;

    if ( $self->conf->{captcha} ) {
        $self->logger->error( "The Lib::Captcha API is not compatible"
              . " with custom Captcha module" );
        return 0;
    }
    else {
        my $module = $self->p->loadModule("::Captcha::SecurityImage");
        if ($module) {
            $self->module($module);
            return 1;
        }
        else {
            return 0;
        }
    }
}

1;