/* $Id: igd_desc_parse.c,v 1.8 2008/04/23 11:51:06 nanard Exp $ */
/* Project : miniupnp
 * http://miniupnp.free.fr/
 * Author : Thomas Bernard
 * Copyright (c) 2005-2008 Thomas Bernard
 * This software is subject to the conditions detailed in the
 * LICENCE file provided in this distribution.
 * */
#include "igd_desc_parse.h"
#include <stdio.h>
#include <string.h>

/* TODO : rewrite this code so it correctly handle descriptions with
 * both WANIPConnection and/or WANPPPConnection */

/* Start element handler :
 * update nesting level counter and copy element name */
void
IGDstartelt (void *d, const char *name, int l)
{
  struct IGDdatas *datas = (struct IGDdatas *) d;
  memcpy (datas->cureltname, name, l);
  datas->cureltname[l] = '\0';
  datas->level++;
  if ((l == 7) && !memcmp (name, "service", l))
    {
      datas->controlurl_tmp[0] = '\0';
      datas->eventsuburl_tmp[0] = '\0';
      datas->scpdurl_tmp[0] = '\0';
      datas->servicetype_tmp[0] = '\0';
    }
}

/* End element handler :
 * update nesting level counter and update parser state if
 * service element is parsed */
void
IGDendelt (void *d, const char *name, int l)
{
  struct IGDdatas *datas = (struct IGDdatas *) d;
  datas->level--;
  /*printf("endelt %2d %.*s\n", datas->level, l, name); */
  if ((l == 7) && !memcmp (name, "service", l))
    {
      /*
         if( datas->state < 1
         && !strcmp(datas->servicetype,
         //   "urn:schemas-upnp-org:service:WANIPConnection:1") )
         "urn:schemas-upnp-org:service:WANCommonInterfaceConfig:1"))
         datas->state ++;
       */
      if (0 == strcmp (datas->servicetype_tmp,
                       "urn:schemas-upnp-org:service:WANCommonInterfaceConfig:1"))
        {
          memcpy (datas->controlurl_CIF, datas->controlurl_tmp,
                  MINIUPNPC_URL_MAXSIZE);
          memcpy (datas->eventsuburl_CIF, datas->eventsuburl_tmp,
                  MINIUPNPC_URL_MAXSIZE);
          memcpy (datas->scpdurl_CIF, datas->scpdurl_tmp,
                  MINIUPNPC_URL_MAXSIZE);
          memcpy (datas->servicetype_CIF, datas->servicetype_tmp,
                  MINIUPNPC_URL_MAXSIZE);
        }
      else if (0 == strcmp (datas->servicetype_tmp,
                            "urn:schemas-upnp-org:service:WANIPConnection:1")
               || 0 == strcmp (datas->servicetype_tmp,
                               "urn:schemas-upnp-org:service:WANPPPConnection:1"))
        {
          memcpy (datas->controlurl, datas->controlurl_tmp,
                  MINIUPNPC_URL_MAXSIZE);
          memcpy (datas->eventsuburl, datas->eventsuburl_tmp,
                  MINIUPNPC_URL_MAXSIZE);
          memcpy (datas->scpdurl, datas->scpdurl_tmp, MINIUPNPC_URL_MAXSIZE);
          memcpy (datas->servicetype, datas->servicetype_tmp,
                  MINIUPNPC_URL_MAXSIZE);
        }
    }
}

/* Data handler :
 * copy data depending on the current element name and state */
void
IGDdata (void *d, const char *data, int l)
{
  struct IGDdatas *datas = (struct IGDdatas *) d;
  char *dstmember = 0;
  /*printf("%2d %s : %.*s\n",
     datas->level, datas->cureltname, l, data);   */
  if (!strcmp (datas->cureltname, "URLBase"))
    dstmember = datas->urlbase;
  else if (!strcmp (datas->cureltname, "serviceType"))
    dstmember = datas->servicetype_tmp;
  else if (!strcmp (datas->cureltname, "controlURL"))
    dstmember = datas->controlurl_tmp;
  else if (!strcmp (datas->cureltname, "eventSubURL"))
    dstmember = datas->eventsuburl_tmp;
  else if (!strcmp (datas->cureltname, "SCPDURL"))
    dstmember = datas->scpdurl_tmp;
/*	else if( !strcmp(datas->cureltname, "deviceType") )
		dstmember = datas->devicetype_tmp;*/
  if (dstmember)
    {
      if (l >= MINIUPNPC_URL_MAXSIZE)
        l = MINIUPNPC_URL_MAXSIZE - 1;
      memcpy (dstmember, data, l);
      dstmember[l] = '\0';
    }
}

void
printIGD (struct IGDdatas *d)
{
  printf ("urlbase = %s\n", d->urlbase);
  printf ("WAN Device (Common interface config) :\n");
  /*printf(" deviceType = %s\n", d->devicetype_CIF); */
  printf (" serviceType = %s\n", d->servicetype_CIF);
  printf (" controlURL = %s\n", d->controlurl_CIF);
  printf (" eventSubURL = %s\n", d->eventsuburl_CIF);
  printf (" SCPDURL = %s\n", d->scpdurl_CIF);
  printf ("WAN Connection Device (IP or PPP Connection):\n");
  /*printf(" deviceType = %s\n", d->devicetype); */
  printf (" servicetype = %s\n", d->servicetype);
  printf (" controlURL = %s\n", d->controlurl);
  printf (" eventSubURL = %s\n", d->eventsuburl);
  printf (" SCPDURL = %s\n", d->scpdurl);
}