* LDV::User->auth : draft

lib/LDV/User.pm

@@ -37,6 +37,18 @@ sub logout {
   $self->rendered();
 }
 
+sub auth {
+  my ($self) = @_;
+  my $user = $self->req->param('username');
+  my $pass = $self->req->param('password');
+
+  if (my $delay = $self->app->config->{ldap}->{auth_delay}) {
+    sleep $delay;
+  }
+
+  $self->redirect_to('/user/login');
+}
+
 sub update {
   my ($self) = @_;
   my ($data, $login);