Portál AbcLinuxu, 30. září 2022 04:35



Dotaz: Prepis skriptu z Perlu do PHP

25.7.2005 17:32 Marek
Prepis skriptu z Perlu do PHP
Přečteno: 55×
Odpovědět | Admin
Zdravim,

potrebuji nasledujici skript v perlu prepsat do PHP, ale nejak se mi nedari dosahnout stejne funkcnosti :-(

Skript v PERLu:
use MD5;

my $password = "eee";
my $chap_password = pack("H*", $ENV{'CHAP-Password'});
my $chap_challenge = pack("H*", $ENV{'CHAP-Challenge'});

my $md5 = new MD5;

$md5->reset;
$md5->add(substr($chap_password, 0, 1));
$md5->add($password);
$md5->add($chap_challenge);

if($md5->digest() ne substr($chap_password, 1))
{
   exit 255;
}

exit 0;
A skript v PHP:
$password       = "eee";
$chap_password  = pack("H*", getenv("CHAP-Password"));
$chap_challenge = pack("H*", getenv("CHAP-Challenge"));

$md5 = md5(substr($chap_password, 0, 1) . $password . $chap_challenge);

if($md5 != substr($chap_password, 1))
   exit(255);
else
   exit(0);
Jedna se o kod, ktery pro RADIUS overuje CHAP.. perlu fakt nerozumim, prosim pomozte..

diky
Nástroje: Začni sledovat (0) ?Zašle upozornění na váš email při vložení nového komentáře.

Na otázku zatím nikdo bohužel neodpověděl.

Založit nové vláknoNahoru

Tiskni Sdílej: Linkuj Jaggni to Vybrali.sme.sk Google Del.icio.us Facebook

ISSN 1214-1267, (c) 1999-2007 Stickfish s.r.o.