/* 
XML-RPC.NET  proxy class code generator
Copyright (c) 2003, Joe Bork <joe@headblender.com>
Portions Copyright (c) 2001-2003, Charles Cook <ccook@cookcomputing.com>

Permission is hereby granted, free of charge, to any person 
obtaining a copy of this software and associated documentation 
files (the "Software"), to deal in the Software without restriction, 
including without limitation the rights to use, copy, modify, merge, 
publish, distribute, sublicense, and/or sell copies of the Software, 
and to permit persons to whom the Software is furnished to do so, 
subject to the following conditions:

The above copyright notice and this permission notice shall be 
included in all copies or substantial portions of the Software.

THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 
EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES 
OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 
NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT 
HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, 
WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER 
DEALINGS IN THE SOFTWARE.
*/

namespace Headblender.XmlRpc
{
	using System;
	using System.Collections;
	using System.Reflection;

	using System.Globalization;
	using System.Text;
	using System.IO;
	using System.CodeDom;
	using System.CodeDom.Compiler;

	using CookComputing.XmlRpc;

    public sealed class XmlRpcProxyCodeGenOptions
	{
		private string GenNamespace = "";
		private string GenTypeName = "";
		private bool GenImplicitAsync = false;
		private bool GenFlattenInterfaces = false;

		public XmlRpcProxyCodeGenOptions()
		{
			GenNamespace = "";
			GenTypeName = "";
			GenImplicitAsync = false;
			GenFlattenInterfaces = false;
		}

		public XmlRpcProxyCodeGenOptions(
			string initNamespace,
			string initTypeName,
			bool initImplicitAsync,
			bool flattenInterfaces)
		{
			GenNamespace = initNamespace;
			GenTypeName = initTypeName;
			GenImplicitAsync = initImplicitAsync;
			GenFlattenInterfaces = flattenInterfaces;
		}

		public string Namespace
		{
			get
			{
				return GenNamespace;
			}

			set
			{
				GenNamespace = value;
			}
		}

		public string TypeName
		{
			get
			{
				return GenTypeName;
			}

			set
			{
				GenTypeName = value;
			}
		}

		public bool ImplicitAsync
		{
			get
			{
				return GenImplicitAsync;
			}

			set
			{
				GenImplicitAsync = value;
			}
		}

		public bool FlattenInterfaces
		{
			get
			{
				return GenFlattenInterfaces;
			}

			set
			{
				GenFlattenInterfaces = value;
			}
		}
	}

	public sealed class XmlRpcProxyCodeGen
	{
		const string DEFAULT_RET = "xrtReturn";
		const string DEFAULT_TEMP = "xrtTemp";
		const string DEFAULT_ARR = "xrtArray";
		const string DEFAULT_CALLBACK = "xrtCallback";
		const string DEFAULT_STATUS = "xrtStatus";
		const string DEFAULT_RESULT = "xrtResult";

		const string DEFAULT_SUFFIX = "RpcProxy";
		const string DEFAULT_END = "End";
		const string DEFAULT_BEGIN = "Begin";

		private XmlRpcProxyCodeGen()
		{
			// no public constructor where all public methods are static
		}

		private delegate void BuildMethodDelegate(
			CodeTypeDeclaration declaration, 
			string methodName,
			string rpcMethodName,
			Type[] argTypes,
			string[] argNames,
			Type returnType,
			Type implementationType);

		public static string CreateCode(
			Type proxyType, 
			ICodeGenerator generator)
		{
			return CreateCode(proxyType, generator, new XmlRpcProxyCodeGenOptions());
		}

		public static string CreateCode(
			Type proxyType, 
			ICodeGenerator generator,
			XmlRpcProxyCodeGenOptions options)
		{
			if (options == null)
			{
				throw new ArgumentNullException(
					"options",
					"The options parameter cannot be null");
			}

			CodeCompileUnit ccu = CreateCodeCompileUnit(proxyType, generator, options);

			CodeGeneratorOptions cgo = new CodeGeneratorOptions();
			cgo.BlankLinesBetweenMembers = true;
			cgo.BracingStyle = "C";

			StringWriter sw = new StringWriter(CultureInfo.InvariantCulture);

			generator.GenerateCodeFromCompileUnit(ccu, sw, cgo);

			string ret = sw.ToString();

			return ret;
		}

		public static CodeCompileUnit CreateCodeCompileUnit(
			Type proxyType, 
			ICodeGenerator generator)
		{
			return CreateCodeCompileUnit(proxyType, generator, new XmlRpcProxyCodeGenOptions());
		}

		public static CodeCompileUnit CreateCodeCompileUnit(
			Type proxyType, 
			ICodeGenerator generator, 
			XmlRpcProxyCodeGenOptions options)
		{
			if (options == null)
			{
				throw new ArgumentNullException(
					"options",
					"The options parameter cannot be null");
			}

			// create unique names
			string baseName = proxyType.Name;

			// string leading "I"
			if (baseName.StartsWith("I") == true)
			{
				baseName = baseName.Remove(0,1);
			}

			string moduleName = String.Format(
				CultureInfo.InvariantCulture,
				"{0}{1}.dll",
				baseName,
				DEFAULT_SUFFIX);

			string assemblyName = "";
			if (options.Namespace.Length > 0)
			{
				assemblyName = options.Namespace;
			}
			else
			{
				assemblyName = String.Format(
					CultureInfo.InvariantCulture,
					"{0}{1}",
					baseName,
					DEFAULT_SUFFIX);
			}

			string typeName = "";
			if (options.TypeName.Length > 0)
			{
				typeName = options.TypeName;
			}
			else
			{
				typeName = assemblyName;
			}

			bool implicitAsync = options.ImplicitAsync;
			bool flattenInterfaces = options.FlattenInterfaces;

			CodeCompileUnit ccu = BuildCompileUnit(
				proxyType, 
				assemblyName, 
				moduleName, 
				typeName, 
				implicitAsync,
				flattenInterfaces);

			return ccu;
		}

		private static CodeCompileUnit BuildCompileUnit(
			Type proxyType, 
			string assemblyName,
			string moduleName,
			string typeName,
			bool implicitAsync,
			bool flattenInterfaces)
		{
			string urlString = GetXmlRpcUrl(proxyType);
			Hashtable methods = GetXmlRpcMethods(proxyType, flattenInterfaces);
			Hashtable beginMethods = GetXmlRpcBeginMethods(proxyType, flattenInterfaces);
			Hashtable endMethods = GetXmlRpcEndMethods(proxyType, flattenInterfaces);

			// if there are no Begin and End methods,
			// we can implicitly generate them
			if ((beginMethods.Count == 0) && (endMethods.Count == 0) && (implicitAsync == true))
			{
				beginMethods = GetXmlRpcMethods(proxyType, flattenInterfaces);
				endMethods = GetXmlRpcMethods(proxyType, flattenInterfaces);
			}

			CodeCompileUnit ccu = new CodeCompileUnit();

			CodeNamespace cn = new CodeNamespace(assemblyName);

			cn.Imports.Add(new CodeNamespaceImport("System"));
			cn.Imports.Add(new CodeNamespaceImport(proxyType.Namespace));
			cn.Imports.Add(new CodeNamespaceImport("CookComputing.XmlRpc"));

			CodeTypeDeclaration ctd = new CodeTypeDeclaration(typeName);

			// its a class
			ctd.IsClass = true;
			// class is public and sealed
			ctd.TypeAttributes = TypeAttributes.Public | TypeAttributes.Sealed;
			// class derives from XmlRpcClientProtocol
			ctd.BaseTypes.Add(typeof(XmlRpcClientProtocol));
			// and implements I(itf)
			ctd.BaseTypes.Add(proxyType);

			BuildConstructor(ctd, typeof(XmlRpcClientProtocol), urlString);
			BuildMethods(ctd, methods, new BuildMethodDelegate(BuildStandardMethod));
			BuildMethods(ctd, beginMethods, new BuildMethodDelegate(BuildBeginMethod));
			BuildMethods(ctd, endMethods, new BuildMethodDelegate(BuildEndMethod));

			cn.Types.Add(ctd);
			ccu.Namespaces.Add(cn);

			return ccu;
		}

		private static void BuildMethods(
			CodeTypeDeclaration declaration, 
			Hashtable methods,
			BuildMethodDelegate buildDelegate)
		{
			foreach (DictionaryEntry de in methods)
			{
				MethodData mthdData = (MethodData)de.Value;
				MethodInfo mi = mthdData.mi;
				Type[] argTypes = new Type[mi.GetParameters().Length];
				string[] argNames = new string[mi.GetParameters().Length];
				for(int i = 0; i < mi.GetParameters().Length; i++)
				{
					argTypes[i] = mi.GetParameters()[i].ParameterType;
					argNames[i] = mi.GetParameters()[i].Name;
				}
				//buildDelegate(declaration, mi.Name, mthdData.xmlRpcName, argTypes, argNames, mi.ReturnType);
				string n = (string)de.Key;
				buildDelegate(
					declaration, 
					n, 
					mthdData.xmlRpcName, 
					argTypes, 
					argNames, 
					mi.ReturnType, 
					mthdData.implementationType);
			}
		}

		private static void BuildStandardMethod(
			CodeTypeDeclaration declaration, 
			string methodName,
			string rpcMethodName,
			Type[] argTypes,
			string[] argNames,
			Type returnType,
			Type implementationType)
		{
			CodeMemberMethod cmm = new CodeMemberMethod();

			// set the attributes and name

			// normal, unqualified type names are public
			cmm.Attributes = MemberAttributes.Public | MemberAttributes.Final;

			cmm.ImplementationTypes.Add(implementationType);

			cmm.Name = methodName;
			
			// set the return type
			CodeTypeReference ctrReturn = new CodeTypeReference(returnType);
			cmm.ReturnType = ctrReturn;

			MakeParameterList(cmm, argTypes, argNames);

			// add an XmlRpcMethod attribute to the type
			CodeAttributeDeclaration cad = new CodeAttributeDeclaration();
			cad.Name = typeof(XmlRpcMethodAttribute).FullName;

			CodeAttributeArgument caa = new CodeAttributeArgument();
			CodePrimitiveExpression cpe = new CodePrimitiveExpression(rpcMethodName);
			caa.Value = cpe;

			cad.Arguments.Add(caa);

			cmm.CustomAttributes.Add(cad);

			// generate the method body:

			// if non-void return, declared locals for processing return value
			if (returnType != typeof(void))
			{
				// add some local variables
				MakeTempVariable(cmm, typeof(System.Object));
				MakeReturnVariable(cmm, returnType);
			}

			MakeTempParameterArray(cmm, argTypes, argNames);

			// construct a call to the base Invoke method
			CodeThisReferenceExpression ctre = new CodeThisReferenceExpression();

			CodeMethodReferenceExpression cmre = new CodeMethodReferenceExpression(ctre, "Invoke");
			
			CodeMethodInvokeExpression cmie = new CodeMethodInvokeExpression();
			cmie.Method = cmre;
			cmie.Parameters.Add(new CodePrimitiveExpression(methodName));
			cmie.Parameters.Add(new CodeVariableReferenceExpression(DEFAULT_ARR));

			if (returnType != typeof(void))
			{
				// assign the result to tempRetVal
				CodeAssignStatement casTemp = new CodeAssignStatement();
				casTemp.Left = new CodeVariableReferenceExpression(DEFAULT_TEMP);
				casTemp.Right = cmie;

				cmm.Statements.Add(casTemp);
			}
			else
			{
				// discard return type
				cmm.Statements.Add(cmie);
			}

			MakeReturnStatement(cmm, returnType);

			// add the finished method to the type
			declaration.Members.Add(cmm);
		}

		private static void BuildBeginMethod(
			CodeTypeDeclaration declaration, 
			string methodName,
			string rpcMethodName,
			Type[] argTypes,
			string[] argNames,
			Type returnType,
			Type implementationType)
		{
			string beginMethodName = "";

			CodeMemberMethod cmm = new CodeMemberMethod();

			// set the attributes and name
			cmm.Attributes = MemberAttributes.Public | MemberAttributes.Final;

			if (methodName.StartsWith(DEFAULT_BEGIN) == true)
			{
				// strip method name prefix
				cmm.Name = methodName.Substring(DEFAULT_BEGIN.Length, methodName.Length - DEFAULT_BEGIN.Length);
			}
			beginMethodName = String.Format(CultureInfo.InvariantCulture, "{0}{1}", DEFAULT_BEGIN, methodName);

			cmm.Name = beginMethodName;

			//!cmm.ImplementationTypes.Add(implementationType);
			
			// set the return type (always IAsyncResult)
			cmm.ReturnType = new CodeTypeReference(typeof(System.IAsyncResult));

			MakeParameterList(cmm, argTypes, argNames);

			// add callback and state params
			cmm.Parameters.Add(new CodeParameterDeclarationExpression(
				typeof(System.AsyncCallback), 
				DEFAULT_CALLBACK)
				);

			cmm.Parameters.Add(new CodeParameterDeclarationExpression(
				typeof(System.Object),
				DEFAULT_STATUS)
				);

			MakeReturnVariable(cmm, typeof(System.IAsyncResult));

			MakeTempParameterArray(cmm, argTypes, argNames);

			// construct a call to the base beginInvoke method

			CodeThisReferenceExpression ctre = new CodeThisReferenceExpression();

			CodeMethodReferenceExpression cmre = new CodeMethodReferenceExpression(ctre, "BeginInvoke");
			
			CodeMethodInvokeExpression cmie = new CodeMethodInvokeExpression();
			cmie.Method = cmre;
			cmie.Parameters.Add(new CodePrimitiveExpression(methodName));
			cmie.Parameters.Add(new CodeVariableReferenceExpression(DEFAULT_ARR));
			cmie.Parameters.Add(new CodeVariableReferenceExpression(DEFAULT_CALLBACK));
			cmie.Parameters.Add(new CodeVariableReferenceExpression(DEFAULT_STATUS));

			// assign the result to RetVal
			CodeAssignStatement casTemp = new CodeAssignStatement();
			casTemp.Left = new CodeVariableReferenceExpression(DEFAULT_RET);
			casTemp.Right = cmie;

			cmm.Statements.Add(casTemp);

			// return retVal
			CodeMethodReturnStatement cmrsCast = new CodeMethodReturnStatement();
			cmrsCast.Expression = new CodeVariableReferenceExpression(DEFAULT_RET);

			cmm.Statements.Add(cmrsCast);

			// add the finished method to the type
			declaration.Members.Add(cmm);
		}

		private static void BuildEndMethod(
			CodeTypeDeclaration declaration, 
			string methodName,
			string rpcMethodName,
			Type[] argTypes,
			string[] argNames,
			Type returnType,
			Type implementationType)
		{
			string endMethodName = "";

			CodeMemberMethod cmm = new CodeMemberMethod();

			// set the attributes and name
			cmm.Attributes = MemberAttributes.Public | MemberAttributes.Final;

			if (methodName.StartsWith(DEFAULT_END) == true)
			{
				// strip method name prefix
				cmm.Name = methodName.Substring(DEFAULT_END.Length, methodName.Length - DEFAULT_END.Length);
			}
			endMethodName = String.Format(CultureInfo.InvariantCulture, "{0}{1}", DEFAULT_END, methodName);

			cmm.Name = endMethodName;

			//!cmm.ImplementationTypes.Add(implementationType);
			
			// set the return type
			CodeTypeReference ctrReturn = new CodeTypeReference(returnType);
			cmm.ReturnType = ctrReturn;

			// set the parameter list (always a single IAsyncResult)
			CodeParameterDeclarationExpression cpde = new CodeParameterDeclarationExpression();

			cpde.Name = DEFAULT_RESULT;
			cpde.Type = new CodeTypeReference(typeof(System.IAsyncResult));

			cmm.Parameters.Add(cpde);

			// generate the method body:

			// if non-void return, declared locals for processing return value
			if (returnType != typeof(void))
			{
				// add some local variables:
				MakeTempVariable(cmm, typeof(System.Object));
				MakeReturnVariable(cmm, returnType);
			}

			// construct a call to the base EndInvoke method

			CodeThisReferenceExpression ctre = new CodeThisReferenceExpression();

			CodeMethodReferenceExpression cmre = new CodeMethodReferenceExpression(ctre, "EndInvoke");
			
			CodeMethodInvokeExpression cmie = new CodeMethodInvokeExpression();
			cmie.Method = cmre;
			cmie.Parameters.Add(new CodeVariableReferenceExpression(DEFAULT_RESULT));

			CodeIndexerExpression cie = new CodeIndexerExpression();
			cie.TargetObject = cmie;
			cie.Indices.Add(new CodePrimitiveExpression(0));

			if (returnType != typeof(void))
			{
				// assign the result to tempRetVal
				CodeAssignStatement casTemp = new CodeAssignStatement();
				casTemp.Left = new CodeVariableReferenceExpression(DEFAULT_TEMP);
				//!casTemp.Right = cie;
				casTemp.Right = cmie;

				cmm.Statements.Add(casTemp);
			}
			else
			{
				// discard return type
				//!cmm.Statements.Add(cie);
				cmm.Statements.Add(cmie);
			}

			MakeReturnStatement(cmm, returnType);

			// add the finished method to the type
			declaration.Members.Add(cmm);
		}

		private static void BuildConstructor(
			CodeTypeDeclaration declaration, 
			Type baseType,
			string urlStr)
		{
			CodeConstructor cc = new CodeConstructor();

			if (urlStr != null && urlStr.Length > 0)
			{
				// add an XmlRpcUrl attribute to the type
				CodeAttributeDeclaration cad = new CodeAttributeDeclaration();
				cad.Name = typeof(XmlRpcUrlAttribute).FullName;

				CodeAttributeArgument caa = new CodeAttributeArgument();
				CodePrimitiveExpression cpe = new CodePrimitiveExpression(urlStr);
				caa.Value = cpe;

				cad.Arguments.Add(caa);
				declaration.CustomAttributes.Add(cad);
			}

			// call the base constructor:
			cc.Attributes = MemberAttributes.Public;

			// add the constructor to the type
			declaration.Members.Add(cc);
		}


		// ==========================================================================

		private static string GetXmlRpcUrl(Type proxyType)
		{
			Attribute attr = Attribute.GetCustomAttribute(
				proxyType, 
				typeof(XmlRpcUrlAttribute));
			if (attr == null)
				return null;
			XmlRpcUrlAttribute xruAttr = attr as XmlRpcUrlAttribute;
			string url = xruAttr.Uri;
			return url;
		}


		private static Hashtable GetXmlRpcMethods(Type proxyType, bool flatten)
		{
			Hashtable ret = new Hashtable();

			RecurseGetXmlRpcMethods(proxyType, ref ret, flatten);

            return ret;
		}

		private static void RecurseGetXmlRpcMethods(Type proxyType, ref Hashtable h, bool flatten)
		{			
			if (!proxyType.IsInterface)
				throw new Exception("type not interface");

			foreach(MethodInfo mi in proxyType.GetMethods())
			{
				string xmlRpcName = GetXmlRpcMethodName(mi);
				if (xmlRpcName == null)
					continue;

				string n = mi.Name;

				if (h.Contains(n) == true)
				{
					throw new Exception("duplicate method name encountered in type hierarchy");
				}

				// add new method
				h.Add(n, new MethodData(mi, xmlRpcName, mi.ReturnType, proxyType));
			}

			if (flatten == true)
			{
				Type[] ifs = proxyType.GetInterfaces();
				for (int i = 0; i < ifs.Length; ++i)
				{
					RecurseGetXmlRpcMethods(ifs[i], ref h, flatten);
				}
			}
		}

		
		private static Hashtable GetXmlRpcBeginMethods(Type proxyType, bool flatten)
		{
			Hashtable ret = new Hashtable();

			RecurseGetXmlRpcBeginMethods(proxyType, ref ret, flatten);

			return ret;
		}

		private static void RecurseGetXmlRpcBeginMethods(Type proxyType, ref Hashtable h, bool flatten)
		{
			if (!proxyType.IsInterface)
				throw new Exception("type not interface");
			foreach(MethodInfo mi in proxyType.GetMethods())
			{
				Attribute attr = Attribute.GetCustomAttribute(mi, 
					typeof(XmlRpcBeginAttribute));
				if (attr == null)
					continue;
				string rpcMethod = ((XmlRpcBeginAttribute)attr).Method;
				if (rpcMethod.Length == 0)  
				{
					if (!mi.Name.StartsWith("Begin") || mi.Name.Length <= 5)
						throw new Exception(String.Format(
							CultureInfo.InvariantCulture, 
							"method {0} has invalid signature for begin method", 
							mi.Name));
					rpcMethod = mi.Name.Substring(5);
				}
				int paramCount = mi.GetParameters().Length;
				int i;
				for (i = 0; i < paramCount; i++)
				{
					Type paramType = mi.GetParameters()[0].ParameterType;
					if (paramType == typeof(System.AsyncCallback))
						break;
				}
				if (paramCount > 1)
				{
					if (i < paramCount - 2)
						throw new Exception(String.Format(
							CultureInfo.InvariantCulture, 
							"method {0} has invalid signature for begin method", mi.Name));
					if (i == (paramCount - 2))
					{
						Type paramType = mi.GetParameters()[i+1].ParameterType;
						if (paramType != typeof(System.Object))
							throw new Exception(String.Format(
								CultureInfo.InvariantCulture, 
								"method {0} has invalid signature for begin method", 
								mi.Name));
					}
				}
				string n = mi.Name;

				if (h.Contains(n) == true)
				{
					throw new Exception("duplicate begin method name encountered in type hierarchy");
				}

				h.Add(n, new MethodData(mi, rpcMethod, null, null));
			}


			if (flatten == true)
			{
				Type[] ifs = proxyType.GetInterfaces();
				for (int i = 0; i < ifs.Length; ++i)
				{
					RecurseGetXmlRpcBeginMethods(ifs[i], ref h, flatten);
				}
			}			
		}


		private static Hashtable GetXmlRpcEndMethods(Type proxyType, bool flatten)
		{
			Hashtable ret = new Hashtable();

			RecurseGetXmlRpcEndMethods(proxyType, ref ret, flatten);

			return ret;
		}

		private static void RecurseGetXmlRpcEndMethods(Type proxyType, ref Hashtable h, bool flatten)
		{			
			if (!proxyType.IsInterface)
				throw new Exception("type not interface");
			foreach(MethodInfo mi in proxyType.GetMethods())
			{
				Attribute attr = Attribute.GetCustomAttribute(mi, 
					typeof(XmlRpcEndAttribute));
				if (attr == null)
					continue;
				if (mi.GetParameters().Length != 1)
					throw new Exception(String.Format(
						CultureInfo.InvariantCulture, 
						"method {0} has invalid signature for end method", mi.Name));
				Type paramType = mi.GetParameters()[0].ParameterType;
				if (paramType != typeof(System.IAsyncResult))
					throw new Exception(String.Format(
						CultureInfo.InvariantCulture, 
						"method {0} has invalid signature for end method", mi.Name));
				
				string n = mi.Name;

				if (h.Contains(n) == true)
				{
					throw new Exception("duplicate end method name encountered in type hierarchy");
				}

				h.Add(h, new MethodData(mi, "", null, null));
			}

			if (flatten == true)
			{
				Type[] ifs = proxyType.GetInterfaces();
				for (int i = 0; i < ifs.Length; ++i)
				{
					RecurseGetXmlRpcEndMethods(ifs[i], ref h, flatten);
				}
			}
		}

		
		private static string GetXmlRpcMethodName(MethodInfo mi)
		{
			Attribute attr = Attribute.GetCustomAttribute(mi, 
				typeof(XmlRpcMethodAttribute));
			if (attr == null)
				return null;
			XmlRpcMethodAttribute xrmAttr = attr as XmlRpcMethodAttribute;
			string rpcMethod = xrmAttr.Method;
			if (rpcMethod.Length == 0)
			{
				rpcMethod = mi.Name;
			}
			return rpcMethod;
		}

		private class MethodData
		{
			public MethodData(MethodInfo Mi, string XmlRpcName, Type ReturnType, Type ImplementationType)
			{
				m_mi = Mi;
				m_xmlRpcName = XmlRpcName;
				m_returnType = ReturnType;
				m_implementationType = ImplementationType;
			}

			private MethodInfo m_mi;
			private string m_xmlRpcName;
			private Type m_returnType;
			private Type m_implementationType;

			public MethodInfo mi
			{
				get { return m_mi; }
				set { m_mi = value; }
			}

			public string xmlRpcName
			{
				get { return m_xmlRpcName; }
				set { m_xmlRpcName = value; }
			}

			public Type returnType
			{
				get { return m_returnType; }
				set { m_returnType = value; }
			}

			public Type implementationType
			{
				get { return m_implementationType; }
				set { m_implementationType = value; }
			}
		}


		// ==========================================================================

		private static void MakeParameterList(CodeMemberMethod method, Type[] types, string[] names)
		{
			// set the parameter list
			for (int i = 0; i < types.Length; ++i)
			{
				CodeParameterDeclarationExpression cpde = new CodeParameterDeclarationExpression();

				cpde.Name = names[i];

				CodeTypeReference ctr = new CodeTypeReference(types[i]);
				cpde.Type = ctr;

				method.Parameters.Add(cpde);
			}
		}

		private static void MakeReturnVariable(CodeMemberMethod method, Type returnType)
		{
			// return variable
			CodeVariableDeclarationStatement cvdsRet = new CodeVariableDeclarationStatement();
			cvdsRet.Name = DEFAULT_RET;
			cvdsRet.Type = new CodeTypeReference(returnType);

			if (returnType.IsValueType == false)
			{
				cvdsRet.InitExpression = new CodePrimitiveExpression(null);
			}

			method.Statements.Add(cvdsRet);
		}

		private static void MakeTempVariable(CodeMemberMethod method, Type tempType)
		{
			// temp object variable
			CodeVariableDeclarationStatement cvdsTemp = new CodeVariableDeclarationStatement();
			cvdsTemp.Name = DEFAULT_TEMP;
			cvdsTemp.Type = new CodeTypeReference(tempType);

			if (tempType.IsValueType == false)
			{
				cvdsTemp.InitExpression = new CodePrimitiveExpression(null);
			}

			method.Statements.Add(cvdsTemp);
		}

		private static void MakeTempParameterArray(CodeMemberMethod method, Type[] types, string[] names)
		{
			
			// declare array variable to store method args
			CodeVariableDeclarationStatement cvdsArr = new CodeVariableDeclarationStatement();
			cvdsArr.Name = DEFAULT_ARR;
			
			CodeTypeReference ctrArrType = new CodeTypeReference(typeof(System.Object));
			CodeTypeReference ctrArr = new CodeTypeReference(ctrArrType, 1);

			cvdsArr.Type = ctrArr;
			
			// gen code to initialize the array
			CodeArrayCreateExpression cace = new CodeArrayCreateExpression(typeof(System.Object), 1);

			// create array initializers
			for (int i = 0; i < types.Length; ++i)
			{
				CodeArgumentReferenceExpression care = new CodeArgumentReferenceExpression();
				care.ParameterName = names[i];

				cace.Initializers.Add(care);
			}

			cvdsArr.InitExpression = cace;

			method.Statements.Add(cvdsArr);
		}

		private static void MakeReturnStatement(CodeMemberMethod method, Type returnType)
		{
			if (returnType != typeof(void))
			{
				// create a cast statement
				CodeCastExpression cce = new CodeCastExpression(
					returnType, 
					new CodeVariableReferenceExpression(DEFAULT_TEMP)
					);

				CodeAssignStatement casCast = new CodeAssignStatement();
				casCast.Left = new CodeVariableReferenceExpression(DEFAULT_RET);
				casCast.Right = cce;

				method.Statements.Add(casCast);

				// return retVal
				CodeMethodReturnStatement cmrsCast = new CodeMethodReturnStatement();
				cmrsCast.Expression = new CodeVariableReferenceExpression(DEFAULT_RET);

				method.Statements.Add(cmrsCast);
			}
			else
			{
				// construct an undecorated return statement
				method.Statements.Add(new CodeMethodReturnStatement());
			}
		}

		
	}
}