как написать граббер

<?php
/*
*Как написать граббер.
*автор: nc_soft
*28.09.07
*/

/*
Любой граббер для удобства можно разделить на ТРИ оcновных части-этапа:
-получение
-обработка
-выдача

Получение.
Для того, что бы граббер нормально функционировал необходимо написать функцию для получнения
страницы с удаленного хоста по заданному url, надежнее пользоваться сокетами
(потому что библиотека CURL установлена не везде и не всегда, использовать file_get_contents()
и комбинации implode('',file(..)) конечно тоже можно, просто сокет предоставляет побольше возможностей.
Напишем функцию получния страницы по урл.
*/

function data($path,$host)
{
    /*
    $path путь к файлу скрипта, а так же передаваемые параметры
    $host сграббливаемый хост (например, sasisa.ru)
    */
    $fp = fsockopen($host, 80);
    if (!$fp)
    {
        die('ошибка');
    }
    else
    {
        $out = "GET $path HTTP/1.0\r\n";
        $out .= "Accept: image/gif, application/xhtml+xml, */*\r\n";
        $out .= "Accept-Language: ru\r\n";
        $out .= "Host: $host\r\n";

        //прикинемся оперой-мини
        $out .= "User-Agent: Opera/8.01 (J2ME/MIDP; Opera Mini/2.0.4509/1716; ru; U; ssr)\r\n";

        $out .= "Cache-Control: no-cache\r\n";
        $out .= "Connection: Close\r\n\r\n";

        fwrite($fp, $out);
        $headers = "";

        while ($str = trim(fgets($fp)))
        $headers .= "$str\n";

        $body = "";

        while (!feof($fp))
        $body .= fgets($fp);
        fclose($fp);
    }
    //возвращаем данные
    return $body;
}

/*
Итак, функция для получения страницы готова, теперь составим функцию для обработки данных, тоесть для
выреза рекламы, подмены ссылок итп
*/

/*
function process($s)
{
Здесь сложно дать какие-то рекоммендации, все "грабберописание" состоит в основном в
придумывании этой функции, сделаем пока что "заглушку" на этом месте

return $s;
}
*/

/*
Для корректной работы грабба необходимо теперь правильно определять переменную $path, для примера давайте граббить
всем известный http://wen.ru/forum/index.php
пример очень характерный, потому что многие "потенциальные жертвы" грабов (загруз центры например)
состоят как раз из одного файла
*/

//с хостом определились
$host='wen.ru';

if (empty($_SERVER['QUERY_STRING']))
{
    //начальная позиция
    $path='/forum/index.php';
}
else
{
    //новые параметры
    $path='/forum/?'.$_SERVER['QUERY_STRING'];
}

/*
теперь необходимо зайти на страницу форума и посмотреть ее в коде
видно что ссылки выдаются так
<a href="/forum/?p=1&f=1&w=htm">Общение</a>
для работы грабба достаточно изменить ссылку так
<a href="index.php?p=1&f=1&w=htm">Общение</a>
что и сделаем в функции process
*/


/*function process($s)
{
$s=str_replace('<a href="/forum/','<a href="index.php',$s);
return $s;
}*/

//можно в принципе запускать :) (ПЕРВЫЙ ЭТАП)
$s=data($path,$host);

//обрабатываем (ВТОРОЙ ЭТАП)
$s=process($s);

//выдаем результат (ТРЕТИЙ ЭТАП)
/*
третий этап не так прост как кажется, если вы граббите загрузки, то
необходимо организовать переадресацию на прямую ссылку с контентом
*/
header('Content-type:text/html;charset=utf-8');
echo $s;

/*
как видим, граббер вполне работает, только не грузятся смайлики,
давайте подкорректируем это и впишем свой копирайт на страницу :)
*/

function process($s)
{
    $s=str_replace('<a href="/forum/','<a href="'.$_SERVER['SCRIPT_NAME'],$s);

    //смайлы
    $s=str_replace('<img src="','<img src="http://wen.ru/',$s);

    //копирайт
    $s=str_replace('</body>','<div>(c)snippets</div></body>',$s);

    return $s;
}

/*
разумеется, вы не сможете написать в тему или создать ее, тут надо использовать
POST запросы, задача этой статьи не создание флудер-скрипта а ознакомление с
принципами написания грабберов.
*/

?>
28 сентября 2007, 12:21

вывод случайных элементов из массива

<?php
/*
*вывод 5 случайных элементов из массива
*автор: nc_soft
*26.09.07
*/

//иммитация массива 1,2,3..100
$arr=range(1,100);

//новый массив с 5 случайными элементами
$new_arr=array_rand($arr,5);

//выводим элементы через <br />
echo implode('<br />',$new_arr);

/*этот пример может быть использован для вывода случайных ссылок из файла
и еще для кучи всяких дел :)*/

?>
26 сентября 2007, 22:11

автоопределение по браузеру wml или html

<?php
/*
*Автоопределение по браузеру wml/html
*Автор: Nc_Soft
*22.09.07
*/

//предлагаю свой способ, который был обкатан мною не раз ;)

if (strpos($_SERVER['HTTP_USER_AGENT'],'Profile/MIDP'))
{
	//МОБИЛА
}
elseif (strpos($_SERVER['HTTP_USER_AGENT'],'J2ME/MIDP'))
{
	//МОБИЛЬНЫЙ БРАУЗЕР НА J2ME
}
else
{
	//другое
}
?>
22 сентября 2007, 20:46

коды ответов http

<?php
/*
*коды ответов http
*автор: http://comp-info.ru/util/http.php
*22.09.07


Диапазон кодов Значение ответа 
100-199 Информационный 
200-299 Запрос клиента успешен 
300-399 Запрос клиента переадресован, необходимы дальнейшие действия 
400-499 Запрос клиента является неполным 
500-599 Ошибки сервера 

В HTTP в каждом диапазоне определены лишь несколько кодов, хотя для сервера при необходимости могут определяться собственные коды.
Клиент при получении кода, который он не может распознать, интерпретирует его в соответствии с диапазоном,
к которому этот код принадлежит.
Коды в диапазонах 100-199, 200-299 и 300-399 большинство Web-броузеров обрабатывают без извещения пользователя,
а некоторые коды ошибок из диапазонов 400-499 и 500-599 отображаются для пользователя (например, 404 Not Found).

Информационные ответы

Ответы в диапазоне 100-199 - информационные; они показывают, что запрос клиента принят и обрабатывается.


100 Continue
Начальная часть запроса принята, и клиент может продолжать передачу запроса. 

101 Switching Protocols
Сервер выполняет требование клиента и переключает протоколы в соответствии с указанием, данным в поле заголовка Upgrade. 



Успешные запросы клиента
Ответы в диапазоне 200-299 означают, что запрос клиента обработан успешно.


200 OK
Запрос клиента обработан успешно, и ответ сервера содержит затребованные данные. 

201 Created
Этот код состояния используется в случае создания нового URI.
Вместе с этим кодом результата сервер выдает заголовок Location, который содержит информацию о том, куда были помещены новые данные. 

202 Accepted
Запрос принят, но обрабатывается не сразу.
В теле содержимого ответа сервера может быть дана дополнительная информация о данной транзакции.
Гарантии того, что сервер в конечном итоге удовлетворит запрос, нет, даже несмотря на то,
что на момент приема запрос выглядел допустимым. 

203 Non-Authoritative Information
Информация в заголовке содержимого взята из локальной копии или у третьей стороны, а не с исходного сервера. 

204 No Content
Ответ содержит код состояния и заголовок, но тело содержимого отсутствует.
При получении этого ответа броузер не должен обновлять свой документ.
Обработчик чувствительных областей изображений может возвращать этот код,
когда пользователь щелкает на бесполезных или пустых участках изображения. 

205 Reset Content
Броузер должен очистить форму, используемую в данной транзакции, для дополнительных входных данных.
Полезен для CGI-приложений, требующих ввода данных. 

206 Partial ContentСервер возвращает лишь часть данных затребованного объема.
Используется в ответе на запрос с указанием заголовка Range.
Сервер должен указать диапазон, включенный в ответ, в заголовке Content-Range.



Переадресация



Код ответа в диапазоне 300-399 означает, что запрос не выполнен и клиенту нужно предпринять некоторые действия для удовлетворения запроса. 

300 Multiple Choices
Затребованный URI обозначает более одного ресурса.
Например, URI может обозначать документ, переведенный на несколько языков.
В теле содержи- мого, возвращенном сервером, может находиться перечень более конкретных данных о том, как выбрать ресурс правильно. 

301 Moved Permanently
Затребованный URI уже не используется сервером, и указанная в запросе операция не выполнена.
Новое местонахождение затребованного документа указывается в заголовке Location.
Во всех последующих запросах данного документа следует указывать новый URI. 

302 Moved Temporarily
Затребованный URI перемешен, но лишь временно. Заголовок Location указывает на новое местонахождение.
Сразу же после получения этого кода состояния клиент должен разрешить запрос при помощи нового URI,
но во всех последующих запросах необходимо пользоваться старым URI. 

303 See Other
Затребованный URI можно найти по другому URI (указанному в заголовке Location). Его следует выбрать методом GET по данному ресурсу. 

304 Not Modified
Это код ответа на заголовок lf-Modified-Since, если URI не изменялся с указанной даты. 
ело содержимого не посылается, и клиент должен использовать свою локальную копию. 

305 Use Proxy
Доступ к затребованному URI должен осуществляться через proxy-сервер, указанный в заголовке Location.



Неполные запросы клиента


Коды ответов в диапазоне 400-499 означают, что запрос клиента неполный.
Эти коды могут также означать, что от клиента требуется дополнительная информация. 

400 Bad Request
Означает, что сервер обнаружил в запросе клиента синтаксическую ошибку. 

401 Unauthorized
Этот код результата, передаваемый с заголовком WWW-Authenticate, показывает, что пославший запрос пользователь не имеет необходимых полномочий
и что при повторении запроса с указанием данного URI пользователь должен такие полномочия предоставить. 

402 Payment Required
Этот код в HTTP еще не реализован. 

403 Forbidden
Запрос отклонен по той причине, что сервер не хочет (или не имеет возможности) ответить клиенту. 

404 Not Found
Документ по указанному URI не существует. 

405 Method Not Allowed
Этот код выдается с заголовком Allow и показывает, что метод, используемый клиентом, для данного URI не поддерживается. 

406 Not Acceptable
Ресурс, указанный клиентом по данному URI, существует, но не в том формате, который нужен клиенту.
Вместе с этим кодом сервер выдает заголовки Content-Language, Content-Encoding и Content-Type. 

407 Proxy Authentication Required
Proxy-сервер должен санкционировать запрос перед тем, как пересылать его. Используется с заголовком Proxy-Authenticate. 

408 Request Time-out
Этот код ответа означает,
что клиент не передал полный запрос в течение некоторого установленного промежутка времени
(который обычно задается в конфигурации сервера) и сервер разрывает сетевое соединение. 

409 Conflict
Данный запрос конфликтует с другим запросом или с конфигурацией сервера.
Информацию о конфликте следует возвратить в информационной части ответа. 

410 Gone
Данный код показывает, что затребованный URI больше не существует и навсегда удален с сервера. 

411 Length Required
Сервер не примет запрос без указанного в нем заголовка Content-Length. 

412 Precondition Failed
Результат вычисления условия, заданного в запросе одним или несколькими заголовками if. . ., представляет собой "ложь". 

413 Request Entity Too Large
Сервер не будет обрабатывать запрос, потому что его тело слишком велико. 

414 Request-URI Too Long
Сервер не будет обрабатывать запрос, потому что его URI слишком длинный. 

415 Unsupported Media Type
Сервер не будет обрабатывать запрос, потому что его тело имеет неподдерживаемый формат.



Ошибки сервера



Коды ответов в диапазоне 500-599 показывают, что сервер столкнулся с ошибкой и, вероятно, не сможет выполнить запрос клиента. 

500 Internal Server Error
При обработке запроса на сервере один из его компонентов (например, CGI-программа) выдал аварийный отказ или столкнулся с ошибкой конфигурации. 

501 Not Implemented
Клиент запросил выполнение действия, которое сервер выполнить не может. 

502 Bad Gateway
Сервер (или proxy-сервер) получил недопустимые ответы другого сервера (или proxy-сервера). 

503 Service Unavailable
Данный код означает, что данная служба временно недоступна, но в будущем доступ к ней будет восстановлен.
Если сервер знает, когда это произойдет, может быть также выдан заголовок Retry-After. 

504 Gateway Time-out
Этот ответ похож на 408 (Request Time-out) , за исключением того, что шлюз или уполномоченный сервер превысил лимит времени. 

505 HTTP Version not supported
Сервер не поддерживает версию протокола HTTP, использованную в запросе.

*/

?>
22 сентября 2007, 14:00

обновляемый proxy лист

<?php
/*
*прокси-лист
*автор: nc_soft
*19.04.08
*/
?>


125.244.165.2:8080
125.245.30.250:8080
148.233.159.58:8080
155.136.224.10:80
190.24.128.210:8080
194.142.156.49:3128
195.229.236.106:80
200.165.160.98:8080
200.209.145.179:3128
200.220.142.11:3128
200.69.105.10:80
202.28.27.4:80
202.83.125.131:3128
203.252.46.115:80
210.158.6.201:8080
213.16.20.140:3128
218.249.83.87:8080
221.130.202.48:80
221.255.17.236:8080
222.47.88.14:3128
58.211.82.37:80
58.221.254.156:3128
81.189.106.138:8080
85.25.138.58:3128
91.74.160.18:8080
cache-mex-roma-2.uninet.net.mx:80
cache-mex-roma-2.uninet.net.mx:8080
echo397.server4you.de:3128
plum.amber.org.uk:3128
smb1-mq.mediaserv.net:3128
21 сентября 2007, 19:47

конвертор форматов изображений

<?php 
/*
*конвертор форматов изображений
*автор: nc_soft
*21.09.07
*/

//исходник
$source='kartinka.png';

//куда сохраняем
$destination='soxranyaem.gif';

//создаем изображение 
$img=imagecreatefrompng($source);

//сохраняем его в gif формате
imagegif($img,$destination); 

/*краткая запись
imagegif(imagecreatefrompng('kartinka.png'),'soxranyaem.gif')
соответственно, для других форматов используются другие графические функции
imagecreatefrompng
imagecreatefromjpeg
imagecreatefromgif
и
imagepng
imagegif
imagejpeg

ВНИМАНИЕ!!
при сохранении в формате jpeg необходимо учитывать, что у функции imagejpeg() ТРИ параметра, 
поэтому сохранять необходимо так
imagejpeg($img,'',$destination);
(средний параметр обозначает качество jpeg в процентах, но можно и не указывать)

спасибо wUPS.ru за поправку ;)
*/
?>
21 сентября 2007, 10:54

постраничная навигация в скриптах на файлах

<?php
/*
*постраничная навигация в скриптах на файлах
*автор: nc_soft
*18.09.07
*/

/*сгенерируем массив (для гостевой этот массив может быть получен как
file('gb.dat') )
в данном случаи проэмулируем его массивом 1,2,3...100 */
$arr=range(1,100);

//всего сообщений
$all=count($arr);

//число сообщений на странице
$pnumber=5;

echo '<p>всего элементов: '.$all.'</p>';

//номер страницы
$page=(isset($_GET['page'])) ? (int)$_GET['page'] : 1;

//число страниц
$num_pages=ceil($all/$pnumber);

//начальная позиция
$start=$page*$pnumber-$pnumber;

//проверка номера страницы
if ($page > $num_pages || $page < 1)
{
    $page=1;
    $start=0;
}

if ($all)
{
    //элементы выводятся в обратном порядке!!
    for ($i=$all-$start-1; $i>=$all-$start-$pnumber; $i--)
    {
        if (!isset($arr[$i])) break;
        echo '<p>';
        echo $arr[$i];
        echo '</p>';
    }

    //навигация
    echo '<p>';

    for($pr = '', $i =1; $i <= $num_pages; $i++)
    {
        echo $pr=(($i == 1 || $i == $num_pages || abs($i-$page) < 2) ? ($i == $page ? " [$i] " : ' <a href="'.$_SERVER['SCRIPT_NAME'].'?page='.$i.'">'.$i.'</a> ') : (($pr == ' ... ' || $pr == '')? '' : ' ... '));
    }

    echo '</p>';
}
else 
{
    echo '<p>элементов нет</p>';
}

?>
18 сентября 2007, 16:51

предпросмотр изображений

<?php
/*
*предпросмотр изображений
*автор: nc_soft
*15.09.07
*/

//путь к файлу картинки (jpg,gif,png)
$img='example.jpg';

$info=getimagesize($img);

//оригинальная ширина
$w_or=$info[0];

//оригинальная высота
$h_or=$info[1];

//тип
$type=$info['mime'];


//создаем изображение
$im1='';

if ($type=='image/jpeg')
$im1=ImageCreateFromJpeg($img);

if ($type=='image/gif')
$im1=ImageCreateFromGif($img);

if ($type=='image/png')
$im1=ImageCreateFromPng($img);

if (!$im1)
die('ошибка');

//далее условимся, что максимальный размер одной из сторон превьюшки равен 80 пикселей
//высчитаем коэффицент масштаба
if ($w_or>$h_or)
{
    $k=$w_or/80;
}
else
{
    $k=$h_or/80;
}

//высчитаем размеры превьюшки
$w=round($w_or/$k);
$h=round($h_or/$k);


//$im2=ImageCreate($w,$h); (если хотите ПЛОХОЕ качество картинки испоьзуйте эту функцию ;) )
$im2=imagecreatetruecolor($w,$h);

//ImageCopyResized($im2,$im1,0,0,0,0,$w,$h,$w_or,$h_or); (если хотите ПЛОХОЕ качество картинки испоьзуйте эту функцию ;) )
imagecopyresampled($im2,$im1,0,0,0,0,$w,$h,$w_or,$h_or);

if ($type=='image/jpeg')
{
    header('Content-type:image/jpeg');
    ImageJpeg($im2);
}
elseif ($type=='image/gif')
{
    header('Content-type:image/gif');
    ImageGif($im2);
}
elseif ($type=='image/png')
{
    header('Content-type:image/png');
    ImagePng($im2);
}
else die('ошибка');

?>
15 сентября 2007, 19:37

Определение числа файлов и их размер в папке произвольной вложенности

<?php
/**
 *Определение числа файлов и их размер в папке произвольной вложенности
 *автор: nc_soft
 *13.09.07
*/

//рекурсивная функция, которая вызывает сама себя
function count_files($directory)
{
    //нужна внешняя переменная чтобы учитывать суммарное кол-во файлов
    GLOBAL $i,$size;

    //открываем директорию
    $dir=opendir($directory);

    //читаем директорию в цикле
    while (false!==($file=readdir($dir)))
    {
        //если это файл, то
        if (is_file($directory.'/'.$file))
        {
            //увеличиваем счетчик
            $i++;

			//увеличиваем размер
			$size+=filesize($directory.'/'.$file);

            /*если необходимо, то можно удалить все файлы для примера вот так:
            unlink($directory.'/'.$file); */
        }
        //если же наткнулись на директорию
        elseif (is_dir($directory.'/'.$file) && $file!='.' && $file!='..')
        {
            //снова вызываем функцию уже для этой директории
            count_files($directory.'/'.$file);
        }
    }
    //закрываем директорию
    closedir($dir);
}

$i=0;
$size=0;

//посчитаем файлы в текущей директории
count_files('.');

echo 'файлов :'.$i;
echo ' размером :'.$size;

?>
13 сентября 2007, 23:54

рисование копирайтов на изображениях

<?php
/*
*создание прозрачного копирайта на изображении
*автор: nc_soft
*13.09.07
*/

//заголовок
header ("Content-type: image/png");

//оригинальное изображение (в данном случаи 128*97
$img = imagecreatefromjpeg("example.jpg");


/*
*все координаты задаются от ВЕРХНЕГО ЛЕВОГО угла изображения (там 0.0)
*/

//верхняя левая точка прямоугольника (все изображение в примере 128*97)
$x1=50;
$y1=5;

//нижняя правая точка прямоугольника (все изображение в примере 128*97)
$x2=125;
$y2=20;

//степень прозрачности прямоугольника
$DARKNESS=100;

//цвет прямоугольника
$dark = imagecolorallocatealpha($img, 0, 0, 0, $DARKNESS);

//рисуем прямоугольник
imagefilledrectangle($img,$x1,$y1,$x2,$y2,$dark);

//цвет надписи (белый)
$white=imagecolorallocate($img,255,255,255);

//координаты надписи (где-то в прямоугольнике ;) )
$x=55;
$y=10;

//рисуем надпись
imagestring($img,1,$x,$y,"snippets.pp.ru",$white);

//выводим и освобождаем память
imagepng($img);
imagedestroy($img);

/*
создано по материалам учебника
http://www.codenet.ru/webmast/php/gd/Rectangle.php
*/

?>
13 сентября 2007, 21:34

отправка письма с вложением (attach)

<?php
/*
*отправка письма с вложением (attach)
*автор: disable
*11.09.07
*/

$to='example@mail.ru';
$text='текст';
$thm='тема';

//файл
$path='example.txt';

$file = file_get_contents($path);

// генерируем разделитель
$boundary = "--".md5(uniqid(time()));

$headers .= "MIME-Version: 1.0\n";
$headers .="Content-Type: multipart/mixed; boundary=\"$boundary\"\n";
$multipart .= "--$boundary\n";

//кодировка
$kod = 'utf-8';
$multipart .= "Content-Type: text/plain; charset=$kod\n";
$multipart .= "Content-Transfer-Encoding: Quot-Printed\n\n";
$multipart .= "$text\n\n";

$message_part = "--$boundary\n";
$message_part .= "Content-Type: application/octet-stream\n";
$message_part .= "Content-Transfer-Encoding: base64\n";
$message_part .= "Content-Disposition: attachment; filename = \"$path\"\n\n";
$message_part .= chunk_split(base64_encode($file))."\n";
$multipart .= $message_part."--$boundary--\n";

if(!mail($to, $thm, $multipart, $headers))
{
    exit("К сожалению, письмо не отправлено");
}

?>
11 сентября 2007, 23:08

опрелеление текущего курса доллара и евро

<?php
/*
*Опрелеление текущего курса доллара и евро
*взято из книги "Головоломки на PHP для хакера
*10.09.07
*
*/
// Ссылка на XML-файл
$url = "http://www.cbr.ru/scripts/XML_daily.asp?date_req=".date("d/m/Y");
// Загружаем файл
$content = file_get_contents($url);
// Регулярное выражение
$pattern = "|<valute id=\"([^\"]+)\">[\s]*<NumCode>([^<]+)</NumCode>[\s]*<CharCode>([^<]+)</CharCode>[\s]*<Nominal>([^<]+)</Nominal>[\s]*<Name>([^<]+)</Name>[\s]*<Value>([^<]+)</Value>[\s]*</Valute>|is";
preg_match_all($pattern, $content, $out);
for($i = 0; $i < count($out[1]); $i++)
{
    $out[6][$i] = str_replace(",",".",$out[6][$i]);
    if($out[3][$i] == "USD") echo "Доллар - ".sprintf("%3.2f",$out[6][$i]/$out[4][$i])."<br>";
    if($out[3][$i] == "EUR") echo "Евро - ".sprintf("%3.2f",$out[6][$i]/$out[4][$i])."<br>";
}
?>
10 сентября 2007, 16:59

получение страницы по https через socket

<?php
/*
*получение страницы по https через socket
*автор: disable
*09.09.07
*/

//хостинг должен поддерживать ssl соединение!

$sock = fsockopen("ssl://security.webmoney.ru", 443, $errno, $errstr, 30);
if (!$sock) die("$errstr ($errno)\n");

fputs($sock, "GET /asp/default.asp HTTP/1.0\r\n");
fputs($sock, "Host: security.webmoney.ru\r\n");
fputs($sock, "Accept: */*\r\n");
fputs($sock, "\r\n");

$headers = "";

while ($str = trim(fgets($sock, 4096)))
$headers .= "$str\n";

$body = "";

while (!feof($sock))
$body.= fgets($sock, 4096);
fclose($sock);

echo '<div>'.$headers.'</div>';
echo '<div>'.$body.'<div>';

//как видим, отличий не много.

?>
9 сентября 2007, 12:31

выяснение адресов почтовых ретрансляторов

<?php  
/*
*Выяснение адресов почтовых ретрансляторов
*взято из книги
* "Головоломки на PHP для хакера
*07.09.07
*/

$email="example@mail.ru";

$host = strtok($email,'@');
getmxrr($host, $mxhostsarr, $weight);
echo "На $email письма могут отправляться через следующие хосты:<br />";
for ($i=0; $i < count($mxhostsarr); $i++)
{
    echo ("$mxhostsarr[$i] (приоритет: $weight[$i])<br />");
}
?>
7 сентября 2007, 19:28

получение письма по протоколу pop3

<?php
/*
*получение письма по протоколу pop3
*автор: disable
*07.09.07
*/

//задаем форматированный вывод, чтобы удобнее было читать ответы по строкам
echo '<pre>';

$login='example@mail.ru';
$pass='*******';

//подключаемся к серверу
$f=fsockopen('pop.mail.ru',110,$errno,$errstr,10);
if(!$f)
{
    die("Не удается подключиться к pop.mail.ru: [$errno] $errstr");
}

/*
*читаем статус ответа, он может быть либо +OK, либо -ERR
*/
echo $s=fgets($f);
if (strpos($s,'+OK')!==0) die('ошибка подключения');

//авторизируемся, для этого надо отправить имя пользователя
fwrite($f,"USER $login\r\n");

//отправляем пароль
fwrite($f,"PASS $pass\r\n");

echo $s=fgets($f);

/*
*если авторизация успешна, то сервер выбросит сколько писем в ящике,
*иначе будет ошибка авторизации
*/
echo $s=fgets($f);
if (strpos($s,'+OK')!==0) die('ошибка авторизации');

//для примера получим первое сообщение командой TOP 1 1000(если задать много строк, то возвратится все сообщение.
// Для получения сообщения целиком можно также воспользоваться командой RETR 1, в данном случаи, если сообщение короче 1000 строк это тоже самое) 
//сначала будут идти заголовки, потом пуcтая строка \r\n, потом само сообщение
//многострочные ответы почтовый сервер завершает строкой .\r\n

//посылка команды
fwrite($f,"TOP 1 1000\r\n");

$msg='';
$head='';

//чтение ответа
while (false!==($s=fgets($f)))
{
    //строка .\r\n данные закончились
    if ($s===".\r\n") break;

    //строка \r\n, заголовки закончились
    if ($s=="\r\n" && !$msg)
    $msg=' ';

    if (!$msg) $head.=$s;
    else $msg.=$s;
}

//выводим сообщение и заголовки
echo trim($head);
echo "\n\n---конец заголовков---\n\n";
echo trim($msg);

?>
7 сентября 2007, 19:08

pop3 авторизация

<?php
/*
*pop3 авторизация и получение информации о количесве писем в ящике
*автор: disable
*07.09.07
*/

$login='example@mail.ru';
$pass='*****';

//подключаемся к серверу
$f=fsockopen('pop.mail.ru',110,$errno,$errstr,10);
if(!$f)
{
    die("Не удается подключиться к pop.mail.ru: [$errno] $errstr");
}

/*
*читаем статус ответа, он может быть либо +OK, либо -ERR
*/
echo $s=fgets($f).'<br />';
if (strpos($s,'+OK')!==0) die('ошибка подключения');

//авторизируемся, для этого надо отправить имя пользователя
fwrite($f,"USER $login\r\n");

//отправляем пароль
fwrite($f,"PASS $pass\r\n");

echo $s=fgets($f).'<br />';

/*
*если авторизация успешна, то сервер выбросит сколько писем в ящике, 
*иначе будет ошибка авторизации
*/
echo $s=fgets($f).'<br />--<br />';
if (strpos($s,'+OK')!==0) die('ошибка авторизации');

//определим, сколько же у нас новых писем
preg_match('|maildrop has (\d+) messages \((\d+) octets\)|',$s,$num);
$messages=$num[1];
$octets=$num[2];

echo "в ящике писем: $messages<br />
общий размер: $octets байт";

?>
7 сентября 2007, 17:50

Функция перекодировки utf-8 в windows-1251

<?php
/*
*Функция перекодировки utf-8 -> windows-1251
*автор: PHPInside №8
*30.08.07
*/

function utf8win1251($s){
    $out = $c1 = "";
    $byte2=false;
    for ($c=0;$c<strlen($s);$c++){
        $i=ord($s[$c]);
        if ($i<=127) $out.=$s[$c];
        if ($byte2){
            $new_c2=($c1&3)*64+($i&63);
            $new_c1=($c1>>2)&5;
            $new_i=$new_c1*256+$new_c2;
            if ($new_i==1025){ $out_i=168; }
            else{
                if ($new_i==1105){
                    $out_i=184; }
                    else {
                        $out_i=$new_i-848;
                    }
            }
            $out.=chr($out_i);
            $byte2=false;
        }
        if (($i>>5)==6) {
            $c1=$i;
            $byte2=true;
        }
    }
    return $out;
}

//пример
echo utf8win1251('текст в utf-8');
?>
31 августа 2007, 12:29

Функция перекодировки windows-1251 в utf-8

<?php
/*
*Функция перекодировки windows-1251 -> utf-8
*автор: ?
*31.08.07
*/

function win2utf($str)
{
    static $table = array(
    "\xA8" => "\xD0\x81",
    "\xB8" => "\xD1\x91",
    "\xA1" => "\xD0\x8E",
    "\xA2" => "\xD1\x9E",
    "\xAA" => "\xD0\x84",
    "\xAF" => "\xD0\x87",
    "\xB2" => "\xD0\x86",
    "\xB3" => "\xD1\x96",
    "\xBA" => "\xD1\x94",
    "\xBF" => "\xD1\x97",
    "\x8C" => "\xD3\x90",
    "\x8D" => "\xD3\x96",
    "\x8E" => "\xD2\xAA",
    "\x8F" => "\xD3\xB2",
    "\x9C" => "\xD3\x91",
    "\x9D" => "\xD3\x97",
    "\x9E" => "\xD2\xAB",
    "\x9F" => "\xD3\xB3",
    );
    return preg_replace('#[\x80-\xFF]#se',
    ' "$0" >= "\xF0" ? "\xD1".chr(ord("$0")-0x70) :
                       ("$0" >= "\xC0" ? "\xD0".chr(ord("$0")-0x30) :
                        (isset($table["$0"]) ? $table["$0"] : "")
                       )',
    $str
    );
}

//пример
echo win2utf('тест в windows-1251');
?>
31 августа 2007, 12:29

загрузка нескольких файлов на сервер (upload)

<?php
/*
*Загрузка нескольких файлов на сервер (upload)
*автор: nc_soft
*29.08.07
*/

//соответственно состоит из формы и обработчика
if (isset($_FILES))
{
    foreach ($_FILES['file']['name'] as $k=>$v)
    {
        if (move_uploaded_file($_FILES['file']['tmp_name'][$k],'./'.$v))
        {
            echo 'файл загружен в папку скрипта, этот пример создан лишь для демонстративных целей, потому что
            он не проверяет сами файлы, а сохраняет их в том же виде, как и при отправке.<br />';
        }
    }
}

//ну и сама форма для загрузки, обратите внимание на name="file[]"
?>
<form action="upload.php" method="post" enctype="multipart/form-data">
<input name="file[]" type="file" /><br />
<input name="file[]" type="file" /><br />
<input name="file[]" type="file" /><br />
<input type="submit" value="Upload" />
</form>
29 августа 2007, 01:14

GET запрос при помощи file_get_contents

<?php
/*
*GET запрос с посылкой http заголовков при помощи file_get_contents
*автор: nc_soft
*29.08.07
*/

/*задать необходимые заголовки можно в массиве http, для примера посланы 2 заголовка
User-Agent и Connection
*/

//заздаем контекст :)
$context = stream_context_create(
array(
        'http'=>array(
                        'header' => "User-Agent: Brauzer 2/0\r\nConnection: Close\r\n\r\n"
                     )
    )
);

$contents = file_get_contents("http://wen.ru", false ,$context);
echo $contents;
?>
28 августа 2007, 15:16