#include "qtcommon.h"
#include "extension.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";
const wchar_t* ERROR_CHROME = L"Error: chrome not started";
const wchar_t* ERROR_START_CHROME = L"Error: failed to start chrome or to connect to it";
const wchar_t* ERROR_GOT_TIMEOUT = L"Error: timeout (s)";
const wchar_t* ERROR_COMMAND_FAIL = L"Error: command failed";
const wchar_t* ERROR_LANGUAGE = L"Error: target languages do not match";
const wchar_t* ERROR_NOTE = L"Error: notification";

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, targetNodeId = -1, session = -1, pageenabled = -1, useragentflag = -1;
long update = -1;

std::pair<bool, std::wstring> Translate(const std::wstring& text, DevTools* devtools)
{
	QString qtext = S(text);
	qtext.remove(QString(12288)); // japanese space (no need for translator)

	// Check quotes
	bool checkquote = false;
	if ((qtext.front() == QString(12300) && qtext.back() == QString(12301)) // japanese quotation marks
		|| (qtext.front() == "\"" && qtext.back() == "\""))
	{
		checkquote = true;
		qtext.remove(0, 1);
		qtext.chop(1);
	}

	if (qtext == QString(12387)) // if text consists of only one sokuon, add exclamation mark for correct translation
	{
		qtext += "!";
	}

	// Check ellipsis
	int count = qtext.count(QString(8230)); // ellipsis
	if (count == qtext.length()
		|| (count == (qtext.length() - 1) && qtext.back() == QString(12290))) // japanese end of a sentence
	{
		return { true, text };
	}

	// Put quotes back
	if (checkquote)
	{
		qtext = "\"" + qtext + "\"";
	}

	// Check status
	if (devtools->getStatus() == "Stopped")
	{
		return { false, FormatString(L"%s", ERROR_CHROME) };
	}
	if (devtools->getStatus().startsWith("Fail") || devtools->getStatus().startsWith("Unconnected"))
	{
		return { false, FormatString(L"%s", ERROR_START_CHROME) };
	}
	if (session != devtools->getSession())
	{
		session = devtools->getSession();
		docfound = -1;
		targetNodeId = -1;
		pageenabled = -1;
		useragentflag = -1;
		update = -1;
	}

	// Erase tags and reduce the number of ellipsis for better translation
	qtext.remove(QRegExp("<[^>]*>"));
	qtext.replace(QRegExp("(" + QString(8230) + ")+"), " " + QString(8230));

	// Enable page feedback
	QJsonObject root;
	if (pageenabled == -1)
	{
		if (!devtools->SendRequest("Page.enable", {}, root))
		{
			return { false, FormatString(L"%s", ERROR_COMMAND_FAIL) };
		}
		pageenabled = 1;
	}

	// Change user-agent if in headless mode
	if (useragentflag == -1)
	{
		QString useragent = devtools->getUserAgent();
		if (!useragent.isEmpty())
		{
			useragent.replace("HeadlessChrome", "Chrome");
			if (!devtools->SendRequest("Network.setUserAgentOverride", { {"userAgent", useragent} }, root))
			{
				return { false, FormatString(L"%s", ERROR_COMMAND_FAIL) };
			}
		}
		useragentflag = 1;
	}

	long navigate = devtools->methodToReceive("Page.navigatedWithinDocument");
	long target = devtools->methodToReceive("DOM.attributeModified", { { "value" , "lmt__mobile_share_container" } });
	if (update == -1)
	{
		update = devtools->methodToReceive("DOM.documentUpdated");
	}

	// Navigate to site
	QString fullurl = URL + "#ja/" + S(translateTo.Copy()) + "/" + qtext;
	if (!devtools->SendRequest("Page.navigate", { {"url", fullurl} }, root))
	{
		return { false, FormatString(L"%s", ERROR_COMMAND_FAIL) };
	}

	// Wait until page is loaded
	float timer = 0;
	int timer_stop = 10;
	while (!devtools->checkMethod(navigate) && timer < timer_stop)
	{
		std::this_thread::sleep_for(std::chrono::milliseconds(100));
		timer += 0.1;
	}
	if (timer >= timer_stop)
	{
		return { false, FormatString(L"%s: %d ", ERROR_GOT_TIMEOUT, timer_stop) };
	}

	// Check if document is outdated
	if (devtools->checkMethod(update))
	{
		docfound = -1;
		targetNodeId = -1;
		update = -1;
	}

	// Get document
	if (docfound == -1)
	{
		if (!devtools->SendRequest("DOM.getDocument", {}, root))
		{
			return { false, FormatString(L"%s", ERROR_COMMAND_FAIL) };
		}
		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"%s", ERROR_COMMAND_FAIL) };
		}
		targetNodeId = root.value("result").toObject().value("nodeId").toInt();
	}

	// Wait for translation to appear on the web page
	timer = 0;
	while (!devtools->checkMethod(target) && timer < timer_stop)
	{
		std::this_thread::sleep_for(std::chrono::milliseconds(100));
		timer += 0.1;
	}
		
	// Catch the translation
	if (!devtools->SendRequest("DOM.getOuterHTML", { {"nodeId", targetNodeId + 1} }, root))
	{
		docfound = -1;
		targetNodeId = -1;
		return { false, FormatString(L"%s", ERROR_COMMAND_FAIL) };
	}
	QString OuterHTML = root.value("result").toObject().value("outerHTML").toString();
	if (OuterHTML == "<div></div>")
	{
		// Try to catch the notification
		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"%s: %d ", ERROR_GOT_TIMEOUT, timer_stop) };
		}
		noteNodeId = root.value("result").toObject().value("nodeId").toInt();

		if (devtools->SendRequest("DOM.getOuterHTML", { {"nodeId", noteNodeId} }, root))
		{
			OuterHTML = root.value("result").toObject().value("outerHTML").toString();
		}
		OuterHTML.remove(QRegExp("<[^>]*>"));
		OuterHTML = OuterHTML.trimmed();

		return { false, FormatString(L"%s: %s", ERROR_NOTE, S(OuterHTML)) };
	}
	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"%s (%s): %s", ERROR_LANGUAGE, S(targetlang), S(OuterHTML)) };
				}
			}
		}
	}

	return { true, S(OuterHTML) };
}