3.1 jp cvs version

[nucleus-jp/nucleus-jp-ancient.git] / utf8 / build / testcases / xmlrpc-mt-setPostCategories.php

diff --git a/utf8/build/testcases/xmlrpc-mt-setPostCategories.php b/utf8/build/testcases/xmlrpc-mt-setPostCategories.php
new file mode 100755 (executable)
index 0000000..b00dd67
--- /dev/null
+++ b/utf8/build/testcases/xmlrpc-mt-setPostCategories.php
@@ -0,0 +1,68 @@
+<?php\r
+/*\r
+       Test call to the nucleus XML-RPC server sending a mt.setPostCategories request\r
+       \r
+       Wouter Demuynck / 2003-09-01\r
+*/\r
+\r
+// URL of XML-RPC server\r
+$serverHost = 'localhost';\r
+$serverPort = 8080;\r
+$serverPath = '/nucleus/nucleus/xmlrpc/server.php';\r
+       \r
+include('../../config.php');\r
+include($DIR_LIBS . 'xmlrpc.inc.php');\r
+\r
+$f=new xmlrpcmsg(\r
+       'mt.setPostCategories',\r
+        array(\r
+               new xmlrpcval('2', 'string'),                   // itemid\r
+               new xmlrpcval('god', 'string'),                 // username\r
+               new xmlrpcval('heaven', 'string'),              // password\r
+               new xmlrpcval(\r
+                       array(                                  \r
+                               new xmlrpcval(\r
+                                       array(\r
+                                               'categoryId' => new xmlrpcval('Test','string')\r
+                                       ),\r
+                                       'struct'\r
+                               )\r
+/*                             ,\r
+                               new xmlrpcval(\r
+                                       array(\r
+//                                             'isPrimary' => new xmlrpcval(1, 'boolean'),\r
+                                               'categoryId' => new xmlrpcval('newcat1','string')\r
+                                       ),\r
+                                       'struct'\r
+                               ),\r
+                               new xmlrpcval(\r
+                                       array(\r
+                                               'categoryId' => new xmlrpcval('General','string')\r
+                                       ),\r
+                                       'struct'\r
+                               )                       \r
+*/                             \r
+                       ),              \r
+                       'array'\r
+               )\r
+        )\r
+ );\r
+        \r
+       echo 'ready';\r
+  $c=new xmlrpc_client($serverPath, $serverHost, $serverPort);\r
+  $c->setDebug(1);\r
+  $r=$c->send($f);\r
+  $v=$r->value();\r
+\r
+\r
+  if (!$r->faultCode()) {\r
+       echo 'succes!';\r
+  } else {\r
+      print "Fault: ";\r
+      print "Code: " . $r->faultCode() . \r
+            " Reason '" .$r->faultString()."'<BR>";\r
+  }\r
+       \r
+\r
+       \r
+?>
\ No newline at end of file