Req for Shoutcast Stats mod

b-side · 11.05.2004, 20:20

I am going to see if I can do this myself but I am not a coder and always seem to generate more errors than results. I thought I would see if someone would know of a way to have my shoutcast stats appear in the menu to let my visitors see what is playing and how many are connected. I am trying to use other PHP scripts I found that are supposed to parse Shoutcast's XML but none are woking for me so far.

b-side · 12.05.2004, 19:59

Success! I have even made it into a mod but waiting for author's permission before releasing it. Anyone see anything wrong with this code for use inside Mambo. I am not a coder so I can't see any potention issues. Any advice would be appreciated!

<?php
// Shoutcast Server Stats
// Parses shoutcasts xml to make an effective stats thing for any website
// hardcore coded by daniel brown aka xbrowniex ©www.gmtt.co.uk 2003.
defined( '_VALID_MOS' ) or die( 'Direct Access to this location is not allowed.' );
include('modules\config_shoutcast.php'); //you may edit this path to fit your server environment otherwise leave it alone
$scfp = fsockopen("$scip", $scport, &$errno, &$errstr, 30);
if(!$scfp) {
$scsuccs=1;
echo''.$scdef.' is Offline';
}
if($scsuccs!=1){
fputs($scfp,"GET /admin.cgi?pass=$scpass&mode=viewxml HTTP/1.0\r\nUser-Agent: SHOUTcast Song Status (Mozilla Compatible)\r\n\r\n");
while(!feof($scfp)) {
$page .= fgets($scfp, 1000);
}
################################################## ################################################## ##################
/////////////////////////part 1 \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
//define xml elements
$loop = array("STREAMSTATUS", "BITRATE", "SERVERTITLE", "CURRENTLISTENERS");
$y=0;
while($loop[$y]!=''){
$pageed = ereg_replace(".*<$loop[$y]>", "", $page);
$scphp = strtolower($loop[$y]);
$$scphp = ereg_replace("</$loop[$y]>.*", "", $pageed);
if($loop[$y]==SERVERGENRE || $loop[$y]==SERVERTITLE || $loop[$y]==SONGTITLE || $loop[$y]==SERVERTITLE)
$$scphp = urldecode($$scphp);

// uncomment the next line to see all variables
//echo'$'.$scphp.' = '.$$scphp.' ';
$y++;
}
//end intro xml elements
################################################## ################################################## ##################
################################################## ################################################## ##################
/////////////////////////part 2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
//get song info and history
$pageed = ereg_replace(".*<SONGHISTORY>", "", $page);
$pageed = ereg_replace("<SONGHISTORY>.*", "", $pageed);
$songatime = explode("<SONG>", $pageed);
$r=1;
while($songatime[$r]!=""){
$t=$r-1;
$playedat[$t] = ereg_replace(".*<PLAYEDAT>", "", $songatime[$r]);
$playedat[$t] = ereg_replace("</PLAYEDAT>.*", "", $playedat[$t]);
$song[$t] = ereg_replace(".*<TITLE>", "", $songatime[$r]);
$song[$t] = ereg_replace("</TITLE>.*", "", $song[$t]);
$song[$t] = urldecode($song[$t]);
$dj[$t] = ereg_replace(".*<SERVERTITLE>", "", $page);
$dj[$t] = ereg_replace("</SERVERTITLE>.*", "", $pageed);
$r++;
}
//end song info

fclose($scfp);
}

//display stats
if($streamstatus == "1"){
//you may edit the html below, make sure to keep variable intact
echo'
Listeners: '.$currentlisteners.' / 4
Current Song: 
 '.$song[0].'
Past Songs: 
 '.$song[1].' 
 '.$song[2].' 
 '.$song[3].' 
 '.$song[4].' 
 '.$song[5].'
<a href="Playlist URL HERE" target="_blank">Tune In!</a>';
}
?>

sh33zo · 26.06.2004, 21:16

Could you guys post an url with this module working?
I would like to see what it does.

I have use this simple php script that I found on this forum.
http://www.kription.com/forums/viewforum.php?forum=1
simple.php
I've been using it since ladt year and it's working great!
checkit out!
http://sh33zo.net

Please post some demo site for this module.
Thankz

tchilly · 30.09.2004, 14:12

anyone got a working shoutcast module for 4.5.1 ? Need it bad... plz post a link or sumething...

drue · 01.10.2004, 01:50

Working on one from scratch (not relying on others code, so there's no need for permissions). I'm also hoping to make it cleaner, more customizable, and be able to display album covers if the song playing is not indie and thus has one available.

It'll probably take me a couple days as I'm going to use the new DOMIT Lite XML to process the information from shoutcast and I'm not really familiar with the setup. If you have any feature requests, let me know.

tchilly · 01.10.2004, 16:09

just the usual.

online/offline
song playing right now..
10 last songs
and a tune in button..

mbi · 31.01.2005, 02:09

http://www.mambowizard.com/showthread.php?t=79

Everlast · 18.04.2005, 20:00

hi there,

you can find a simple shoutcast module (nnShoutCast) working with mambo 4.5.x on www.naanuu.net

Enjoy it!

Greetz Everlast