/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
/***************************************************************************
 *            macrowindow.cc
 *
 *  Fri Aug 31 12:27:45 CEST 2007
 *  Copyright 2007 Lars Bisballe Jensen and Bent Bisballe Nyeng
 *  elsenator@gmail.com and deva@aasimon.org
 ****************************************************************************/

/*
 *  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 "macrowindow.h"

#include <QVBoxLayout>
#include <QMessageBox>
#include <QDomDocument>
#include <QDomElement>
#include <QDomNode>
#include <QByteArray>

#include "macro.h"
#include "widgets/widget.h"
#include "widgets/window.h"
#include "widgetbuilder.h"
#include "lua.h"
#include "netcom.h"

extern QString cpr;
extern QString user;
extern QString host;
extern quint16 port;

MacroWindow::MacroWindow(QDomNode &xml_doc)
  : QObject()
{
  isclosed = false;
  mainwidget = NULL;

  this->lua = new LUA(this);

  initMacro(xml_doc);

  if(mainwidget) mainwidget->show();
}

MacroWindow::~MacroWindow()
{
  delete lua;
  /*  
  QVector< Widget* >::iterator i = widgets.begin();
  while (i != widgets.end()) {
    Widget* w = *i;
    delete w;
    i++;
  }

  QVector< Widget* >::iterator j = auxwidgets.begin();
  while (j != auxwidgets.end()) {
    Widget* w = *j;
    delete w;
    j++;
  }
  */
}

void MacroWindow::initMacro(QDomNode &node)
{
  QDomElement xml_elem = node.toElement();

  if(xml_elem.tagName() == "macro") {
    // Assign the macro name and version to QStrings for use when comitting
    if(xml_elem.hasAttribute("name")) macro = xml_elem.attribute("name");
    if(xml_elem.hasAttribute("version")) version = xml_elem.attribute("version");

  } else if(xml_elem.tagName() == "scripts") {
    // Nothing to do here
  } else if(xml_elem.tagName() == "script") {

    if(xml_elem.hasAttribute("language") &&
       xml_elem.attribute("language") == "lua") {
      if(xml_elem.hasAttribute("name")) {
        luaprograms[xml_elem.attribute("name")] = xml_elem.text();
      }
    } else {
      printf("Unknown script type %s\n", xml_elem.attribute("language").toStdString().c_str());
    }

  } else if(xml_elem.tagName() == "window") {
    Window *window = new Window(xml_elem, this);
    mainwidget = window;

    QDomNodeList children = node.childNodes();

    // Build widgets
    for (int i=0; i<children.count();i++) {
      QDomNode child = children.at(i);
      widgets += widgetBuilder(child, mainwidget, this);
    }

    // Insert their values (this must be done last for lua progs to work properly)
    for (int i=0; i<children.count();i++) {
      QDomNode child = children.at(i);
      setValues(child, this);
    }

    return;
  }

  QDomNodeList children = node.childNodes();

  for (int i=0; i<children.count();i++) {
    QDomNode child = children.at(i);
    initMacro(child);
  }
}

bool MacroWindow::doCommit()
{
  // Check for, and count, errors on all entries before comitting
  int faulty = 0; // 0 initial errors

  QVector< Widget* >::iterator i = widgets.begin();
  while (i != widgets.end()) {
    Widget* w = *i;
    if(!w->isValid()) faulty++; // Regexp check, returns valid if entry passed
    i++;
  }

  // If all entries passed validation, continue commit
  if(faulty == 0) {
    Global::netcom->send(widgets, macro, version);

    return true;
  } else {
    return false;
  }
}

void MacroWindow::close()
{
  mainwidget->close();
  isclosed = true;
}

void MacroWindow::commit()
{
  if(doCommit()) {
    close();
  } else {
   QMessageBox::critical(NULL, "Fejl",
			  "Makroen er ikke udfyldt korrekt, prøv igen.\n"
			  , QMessageBox::Ok);
  }
}

void MacroWindow::reset()
{
  QMessageBox::warning(NULL, tr("Reset"),
                   tr("Du har valgt at nulstille de indtastede data.\n"
                      "Er du sikker?"),
                   QMessageBox::Yes | QMessageBox::Cancel);
  printf("MacroWindow -> resetting...\n");
}

void MacroWindow::cancel()
{
  printf("MacroWindow -> cancelling...\n");
  close();
}

void MacroWindow::cont(QString name)
{
  QString macro;
  QVector< Widget* >::iterator i=widgets.begin();
  while (i != widgets.end()) {
    Widget* w = *i;
    if(w->getName() == name) {
      macro = w->getValue();
    }
    i++;
  }
  if(doCommit()) {

    // FIXME: Hack to prevent XML clotching.
    // The server could not differentiate the commit and the request.
    delete Global::netcom;
    Global::netcom = new NetCom(host, port, user, cpr);


    // TODO: Where to get the course var??
    new_macro("example", macro);
    close();
  } else {
   QMessageBox::critical(NULL, "Fejl",
			 "Makroen er ikke udfyldt korrekt, prøv igen.\n",
			 QMessageBox::Ok);
  }
  printf("%s : MacroWindow -> continuing...\n", macro.toStdString().c_str());
}

void MacroWindow::cont_nocommit(QString name)
{
  QString macro;
  QVector< Widget* >::iterator i=widgets.begin();
  while (i != widgets.end()) {
    Widget* w = *i;
    if(w->getName() == name) {
      macro = w->getValue();
    }
    i++;
  }
  if(true/*doCommit()*/) {

    // FIXME: Hack to prevent XML clotching.
    // The server could not differentiate the commit and the request.
    delete Global::netcom;
    Global::netcom = new NetCom(host, port, user, cpr);


    // TODO: Where to get the course var??
    new_macro("example", macro);
    close();
  } else {
   QMessageBox::critical(NULL, "Fejl",
			 "Makroen er ikke udfyldt korrekt, prøv igen.\n",
			 QMessageBox::Ok);
  }
  printf("%s : MacroWindow -> continuing...\n", macro.toStdString().c_str());
}

bool MacroWindow::isClosed()
{
  return isclosed || mainwidget->isVisible() == false;
}

Widget *MacroWindow::getWidget(QString name)
{
  QVector< Widget* >::iterator i = widgets.begin();
  while (i != widgets.end()) {
    Widget* w = *i;
    if(name == w->getName()) return w;
    i++;
  }

  QVector< Widget* >::iterator j = auxwidgets.begin();
  while (j != auxwidgets.end()) {
    Widget* w = *j;
    if(name == w->getName()) return w;
    j++;
  }
  
  printf("WARNING: Widget %s not found\n", name.toStdString().c_str());

  return NULL;
}

void MacroWindow::addAuxWidgets(QVector< Widget* > ws)
{
  auxwidgets += ws;
}