Авторизация пользователей в PHP - [1] :: Web-программирование

Смотря в чем задача. Если запаролить каталог, то вот решение:

Вот простой скриптец, правда на Perl, который ишет в любой заданный тобой каталог .htaccess и .htpassword
Я его 2 года юзаю.

Ставишь в Cgi, запускаешь, пишешь путь, логин/пароль и запароливаешь что надо. Не забудь только сам каталог со скриптом тоже запаролить :)

Код:

#!/usr/bin/perl

# Copyright by Floyd Morrissette Floyd@NewWebSite.com

# Change the following variable to the way your forms should call cgi scripts on your system
# Then just call the script from your browser and a form will be produced.

read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@pairs = split(/&/, $buffer);
foreach $pair (@pairs) { ($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ s/~!/ ~!/g; $FORM{$name} = $value;}

# Change the following variable to the way your forms should call cgi scripts on your system

$action = "http://www.rolemancer.com/cgi-bin/password/";

$path = $FORM{'path'};

$name = $FORM{'name'};

$password = $FORM{'password'};

$newpass = crypt($password, tnnntv);

print "Content-type: text/html\n\n";

if ($FORM{'submit'} eq "Enter") {
&encrypt
}else{
&form
}

sub form{
print "<html>\n<head>\n<title>Password form</title></head>\n<body bgcolor=\"#ffffff\">\n";
print "Please enter the user name and password and the path of the directory you want to protect. \n";
print "The path should look like something like this /usr/home/website \n";
print "Or perhaps something like this /ux47/0/154/public_html \n";
print "Just remember it has to be the absolute path. \n";
print "I have found out that some servers do not show you the absolute path in your ftp program,   so you may have to ask your hosting company what your absolute path is. \n";
print "<FORM METHOD=POST ACTION=\"$action/access3.cgi\">\n";
print "User Name: <INPUT type=\"text\" NAME=\"name\" size=20> \n";
print "Password: <INPUT type=\"text\" NAME=\"password\" size=20> \n";
print "Path: <INPUT type=\"text\" NAME=\"path\" size=20> \n";

print "<input type=submit name=\"submit\" value=\"Enter\">\n";
print "This script is designed to be used for only one user. \n If there is already a .htaccess and .htpaswd file is the path you want to protect, then it will be overwritten with the new files that this script creates. \n Each time the script is run it will overwrite any existing .htaccess and .htpasswd files that are in the path you specify.\n";
print "</body>\n</html>\n";

}

sub encrypt{

open (HTACCESS, ">$path/.htaccess")|| die "Content-type: text/html\n\nError opening .htaccess\n";
print HTACCESS "AuthUserFile $path/.htpasswd\nAuthName \"Access\"\nAuthType Basic\n<limit GET>\nrequire user $name\n</limit>\n";
close (HTACCESS);

open (PASS, ">$path/.htpasswd")|| die print "Error opening $path\n";
print PASS "$name:$newpass\n";
close (PASS);

print "<html>\n<head>\n<title>Password Set</title></head>\n<body bgcolor=\"#ffffff\">\n";
print "The user name and password have been written to the .htaccess and .htpasswd files. \n";
print "The user name is $name and the password is $password. \n";
print "The path that is protected and requires the user name and password is $path. \n";
#print "@html";
print "</body>\n</html>\n";

}

Модерирует : Cheery
Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4