Ok, eigelijk hoort het niet in SA en ik ben ook nog niet zo heel erg goed in php... Maar dit is het script:
PHP:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
| <?PHP
//stnd poort is 8000
if ($port == ""){
$port = "8000";
}
//open een connectie met de server, timout is 5 seconden
$fp = fsockopen($host, $port, $errno, $errstr, 5);
//indien geen connectie
if (!$fp) {
print "Stilte<BR>";
}
//als er wel een connectie is gemaakt, moeten we doen
//alsof we een browser zijn. Daarna gaan we de info van
//de server afhalen en in de array $stream zetten (mbv
//een loopje).
else {
$i = 0;
fputs ($fp, "GET / HTTP/1.1\r\n User-Agent: Mozilla\r\n\r\n");
while ($i < 8) {
$stream[$i] = fgets ($fp, 1024);
$i++;
}
fclose ($fp);
}
$i = 0;
//de server geeft als eerste aan ICY 200 OK als alles goed is.
//Het moet goed zijn, dus als in de eerste waarde van $stream
//die waarde staat, kunnen we de rest
//gaan aanmaken.
if ($stream[0] = "ICY 200 OK"){
$stream_server = str_replace("icy-name:", "", $stream[3]);
$stream_genre = str_replace("icy-genre:", "", $stream[4]);
$stream_url = str_replace("icy-url:", "", $stream[5]);
print "$stream_server<BR>$stream_genre<BR>$stream_url";
}
//mocht dit niet zo zijn, dan moet er ook een berichtje komen
else
{
print "Stilte<BR>";
}
?> |
Aanroepen met dj.php?host=205.188.234.161&port=8030.
Het werkt maar of het mooi is weet ik niet. Maar hou het ontopic
Was ik maar rijk en niet zo knap...
:strip_icc():strip_exif()/u/4167/bacall8.jpg?f=community)
/u/30080/hot-features.png?f=community)
