You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

58 lines
1.6 KiB

<?php
// (c) Copyright by authors of the Tiki Wiki CMS Groupware Project
//
// All Rights Reserved. See copyright.txt for details and a complete list of authors.
// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
// $Id$
function wikiplugin_myspace_info()
{
return [
'name' => tra('MySpace'),
'documentation' => 'PluginMySpace',
'description' => tra('Display a MySpace Flash mp3 playlist'),
'prefs' => [ 'wikiplugin_myspace' ],
'iconname' => 'music',
'introduced' => 3,
'params' => [
'page' => [
'required' => true,
'name' => tra('MySpace Page'),
'description' => tra('MySpace page name.'),
'since' => '3.0',
'default' => '',
'filter' => 'text',
]
]
];
}
function wikiplugin_myspace($data, $params)
{
extract($params, EXTR_SKIP);
if (! isset($page)) {
return "error page parameter requested";
}
$ch = curl_init("http://www.myspace.com/$page");
//$ch = curl_init("http://www.google.com/");
//curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1);
curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
$data = curl_exec($ch);
curl_close($ch);
if (! $data) {
return "pas d'chance";
}
$a = stripos($data, '<OBJECT id="mp3player" ');
$data = substr($data, $a);
$a = stripos($data, '</OBJECT>');
$data = substr($data, 0, $a + strlen('</OBJECT>'));
$data = str_replace("\n", " ", $data);
$data = str_replace("\r", " ", $data);
return $data;
}