function xmlrpc2php($d) { if ($d->kindOf() == "scalar") { return $d->scalarval(); } elseif ($d->kindOf() == "array") { $a = array(); for ($i = 0; $i < $d->arraysize(); $i++) { $a[$i] = XML_RPC_PLN::xmlrpc2php($d->arraymem($i)); } return $a; } elseif ($d->kindOf() == "struct") { $a = array(); while (list($k, $v) = $d->structeach()) { $a[$k] = XML_RPC_PLN::xmlrpc2php($v); } return $a; } //error ? return ""; }
function IRS_xmlrpc_getInfo($params) { global $IRS; $IRS->requireAuth(); $p = $params->getParam(0); $r1 = XML_RPC_PLN::xmlrpc2php($p); return new XML_RPC_Response($IRS->getTrackXMLRPCbyArray($r1)); }
$rated_tracks = XML_RPC_PLN::xmlrpc2php($rep->value()); echo "<!-- XMLRPC CALL : \n" . $msg->serialize() . "\n -->"; //debug //for each rated track, get metadata for ($i = 0; $i < count($rated_tracks); $i++) { $tracks_ids[$i] = array("id" => $rated_tracks[$i]["id"]); } $msg = new XML_RPC_Message("irate.getInfo", array(XML_RPC_PLN::php2xmlrpc($tracks_ids))); $rep = $XMLRPC->send($msg); $tracks_metadata = XML_RPC_PLN::xmlrpc2php($rep->value()); echo "<!-- XMLRPC CALL : \n" . $msg->serialize() . "\n -->"; //debug //ask for one new track $msg = new XML_RPC_Message("irate.getNew", array(XML_RPC_PLN::php2xmlrpc(array("n" => 1)))); $rep = $XMLRPC->send($msg); $new_track = XML_RPC_PLN::xmlrpc2php($rep->value()); echo "<!-- XMLRPC CALL : \n" . $msg->serialize() . "\n -->"; //debug //that's it ! now we only need to display the tracks. ?> <table border=1> <tr> <th>Track name</th> <th>Artist name</th> <th>Crediturl</th> <th>Duration</th> <th>Rated</th> <th>Rate again ?</th> </tr>