2002-07-25 Tim Coleman <[email protected]>

        * SoapClientMethod.cs:
        * SoapServerProtocol.cs:
                Add new internal classes as discovered.
        * SoapClientMessage.cs:
        * SoapMessage.cs:
        * SoapServerMessage.cs:
        * WebClientAsyncResult.cs:
                Add internal constructor, as found on class
                status page; modify some properties.

svn path=/trunk/mcs/; revision=6195

mcs/class/System.Web.Services/System.Web.Services.Protocols/ChangeLog

@@ -1,3 +1,14 @@
+2002-07-25  Tim Coleman <[email protected]>
+	* SoapClientMethod.cs:
+	* SoapServerProtocol.cs:
+		Add new internal classes as discovered.
+	* SoapClientMessage.cs:
+	* SoapMessage.cs:
+	* SoapServerMessage.cs:
+	* WebClientAsyncResult.cs:
+		Add internal constructor, as found on class
+		status page; modify some properties.
+
 2002-07-23  Tim Coleman <[email protected]>
 	* SoapException.cs: modified constructors to
 		call base class correctly.

mcs/class/System.Web.Services/System.Web.Services.Protocols/SoapClientMessage.cs

@@ -12,6 +12,25 @@ using System.Web.Services;
 namespace System.Web.Services.Protocols {
 	public sealed class SoapClientMessage : SoapMessage {
 
+		#region Fields
+
+		SoapHttpClientProtocol client;
+		SoapClientMethod clientMethod;
+		string url;
+
+
+		#region Constructors
+		
+		[MonoTODO ("Determine what calls this constructor.")]
+		internal SoapClientMessage (SoapHttpClientProtocol client, SoapClientMethod clientMethod, string url)
+		{
+			this.client = client;
+			this.url = url;
+			this.clientMethod = clientMethod;
+		}
+
+		#endregion 
+
 		#region Properties
 
 		public override string Action {
@@ -20,8 +39,7 @@ namespace System.Web.Services.Protocols {
 		}
 
 		public SoapHttpClientProtocol Client {
-			[MonoTODO]
-			get { throw new NotImplementedException (); }
+			get { return client; }
 		}
 
 		public override LogicalMethodInfo MethodInfo {
@@ -35,8 +53,7 @@ namespace System.Web.Services.Protocols {
 		}
 
 		public override string Url {
-			[MonoTODO]
-			get { throw new NotImplementedException (); }
+			get { return url; }
 		}
 
 		#endregion // Properties

mcs/class/System.Web.Services/System.Web.Services.Protocols/SoapClientMethod.cs

@@ -0,0 +1,16 @@
+// 
+// System.Web.Services.Protocols.SoapClientMethod.cs
+//
+// Author:
+//   Tim Coleman ([email protected])
+//
+// Copyright (C) Tim Coleman, 2002
+//
+
+using System.Web.Services;
+
+namespace System.Web.Services.Protocols {
+	[MonoTODO ("Determine what this class does.")]
+	internal sealed class SoapClientMethod {
+	}
+}

mcs/class/System.Web.Services/System.Web.Services.Protocols/SoapMessage.cs

@@ -22,6 +22,14 @@ namespace System.Web.Services.Protocols {
 
 		#endregion // Fields
 
+		#region Constructors
+
+		internal SoapMessage ()
+		{
+		}
+
+		#endregion
+
 		#region Properties
 
 		public abstract string Action {

mcs/class/System.Web.Services/System.Web.Services.Protocols/SoapServerMessage.cs

@@ -19,6 +19,16 @@ namespace System.Web.Services.Protocols {
 		bool oneWay;
 		object server;
 		string url;
+		SoapServerProtocol protocol;
+
+		#endregion
+
+		#region Constructors
+
+		[MonoTODO ("Determine what this constructor does.")]
+		internal SoapServerMessage (SoapServerProtocol protocol)
+		{
+		}
 
 		#endregion
 

mcs/class/System.Web.Services/System.Web.Services.Protocols/SoapServerProtocol.cs

@@ -0,0 +1,16 @@
+// 
+// System.Web.Services.Protocols.SoapServerProtocol.cs
+//
+// Author:
+//   Tim Coleman ([email protected])
+//
+// Copyright (C) Tim Coleman, 2002
+//
+
+using System.Web.Services;
+
+namespace System.Web.Services.Protocols {
+	[MonoTODO ("Figure out what thsi class does.")]
+	internal class SoapServerProtocol {
+	}
+}

mcs/class/System.Web.Services/System.Web.Services.Protocols/WebClientAsyncResult.cs

@@ -7,6 +7,7 @@
 // Copyright (C) Tim Coleman, 2002
 //
 
+using System.Net;
 using System.Threading;
 
 namespace System.Web.Services.Protocols {
@@ -14,11 +15,28 @@ namespace System.Web.Services.Protocols {
 
 		#region Fields
 
-		object asyncState;
 		WaitHandle waitHandle;
 
+		WebClientProtocol protocol;
+		WebRequest request;
+		AsyncCallback callback;
+		object asyncState;
+
 		#endregion // Fields
 
+		#region Constructors 
+
+		[MonoTODO ("Figure out what this does.")]
+		internal WebClientAsyncResult (WebClientProtocol protocol, object x, WebRequest request, AsyncCallback callback, object asyncState, int y)
+		{
+			this.protocol = protocol;
+			this.request = request;
+			this.callback = callback; 
+			this.asyncState = asyncState;
+		}
+
+		#endregion // Constructors
+
 		#region Properties
 
 		public object AsyncState {
@@ -43,10 +61,9 @@ namespace System.Web.Services.Protocols {
 
 		#region Methods
 
-		[MonoTODO]
 		public void Abort ()
 		{
-			throw new NotImplementedException ();
+			request.Abort ();
 		}
 
 		#endregion // Methods