(function(){

	// A rough estimate, in seconds, of how long it'll take each test
	// iteration to run
	var timePerTest = 0.5;
	
	// Populated from: http://www.medcalc.be/manual/t-distribution.php
	// 95% confidence for N - 1 = 4
	var tDistribution = 2.776;
	
	// The minimum number of individual test iterations to do
	var numTests = 5;

	// Re-run tests above a specific error threshold (in %)
	var errorThreshold = 5;
	
	// Initialize a batch of tests
	//  name = The name of the test collection
	this.startTest = function(name, version){
		numloaded++;
		if ( numloaded == totalTests )
			setTimeout( init, 100 );

		testName = name;
		if ( !filter.test(testName) ) return;
		testID = testName;
		testNames[testID] = testName;
		testVersions[testID] = version || 0;
		testSummary[testID] = testDone[testID] = testNum[testID] = 0;

		makeElem(testID);

		queue.push(function(){
			summary = 0;
			dequeue();
		});
	};

	// Anything that you want to have run in order, but not actually test
	this.prep = function(fn){
		if ( !filter.test(testName) ) return;
		queue.push(function(){
			fn();
			dequeue();
		});
	};

	// End the tests and finalize the report
	this.endTest = function(){
		if ( !filter.test(testName) ) return;
		// Save the summary output until all the test are complete
		queue.push(function(){
			dequeue();
		});
	};

	// Run a new test
	//  name = The unique name of the test
	//  num = The 'length' of the test (length of string, # of tests, etc.)
	//  fn = A function holding the test to run
	var nameDone = {};
	
	this.test = function(name, num, fn){
		if ( !filter.test(testName) ) return;
		var curTest = testName, curID = testID;

		if ( nameDone[name] == null )
			nameDone[name] = 0;
		nameDone[name] = nameDone[name]+1;

		if ( nameDone[name] != 3 )
			return; 

		time += timePerTest * numTests;

		testNum[curID] = testNum[curID]+1;

		// Don't execute the test immediately
		queue.push(function(){
			title = name;
			var times = [], start, pos = 0;
			
			if ( !fn ) {
				fn = num;
				num = '';
			}
	
			setTimeout(function(){
				// run tests
				try {
					if ( doShark ) {
						connectShark();
						startShark();
					}

					start = (new Date()).getTime();
					fn();
					var cur = (new Date()).getTime();

					if ( doShark ) {
						stopShark();
						disconnectShark();
					}
					
					// For making Median and Variance
					times.push( cur - start );
				} catch( e ) {
					alert("FAIL " + name + " " + num);
					return;
				}

				if ( pos < numTests ) {
					updateTime();
					updateTestPos({curID: curID, collection: testNames[curID], version: testVersions[curID]});
				}

				if ( ++pos < numTests ) {
					setTimeout( arguments.callee, 1 );
				
				} else {
					var data = compute( times, numTests );

					if ( data.error > errorThreshold && pos < numTests * 2 ) {
						var minDiff = data.mean - data.min;
						var maxDiff = data.max - data.mean;

						if ( minDiff > maxDiff ) {
							times.shift();
						} else {
							times.pop();
						}

						if ( pos < numTests * 2 )
							setTimeout( arguments.callee, 1 );

					} else {
						data.curID = curID;
						data.collection = testNames[curID];
						data.version = testVersions[curID];
						data.name = title;
						data.scale = num;
				
						logTest(data);
				
						dequeue();
					}
				}
			}, 1);
		});

		function compute(times, runs){
			var results = {runs: runs}, num = times.length;

			times = times.sort(function(a,b){
				return a - b;
			});

			// Make Sum
			results.sum = 0;

			for ( var i = 0; i < num; i++ )
				results.sum += times[i];

			// Make Min
			results.min = times[0];
					  
			// Make Max
			results.max = times[ num - 1 ];

			// Make Mean
			results.mean = results.sum / num;
			
			// Make Median
			results.median = num % 2 == 0 ?
				(times[Math.floor(num/2)] + times[Math.ceil(num/2)]) / 2 :
				times[Math.round(num/2)];
			
			// Make Variance
			results.variance = 0;

			for ( var i = 0; i < num; i++ )
				results.variance += Math.pow(times[i] - results.mean, 2);

			results.variance /= num - 1;
					
			// Make Standard Deviation
			results.deviation = Math.sqrt( results.variance );

			// Compute Standard Errors Mean
			results.sem = (results.deviation / Math.sqrt(results.runs)) * tDistribution;

			// Error
			results.error = ((results.sem / results.mean) * 100) || 0;

			return results;
		}
	};
	
	// All the test data
	var tests;
	
	// The number of test files to load
	var totalTests = 0;
	
	// The number of test files loaded
	var numloaded = 0;
	
	// Queue of functions to run
	var queue = [];
	

	
	var testElems = {};
	var testNum = {};
	var testDone = {};
	var testNames = {};
	var testVersions = {};
	var dataStore = [];
	var names = [];
	var interval;
	var totalTime = 0;
	var time = 0;
	var title, testName, testID, testSummary = {} , maxTotal = 0;
	
	// Query String Parsing
	var search = (window.location.search || "?").substr(1);
	var parts = search.split("&");
	var filter = parts.length && !parts[0].match(/=/) ?
		new RegExp(parts.shift(), "i") :
		/./;

	// To enable shark debugging add &shark to the end of the URL
	var doShark = false;
	for ( var i = 0; i < parts.length; i++ )
		if ( parts[i] == "shark" )
			doShark = true;

	jQuery(function(){
		var id = search.match(/id=([\d,]+)/);

		jQuery.getJSON("tests/MANIFEST.json", function(json){
			tests = json;

			names = [];

			var name;
			for ( name in tests )
				names.push( name );

			names = names.sort(function(a, b){
				return tests[a].name < tests[b].name ?  -1 :
					tests[a].name == tests[b].name ?  0 : 1;
			});

			// Check if we're loading a specific result set
			// ?id=NUM
			if ( id ) {
				jQuery.ajax({
					url: "store.php?id=" + id[1],
					dataType: "json",
					success: function(data){
						resultsLoaded(id[1], data);
					}
				});

			// Otherwise we're loading a normal set of tests
			} else {
				for ( var i = 0; i < names.length; i++ ) (function(name){
					var test = tests[name];
					
					// Don't load tests that we aren't looking for
					if ( !filter.test( name ) )
						return;
							
					totalTests++;
					
					// Check if we're loading an HTML file
					if ( test.file.match(/html$/) ) {
						var iframe = document.createElement("iframe");
						iframe.style.height = "1px";
						iframe.style.width = "1px";
						iframe.src = "tests/" + test.file;
						document.body.appendChild( iframe );
					
					// Otherwise we're loading a pure-JS test
					} else {
						jQuery.getScript("tests/" + test.file, function(){
							initTest( name );
						});
					}
				})(names[i]);
			}
		});
	});

	// Remove the next test from the queue and execute it
	function dequeue(){
		if ( interval && queue.length ) {
			queue.shift()();
			
		} else if ( queue.length == 0 ) {
			interval = false;
			time = 0;

			$("#overview input").remove();
			$("#timebar").html("<span><strong>" + parseFloat(maxTotal).toFixed(2) + "</strong>ms (Total)</span>");
	
			if ( dataStore && dataStore.length ) {
				$("body").addClass("alldone");
				/*
				var div = jQuery("<div class='results'>Saving...</div>").insertBefore("#overview");
				jQuery.ajax({
					type: "POST",
					url: "store.php",
					data: "data=" + "poop", // encodeURIComponent(JSON.stringify(dataStore)),
					success: function(id){
						var url = window.location.href.replace(/\?.*$/, "") + "?id=" + id;
						div.html("Results saved. You can access them at a later time at the following URL:<br/><strong><a href='" + url + "'>" + url + "</a></strong></div>");
					}
				});
				*/
			}
		}
	};
	
	// Run once all the test files are fully loaded
	function init(){
		totalTime = time;
		time += timePerTest;
		updateTime();
		
		$("#pause")
			.val("Run")
			.click(function(){
				if ( interval ) {
					interval = null;
					this.value = "Run";
				} else {
					if ( !interval ) {
						interval = true;
						dequeue();
					}
					this.value = "Pause";
				}
			});
	}

	function initTest(curID){
		$("<div class='result-item'></div>")
			.append( testElems[ curID ] )
			.append( "<p>" + tests[ curID ].desc + "<br/><a href='" + 
				tests[ curID ].origin[1] + "'>Origin</a>, <a href='tests/" +
				tests[ curID ].file + "'>Source</a>, <b>Tests:</b> " +
				tests[ curID ].tags.join(", ") + "</p>" )
			.append( "<ol class='results'></ol>" )
			.appendTo("#main");
	}
	
	function resultsLoaded(id, datas){
		var results = {};
		var runs = {};
		var output = "";
		var overview = document.getElementById("overview");

		for ( var d = 0; d < datas.length; d++ ) {
			var data = datas[d];

			if ( datas.length == 1 ) {
				$("#overview").before("<div class='results'>Viewing test run #" + id +
					", run on: " + data.created_at + " by:<br>" + data.useragent + "</div>");
			}

			runs[data.id] = data;
			runs[data.id].mean = 0;
			runs[data.id].error = 0;
			runs[data.id].num = 0;
			runs[data.id].name = (data.useragent.match(/(MSIE [\d.]+)/) ||
				data.useragent.match(/(\w+\/[\w.]+)[^\/]*$/) || [0,data.id])[1];

			for ( var i = 0; i < data.results.length; i++ ) {
				var result = data.results[i];
				var curID = result.collection;

				if ( !results[curID] )
					results[curID] = {tests:{}, total:{}, version: result.version};

				if ( !results[curID].total[result.run_id] ) {
					results[curID].total[result.run_id] = {max:0, mean:0, median:0, min:0, deviation:0, error:0};
					results[curID].tests[result.run_id] = [];
				}

				if ( results[curID].version == result.version ) {
					result.error = ((((result.deviation / Math.sqrt(result.runs)) * tDistribution) / result.mean) * 100) || 0;
					results[curID].tests[result.run_id].push( result );

					var total = results[curID].total[result.run_id];
					var _type;
					for ( _type in total )
						total[_type] += parseFloat(result[_type]);
				}
			}
		}

		if ( datas.length == 1 ) {
			$("body").addClass("alldone");

			for ( var i = 0; i < data.results.length; i++ ) {
				var item = data.results[i];
				var result = item.curID = item.collection;

				if ( !filter.test(result) )
					continue;

				if ( !testElems[result] ) {
					makeElem( result );
					initTest( result );
				}

				// Compute Standard Errors Mean
				item.sem = (item.deviation / Math.sqrt(item.runs)) * tDistribution;

				// Error
				item.error = ((item.sem / item.mean) * 100) || 0;

				logTest( item );

				// testDone, testNum, testSummary
				testDone[ result ] = numTests - 1;
				testNum[ result ] = 1;
				var mean = parseFloat(item.mean);
				testSummary[ result ] = (testSummary[ result ] || 0) + mean;
				updateTestPos( item );
			}

			$("div.result-item").addClass("done");

			totalTime = time = timePerTest;
			updateTime();

			$("#overview input").remove();
			$("#timebar").html("<span><strong>" + parseFloat(maxTotal).toFixed(2) + "</strong>ms (Total)</span>");
		} else {
			output += "<tr><td></td>";
			var run;
			for ( run in runs )
				output += "<th><a href='?id=" + run + "'>" + runs[run].name + "</a></th>";
			output += "<th>Winning %</th></tr>";

			var result;
			for ( result in results ) {
				// Skip results that we're filtering out
				if ( !filter.test(result) )
					continue;
	
				var tmp = processWinner(results[result].total);

				output += "<tr><th class='name'>" + result + "</th>";
				var run;
				for ( run in runs ) {
					var mean = results[result].total[run].mean;
					var error = results[result].total[run].error;
	
					runs[run].num++;
					runs[run].mean += mean;
					runs[run].error += error;
		
					output += "<td class='" + (tmp[run] || '') + "'>" + mean.toFixed(2) + "<small>ms &#177;" + error.toFixed(2) + "%</small></td>";
				}
				
				showWinner(tmp);
				output += "</tr>";
			}
	
			var run;
			for ( run in runs )
				runs[run].error /= runs[run].num;

			var tmp = processWinner(runs);

			output += "<tr><th class='name'>Total:</th>";
			var run;
			for ( run in runs )
				output += "<th class='name " + (tmp[run] || '') + "'>" + runs[run].mean.toFixed(2) + "<small>ms &#177;" + runs[run].error.toFixed(2) + "%</small></th>";
			showWinner(tmp);
			output += "</tr>";

			overview.className = "";
			overview.innerHTML = "<div class='resultwrap'><table class='results'>" + output + "</table></div>";
		}
		
		function showWinner(tmp){
			if ( datas.length > 1 ) {
				if ( tmp.tie )
					output += "<th>Tie</th>";
				else
					output += "<th>" + tmp.diff + "%</th>";
			}
		}
	}

	function updateTime(){
		time -= timePerTest;
		$("#left").html(Math.floor(time / 60) + ":" + (time % 60 < 10 ? "0" : "" ) + Math.floor(time % 60));

		var w = ((totalTime - time) / totalTime) * 100;

		$("#timebar").width((w < 1 ? 1 : w) + "%");
	}
	
	function logTest(data){
		// Keep a running summary going
		testSummary[data.curID] += parseFloat(data.mean);
		maxTotal += parseFloat(data.mean);

		testDone[data.curID] = testDone[data.curID] -1;
		updateTestPos(data);

		testElems[data.curID].next().next().append("<li><b>" + data.name + 
			":</b> " + parseFloat(data.mean).toFixed(2) + "<small>ms &#177;" + data.error.toFixed(2) + "%</small></li>");

		dataStore.push(data);
	}

	function updateTestPos(data, update){
		if ( !update )
			testDone[data.curID] = testDone[data.curID] +1;

		
		var per = (testDone[data.curID] / (testNum[data.curID] * numTests)) * 100;

		if ( update )
			per = 1;

		testElems[data.curID].html("<b>" + tests[data.curID].name + " <small>v" +
			data.version + "</small>:</b> <div class='bar'><div style='width:" +
			per + "%;'>" + (per >= 100 ? "<span>" +
			testSummary[data.curID].toFixed(2) + "ms</span>" : "") + "</div></div>");

		if ( per >= 100 && testSummary[data.curID] > 0 ) {
			testElems[data.curID].parent().addClass("done");
		}
	}
	
	function processWinner(data){
		var minVal = -1, min2Val = -1, min, min2;

		var i;
		for ( i in data ) {
			var total = data[i].mean;
			if ( minVal == -1 || total < minVal ) {
				min2Val = minVal;
				min2 = min;
				minVal = total;
				min = i;
			} else if ( min2Val == -1 || total < min2Val ) {
				min2Val = total;
				min2 = i;
			}
		}

		var ret = {
			winner: min,
			diff: -1 * Math.round((1 - (min2Val / minVal)) * 100),
			tie: (minVal + (minVal * (data[min].error / 100)) + (min2Val * (data[min2].error / 100))) >= min2Val
		};

		ret.tie = ret.tie || ret.diff == 0;

		if ( ret.tie ) {
			ret[ min ] = 'tie';
			ret[ min2 ] = 'tie';
		} else
			ret[ min ] = 'winner';

		return ret;
	}
	
	function makeElem(testID){
		testElems[testID] = $("<div class='test'></div>")
			.click(function(){
				var next = jQuery(this).next().next();
				if ( next.children().length == 0 ) return;
				var display = next.css("display");
				next.css("display", display == 'none' ? 'block' : 'none');
			});

		updateTestPos({curID: testID, collection: tests[testID].name, version: testVersions[testID]}, true);
	}
})();

// usual ScreamingDonkey scope brokenness thing
var startTest = this.startTest;
var prep = this.prep;
var endTest = this.endTest;
var test = this.test;