/*
 * 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 <woden_string_attr.h>
#include <woden_xml_attr.h>
#include <axis2_uri.h>
#include <axiom_element.h>
#include <axiom_node.h>

typedef struct woden_string_attr_impl woden_string_attr_impl_t;

/**
 * @brief String Attribute Struct Impl
 *   Axis2 String Attribute
 */
struct woden_string_attr_impl
{
    woden_string_attr_t string_attr;
    woden_xml_attr_t *xml_attr;
    woden_obj_types_t obj_type;
    axis2_hash_t *methods;
};

#define INTF_TO_IMPL(string_attr) \
    ((woden_string_attr_impl_t *) string_attr)

axis2_status_t AXIS2_CALL
woden_string_attr_free(
    void *string_attr,
    const axis2_env_t *env);

woden_obj_types_t AXIS2_CALL
woden_string_attr_type(
    void *string_attr,
    const axis2_env_t *env);

woden_xml_attr_t *AXIS2_CALL
woden_string_attr_get_base_impl(
    void *string_attr,
    const axis2_env_t *env);

axis2_char_t *AXIS2_CALL
woden_string_attr_get_string(
    void *string_attr,
    const axis2_env_t *env);

void *AXIS2_CALL
woden_string_attr_convert(
    void *string_attr,
    const axis2_env_t *env,
    axiom_element_t *owner_el,
    axiom_node_t *owner_node,
    axis2_char_t *attr_value);

/*
 * TODO This constructor is not used for extension attributes, but may be useful if
 * parsing of native WSDL attributes is changed to use the XMLAttr interface.
 */
AXIS2_EXTERN woden_string_attr_t * AXIS2_CALL
woden_string_attr_create(
    const axis2_env_t *env,
    axiom_element_t *owner_el,
    axiom_node_t *owner_node,
    axis2_qname_t *attr_type,
    axis2_char_t *attr_value)
{
    woden_string_attr_impl_t *string_attr_impl = NULL;

    AXIS2_ENV_CHECK(env, NULL);
    string_attr_impl = AXIS2_MALLOC(env->allocator,
            sizeof(woden_string_attr_impl_t));

    string_attr_impl->obj_type = WODEN_STRING_ATTR;
    string_attr_impl->xml_attr = NULL;
    string_attr_impl->methods = NULL;
    string_attr_impl->string_attr.ops =
        AXIS2_MALLOC(env->allocator,
                sizeof(woden_string_attr_ops_t));

    string_attr_impl->string_attr.ops->free =
        woden_string_attr_free;
    string_attr_impl->string_attr.ops->type =
        woden_string_attr_type;
    string_attr_impl->string_attr.ops->get_base_impl =
        woden_string_attr_get_base_impl;
    string_attr_impl->string_attr.ops->get_string =
        woden_string_attr_get_string;
    string_attr_impl->string_attr.ops->convert =
        woden_string_attr_convert;


    string_attr_impl->methods = axis2_hash_make(env);
    if (!string_attr_impl->methods)
    {
        AXIS2_ERROR_SET(env->error, AXIS2_ERROR_NO_MEMORY, AXIS2_FAILURE);
        return NULL;
    }
    axis2_hash_set(string_attr_impl->methods, "free",
            AXIS2_HASH_KEY_STRING, woden_string_attr_free);
    axis2_hash_set(string_attr_impl->methods, "type",
            AXIS2_HASH_KEY_STRING, woden_string_attr_type);
    axis2_hash_set(string_attr_impl->methods, "get_string",
            AXIS2_HASH_KEY_STRING, woden_string_attr_get_string);
    axis2_hash_set(string_attr_impl->methods, "convert",
            AXIS2_HASH_KEY_STRING, woden_string_attr_convert);

    string_attr_impl->xml_attr = woden_xml_attr_create(env, owner_el,
            owner_node, attr_type, attr_value);

    return &(string_attr_impl->string_attr);
}

axis2_status_t AXIS2_CALL
woden_string_attr_free(
    void *string_attr,
    const axis2_env_t *env)
{
    woden_string_attr_impl_t *string_attr_impl = NULL;

    AXIS2_ENV_CHECK(env, AXIS2_FAILURE);
    string_attr_impl = INTF_TO_IMPL(string_attr);

    if (string_attr_impl->methods)
    {
        axis2_hash_free(string_attr_impl->methods, env);
        string_attr_impl->methods = NULL;
    }

    if (string_attr_impl->xml_attr)
    {
        WODEN_XML_ATTR_FREE(string_attr_impl->xml_attr, env);
        string_attr_impl->xml_attr = NULL;
    }

    if ((&(string_attr_impl->string_attr))->ops)
    {
        AXIS2_FREE(env->allocator, (&(string_attr_impl->string_attr))->ops);
        (&(string_attr_impl->string_attr))->ops = NULL;
    }

    if (string_attr_impl)
    {
        AXIS2_FREE(env->allocator, string_attr_impl);
        string_attr_impl = NULL;
    }
    return AXIS2_SUCCESS;
}

woden_obj_types_t AXIS2_CALL
woden_string_attr_type(
    void *string_attr,
    const axis2_env_t *env)
{
    woden_string_attr_impl_t *string_attr_impl = NULL;

    AXIS2_ENV_CHECK(env, AXIS2_FAILURE);
    string_attr_impl = INTF_TO_IMPL(string_attr);

    return string_attr_impl->obj_type;
}

woden_xml_attr_t *AXIS2_CALL
woden_string_attr_get_base_impl(
    void *string_attr,
    const axis2_env_t *env)
{
    woden_string_attr_impl_t *string_attr_impl = NULL;

    AXIS2_ENV_CHECK(env, NULL);
    string_attr_impl = INTF_TO_IMPL(string_attr);

    return string_attr_impl->xml_attr;
}

axis2_status_t AXIS2_CALL
woden_string_attr_resolve_methods(
    woden_string_attr_t *string_attr,
    const axis2_env_t *env,
    axis2_hash_t *methods)
{
    AXIS2_ENV_CHECK(env, AXIS2_FAILURE);
    AXIS2_PARAM_CHECK(env->error, methods, AXIS2_FAILURE);

    string_attr->ops->free =
        axis2_hash_get(methods, "free", AXIS2_HASH_KEY_STRING);
    string_attr->ops->to_string_attr_free = axis2_hash_get(methods,
            "to_string_attr_free", AXIS2_HASH_KEY_STRING);
    string_attr->ops->type = axis2_hash_get(methods,
            "type", AXIS2_HASH_KEY_STRING);
    string_attr->ops->get_string = axis2_hash_get(methods,
            "get_string", AXIS2_HASH_KEY_STRING);
    string_attr->ops->convert = axis2_hash_get(methods,
            "convert", AXIS2_HASH_KEY_STRING);

    return AXIS2_SUCCESS;
}

axis2_char_t *AXIS2_CALL
woden_string_attr_get_string(
    void *string_attr,
    const axis2_env_t *env)
{
    woden_string_attr_impl_t *string_attr_impl = NULL;

    AXIS2_ENV_CHECK(env, NULL);
    string_attr_impl = INTF_TO_IMPL(string_attr);
    return (axis2_char_t *) WODEN_XML_ATTR_GET_CONTENT(
                string_attr_impl->xml_attr, env);
}

void *AXIS2_CALL
woden_string_attr_convert(
    void *string_attr,
    const axis2_env_t *env,
    axiom_element_t *owner_el,
    axiom_node_t *owner_node,
    axis2_char_t *attr_value)
{
    woden_string_attr_impl_t *string_attr_impl = NULL;
    axis2_char_t *str = NULL;

    AXIS2_ENV_CHECK(env, NULL);
    string_attr_impl = INTF_TO_IMPL(string_attr);

    if (attr_value)
    {
        str = AXIS2_STRDUP(attr_value, env);
        if (!str)
        {
            AXIS2_ERROR_SET(env->error, AXIS2_ERROR_NO_MEMORY, AXIS2_FAILURE);
            return NULL;
        }
    }

    if (!str)
    {
        WODEN_XML_ATTR_SET_VALID(string_attr_impl->xml_attr, env, AXIS2_FALSE);
        /* TODO handler error */
    }

    return str;
}