<?php
/*
* Удаление папки
* автор: nc_soft
* 01.02.08
*/

/*
для удаленея папки надо предварительно удалить все ее содержимое,
воспользуемся рекурсивной функцией
*/

function DelDir($dir) 
{
    //если не открыть директорию
	if (!$dd = opendir($dir)) return false;
	
	//читаем директорию в цикле
    while (false !== ($obj = readdir($dd)))
	{
        //пропускаем системные каталоги
		if($obj=='.' || $obj=='..') continue;
		
		//пробуем удалить объект, если это не удается, то применяем функцию к этому объекту вновь
        if (!@unlink($dir.'/'.$obj)) DelDir($dir.'/'.$obj);
    }

    closedir($dd);
	
		//удаляем пустую директорию
        @rmdir($dir);
}

//пример удаления директории pictures
DelDir('pictures');

/*
 создано по материалам комментариев на 
 http://ru2.php.net/unlink
*/
?>

<?php
/*
*Basic авторизация через socket
*автор: nc_soft
*30.01.08
*/

/* кто не знает что это такое перейдите по ссылке http://snippets.pp.ru/basic/index.php */

//сайт
$host='snippets.pp.ru';

//скрипт-обработчик
$path='/basic/index.php';

//юзер и пароль 
$user = "nc_soft"; 
$password = "snippets";

//открываем сокет
$fp = @fsockopen("tcp://".$host, 80, $errno, $errstr, 10);
if (!$fp)
{
	die($errstr.':'.$errno);
}
else
{
	$out  = "GET $path HTTP/1.0\r\n";
	$out .= "Host: $host\r\n";

	//авторизируемся
	$out .= "Authorization: Basic " . base64_encode("$user:$password") . "\r\n";

	$out .= "Connection: Close\r\n\r\n";

	//посылаем данные
	fwrite($fp, $out.$data);

	$headers='';

	//читаем заголовки
	while ($str = trim(fgets($fp, 4096)))
	$headers .= "$str\n";

	$body='';

	//читаем ответ
	while (!feof($fp))
	$body.= fgets($fp, 4096);

	//закрываем сокет
	fclose($fp);
}

//выводим данные
echo $headers.'<hr/>'.$body;

?>

<?php
/*
* Запись новостей в RSS канал
* автор: nc_soft
* 19.01.08
*/

//для начала сформируем RSS если он еще не создан (для папки rss необходиы права на запись)
$file='./rss/rss.xml';

if (!file_exists($file))
{
	$rss='<?xml version="1.0" encoding="utf-8"?>
<rss xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:content="http://purl.org/rss/1.0/modules/content/" version="2.0">
	<channel>
		<title>НАЗВАНИЕ КАНАЛА</title>
		<link>http://site.ru/rss/rss.xml</link>
		<description>описание канала</description>
		<language>ru</language>
    </channel>
</rss>';
	fwrite(fopen($file,'w+'),$rss);
}

//далее идет пример как добавить одну новость 

//грузим файл
$xml=simplexml_load_file($file);

//довавляем новый элемент item
$item=$xml->channel->addChild('item');

//пишем атрибуты новости
$item->link='http://site.ru/about_news.php';
$item->title='заголовок';
$item->author='автор';

//дата публикации
$item->pubDate=date('d.m.y H:i:s');

$item->description='описание самой новости';

//сохраняем как xml файл
$xml->asXML($file);

/*при записи новости не надо заботиться об htmlspecialchars()
файл rss.xml можно спокойно читать rss клиентом.
*/

?>

<?php
/*
* Снятие скриншота с 3gp видеоролика
* автор: nc_soft
* 17.01.08
*/

if (!class_exists(ffmpeg_movie))
{
	die('ничего не выйдет, нужна ffmpeg на хостинге');
}

//создание объекта (тестовый файл test.3gp)
$file='test.3gp';

if (file_exists($file))
{
	$mov = new ffmpeg_movie($file);
}
else
{
	die('невозможно найти файл');
}

//номер кадра
$frame = 50;

//ширина
$w = $mov->GetFrameWidth();

//высота
$h = $mov->GetFrameHeight();

//извлечение кадра
$ff_frame = $mov->getFrame($frame);

if ($ff_frame)
{
	//в формат GD
	$gd_image = $ff_frame->toGDImage();

	if ($gd_image)
	{
		//вывод (для примера в gif)
		header('Content-type: image/gif');
		imagegif($gd_image);

		/*можно сделать изменение размера, нанесение копирайтов и водяных знаков, в общем все что применимо для GD*/
	}
	else
	{
		die('невозможно преобразовать в GD');
	}
}
else
{
	die('невозможно извлечь кадр');
}

/*
описания всех методов ffmpeg_movie смотрим тут
http://ffmpeg-php.sourceforge.net/doc/api/ffmpeg_movie.php
*/
?>

<?php
/*
* проверка строки в utf-8
* автор: W3C
* 09.01.08
*/

function is_utf8($string)
{
    return preg_match('%^(?:
          [\x09\x0A\x0D\x20-\x7E]            # ASCII
        | [\xC2-\xDF][\x80-\xBF]             # non-overlong 2-byte
        |  \xE0[\xA0-\xBF][\x80-\xBF]        # excluding overlongs
        | [\xE1-\xEC\xEE\xEF][\x80-\xBF]{2}  # straight 3-byte
        |  \xED[\x80-\x9F][\x80-\xBF]        # excluding surrogates
        |  \xF0[\x90-\xBF][\x80-\xBF]{2}     # planes 1-3
        | [\xF1-\xF3][\x80-\xBF]{3}          # planes 4-15
        |  \xF4[\x80-\x8F][\x80-\xBF]{2}     # plane 16
    )*$%xs', $string);

}

//как не трудно догадаться возвращает 0 или 1, пример:
$text='Cъешь еще этих мягких французских булок, да выпей чаю';
if (is_utf8($text))
{
    echo 'строка1 в утф-8 ';
}
else 
{
    echo 'строка1 содержит плохие символы ';
}

//пример некорректной строки, просто передадим картинку в текст
$text=file_get_contents('http://www.w3.org/Icons/w3c_home.gif');
if (is_utf8($text))
{
    echo 'строка2 в утф-8 ';
}
else 
{
    echo 'строка2 содержит плохие символы ';
}

// http://www.w3.org/International/questions/qa-forms-utf-8.en.php
?>

<?php
/*
* Крутилка рекламы
* автор: nc_soft
* 07.01.08
*/

//задаем рекламу в массиве
$rekla=array(
'ссылка_1' => 'http://url_l.com',
'ссылка_2' => 'http://url_2.com',
'ссылка_3' => 'http://url_3.com'
);

$index=array_rand($rekla);

echo '<a href="'.$rekla[$index].'">'.$index.'</a>';
?>

<?php
/*
* Basic авторизация через CURL
* автор: nc_soft
* 01.01.08
*/

/* кто не знает что это такое перейдите по ссылке http://snippets.pp.ru/basic/index.php */

//запрашиваемая страница
$curl = curl_init('http://snippets.pp.ru/basic/index.php');
 
//юзер и пароль
$user = "nc_soft";
$password = "snippets";

//это потом раскомментируете, чтобы убедиться в необходимости этих данных ;)
//$user=$password='';
          
 
//вразумительный браузер
curl_setopt($curl,CURLOPT_USERAGENT,"Mozilla/4.0");

//интересно посмотреть заголовки?
curl_setopt($curl,CURLOPT_HEADER,1);

 
//если есть юзер и пароль, то вводим
if(!empty($user) && !empty($password))
{
    //говорим что это basic, хотя и без этого работает с моей страницей
    curl_setopt($curl, CURLOPT_HTTPAUTH, CURLAUTH_BASIC); 
    
    curl_setopt($curl,CURLOPT_USERPWD,$user . ":" . $password);
}
 
 
//посылаем запрос
curl_exec($curl);

?>

<?php
/*
*gzip сжатие страницы
*автор: nc_soft
*27.12.07
*/

/*
для представления страницы в gzip необходимо определить:
1.поддерживает ли браузер сжатие (должно быть Accept-Encoding: gzip,deflate)
2.послать заголовок ( header("Content-Encoding: gzip") )

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

ob_start('ob_gzhandler',9);

/*
где 9 это уровень сжатия (максимальный)

больше ничего для сжатия делать не надо, просто продолжайте скрипт дальше
*/

?>

<?php
/*
*Отсчет времени с учетом морфологии
*автор: nc_soft
*15.12.07
*/

//расчетная дата (часы, минуты, секунды, день, месяц, год)
$dateTo=mktime(0,0,0,1,1,2008);

//смещение по часам у хостера (в примере смещение от московского равно нулю)
$timediff=$dateTo-time()-3600*0;

$oneMinute=60;
$oneHour=60*60;
$oneDay=60*60*24;
$dayfield=floor($timediff/$oneDay);
$hourfield=floor(($timediff-$dayfield*$oneDay)/$oneHour);
$minutefield=floor(($timediff-$dayfield*$oneDay-$hourfield*$oneHour)/$oneMinute);
$secondfield=floor(($timediff-$dayfield*$oneDay-$hourfield*$oneHour-$minutefield*$oneMinute));

$sDaysLeft=$dayfield;
$sDaysText = "дней";
$nDaysLeftLength =strlen($sDaysLeft);
$d_1=substr($sDaysLeft,-1,1);

if (substr($sDaysLeft,-2,1) != 1 && $nDaysLeftLength>1)
{
    if ($d_1 == 2 || $d_1== 3 || $d_1== 4)
    {
        $sDaysText = "дня";
    }
    elseif ($d_1== 1)
    {
        $sDaysText = "день";
    }
}
if ($nDaysLeftLength==1)
{
    if ($d_1==2 || $d_1== 3 || $d_1== 4)
    {
        $sDaysText = "дня";
    }
    elseif ($d_1== 1)
    {
        $sDaysText = "день";
    }
}

$sHoursLeft=$hourfield;
$sHoursText = "часов";
$nHoursLeftLength = strlen($sHoursLeft);
$h_1=substr($sHoursLeft,-1,1);
if (substr($sHoursLeft,-2,1) != 1 && $nHoursLeftLength>1)
{
    if ($h_1== 2 || $h_1== 3 || $h_1== 4)
    {
        $sHoursText = "часа";
    }
    elseif ($h_1== 1)
    {
        $sHoursText = "час";
    }
}

if ($nHoursLeftLength==1)
{
    if ($h_1== 2 || $h_1== 3 || $h_1== 4)
    {
        $sHoursText = "часа";
    }
    elseif ($h_1== 1)
    {
        $sHoursText = "час";
    }
}

$sMinsLeft =$minutefield;
$sMinsText = "минут";
$nMinsLeftLength = strlen($sMinsLeft);
$m_1=substr($sMinsLeft,-1,1);

if ($nMinsLeftLength>1 && substr($sMinsLeft,-2,1) != 1)
{
    if ($m_1== 2 || $m_1== 3 || $m_1== 4)
    {
        $sMinsText = "минуты";
    }
    else if ($m_1== 1)
    {
        $sMinsText = "минута";
    }
}

if ($nMinsLeftLength==1)
{
    if ($m_1== 2 || $m_1==3 || $m_1== 4)
    {
        $sMinsText = "минуты";
    }
    elseif ($m_1== "1")
    {
        $sMinsText = "минута";
    }
}

$sSecsLeft = $secondfield;
$sSecsText = "секунд";
$s_1=substr($sSecsLeft,-1,1);
$nSecsLeftLength = strlen($sSecsLeft);
if (substr($sSecsLeft,-2,1)!= 1 && $nSecsLeftLength>1)
{
    if ($s_1== 2 || $s_1== 3 || $s_1== 4)
    {
        $sSecsText = "секунды";
    }
    elseif ($s_1== 1)
    {
        $sSecsText = "секунда";
    }
}

if ($nSecsLeftLength==1)
{
    if ($s_1== 2 || $s_1== 3 || $s_1== 4)
    {
        $sSecsText = "секунды";
    }
    elseif ($sSecsLeft== "1")
    {
        $sSecsText = "секунда";
    }
}

$displaystring="До Нового Года осталось:\n".
$sDaysLeft." ".
$sDaysText." ".
$sHoursLeft." ".
$sHoursText." ".
$sMinsLeft." ".
$sMinsText." ".
$sSecsLeft." ".
$sSecsText;

if ($timediff<0) $displaystring='дата уже наступила';

echo $displaystring;

?>

<?php
/*
*Собственный механизм сессий
*автор: nc_soft
*25.11.07
*/


/*
далее перечислена библиотека функций, которая эмулирует поведение сессий.

поместим эту библиотеку в файл session.php
*/

// Открываем
function open($save_path, $session_name)
{
    // Сетевой адрес MySQL-сервера
    $dblocation = "localhost";
    // Имя базы данных
    $dbname = "boo";
    // Пользователь
    $dbuser = "root";
    // Его пароль
    $dbpasswd = "";

    // Устанавливаем соединение с базой данных
    $dbcnx = mysql_connect($dblocation,$dbuser,$dbpasswd);
    if (!$dbcnx) exit ("К сожалению, не доступен сервер MySQL : ".mysql_error());
    // Выбираем базу данных
    if (!@mysql_select_db($dbname,$dbcnx)) exit("К сожалению, не доступна база данных : ".mysql_error());

    //создаем таблицу в mysql (если она еще не создана)
    mysql_query("CREATE TABLE IF NOT EXISTS session (
   id_session int(11) NOT NULL auto_increment,
   session tinytext NOT NULL,
   putdate datetime NOT NULL default '0000-00-00 00:00:00',
   value tinytext NOT NULL,
   PRIMARY KEY  (id_session)
   ) TYPE=MyISAM;");

    return true;
}

function close()
{
    // Закрываем соединение с базой данных
    mysql_close();

    return true;
}

function read($id)
{
    // Читаем данные сессии
    $query = "SELECT value FROM session WHERE session = '$id'";
    $ses = mysql_query($query);
    if(!$ses) exit(mysql_error());
    $session = mysql_fetch_array($ses);

    // Возвращаем данные, помещённые в сессию
    return $session['value'];
}

function write($id, $sess_data)
{
    // Проверяем не зарегистрирована ли сессия
    // с таким именем
    $query = "SELECT COUNT(*) FROM session WHERE session = '$id'";
    $ses = mysql_query($query);
    if(!$ses) exit(mysql_error());
    if(mysql_result($ses,0) > 0)
    {
        // Такая сессия уже существует, необходимо
        // обновить время обращения к сессии
        $query = "UPDATE session SET putdate = NOW(),
                                   value = '$sess_data' 
                WHERE session = '$id'";
        if(!mysql_query($query)) exit(mysql_error());
        return false;
    }
    else
    {
        // Это первое обращение к сессии, необходимо
        // её зарегистрировать в базе данных
        $query = "INSERT INTO session
                VALUES (NULL,'$id', NOW(), '$sess_data')"; 
        $ses = mysql_query($query);
        if(!$ses) exit(mysql_error());
        return true;
    }
}

function destroy($id)
{
    // Удаляем сессию с идентификатором $id
    $query = "DELETE FROM session WHERE session = '$id'";
    if(!mysql_query($query)) exit(mysql_error());
    return true;
}

function gc($maxlifetime)
{
    // Выполняем "сборку мусора" - удаляем
    // старые записи
    $query = "DELETE FROM session
              WHERE putdate < NOW() - INTERVAL 20 MINUTE";
    if(!mysql_query($query)) exit(mysql_error());
    return true;
}

//говорим интерпритатору, что мы будем использовать свои функции для обработки сессий
session_set_save_handler("open", "close", "read", "write", "destroy", "gc");

//старт сессии
session_start();

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

/*
пример использования (ничем не отличается от стандартных сессий)
*/

/*
<?php
  //include "session.php";
  $_SESSION['name'] = "Имя";
  $_SESSION['surname'] = "Фамилия";
  
  print_r($_SESSION);
  echo '<a href="session.php">go</a>';
?>
*/

/*
Создано по материалам книги "Головоломки на PHP для хакера"
*/
?>

<?php
/*
*Время генерации страницы
*автор: Сява
*10.11.07
*/

list($msec, $sec) = explode(chr(32), microtime());
$time = $sec + $msec;

/*
тут размещаете содержимое скрипта
*/
//это для примера
sleep(2);

list($msec, $sec) = explode(chr(32), microtime());
echo 'Генерация скрипта '.round(($sec + $msec) - $time, 4).' секунд'; 
//где 4 -это количество символов после запятой
?>

<?php
/*
*ЗАПИСЬ В ФАЙл данных из формы
*автор: nc_soft
*10.11.07
*/

//переменная ошибок
$error=array();

//обработчик формы
if (!empty($_POST))
{
    //проверка параметра
    //функция str_replace() необходима чтобы вырезать переводы строк ( \n ) 
    $var=str_replace("\n",'',trim($_POST['var']));
    if (empty($var))
    $error['empty']='не введен параметр';
    

    //если все нормально пишем в файл
    if (empty($error))
    {
        //открываем
        $f=fopen('db.txt','a+');
        
        //блокируем
        flock($f,2);
        
        //запись с переводом строки
        fwrite($f,$var."\n");
        
        //закрытие
        fclose($f);
        
        /*переадресация , чтобы сбросить пост, это нужно чтобы при нажатии кнопки обновить 
         данные не добавились вновь*/
        header('Location: '.$_SERVER['SCRIPT_NAME'].'?ok=1');
        die();
    }
}

//если есть ошибки выводим
if (!empty($error))
echo '<p>'.implode('<br />',$error).'</p>';

if (isset($_GET['ok']))
echo '<p>данные записаны</p>';

//сама форма
?>
<form action="<?=$_SERVER['SCRIPT_NAME'];?>" method="post">
<p>
введите параметр:<br />
<input name="var" value="<?=isset($_POST['var']) ? htmlspecialchars(stripslashes(trim($_POST['var']))) : '';?>" /><br />
<input type="submit" value="отправить" />
</p>
</form>

<?php
/*
Примечания:

Для сбора ошибок используется именно массив, потому что удобно впоследствии выводить их через <br /> или списком, 
в ключе ммассива также можно указать причину $error['empty']='не введен параметр';

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

*/
?>

<?php
/*
*RSS reader
*автор: nc_soft
*06.11.07
*/

//адрес канала новостей
$feed='http://www.webmoney.ru/rss.xml';

//грузим новости при помощи класса simplexml (нужна поддержка хостинга)
$sxml=simplexml_load_file($feed);

//атрибуты RSS протокола
foreach ($sxml->attributes() as $key=>$value)
{
    echo '<p>RSS '.$key.' '.$value.' </p>';
}

//заголовок
echo '<h2>'.$sxml->channel->title.'</h2>';

//выводим новости
foreach ($sxml->channel->item as $item)
{
    echo '<p style="background-color:#cccccc">';
    echo '<a href="'.$item->link.'">'.$item->title.'</a><br />';
    echo $item->description;
    echo '</p>';    
}

/*
пример взят из книги "Объектно-ориентированное программирование на PHP5"
Питер Ловэйн
*/

?>

<?php
/*
*Генератор паролей
*автор: Mobnet
*21.10.07
*/

function gen_cod($num)
{
    //симвлы из которых генерируется пароль
    $kod=array(
    'a','b','c','d','e',
    'f','g','h','i','j',
    'k','l','m','n','o',
    'p','q','r','s','t',
    'u','v','w','x','y','z',
    'A','B','C','D','E',
    'F','G','H','I','J',
    'K','L','M','N','O',
    'P','Q','R','S','T',
    'U','V','W','X','Y','Z',
    '0','1','2','3','4','5',
    '6','7','8','9'
    );

    $ko='';
    for($i=1; $i<=$num; $i++)
    {
        $ko.=$kod[array_rand($kod)];
    }
    return $ko;
}

//применение функции
echo gen_cod(6);

/*
примечание:
в пароле ОЯЗАТЕЛЬНО должны присутствовать буквы разного регистра
 и цифры, для усложнения подбора, здесь же это не всегда выполняется
*/
?>

<?php
/*
*Вывод надписи на изображении ttf шрифтом
*автор: nc_soft
*12.10.07
*/

//текст в утф-8 (можно с переносом строки)
$text="выводимая \n строка";

//АБСОЛЮТНЫЙ путь к шрифту! например шрифт arial.ttf лежит в папке скрипта
$font=getcwd().'/arial.ttf';

//создаем изображение 100*100
$im = imagecreatetruecolor(100, 100);

//белый фон изображения
$white = imagecolorallocate($im, 255, 255, 255);

//цвет букв
$red = imagecolorallocate($im, 255, 0, 0);

//заливаем белым фоном
imagefilledrectangle($im, 0, 0, 100, 100, $white);

//наносим текст
imagettftext($im, 9, 0, 10, 20, $red, $font,$text);

/*
imagettftext ( 
идентификатор,
размер шрифта,
угол поворота,
начальная точка по Х,
начальная точка по У,
путь к шрифту,
текст )
*/

//выдача в браузер
header('Content-Type: image/jpeg');
imagejpeg($im);
?>

<?php
/*
*запрет кэширования страниц
*автор: nc_soft
*09.10.07
*/

//для 100% достижения эффекта необходимо послать все четыре заголовка!

Header("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); //Дата в прошлом
Header("Cache-Control: no-cache, must-revalidate"); // HTTP/1.1
Header("Pragma: no-cache"); // HTTP/1.1
Header("Last-Modified: ".gmdate("D, d M Y H:i:s")."GMT");

?>

<?php
/*
*upload для opera mini
*08.10.07
*автор: DG-SC
*

оригинальный код и комментарии сохранены
*/
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<meta http-equiv="Pragma" content="no-cache">
<title>Форма отправки файла для Opera Mini</title>
</head>

<body>

<!-- v1.1/13.10.2006-->
<?php

// путь для загруженных файлов, по аналогии с настоящей загрузкой по http
//$uploaddir = '\\home\\opera-mini.ru\\www\\test\\fileup\\';
$uploaddir = 'fileup/';
/*
//НИЖЕ ИДЁТ ЗАМЕНА ВОТ ТАКОГО БЛОКА ЗАГРУЗКИ
if (move_uploaded_file($_FILES['filel']['tmp_name'], $uploaddir . $_FILES['filel']['name'])) {
echo "File is valid, and was successfully uploaded<br>";
} else {
echo "There some errors!<br>";
}

*/
/*
прикрепление файла происходит в виде отсылки имени файла и его тела, кодированного в Base64.
в post для данного примера это выглядит как:

?file1=filename.extfile=/9...данные....Q
[POST: [имя файла ][сигн][данные файла ]]
как видно, здесь нет явного определения параметра file, поэтому этот параметр вырезается из всего POST.
всё, что до него - то имя, что после - данные.

*/
// определяем реальное имя файла
$uploadedfile = $_POST['file1'];

// проверка на наличие данных в POST
if (strlen($uploadedfile)) {
    // "вырезаем" данные файла из пришедшего
    // параметр 'file=' НЕ МЕНЯТЬ!!!! иначе не получите данных файла
    $array = explode('file=', $uploadedfile);
    $tmp_name = $array[0];
    $filebase64 = $array[1];
}

// проверка на нулевой размер файла
if (strlen($filebase64)) {
    // определяем имя файла для создания
    // ЗДЕСЬ МОЖНО ИЗМЕНИТЬ ДЛЯ ИСКЛЮЧЕНИЯ СОВПАДЕНИЙ C СУЩЕСТВУЮЩИМИ
    $name = $tmp_name;
    $FileName = $uploaddir.$name;

    // декодируем данные файла
    $filedata = base64_decode($filebase64);


    // создание и запись данных в файл
    $file = @fopen($FileName, "wb");

    if($file){
        if(flock($file, LOCK_EX)){
            fwrite($file, $filedata);
            flock($file, LOCK_UN);
        }
        fclose($file);
    }

    // отчёт о результате
    echo '<script language="Javascript">';
    if (file_exists($FileName) && filesize($FileName) == strlen($filedata)) {
        echo 'alert ("File ',$tmp_name,' is valid, and was successfully uploaded")';
    } else {
        echo 'alert ("An error occured while upload ',$tmp_name,'")';
    }
    echo '</script>';



    // просто список файлов в директории загрузки
    echo '..';

    foreach (glob($uploaddir.'*.*') as $filename) {
        $name = explode('/', $filename);
        //$name = explode('.', $name[1]);
        $lastmodif = filemtime($filename);
        $size = filesize($filename);
        $time = date("G:i j-M-Y", $lastmodif);

        echo "<br><a href=\"$filename\">$name[1] [$size] [$time]</a><br>";
    }


    echo '<p><a href="upload.php">upload</a></p>';

} else {
    // расположение формы на странице не критично.
    // единственное, что ссылка на обзор файла ДОЛЖНА БЫТЬ расположена
    // непосредственно под полем отображения имени файла "file1"
    echo '<form method="post" enctype="multipart/form-data">';
    echo 'Файл для отправки';
    ////////////////////////////////////////////////////////////////////////////////
    /// ФИКСИРОВАННАЯ ЧАСТЬ: НЕ ИЗМЕНЯТЬ!!!
    // имя менять при одновременной смене его и в обрабочике POST
    echo '<br><p> <input name="file1" value = ""> ';
    // url ссылки ДОЛЖЕН БЫТЬ именно таким, для определения Оперой
    // это "op:fileselect" НЕ МЕНЯТЬ!!! иначе Opera перестанет открывать ФМ для обзора
    echo '<a href="op:fileselect">Выбрать файл</a>';
    ////////////////////////////////////////////////////////////////////////////////
    echo '<br><p> <input type="submit" value="Послать файл">';
    echo '</form>';
}


?>

</body>
<!-- Created by DG-SC © 2006-->
</html>

<?php
/*
*bash.org.ru rss граббер
*автор: disable
*30.09.07
*/

//грузим rss файл
$data=file_get_contents('http://bash.org.ru/rss');

//обрабатываем
$dat=array();
preg_match_all('|<pubDate>(.+)</pubDate>|',$data,$dat);

$content=array();
preg_match_all('|<description><!\[CDATA\[(.+)\]\]></description>|',$data,$content);

//теперь у нас есть 2 массива по 100 элементов, воспользуемся постраничным выводом

//всего элементов
$all=count($content[1]);

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

//номер страницы
$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;
}

//посылаем заголовок
header('Content-type:text/html;charset=utf-8');

//выводим верх страницы (html код, выносим за <?php 
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>bash.org.ru</title>
</head>
<body>
<?php

//выводим цитаты
if ($all)
{
    for ($i=$start; $i<$start+$pnumber; $i++)
    {
        //if (!isset($dat[1][$i])) break;
        echo '<p style="border:1px solid;padding:2px">';
        echo $dat[1][$i];
        echo '<br />';

        //не забываем про утф-8
        echo iconv('windows-1251','utf-8',$content[1][$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>';
}

//закрываем теги
?>
</body>
</html>

<?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 запросы, задача этой статьи не создание флудер-скрипта а ознакомление с
принципами написания грабберов.
*/

?>

<?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);

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

?>