Reference: Added Mt Rpc Client/Server

git-svn-id: svn://ultimatepp.org/upp/trunk@5556 f0d560ea-af0d-0410-9eb7-867de7ffcac7
This commit is contained in:
unodgs 2012-11-17 15:58:35 +00:00
parent 2087db62fb
commit a9b5a6d19c
6 changed files with 195 additions and 0 deletions

View file

@ -0,0 +1,34 @@
#include <Core/Core.h>
#include <Core/Rpc/Rpc.h>
using namespace Upp;
void GetClientList(int i)
{
INTERLOCKED { LOG("=>> GetClientList(" << i << ")"); }
ValueArray result;
XmlRpcRequest call("127.0.0.1:1234");
if(call("GetClientList") >> result)
{
INTERLOCKED { LOG("Message received " << i); }
}
else
{
INTERLOCKED { LOG("Error: " << call.GetError()); }
}
INTERLOCKED { LOG("<<= GetClientList(" << i << ")"); }
}
CONSOLE_APP_MAIN
{
StdLogSetup(LOG_COUT|LOG_FILE);
CoWork co;
for(int i = 0; i < 20; i++)
{
co & callback1(GetClientList, i);
}
}