/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
/***************************************************************************
 *            macro_parser.cc
 *
 *  Mon Sep 24 10:49:55 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 "macro_parser.h"

// For XML
#include <config.h>

// For open, read and close
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <unistd.h>

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

MacroParser::MacroParser(std::string name, Macro &macro)
{
  this->macro = &macro;

  std::string macrofile = std::string(XML) + "/" + name + ".xml";
  fd = open(macrofile.c_str(), O_RDONLY);

  if(fd == -1) {
    printf("Cannot open file \"%s\"...", macrofile.c_str());
    printf("failed!\n");
    return;
  }
}

MacroParser::~MacroParser()
{
  if(fd != -1) close(fd);
}

int MacroParser::readData(char *data, size_t size)
{
  return read(fd, data, size);
}

void MacroParser::startTag(std::string name, std::map< std::string, std::string> attributes)
{
  if(name == "include") {
    Macro inc;
    MacroParser parser(attributes["name"], inc);
    parser.parse();

    WidgetList::iterator w = inc.widgets.front().widgets.begin();
    while(w != inc.widgets.front().widgets.end()) {
      stack.back()->widgets.push_back(*w);
      w++;
    }

    return; // Don't do further parsing of this tag.
  }

  if(name == "macro") {

    macro->name = attributes["name"];
    macro->version = attributes["version"];
    macro->format = attributes["resume"];

    return; // Don't do further parsing of this tag.
  }

  if(name == "macrolist") {
    std::map< std::string, int > macro_usage;

    macro_usage["example"] = 3;
    macro_usage["pimmelsus"] = 2;
    macro_usage["dimmer"] = 1;
    macro_usage["fnullemam"] = 2;
    macro_usage["ektosup"] = 0;
    macro_usage["fillehej"] = 0;
    macro_usage["heppelis"] = 0;
    macro_usage["simmermuh"] = 0;
    macro_usage["skilletran"] = 0;
    macro_usage["futterbah"] = 0;
    
    Widget macrolist;
    Widget *wp;

    if(stack.size() > 0) {// We only pushback the child if there is a parent.
      stack.back()->widgets.push_back(macrolist);
      wp = &stack.back()->widgets.back();
    } else {
      macro->widgets.push_back(macrolist);
      wp = &macro->widgets.back();
    }
    stack.push_back(wp);
    
    wp->type = "listbox";
    wp->properties["name"] = attributes["name"];
    wp->properties["value"] = "example";
    wp->properties["help"] = attributes["Noget info tekst."];

    {
      Widget item;
      item.type = "item";
      item.properties["type"] = "header";
      item.properties["caption"] = "Oftest brugte makroer:";
      wp->widgets.push_back(item);
    }

    std::map< std::string, std::string > macro_usage_most;
    std::map< std::string, int >::iterator i = macro_usage.begin();
    while(i != macro_usage.end()) {
      char buf[32];
      // FIXME: Ugly hack to make sorting work on equal usage number (sub sort alphabetically)
      // This only works when usage count is less than 999.
      sprintf(buf, "%03d", 999 - (*i).second);
      std::string key = std::string(buf) + "-" + (*i).first;
      if((*i).second != 0) macro_usage_most[key] = (*i).first;
      i++;
    }

    std::map< std::string, std::string >::iterator j = macro_usage_most.begin();
    while(j != macro_usage_most.end()) {
      Widget item;
      item.type = "item";
      item.properties["value"] = (*j).second;
      item.properties["caption"] = (*j).second;
      wp->widgets.push_back(item);
      j++;
    }

    {
      Widget item;
      item.type = "item";
      item.properties["type"] = "separator";
      wp->widgets.push_back(item);
    }
    
    {
      Widget item;
      item.type = "item";
      item.properties["type"] = "header";
      item.properties["caption"] = "Alle makroer alfabetisk:";
      wp->widgets.push_back(item);
    }
   
    std::map< std::string, int >::iterator k = macro_usage.begin();
    while(k != macro_usage.end()) {
      Widget item;
      item.type = "item";
      item.properties["value"] = (*k).first;
      item.properties["caption"] = (*k).first;
      wp->widgets.push_back(item);
      k++;
    }

    return;// Don't do further parsing of this tag.
  }

  Widget widget;
  widget.type = name;

  Widget *wp;

  if(stack.size() > 0) {// We only pushback the child if there is a parent.
    stack.back()->widgets.push_back(widget);
    wp = &stack.back()->widgets.back();
  } else {
    macro->widgets.push_back(widget);
    wp = &macro->widgets.back();
  }
  stack.push_back(wp);

  std::map< std::string, std::string >::iterator i = attributes.begin();
  while(i != attributes.end()) {
    wp->properties[i->first] = i->second;

    i++;
  }
}

void MacroParser::endTag(std::string name)
{
  if(name != "include") stack.pop_back();
  //  if(!strcmp(el, "macro")) done = true;
}