🚀 go-pugleaf

Evelio Mart�nez <evelio.ml@ctv.es> wrote:
: Este es un mensaje multipartes en formato MIME.
: --------------344418E4AC8694165E4723B9
: Content-Type: text/plain; charset=iso-8859-1
: Content-Transfer-Encoding: 8bit

: "J.A. Gutierrez" escribi�:

:> Evelio Mart�nez <evelio.ml@ctv.es> wrote:
:>
:> : �C�mo puedo comprobar que la clave que se guard� mediante el comando
:> : htpasswd en un fichero es igual a
:> :   la introducida en un formulario ?
:>
:>         buen, en principio, no necesitas hacerlo. Es el httpd el que
:>         se encarga de eso, dirigido por el .htaccess correspondiente.

: Es necesario si quiero que el usuario se cambie su password y no machaque el
: que tenia antes, salvo que expresamente quiera.
: Para ello deber� comprobar si el password antiguo es el que dice ser.

	hmm, si, para eso si que hace falta...

	Puede que te interese esto:

	ftp://ivo.cps.unizar.es/pub/SPDsoft/change-passwd.tgz


:>
:>
:>         Pero si te empe~nas, se hace igual que con el password standard
:>         de unix: encriptas el password suministrado por el usuario usando
:>         crypt usando como sal los dos primeros caracteres del password
:>         encpriptado almacenado, y comparas este con el resultado de la
:>         operacion.

: He hecho una prueba con los 2 primeros caracteres, pero como no funcionaba he
: ido tomando de principio a fin 2 digitos de la clave encriptada.

: �He hecho algo mal?

	si, que no te cepillas el retorno de carro.

	Ejemplo algo mas correcto:


#!/usr/bin/perl

$clave = 'HDrlLqZcpT9II';

$lon = length $clave;
print "longitud: ", $lon, "\n";
print "clave: $clave \n";

print "Entra clave: ";

$_ = <>;
chomp;
$tecleada = $_;

if ( crypt( $tecleada, $clave) ne $clave ) {
print "----------  $tecleada crypt( $tecleada, $clave) incorrecta \n";
}
else {
print "********* correcta \n";
}

-- 
PGP and other useless info at      \                 La ciencia-ficcion es
http://www.cps.unizar.es/~spd/      \                 ese futuro en el que
finger://daphne.cps.unizar.es/spd    \                 lo seguro es que ya
ftp://ivo.cps.unizar.es/pub/          \    (F. Alfaro)  no seremos jovenes