Tag Archive: xmlrpc

XMLRPC example in PHP

Posted May.26, 2010 under Architecture, Programming

$param=array(“user”=>”test_user”,”host”=>”example.com”,”password”=>”some_password”);
$request = xmlrpc_encode_request(‘check_password’, $param, (array(‘encoding’ => ‘utf-8′)));

$context = stream_context_create(array(‘http’ => array(
‘method’ => “POST”,
‘header’ => “Content-Type: text/xml\r\n” .
“Content-Length: “.strlen($request),
‘content’ => $request
)));

$file = file_get_contents(“http://127.0.0.1:1234/RPC2″, false, $context);

$response = xmlrpc_decode($file);

if (xmlrpc_is_fault($response)) {
print_r(“error”);
} else {
print_r($response);
}

Tags: ,
1 Comment

Erlang xmlrpc example

Posted May.26, 2010 under Architecture, Programming

Library: xmlrpc-1.13
But this library does not support domain, only support IP address,
so do the following hacking:

send(Socket, URI, Header, Payload) ->
[Host,_URI] = URI,
Request = ["POST ", _URI, " HTTP/1.1\r\n", "Host: ", Host,"\r\n",
"Content-Length: ", integer_to_list(lists:flatlength(Payload)), "\r\n",
"User-Agent: Erlang XML-RPC Client 1.13\r\n",
"Content-Type: text/xml\r\n",
Header, "\r\n",
Payload],
gen_tcp:send(Socket, Request).

Then you can call xmlrpc as:

xmlrpc:call("dev.test.com", 80,
["dev.test.com", "/services/xmlrpc"],
{call, METHORD, [Args]}).

Tags: ,
1 Comment