Merge continued

git-svn-id: svn://ultimatepp.org/upp/trunk@10263 f0d560ea-af0d-0410-9eb7-867de7ffcac7

uppdev/XmlRpc/XmlRpcClient.cpp

@@ -0,0 +1,87 @@
+#include "XmlRpc.h"
+/**
+* constructor. constructs just a new client.
+*/
+XmlRpcClient::XmlRpcClient() {
+	usessl=false;
+}
+/**
+* constructor, setting host, path and port. constructs a new client and sets the host (either
+* a name or an ip address), its path and port to connect to later on.
+* @param host the hostname or ip address of the server to contact later
+* @param path the path of the eg. php file that answers the calls
+* @param port the portnumber to connect to
+* @see Execute()
+*/
+XmlRpcClient::XmlRpcClient(String host, String path, int port) {
+	usessl=false;
+	Host(host);
+	Path(path);
+	Port(port);
+};
+/*
+HttpClient& XmlRpcClient::Get() {
+	return http;
+};
+*/
+/**
+* set the host to connect to. set the host to connect to during method call.
+* @param h the hostname or ip address of the server
+*/
+XmlRpcClient& XmlRpcClient::Host(String h) {
+	http.Host(h);
+	return *this;
+}
+/**
+* set the path of the server. set the path of the server to connect to during method call.
+* @param p the path of the server eg "/xmlserver/index.php"
+*/
+XmlRpcClient& XmlRpcClient::Path(String p) {
+	http.Path(p);
+	return *this;
+}
+/**
+* set the port to connect to. set the tcp-port to connect to during method call.
+* @param p the tcp-port of the server
+*/
+XmlRpcClient& XmlRpcClient::Port(int p) {
+	http.Port(p);
+	return *this;
+}
+
+/**
+* execute a method call. execute the methodcall passed as argument.
+* @param call the method to call at the given server, path and port.
+* @see Host(), Path(), Port(), XmlRpcCall
+*/
+Value XmlRpcClient::Execute(const XmlRpcCall& call) {
+	String request, xml;
+
+	http.ClearHeaders();
+	xml = call.ToXml();
+	request << "User-Agent: Ultimate++ XML-RPC 1.0\r\n";
+	request << "Host: "<<http.host<<"\r\n";
+	request << "Content-Length: "<< (int) xml.GetLength()<<"\r\n";
+	request << "Content-Type: text/xml\r\n\r\n";
+	http.Post();
+	http.std_headers = false;
+	http.Headers(request);
+	http.AddHeaders(xml);
+
+	rawReply.Clear();
+	if(usessl) {
+		if(sslcontext.IsEmpty()) {
+			SSL_METHOD *meth=TLSv1_client_method();
+			sslcontext.Create(meth);
+			sslcontext.VerifyPeer(false);
+		}
+		if(!SSLClientSocket(http.socket,sslcontext,http.host,http.port))
+			return ErrorValue("SSL connection failed");
+	}
+	rawReply = http.Execute();
+
+	if(http.GetStatusCode() == 200) {
+		return xmlReply.ParseMethodResponse(rawReply);
+	}
+	return ErrorValue(NFormat("http status-code != 200 (%d)",http.GetStatusCode()));
+};