//
// System.Exception.cs
//
// Author:
//   Miguel de Icaza (miguel@ximian.com)
//
// (C) Ximian, Inc.  http://www.ximian.com
//

using System.Runtime.Serialization;
using System.Reflection;

namespace System {

	[Serializable]
//	[ClassInterface (ClassInterfaceType.AutoDual)] (no implementation yet)
	[MonoTODO]
	public class Exception : ISerializable {
		IntPtr [] trace_ips;
		Exception inner_exception;
		string message;
		string help_link;
		string class_name;
		string stack_trace = null;
		string remote_stack_trace = "TODO: Implement remote stack trace";
		int remote_stack_index;
		int hresult;
		string source;
		
		public Exception ()
		{
			inner_exception = null;
			message = "";
		}

		public Exception (string msg)
		{
			inner_exception = null;
			message = msg;
		}

		protected Exception (SerializationInfo info, StreamingContext sc)
		{
			if (info == null)
				throw new ArgumentNullException ("info");

			class_name      = info.GetString ("ClassName");
			message         = info.GetString ("Message");
			inner_exception = (Exception) info.GetValue  ("InnerException", typeof (Exception));
			help_link       = info.GetString ("HelpURL");
			stack_trace     = info.GetString ("StackTraceString");
			remote_stack_trace = info.GetString ("RemoteStackTrace");
			remote_stack_index = info.GetInt32  ("RemoteStackIndex");
			hresult            = info.GetInt32  ("HResult");
			source             = info.GetString ("Source");
		}

		public Exception (string msg, Exception e)
		{
			inner_exception = e;
			message = msg;
		}

		public Exception InnerException {
			get {
				return inner_exception;
			}
		}

		public virtual string HelpLink {
			get {
				return help_link;
			}

			set {
				help_link = value;
			}
		}

		protected int HResult {
			get {
				return hresult;
			}

			set {
				hresult = value;
			}
		}

		public virtual string Message {
			get {
				return message;
			}
		}

		[MonoTODO]
		public virtual string Source {
			get {
				// TODO: if source is null, we must return
				// the name of the assembly where the error
				// originated.
				return source;
			}

			set {
				source = value;
			}
		}

		public virtual string StackTrace {
			get {
				return stack_trace;
			}
		}

		[MonoTODO]
		public MethodBase TargetSite {
			get {
				// TODO: Implement this.
				return null;
			}
		}

		public virtual Exception GetBaseException ()
		{
			Exception inner = inner_exception;
				
			while (inner != null){
				if (inner.InnerException != null)
					inner = inner.InnerException;
				else
					return inner;
			}

			return this;
		}

		public virtual void GetObjectData (SerializationInfo info, StreamingContext context)
		{
			info.AddValue ("ClassName", class_name);
			info.AddValue ("Message",   message);
			info.AddValue ("InnerException", inner_exception);
			info.AddValue ("HelpURL",   help_link);
			info.AddValue ("StackTraceString", stack_trace);
			info.AddValue ("RemoteStackTrace", remote_stack_trace);
			info.AddValue ("RemoteStackIndex", remote_stack_index);
			info.AddValue ("HResult", hresult);
			info.AddValue ("Source", source);
		}

		public override string ToString ()
		{
			return this.GetType ().FullName + ": " + Message + "\n" +
				// GetBaseException ().GetType ().FullName +
				stack_trace;
		}
	}
}