/* -----------------------------
   Module xml.c
      2008-05-15: created by jcr
   -----------------------------
*/

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include "xmldata.h"

AttrList consAttrList( char *n, char *v, AttrList l )
{
  AttrList aux;

  aux = (AttrList)malloc(sizeof(Attr));
  aux->name = n;
  aux->value = v;
  aux->next = l;

  return aux;
}


void showAttrList( AttrList l )
{
  if(l)
    {
      printf("A%s   %s\n",l->name,l->value);
      showAttrList(l->next);
    }
}


AttrList add2AttrList( AttrList l1, AttrList l2)
{
  l2->next = l1;
  return l2;
}
 
DATPtr consDAT( ProcInstNodePtr decl, ElemNodePtr root, NodePtr child )
{
  DATPtr aux;

  aux = (DATPtr)malloc(sizeof(DAT));
  aux->declaration = decl;
  aux->root = root;
  aux->child = child;

  return aux;
}


NodePtr consNodefromText( TextNodePtr n )
{
  NodePtr aux;

  aux = (NodePtr)malloc(sizeof(Node));
  aux->type = TEXTNODE;
  aux->val.t = n;
  return aux;
}

NodePtr consNodefromElem( ElemNodePtr n )
{
  NodePtr aux;

  aux = (NodePtr)malloc(sizeof(Node));
  aux->type = ELEMNODE;
  aux->val.e = n;
  return aux;
}


void    showNodeESIS( NodePtr node )
{
  switch(node->type)
  {
    case TEXTNODE : printf("-%s\n",node->val.t->contents);
                    if(node->val.t->sibling)
                      showNodeESIS(node->val.t->sibling);
                    break;
    case ELEMNODE : printf("(%s\n",node->val.e->name);
                    showAttrList(node->val.e->attrs);
                    if(node->val.e->child)
                      showNodeESIS(node->val.e->child);
                    printf(")%s\n",node->val.e->name);
                    if(node->val.e->sibling)
                      showNodeESIS(node->val.e->sibling);
  }
}


NodePtr add2NodeList( NodePtr nl, NodePtr node )
{ 
  if(nl)
  {
    switch(nl->type)
    {
      case TEXTNODE : nl->val.t->sibling = add2NodeList(nl->val.t->sibling,node);
                      break;
      case ELEMNODE : nl->val.e->sibling = add2NodeList(nl->val.e->sibling,node);
    }
    return nl;
  }
  else
    return node;
}


ElemNodePtr consElemNode( char * name, AttrList attrlist, NodePtr s, NodePtr c )
{
  ElemNodePtr aux;

  aux = (ElemNodePtr)malloc(sizeof(ElemNode));
  aux->name = strdup(name);
  aux->attrs = attrlist;
  aux->sibling = s;
  aux->child = c;

  return aux;
}


TextNodePtr consTextNode( char *c, NodePtr s )
{
  TextNodePtr aux;

  aux = (TextNodePtr)malloc(sizeof(TextNode));
  aux->contents = strdup(c);
  aux->sibling = s;

  return aux;
}