// ==UserScript==
// @id             dota2ruUJ
// @name           dota2ru ignore
// @name:ru        dota2ru игнорирование дебиков в чятике
// @version        0.2
// @namespace      .
// @author         nubideus
// @description    ignore
// @description:ru расширение для дотасру: добавляет игнор в чят. что бы заингнорить, надо зайти в профиль, и рядом с кнопкой "Игнорировать" появляется еще одна "Игнорировать в чати".
// @include        http://dota2.ru/forum/*
// @run-at         document-start
// ==/UserScript==

(function(){

var localLog = [];
var taigachat_lastRefreshServer = 0;
var chatElement = null;
var ignoreList = null;

//document.addEventListener("hello", function(event) {
	//console.log(event.detail);
//});

var init = function(){
	chatElement = document.querySelector("#taigachat_box ol");

	ignoreList = restoreIgnoreList();
	initIgnoreListView();

	var _handleListResponse = window.handleListResponse;
	window.handleListResponse = function(){
		_handleListResponse.apply(window, arguments);
		applyIgnore();
	};
	applyIgnore();

	//checkRefresh = function(){ /* disable taigachat update */ };
	var usernameClickListener = function(event){
		if(event.target.className === "username" || event.target.parentNode.className === "username"){
			if(event.target.classList.contains("NoOverlay")){
				return;
			}
			waitElement(".memberCard[style*=\"display: block\"]", applyMemberCard);
		}
	};
	document.body.addEventListener("click", usernameClickListener, true);

	//setInterval(update, 5000);
};

var update = function(){
	var xrh = new XMLHttpRequest();
	xrh.open("POST", "http://dota2.ru/forum/index.php?taigachat/list.json", true);
	xrh.onload = function(){
		var responseJSON = JSON.parse(xrh.responseText);

		var messages = parseMessages(responseJSON.templateHtml);
		//if(messages.length){
			saveLog(messages);
			mergeLocalLog(messages);
			//console.log(localLog.map(function(m){return m.text + " " + m.deleted}).join("\n"));

			chatElement.innerHTML = responseJSON.templateHtml;
			applyIgnore();
			XenForo.activate(document.querySelector("#taigachat_box ol"));
		//}
	};

	xrh.setRequestHeader("Content-Type", "application/x-www-form-urlencoded; charset=UTF-8");
	xrh.send(
		"sidebar=0&lastrefresh=" + taigachat_lastRefreshServer +
		"&_xfRequestUri=/forum/chat/" +
		"&_xfNoRedirect=1" +
		"&_xfToken=" + XenForo._csrfToken +
		"&_xfResponseType=json"
	);
};

var parseMessages = function(str){
	var div = document.createElement("div");
	div.innerHTML = str;
	var messages = Array.apply(null, div.children).map(function(message){
		var result = {
			id: 0,
			authorName: "",
			authorUrl: "",
			authorStatus: "",
			text: "",
			dateTime: 0,
			deleted: false,
			edited: false
		};

		result.dateTime = message.querySelector("abbr.DateTime").getAttribute("data-time") * 1000;

		result.id = message.id.slice("taigachat_message_".length - message.id.length);
		var userdom = message.querySelector("a[class=\"username\"]");
		result.authorUrl = userdom.href;

		if(userdom.children.length){
			result.authorName = userdom.children[0].textContent;
			result.authorStatus = userdom.children[0].className;
		}else{
			result.authorName = userdom.textContent;
			result.authorStatus = "normal";
		}

		result.text = message.querySelector(".taigachat_messagetext").innerHTML;
		return result;
	});
	div.innerHTML = "";
	div = null;

	return messages;
};

var saveLog = function(messages){
	var evt = document.createEvent("CustomEvent");
	evt.initCustomEvent("mergeLogRequest", true, true, messages);
	document.dispatchEvent(evt);
};

var mergeLocalLog = function(messages){
	var newMessages = null;
	var collisionMessageIndex = localLog.findIndex(function(message){
		if(!message.edited){
			return message.id === messages[0].id;
		}
		return false;
	});

	if(collisionMessageIndex >= 0){
		var logIndex = collisionMessageIndex;
		var messagesIndex = 0;
		while(true){
			if(logIndex >= localLog.length || messagesIndex >= messages.length){
				break;
			}
			if(localLog[logIndex].edited){
				logIndex++;
				continue;
			}
			if(localLog[logIndex].id === messages[messagesIndex].id){
				if(localLog[logIndex].text !== messages[messagesIndex].text){
					localLog[logIndex].edited = true;
					localLog.splice(logIndex, 0, messages[messagesIndex]);
					logIndex++;
				}
				logIndex++;
				messagesIndex++;
				continue;
			}else{
				localLog[logIndex].deleted = true;
				logIndex++;
				continue;
			}
		}
		for(;logIndex < localLog.length; logIndex++){
			localLog[logIndex].deleted = true;
		}
		for(;messagesIndex < messages.length; messagesIndex++){
			localLog.push(messages[messagesIndex]);
		}
	}else{
		localLog = localLog.concat(messages);
	}
};

var waitElement = function(selector, callback, owner){
	var result = (owner || document).querySelector(selector);
	if(result){
		callback(result);
		return;
	}
	requestAnimationFrame(waitElement.bind(null, selector, callback, owner));
};


var toggleIgnore = function(user){
	var userIndex = ignoreList.findIndex(secondUser => secondUser.username === user.username);
	if(userIndex >= 0){
		ignoreList.splice(userIndex, 1);
		return false;
	}else{
		ignoreList.push({username: user.username, userUrl: user.userUrl});
		return true;
	}
};

var saveIgnoreList = function(list){
	localStorage.setItem("chat_ignore_list", ignoreList.map(
		user => str2b64(user.username) + "|" + str2b64(user.userUrl)).join(",")
	);
};

var restoreIgnoreList = function(){
	var result = localStorage.getItem("chat_ignore_list");
	if(!result){
		return [];
	};
	result = result.split(",").map(data =>
		({
			username: b642str(data.split("|")[0]),
			userUrl: b642str(data.split("|")[1])
		})
	);
	return result;
};

var applyIgnore = function(){
	Array.apply(null, chatElement.children).forEach(function(message){
		if(ignoreList.find(user => user.username === message.querySelector(".username").textContent)){
			message.style.display = "none";
		}else if(message.style.display === "none"){
			message.style.display = null;
		}
	});
};

var initIgnoreListView = function(){
	var parent = document.querySelector("#taigachat_box").parentNode;
	var btn = document.createElement("a");
	btn.href = "javascript:";
	btn.innerHTML = "Список игнорируемых";

	document.addEventListener("click", function(event){
		if(
			event.target === list ||
			event.target.parentNode === list ||
			event.target.parentNode.parentNode === list
		){
			return;
		}
		if(event.target !== btn || !list.style.display){
			list.style.display = "none";
			for (var i = list.children.length - 1; i >= 0; i--){
				list.removeChild(list.children[i]);
			};
			return;
		}
		list.style.display = null;
		if(ignoreList.length === 0){
			var empty = document.createElement("li");
			empty.innerHTML = "пусто";
			list.appendChild(empty);
		}
		ignoreList.forEach(function(user){
			var nameElement = document.createElement("li");
			nameElement.innerHTML = "<a href=\"" + user.userUrl + "\" class=\"username\">" + user.username + "</a> ";
			var cross = document.createElement("a");
			cross.innerHTML = "X";
			cross.href = "javascript:";
			nameElement.appendChild(cross);
			cross.onclick = function(event){
				toggleIgnore(user);
				applyIgnore();
				saveIgnoreList(ignoreList);
				list.removeChild(nameElement);
				event.stopPropagation();
			};
			list.appendChild(nameElement);
		});
	});

	var list = document.createElement("ol");
	list.style.display = "none";
	if(parent.children.length){
		parent.insertBefore(list, parent.querySelector("#taigachat_box"));
	}else{
		parent.appendChild(list);
	}
	list.parentNode.insertBefore(btn, list);
};


function str2b64(str){
	return window.btoa(unescape(encodeURIComponent(str)));
}

function b642str(str){
	return decodeURIComponent(escape(window.atob(str)));
}


var applyMemberCard = function(card){
	var username = card.querySelector(".username a").textContent;
	var userUrl = document.querySelector(".username a").href;
	var hasIgnored = ignoreList.findIndex(user => user.username === username) >= 0;

	var parent = card.querySelector(".userLinks");

	var ignoreChatElement = Array.apply(null, parent.children).find(
		link => link.href === "javascript:/*ignrbtn*/"
	);
	if(!ignoreChatElement){
		ignoreChatElement = document.createElement("a");

		ignoreChatElement.href = "javascript:/*ignrbtn*/";
		ignoreChatElement.className = "FollowLink";

		ignoreChatElement.addEventListener("click", function(event){
			hasIgnored = toggleIgnore({username: username, userUrl: userUrl});
			saveIgnoreList(ignoreList);
			applyIgnore();
			applyMemberCard(card);
			event.stopPropagation();
		}, true);
		parent.appendChild(ignoreChatElement);
	}
	ignoreChatElement.textContent = !hasIgnored ? "Игнорировать в чате" : "Не игнорировать в чате";
};

if(location.pathname.indexOf("/members/") >= 0){
	waitElement(".profilePage .username", function(_){

		var username = document.querySelector(".profilePage .username").textContent;
		var userUrl = document.querySelector(".profilePage .username").href;
		ignoreList = restoreIgnoreList();

		var hasIgnored = ignoreList.findIndex(user => user.username === username) >= 0;

		var ignoreElement = document.querySelector(".profilePage .followBlock ul li:nth-child(2)");
		var ignoreChatElement = document.createElement("li");
		ignoreChatElement.appendChild(document.createElement("a"));
		ignoreChatElement.children[0].textContent = !hasIgnored ? "Игнорировать в чате" : "Не игнорировать в чате";
		ignoreChatElement.children[0].href = "javascript:";
		ignoreChatElement.children[0].className = "FollowLink";
		ignoreElement.parentNode.insertBefore(ignoreChatElement, ignoreElement);
		ignoreChatElement.addEventListener("click", function(event){
			hasIgnored = toggleIgnore({username: username, userUrl: userUrl});
			saveIgnoreList(ignoreList);
			ignoreChatElement.children[0].textContent = !hasIgnored ? "Игнорировать в чате" : "Не игнорировать в чате";
			event.stopPropagation();
		}, true);
	});
}else if(location.pathname.indexOf("/forum/chat/") >= 0 || location.href === "http://dota2.ru/forum/"){
	waitElement("#taigachat_box ol", function(){
		var waitToket = setInterval(function(){
			if(XenForo._csrfToken && handleListResponse){
				clearInterval(waitToket);
				init();
			}
		}, 100);
	});
}

})();