Merge pull request #463 from strawd/concurrent-requests
[mono.git] / mcs / class / System.ServiceModel / System.ServiceModel.Channels.Http / HttpReplyChannel.cs
1 //
2 // HttpReplyChannel.cs
3 //
4 // Author:
5 //      Atsushi Enomoto <atsushi@ximian.com>
6 //
7 // Copyright (C) 2010 Novell, Inc.  http://www.novell.com
8 //
9 // Permission is hereby granted, free of charge, to any person obtaining
10 // a copy of this software and associated documentation files (the
11 // "Software"), to deal in the Software without restriction, including
12 // without limitation the rights to use, copy, modify, merge, publish,
13 // distribute, sublicense, and/or sell copies of the Software, and to
14 // permit persons to whom the Software is furnished to do so, subject to
15 // the following conditions:
16 // 
17 // The above copyright notice and this permission notice shall be
18 // included in all copies or substantial portions of the Software.
19 // 
20 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
21 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
22 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
23 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
24 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
25 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
26 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
27 //
28 using System;
29 using System.Collections.Generic;
30 using System.Collections.Specialized;
31 using System.IdentityModel.Selectors;
32 using System.IdentityModel.Tokens;
33 using System.IO;
34 using System.Net;
35 using System.ServiceModel;
36 using System.ServiceModel.Security;
37 using System.Text;
38 using System.Threading;
39
40 namespace System.ServiceModel.Channels.Http
41 {
42         internal class HttpReplyChannel : InternalReplyChannelBase
43         {
44                 HttpChannelListener<IReplyChannel> source;
45                 RequestContext reqctx;
46                 SecurityTokenAuthenticator security_token_authenticator;
47                 SecurityTokenResolver security_token_resolver;
48
49                 public HttpReplyChannel (HttpChannelListener<IReplyChannel> listener)
50                         : base (listener)
51                 {
52                         this.source = listener;
53
54                         if (listener.SecurityTokenManager != null) {
55                                 var str = new SecurityTokenRequirement () { TokenType = SecurityTokenTypes.UserName };
56                                 security_token_authenticator = listener.SecurityTokenManager.CreateSecurityTokenAuthenticator (str, out security_token_resolver);
57                         }
58                 }
59
60                 internal HttpChannelListener<IReplyChannel> Source {
61                         get { return source; }
62                 }
63
64                 public MessageEncoder Encoder {
65                         get { return source.MessageEncoder; }
66                 }
67
68                 internal MessageVersion MessageVersion {
69                         get { return source.MessageEncoder.MessageVersion; }
70                 }
71
72                 public override RequestContext ReceiveRequest (TimeSpan timeout)
73                 {
74                         RequestContext ctx;
75                         if (!TryReceiveRequest (timeout, out ctx))
76                                 throw new TimeoutException ();
77                         return ctx;
78                 }
79
80                 protected override void OnOpen (TimeSpan timeout)
81                 {
82                 }
83
84                 protected override void OnAbort ()
85                 {
86                         AbortConnections (TimeSpan.Zero);
87                         base.OnAbort (); // FIXME: remove it. The base is wrong. But it is somehow required to not block some tests.
88                 }
89
90                 public override bool CancelAsync (TimeSpan timeout)
91                 {
92                         AbortConnections (timeout);
93                         // FIXME: this wait is sort of hack (because it should not be required), but without it some tests are blocked.
94                         // This hack even had better be moved to base.CancelAsync().
95 //                      if (CurrentAsyncResult != null)
96 //                              CurrentAsyncResult.AsyncWaitHandle.WaitOne (TimeSpan.FromMilliseconds (300));
97                         return base.CancelAsync (timeout);
98                 }
99
100                 void AbortConnections (TimeSpan timeout)
101                 {
102                         if (reqctx != null)
103                                 reqctx.Close (timeout);
104                 }
105
106                 bool close_started;
107
108                 protected override void OnClose (TimeSpan timeout)
109                 {
110                         if (close_started)
111                                 return;
112                         close_started = true;
113                         DateTime start = DateTime.Now;
114
115                         // FIXME: consider timeout
116                         AbortConnections (timeout - (DateTime.Now - start));
117
118                         base.OnClose (timeout - (DateTime.Now - start));
119                 }
120
121                 protected string GetHeaderItem (string raw)
122                 {
123                         if (raw == null || raw.Length == 0)
124                                 return raw;
125                         switch (raw [0]) {
126                         case '\'':
127                         case '"':
128                                 if (raw [raw.Length - 1] == raw [0])
129                                         return raw.Substring (1, raw.Length - 2);
130                                 // FIXME: is it simply an error?
131                                 break;
132                         }
133                         return raw;
134                 }
135
136                 protected HttpRequestMessageProperty CreateRequestProperty (HttpContextInfo ctxi)
137                 {
138                         var query = ctxi.Request.Url.Query;
139                         var prop = new HttpRequestMessageProperty ();
140                         prop.Method = ctxi.Request.HttpMethod;
141                         prop.QueryString = query.StartsWith ("?") ? query.Substring (1) : query;
142                         // FIXME: prop.SuppressEntityBody
143                         prop.Headers.Add (ctxi.Request.Headers);
144                         return prop;
145                 }
146
147                 public override bool TryReceiveRequest (TimeSpan timeout, out RequestContext context)
148                 {
149                         context = null;
150                         HttpContextInfo ctxi;
151                         if (!source.ListenerManager.TryDequeueRequest (source.ChannelDispatcher, timeout, out ctxi))
152                                 return false;
153                         if (ctxi == null)
154                                 return true; // returning true, yet context is null. This happens at closing phase.
155
156                         if (source.Source.AuthenticationScheme != AuthenticationSchemes.Anonymous) {
157                                 if (security_token_authenticator != null)
158                                         // FIXME: use return value?
159                                         try {
160                                                 security_token_authenticator.ValidateToken (new UserNameSecurityToken (ctxi.User, ctxi.Password));
161                                         } catch (Exception) {
162                                                 ctxi.ReturnUnauthorized ();
163                                         }
164                                 else {
165                                         ctxi.ReturnUnauthorized ();
166                                 }
167                         }
168
169                         Message msg = null;
170
171                         if (ctxi.Request.HttpMethod == "POST")
172                                 msg = CreatePostMessage (ctxi);
173                         else if (ctxi.Request.HttpMethod == "GET")
174                                 msg = Message.CreateMessage (MessageVersion.None, null); // HTTP GET-based request
175
176                         if (msg == null)
177                                 return false;
178
179                         if (msg.Headers.To == null)
180                                 msg.Headers.To = ctxi.Request.Url;
181                         msg.Properties.Add ("Via", LocalAddress.Uri);
182                         msg.Properties.Add (HttpRequestMessageProperty.Name, CreateRequestProperty (ctxi));
183
184                         Logger.LogMessage (MessageLogSourceKind.TransportReceive, ref msg, source.Source.MaxReceivedMessageSize);
185
186                         context = new HttpRequestContext (this, ctxi, msg);
187                         reqctx = context;
188                         return true;
189                 }
190
191                 protected Message CreatePostMessage (HttpContextInfo ctxi)
192                 {
193                         if (ctxi.Response.StatusCode != 200) { // it's already invalid.
194                                 ctxi.Close ();
195                                 return null;
196                         }
197
198                         if (!Encoder.IsContentTypeSupported (ctxi.Request.ContentType)) {
199                                 ctxi.Response.StatusCode = (int) HttpStatusCode.UnsupportedMediaType;
200                                 ctxi.Response.StatusDescription = String.Format (
201                                                 "Expected content-type '{0}' but got '{1}'", Encoder.ContentType, ctxi.Request.ContentType);
202                                 ctxi.Close ();
203
204                                 return null;
205                         }
206
207                         // FIXME: supply maxSizeOfHeaders.
208                         int maxSizeOfHeaders = 0x10000;
209
210 #if false // FIXME: enable it, once duplex callback test gets passed.
211                         Stream stream = ctxi.Request.InputStream;
212                         if (source.Source.TransferMode == TransferMode.Buffered) {
213                                 if (ctxi.Request.ContentLength64 <= 0)
214                                         throw new ArgumentException ("This HTTP channel is configured to use buffered mode, and thus expects Content-Length sent to the listener");
215                                 long size = 0;
216                                 var ms = new MemoryStream ();
217                                 var buf = new byte [0x1000];
218                                 while (size < ctxi.Request.ContentLength64) {
219                                         if ((size += stream.Read (buf, 0, 0x1000)) > source.Source.MaxBufferSize)
220                                                 throw new QuotaExceededException ("Message quota exceeded");
221                                         ms.Write (buf, 0, (int) (size - ms.Length));
222                                 }
223                                 ms.Position = 0;
224                                 stream = ms;
225                         }
226
227                         var msg = Encoder.ReadMessage (
228                                 stream, maxSizeOfHeaders, ctxi.Request.ContentType);
229 #else
230                         var msg = Encoder.ReadMessage (
231                                 ctxi.Request.InputStream, maxSizeOfHeaders, ctxi.Request.ContentType);
232 #endif
233
234                         if (MessageVersion.Envelope.Equals (EnvelopeVersion.Soap11) ||
235                             MessageVersion.Addressing.Equals (AddressingVersion.None)) {
236                                 string action = GetHeaderItem (ctxi.Request.Headers ["SOAPAction"]);
237                                 if (action != null) {
238                                         if (action.Length > 2 && action [0] == '"' && action [action.Length] == '"')
239                                                 action = action.Substring (1, action.Length - 2);
240                                         msg.Headers.Action = action;
241                                 }
242                         }
243                         msg.Properties.Add (RemoteEndpointMessageProperty.Name, new RemoteEndpointMessageProperty (ctxi.Request.ClientIPAddress, ctxi.Request.ClientPort));
244
245                         return msg;
246                 }
247
248                 public override bool WaitForRequest (TimeSpan timeout)
249                 {
250                         throw new NotImplementedException ();
251                 }
252         }
253 }