2010-04-07 Jb Evain <jbevain@novell.com>
[mcs.git] / class / System.ServiceModel / Mono.Security.Protocol.Tls / HttpsClientStream.cs
blobaa43523211aa69cf74c61217f30443c3fe303fd9
1 //
2 // HttpsClientStream.cs: Glue between HttpWebRequest and SslClientStream to
3 // reduce reflection usage.
4 //
5 // Author:
6 // Sebastien Pouliot <sebastien@ximian.com>
7 //
8 // Copyright (C) 2004-2007 Novell, Inc. (http://www.novell.com)
9 //
10 // Permission is hereby granted, free of charge, to any person obtaining
11 // a copy of this software and associated documentation files (the
12 // "Software"), to deal in the Software without restriction, including
13 // without limitation the rights to use, copy, modify, merge, publish,
14 // distribute, sublicense, and/or sell copies of the Software, and to
15 // permit persons to whom the Software is furnished to do so, subject to
16 // the following conditions:
17 //
18 // The above copyright notice and this permission notice shall be
19 // included in all copies or substantial portions of the Software.
20 //
21 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
22 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
23 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
24 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
25 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
26 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
27 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
30 using System;
31 using System.IO;
32 using System.Net;
33 using System.Security.Cryptography;
34 using System.Security.Cryptography.X509Certificates;
36 namespace Mono.Security.Protocol.Tls {
38 // Note: DO NOT REUSE this class - instead use SslClientStream
40 internal class HttpsClientStream : SslClientStream {
42 private HttpWebRequest _request;
43 private int _status;
45 public HttpsClientStream (Stream stream, X509CertificateCollection clientCertificates,
46 HttpWebRequest request, byte [] buffer)
47 : base (stream, request.RequestUri.Host, false, (Mono.Security.Protocol.Tls.SecurityProtocolType)
48 ServicePointManager.SecurityProtocol, clientCertificates)
50 // this constructor permit access to the WebRequest to call
51 // ICertificatePolicy.CheckValidationResult
52 _request = request;
53 _status = 0;
54 if (buffer != null)
55 InputBuffer.Write (buffer, 0, buffer.Length);
56 #if !NET_1_0
57 // also saved from reflection
58 base.CheckCertRevocationStatus = ServicePointManager.CheckCertificateRevocationList;
59 #endif
60 #if NET_2_0
61 ClientCertSelection += delegate (X509CertificateCollection clientCerts, X509Certificate serverCertificate,
62 string targetHost, X509CertificateCollection serverRequestedCertificates) {
63 return ((clientCerts == null) || (clientCerts.Count == 0)) ? null : clientCerts [0];
65 PrivateKeySelection += delegate (X509Certificate certificate, string targetHost) {
66 X509Certificate2 cert = (certificate as X509Certificate2);
67 return (cert == null) ? null : cert.PrivateKey;
69 #endif
72 public bool TrustFailure {
73 get {
74 switch (_status) {
75 case -2146762486: // CERT_E_CHAINING 0x800B010A
76 case -2146762487: // CERT_E_UNTRUSTEDROOT 0x800B0109
77 return true;
78 default:
79 return false;
84 internal override bool RaiseServerCertificateValidation (X509Certificate certificate, int[] certificateErrors)
86 bool failed = (certificateErrors.Length > 0);
87 // only one problem can be reported by this interface
88 _status = ((failed) ? certificateErrors [0] : 0);
90 if (ServicePointManager.CertificatePolicy != null) {
91 ServicePoint sp = _request.ServicePoint;
92 return ServicePointManager.CertificatePolicy.CheckValidationResult (sp, certificate, _request, _status);
94 return failed;