|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Konstantin Ursaloff 2:5020/400 05 Apr 2001 15:36:04
To : All
Subject : Аутидентификация как получить пароль пользователя
--------------------------------------------------------------------------------
Есть проблемма - требуется вывести окно для аутидентификации, а потом в
программе проверить пароль и логин пользователя.
Заголовок ввожу:
print >>ALL__;
Status: 401 Unauthorized
WWW-Authenticate: Basic realm="Please authorize"
Content-Type: text/html
ALL__
Это работает появляется запрос на ввод пароля и логина, а что дальше???
Ведь после этого никого не пропускает. Пользователь воодит логин и пароль и
тут же вваливается это окно опять. Или тут надо сделать так:
unless ($ENV{'REMOTE_USER'}){
###Вывести заголовок для аутидентификации
}else{
### Вывести обыкновенный "Content-Type: text/html\n\n"
### Обработать логин, а как достать введенный пароль?
}
И так тоже не работает, проблемма в том что опять не пропускает с первого
раза, что делать????
Можно конечно воспользоваться файлом .htacess, но как быть если не хочешь
что бы пароли и логины дублировались или хочешь шифровать пароли посвоему?
Как можно сделать так, что бы после процесса аутидентификации входили все, а
потом сам срипт проверял соответствие логина и пароля и выводил потом
страничку или свое сообщение об ошибке.
В PHP это делается не верю, что этого нет в Перле.
--
Best regards from
Ursaloff
------------------------------------------------------------
http://www.ursaloff.mksat.net/
------------------------------------------------------------
--- ifmail v.2.15dev5
* Origin: MTU-Intel ISP (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
