Advanced Unit Testing, Part IV - Fixture Setup/Teardown, Test Repetition And Performance Tests

using System;
using System.Collections;
using System.Diagnostics;
using System.Threading;

using KALib;

namespace UTCore
{
	public delegate void TestNotificationDelegate(UTCore.TestAttribute ta);
	public delegate void TestIterationDelegate(UTCore.TestAttribute ta);
	public delegate void RunnerCompletedDelegate();

	public class TestRunner
	{
		public enum ProcDir
		{
			RunProcessForward,
			RunProcessReverse,
		}

		private AssemblyCollection assemblyCollection;
		private ArrayList testFixtureList;
		public event TestNotificationDelegate testNotificationEvent;
		public event TestIterationDelegate testIterationEvent;
		public event RunnerCompletedDelegate completedEvent;
		private int numTests;
		private static ProcDir processDirection;

		public AssemblyCollection AssemblyCollection
		{
			get {return assemblyCollection;}
		}

		public ArrayList TestFixtures
		{
			get {return testFixtureList;}
		}

		public int NumTests
		{
			get {return numTests;}
		}

		public static ProcDir ProcessDirection
		{
			get {return processDirection;}
			set {processDirection=value;}
		}

		public TestRunner()
		{
			assemblyCollection=new AssemblyCollection();
			testFixtureList=new ArrayList();
		}

		public void LoadAssembly(string file)
		{
			AssemblyItem ai=new AssemblyItem();
			ai.Load(file);
			ai.LoadNamespaces();
			ai.LoadClasses();
			ai.LoadMethods();
			assemblyCollection.Add(file, ai);
		}

		public void ParseAssemblies()
		{
			numTests=0;

			foreach (AssemblyItem ai in assemblyCollection.Values)
			{
				foreach (NamespaceItem ni in ai.NamespaceCollection.Values)
				{
					foreach (ClassItem ci in ni.ClassCollection.Values)
					{
						TestFixture tf=new TestFixture();
						foreach (object attr in ci.Attributes)
						{
							// verify that attribute class is "UnitTest"
							string attrStr=attr.ToString();
							attrStr=StringHelpers.RightOfRightmostOf(attrStr, '.');
							Trace.WriteLine("Class: "+ci.ToString()+", Attribute: "+attrStr);
							try
							{
								Type t=Type.GetType("UTCore."+attrStr);
								TestUnitAttribute tua=Activator.CreateInstance(t) as TestUnitAttribute;
								tua.Initialize(ci, null, attr);
								tua.SelfRegister(tf);
							}
							catch(Exception e)
							{
								Trace.WriteLine("Exception adding attribute: "+e.Message);
								Trace.WriteLine("Attribute "+attrStr+" is unknown");
							}
						}

						if (tf.HasTestFixture)
						{
							foreach(MethodItem mi in ci.MethodCollection.Values)
							{
								foreach (object attr in mi.Attributes)
								{
									// verify that attribute class is "UnitTest"
									string attrStr=attr.ToString();
									attrStr=StringHelpers.RightOfRightmostOf(attrStr, '.');
									Trace.WriteLine("Method: "+mi.ToString()+", Attribute: "+attrStr);
									try
									{
										Type t=Type.GetType("UTCore."+attrStr);
										TestUnitAttribute tua=Activator.CreateInstance(t) as TestUnitAttribute;
										tua.Initialize(ci, mi, attr);
										tua.SelfRegister(tf);
									}
									catch(Exception e)
									{
										Trace.WriteLine("Attribute "+attrStr+"is unknown: "+e.Message);
									}
								}
							}
							testFixtureList.Add(tf);
							numTests+=tf.NumTests;
						}
					}
				}
			}
		}

		public void RunTests()
		{
			ThreadStart runTests=new ThreadStart(RunTestsThread);
			Thread t=new Thread(runTests);
			t.Start();
		}

		public void RunTestsThread()
		{
			foreach(TestFixture tf in testFixtureList)
			{
				tf.RunTests(testNotificationEvent, testIterationEvent);
			}
			completedEvent();
		}
	}
}