[Linux-bruxelles] crypt et salt debian /etc/passwd

jens-ingo brodesser jens.ingo.brodesser at euronet.be
Ven 20 Avr 01:37:28 CEST 2001


hello bxlug,

est-ce que quelcun connait le algorithme salt qui permet d'avoir la 
langeur d'un shadow password actuel dans /etc/passwd de debian (en 
perl svp) ?

voila avec ce que j'essaye, mais le resultat est plus court que les 
autres shadow passwds generes par la commande adduser:

#!/usr/bin/perl

use Passwd::Linux qw(setpwinfo);

@saltset = ('a'..'z','A'..'Z','0'..'9','.','/');

     $now = time;
     ($pert1, $pert2) = unpack("C2", $_);
     $week = $now / (60*60*24*7) + $pert1 + $pert2 - length($_);
     $salt = $saltset[$week % 64] . $saltset[($now + ord(substr($_,0,1))) % 64];

     $crypt = crypt( $password, $salt );



@info = ($username, $crypt, $uid, $gid, $GECOS, $HOME, $SHELL);
$err=setpwinfo(@info);

if ... et blablabla

resultat genre : HuYi9uElXWSOw
par rapport a un shadow debian : $1$TRl9nD67$h1Nxa1bNtLQLpFuxLdTgM.

en tout cas le password ainsi genere fonctionne bien.

merci pour toute suggestion





Plus d'informations sur la liste de diffusion Linux-bruxelles