#include "qtcommon.h"
#include "extension.h"
#include "network.h"
#include "devtools.h"

extern const wchar_t* TRANSLATION_ERROR;
extern Synchronized<std::wstring> translateTo;

bool useCache = true, autostartchrome = false, headlesschrome = true;
int maxSentenceSize = 500, chromeport = 9222;

const char* TRANSLATION_PROVIDER = "DevTools DeepL Translate";
QString URL = "https://www.deepl.com/en/translator";
QStringList languages
{
	"Chinese (simplified): zh",
	"Dutch: nl",
	"English: en",
	"French: fr",
	"German: de",
	"Italian: it",
	"Japanese: ja",
	"Polish: pl",
	"Portuguese: pt",
	"Russian: ru",
	"Spanish: es",
};

int docfound = -1;
int targetNodeId = -1;
int session = -1;

std::pair<bool, std::wstring> Translate(const std::wstring& text, DevTools* devtools)
{
	if (devtools->getStatus() == "Stopped")
	{
		return { false, FormatString(L"Error: chrome not started") };
	}
	if ((devtools->getStatus().startsWith("Fail")) || (devtools->getStatus().startsWith("Unconnected")))
	{
		return { false, FormatString(L"Error: %s", S(devtools->getStatus())) };
	}
	if (session != devtools->getSession())
	{
		session = devtools->getSession();
		docfound = -1;
		targetNodeId = -1;
	}

	QString qtext = S(text);

	// Check text for repeated symbols (e.g. only ellipsis)
	if (qtext.length() > 2)
		for (int i = 1; i < (qtext.length() - 1); i++)
		{
			if (qtext[i] != qtext[1])
				break;
			if ((i + 2) == qtext.length() && (qtext.front() == qtext.back()))
			{
				return { false, text };
			}
		}

	// Add spaces near ellipsis for better translation and check for quotes
	qtext.replace(QRegularExpression("[" + QString(8230) + "]" + "[" + QString(8230) + "]" + "[" + QString(8230) + "]"), QString(8230));
	qtext.replace(QRegularExpression("[" + QString(8230) + "]" + "[" + QString(8230) + "]"), QString(8230));
	qtext.replace(QRegularExpression("[" + QString(8230) + "]"), " " + QString(8230) + " ");
	bool checkquote = false;
	if ((qtext.front() == QString(12300)) && (qtext.back() == QString(12301)))
	{
		checkquote = true;
		qtext.remove(0, 1);
		qtext.chop(1);
	}
	QJsonObject root;
	QJsonObject result;

	// Enable page feedback
	if (!devtools->SendRequest("Page.enable", {}, root))
	{
		return { false, FormatString(L"Error: page enable failed! %s", TRANSLATION_ERROR) };
	}

	// Navigate to site
	QString fullurl = URL + "#ja/" + S(translateTo.Copy()) + "/" + qtext;
	devtools->setNavigated(false);
	devtools->setTranslate(false);
	if (devtools->SendRequest("Page.navigate", { {"url", fullurl} }, root))
	{
		// Wait until page is loaded
		float timer = 0;
		int timer_stop = 10;
		while (!devtools->getNavigated() && timer < timer_stop)
		{
			std::this_thread::sleep_for(std::chrono::milliseconds(100));
			timer += 0.1;
		}
		if (timer >= timer_stop)
		{
			return { false, FormatString(L"Error: page load timeout %d s! %s", timer_stop, TRANSLATION_ERROR) };
		}
		QString OuterHTML("<div></div>");

		// Get document
		if (docfound == -1)
		{
			if (!devtools->SendRequest("DOM.getDocument", {}, root))
			{
				docfound = -1;
				return { false, FormatString(L"Error: getDocument failed! %s", TRANSLATION_ERROR) };
			}
			docfound = root.value("result").toObject().value("root").toObject().value("nodeId").toInt();
		}

		//Get target selector
		if (targetNodeId == -1)
		{
			if (!(devtools->SendRequest("DOM.querySelector", { {"nodeId", docfound}, {"selector", "textarea.lmt__target_textarea"} }, root))
				|| (root.value("result").toObject().value("nodeId").toInt() == 0))
			{
				docfound = -1;
				return { false, FormatString(L"Error: querySelector result failed! %s", TRANSLATION_ERROR) };
			}
			targetNodeId = root.value("result").toObject().value("nodeId").toInt();
		}

		// Wait for translation to appear on the web page
		timer = 0;
		while (!devtools->getTranslate() && timer < timer_stop)
		{
			std::this_thread::sleep_for(std::chrono::milliseconds(100));
			timer += 0.1;
		}
		if (timer >= timer_stop)
		{
			// Catch notification if timeout
			int noteNodeId = -1;
			if (!(devtools->SendRequest("DOM.querySelector", { {"nodeId", docfound}, {"selector", "div.lmt__system_notification"} }, root))
				|| (root.value("result").toObject().value("nodeId").toInt() == 0))
			{
				return { false, FormatString(L"Error: result timeout %d s! %s", timer_stop, TRANSLATION_ERROR) };
			}
			noteNodeId = root.value("result").toObject().value("nodeId").toInt();

			if (devtools->SendRequest("DOM.getOuterHTML", { {"nodeId", noteNodeId + 1} }, root))
			{
				OuterHTML = root.value("result").toObject().value("outerHTML").toString();
				OuterHTML.remove(QRegExp("<[^>]*>"));
				OuterHTML = OuterHTML.trimmed();
			}
			else
			{
				OuterHTML = "Could not get notification";
			}
			return { false, FormatString(L"Error: got notification from translator: %s", S(OuterHTML)) };

		}

		// Catch the translation
		devtools->SendRequest("DOM.getOuterHTML", { {"nodeId", targetNodeId + 1} }, root);
		result = root.value("result").toObject();
		OuterHTML = result.value("outerHTML").toString();
		OuterHTML.remove(QRegExp("<[^>]*>"));
		OuterHTML = OuterHTML.trimmed();

		// Check if the translator output language does not match the selected language
		if (devtools->SendRequest("DOM.getAttributes", { {"nodeId", targetNodeId} }, root))
		{
			QJsonObject result = root.value("result").toObject();
			QJsonArray attributes = result.value("attributes").toArray();
			for (size_t i = 0; i < attributes.size(); i++)
			{
				if (attributes[i].toString() == "lang")
				{
					QString targetlang = attributes[i + 1].toString().mid(0, 2);
					if (targetlang != S(translateTo.Copy()))
					{
						return { false, FormatString(L"Error: target langs do not match (%s): %s", S(targetlang), S(OuterHTML)) };
					}
				}
			}
		}

		// Get quotes back
		if (checkquote)
		{
			OuterHTML = "\"" + OuterHTML + "\"";
		}
		return { true, S(OuterHTML) };
	}
	else
	{
		return { false, FormatString(L"Error: navigate failed! %s", TRANSLATION_ERROR) };
	}
}