#include "XmlWidget.h"
#include <QWidget>
#include "ConnectionLayout.h"
#include <stdio.h>

XmlWidget::XmlWidget(QString name,QString type,XmlWidget* parent):QObject()
{
    childs=new QList<XmlWidget*>;
    isContainer=false;
    isExpandable=false;
    visible_widget=NULL;
    parent_widget=parent;

    red_pal.setColor( QPalette::Text, QColor(255,0,0) );
    red_pal.setColor( QPalette::Foreground, QColor(255,0,0) );
    red_pal_greyed.setColor( QPalette::Text, QColor(128,0,0) );
    red_pal_greyed.setColor( QPalette::Foreground, QColor(128,0,0) );

    black_pal.setColor( QPalette::Text, QColor(0,0,0) );
    black_pal.setColor( QPalette::Foreground, QColor(0,0,0) );
    black_pal_greyed.setColor( QPalette::Text, QColor(128,128,128) );
    black_pal_greyed.setColor( QPalette::Foreground, QColor(128,128,128) );

    setObjectName(name);

    if(parent!=NULL)
    {
        parent->childs->append(this);

        document=parent->document.cloneNode(true).toDocument();

        write_elem = QDomElement(document.createElement(type));
        write_elem.setAttribute("name", name);
        //recupere le node le plus profond
        QDomNode node=document.firstChild();
        while(node.firstChild().isNull()==false)
        {
            node=node.firstChild();
        }
        node.appendChild(write_elem);
    }
    else
    {
        document=QDomDocument("remote_ui_xml");
        write_elem = QDomElement(document.createElement(type));
        write_elem.setAttribute("name", name);
        document.appendChild(write_elem);
    }
}

XmlWidget::~XmlWidget()
{
    if(parent_widget!=NULL) parent_widget->childs->removeOne(this);

    //on efface les widgets enfants
    //dans le delete child on modifie le child du parent, donc on se refere toujours au premier
    while(childs->count()!=0) {
        delete childs->first();
    }

    delete childs;
    if(visible_widget!=NULL) {
        delete visible_widget;
    }
}

QString XmlWidget::Name(void)
{
    return  write_elem.attribute("name");
}

void XmlWidget::SetIsContainer(bool status) {
    isContainer=status;
}

void XmlWidget::SetIsExpandable(bool status) {
    isExpandable=status;
}

XmlWidget* XmlWidget::GetXmlWidget(QString name,QString type)
{
    //printf("recherche %s %s\n",name.toLocal8Bit().constData(),type.toLocal8Bit().constData());

    for(int i=0;i<childs->count();i++)
    {
        //printf("child name %s\n",childs->at(i)->write_elem.attribute("name").toLocal8Bit().constData());
        //printf("child tag %s\n",childs->at(i)->write_elem.tagName().toLocal8Bit().constData());
        if(childs->at(i)->write_elem.attribute("name")==name && childs->at(i)->write_elem.tagName()==type) return childs->at(i);

    }
    return NULL;
}


void XmlWidget::ParseXml(QDomElement to_parse) {

    if(to_parse.isNull()) return;

    QString type=to_parse.tagName();
    QString name=to_parse.attribute("name");

//printf("parse %s %s\n",type.toLocal8Bit().constData(),name.toLocal8Bit().constData());
    XmlWidget* match;
    match=GetXmlWidget(name,type);

    if(match==NULL) {
        //printf("not match\n");
        XmlEvent(to_parse);
    } else {
        //printf("match\n");
        //si on a une balise IsEnabled, on ne traite que ca
        if(match->visible_widget!=NULL) {
            if(to_parse.attribute("IsEnabled")=="0") {
                match->visible_widget->setEnabled(false);
                return;
            }
            if(to_parse.attribute("IsEnabled")=="1") {
                match->visible_widget->setEnabled(true);
                return;
            }
        }

        //si on a une balise delete, on ne traite que ca
        if(to_parse.attribute("Delete")=="1") {
            //printf("delete flag\n");
            if(match->isContainer==true && match->childs->count()!=0) {
                //printf("non vide %s\n",match->objectName().toLocal8Bit().constData());
                return;
            }

            delete match;
            return;
        }

        if(to_parse.firstChild().isNull()==true && match->isExpandable==false) {
            QString new_name;
            printf("possible doublon\n");
            for(int i=0;i<65535;i++) {
                new_name=QString("%1_%2").arg(name).arg(i);
                bool continuer=false;
                for(int i=0;i<childs->count();i++) {
                    if(childs->at(i)->write_elem.attribute("name")==new_name) {
                        continuer=true;
                        break;
                    }
                }
                if(continuer==false) break;
            }
            printf("new_name %s\n",new_name.toLocal8Bit().constData());
            to_parse.setAttribute("name",new_name);
            to_parse.setAttribute("old_name",name);

            XmlEvent(to_parse);

            //return -1;//ou retourner le xml a renvoyer pour chager de nom
        } else {
            if(to_parse.firstChild().toElement().isNull()) {
                match->XmlEvent(to_parse);
                return;
            } else {
                match->ParseXml(to_parse.firstChild().toElement());
            }
        }
    }
}

void XmlWidget::LoadXml(QDomElement to_parse) {
    if(to_parse.isNull()) return;

    LoadEvent(to_parse);

    QDomElement elem=to_parse.firstChild().toElement();

    while(!elem.isNull()) {

        QString type=elem.tagName();
        QString name=elem.attribute("name");
//printf("%s %s\n",type.toLocal8Bit().constData(),name.toLocal8Bit().constData());
        XmlWidget* match;
        match=GetXmlWidget(name,type);

        if(match!=NULL) {
            //printf("match\n");
            match->LoadXml(elem);
        }
        elem=elem.nextSibling().toElement();
    }
}

void XmlWidget::GetFullXml(QDomElement* doc) {
    QDomDocument tmp_doc=XmlDoc();
    merge((QDomElement*)&tmp_doc,doc);

    for(int i=0;i<childs->count();i++) {
        childs->at(i)->GetFullXml(doc);
    }
}

void XmlWidget::GetUpdateXml(QDomElement* doc) {
    if(IsUptodate()==false && isContainer==false) {
        SetUptodate();
        QDomDocument tmp_doc=XmlDoc();
        merge((QDomElement*)&tmp_doc,doc);
    }

    for(int i=0;i<childs->count();i++) {
        childs->at(i)->GetUpdateXml(doc);
    }
}

void XmlWidget::ResetAllChilds(void)
{
    Reset();
    for(int i=0;i<childs->count();i++)
    {
        childs->at(i)->ResetAllChilds();
    }
}

void XmlWidget::merge(QDomElement* from,QDomElement* into)
{
    QDomElement tmp_into,tmp_from;
    tmp_from=from->firstChildElement();

    while(tmp_from.isNull()==false)
    {
        //search corresponding child
        bool match=false;
        tmp_into=into->firstChildElement(tmp_from.tagName());
        while(tmp_into.isNull()==false)
        {
            if(tmp_into.attribute("name")==tmp_from.attribute("name"))
            {
               merge(&tmp_from,&tmp_into);
               match=true;
               break;
            }
            tmp_into=tmp_into.nextSiblingElement(tmp_from.tagName());
        }

        if(match==false)
        {
            into->appendChild(tmp_from.cloneNode());
        }

        tmp_from=tmp_from.nextSiblingElement();
    }
}

QDomDocument XmlWidget::XmlDoc(void)
{
    return document.cloneNode(true).toDocument();
}

QDomElement* XmlWidget::AddXmlChild(QString type)
{
    QDomElement* elem;

    elem = new QDomElement(document.createElement(type));
    write_elem.appendChild(*elem);

    return elem;
}

void XmlWidget::RemoveXmlChild(QDomElement* element)
{
    write_elem.removeChild(*element);
    delete element;
}

void XmlWidget::ClearDoc(void)
{
    document.clear();
}

void XmlWidget::SetValue(QString value)
{
    write_elem.setAttribute("value",value);
}

void XmlWidget::SetAttribute(const QString& name, const QString& value)
{
     write_elem.setAttribute(name,value);
}

void XmlWidget::SetAttribute(const QString& name, qlonglong value)
{
    write_elem.setAttribute(name,value);
}

void XmlWidget::SetAttribute(const QString& name, qulonglong value)
{
    write_elem.setAttribute(name,value);
}

void XmlWidget::SetAttribute(const QString& name, float value)
{
    write_elem.setAttribute(name,value);
}

void XmlWidget::SetAttribute(const QString& name, double value)
{
    write_elem.setAttribute(name,value);
}

void XmlWidget::RemoveAttribute(const QString& name) {
    write_elem.removeAttribute(name);
}

void XmlWidget::RenamedFrom(QString old_name)
{
    QString name=write_elem.attribute("name");
    SetAttribute("name",old_name);
    SetAttribute("new_name",name);
    connectionLayout()->XmlToSend(XmlDoc());
    SetAttribute("name",name);
    write_elem.removeAttribute("new_name");

}

ConnectionLayout* XmlWidget::connectionLayout(void)
{
    if(parent_widget!=NULL) {
        return (ConnectionLayout*)(parent_widget->connectionLayout());
    } else {
        return (ConnectionLayout*)this;
    }
}