// SortTable.js -- Prototype-dependent version

//RP: following line was: addEvent(window, "load", sortables_init);
Event.observe(window, 'load', sortables_init);

var SORT_COLUMN_INDEX;

// Find all tables with class sortable and make them sortable
function sortables_init() {
  $$("table").each(function(table) {
		if (table.hasClassName("sortable"))
			ts_makeSortable(table);
  });
}

function ts_makeSortable(table) {
	if (!table.rows || table.rows.length == 0)
	return;
	
	// We have a 1st row: assume it's a header & make clickable links
	var coltrack = 0;
	$A(table.rows[0].cells).each(function(cell) {
		cell.innerHTML = '<a href="#" class="sortheader" ' + 
			'onclick="ts_resortTable(this, ' + coltrack + ');return false;">' +
			cell.innerHTML + /*ts_getInnerText(cell) +*/'</a>';
		
		// Track the colspan issue so the index is correct for spanned cols 
		// (we only sort on the first col of a spanned set of columns)
		if (cell.getAttribute('colspan') > 0)
			coltrack += parseInt(cell.getAttribute('colspan'), 10);
		else
			++coltrack;
	});
}

function ts_getInnerText(el) {
	if (typeof el == "string") return el;
	if (typeof el == "undefined") { return el };
	if (el.innerText) return el.innerText;	// Not needed but it is faster
	var str = "";
	
	var cs = el.childNodes;
	var l = cs.length;
	for (var i = 0; i < l; i++) {
		switch (cs[i].nodeType) {
			case 1: // ELEMENT_NODE
				str += ts_getInnerText(cs[i]);
				break;
			case 3:	// TEXT_NODE
				str += cs[i].nodeValue;
				break;
		}
	}
	return str;
}

function ts_resortTable(lnk,clid) {
  var th = $(lnk.parentNode);
  var column = clid || th.cellIndex;
    
	// Work out a type for the column
  var table = getParent(th, 'TABLE');
  if (table.rows.length <= 1) return;
    
	var itm = ts_getInnerText(table.rows[1].cells[column]);
	itm= itm.replace(/^\s*|\s*$/g, ""); //lc: trim leading spaces if any

	// choose a sort function
  var sortfn = ts_sort_caseinsensitive;
  // first pass, sniff the content of the first cell
  ts_routines.values().each(function(routine) {
  	routine.patterns.each(function(pattern) {
  		if (itm.match(pattern)) sortfn = routine.fn;
  	});
  });
  
  // 2nd pass, override if header's className has type indicators
  ts_routines.each(function(pair) {
  	if (th.hasClassName(pair.key))
  		sortfn = pair.value.fn;
  });

  SORT_COLUMN_INDEX = column;
  var firstRow = $A(table.rows[0]);
  // pull out non-sortable, total rows (class="sortbottom")
  // using an explicit loop instead of prototype's partition function,
  // as well as raw className access for significant IE6 speedups
  var newRows = $A(table.rows);
  newRows.shift();
  var bottomRows = [];
  var nBottomRows = [];
  var nNewRows = newRows.length;
  for (var nNewRow = 0; nNewRow < nNewRows; ++nNewRow) {
  	if (newRows[nNewRow].className.include('sortbottom')) {
  		nBottomRows.push(nNewRow);
  		bottomRows.push(newRows[nNewRow]);
  	}
  }

  // remove them from the newRows array
  // need to reverse them to get all of them
  nBottomRows.reverse().each(function(nRow) {
  	newRows.splice(nRow, 1);
  });
  newRows.sort(sortfn);

	if (th.hasClassName("sortdown")) {
		newRows.reverse();
		th.removeClassName("sortdown");
		th.addClassName("sortup");
	} else {
		th.removeClassName("sortup");
		th.addClassName("sortdown");
	}

  // AppendChild rows that already exist to the tbody, so it moves them rather
  // than creating new ones - and leave sortbottom ones for the bottom
  // caching tbody and using explicit loops for significant IE6 speedups
  var tbody = table.tBodies[0];
  var nNewRows = newRows.length;
  for (var nNewRow = 0; nNewRow < nNewRows; ++nNewRow)
  	tbody.appendChild(newRows[nNewRow]);
  var num_bottom_rows = bottomRows.length;
  for (var nBottomRow = 0; nBottomRow < num_bottom_rows; ++nBottomRow)
  	tbody.appendChild(bottomRows[nBottomRow]);

  // Delete any other arrows there may be showing
  var siblingTHs = th.siblings().each(function (th) {
	if (th.hasClassName("sortdown")) th.removeClassName("sortdown")
	else if (th.hasClassName("sortup")) th.removeClassName("sortup");
  });
}

function getParent(el, pTagName) {
	pTagName = pTagName.toUpperCase();
	if (el == null) return null;
	// Gecko bug, tagNames are supposed to be uppercase
	else if (el.nodeType == 1 && el.tagName.toUpperCase() == pTagName)
		return el;
	else
		return getParent(el.parentNode, pTagName);
}

// SORTING ROUTINES
var ts_routines = $H({
	currency: { fn: ts_sort_currency, patterns: [/^[£$]/] },
	date: { fn: ts_sort_date,
		patterns: [/^\d\d[\/-]\d\d[\/-]\d\d\d\d$/, /^\d\d[\/-]\d\d[\/-]\d\d$/] },
	//rp: added this routine
	datetime: { fn: ts_sort_datetime,
		patterns: [/^\d\d[\/-]\d\d[\/-]\d\d\d\d\s\d\d:\d\d\s(AM|PM)$/] },
	numeric: { fn: ts_sort_numeric, patterns: [/^[\d\.,]+$/] }, //lc: added , 
	caseinsensitive: { fn: ts_sort_caseinsensitive, patterns: [] },
	// PR: added, slightly more performant than case insensitive
	casesensitive: { fn: ts_sort_casesensitive, patterns: [] }
});
	
function ts_sort_date(a,b) {
  // y2k notes: 2-digit years <50 treated as 20XX, >50 treated as 19XX
  
  //rp: handle null cells (colspan's at bottom)
  //if (!a.cells[SORT_COLUMN_INDEX]) return 1;
  //if (!b.cells[SORT_COLUMN_INDEX]) return -1;
  
  aa = ts_getInnerText(a.cells[SORT_COLUMN_INDEX]);
  bb = ts_getInnerText(b.cells[SORT_COLUMN_INDEX]);
  //lc: trim leading spaces if any
  aa= aa.replace(/^\s*|\s*$/g, ""); 
  bb= bb.replace(/^\s*|\s*$/g, ""); 
  if (aa.length == 10) {
      dt1 = aa.substr(6,4)+aa.substr(0,2)+aa.substr(3,2);
  } else {
      yr = aa.substr(6,2);
      if (parseInt(yr) < 50) { yr = '20'+yr; } else { yr = '19'+yr; }
      dt1 = yr+aa.substr(0,2)+aa.substr(3,2);
  }
  if (bb.length == 10) {
      dt2 = bb.substr(6,4)+bb.substr(0,2)+bb.substr(3,2);
  } else {
      yr = bb.substr(6,2);
      if (parseInt(yr) < 50) { yr = '20'+yr; } else { yr = '19'+yr; }
      dt2 = yr+bb.substr(0,2)+bb.substr(3,2);
  }

  if (dt1==dt2) return 0;
  if (dt1<dt2) return -1;
  return 1;
}

//rp: added function ts_sort_datetime
function ts_sort_datetime(a,b) {
  // y2k notes: 2-digit years <50 treated as 20XX, >50 treated as 19XX
  var aa, bb, yr, dt1, dt2
  aa = ts_getInnerText(a.cells[SORT_COLUMN_INDEX]);
  bb = ts_getInnerText(b.cells[SORT_COLUMN_INDEX]);
  aa= aa.replace(/^\s*|\s*$/g, ""); 
  bb= bb.replace(/^\s*|\s*$/g, ""); 
  if (aa.length == 19) {
      dt1 = aa.substr(6,4)+aa.substr(0,2)+aa.substr(3,2)+aa.substr(11,8);
  } else {
      yr = aa.substr(6,2);
      if (parseInt(yr) < 50) { yr = '20'+yr; } else { yr = '19'+yr; }
      dt1 = yr+aa.substr(0,2)+aa.substr(3,2)+aa.substr(9,8);
  } 
  if (bb.length == 19) {
      dt2 = bb.substr(6,4)+bb.substr(0,2)+bb.substr(3,2)+bb.substr(11,8);
  } else {
      yr = bb.substr(6,2);
      if (parseInt(yr) < 50) { yr = '20'+yr; } else { yr = '19'+yr; }
      dt2 = yr+bb.substr(0,2)+bb.substr(3,2)+bb.substr(9,8);
  }

  if (dt1==dt2) return 0;
  if (dt1<dt2) return -1;
  return 1;
}

function ts_sort_currency(a,b) { 
  aa = ts_getInnerText(a.cells[SORT_COLUMN_INDEX]).replace(/[^0-9.]/g,'');
  bb = ts_getInnerText(b.cells[SORT_COLUMN_INDEX]).replace(/[^0-9.]/g,'');
  return parseFloat(aa) - parseFloat(bb);
}

function ts_sort_numeric(a,b) { 
var aa = ts_parse_number(a);
var bb = ts_parse_number(b);
return aa-bb;
}

var ts_non_numeric = /[^0-9.]/g;
function ts_parse_number(a) {
	var aa = ts_getInnerText(a.cells[SORT_COLUMN_INDEX]);
	//LC: Adding non-digit cleanup here so footnotes don't throw off sorting
	aa = parseFloat(aa.replace(/[^0-9.]/g, ''));
	return isNaN(aa) ? 0 : aa;
}

function ts_sort_caseinsensitive(a,b) {
  var aa = ts_getInnerText(a.cells[SORT_COLUMN_INDEX]).toLowerCase();
  var bb = ts_getInnerText(b.cells[SORT_COLUMN_INDEX]).toLowerCase();
  if (aa==bb) return 0;
  if (aa<bb) return -1;
  return 1;
}

function ts_sort_casesensitive(a,b) {
  var aa = ts_getInnerText(a.cells[SORT_COLUMN_INDEX]);
  var bb = ts_getInnerText(b.cells[SORT_COLUMN_INDEX]);
  if (aa==bb) return 0;
  if (aa<bb) return -1;
  return 1;
}

// addEvent and removeEvent
// cross-browser event handling for IE5+,  NS6 and Mozilla
// By Scott Andrew
function addEvent(elm, evType, fn, useCapture) {
  if (elm.addEventListener){
    elm.addEventListener(evType, fn, useCapture);
    return true;
  } else if (elm.attachEvent){
    var r = elm.attachEvent("on"+evType, fn);
    return r;
  } else {
    alert("Handler could not be removed");
  }
}