function TSort_StoreDef () {
	this.sorting = [];
	this.nodes = [];
	this.rows = [];
	this.row_clones = [];
	this.sort_state = [];
	this.initialized = 0;
//	this.last_sorted = -1;
	this.history = [];
	this.sort_keys = [];
	this.sort_colors = [ '#FF0000', '#800080', '#0000FF' ];
};

function tsInit()
{
	if	(TSort_Data == null)
	{
		alert ('Error: sorting data is not provided!\n(TSort_Data is not defined)');
		return;
	}
	if	(TSort_Data.push == null)
		return;
	var table = document.getElementById(TSort_Data[0]);
	// Find thead
	var thead = table.getElementsByTagName('thead')[0];
	if	(thead == null)
	{
		alert ('Cannot find THEAD tag!');
		return;
	}
	var cols = thead.getElementsByTagName('th');
	if	(cols.length == 0)
		cols = thead.getElementsByTagName('td');
	for (var i = 0; i < cols.length; i++)
	{
		if	(i >= TSort_Data.length - 1)
			break;
		var node = cols[i];
		var sorting = TSort_Data[i + 1].toLowerCase();
		if	(sorting == null)  sorting = '';
		TSort_Store.sorting.push(sorting);

		if	((sorting != null)&&(sorting != ''))
		{
			node.tsort_col_id = i;
			node.onclick = tsDraw;
			node.innerHTML = '<a href="" onClick="return false">' + node.innerHTML + '</a><b><span id="TS_' + i + '"></span></b>';
//			node.innerHTML += '<span id="TS_' + i + '"></span>';
//			node.style.fontWeight = "normal";
			node.style.cursor = "pointer";
		}
	}
	// Get body data
	var tbody = table.getElementsByTagName('tbody')[0];
	// Get TR rows
	var rows = tbody.getElementsByTagName('tr');
	var len;
	for (var i = 0; i < rows.length; i++)
	{
		var row = rows[i];
		var cols = row.getElementsByTagName('td');
		var row_data = [];
		for (var j = 0; j < cols.length; j++)
		{
			// Get cell text
			var text = cols[j].innerHTML.replace(/^\s+/, '');
			text = text.replace(/\s+$/, '');
			var sorting = TSort_Store.sorting[j];
			if	(sorting == 's')
				text = text.toLowerCase();
			if (sorting == 'i')
			{
				text = parseInt(text);
				if	(isNaN(text))	text = 0;
			}
			if (sorting == 'f')
			{
				text = parseFloat(text);
				if	(isNaN(text))	text = 0;
			}
			row_data.push(text);
		}
		TSort_Store.rows.push(row_data);
		// Save a reference to the TR element
		var new_row = row.cloneNode(true);
		new_row.tsort_row_id = i;
		TSort_Store.row_clones[i] = new_row;
	}
	TSort_Store.initialized = 1;
}

function tsDraw()
{
	if	(TSort_Store.initialized == 0)
		return;
	var	id = this.tsort_col_id;
	var order = TSort_Store.sort_state[id];
	order = (order == null)? true: !order;

	//	Add column number to the sort keys array
	var sort_keys = TSort_Store.sort_keys;
	var i;
	sort_keys.unshift(id);
	var len = sort_keys.length;
	for (i = 1; i < len; i++)
	{
		if	(sort_keys[i] == id)
		{
			sort_keys.splice(i, 1);
			len--;
			break;
		}
	}
	if	(len > 3)
	{
		i = sort_keys.pop();
		obj = document.getElementById ('TS_' + i);
		if	(obj != null)	obj.innerHTML = '';
	}

	// Sort the rows
	TSort_Store.sort_state[id] = order;
        TSort_Store.row_clones.sort(tsSort);

	// Save the currently selected order
	var new_tbody = document.createElement('tbody');
	var row_clones = TSort_Store.row_clones;
	len = row_clones.length;
	for (i = 0; i < len; i++)
	{
		new_tbody.appendChild (row_clones[i].cloneNode(true));
	}

	// Replace table body
	var table = document.getElementById(TSort_Data[0]);
	var tbody = table.getElementsByTagName('tbody')[0];
	table.removeChild(tbody);
	table.appendChild(new_tbody);

	var obj;
	var color;
	len = sort_keys.length;
	for (i = 0; i < len; i++)
	{
		id = sort_keys[i];
		obj = document.getElementById ('TS_' + id);
		if	(obj == null)  continue;
		obj.innerHTML = '<font color="' + TSort_Store.sort_colors[i] + '">' +
			((TSort_Store.sort_state[id])? "\u2193" : "\u2191") + '</font>';
	}
}

function tsSort(a, b)
{
	var data_a = TSort_Store.rows[a.tsort_row_id];
	var data_b = TSort_Store.rows[b.tsort_row_id];
	var sort_keys = TSort_Store.sort_keys;
	var len = sort_keys.length;
	var id;
	var type;
	var order;
	var result;
	for (var i = 0; i < len; i++)
	{
		id = sort_keys[i];
		type = TSort_Store.sorting[id];

		var v_a = data_a[id];
		var v_b = data_b[id];
		if	(v_a == v_b)  continue;
		if	((type == 'i')||(type == 'f'))
			result = v_a - v_b;
		else
			result = (v_a < v_b)? -1: 1;
		order = TSort_Store.sort_state[id];
		return (order)? result: 0 - result;
	}

	return 0;
}

var TSort_Store = new TSort_StoreDef();
var TSort_Store;

if  (window.onload_sort_table == null)
{
	if  (window.onload != null)
		window.onload_sort_table = window.onload;
}

// Assign new onload function
window.onload = tsInit;