Realisierung von Login via shadow Passwörter
Mike
- perl
Hallo,
habe folgendes Problem:
Ich würde gerne ein Portal mit Passwort schützen. Die ganzen Sites sind in Perl geschrieben. Die Passwörter sollen mit den System Usern bzw. shadow Passwörtern abgeglichen werden. Ausserdem soll bei durchklicken der Seite die Benutzerinfos und das erfolgreiche Login nicht verloren gehen. Habt ihr Ideen wie man sowas machen könnte?
Danke Mike
Hallo Mike,
Die Passwörter sollen mit den System Usern bzw. shadow Passwörtern
abgeglichen werden.
Sicher, dass du das willst?
Nun gut, des Menschen Wille ist sein Himmelreich ;) Das kannst du
erreichen, indem du entsprechenden Methoden unter UNIX dafür
verwendest:
use POSIX qw/getpwnam/;
if(my ($login,$crypted_pass) = getpwnam($username)) {
if(crypt($pass,$crypted_pass) eq $crypted_path) {
# erfolgreicher Login
}
else {
# boehze!
}
}
Ausserdem soll bei durchklicken der Seite die Benutzerinfos
und das erfolgreiche Login nicht verloren gehen.
Das lässt sich relativ einfach mit Sessions realisieren. Siehe dazu uU Apache::Session:
http://search.cpan.org/~jbaker/Apache-Session-1.54/Session.pm
Das Modul ist recht gut gemacht.
Grüße,
CK