blob: 80b5e5a5471a4fc2ca87c5074e5b67c71758ae1b [file] [log] [blame]
/*
* Copyright 2004,2005 The Apache Software Foundation.
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
#include <axis2_op_ctx.h>
#include <axis2_conf_ctx.h>
#include <axis2_op.h>
#include <axis2.h>
#include <axis2_hash.h>
typedef struct axis2_op_ctx_impl
{
/** context base struct */
axis2_op_ctx_t op_ctx;
/** base context struct */
axis2_ctx_t *base;
/** parent of op context is a service context instance */
struct axis2_svc_ctx *parent;
/** message context map */
axis2_hash_t *msg_ctx_map;
/** the op of which this is a running instance. The MEP of this
* op must be one of the 8 predefined ones in WSDL 2.0.
*/
axis2_op_t *op;
/** op Message Exchange Pattern */
int op_mep;
/** is complete? */
axis2_bool_t is_complete;
/** the global message_id -> op_ctx map which is stored in
* the axis2_conf_ctx. We're caching it here for faster acccess.
*/
axis2_hash_t *op_ctx_map;
/** op qname */
axis2_qname_t *op_qname;
/** service qname */
axis2_qname_t *svc_qname;
/* Mutex to syncronize the read/write operations */
axis2_thread_mutex_t *mutex;
} axis2_op_ctx_impl_t;
/** Interface to implementation conversion macro */
#define AXIS2_INTF_TO_IMPL(op_ctx) ((axis2_op_ctx_impl_t *)op_ctx)
axis2_ctx_t* AXIS2_CALL axis2_op_ctx_get_base(struct axis2_op_ctx *op_ctx,
axis2_env_t **env);
axis2_status_t AXIS2_CALL axis2_op_ctx_free (struct axis2_op_ctx *op_ctx,
axis2_env_t **env);
axis2_status_t AXIS2_CALL axis2_op_ctx_init(struct axis2_op_ctx *op_ctx,
axis2_env_t **env,
struct axis2_conf *conf);
axis2_op_t* AXIS2_CALL axis2_op_ctx_getAxisOperation(struct axis2_op_ctx *op_ctx,
axis2_env_t **env);
struct axis2_svc_ctx * AXIS2_CALL axis2_op_ctx_get_parent(struct axis2_op_ctx *op_ctx,
axis2_env_t **env);
axis2_status_t AXIS2_CALL axis2_op_ctx_add_msg_ctx(struct axis2_op_ctx *op_ctx,
axis2_env_t **env,
axis2_msg_ctx_t *msg_ctx);
axis2_msg_ctx_t* AXIS2_CALL axis2_op_ctx_get_msg_ctx(struct axis2_op_ctx *op_ctx,
axis2_env_t **env, axis2_char_t *messageLabel);
axis2_bool_t AXIS2_CALL axis2_op_ctx_get_is_complete(struct axis2_op_ctx *op_ctx,
axis2_env_t **env);
axis2_status_t AXIS2_CALL axis2_op_ctx_set_complete(struct axis2_op_ctx *op_ctx,
axis2_env_t **env,
axis2_bool_t is_complete);
axis2_status_t AXIS2_CALL axis2_op_ctx_cleanup(struct axis2_op_ctx *op_ctx,
axis2_env_t **env);
axis2_status_t AXIS2_CALL axis2_op_ctx_set_parent(struct axis2_op_ctx *op_ctx,
axis2_env_t **env,
struct axis2_svc_ctx* svc_ctx);
axis2_op_t* AXIS2_CALL axis2_op_ctx_get_op(struct axis2_op_ctx *op_ctx,
axis2_env_t **env);
axis2_hash_t* AXIS2_CALL axis2_op_ctx_get_msg_ctx_map(struct axis2_op_ctx *op_ctx,
axis2_env_t **env);
AXIS2_DECLARE(axis2_op_ctx_t*)
axis2_op_ctx_create(axis2_env_t **env,
axis2_op_t *op,
struct axis2_svc_ctx* svc_ctx)
{
axis2_op_ctx_impl_t *op_ctx_impl = NULL;
AXIS2_ENV_CHECK(env, NULL);
op_ctx_impl = AXIS2_MALLOC( (*env)->allocator, sizeof(axis2_op_ctx_impl_t) );
if (!op_ctx_impl)
{
AXIS2_ERROR_SET((*env)->error, AXIS2_ERROR_NO_MEMORY, AXIS2_FAILURE);
return NULL;
}
op_ctx_impl->op_ctx.ops = NULL;
op_ctx_impl->base = NULL;
op_ctx_impl->parent = NULL;
op_ctx_impl->msg_ctx_map = NULL;
op_ctx_impl->op = NULL;
op_ctx_impl->op_mep = 0;
op_ctx_impl->is_complete = AXIS2_FALSE;
op_ctx_impl->op_ctx_map = NULL;
op_ctx_impl->op_qname = NULL;
op_ctx_impl->svc_qname = NULL;
op_ctx_impl->mutex = axis2_thread_mutex_create((*env)->allocator,
AXIS2_THREAD_MUTEX_DEFAULT);
if(NULL == op_ctx_impl->mutex)
{
axis2_op_ctx_free(&(op_ctx_impl->op_ctx), env);
return NULL;
}
op_ctx_impl->base = axis2_ctx_create(env);
if (!(op_ctx_impl->base))
{
axis2_op_ctx_free(&(op_ctx_impl->op_ctx), env);
return NULL;
}
if (op)
{
op_ctx_impl->op = op;
}
op_ctx_impl->msg_ctx_map = axis2_hash_make(env);
if (!(op_ctx_impl->msg_ctx_map))
{
axis2_op_ctx_free(&(op_ctx_impl->op_ctx), env);
return NULL;
}
if (op_ctx_impl->op)
{
op_ctx_impl->op_qname = AXIS2_OP_GET_QNAME(op_ctx_impl->op, env);
op_ctx_impl->op_mep = AXIS2_OP_GET_AXIS_SPECIFIC_MEP_CONST(op_ctx_impl->op, env);
}
axis2_op_ctx_set_parent(&(op_ctx_impl->op_ctx), env, svc_ctx);
/* initialize ops */
op_ctx_impl->op_ctx.ops = AXIS2_MALLOC( (*env)->allocator, sizeof(axis2_op_ctx_ops_t) );
if (!op_ctx_impl->op_ctx.ops)
{
AXIS2_ERROR_SET((*env)->error, AXIS2_ERROR_NO_MEMORY, AXIS2_FAILURE);
axis2_op_ctx_free(&(op_ctx_impl->op_ctx), env);
return NULL;
}
op_ctx_impl->op_ctx.ops->get_base = axis2_op_ctx_get_base;
op_ctx_impl->op_ctx.ops->free = axis2_op_ctx_free;
op_ctx_impl->op_ctx.ops->init = axis2_op_ctx_init;
op_ctx_impl->op_ctx.ops->get_op = axis2_op_ctx_get_op;
op_ctx_impl->op_ctx.ops->get_parent = axis2_op_ctx_get_parent;
op_ctx_impl->op_ctx.ops->add_msg_ctx = axis2_op_ctx_add_msg_ctx;
op_ctx_impl->op_ctx.ops->get_msg_ctx = axis2_op_ctx_get_msg_ctx;
op_ctx_impl->op_ctx.ops->get_is_complete = axis2_op_ctx_get_is_complete;
op_ctx_impl->op_ctx.ops->set_complete = axis2_op_ctx_set_complete;
op_ctx_impl->op_ctx.ops->cleanup = axis2_op_ctx_cleanup;
op_ctx_impl->op_ctx.ops->set_parent = axis2_op_ctx_set_parent;
op_ctx_impl->op_ctx.ops->get_msg_ctx_map = axis2_op_ctx_get_msg_ctx_map;
return &(op_ctx_impl->op_ctx);
}
axis2_ctx_t* AXIS2_CALL axis2_op_ctx_get_base(struct axis2_op_ctx *op_ctx,
axis2_env_t **env)
{
AXIS2_ENV_CHECK(env, NULL);
return AXIS2_INTF_TO_IMPL(op_ctx)->base;
}
axis2_status_t AXIS2_CALL axis2_op_ctx_free (struct axis2_op_ctx *op_ctx,
axis2_env_t **env)
{
axis2_op_ctx_impl_t *op_ctx_impl = NULL;
AXIS2_ENV_CHECK(env, AXIS2_FAILURE);
op_ctx_impl = AXIS2_INTF_TO_IMPL(op_ctx);
if (op_ctx_impl->op_ctx.ops)
{
AXIS2_FREE((*env)->allocator, op_ctx_impl->op_ctx.ops);
op_ctx_impl->op_ctx.ops = NULL;
}
if (op_ctx_impl->base)
{
AXIS2_CTX_FREE(op_ctx_impl->base, env);
op_ctx_impl->base = NULL;
}
if (op_ctx_impl->msg_ctx_map)
{
axis2_hash_free(op_ctx_impl->msg_ctx_map, env);
op_ctx_impl->msg_ctx_map = NULL;
}
AXIS2_FREE((*env)->allocator, op_ctx_impl);
op_ctx_impl = NULL;
return AXIS2_SUCCESS;
}
/**
* The method is used to do the intialization of the axis2_op_ctx
*/
axis2_status_t AXIS2_CALL axis2_op_ctx_init(struct axis2_op_ctx *op_ctx, axis2_env_t **env, struct axis2_conf *conf)
{
axis2_op_ctx_impl_t *op_ctx_impl = NULL;
axis2_hash_index_t *hi = NULL;
void *ctx = NULL;
AXIS2_ENV_CHECK(env, AXIS2_FAILURE);
op_ctx_impl = AXIS2_INTF_TO_IMPL(op_ctx);
if (op_ctx_impl->op_qname && op_ctx_impl->svc_qname)
{
axis2_svc_t *svc = NULL;
axis2_char_t *svc_name = NULL;
svc_name = AXIS2_QNAME_GET_LOCALPART(op_ctx_impl->svc_qname, env);
if (svc_name)
{
svc = AXIS2_CONF_GET_SVC(conf, env, svc_name);
if (svc)
{
op_ctx_impl->op = AXIS2_SVC_GET_OP_WITH_QNAME(svc, env, op_ctx_impl->op_qname);
}
}
}
if (!(op_ctx_impl->msg_ctx_map))
return AXIS2_SUCCESS;
for (hi = axis2_hash_first (op_ctx_impl->msg_ctx_map, env);
hi; hi = axis2_hash_next (env, hi))
{
axis2_hash_this (hi, NULL, NULL, &ctx);
if (ctx)
{
axis2_msg_ctx_t *msg_ctx = (axis2_msg_ctx_t*)ctx;
AXIS2_MSG_CTX_INIT(msg_ctx, env, conf);
}
}
return AXIS2_SUCCESS;
}
/**
* @return Returns the op.
*/
axis2_op_t* AXIS2_CALL axis2_op_ctx_get_op(struct axis2_op_ctx *op_ctx, axis2_env_t **env)
{
AXIS2_ENV_CHECK(env, NULL);
return AXIS2_INTF_TO_IMPL(op_ctx)->op;
}
/**
* Return the struct axis2_svc_ctx * in which this op_ctx lives.
*
* @return parent struct axis2_svc_ctx *
*/
struct axis2_svc_ctx * AXIS2_CALL axis2_op_ctx_get_parent(struct axis2_op_ctx *op_ctx, axis2_env_t **env)
{
AXIS2_ENV_CHECK(env, NULL);
return AXIS2_INTF_TO_IMPL(op_ctx)->parent;
}
/**
* When a new message is added to the <code>MEPContext</code> the logic
* should be included remove the MEPContext from the table in the
* <code>axis2_conf_ctx</code>. Example: IN_IN_OUT At the second IN
* message the MEPContext should be removed from the AxisOperation
*
* @param msgContext
*/
axis2_status_t AXIS2_CALL axis2_op_ctx_add_msg_ctx(struct axis2_op_ctx *op_ctx, axis2_env_t **env, axis2_msg_ctx_t *msg_ctx)
{
axis2_op_ctx_impl_t *op_ctx_impl = NULL;
AXIS2_ENV_CHECK(env, AXIS2_FAILURE);
op_ctx_impl = AXIS2_INTF_TO_IMPL(op_ctx);
axis2_thread_mutex_lock(op_ctx_impl->mutex);
if (op_ctx_impl->msg_ctx_map)
{
axis2_char_t *message_id = AXIS2_MSG_CTX_GET_MSG_ID(msg_ctx, env);
if (message_id)
{
axis2_hash_set(op_ctx_impl->msg_ctx_map, message_id, AXIS2_HASH_KEY_STRING, msg_ctx);
}
}
axis2_thread_mutex_unlock(op_ctx_impl->mutex);
return AXIS2_SUCCESS;
}
/**
* @param messageLabel
* @return
* @
*/
axis2_msg_ctx_t* AXIS2_CALL axis2_op_ctx_get_msg_ctx(struct axis2_op_ctx *op_ctx,
axis2_env_t **env, axis2_char_t *message_id)
{
axis2_op_ctx_impl_t *op_ctx_impl = NULL;
AXIS2_ENV_CHECK(env, NULL);
op_ctx_impl = AXIS2_INTF_TO_IMPL(op_ctx);
axis2_thread_mutex_lock(op_ctx_impl->mutex);
if (op_ctx_impl->msg_ctx_map)
{
axis2_msg_ctx_t *rv = NULL;
rv = axis2_hash_get(op_ctx_impl->msg_ctx_map, message_id,
AXIS2_HASH_KEY_STRING);
axis2_thread_mutex_unlock(op_ctx_impl->mutex);
return rv;
}
axis2_thread_mutex_unlock(op_ctx_impl->mutex);
return NULL;
}
/**
* Checks to see if the MEP is complete. i.e. whether all the messages that
* are associated with the MEP has arrived and MEP is complete.
*
*/
axis2_bool_t AXIS2_CALL axis2_op_ctx_get_is_complete(struct axis2_op_ctx *op_ctx,
axis2_env_t **env)
{
AXIS2_ENV_CHECK(env, AXIS2_FAILURE);
return AXIS2_INTF_TO_IMPL(op_ctx)->is_complete;
}
axis2_status_t AXIS2_CALL axis2_op_ctx_set_complete(struct axis2_op_ctx *op_ctx,
axis2_env_t **env,
axis2_bool_t is_complete)
{
AXIS2_ENV_CHECK(env, AXIS2_FAILURE);
AXIS2_INTF_TO_IMPL(op_ctx)->is_complete = is_complete;
return AXIS2_SUCCESS;
}
/**
* Removes the pointers to this <code>op_ctx</code> in the
* <code>axis2_conf_ctx</code>'s op_ctxaxis2_hash_t *so that this
* <code>op_ctx</code> will eventually get garbage collected
* along with the <code>axis2_msg_ctx_t *</code>'s it contains. Note that if
* the caller wants to make sure its safe to clean up this op_ctx
* he should call is_complete() first. However, in cases like IN_OPTIONAL_OUT
* and OUT_OPTIONAL_IN, it is possibe this will get called without the MEP
* being complete due to the optional nature of the MEP.
*/
axis2_status_t AXIS2_CALL axis2_op_ctx_cleanup(struct axis2_op_ctx *op_ctx,
axis2_env_t **env)
{
axis2_op_ctx_impl_t *op_ctx_impl = NULL;
axis2_hash_index_t *hi = NULL;
void *ctx = NULL;
AXIS2_ENV_CHECK(env, AXIS2_FAILURE);
op_ctx_impl = AXIS2_INTF_TO_IMPL(op_ctx);
if (!(op_ctx_impl->msg_ctx_map))
return AXIS2_SUCCESS;
for (hi = axis2_hash_first (op_ctx_impl->msg_ctx_map, env);
hi; hi = axis2_hash_next (env, hi))
{
axis2_hash_this (hi, NULL, NULL, &ctx);
if (ctx)
{
axis2_msg_ctx_t *msg_ctx = (axis2_msg_ctx_t*)ctx;
axis2_char_t *message_id = AXIS2_MSG_CTX_GET_MSG_ID(msg_ctx, env);
if (message_id)
{
axis2_hash_set(op_ctx_impl->msg_ctx_map, message_id, AXIS2_HASH_KEY_STRING, NULL);
return AXIS2_MSG_CTX_FREE(msg_ctx, env);
}
}
}
return AXIS2_SUCCESS;
}
axis2_status_t AXIS2_CALL axis2_op_ctx_set_parent(struct axis2_op_ctx *op_ctx, axis2_env_t **env, struct axis2_svc_ctx* svc_ctx)
{
axis2_op_ctx_impl_t *op_ctx_impl = NULL;
AXIS2_ENV_CHECK(env, AXIS2_FAILURE);
op_ctx_impl = AXIS2_INTF_TO_IMPL(op_ctx);
if (svc_ctx)
{
op_ctx_impl->parent = svc_ctx;
}
if (op_ctx_impl->parent) /* that is if there is a service context associated */
{
axis2_conf_ctx_t *conf_ctx = NULL;
conf_ctx = AXIS2_SVC_CTX_GET_CONF_CTX(op_ctx_impl->parent, env);
if (conf_ctx)
{
op_ctx_impl->op_ctx_map = AXIS2_CONF_CTX_GET_OP_CTX_MAP(conf_ctx, env);
}
op_ctx_impl->svc_qname = AXIS2_SVC_GET_QNAME(AXIS2_SVC_CTX_GET_SVC(op_ctx_impl->parent, env), env);
}
return AXIS2_SUCCESS;
}
axis2_hash_t* AXIS2_CALL axis2_op_ctx_get_msg_ctx_map(struct axis2_op_ctx *op_ctx, axis2_env_t **env)
{
AXIS2_ENV_CHECK(env, NULL);
return AXIS2_INTF_TO_IMPL(op_ctx)->msg_ctx_map;
}