<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"
  "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<!--
 reliable-chat - multipath chat
 Copyright (C) 2012  Scott Worley <sworley@chkno.net>
 Copyright (C) 2012  Jason Hibbs <skitch@gmail.com>

 This program is free software: you can redistribute it and/or modify
 it under the terms of the GNU Affero General Public License as
 published by the Free Software Foundation, either version 3 of the
 License, or (at your option) any later version.

 This program is distributed in the hope that it will be useful,
 but WITHOUT ANY WARRANTY; without even the implied warranty of
 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 GNU Affero General Public License for more details.

 You should have received a copy of the GNU Affero General Public License
 along with this program.  If not, see <http://www.gnu.org/licenses/>.
-->
<head>
 <title>Reliable Chat</title>
  <style type="text/css"><!--/*--><![CDATA[/*><!--*/
	html, body {
		width: 99.9%;
		height: 100%;
		margin: 0;
		padding: 0;
		background-color: #293134;
		color: silver;
		font-family: monospace;
	}
	a {
		color: white;
	}
	#container {
		height: 100%;
	}
	#status {
		width: 100%;
		text-align: right;
		background-color: #293134;
		padding: 5px 5px 5px 0px;
	}
	#client {
		width: 98.5%;
		padding: 0px 0px 0px 5px;
		height: 50px;
		position: fixed;
		bottom: 0;
	}
	#input {
		width: 100%;
		background-color: #293134;
	}
	#say { width: 100% }
	#history {
		padding: 0px 5px 55px 5px;
		vertical-align: bottom
	}
	.banner {
		font-size: 85%;
		text-align: right;
	}
	.servercount {
		margin-right: 0.5em;
		font-size: 70%;
	}
	.timestamp {
		margin-right: 0.8em;
	}
	.timestamp:hover, .timestamp:hover .servertimestamps {
		background-color: #556;
	}
	.timestamp:hover .servertimestamps {
		display: block;
	}
	.servertimestamps {
	  display: none;
		position: absolute;
		left: 3em;
		z-index: 1;
		border: 1px solid black;
		border-radius: 5px;
		padding-left: 5px;
		padding-right: 5px;
	}
	img { width: 1px; height: 1px; }
	iframe { display: none }
	#status span { margin-right: 10px; }
	#status span.sad {
		background-color: #f00;
		color: #fff;
		border: 1px solid black;
		border-radius: 5px;
		padding-left: 5px;
		padding-right: 5px;
	}
	#status span.happy {
		background-color: #0f0;
		color: #000;
		border: 1px solid black;
		border-radius: 5px;
		padding-left: 5px;
		padding-right: 5px;
	}
  /*]]>*/--></style>
  <script type="text/javascript"><!--//--><![CDATA[//><!--
	var servers = ['chkno.net', 'rc2.chkno.net', 'echto.net', 'the-wes.com', 'vibrantlogic.com'];

	var session = Math.random();  // For outgoing message IDs
	var since = {};    // server -> time: For fetch?since=
	var seen = {};     // seen_key -> message
	var history = [];  // List of messages sorted by Time
	// Messages have these fields:
	//   Time: The timestamp.  Median of ServerTimes
	//   ID: Some unique string for deduping
	//   Text: The text of the message
	//   ServerTimes: server -> timestamp
	//   UI: The DOM node for this message in the UI

	function rcnick() {
		var nick = localStorage.getItem("nick");
		if (nick) {
			return nick;
		}
		return 'anonymous';
	}

	function rcsetnick(new_nick) {
		localStorage.setItem("nick", new_nick);
	}

	function rcserverbase(server) {
		// Add the default port if server doesn't contain a port number already
		if (server.indexOf(":") == -1) {
			return "http://" + server + ":21059";
		} else {
			return "http://" + server;
		}
	}

	function rcchangeserverstatus(server, new_status) {
		var statusbar = document.getElementById("status");
		var spans = statusbar.getElementsByTagName("span");
		for (var i in spans) {
			if (spans[i].firstChild && 'data' in spans[i].firstChild && spans[i].firstChild.data == server) {
				spans[i].setAttribute("class", new_status);
			}
		}
	}

	function rcpad2(x) {
		return (x < 10 ? "0" : "") + x;
	}
	function rcpad3(x) {
		return (x < 10 ? "00" : (x < 100 ? "0" : "")) + x;
	}

	function rcformattime(t) {
		var d = t.getDay();
		d = ["Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"][d];
		var h = t.getHours();
		var m = t.getMinutes();
		var s = t.getSeconds();
		return d + " " + rcpad2(h) + ":" + rcpad2(m) + ":" + rcpad2(s);
	}

	function rcaddservertimestamptohover(message, server) {
		var divs = message.UI.getElementsByTagName("div");
		var t = message.ServerTimes[server];
		for (var i in divs) {
			if (divs[i].getAttribute && divs[i].getAttribute("class") == "servertimestamps") {
				var d = document.createElement("div");
				var text = t.getFullYear() + "-" +
					rcpad2(t.getMonth()) + "-" +
					rcpad2(t.getDay()) + " " +
					rcformattime(t) + "." +
					rcpad3(t.getMilliseconds()) + " " +
					server;
				d.appendChild(document.createTextNode(text));
				divs[i].appendChild(d);
			}
		}
	}

	function rcmakemessageUI(message) {
		message.UI = document.createElement("div");

		// Server count
		var servercount = document.createElement("span");
		servercount.setAttribute("class", "servercount");
		servercount.appendChild(document.createTextNode(Object.keys(message.ServerTimes).length));
		message.UI.appendChild(servercount);

		// Timestamp
		var timestamp_text = message.Time ? rcformattime(message.Time) : "";
		var timestamp = document.createElement("span");
		timestamp.setAttribute("class", "timestamp");
		timestamp.appendChild(document.createTextNode(timestamp_text));
		message.UI.appendChild(timestamp);

		// Timestamp hover
		var timestamp_hover = document.createElement("div");
		timestamp_hover.setAttribute("class", "servertimestamps");
		timestamp.appendChild(timestamp_hover);
		for (var server in message.ServerTimes) {
			rcaddservertimestamptohover(message, server);
		}

		// Classify different message types
		var text_span = document.createElement("span");
		var type;
		if (/^\*\*\* /.test(message.Text)) {
			type = "status";
		} else if (/^\* /.test(message.Text)) {
			type = "me";
		} else {
			type = "text";
		}
		if (Object.keys(message.ServerTimes).length == 0) {
			type += " self";
		}
		text_span.setAttribute("class", type);

		// URL detection
		var text = message.Text;
		var URL_re = /\bhttps?:\/\/\S+/;
		while (URL_re.test(text)) {
			var match = URL_re.exec(text);
			var leading_text = text.substr(0, match.index);
			if (leading_text) {
				text_span.appendChild(document.createTextNode(leading_text));
			}
			var anchor = document.createElement("a");
			anchor.setAttribute("rel", "nofollow");
			anchor.setAttribute("href", encodeURI(match[0]));
			anchor.appendChild(document.createTextNode(match[0]));
			text_span.appendChild(anchor);
			text = text.substr(match.index + match[0].length);
		}
		if (text) {
			text_span.appendChild(document.createTextNode(text));
		}

		message.UI.appendChild(text_span);
	}

	function rcaddmessagetohistory(message) {
		var message_i;
		if (message.Time) {
			for (var i = history.length - 1; ; i--) {
				if (i < 0 || (history[i].Time && message.Time >= history[i].Time)) {
					message_i = i+1;
					history.splice(message_i, 0, message);
					break;
				}
			}
		} else {
			history.push(message);
			message_i = history.length-1;
		}

		if (!message.UI) {
			rcmakemessageUI(message);
		}
		var h = document.getElementById("history");
		if (message_i + 1 < history.length) {
			h.insertBefore(message.UI, history[message_i + 1].UI);
		} else {
			h.appendChild(message.UI);
		}
		window.scrollTo(0, document.body.scrollHeight);
	}

	function make_seen_key(id, text) {
		return id.replace(/@/g, "@@") + "_@_" + text.replace(/@/g, "@@");
	}

	function rcupdatemessagetime(message) {
		// Set message.Time to be the median of message.ServerTimes
		var times = [];
		for (var i in message.ServerTimes) {
			times.push(message.ServerTimes[i]);
		}
		times.sort();
		if (times.length % 2) {
			message.Time = times[(times.length-1)/2];
		} else {
			var middle = times.length/2;
			var difference = times[middle].getTime() - times[middle-1].getTime();
			message.Time = new Date(times[middle-1].getTime() + difference/2);
		}

		// This may have broken history's in-sorted-order invariant
		var hi = history.indexOf(message);
		if ((history[hi-1] && history[hi-1].Time > message.Time) ||
		    (history[hi+1] && history[hi+1].Time < message.Time)) {
			history.splice(hi,1);
			rcaddmessagetohistory(message);
		}

		// Update the UI
		var spans = message.UI.getElementsByTagName("span");
		for (var i in spans) {
			if (spans[i].getAttribute) {
				var type = spans[i].getAttribute("class");
				if (type == "servercount") {
					spans[i].firstChild.data = Object.keys(message.ServerTimes).length;
				} else if (type == "timestamp") {
					spans[i].firstChild.data = rcformattime(message.Time);
				}
			}
		}
	}

	function rcreceivemessages(server, messages) {
		for (var i in messages) {
			var m = messages[i];
			m.Time = new Date(m.Time);
			var seen_key = make_seen_key(m.ID, m.Text);
			if (seen_key in seen) {
				seen[seen_key].ServerTimes[server] = m.Time;
				rcupdatemessagetime(seen[seen_key]);
				rcaddservertimestamptohover(seen[seen_key], server);
			} else {
				m.ServerTimes = {};
				m.ServerTimes[server] = m.Time;
				seen[seen_key] = m;
				rcaddmessagetohistory(m);
				for (var i in servers) {
					rcchangeserverstatus(servers[i], "sad");
				}
			}
			rcchangeserverstatus(server, "happy");
		}
	}

	function rcfetch(server) {
		var delay = 10000;  // TODO: Exponential backoff
		var xhr = new XMLHttpRequest();
		xhr.onreadystatechange = function() {
			if (this.readyState == this.DONE) {
				if (this.status == 200) {
					var rtxt = this.responseText;
					if (rtxt != null) {
						var messages = JSON.parse(rtxt);
						if (messages != null) {
							delay = 40;
							if (messages.length >= 1 && "Time" in messages[messages.length-1]) {
								since[server] = messages[messages.length-1].Time;
							}
							rcreceivemessages(server, messages);
						}
					}
				}
				window.setTimeout(rcfetch, delay, server);
			}
		}
		var uri = rcserverbase(server) + "/fetch";
		if (server in since) {
			uri += '?since="' + since[server] + '"';
		}
		xhr.open("GET", uri);
		xhr.send();
	}

	function rcconnect() {
		for (var i in servers) {
			rcfetch(servers[i]);
			// Status bar entry
			var status_indicator = document.createElement("span");
			status_indicator.appendChild(document.createTextNode(servers[i]));
			status_indicator.setAttribute("class", "sad");
			document.getElementById("status").appendChild(status_indicator);
		}
	}

	function rcsend(d, message) {
		message.ID = new Date().getTime() + "-" + session + "-" + Math.random();
		seen[make_seen_key(message.ID, message.Text)] = message;
		var path = "/speak" +
			"?id=" + encodeURIComponent(message.ID) +
			"&text=" + encodeURIComponent(message.Text);
		for (var i in servers) {
			var uri = rcserverbase(servers[i]) + path;
			var img = document.createElement("img");
			img.setAttribute("src", uri);
			d.appendChild(img);
		}
	}

	function rcinput(input) {
		var message;
		var re = /^\/([a-z]+) (.*)/
		var match = re.exec(input);
		if (match && match[1] == 'me') {
			message = "* " + rcnick() + "  " + match[2];
		} else if (match && match[1] == 'nick') {
			message = "*** " + rcnick() + " is now known as " + match[2];
			rcsetnick(match[2]);
		} else {
			message = "<" + rcnick() + "> " + input;
		}

		var m = {'Text': message, 'ServerTimes': {}};
		rcaddmessagetohistory(m);
		rcsend(m.UI, m);
	}

	function rckeydown(event) {
		if (event.keyCode == 13) {
			rcinput(document.input.say.value);
			document.input.say.value = "";
			
		}
	}
  //--><!]]></script>

</head>

<body onload="rcconnect()">
	<div id="container">
		<div class="banner">(You are using <a href="https://github.com/chkno/reliable-chat">Reliable Chat</a>)</div>
		<div id="history"></div>
		<div id="client">
			<div id="input">
				<form name="input" onsubmit="return false" autocomplete="off">
					<input id="say" onkeydown="return rckeydown(event)" autocomplete="off" autofocus="autofocus"></input>
				</form></div>
			<div id="status">&nbsp;</div>
		</div>
	</div>
</body>
</html>