/*****************************************************************************
** QNapi
** Copyright (C) 2008-2017 Piotr Krzemiński <pio.krzeminski@gmail.com>
**
** This program 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.
**
** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
**
*****************************************************************************/

#include "subtitlepostprocessor.h"

#include <QFile>
#include <QFileInfo>
#include <QTextCodec>
#include <QTextStream>

SubtitlePostProcessor::SubtitlePostProcessor(
    const PostProcessingConfig& ppConfig,
    const QSharedPointer<const SubtitleConverter>& subtitleConverter)
    : ppConfig(ppConfig), subtitleConverter(subtitleConverter) {}

void SubtitlePostProcessor::perform(const QString& movieFilePath,
                                    const QString& subtitleFilePath) const {
  if (ppConfig.removeWordsEnabled()) {
    ppRemoveLinesContainingWords(subtitleFilePath, ppConfig.removeWords());
  }

  switch (ppConfig.encodingChangeMethod()) {
    case ECM_REPLACE_DIACRITICS:
      ppReplaceDiacriticsWithASCII(subtitleFilePath);
      break;
    case ECM_CHANGE:
      if (!ppConfig.encodingAutoDetectFrom() ||
          !ppChangeSubtitlesEncoding(subtitleFilePath, ppConfig.encodingTo())) {
        ppChangeSubtitlesEncoding(subtitleFilePath, ppConfig.encodingFrom(),
                                  ppConfig.encodingTo());
      }
      break;
    case ECM_ORIGINAL:
      // Nie ruszaj pobranych napisów!
      break;
  }

  if (!ppConfig.subFormat().isEmpty()) {
    QString targetFormat = ppConfig.subFormat();
    subtitleConverter->convertSubtitles(subtitleFilePath, targetFormat,
                                        subtitleFilePath, movieFilePath);
  }
}

bool SubtitlePostProcessor::ppReplaceDiacriticsWithASCII(
    const QString& subtitleFilePath) const {
  if (!QFileInfo(subtitleFilePath).exists()) return false;

  QString from = encodingUtils.detectFileEncoding(subtitleFilePath);

  if (from.isEmpty()) return false;

  QFile f(subtitleFilePath);
  if (!f.open(QIODevice::ReadOnly)) return false;

  QByteArray fileContent = f.readAll();

  QString contentStr =
      QTextCodec::codecForName(qPrintable(from))->toUnicode(fileContent);
  f.close();

  fileContent.clear();
  fileContent.append(encodingUtils.replaceDiacriticsWithASCII(contentStr));

  if (!f.open(QIODevice::WriteOnly)) return false;

  f.write(fileContent);
  f.close();

  return true;
}

bool SubtitlePostProcessor::ppChangeSubtitlesEncoding(
    const QString& subtitleFilePath, const QString& from,
    const QString& to) const {
  QFile f(subtitleFilePath);
  if (!f.open(QIODevice::ReadOnly)) return false;

  QByteArray fileContent = f.readAll();

  QString contentStr =
      QTextCodec::codecForName(qPrintable(from))->toUnicode(fileContent);
  f.close();

  if (to.compare("UTF-8", Qt::CaseInsensitive) != 0) {
    fileContent = QTextCodec::codecForName(qPrintable(to))
                      ->fromUnicode(contentStr.constData(), contentStr.size());
  } else {
    fileContent.clear();
    fileContent.append(contentStr);
  }

  if (!f.open(QIODevice::WriteOnly)) return false;

  f.write(fileContent);
  f.close();

  return true;
}

bool SubtitlePostProcessor::ppChangeSubtitlesEncoding(
    const QString& subtitleFilePath, const QString& to) const {
  if (!QFileInfo(subtitleFilePath).exists()) return false;

  QString from = encodingUtils.detectFileEncoding(subtitleFilePath);

  if (from.isEmpty()) return false;

  return ppChangeSubtitlesEncoding(from, to);
}

bool SubtitlePostProcessor::ppRemoveLinesContainingWords(
    const QString& subtitleFilePath, QStringList wordList) const {
  if (!QFileInfo(subtitleFilePath).exists()) return false;

  wordList = wordList.filter(QRegExp("^(.+)$"));

  QString fromCodec = encodingUtils.detectFileEncoding(subtitleFilePath);

  if (fromCodec.isEmpty()) fromCodec = ppConfig.encodingFrom();

  QFile f(subtitleFilePath);
  if (!f.open(QIODevice::ReadOnly | QIODevice::Text)) return false;

  QList<QByteArray> lines = f.readAll().split('\n');
  QList<QByteArray> out;

  foreach (QByteArray line, lines) {
    int i;
    while ((i = line.indexOf('\r')) >= 0) line.remove(i, 1);

    QTextStream ts(line);
    ts.setCodec(qPrintable(fromCodec));
    QString encLine = ts.readAll();

    if (encLine.isEmpty()) {
      out << line;
      continue;
    }

    bool found = false;
    foreach (QString word, wordList) {
      if (encLine.contains(word, Qt::CaseInsensitive)) {
        found = true;
        break;
      }
    }
    if (found) continue;

    out << line;
  }

  f.close();

  if (!f.open(QIODevice::WriteOnly | QIODevice::Text | QIODevice::Truncate))
    return false;

  foreach (QByteArray line, out) {
    f.write(line);
    f.write("\n", 1);
  }
  f.close();

  return true;
}