/*
 * Licensed to the Apache Software Foundation (ASF) under one or more
 * contributor license agreements.  See the NOTICE file distributed with
 * this work for additional information regarding copyright ownership.
 * The ASF licenses this file to You 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 <rp_asymmetric_binding_builder.h>
#include <rp_qname_matcher.h>
#include <rp_token_builder.h>

AXIS2_EXTERN rp_asymmetric_binding_t *AXIS2_CALL 
rp_asymmetric_binding_builder_build(const axutil_env_t *env, axiom_node_t *asymmetric)
{
    rp_asymmetric_binding_t *asymmetric_binding = NULL;
    rp_symmetric_asymmetric_binding_commons_t *as_commons = NULL;
    rp_binding_commons_t *commons = NULL;        
    axiom_element_t *pol_ele = NULL;
    axiom_node_t *policy = NULL;

    AXIS2_ENV_CHECK(env, NULL);

    if(asymmetric)
    {
        policy = axiom_node_get_first_element(asymmetric,env);

        if(axiom_node_get_node_type(policy, env) == AXIOM_ELEMENT)
        {
            pol_ele = (axiom_element_t*)axiom_node_get_data_element(policy, env);

            asymmetric_binding = rp_asymmetric_binding_create(env);
            if(!asymmetric_binding)
                return NULL;

            as_commons = rp_symmetric_asymmetric_binding_commons_create(env);
            if(!as_commons)
                return NULL;

            commons = rp_binding_commons_create(env);
            if(!commons)
                return NULL;
                        
            if(pol_ele)
            {
                axiom_children_iterator_t *children_iter = NULL;
                children_iter = axiom_element_get_children(pol_ele, env, policy);
                if(children_iter )
                {
                    while(axiom_children_iterator_has_next(children_iter, env))
                    {
                        axiom_node_t *node = NULL;
                        axiom_element_t *ele = NULL;
                        axis2_char_t *local_name = NULL;
                        node = axiom_children_iterator_next(children_iter, env);
                        if(node)
                        {
                            if(axiom_node_get_node_type(node, env) == AXIOM_ELEMENT)
                            {
                                ele = (axiom_element_t*)axiom_node_get_data_element(node, env);
                                if(ele)
                                {
                                    local_name = axiom_element_get_localname(ele,env);
                                    if(local_name)
                                    {
                                        if(rp_asymmetric_binding_builder_istoken(env,local_name))
                                            rp_asymmetric_binding_builder_set_token_type(env,asymmetric_binding,node,ele,local_name); 
                                        else
                                            rp_symmetric_asymmetric_commons_builder_build(env,node,ele,local_name,as_commons,commons);                                                         
                                    }
                                }
                            }
                        }
                    }
                }
                rp_symmetric_asymmetric_binding_commons_set_binding_commons(as_commons,env,commons);
                rp_asymmetric_binding_set_symmetric_asymmetric_binding_commons(asymmetric_binding,env,as_commons);               
            }
        }
    }
    return asymmetric_binding;
}

AXIS2_EXTERN axis2_status_t AXIS2_CALL
rp_asymmetric_binding_builder_set_token_type(
            const axutil_env_t *env,
            rp_asymmetric_binding_t *asymmetric_binding,
            axiom_node_t *node,
            axiom_element_t *element,
            axis2_char_t *local_name)    
{
    AXIS2_ENV_CHECK(env,AXIS2_FAILURE);
    
    if(axutil_strcmp(local_name,RP_INITIATOR_TOKEN)==0)
    {
        if(rp_match_secpolicy_qname(env,RP_INITIATOR_TOKEN,node,element))
        {
            rp_property_t *initiator_token = NULL;
            initiator_token = rp_token_builder_build(env,node);
            if(!initiator_token)
                return AXIS2_FAILURE;

            return rp_asymmetric_binding_set_initiator_token(asymmetric_binding,env,initiator_token);
        }
        else
            return AXIS2_FAILURE;
    }
    else if(axutil_strcmp(local_name,RP_RECIPIENT_TOKEN)==0)
    {
        if(rp_match_secpolicy_qname(env,RP_RECIPIENT_TOKEN,node,element))
        {
            rp_property_t *recipient_token = NULL;
            recipient_token = rp_token_builder_build(env,node);
            if(!recipient_token)
                return AXIS2_FAILURE;

            return rp_asymmetric_binding_set_recipient_token(asymmetric_binding,env,recipient_token);
        }
        else
            return AXIS2_FAILURE;
    }
    else
        return AXIS2_FAILURE;
}

AXIS2_EXTERN axis2_bool_t AXIS2_CALL
rp_asymmetric_binding_builder_istoken(
        const axutil_env_t *env,
        axis2_char_t *local_name)
{
    AXIS2_ENV_CHECK(env,AXIS2_FALSE);

    if(axutil_strcmp(local_name,RP_INITIATOR_TOKEN)==0)
        return AXIS2_TRUE;
    
    else if(axutil_strcmp(local_name,RP_RECIPIENT_TOKEN)==0)
        return AXIS2_TRUE;
    
    else
        return AXIS2_FALSE;
}