• Publicidad

CGI::Application::Plugin::Authentication

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

CGI::Application::Plugin::Authentication

Notapor silva » 2020-01-20 09:14 @426

Estoy usando CGI::Application::Plugin::Authentication, pero mi problema es que la contraseña a la que tengo que comparar está codificada en mi base de datos con un módulo no convencional.

Mi idea es aplicarle al parámetro contraseña de entrada la función de codificación, para luego si comparar con lo almacenado en base de datos. Pero no hace nada. ¿Cuál es mi error? ¡Gracias!

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1.  
  2.  my $crypt = My::Crypt->new( debug => 0 );  
  3.  my $texto= 'textodeencriptado';
  4.      
  5.  my $parametro_clave = $crypt->encrypt($q->param('authen_password') ,$texto);
  6.  $q->param( -name => 'authen_password', value =>$parametro_clave) ;
  7.      
  8.      
  9.  $self->authen->config(
  10.         CREDENTIALS => ['authen_username', 'authen_password'],
  11.         DRIVER => ['DBI',
  12.                     DBH         => $self->dbh,
  13.                     TABLE       => 'login',
  14.                     CONSTRAINTS => {
  15.                         'login.usuario' => '__CREDENTIAL_1__',
  16.                         'login.clave' => '__CREDENTIAL_2__' ,
  17.                         'login.estado_cuenta' => 0  ,
  18.                     },
  19.          ],
Coloreado en 0.004 segundos, usando GeSHi 1.0.8.4
silva
Perlero nuevo
Perlero nuevo
 
Mensajes: 82
Registrado: 2011-05-24 05:59 @291

Publicidad

Re: CGI::Application::Plugin::Authentication

Notapor explorer » 2020-01-20 09:29 @437

¿Seguro que es "value" el valor de la clave que estás usando en la subrutina de validación?
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: CGI::Application::Plugin::Authentication

Notapor silva » 2020-01-20 09:38 @443

explorer escribiste:¿Seguro que es "value" el valor de la clave que estás usando en la subrutina de validación?


En la base de datos la contraseñas están cifradas (las guardo así). Cosa que no sucede con el parámetro ingresado como contraseña al momento del login (no está cifrado).

Lo que trato hacer, es aplicar una función de codificación a la contraseña ingresada para poder comparar con las almacenadas en la base de datos.
silva
Perlero nuevo
Perlero nuevo
 
Mensajes: 82
Registrado: 2011-05-24 05:59 @291

Re: CGI::Application::Plugin::Authentication

Notapor danimera » 2020-01-20 10:31 @480

Lo que quiere decir explorer es que en el value te hace falta el símbolo "-"

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. $q->param(
  2.     -name  => 'foo',
  3.     -value => 'the value',
  4. );
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4


Debes corregir tu código ahí..
100% Telch - Perl Web Programming
Cali PerlMongers: http://cali.pm.org
Avatar de Usuario
danimera
Perlero frecuente
Perlero frecuente
 
Mensajes: 871
Registrado: 2005-06-23 19:02 @834
Ubicación: Colombia

Re: CGI::Application::Plugin::Authentication

Notapor silva » 2020-01-20 10:44 @488

Corregida la sugerencia -value. No funciona con la corrección tampoco .
silva
Perlero nuevo
Perlero nuevo
 
Mensajes: 82
Registrado: 2011-05-24 05:59 @291

Re: CGI::Application::Plugin::Authentication

Notapor explorer » 2020-01-20 11:40 @528

Tengo olvidado todo esto, pero, ¿no sería así?

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. $q->param( authen_password => $parametro_clave);
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 6 invitados

cron