/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
/***************************************************************************
 *            xmlparser.cc
 *
 *  Fri Aug 31 09:30:06 CEST 2007
 *  Copyright 2007 Bent Bisballe Nyeng, Lars Bisballe Jensen and Peter Skaarup
 *  deva@aasimon.org, elsenator@gmail.com and piparum@piparum.dk
 ****************************************************************************/

/*
 *  This file is part of Pracro.
 *
 *  Pracro is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  Pracro is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with Pracro; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA.
 */
#include "xmlparser.h"

#include <stdio.h>
#include <string.h>
#include <expat.h>

#include <string>
#include <map>

static bool done = false;

static void start_hndl(void *p, const char *el, const char **attr)
{
  Transaction *transaction = (Transaction*)XML_GetUserData(p);

  //  printf("Start tag [%s]\n", el);

  // Convert to comfy C++ values...
  std::string name = el;
  std::map< std::string, std::string > attributes;

  while(*attr) {
    std::string at_name = *attr;
    attr++;
    std::string at_value = *attr;
    attr++;

    attributes.insert(make_pair(at_name, at_value));
  }
  /*
    std::map< std::string, std::string >::iterator i = attributes.begin();
    while(i != attributes.end()) {
      printf("%s=%s\n", i->first.c_str(), i->second.c_str());
      i++;
    }
  */

  // Do something reasonable with them...
  if(name == "pracro") {
    transaction->user = attributes["user"];
    transaction->cpr = attributes["cpr"];
    transaction->version = attributes["version"];
  }

  if(name == "request") {
    Request r;
    r.macro = attributes["macro"];
    transaction->requests.push_back(r);
  }

  if(name == "commit") {
    Commit c;
    c.macro = attributes["macro"];
    c.version = attributes["version"];
    transaction->commits.push_back(c);
  }

  if(name == "field") {
    //    Field f;
    //    f.name = attributes["name"];
    //    f.value = attributes["value"];
    //    transaction->commits.back().fields.push_back(f);
    transaction->commits.back().fields[attributes["name"]] = attributes["value"];
    //    printf("[%s]=[%s]\n", f.name.c_str(), f.value.c_str());
  }

}

static void end_hndl(void *p, const char *el)
{
  //  printf("End tag [%s]\n", el);
  if(!strcmp(el, "pracro")) done = true;
}

void parse(TCPSocket &socket, Transaction &transaction)
{

  XML_Parser p = XML_ParserCreate(NULL);
  if (! p) {
    fprintf(stderr, "Couldn't allocate memory for parser\n");
    // throw Exception(...);
    return;
  }

  XML_SetUserData(p, &transaction);
  XML_UseParserAsHandlerArg(p);
  XML_SetElementHandler(p, start_hndl, end_hndl);

  while(!done) {
    char buf[32];
    int len;

    memset(buf, 0, sizeof(buf));
    len = socket.read(buf, sizeof(buf) - 1);

    done = len == 0;

    if (! XML_Parse(p, buf, len, done)) {
      fprintf(stderr, "Parse error at line %d:\n%s\n",
	      XML_GetCurrentLineNumber(p),
	      XML_ErrorString(XML_GetErrorCode(p)));
      // throw Exception(...);
      return;
    }
  }

  //  printf("%d requests\n", transaction.requests.size());

}