build/testcases/xmlrpc-metaWeblog-getRecentPosts.php

   1 <?php
   2 /*
   3         Test call to the nucleus XML-RPC server sending a metaWeblog.getRecentPosts request
   4
   5         Wouter Demuynck / 2003-08-31
   6 */
   7
   8 // URL of XML-RPC server
   9 $serverHost = 'localhost';
  10 $serverPort = 8080;
  11 $serverPath = '/nucleus/nucleus/xmlrpc/server.php';
  12
  13 include('../../config.php');
  14 include($DIR_LIBS . 'xmlrpc.inc.php');
  15
  16 $f=new xmlrpcmsg(
  17         'metaWeblog.getRecentPosts',
  18          array(
  19                 new xmlrpcval('1', 'string'),                   // blogid
  20                 new xmlrpcval('example', 'string'),                     // username
  21                 new xmlrpcval('example', 'string'),             // password
  22                 new xmlrpcval('5', 'int')                       // amount to get
  23          )
  24  );
  25
  26
  27   $c=new xmlrpc_client($serverPath, $serverHost, $serverPort);
  28   $c->setDebug(1);
  29   $r=$c->send($f);
  30   $v=$r->value();
  31
  32
  33   if (!$r->faultCode()) {
  34         echo 'success!';
  35   } else {
  36       print "Fault: ";
  37       print "Code: " . $r->faultCode() .
  38             " Reason '" .$r->faultString()."'<BR>";
  39   }
  40
  41
  42
  43 ?>