Форум АНТИЧАТ - rss reader php

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)

- PHP, PERL, MySQL, JavaScript (https://forum.antichat.xyz/forumdisplay.php?f=37)

- - rss reader php (https://forum.antichat.xyz/showthread.php?t=74156)

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

PHP код:


		
			
<?php

error_reporting(0);

ini_set('user_agent',$_SERVER['HTTP_USER_AGENT']);



//грузим rss файл

$data = file_get_contents('http://bash.org.ru/rss/');



//обрабатываем

preg_match_all('|<pubDate>(.+)</pubDate>|i',$data,$dat);



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



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



//всего элементов

$all = sizeof($content[1]);



//число сообщений на странице

$pnumber=10;



//номер страницы

$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(substr_count($_SERVER['HTTP_USER_AGENT'], 'MSIE'))

{header('Content-type: text/html; charset=utf-8');}

else

{header('Content-type: application/xhtml+xml; charset=utf-8');}



header('Cache-control: no-cache');



//выводим верх страницы (html код, выносим за <?php



print '<?xml version="1.0" encoding="UTF-8"?>

<!DOCTYPE html PUBLIC "-//WAPFORUM//DTD XHTML Mobile 1.0//EN" "http://www.wapforum.org/DTD/xhtml-mobile10.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="ru">

<head>

<title>'.$_SERVER['HTTP_HOST'].'</title>

</head>

<body>';





//выводим цитаты

if($all)

{

for($i=$start; $i<$start+$pnumber; $i++)

{print '<p style="border:1px solid;padding:2px">'.$dat[1][$i].'<br />'.str_replace('<br>','<br/>',iconv('windows-1251','utf-8',$content[1][$i])).'</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>';}



print '</body></html>';

?>

это пример баша... только тут чтение... а нам нужно что бы новости сохранялись...

дык в чем проблема?
Сохрани в файл!

Ну и что сложного ?
Вместо print и echo, инфу схраняй в переменную, а потом запиши в файл fwrite();

и удали

Цитата:

//заголовки
if(substr_count($_SERVER['HTTP_USER_AGENT'], 'MSIE'))
{header('Content-type: text/html; charset=utf-8');}
else
{header('Content-type: application/xhtml+xml; charset=utf-8');}

header('Cache-control: no-cache');

Еще можно сделать, каждую новость в разный файл

Легко сказать... если бы я мог, то не просил бы помочь... не хочет он писать и все... пусто...

Цитата:

Сообщение от .::bars::.

Легко сказать... если бы я мог, то не просил бы помочь... не хочет он писать и все... пусто...

а права на запись проверял?

Цитата:

а права на запись проверял?

Я что на дауна похож? Конешно же проверял.... Говорю же что при записи он просто не качает новости...

Цитата:

Сообщение от Naydav

...и удали
Цитата://заголовки
if(substr_count($_SERVER['HTTP_USER_AGENT'], 'MSIE'))
{header('Content-type: text/html; charset=utf-8');}
else
{header('Content-type: application/xhtml+xml; charset=utf-8');}

header('Cache-control: no-cache');...

это не суть сейчас важно.. заголовки уберу... сейчас надо с записью разобраться...

Цитата:

это не суть сейчас важно.. заголовки уберу... сейчас надо с записью разобраться...

Нужно убрать, что б ошибку в браузер не "выдавало"

Рабочий код:

Цитата:

<?

error_reporting(0);
ini_set('user_agent',$_SERVER['HTTP_USER_AGENT']);

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

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

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

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

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

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

//номер страницы
$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(substr_count($_SERVER['HTTP_USER_AGENT'], 'MSIE'))
{header('Content-type: text/html; charset=utf-8');}
else
{header('Content-type: application/xhtml+xml; charset=utf-8');}

header('Cache-control: no-cache');*/

//выводим верх страницы (html код, выносим за <?php

$text = '<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html PUBLIC "-//WAPFORUM//DTD XHTML Mobile 1.0//EN" "http://www.wapforum.org/DTD/xhtml-mobile10.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="ru">
<head>
<title>'.$_SERVER['HTTP_HOST'].'</title>
</head>
<body>';

//выводим цитаты
if($all)
{
for($i=$start; $i<$start+$pnumber; $i++)
{$text .= ''.$dat[1][$i].' '.str_replace(' ',' ',iconv('windows-1251','utf-8',$content[1][$i])).'';}

//навигация
$text .= '';

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

$text .= '';
}
else
{echo 'ыыыы.... нет ничего';}

$text .= '</body></html>';

$f = fopen("text.txt", "w");
fwrite($f, $text);
fclose($f);

?>

Код 100% рабочий, если у тебя не получиться, смотри права на запись(может ли твой скрипт создавать файлы)
рузультат выложить?

Цитата:

Покажи что у тебя вышло?
Писать пишет, но на выводе пусто...
+ код перезаписывается, а надо ДОписывать новые а не перезаписывать старые... Что то я туплю наверное...

Цитата:

+ код перезаписывается, а надо ДОписывать новые а не перезаписывать старые

Замени $f = fopen("text.txt", "w"); на $f = fopen("text.txt", "a");
'a' - Открывает файл только для записи; помещает указатель в конец файла. Если файл не существует - пытается его сздать

Цитата:

Покажи что у тебя вышло?

Содержимое файла text.txt, которое меняеться взависимости от переданной переменной $page

Цитата:

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html PUBLIC "-//WAPFORUM//DTD XHTML Mobile 1.0//EN" "http://www.wapforum.org/DTD/xhtml-mobile10.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="ru">
<head>
<title>edukation.com.ua</title>
</head>
<body>Thu, 19 Jun 2008 13:30:39 +0400 Вот скажите, нахрена в "Битве Экстрасенсов" называют победителей? Чо ж это за экстрасенсы, которые не могут прочитать, что внутри конверта? Надо так - собрались, вышел Пореченков, один обрадовался, другой тупо развернулся и ушел!Thu, 19 Jun 2008 13:30:01 +0400 <Sgt. Joker> Ну ёб твайу мать, пля почему русские не научатся снимать фильмы?? почаму?? <xxxx>ну и какой фильм ты на этот раз посмотрел? <Sgt. Joker> Дерзкие дни, балять.. <xxxx>ОМГ, чую недоброе.. <Sgt. Joker> особенно меня, как рукопашника, порадовал момент когда тощий пацанёнок голыми руками и криком ки-я поклал дюжину качков с битами, храбро и безболезненно стерпев десяток попаданий арматуриной по почкам.. <Sgt. Joker> Невольно вспоминается ответ Стивена Сигала на вопрос, что бы вы сделали если бы на вас напали двое с ножами? <Sgt. Joker> Он грит,у меня 7 дан по айкидо. Вообще, очень мало людей с таким уровнем мастерства, но даже я предпочёл бы убежать.Thu, 19 Jun 2008 12:54:15 +0400 <111> Народ! Дайте чтонибудь над чем я могу поглумится с пояльником и отвёрткой. Я вам чтонибудь полезное соберу! <222> мне тут кое-кто денег должен...Thu, 19 Jun 2008 12:53:01 +0400 JAx (02:24:37 18/06/2008) ЕСТЬ ЛЮДИ С СЕРДЦАМИ ИЗ КАМНЯ,ЕСТЬ КАМНИ С СЕРДЦАМИ ЛЮДЕЙ... JAx (02:24:42 18/06/2008) а я какой ?? Наташка (02:24:53 18/06/2008) ты деревоWed, 18 Jun 2008 22:54:01 +0400 Dar: привет Strelok: привет Dar: как дела? Strelok: как в Шотландии Dar: в смысле Strelok: все в юбках а ебать некого Dar: эммм... я Дарина Strelok: эммм... а я стрелог Dar: это имя ? Strelok: ага Dar: что ага ? Strelok: рубероид говорю дорожает Dar: какой рубероид ? Strelok: в одессе который. Не знаешь почем сейчас ? Dar: нет... Strelok: вот и я незнаю =( а он сцуко дорожает Dar: зачем тебе рубероид ? Strelok: на дережабль наклею Dar: какой дережабль ??? Strelok: который возит сиамских близнецов на планету фрион 2000 Dar: ты с ума сошел ??? Strelok: хм... а ты попробуй дережабль покрыть рубероидом, любой с ума сойдет :LOL: Strelok: приятно было пообщаться Дарина ))) пиши если что Dar: ...ну покаWed, 18 Jun 2008 19:31:01 +0400 Larson фенечка твоя так пахнет приятно.. :-* SeltsamLizzie чем же? Larson духами твоими.. вообще тобой:-* Larson так приятно.. как будто ты счас за спиной стоишь, а волосы твои мне на плечи падают.. :-* SeltsamLizzie заинька...такой ты милый у меня... Larson надо тебе носки мои в сумку подложить, чтоб тоже меня вспоминала;)Wed, 18 Jun 2008 18:55:01 +0400 с пикапфорума robot:Каждый раз после сношения подруга замечает, что у нее немеет кожа живота, то есть теряет чувствительность. Продолжается онемение несколько минут. Это нормально или признак паталогии? При этом месячные задерживаются уже 1,5 месяца. Kryptos:Ты спокойный парень я смотрю,..Wed, 18 Jun 2008 12:27:47 +0400 Пару лет назад дом культуры "Современник" приглашал на семинар с заголовком: "Если ты умный, то почему больной и некрасивый?" Еле удержался чтоб не сходить..)Wed, 18 Jun 2008 12:26:51 +0400 OConnor из википедии: Евгений Иванович Забабахин (16 января 1917 — 27 декабря 1984) — советский учёный-физик, один из создателей ядерного оружия в СССР, академик АН СССР OConnor Блин, вот я чувствовал, что он ядерщик...Wed, 18 Jun 2008 12:26:01 +0400 Fieriya. Сидим после праздничков работаем, вдруг как гром среди ясного неба адский храп новенького сотрудника. Подхожу потолкать.. смотрю последнее, что бедняга успел загуглить «Лекарство от храпа», меняю тихонько в строке поиска надпись на «Лекарств от Лунатизма» рядом кладу железную ножку от сломанного офисного стула полив ее кончик, кетчупом тихонько воссоздав в офисе панораму битвы с инопланетным разумом, все прячемся в соседнем зале, укладываясь в позах трупа. Звоним ему на рабочий. Вид от лица главного героя в его пересказе после (в курилке): DimsonN «блядь, одупляюсь хватаю телефон там уже гудки, цепляю какуйто ***ню железную измазанную в красной дряни. Мне стыдно боюсь повернуться .. думаю мож не заметили, что я дрых.. потом мысль, а сколько я дрых? Глядь на часы на компе. блядь 20 минут.. смотрю надпись Лунатизм.. начинаю тупить.. поворачиваюсь. спросить…а ааа (С) «Ну бля мужики мне хватило и плаката Тимошенко на половину пропущенного в шредере на полу» следующий кадр, вижу сцуко все трубки сняты, и там тишина.. в голове пиздец по сильнее того, что вы устроили в офисе.. особенно когда видишь горизонтально торчащие женские сапоги из ванной и слышны стоны из соседней комнаты… думаю грабили!.. хватаю железо .. с дрожью в коленках иду в зал тихо открываю дверь и когда от туда выпадает рука… и я вижу вас всех скукожанных на полу, и орущих мне «НЕеееТТТ Дима!!! проснисььь Дима это СОН!!! НЕ надо больше!!!» мне настает полный пиздец… [1] <a href="/test.php?page=2">2</a> ... <a href="/test.php?page=10">10</a> </body></html>

Пожалуйста :)