Вопрос про спам закрывается

topy
На сайте с 28.03.2006
Offline
142
983

Хочу закрыть вопрос про спам, т.к. не все умеют искать в интернете.

Выкладываю простой код, выводящий порядок буквоцифр и просьбу ввести его для подтверждения того, что Вы не робот!

<?php

Error_Reporting(E_ALL & ~E_NOTICE);
function get_rnd_iv($iv_len)
{
$iv = '';
while ($iv_len-- > 0) {
$iv .= chr(mt_rand() & 0xff);
}
return $iv;
}

function md5_encrypt($plain_text, $password, $iv_len = 16)
{
$plain_text .= "\x13";
$n = strlen($plain_text);
if ($n % 16) $plain_text .= str_repeat("\0", 16 - ($n % 16));
$i = 0;
$enc_text = get_rnd_iv($iv_len);
$iv = substr($password ^ $enc_text, 0, 512);
while ($i < $n) {
$block = substr($plain_text, $i, 16) ^ pack('H*', md5($iv));
$enc_text .= $block;
$iv = substr($block . $iv, 0, 512) ^ $password;
$i += 16;
}
return base64_encode($enc_text);
}

function md5_decrypt($enc_text, $password, $iv_len = 16)
{
$enc_text = base64_decode($enc_text);
$n = strlen($enc_text);
$i = $iv_len;
$plain_text = '';
$iv = substr($password ^ substr($enc_text, 0, $iv_len), 0, 512);
while ($i < $n) {
$block = substr($enc_text, $i, 16);
$plain_text .= $block ^ pack('H*', md5($iv));
$iv = substr($block . $iv, 0, 512) ^ $password;
$i += 16;
}
return preg_replace('/\\x13\\x00*$/', '', $plain_text);
}

function genpass($size = 6)
{

$possible = "0123456789QWERTYUIOPLKJHGFDSAZXCVBNM";
$string = "";

while ($i < $size) {

// pick a random character from the possible ones
$char = substr($possible, mt_rand(0, strlen($possible)-1), 1);

// we don't want this character if it's already in the password
if (!strstr($password, $char)) {
$password .= $char;
$i++;
}

}
return $password;

}
function imgsecuregen($password)
{
$width = 11*6;
$height = 30;
$im = ImageCreate($width, $height);
$bg = imagecolorallocate($im, 200, 42, 255);
$black = imagecolorallocate($im, 0, 0, 0);
$grey = imagecolorallocate($im, 90, 170, 220);
imagerectangle($im,0, 0, $width-1, $height-1, $grey);
imagestring($im, 5, $size, 5, $password, $black);
imagejpeg($im,"xx.jpg");
imagedestroy($im);
}

$key="HELLO WORLD";

if ((!$_POST["pasw"])||(!$_POST["valr"]))
{
$password = genpass();
imgsecuregen($password);

echo session_id();
$enc_text = md5_encrypt($password, $key);
echo "<img src='xx.jpg'> <br>
<FORM method='POST' target='_self'>
<INPUT TYPE='HIDDEN' name='pasw' value='$enc_text'>
<INPUT TYPE='TEXT' name='valr'>
<INPUT TYPE='SUBMIT' name='submit'>
</FORM> ";

// $random = imgsecuregen(5); action='secur'
}
else
{ $systemcode = $_POST["pasw"] ;
$userinsertcode = strtolower($_POST["valr"]) ;
$systemcode = strtolower(md5_decrypt($systemcode, $key));
$userinsertcode = str_replace("o","0",$userinsertcode);
$systemcode = str_replace("o","0",$systemcode);
if ($systemcode == $userinsertcode) print ($systemcode); else print ("Error in image code ");

}
?>

Так же могу предоставить Вам скрипт, наподобие вышеуказанного, но с увеличенными возможностями по тюнингу, например: можно установить порнавившиеся GD-шрифты для их отображения.

Скачать скрипт можно отсюда.

Размер 20 Кб.

Для работы всех указанных скриптов нужна библиотека GD (есть на 99% хостингов).

Надеюсь вопрос спама гостевых, форумов, форм обратной связи раскрыт полностью. Ставьте, пользуйтесь наздоровье. Сделаем наши сайты чище и избавим себя от бана.

Новости коротко и ясно (https://subnews.ru)
sun
На сайте с 22.10.2005
Offline
81
sun
#1

Особенно порадовало с включенным register_globals

if (md5($_REQUEST['code_check'])==$_COOKIE[$site_cookie_verifyimage_name])

devmen.com (http://devmen.com/)
topy
На сайте с 28.03.2006
Offline
142
#2

Писалось не мной, это лежит в открытых источниках (http://www.php.net/manual), я просто чтобы было меньше подоных вопросов резюммировал!

topy
На сайте с 28.03.2006
Offline
142
#3

Ну вот, сразу в репу настучали. Хотел помочь людям, так все желание отбили. Спасибо!

ЗЫ писавшему инкогнито: я не тупо скопировал, я добавил в архив шрифтов облегчил код, те, кто будут юзать скрипты, конечно же посмотрят и поправят как им угодно, благо исходники открыты.

Yaroslav_Adv
На сайте с 27.09.2005
Offline
199
#4

topy, обсуждение репутации запрещено. Сейчас придут и веслом настучат.

С уважением, Ярослав Деревягин Веб-агентство "Found (http://found-it.ru)"
topy
На сайте с 28.03.2006
Offline
142
#5

В таком слчае продолжу.

Вот еще 1 скрипт, генерирующий копирайт на заданном изображении.

Копирайт должен быть картинкой .png с присутствующим alfa-каналом.

скачать

Размер 48 Кб

Не забываем про GD.

Авторизуйтесь или зарегистрируйтесь, чтобы оставить комментарий