// Own includes
#include "plistserializer.h"

#include <QObject>
#include <fstream>
#include <iostream>
#include <iterator>
#include <sstream>

#include "Plist.hpp"
using namespace std;

// Qt includes
#include <QDate>
#include <QDateTime>
#include <QDebug>
#include <QDir>
#include <QDomDocument>
#include <QDomElement>
#include <QFile>
#include <QTextStream>

#include "mainwindow.h"
#include "ui_mainwindow.h"

extern MainWindow* mw_one;

static QDomElement textElement(QDomDocument& doc, const char* tagName,
                               QString contents) {
  QDomElement tag = doc.createElement(QString::fromLatin1(tagName));
  tag.appendChild(doc.createTextNode(contents));
  return tag;
}

static QDomElement serializePrimitive(QDomDocument& doc,
                                      const QVariant& variant) {
  QDomElement result;
  if (variant.type() == QVariant::Bool) {
    result = doc.createElement(variant.toBool() ? QStringLiteral("true")
                                                : QStringLiteral("false"));
  } else if (variant.type() == QVariant::Date) {
    result = textElement(doc, "date", variant.toDate().toString(Qt::ISODate));
  } else if (variant.type() == QVariant::DateTime) {
    result =
        textElement(doc, "date", variant.toDateTime().toString(Qt::ISODate));
  } else if (variant.type() == QVariant::ByteArray) {
    result = textElement(doc, "data",
                         QString::fromLatin1(variant.toByteArray().toBase64()));
  } else if (variant.type() == QVariant::String) {
    result = textElement(doc, "string", variant.toString());
  } else if (variant.type() == QVariant::Int) {
    result = textElement(doc, "integer", QString::number(variant.toInt()));

  } else if (variant.type() == QVariant::LongLong) {
    //特别注意：必须加入长整型，否在当数字太大时，会出现问题，自动将之换成real类型
    result = textElement(doc, "integer", QString::number(variant.toLongLong()));

  }

  else if (variant.canConvert(QVariant::Double)) {
    QString num;
    num.setNum(variant.toDouble());
    result = textElement(doc, "real", num);
  }
  return result;
}

QDomElement PListSerializer::serializeElement(QDomDocument& doc,
                                              const QVariant& variant) {
  if (variant.type() == QVariant::Map) {
    return serializeMap(doc, variant.toMap());
  } else if (variant.type() == QVariant::List) {
    return serializeList(doc, variant.toList());
  } else {
    return serializePrimitive(doc, variant);
  }
}

QDomElement PListSerializer::serializeList(QDomDocument& doc,
                                           const QVariantList& list) {
  QDomElement element = doc.createElement(QStringLiteral("array"));
  foreach (QVariant item, list) {
    element.appendChild(serializeElement(doc, item));
  }
  return element;
}

QDomElement PListSerializer::serializeMap(QDomDocument& doc,
                                          const QVariantMap& map) {
  QDomElement element = doc.createElement(QStringLiteral("dict"));
  QList<QString> keys = map.keys();
  foreach (QString key, keys) {
    QDomElement keyElement = textElement(doc, "key", key);
    element.appendChild(keyElement);
    element.appendChild(serializeElement(doc, map[key]));
  }
  return element;
}

QString PListSerializer::toPList(const QVariant& variant, QString FileName) {
  QDomDocument document(
      "plist PUBLIC \"-//Apple//DTD PLIST 1.0//EN\" "
      "\"http://www.apple.com/DTDs/PropertyList-1.0.dtd\"");

  document.appendChild(document.createProcessingInstruction(
      QStringLiteral("xml"),
      QStringLiteral("version=\"1.0\" encoding=\"UTF-8\"")));

  QDomElement plist = document.createElement(QStringLiteral("plist"));

  plist.setAttribute(QStringLiteral("version"), QStringLiteral("1.0"));
  document.appendChild(plist);
  plist.appendChild(serializeElement(document, variant));

  bool useQtWriteXML = true;
  //保存文件
  if (useQtWriteXML) {
    QFile file(FileName);
    if (file.open(QIODevice::WriteOnly | QIODevice::Truncate |
                  QIODevice::Text)) {
      QTextStream out(&file);
      out.setCodec("UTF-8");
      // document.save(out, 4, QDomNode::EncodingFromTextStream);
      document.save(out, 4, QDomNode::EncodingFromDocument);
      file.close();
    }
  } else {
    QFileInfo fi(FileName);
    if (fi.exists()) {
      map<string, boost::any> dict;

      QString path = fi.path();
      QDir dir;
      if (dir.exists(path)) dir.setCurrent(path);

      QString str = fi.fileName();
      string baseName = string(str.toLocal8Bit());

      QString strData = document.toString();
      std::string mystring = strData.toStdString();
      std::istringstream is(mystring);

      Plist::readPlist(is, dict);
      // Plist::readPlist(baseName.c_str(), dict);
      Plist::writePlistXML(baseName.c_str(), dict);
    }
  }

  return document.toString();
}

bool PListSerializer::fileValidation(QString FileName) {
  QFileInfo fi(FileName);
  if (fi.exists()) {
    map<string, boost::any> dict;

    QString path = fi.path();
    QDir dir;
    if (dir.exists(path)) dir.setCurrent(path);

    QString str = fi.fileName();
    string baseName = string(str.toLocal8Bit());
    try {
      Plist::readPlist(baseName.c_str(), dict);
    } catch (...) {
      return false;
    }
  }

  return true;
}