|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Victor Pshenichnikov 2:5020/400 07 Dec 2000 11:24:33 To : All Subject : Re: htpasswd -------------------------------------------------------------------------------- <vitus@ice.ru> wrote in message news:90m51s$2lmu$2@mnemosina.sibintek.net... > vjsr>> Хочу, чтобы пользователь мог сам зарегистрироваться на сайте, при этом > vjsr>> чтобы его данные (имя и пароль) автоматически попали в файл, указанный > vjsr>> директивой > vjsr>> AuthUserFile usersfile > vjsr>> htpasswd.exe позволяет заводить пользователей только в интерактивном > vjsr>> режиме. > vjsr>> > vjsr>> Где копать? Может быть, кто подскажет, каким образом зашифровывается > vjsr>> пароль? > vjsr>> > vjsr>> Заранее благодарю, Виктор. > vjsr>> P.S. Windows NT+Apache+ActivePerl > Я бы ответил perldoc -f crypt и это уже не было бы оффтопиком. Потому > как управлять такого рода файлами из перла гораздо удобнее, cgi или не > cgi. А dbmmanage который дают для более продвинутых в комплекте апача, > так вообще на перле написан. > -- Спасибо большое за отклик! crypt конечно это правильное направление, но htpasswd.exe создает примерно такой файл: victor:$apr1$WJ1.....$/ucM33jyR3aN2ydW5CPKv/ admin:$apr1$UK1.....$WQB4GvDJ3ELKn4dlBmxGB0 а мой скрипт: ... my $encrypted_password=crypt ($password, (join '', ('.', '/', 0..9, 'A'..'Z', 'a'..'z')[rand 64, rand 64])); open (FILE, '>>users') || die "Can't open users file: $!\n"; print FILE "$username:$encrypted_password\n"; close FILE; добавляет такую строку: jopa:1yUB5/kgCH8lQ Hа лицо несоответствие. Авторизация сервером естественно не проходит. Подскажите, что делать. Заранее благодарю, Виктор. --- ifmail v.2.15dev5 * Origin: WEBPlus Ltd. (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/13431ab809199.html, оценка из 5, голосов 10
|