Архивирование и разбиение файлов на части средствами PHP

anufriy · 18.05.2006, 04:17

Вот код, который я пользую совместно с ПИАР:

$data = file_get_contents ($_GET['link_addr']);
if($data){
$text .= " - FILE EXISTS AND HAD READ! ";
//-----------------определение имени и типа файла ------------------------------------
$filename = basename ($_GET['link_addr']); //Реальное имя файла
$text .= " - FILENAME: $filename ";
require_once "mimetype.php";
$mimetype = new mimetype();
$filetype = $mimetype->getType($filename);
$text .= " - FILETYPE: $filetype ";
//------------------------------------------------------------------------------------

$fp = fopen ($filename, "w");
if($fp){
$text .= " - FILE SUCCESSFULLLY OPENED";
}
$fsize = fwrite ($fp, $data);
$fsize = $fsize/1048576;
$data="";
$text .= " - FILESIZE OF CREATED FILE = $fsize MB ";
$ok = fclose($fp);
if($ok){
$text .= " - FILE SUCCESSFULLLY CLOSED ";
}

//------------------------------------------МЕЙЛ---------------------------------------------------------------------------

include('Mail.php');
include('Mail/mime.php');

if($_GET['mail_addr'] = 1){
$mail_addr = "anufry@gmail.com";
}elseif($_GET['mail_addr'] = 2){
$mail_addr = "ilyuhansky@rambler.ru";
}elseif($_GET['mail_addr'] = 3){
$mail_addr = "anufriy@msg.uz";
}

$t_body = 'Это письмо не СПАМ! Это очень хорошее и доброе письмо.';
$html = '<html><body>Товарищи! Это письмо не спам! Это очень хорошее письмо.</body></html>';
$file = "TEMPFILE";
if($file)
{
$text .= " - FILE 4 MAIL SUCCESSFULLY OPENED ";
}
$crlf = "\r\n";
$hdrs = array(
'From' => 'admin@stream.uz',
'Subject' => 'Good anonsment 4 U, dear subscriber!'
);

$mime = new Mail_mime($crlf);

$mime->setTXTBody($t_body);
$mime->setHTMLBody($html);
$mime->addAttachment($filename, $filetype);

$body = $mime->get();
$hdrs = $mime->headers($hdrs);

//$params['sendmail_path'] = '/usr/lib/sendmail';

$mail =& Mail::factory('mail');
if($mail->send($mail_addr, $hdrs, $body) ){
$text .= " - MAIL SENT OK ";
}else{
$text .= " - MAIL SENT ERROR ";
}
if (PEAR::isError($mail)){
$text .= "***ERROR ";
}
unlink($filename);
}else{
$text = "ФАЙЛ НЕ СУЩЕСТВУЕТ.";
}