Скрипты для Icecast

1. <?php
2. set_time_limit(10); //если за 10 секунд скрипт не завершится, то будет прекращен принудительно
3. require('Scrobbler.php'); //php-скробблер
4. $xml[1] = "http://ourdomain:port/live.xspf";
5. $xml[2] = "http://ourdomain:port/fallback1.xspf";
6. $xml[3] = "http://ourdomain:port/fallback2.xspf";
7. //маунты, которые собираемся скробблить, по порядку - от верхнего к фоллбекам
9. //парсим по очереди все маунты, пока не дойдем до последнего.
10. $i = 1;
11. $stream['descr'] = '';
12. while($stream['descr'] =='')
13. {
14. $xml1 = simplexml_load_file($xml[$i]);
15. //обращение к xspf файлу текущего потока
16. $stream['creator'] = $xml1->trackList->track->creator;
17. //выбираем значение из <trackList><track><creator> - исполнитель
18. $stream['title'] = $xml1->trackList->track->title;
19. //выбираем значение из <trackList><track><title> - название трека
20. $ano = $xml1->trackList->track->annotation;
21. //выбираем значение из <trackList><track><annotation>
22. $mss=explode("\n", $ano);
23. //разбиваем знаечение на масив (т.к. там много чего а нам надо тока строку "Stream Description")
24. $stream['descr']=substr($mss[1],20);
25. $i ++;
26. if ($i>3) break; //цифра - количество наших маунтов минус один. если нужно парсить только первые два или один,
27. //то вместо "3" пишем соответственно "2" или "1"
28. }
30. //читаем данные о исполнителе и песне из last.xml
31. $lastfm = "http://ourdomain/last.xml"; //last.xml - файл, куда записывается текущая песня
32. $lastxml = simplexml_load_file($lastfm);
33. $last['creator'] = $lastxml->creator;
34. $last['title'] = $lastxml->title;
35. if ((strcmp ($last['title'], $stream['title'])) != 0 or (strcmp ($last['creator'], $stream['creator'])) != 0)
36. //сравниваем данные last.xml с только что полученными данными. если отличается, то:
37. {
38. //отправляем новые значения на last.fm
39. $scrobbler = new md_Scrobbler('lastfm_user', 'lasfm_password'); //наш логин и пароль от last.fm
40. $scrobbler->add($stream['creator'], $stream['title'], '', 6000);
41. $scrobbler->submit();
42. //и записываем их в last.xml
43. $stream['creator'] = htmlspecialchars($stream['creator'], ENT_NOQUOTES);
44. $stream['title'] = htmlspecialchars($stream['title'], ENT_NOQUOTES);
45. $txtout="<?xml version='1.0' encoding='UTF-8'?>\r\n<last>\r\n<creator>".$stream['creator']."</creator>\r\n<title>".$stream['title']."</title>\r\n</last>";
46. $fp = fopen ("/home/user/domains/domains/public_html/last.xml", "w");
47. //путь к файлу last.xml можно прописать как локальный, так и http://
48. fclose($fp);
49. }
50. ?>

<?php

//1 Сервер

$ip = ""; //ваш ай пи или домен
$port = ""; //ваш порт
$ice2_station = ""; // название вашей станции

$fp = fsockopen( "$ip", $port, &$errno, &$errstr, 3); //open connection
if(!$fp) {
$success=2; //set if no connection

echo'<table width="100%">
<tr align="center">
<td width="100%" >
<font face="Arial" size="2" color="#FF0000"><strong>Cервер '.$ice2_station.' не работает!</strong></font></b></td>
</tr>
</table>';
}

if($success!=2){ //if connection
fputs($fp,"GET /status2.xsl?mount=/live HTTP/1.0\r\nUser-Agent: Icecast2 XSL Parser (Mozilla Compatible)\r\n\r\n"); //get status2.xsl
while(!feof($fp)) {
$page .= fgets($fp, 1000);
}
fclose($fp); //close connection
$page = ereg_replace(".*<pre>", "", $page); //extract data
$page = ereg_replace("</pre>.*", ",", $page); //extract data

$numbers = explode(",",$page); //bomb it and extract data


$listeners = $numbers[1];
$listeners = $numbers[14];

}


?>
<?php

//2 Сервер

$ip = ""; //ваш ай пи или домен
$port = ""; //ваш порт
$ice2_station = ""; // название вашей станции

$fp = fsockopen( "$ip", $port, &$errno, &$errstr, 3); //open connection
if(!$fp) {
$success=2; //set if no connection

echo'<table width="100%">
<tr align="center">
<td width="100%" >
<font face="Arial" size="2" color="#FF0000"><strong>Cервер '.$ice2_station.' не работает!</strong></font></b></td>
</tr>
</table>';
}

if($success!=2){ //if connection
fputs($fp,"GET /status2.xsl?mount=/live HTTP/1.0\r\nUser-Agent: Icecast2 XSL Parser (Mozilla Compatible)\r\n\r\n"); //get status2.xsl
while(!feof($fp)) {
$page .= fgets($fp, 1000);
}
fclose($fp); //close connection
$page = ereg_replace(".*<pre>", "", $page); //extract data
$page = ereg_replace("</pre>.*", ",", $page); //extract data

$numbers = explode(",",$page); //bomb it and extract data


$listeners2 = $numbers[1];
$listeners2 = $numbers[14];

}


?>
<?php

//3 Сервер

$ip = ""; //ваш ай пи или домен
$port = ""; //ваш порт
$ice2_station = ""; // название вашей станции

$fp = fsockopen( "$ip", $port, &$errno, &$errstr, 3); //open connection
if(!$fp) {
$success=2; //set if no connection

echo'<table width="100%">
<tr align="center">
<td width="100%" >
<font face="Arial" size="2" color="#FF0000"><strong>Cервер '.$ice2_station.' не работает!</strong></font></b></td>
</tr>
</table>';
}

if($success!=2){ //if connection
fputs($fp,"GET /status2.xsl?mount=/live HTTP/1.0\r\nUser-Agent: Icecast2 XSL Parser (Mozilla Compatible)\r\n\r\n"); //get status2.xsl
while(!feof($fp)) {
$page .= fgets($fp, 1000);
}
fclose($fp); //close connection
$page = ereg_replace(".*<pre>", "", $page); //extract data
$page = ereg_replace("</pre>.*", ",", $page); //extract data

$numbers = explode(",",$page); //bomb it and extract data


$listeners3 = $numbers[1];
$listeners3 = $numbers[14];

}


?>

<?

$pog=($listeners+$listeners2+$listeners3);

echo'
<table width="100%" style="border-collapse: collapse" cellpadding="0" cellspacing="0">

<tr>
<td width="100%" align="center" ><b><font face="Arial" size="2">

<p align="left">В данный момент нас слушает '.$pog.' человек.(не включая ретрасляторы)</font></b></td></p>
</tr>

</table>';


?>

//данные для парсинга плейлистов для получения текущего исполнителя и песни и описания потока
//записываем их в таком порядке: сперва прямой эфир, потом фоллбэки
//можно написать их здесь сколько угодно
$xml[0] = "**********";
$xml[1] = "**********";
$xml[2] = "**********";

//считаем сколько у нас маунтов с которых берем теги
$xmls = count($xml);

}

include "max.php"; //для отображения пикового значения слушателей
if ($listens>$max)
{
$txtout="<?php\r\n".'$max='.$listens. ";\r\n?>";
$fp = fopen ("max.php", "w");
fwrite($fp,$txtout);
fclose($fp);
$max=$listens;
}

<?php
//данные для парсинга слушателей всех маунтов
//можно написать их здесь сколько угодно
$mount[0] = 'http://stream2..ru:8000/status2.xsl?mount=/radio';
$mount[1] = 'http://stream2..ru:8000/status2.xsl?mount=/r';
$mount[2] = 'http://94.73..:8000/status2.xsl?mount=/r';

//считаем сколько у нас маунтов с которых считаем слушателей
$mounts = count($mount);

//считаем всех слушателей
$i = 0;
while($i<$mounts)
{
$text= file_get_contents($mount[$i]);
$mass=explode(",", $text);
$listens += $mass [14];
$i ++;
}


include "max.php"; //для отображения пикового значения слушателей
if ($listens>$max)
{
$txtout="<?php\r\n".'$max='.$listens. ";\r\n?>";
$fp = fopen ("max.php", "w");
fwrite($fp,$txtout);
fclose($fp);
$max=$listens;
}

// echo $stream['creator'] . " - "; // вывод имени исполнителя
// echo $stream['title'] . "<br>"; //вывод названия песни
echo "Слушателей: ".$listens . "<br>"; //вывод кол-ва слушателей
echo "Max listens: ".$max . "<br>"; //вывод пикового к-ва слушателей, раскомментировать, если нужен
// echo $stream['descr'] . "<br>"; //вывод описания текущего потока
?>