/*
 * This file is part of libdom.
 * Licensed under the MIT License,
 *                http://www.opensource.org/licenses/mit-license.php
 * Copyright 2009 Bo Yang <struggleyb.nku@gmail.com>
 * Copyright 2014 Rupinder Singh Khokhar <rsk1coder99@gmail.com>
 */

#include <assert.h>
#include <stdlib.h>

#include <dom/html/html_object_element.h>

#include "html/html_document.h"
#include "html/html_object_element.h"

#include "html/html_form_element.h"

#include "core/node.h"
#include "core/attr.h"
#include "utils/utils.h"

static struct dom_element_protected_vtable _protect_vtable = {
	{
		DOM_NODE_PROTECT_VTABLE_HTML_OBJECT_ELEMENT
	},
	DOM_HTML_OBJECT_ELEMENT_PROTECT_VTABLE
};

/**
 * Create a dom_html_object_element object
 *
 * \param doc  The document object
 * \param ele  The returned element object
 * \return DOM_NO_ERR on success, appropriate dom_exception on failure.
 */
dom_exception _dom_html_object_element_create(struct dom_html_document *doc,
		dom_string *namespace, dom_string *prefix,
		struct dom_html_object_element **ele)
{
	struct dom_node_internal *node;

	*ele = malloc(sizeof(dom_html_object_element));
	if (*ele == NULL)
		return DOM_NO_MEM_ERR;

	/* Set up vtables */
	node = (struct dom_node_internal *) *ele;
	node->base.vtable = &_dom_html_element_vtable;
	node->vtable = &_protect_vtable;

	return _dom_html_object_element_initialise(doc, namespace, prefix, *ele);
}

/**
 * Initialise a dom_html_object_element object
 *
 * \param doc  The document object
 * \param ele  The dom_html_object_element object
 * \return DOM_NO_ERR on success, appropriate dom_exception on failure.
 */
dom_exception _dom_html_object_element_initialise(struct dom_html_document *doc,
		dom_string *namespace, dom_string *prefix,
		struct dom_html_object_element *ele)
{
	ele->form = NULL;
	return _dom_html_element_initialise(doc, &ele->base,
			doc->memoised[hds_OBJECT],
			namespace, prefix);
}

/**
 * Finalise a dom_html_object_element object
 *
 * \param ele  The dom_html_object_element object
 */
void _dom_html_object_element_finalise(struct dom_html_object_element *ele)
{
	_dom_html_element_finalise(&ele->base);
}

/**
 * Destroy a dom_html_object_element object
 *
 * \param ele  The dom_html_object_element object
 */
void _dom_html_object_element_destroy(struct dom_html_object_element *ele)
{
	_dom_html_object_element_finalise(ele);
	free(ele);
}

/*------------------------------------------------------------------------*/
/* The protected virtual functions */

/* The virtual function used to parse attribute value, see src/core/element.c
 * for detail */
dom_exception _dom_html_object_element_parse_attribute(dom_element *ele,
		dom_string *name, dom_string *value,
		dom_string **parsed)
{
	UNUSED(ele);
	UNUSED(name);

	dom_string_ref(value);
	*parsed = value;

	return DOM_NO_ERR;
}

/* The virtual destroy function, see src/core/node.c for detail */
void _dom_virtual_html_object_element_destroy(dom_node_internal *node)
{
	_dom_html_object_element_destroy((struct dom_html_object_element *) node);
}

/* The virtual copy function, see src/core/node.c for detail */
dom_exception _dom_html_object_element_copy(dom_node_internal *old,
		dom_node_internal **copy)
{
	return _dom_html_element_copy(old, copy);
}

/*-----------------------------------------------------------------------*/
/* API functions */

#define SIMPLE_GET(attr)						\
	dom_exception dom_html_object_element_get_##attr(		\
			dom_html_object_element *element,			\
			dom_string **attr)					\
{								\
	dom_exception ret;					\
	dom_string *_memo_##attr;				\
	\
	_memo_##attr =						\
	((struct dom_html_document *)			\
	 ((struct dom_node_internal *)element)->owner)->\
	memoised[hds_##attr];				\
	\
	ret = dom_element_get_attribute(element, _memo_##attr, attr); \
	\
	return ret;						\
}
#define SIMPLE_SET(attr)						\
	dom_exception dom_html_object_element_set_##attr(			\
			dom_html_object_element *element,			\
			dom_string *attr)					\
{								\
	dom_exception ret;					\
	dom_string *_memo_##attr;				\
	\
	_memo_##attr =						\
	((struct dom_html_document *)			\
	 ((struct dom_node_internal *)element)->owner)->\
	memoised[hds_##attr];				\
	\
	ret = dom_element_set_attribute(element, _memo_##attr, attr); \
	\
	return ret;						\
}

#define SIMPLE_GET_SET(attr) SIMPLE_GET(attr) SIMPLE_SET(attr)

SIMPLE_GET_SET(code);
SIMPLE_GET_SET(align);
SIMPLE_GET_SET(archive);
SIMPLE_GET_SET(border);
SIMPLE_GET_SET(code_base);
SIMPLE_GET_SET(code_type);
SIMPLE_GET_SET(data);
SIMPLE_GET_SET(height);
SIMPLE_GET_SET(name);
SIMPLE_GET_SET(standby);
SIMPLE_GET_SET(type);
SIMPLE_GET_SET(use_map);
SIMPLE_GET_SET(width);

dom_exception dom_html_object_element_get_hspace(
		dom_html_object_element *object, int32_t *hspace)
{
	return dom_html_element_get_int32_t_property(&object->base, "hspace",
			SLEN("hspace"), hspace);
}

dom_exception dom_html_object_element_set_hspace(
		dom_html_object_element *object, uint32_t hspace)
{
	return dom_html_element_set_int32_t_property(&object->base, "hspace",
			SLEN("hspace"), hspace);
}

dom_exception dom_html_object_element_get_vspace(
		dom_html_object_element *object, int32_t *vspace)
{
	return dom_html_element_get_int32_t_property(&object->base, "vspace",
			SLEN("vspace"), vspace);
}

dom_exception dom_html_object_element_set_vspace(
		dom_html_object_element *object, uint32_t vspace)
{
	return dom_html_element_set_int32_t_property(&object->base, "vspace",
			SLEN("vspace"), vspace);
}

dom_exception dom_html_object_element_get_tab_index(
		dom_html_object_element *object, int32_t *tab_index)
{
	return dom_html_element_get_int32_t_property(&object->base, "tabindex",
			SLEN("tabindex"), tab_index);
}

dom_exception dom_html_object_element_set_tab_index(
		dom_html_object_element *object, uint32_t tab_index)
{
	return dom_html_element_set_int32_t_property(&object->base, "tabindex",
			SLEN("tabindex"), tab_index);
}

dom_exception dom_html_object_element_get_declare(dom_html_object_element *ele,
		bool *declare)
{
	return dom_html_element_get_bool_property(&ele->base, "declare",
			SLEN("declare"), declare);
}

dom_exception dom_html_object_element_set_declare(dom_html_object_element *ele,
		bool declare)
{
	return dom_html_element_set_bool_property(&ele->base, "declare",
			SLEN("declare"), declare);
}

dom_exception dom_html_object_element_get_form(
		dom_html_object_element *object, dom_html_form_element **form)
{
	dom_html_document *doc
		= (dom_html_document *) ((dom_node_internal *) object)->owner;
	dom_node_internal *form_tmp = ((dom_node_internal *) object)->parent;

	while (form_tmp != NULL) {
		if (form_tmp->type == DOM_ELEMENT_NODE &&
				dom_string_caseless_isequal(form_tmp->name,
					doc->memoised[hds_FORM]))
			break;

		form_tmp = form_tmp->parent;
	}

	if (form_tmp != NULL) {
		*form = (dom_html_form_element *) form_tmp;
		return DOM_NO_ERR;
	}

	*form = NULL;

	return DOM_NO_ERR;
}

dom_exception dom_html_object_element_get_content_document(
		dom_html_object_element *object, dom_document **content_document)
{
	*content_document = (((dom_node_internal *) object)->owner);
	return DOM_NO_ERR;
}