AXIS2_EXTERN axis2_status_t AXIS2_CALL
axis2_simple_http_svr_conn_write_response(
axis2_simple_http_svr_conn_t * svr_conn,
const axutil_env_t * env,
axis2_http_simple_response_t * response)
{
axis2_http_response_writer_t *response_writer = NULL;
axutil_array_list_t *headers = NULL;
axutil_stream_t *response_stream = NULL;
axis2_char_t *response_body = NULL;
int body_size = 0;
axis2_http_header_t *enc_header = NULL;
axis2_bool_t chuked_encoding = AXIS2_FALSE;
axis2_char_t *status_line = NULL;
axis2_bool_t binary_content = AXIS2_FALSE;
axis2_char_t *content_type = NULL;
AXIS2_PARAM_CHECK(env->error, response, AXIS2_FAILURE);
response_writer = axis2_http_response_writer_create(env, svr_conn->stream);
if(!response_writer)
{
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "Cannot create http response writer");
return AXIS2_FAILURE;
}
content_type = (axis2_char_t *)axis2_http_simple_response_get_content_type(response, env);
if(content_type)
{
if(strstr(content_type, AXIS2_HTTP_HEADER_ACCEPT_MULTIPART_RELATED)
&& strstr(content_type,AXIS2_HTTP_HEADER_ACCEPT_XOP_XML))
{
binary_content = AXIS2_TRUE;
}
}
enc_header = axis2_http_simple_response_get_first_header(response, env,
AXIS2_HTTP_HEADER_TRANSFER_ENCODING);
if(enc_header)
{
axis2_char_t *enc_value = axis2_http_header_get_value(enc_header, env);
if(enc_value && (0 == axutil_strcmp(enc_value, AXIS2_HTTP_HEADER_TRANSFER_ENCODING_CHUNKED)))
{
chuked_encoding = AXIS2_TRUE;
/* remove the content length header */
axis2_http_simple_response_remove_headers(response, env,
AXIS2_HTTP_HEADER_CONTENT_LENGTH);
}
}
/* print status line */
status_line = axis2_http_simple_response_get_status_line(response, env);
if(!status_line)
{
AXIS2_HANDLE_ERROR(env, AXIS2_ERROR_INVALID_HTTP_HEADER_START_LINE, AXIS2_FAILURE);
axis2_http_response_writer_free(response_writer, env);
return AXIS2_FAILURE;
}
axis2_http_response_writer_print_str(response_writer, env, status_line);
headers = axis2_http_simple_response_get_headers(response, env);
if(headers)
{
int i = 0;
int count = axutil_array_list_size(headers, env);
for(; i < count; i++)
{
axis2_http_header_t *header =
(axis2_http_header_t *)axutil_array_list_get(headers, env, i);
if(header)
{
axis2_char_t *header_ext_form = axis2_http_header_to_external_form(header, env);
axis2_http_response_writer_print_str(response_writer, env, header_ext_form);
AXIS2_FREE(env->allocator, header_ext_form);
}
}
}
/* write empty line after http headers */
axis2_http_response_writer_print_str(response_writer, env, AXIS2_HTTP_CRLF);
/* write the body */
response_stream = axis2_http_simple_response_get_body(response, env);
if(response_stream)
{
body_size = axutil_stream_get_len(response_stream, env);
response_body = axutil_stream_get_buffer(response_stream, env);
axutil_stream_flush_buffer(response_stream, env);
response_body[body_size] = AXIS2_ESC_NULL;
}
if(body_size <= 0 && !binary_content)
{
/* no body available to write. Note that this is not an error. We might want to write only
* status information and hence, this is a valid case */
axis2_http_response_writer_free(response_writer, env);
return AXIS2_SUCCESS;
}
if(!chuked_encoding && !binary_content)
{
/* This sending a normal SOAP response without chunk transfer encoding */
axis2_status_t write_stat = AXIS2_FAILURE;
write_stat = axis2_http_response_writer_println_str(response_writer, env, response_body);
if(write_stat != AXIS2_SUCCESS)
{
AXIS2_HANDLE_ERROR(env, AXIS2_ERROR_WRITING_RESPONSE, AXIS2_FAILURE);
axis2_http_response_writer_free(response_writer, env);
return AXIS2_FAILURE;
}
}
else if(!binary_content)
{
/* Sending a normal SOAP response enabling http chunking */
axutil_http_chunked_stream_t *chunked_stream = NULL;
int left = body_size;
chunked_stream = axutil_http_chunked_stream_create(env, svr_conn->stream);
while(left > 0)
{
int len = -1;
len = axutil_http_chunked_stream_write(chunked_stream, env, response_body, body_size);
if(len <= 0)
{
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "cannot write data to chunked stream");
axutil_http_chunked_stream_free(chunked_stream, env);
axis2_http_response_writer_free(response_writer, env);
return AXIS2_FAILURE;
}
left -= len;
}
axutil_http_chunked_stream_write_last_chunk(chunked_stream, env);
axutil_http_chunked_stream_free(chunked_stream, env);
}
else
{
/* In the MTOM case we enable chunking in order to send the attachment */
axutil_http_chunked_stream_t *chunked_stream = NULL;
axis2_status_t write_stat = AXIS2_FAILURE;
axutil_array_list_t *mime_parts = NULL;
axis2_char_t *mtom_sending_callback_name = NULL;
mime_parts = axis2_http_simple_response_get_mime_parts(response, env);
if(!mime_parts)
{
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "No mime parts are given");
axis2_http_response_writer_free(response_writer, env);
return AXIS2_FAILURE;
}
/* If the callback name is not there, then we will check whether there
* is any mime_parts which has type callback. If we found then no point
* of continuing we should return a failure */
mtom_sending_callback_name = axis2_http_simple_response_get_mtom_sending_callback_name(
response, env);
if(!mtom_sending_callback_name)
{
if(axis2_http_transport_utils_is_callback_required(env, mime_parts))
{
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "Sender callback not specified");
axis2_http_response_writer_free(response_writer, env);
return AXIS2_FAILURE;
}
}
chunked_stream = axutil_http_chunked_stream_create(env, svr_conn->stream);
write_stat = axis2_http_transport_utils_send_mtom_message(chunked_stream, env, mime_parts,
mtom_sending_callback_name);
axutil_http_chunked_stream_free(chunked_stream, env);
if(write_stat != AXIS2_SUCCESS)
{
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "writing mime parts failed");
axis2_http_response_writer_free(response_writer, env);
return AXIS2_FAILURE;
}
}
axis2_http_response_writer_free(response_writer, env);
return AXIS2_SUCCESS;
}
AXIS2_EXTERN axis2_status_t AXIS2_CALL
axis2_http_client_send(
axis2_http_client_t * client,
const axutil_env_t * env,
axis2_http_simple_request_t * request,
axis2_char_t * ssl_pp)
{
char *wire_format = NULL;
axutil_array_list_t *headers = NULL;
char *str_header = NULL;
char *str_request_line = NULL;
int written = 0;
axis2_status_t status = AXIS2_FAILURE;
axis2_bool_t chunking_enabled = AXIS2_FALSE;
axis2_char_t *host = NULL;
unsigned int port = 0;
/* In the MTOM case request body is not set. Instead mime_parts
array_list is there */
/*if(client->req_body)
{
AXIS2_FREE(env->allocator, client->req_body);
client->req_body = NULL;
}*/
if(!client->req_body && !(client->doing_mtom))
{
client->req_body_size = axis2_http_simple_request_get_body_bytes(request, env,
&client->req_body);
}
if(client->dump_input_msg == AXIS2_TRUE)
{
return AXIS2_SUCCESS;
}
if(!client->url)
{
AXIS2_HANDLE_ERROR(env, AXIS2_ERROR_NULL_URL, AXIS2_FAILURE);
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "Request url not set");
return AXIS2_FAILURE;
}
host = axutil_url_get_host(client->url, env);
port = axutil_url_get_port(client->url, env);
if(client->proxy_enabled)
{
if(!client->proxy_host || client->proxy_port <= 0)
{
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "Proxy port or Host not set");
return AXIS2_FAILURE;
}
if(client->sockfd < 0)
{
client->sockfd = (int)axutil_network_handler_open_socket(env, client->proxy_host,
client->proxy_port);
}
}
else
{
/*Proxy is not enabled*/
if(client->sockfd < 0)
{
client->sockfd = (int)axutil_network_handler_open_socket(env, host, port);
}
}
if(client->sockfd < 0)
{
AXIS2_HANDLE_ERROR(env, AXIS2_ERROR_SOCKET_ERROR, AXIS2_FAILURE);
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "Socket Creation failed.");
return AXIS2_FAILURE;
}
if(client->timeout > 0)
{
/*Set the receiving time out*/
axutil_network_handler_set_sock_option(env, client->sockfd, SO_RCVTIMEO, client->timeout);
/*Set the sending time out*/
axutil_network_handler_set_sock_option(env, client->sockfd, SO_SNDTIMEO, client->timeout);
}
if(0 == axutil_strcasecmp(axutil_url_get_protocol(client->url, env), AXIS2_TRANSPORT_URL_HTTPS))
{
#ifdef AXIS2_SSL_ENABLED
if (client->proxy_enabled)
{
if (AXIS2_SUCCESS != axis2_http_client_connect_ssl_host(client, env, host, port))
{
axutil_network_handler_close_socket(env, client->sockfd);
client->sockfd = -1;
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "HTTPS connection creation failed");
return AXIS2_FAILURE;
}
}
if(!client->data_stream)
{
client->data_stream =
axutil_stream_create_ssl(env, client->sockfd, axis2_http_client_get_server_cert(client,
env), axis2_http_client_get_key_file(client, env), ssl_pp);
client->owns_stream = AXIS2_TRUE;
}
#else
axutil_network_handler_close_socket(env, client->sockfd);
client->sockfd = -1;
AXIS2_HANDLE_ERROR(env, AXIS2_ERROR_INVALID_TRANSPORT_PROTOCOL, AXIS2_FAILURE);
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI,
"Invalid Transport Protocol, HTTPS transport not enabled.");
return AXIS2_FAILURE;
#endif
}
else
{
if(!client->data_stream)
{
client->data_stream = axutil_stream_create_socket(env, client->sockfd);
client->owns_stream = AXIS2_TRUE;
}
}
if(!client->data_stream)
{
axutil_network_handler_close_socket(env, client->sockfd);
client->sockfd = -1;
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI,
"Data stream creation failed for Host %s and %d port", host, port);
return AXIS2_FAILURE;
}
/*Accessing HTTP headers*/
headers = axis2_http_simple_request_get_headers(request, env);
if(headers)
{
int header_count = axutil_array_list_size(headers, env);
int i = 0;
char *str_header2 = NULL;
for(i = 0; i < header_count; i++)
{
axis2_char_t *header_ext_form = NULL;
axis2_http_header_t *tmp_header = (axis2_http_header_t *)axutil_array_list_get(headers,
env, i);
if(!tmp_header)
{
/* This continue is added as a safey mechanism,
* However I see a problem with this logic, AFAIC
* see there can't be null headers in the headers
* array list, because number of headers in "headers"
* array list count with axutil_array_list_size,
* therefore this check and continue might not have a
* real effect.*/
continue;
}
/* check whether we have transfer encoding and then see whether the
* value is "chunked" */
if(!axutil_strcmp(axis2_http_header_get_name(tmp_header, env),
AXIS2_HTTP_HEADER_TRANSFER_ENCODING) && !axutil_strcmp(axis2_http_header_get_value(
tmp_header, env), AXIS2_HTTP_HEADER_TRANSFER_ENCODING_CHUNKED))
{
chunking_enabled = AXIS2_TRUE;
}
header_ext_form = axis2_http_header_to_external_form(tmp_header, env);
/* str_header2 is to hold intermediate value of str_header */
str_header2 = axutil_stracat(env, str_header, header_ext_form);
if(str_header)
{
AXIS2_FREE(env->allocator, str_header);
str_header = NULL;
}
if(header_ext_form)
{
AXIS2_FREE(env->allocator, header_ext_form);
header_ext_form = NULL;
}
/* str_header has all HTTP headers to send. */
str_header = str_header2;
}
}
if(AXIS2_FALSE == client->proxy_enabled)
{
str_request_line = axis2_http_request_line_to_string(
axis2_http_simple_request_get_request_line(request, env), env);
}
else
{
/* proxy enabled case */
/* we need the request line in the format
* POST http://host:port/path HTTP/1.x if we have enabled proxies
*/
axis2_char_t *host_port_str = NULL;
axis2_char_t *host = axutil_url_get_host(client->url, env);
axis2_http_request_line_t *request_line = axis2_http_simple_request_get_request_line(
request, env);
axis2_char_t *path = axis2_http_request_line_get_uri(request_line, env);
host_port_str = AXIS2_MALLOC(env->allocator, axutil_strlen(host) + axutil_strlen(path) + 20
* sizeof(axis2_char_t));
if(!host_port_str)
{
axutil_network_handler_close_socket(env, client->sockfd);
client->sockfd = -1;
AXIS2_HANDLE_ERROR(env, AXIS2_ERROR_NO_MEMORY, AXIS2_FAILURE);
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI,
"Memory allocation failed for host %s and %s path", host, path);
return AXIS2_FAILURE;
}
sprintf(host_port_str, "http://%s:%d%s", host, axutil_url_get_port(client->url, env), path);
str_request_line = AXIS2_MALLOC(env->allocator, axutil_strlen(host_port_str) + 20
* sizeof(axis2_char_t));
if(!str_request_line)
{
axutil_network_handler_close_socket(env, client->sockfd);
client->sockfd = -1;
AXIS2_FREE(env->allocator, host_port_str);
AXIS2_HANDLE_ERROR(env, AXIS2_ERROR_NO_MEMORY, AXIS2_FAILURE);
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI,
"memory allocation failed for host %s and %s path", host, path);
return AXIS2_FAILURE;
}
sprintf(str_request_line, "%s %s %s\r\n", axis2_http_request_line_get_method(request_line,
env), host_port_str, axis2_http_request_line_get_http_version(request_line, env));
AXIS2_FREE(env->allocator, host_port_str);
host_port_str = NULL;
}
/* Here first we send the http header part */
wire_format = axutil_stracat(env, str_request_line, str_header);
AXIS2_FREE(env->allocator, str_header);
str_header = NULL;
AXIS2_FREE(env->allocator, str_request_line);
str_request_line = NULL;
written
= axutil_stream_write(client->data_stream, env, wire_format, axutil_strlen(wire_format));
AXIS2_FREE(env->allocator, wire_format);
wire_format = NULL;
/* Then we write the two new line charaters before the http body*/
written = axutil_stream_write(client->data_stream, env, AXIS2_HTTP_CRLF, 2);
/* When sending MTOM it is bit different. We keep the attachment + other
mime headers in an array_list and send them one by one */
if(client->doing_mtom)
{
/*axis2_status_t status = AXIS2_SUCCESS; */
axutil_http_chunked_stream_t *chunked_stream = NULL;
/* If the callback name is not there, then we will check whether there
* is any mime_parts which has type callback. If we found then no point
* of continuing we should return a failure */
if(!(client->mtom_sending_callback_name))
{
if(axis2_http_transport_utils_is_callback_required(env, client->mime_parts))
{
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "Sender callback not specified");
return AXIS2_FAILURE;
}
}
/* For MTOM we automatically enabled chunking */
chunked_stream = axutil_http_chunked_stream_create(env, client->data_stream);
/* This method will write the Attachment + data to the wire */
status = axis2_http_transport_utils_send_mtom_message(chunked_stream, env,
client->mime_parts, client->mtom_sending_callback_name);
axutil_http_chunked_stream_free(chunked_stream, env);
chunked_stream = NULL;
}
/* Non MTOM case */
else if(client->req_body_size > 0 && client->req_body)
{
int len = 0;
written = 0;
/* Keep on writing data in a loop until we finised
with all the data in the buffer */
if(!chunking_enabled)
{
status = AXIS2_SUCCESS;
while(written < client->req_body_size)
{
len = 0;
len = axutil_stream_write(client->data_stream, env, client->req_body + written,
client->req_body_size - written);
if(-1 == len)
{
status = AXIS2_FAILURE;
break;
}
else
{
written += len;
}
}
}
else
{
/* Not MTOM but chunking is enabled */
axutil_http_chunked_stream_t *chunked_stream = NULL;
chunked_stream = axutil_http_chunked_stream_create(env, client->data_stream);
status = AXIS2_SUCCESS;
if(!chunked_stream)
{
axutil_network_handler_close_socket(env, client->sockfd);
client->sockfd = -1;
AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "Creatoin of chunked stream failed");
return AXIS2_FAILURE;
}
while(written < client->req_body_size)
{
written = axutil_http_chunked_stream_write(chunked_stream, env, client->req_body,
client->req_body_size);
if(-1 == written)
{
status = AXIS2_FAILURE;
break;
}
}
if(AXIS2_SUCCESS == status)
{
/* Writing the trailing null charactor */
axutil_http_chunked_stream_write_last_chunk(chunked_stream, env);
}
axutil_http_chunked_stream_free(chunked_stream, env);
}
}
client->request_sent = AXIS2_TRUE;
return status;
}