// ==UserScript==
// @name           TV Recording Interface
// @namespace      calliope
// @include        http://tvlistings.guardian.co.uk/*
// ==/UserScript==

// Parse the date from the header
var heading = document.getElementById("_ctl0_h1_heading");
var date_text = heading.childNodes[1].childNodes[0].nodeValue;
if(date_text == "Today") {
	var date = new Date();
} else if(date_text == "Tomorrow") {
	var date = new Date();
	date.setDate(date.getDate() + 1);
} else {
	var date_array = date_text.split(" ");
	date_text = date_array[1].match(/\d+/)[0];
	date_text += " ";
	date_text += date_array[2];
	var date = new Date();
	date_text += " " + date.getFullYear();
	date = new Date(date_text);
}

date.setHours(0, 0, 0, 0);

// Parse the channel name from the header
var channel = document.getElementsByClassName("tvg_channelname")[0].childNodes[0].nodeValue;
if(channel.match(/^BBC 1\s/)) channel = "BBC 1";
var channelid = -1;

var num_replace = [ "ZERO", "ONE", "TWO", "THREE", "FOUR", "FIVE", "SIX", "SEVEN", "EIGHT", "NINE" ];

// Retrieve the list of channels
var xhr = new XMLHttpRequest();
xhr.open("GET", "http://ruthven:1731/api/channels/all");
xhr.onreadystatechange = function() {
	if(xhr.readyState == 4) {
		if(xhr.status >= 200 && xhr.status < 300) {
			var chans = JSON.parse(xhr.responseText);
			var mchan = channel.toLowerCase().replace(/\s/g, "");
			for(var i=0; i<chans.length; i++) {
				var ch = chans[i];
				var mlabel = ch.label.toLowerCase().replace(/\s/g, "");
				if(mlabel == mchan) {
					channelid = ch.id;
				}
				for(var j=0; j<num_replace.length; j++) {
					var re = new RegExp(num_replace[j], "gi");
					if(mlabel.replace(re, j) == mchan
					  || mlabel == mchan.replace(re, j)) {
						channelid = ch.id;
					}
				}
			}
			if(channelid != -1) {
				annotate_programmes();
			}
		}
	}
};
xhr.send("");

function annotate_programmes() {
	// Now get and process all the programmes
	var progs = document.getElementsByClassName("tvg_show");

	for(var i=0; i<progs.length; i++) {
		var x = progs[i];

		// Get the programme parameters
		var title = x.childNodes[1].childNodes[0].nodeValue;
		var start_time_parts = x.childNodes[0].childNodes[0].nodeValue.split(":");
		var start_time = new Date(date.getTime());
		start_time.setHours(start_time_parts[0], start_time_parts[1]);
		var next_prog = x.nextSibling;
		var end_time = new Date(start_time.getTime() + 3*60*60*1000);
		if(next_prog != null && next_prog.nodeName.toLowerCase() == "span") {
			var end_time_parts = next_prog.childNodes[0].childNodes[0].nodeValue.split(":");
			end_time = new Date(date.getTime());
			end_time.setHours(end_time_parts[0], end_time_parts[1]);
		}

		var subtitle = "";
		var episode = 0;
		var series = 0;

		var details = x.getElementsByClassName("tvg_show_episode_title");
		if(details.length > 0) {
			var sermatch = /^Series\s+(\d+).*Episode\s+(\d+)(\/\d+)?:?(.*)/;
			var epmatch = /^Episode\s+(\d+)(\/\d+)?:\s(.*)/;

			var text = details[0].childNodes[0].nodeValue;
			var res = text.match(sermatch);
			if(res != null && res.length > 0) {
				series = parseInt(res[1]);
				episode = parseInt(res[2]);
				subtitle = res[4].trim();
			} else {
				res = text.match(epmatch);
				if(res != null && res.length > 0) {
					episode = parseInt(res[1]);
					subtitle = res[3].trim();
				} else {
					subtitle = text.trim();
				}
			}
		}

		// Add recording buffer
		start_time.setTime(start_time.getTime() - 5*60*1000);
		end_time.setTime(end_time.getTime() + 10*60*1000);
		
		var rec = document.createElement("span");
		// The outer anonymous function here creates a closure that binds
		// the *current values* of t, s and e. If we didn't do this, then
		// we would bind the variables title, start_time, and end_time by
		// reference instead of by value, and every (rec) element would do
		// the same thing.
		(function () {
			var t = title;
			var s = start_time;
			var e = end_time;
			var st = subtitle;
			var ser = series;
			var ep = episode;
			
			rec.addEventListener("click", function(ev) {
				//alert("Recording " + t + "\nFrom " + s + "\nTo " + e);
				
				var rec = {
					"start": Math.floor(s.getTime()/1000),
					"end": Math.floor(e.getTime()/1000),
					"title": t,
					"chanid": channelid,
					"channel_label": channel,
				};
				if(st != null && st != "")
					rec.subtitle = st;
				if(ser != 0)
					rec.series = ser;
				if(ep != 0)
					rec.episode = ep;
				
				var xhr = new XMLHttpRequest();
				xhr.open("POST", "http://ruthven:1731/api/recordings");
				xhr.onreadystatechange = function() { ajax_handler(xhr); };
				xhr.setRequestHeader("Content-type", "application/json");
				xhr.send(JSON.stringify(rec));
				
			});
		})();
		rec.innerHTML = "(rec) ";
		
		x.childNodes[0].insertBefore(rec, x.childNodes[0].childNodes[0]);
	}
}

function ajax_handler(req) {
	if(req.readyState == 4) {
		if(req.status >= 200 && req.status < 300) {
			// Success
		} else {
			// Failure
		}
	}
}