51

Re: Скрипт срочно

tarasian666, Благодарю за подсказку. С твоей помощью родился такой вот скрипт:

$data = file_get_contents('http://4m.net.ua:8000/status.xsl?mount=/ZED-FM'); 
$data2 = file_get_contents('http://4m.net.ua:8000/status.xsl?mount=/ruskat');
$data3 = file_get_contents('http://62.149.27.186:8000/status.xsl?mount=/live');

function antara($string, $start, $end){
$string = " ".$string;
$ini = strpos($string,$start);
if ($ini == 0) return "";
$ini += strlen($start);
$len = strpos($string,$end,$ini) - $ini;
return substr($string,$ini,$len);
}
$data = iconv("utf-8", "cp1251", $data);
$title = antara($data, "Stream Title:</td>\n<td class=\"streamdata\">","</td>");
$description = antara($data, "Stream Description:</td>\n<td class=\"streamdata\">","</td>");
$content_type = antara($data, "Content Type:</td>\n<td class=\"streamdata\">","</td>");
$Mount_started = antara($data, "Mount started:</td>\n<td class=\"streamdata\">","</td>");
$Bitrate = antara($data, "Bitrate:</td>\n<td class=\"streamdata\">","</td>");
$Current_listeners = antara($data, "Current Listeners:</td>\n<td class=\"streamdata\">","</td>");
$Peak_listeners = antara($data, "Peak Listeners:</td>\n<td class=\"streamdata\">","</td>");
$Stream_genre = antara($data, "Stream Genre:</td>\n<td class=\"streamdata\">","</td>");
$Stream_url = antara($data, "Stream URL:</td>\n<td class=\"streamdata\">","</td>");
$Current_song = antara($data, "Current Song:</td>\n<td class=\"streamdata\">","</td>");
//========якщо маунтів декілька============//
$Current_listeners2 = antara($data2, "Current Listeners:</td>\n<td class=\"streamdata\">","</td>");
$Peak_listeners2 = antara($data2, "Peak Listeners:</td>\n<td class=\"streamdata\">","</td>");
//-----------------//
$data3_curr_listeners = antara($data2, "Current Listeners:</td>\n<td class=\"streamdata\">","</td>");
$data3_peak_listeners = antara($data2, "Peak Listeners:</td>\n<td class=\"streamdata\">","</td>");
//======сумуємо в загальну кількість слухачів та піки=======//
$Curr_listens=$Current_listeners2+$Current_listeners+$data3_curr_listeners;
$Peak_listens=$Peak_listeners2+$Peak_listeners+$data3_peak_listeners;

$staylst=$Curr_listens+1;
echo ''.$title.' <br> '.$description.' <br> '.$content_type.' <br> '.$Mount_started.' <br> '.$Bitrate.'  <br> '.$Curr_listens.' <br> '.$Peak_listens.' <br>  '.$Stream_genre.' <br>  '.$Stream_url.' <br>  '.$Current_song.' <br><br>Слухачі по маунтам <br>
Маунт-1: зараз '.$Current_listeners.', всього '.$Peak_listeners.'.<br>
Маунт-2: зараз '.$Current_listeners2.', всього '.$Peak_listeners2.'.<br>
Маунт-3: зараз '.$data3_curr_listeners.', всього '.$data3_peak_listeners.'.<br>
';

А как еще бы реализовать, вывод АЙПИ июзер-агента?

Сайт и плейлист радио ZED-FM.

52

Re: Скрипт срочно

Ruskat молодець, всі б так ))


насчет ip - надо парсить admin/listclients.xsl?mount=/{mount}
доступ на страницу как на ftp - логин:пароль@ip:port

53

Re: Скрипт срочно

tarasian666? а именно http://логин:пароль@IP:port.
Каким кодом выводить список юзер-агентов, а не один, и список всех активных маунтов в айсе?

Сайт и плейлист радио ZED-FM.

54

Re: Скрипт срочно

список юзер-агентов и так выводится таблицой,
список всех маунтов - listmounts.xsl

55

Re: Скрипт срочно

tarasian666, немножко по другому...

$data = file_get_contents('http://логин:пароль@сервер:8000/admin/listclients.xsl?mount=/ZED-FM'); 

function antara($string, $start, $end){
$string = " ".$string;
$ini = strpos($string,$start);
if ($ini == 0) return "";
$ini += strlen($start);
$len = strpos($string,$end,$ini) - $ini;
return substr($string,$ini,$len);
}
$data = iconv("utf-8", "cp1251", $data);
$data = antara($data, "<table border=\"0\" cellpadding=\"1\" cellspacing=\"5\" bgcolor=\"444444\"><tr><td align=\"center\">","</tr>\n</table>");
//$data = substr_replace (Action, "5", $data); 
$data=preg_replace('|<a[^>]+>([^<]+)</a>|ism',' ',$data); 

echo ''.$data.'
';

С обрезанием ссылок. Тока вот не могу ячейку Action удалить.
Как мона сделать вывод страниц, типа как тут    http://fmhosting.ru/index.php?do=static … io_stancii   ?

Сайт и плейлист радио ZED-FM.

56

Re: Скрипт срочно

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

57

Re: Скрипт срочно

Ruskat? Спасибо скрипт просто класс работает как нужно! Я ещё под себя настроил! smile

58

Re: Скрипт срочно

tarasian666, а как поставить условие, что если сервер или несколько не работают по тех-причинам, то выдавало бы из того, что работает, или же в низу чтобы выводить надпись, что сервер ******* не работает?

Сайт и плейлист радио ZED-FM.

59

Re: Скрипт срочно

пишет tarasian666:

<?PHP
$data = file_get_contents("http:/ip:port/status2.xsl?mount=/ваш_маунт");
$mass = explode(",",$data);
$title = $mass[16];
$listeners = $mass[14];
echo "сейчас играет: ".$title." слушают: ".$listeners;
?>

Привет, подскажи как скриптом можно вывести общее кол-во слушателей по нескольким каналам, которые находятся на разных серверах

60

Re: Скрипт срочно

ElectroNik, в посте #51 изображено именно то, что тебе нужно. Даже общий подсчёт слушателей прилагается smile

Сайт и плейлист радио ZED-FM.

61

Re: Скрипт срочно

пишет Ruskat:

ElectroNik, в посте #51 изображено именно то, что тебе нужно. Даже общий подсчёт слушателей прилагается smile

ой, я и не заметил ))) спасибо

Добавлено: что то он у меня не показывает, пусто...

Ещё добавлено: Всё разобрался

Отредактировано ElectroNik (20-08-2010 22:12:57)

62

Re: Скрипт срочно

пишет tarasian666:

вот пример, выводит название станции (куда зачастую пишут имя диджея)

<?PHP
$data = file_get_contents('http://IP:PORT/status.xsl?mount=/ваш_маунт'); 
function antara($string, $start, $end){
$string = " ".$string;
$ini = strpos($string,$start);
if ($ini == 0) return "";
$ini += strlen($start);
$len = strpos($string,$end,$ini) - $ini;
return substr($string,$ini,$len);
}
echo antara($data, "Stream Title:</td>\n<td class=\"streamdata\">","</td>");
?>

дальше колупайте сами )

Растащил скрипт так что каждый параметр в своей переменной.

Re: Скрипт срочно

Я хотел бы вернуться к вопросу с отображением on-air DJ на сайте...
Вещание IceCast + RadioCms

есть возможность организовать?

Сам придумал или из гугла скопировал?
========================================================================
FMGAMERADIO.RU - Уж както стараемся выделится big_smile

64

Re: Скрипт срочно

тоесть тупо вывод картинки кто в эфире? я могу сделать)

Re: Скрипт срочно

пишет metra52:

тоесть тупо вывод картинки кто в эфире? я могу сделать)

Напиши в ICQ 3006317 или ты у меня вроде есть smile

Сам придумал или из гугла скопировал?
========================================================================
FMGAMERADIO.RU - Уж както стараемся выделится big_smile

66

Re: Скрипт срочно

В общем дабы не создавать новую тему напишу тут может кто подскажет:
Взял скрипт выложенный tarasian666 все работает на ура, но возникла проблема: Когда в эфире никого нет играет нон стоп, нужно чтобы данные в скрипте брались с канала нон стоп а то когда основной канал не работает пишет что ничего не играет может кто то чтото подскажет?

67

Re: Скрипт срочно

Скрипты для Icecast

68

Re: Скрипт срочно

берете какую либо переменную допустим рассматриваем данные из переменной выводящей Description если $Description = ""; тогда выводить данные с нон стопа

Re: Скрипт срочно

знал бы как именно, не спрашивал бы тут... не все евгении

Отредактировано Всё-просто (08-12-2010 08:17:27)

Сам придумал или из гугла скопировал?
========================================================================
FMGAMERADIO.RU - Уж както стараемся выделится big_smile