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; }