From 3064444579ed3c31999b0602736cb2136ca94886 Mon Sep 17 00:00:00 2001
From: Pawel <p.wlodarski@ctrlo.com>
Date: Wed, 14 Jan 2026 13:09:25 +0000
Subject: [PATCH] Updated authenticate_user to synchronise with changes made in
 Auth::Extensible::Role::Provider

---
 .../Plugin/Auth/Extensible/Provider/DBIC.pm   | 47 ++++++++++---------
 1 file changed, 26 insertions(+), 21 deletions(-)

diff --git a/lib/Dancer2/Plugin/Auth/Extensible/Provider/DBIC.pm b/lib/Dancer2/Plugin/Auth/Extensible/Provider/DBIC.pm
index 1dd6ef4..85c95cb 100644
--- a/lib/Dancer2/Plugin/Auth/Extensible/Provider/DBIC.pm
+++ b/lib/Dancer2/Plugin/Auth/Extensible/Provider/DBIC.pm
@@ -11,7 +11,7 @@ use Moo;
 with "Dancer2::Plugin::Auth::Extensible::Role::Provider";
 use namespace::clean;
 
-our $VERSION = '0.623';
+our $VERSION = '0.625';
 
 =head1 NAME 
 
@@ -600,7 +600,7 @@ sub authenticate_user {
     croak "username and password must be defined"
       unless defined $username && defined $password;
 
-    my ( $user ) = $self->_user_rset( 'username', $username )->all;
+    my ( $user ) = $self->_user_rset( username => $username )->all;
     return unless $user;
 
     if ( my $password_check = $self->users_password_check ) {
@@ -612,28 +612,33 @@ sub authenticate_user {
     # working out if the password is correct
     my $password_column = $self->users_password_column;
 
-    if ( my $match =
-        $self->match_password( $password, $user->$password_column ) )
-    {
-        if ( $options{lastlogin} ) {
-            if ( my $lastlogin = $user->lastlogin ) {
-                if ( ref($lastlogin) eq '' ) {
-                    # not inflated to DateTime
-                    my $db_parser = $self->schema->storage->datetime_parser;
-                    $lastlogin = $db_parser->parse_datetime($lastlogin);
-                }
-                # Stash in session as epoch since we don't want to have to mess
-                # with with stringified data or perhaps session engine barfing
-                # when trying to serialize DateTime object.
-                $self->plugin->app->session->write(
-                    $options{lastlogin} => $lastlogin->epoch );
+    my $match = $self->match_password( $password, $user->$password_column );
+    return unless $match && $match->{valid};    # Make sure we return nothing
+
+    if ( $match->{legacy} ) {
+        my $new_hash = $self->encrypt_password($password);
+        $user->update({ $password_column => $new_hash });
+    }
+
+    if ( $options{lastlogin} ) {
+        if ( my $lastlogin = $user->lastlogin ) {
+            if ( ref($lastlogin) eq '' ) {
+                # not inflated to DateTime
+                my $db_parser = $self->schema->storage->datetime_parser;
+                $lastlogin = $db_parser->parse_datetime($lastlogin);
             }
-            $self->set_user_details( $username,
-                $self->users_lastlogin_column => DateTime->now, );
+            # Stash in session as epoch since we don't want to have to mess
+            # with with stringified data or perhaps session engine barfing
+            # when trying to serialize DateTime object.
+            $self->plugin->app->session->write(
+                $options{lastlogin} => $lastlogin->epoch 
+            );
         }
-        return $match;
+        $self->set_user_details( $username,
+            $self->users_lastlogin_column => DateTime->now, 
+        );
     }
-    return;    # Make sure we return nothing
+    return 1;
 }
 
 sub set_user_password {