static gboolean _xr_server_serve_request(xr_server* server, xr_server_conn* conn)
{
const char* method;
int version;
xr_trace(XR_DEBUG_SERVER_TRACE, "(server=%p, conn=%p)", server, conn);
g_return_val_if_fail(server != NULL, FALSE);
g_return_val_if_fail(conn != NULL, FALSE);
if (!g_socket_connection_is_connected(conn->conn))
return FALSE;
/* receive HTTP request */
if (!xr_http_read_header(conn->http, NULL))
return FALSE;
/* check if some dumb bunny sent us wrong message type */
if (xr_http_get_message_type(conn->http) != XR_HTTP_REQUEST)
return FALSE;
method = xr_http_get_method(conn->http);
if (method == NULL)
return FALSE;
version = xr_http_get_version(conn->http);
if (!strcmp(method, "GET"))
return _xr_server_serve_download(server, conn) && (version == 1);
else if (!strcmp(method, "POST"))
{
int transport = _ctype_to_transport(xr_http_get_header(conn->http, "Content-Type"));
if (transport >= 0)
{
xr_call* call;
GString* request;
char* buffer;
int length;
gboolean rs;
request = xr_http_read_all(conn->http, NULL);
if (request == NULL)
return FALSE;
/* parse request data into xr_call */
call = xr_call_new(NULL);
xr_call_set_transport(call, transport);
rs = xr_call_unserialize_request(call, request->str, request->len);
g_string_free(request, TRUE);
/* run call */
if (!rs)
xr_call_set_error(call, -1, "Unserialize request failure.");
else
_xr_server_servlet_method_call(server, conn, call);
/* generate response data from xr_call */
xr_call_serialize_response(call, &buffer, &length);
if (xr_debug_enabled & XR_DEBUG_CALL)
xr_call_dump(call, 0);
/* send HTTP response */
xr_http_setup_response(conn->http, 200);
xr_http_set_message_length(conn->http, length);
rs = xr_http_write_all(conn->http, buffer, length, NULL);
xr_call_free_buffer(call, buffer);
xr_call_free(call);
return rs && (version == 1);
}
else
return _xr_server_serve_upload(server, conn) && (version == 1);
}
else
return FALSE;
return TRUE;
}
gboolean xr_client_call(xr_client_conn* conn, xr_call* call, GError** err)
{
char* buffer;
int length;
gboolean rs;
gboolean write_success;
GString* response;
xr_trace(XR_DEBUG_CLIENT_TRACE, "(conn=%p, call=%p)", conn, call);
g_return_val_if_fail(conn != NULL, FALSE);
g_return_val_if_fail(call != NULL, FALSE);
g_return_val_if_fail(err == NULL || *err == NULL, FALSE);
if (!conn->is_open)
{
g_set_error(err, XR_CLIENT_ERROR, XR_CLIENT_ERROR_CLOSED, "Can't perform RPC on closed connection.");
return FALSE;
}
/* serialize nad send XML-RPC request */
xr_call_set_transport(call, conn->transport);
xr_call_serialize_request(call, &buffer, &length);
xr_http_setup_request(conn->http, "POST", conn->resource, conn->host);
g_hash_table_foreach(conn->headers, (GHFunc)_add_http_header, conn->http);
if (conn->transport == XR_CALL_XML_RPC)
xr_http_set_header(conn->http, "Content-Type", "text/xml");
#ifdef XR_JSON_ENABLED
else if (conn->transport == XR_CALL_JSON_RPC)
xr_http_set_header(conn->http, "Content-Type", "text/json");
#endif
xr_http_set_message_length(conn->http, length);
write_success = xr_http_write_all(conn->http, buffer, length, err);
xr_call_free_buffer(call, buffer);
if (!write_success)
{
xr_client_close(conn);
return FALSE;
}
/* receive HTTP response header */
if (!xr_http_read_header(conn->http, err))
return FALSE;
/* check if some dumb bunny sent us wrong message type */
if (xr_http_get_message_type(conn->http) != XR_HTTP_RESPONSE)
return FALSE;
response = xr_http_read_all(conn->http, err);
if (response == NULL)
{
xr_client_close(conn);
return FALSE;
}
rs = xr_call_unserialize_response(call, response->str, response->len);
g_string_free(response, TRUE);
if (!rs)
{
g_set_error(err, 0, xr_call_get_error_code(call), "%s", xr_call_get_error_message(call));
if (xr_debug_enabled & XR_DEBUG_CALL)
xr_call_dump(call, 0);
return FALSE;
}
if (xr_debug_enabled & XR_DEBUG_CALL)
xr_call_dump(call, 0);
return TRUE;
}
