---------- Forwarded Message ----------
Subject: BOUNCE [EMAIL PROTECTED]: Non-member submission from ["Colin
D. Easton" <[EMAIL PROTECTED]>]
Date: Thu, 4 Oct 2001 09:48:44 -0500
From: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
>From [EMAIL PROTECTED] Thu Oct 4 09:48:36 2001
Received: from mail.rogerswave.ca (mail.rogerswave.ca [24.112.31.58])
by server1.open.com.au (8.11.0/8.11.0) with ESMTP id f94Ema306941;
Thu, 4 Oct 2001 09:48:36 -0500
Received: from DDKH0K01 (bluenat.net.rogers.wave.ca [24.112.30.1])
by mail.rogerswave.ca (8.8.7/8.8.7) with ESMTP id MAA10214;
Thu, 4 Oct 2001 12:57:43 -0400 (EDT)
Reply-To: <[EMAIL PROTECTED]>
From: "Colin D. Easton" <[EMAIL PROTECTED]>
To: "'Radiator'" <[EMAIL PROTECTED]>, <[EMAIL PROTECTED]>
Subject: Unable to properly use stored crypted passwords in
Radiator/Radmin... Date: Thu, 4 Oct 2001 12:31:56 -0400
Message-ID: <000701c14cf2$2805a620$6a37962f@DDKH0K01>
MIME-Version: 1.0
Content-Type: text/plain;
charset="us-ascii"
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook, Build 10.0.2627
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4133.2400
Hi,
I've upgraded from Radiator 2.8.2/Radmin 1.4 where I've stored crypted
UNIX passwords in an SQL db.
i.e. username x has a stored password of {crypt}xxxxxxxx
I tested the new release of Radiator 2.8.3/Radmin 1.5 where the stored
password is able to be crypted by default but the routines store just
the xxxxxxxx password in crypted format.
I was able to change my password and the routines below worked ok,
however I was then unable to login or authenticate. What am I missing?
Colin
.../Radmin/Site.pm snippet which allows stored insert/updates of crypted
passwords in Radiator/Radmin:
# Here are some sample hooks that maintain PASS_WORD in the RADUSERS
# table
# as the Unix encrypted version of the plaintext password
# entered by the user.
###################################################################
# Heres an example pre_insert_hook.
# Change the new password to Unix crypt before insertion
sub db_pre_insert_hook
{
my ($db, $newobj) = @_;
# Change the new plaintext password to Unix crypt
$newobj->{PASS_WORD} =
&Radmin::Util::unixEncryptPassword($newobj->{PASS_WORD})
if $newobj->{Type} eq 'RADUSERS';
}
###################################################################
# Heres an example pre_update_hook.
# If the password has been changed, re-encrypt it
sub db_pre_update_hook
{
my ($db, $newobj, $oldobj) = @_;
# If the password is not 13 chars, its been changed
# to a new one: reencrypt
$newobj->{PASS_WORD} =
&Radmin::Util::unixEncryptPassword($newobj->{PASS_WORD})
if $newobj->{Type} eq 'RADUSERS'
&& length $newobj->{PASS_WORD} != 13;
}
1;
-------------------------------------------------------
===
Archive at http://www.open.com.au/archives/radiator/
Announcements on [EMAIL PROTECTED]
To unsubscribe, email '[EMAIL PROTECTED]' with
'unsubscribe radiator' in the body of the message.
