1 | /***************************************************************************
|
---|
2 | * _ _ ____ _
|
---|
3 | * Project ___| | | | _ \| |
|
---|
4 | * / __| | | | |_) | |
|
---|
5 | * | (__| |_| | _ <| |___
|
---|
6 | * \___|\___/|_| \_\_____|
|
---|
7 | *
|
---|
8 | * Copyright (C) 2012 - 2015, Marc Hoersken, <info@marc-hoersken.de>
|
---|
9 | * Copyright (C) 2012, Mark Salisbury, <mark.salisbury@hp.com>
|
---|
10 | * Copyright (C) 2012 - 2015, Daniel Stenberg, <daniel@haxx.se>, et al.
|
---|
11 | *
|
---|
12 | * This software is licensed as described in the file COPYING, which
|
---|
13 | * you should have received as part of this distribution. The terms
|
---|
14 | * are also available at https://curl.haxx.se/docs/copyright.html.
|
---|
15 | *
|
---|
16 | * You may opt to use, copy, modify, merge, publish, distribute and/or sell
|
---|
17 | * copies of the Software, and permit persons to whom the Software is
|
---|
18 | * furnished to do so, under the terms of the COPYING file.
|
---|
19 | *
|
---|
20 | * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
|
---|
21 | * KIND, either express or implied.
|
---|
22 | *
|
---|
23 | ***************************************************************************/
|
---|
24 |
|
---|
25 | /*
|
---|
26 | * Source file for all SChannel-specific code for the TLS/SSL layer. No code
|
---|
27 | * but vtls.c should ever call or use these functions.
|
---|
28 | *
|
---|
29 | */
|
---|
30 |
|
---|
31 | /*
|
---|
32 | * Based upon the PolarSSL implementation in polarssl.c and polarssl.h:
|
---|
33 | * Copyright (C) 2010, 2011, Hoi-Ho Chan, <hoiho.chan@gmail.com>
|
---|
34 | *
|
---|
35 | * Based upon the CyaSSL implementation in cyassl.c and cyassl.h:
|
---|
36 | * Copyright (C) 1998 - 2012, Daniel Stenberg, <daniel@haxx.se>, et al.
|
---|
37 | *
|
---|
38 | * Thanks for code and inspiration!
|
---|
39 | */
|
---|
40 |
|
---|
41 | #include "curl_setup.h"
|
---|
42 |
|
---|
43 | #ifdef USE_SCHANNEL
|
---|
44 |
|
---|
45 | #ifndef USE_WINDOWS_SSPI
|
---|
46 | # error "Can't compile SCHANNEL support without SSPI."
|
---|
47 | #endif
|
---|
48 |
|
---|
49 | #include "curl_sspi.h"
|
---|
50 | #include "schannel.h"
|
---|
51 | #include "vtls.h"
|
---|
52 | #include "sendf.h"
|
---|
53 | #include "connect.h" /* for the connect timeout */
|
---|
54 | #include "strerror.h"
|
---|
55 | #include "select.h" /* for the socket readyness */
|
---|
56 | #include "inet_pton.h" /* for IP addr SNI check */
|
---|
57 | #include "curl_multibyte.h"
|
---|
58 | #include "warnless.h"
|
---|
59 | #include "curl_printf.h"
|
---|
60 | #include "curl_memory.h"
|
---|
61 | /* The last #include file should be: */
|
---|
62 | #include "memdebug.h"
|
---|
63 |
|
---|
64 | /* Uncomment to force verbose output
|
---|
65 | * #define infof(x, y, ...) printf(y, __VA_ARGS__)
|
---|
66 | * #define failf(x, y, ...) printf(y, __VA_ARGS__)
|
---|
67 | */
|
---|
68 |
|
---|
69 | static Curl_recv schannel_recv;
|
---|
70 | static Curl_send schannel_send;
|
---|
71 |
|
---|
72 | #ifdef _WIN32_WCE
|
---|
73 | static CURLcode verify_certificate(struct connectdata *conn, int sockindex);
|
---|
74 | #endif
|
---|
75 |
|
---|
76 | static void InitSecBuffer(SecBuffer *buffer, unsigned long BufType,
|
---|
77 | void *BufDataPtr, unsigned long BufByteSize)
|
---|
78 | {
|
---|
79 | buffer->cbBuffer = BufByteSize;
|
---|
80 | buffer->BufferType = BufType;
|
---|
81 | buffer->pvBuffer = BufDataPtr;
|
---|
82 | }
|
---|
83 |
|
---|
84 | static void InitSecBufferDesc(SecBufferDesc *desc, SecBuffer *BufArr,
|
---|
85 | unsigned long NumArrElem)
|
---|
86 | {
|
---|
87 | desc->ulVersion = SECBUFFER_VERSION;
|
---|
88 | desc->pBuffers = BufArr;
|
---|
89 | desc->cBuffers = NumArrElem;
|
---|
90 | }
|
---|
91 |
|
---|
92 | static CURLcode
|
---|
93 | schannel_connect_step1(struct connectdata *conn, int sockindex)
|
---|
94 | {
|
---|
95 | ssize_t written = -1;
|
---|
96 | struct SessionHandle *data = conn->data;
|
---|
97 | struct ssl_connect_data *connssl = &conn->ssl[sockindex];
|
---|
98 | SecBuffer outbuf;
|
---|
99 | SecBufferDesc outbuf_desc;
|
---|
100 | SCHANNEL_CRED schannel_cred;
|
---|
101 | SECURITY_STATUS sspi_status = SEC_E_OK;
|
---|
102 | struct curl_schannel_cred *old_cred = NULL;
|
---|
103 | struct in_addr addr;
|
---|
104 | #ifdef ENABLE_IPV6
|
---|
105 | struct in6_addr addr6;
|
---|
106 | #endif
|
---|
107 | TCHAR *host_name;
|
---|
108 | CURLcode result;
|
---|
109 |
|
---|
110 | infof(data, "schannel: SSL/TLS connection with %s port %hu (step 1/3)\n",
|
---|
111 | conn->host.name, conn->remote_port);
|
---|
112 |
|
---|
113 | /* check for an existing re-usable credential handle */
|
---|
114 | if(!Curl_ssl_getsessionid(conn, (void **)&old_cred, NULL)) {
|
---|
115 | connssl->cred = old_cred;
|
---|
116 | infof(data, "schannel: re-using existing credential handle\n");
|
---|
117 | }
|
---|
118 | else {
|
---|
119 | /* setup Schannel API options */
|
---|
120 | memset(&schannel_cred, 0, sizeof(schannel_cred));
|
---|
121 | schannel_cred.dwVersion = SCHANNEL_CRED_VERSION;
|
---|
122 |
|
---|
123 | if(data->set.ssl.verifypeer) {
|
---|
124 | #ifdef _WIN32_WCE
|
---|
125 | /* certificate validation on CE doesn't seem to work right; we'll
|
---|
126 | do it following a more manual process. */
|
---|
127 | schannel_cred.dwFlags = SCH_CRED_MANUAL_CRED_VALIDATION |
|
---|
128 | SCH_CRED_IGNORE_NO_REVOCATION_CHECK |
|
---|
129 | SCH_CRED_IGNORE_REVOCATION_OFFLINE;
|
---|
130 | #else
|
---|
131 | schannel_cred.dwFlags = SCH_CRED_AUTO_CRED_VALIDATION;
|
---|
132 | if(data->set.ssl_no_revoke)
|
---|
133 | schannel_cred.dwFlags |= SCH_CRED_IGNORE_NO_REVOCATION_CHECK |
|
---|
134 | SCH_CRED_IGNORE_REVOCATION_OFFLINE;
|
---|
135 | else
|
---|
136 | schannel_cred.dwFlags |= SCH_CRED_REVOCATION_CHECK_CHAIN;
|
---|
137 | #endif
|
---|
138 | if(data->set.ssl_no_revoke)
|
---|
139 | infof(data, "schannel: disabled server certificate revocation "
|
---|
140 | "checks\n");
|
---|
141 | else
|
---|
142 | infof(data, "schannel: checking server certificate revocation\n");
|
---|
143 | }
|
---|
144 | else {
|
---|
145 | schannel_cred.dwFlags = SCH_CRED_MANUAL_CRED_VALIDATION |
|
---|
146 | SCH_CRED_IGNORE_NO_REVOCATION_CHECK |
|
---|
147 | SCH_CRED_IGNORE_REVOCATION_OFFLINE;
|
---|
148 | infof(data, "schannel: disabled server certificate revocation checks\n");
|
---|
149 | }
|
---|
150 |
|
---|
151 | if(!data->set.ssl.verifyhost) {
|
---|
152 | schannel_cred.dwFlags |= SCH_CRED_NO_SERVERNAME_CHECK;
|
---|
153 | infof(data, "schannel: verifyhost setting prevents Schannel from "
|
---|
154 | "comparing the supplied target name with the subject "
|
---|
155 | "names in server certificates. Also disables SNI.\n");
|
---|
156 | }
|
---|
157 |
|
---|
158 | switch(data->set.ssl.version) {
|
---|
159 | default:
|
---|
160 | case CURL_SSLVERSION_DEFAULT:
|
---|
161 | case CURL_SSLVERSION_TLSv1:
|
---|
162 | schannel_cred.grbitEnabledProtocols = SP_PROT_TLS1_0_CLIENT |
|
---|
163 | SP_PROT_TLS1_1_CLIENT |
|
---|
164 | SP_PROT_TLS1_2_CLIENT;
|
---|
165 | break;
|
---|
166 | case CURL_SSLVERSION_TLSv1_0:
|
---|
167 | schannel_cred.grbitEnabledProtocols = SP_PROT_TLS1_0_CLIENT;
|
---|
168 | break;
|
---|
169 | case CURL_SSLVERSION_TLSv1_1:
|
---|
170 | schannel_cred.grbitEnabledProtocols = SP_PROT_TLS1_1_CLIENT;
|
---|
171 | break;
|
---|
172 | case CURL_SSLVERSION_TLSv1_2:
|
---|
173 | schannel_cred.grbitEnabledProtocols = SP_PROT_TLS1_2_CLIENT;
|
---|
174 | break;
|
---|
175 | case CURL_SSLVERSION_SSLv3:
|
---|
176 | schannel_cred.grbitEnabledProtocols = SP_PROT_SSL3_CLIENT;
|
---|
177 | break;
|
---|
178 | case CURL_SSLVERSION_SSLv2:
|
---|
179 | schannel_cred.grbitEnabledProtocols = SP_PROT_SSL2_CLIENT;
|
---|
180 | break;
|
---|
181 | }
|
---|
182 |
|
---|
183 | /* allocate memory for the re-usable credential handle */
|
---|
184 | connssl->cred = (struct curl_schannel_cred *)
|
---|
185 | malloc(sizeof(struct curl_schannel_cred));
|
---|
186 | if(!connssl->cred) {
|
---|
187 | failf(data, "schannel: unable to allocate memory");
|
---|
188 | return CURLE_OUT_OF_MEMORY;
|
---|
189 | }
|
---|
190 | memset(connssl->cred, 0, sizeof(struct curl_schannel_cred));
|
---|
191 |
|
---|
192 | /* https://msdn.microsoft.com/en-us/library/windows/desktop/aa374716.aspx
|
---|
193 | */
|
---|
194 | sspi_status =
|
---|
195 | s_pSecFn->AcquireCredentialsHandle(NULL, (TCHAR *)UNISP_NAME,
|
---|
196 | SECPKG_CRED_OUTBOUND, NULL,
|
---|
197 | &schannel_cred, NULL, NULL,
|
---|
198 | &connssl->cred->cred_handle,
|
---|
199 | &connssl->cred->time_stamp);
|
---|
200 |
|
---|
201 | if(sspi_status != SEC_E_OK) {
|
---|
202 | if(sspi_status == SEC_E_WRONG_PRINCIPAL)
|
---|
203 | failf(data, "schannel: SNI or certificate check failed: %s",
|
---|
204 | Curl_sspi_strerror(conn, sspi_status));
|
---|
205 | else
|
---|
206 | failf(data, "schannel: AcquireCredentialsHandle failed: %s",
|
---|
207 | Curl_sspi_strerror(conn, sspi_status));
|
---|
208 | Curl_safefree(connssl->cred);
|
---|
209 | return CURLE_SSL_CONNECT_ERROR;
|
---|
210 | }
|
---|
211 | }
|
---|
212 |
|
---|
213 | /* Warn if SNI is disabled due to use of an IP address */
|
---|
214 | if(Curl_inet_pton(AF_INET, conn->host.name, &addr)
|
---|
215 | #ifdef ENABLE_IPV6
|
---|
216 | || Curl_inet_pton(AF_INET6, conn->host.name, &addr6)
|
---|
217 | #endif
|
---|
218 | ) {
|
---|
219 | infof(data, "schannel: using IP address, SNI is not supported by OS.\n");
|
---|
220 | }
|
---|
221 |
|
---|
222 | /* setup output buffer */
|
---|
223 | InitSecBuffer(&outbuf, SECBUFFER_EMPTY, NULL, 0);
|
---|
224 | InitSecBufferDesc(&outbuf_desc, &outbuf, 1);
|
---|
225 |
|
---|
226 | /* setup request flags */
|
---|
227 | connssl->req_flags = ISC_REQ_SEQUENCE_DETECT | ISC_REQ_REPLAY_DETECT |
|
---|
228 | ISC_REQ_CONFIDENTIALITY | ISC_REQ_ALLOCATE_MEMORY |
|
---|
229 | ISC_REQ_STREAM;
|
---|
230 |
|
---|
231 | /* allocate memory for the security context handle */
|
---|
232 | connssl->ctxt = (struct curl_schannel_ctxt *)
|
---|
233 | malloc(sizeof(struct curl_schannel_ctxt));
|
---|
234 | if(!connssl->ctxt) {
|
---|
235 | failf(data, "schannel: unable to allocate memory");
|
---|
236 | return CURLE_OUT_OF_MEMORY;
|
---|
237 | }
|
---|
238 | memset(connssl->ctxt, 0, sizeof(struct curl_schannel_ctxt));
|
---|
239 |
|
---|
240 | host_name = Curl_convert_UTF8_to_tchar(conn->host.name);
|
---|
241 | if(!host_name)
|
---|
242 | return CURLE_OUT_OF_MEMORY;
|
---|
243 |
|
---|
244 | /* https://msdn.microsoft.com/en-us/library/windows/desktop/aa375924.aspx */
|
---|
245 |
|
---|
246 | sspi_status = s_pSecFn->InitializeSecurityContext(
|
---|
247 | &connssl->cred->cred_handle, NULL, host_name,
|
---|
248 | connssl->req_flags, 0, 0, NULL, 0, &connssl->ctxt->ctxt_handle,
|
---|
249 | &outbuf_desc, &connssl->ret_flags, &connssl->ctxt->time_stamp);
|
---|
250 |
|
---|
251 | Curl_unicodefree(host_name);
|
---|
252 |
|
---|
253 | if(sspi_status != SEC_I_CONTINUE_NEEDED) {
|
---|
254 | if(sspi_status == SEC_E_WRONG_PRINCIPAL)
|
---|
255 | failf(data, "schannel: SNI or certificate check failed: %s",
|
---|
256 | Curl_sspi_strerror(conn, sspi_status));
|
---|
257 | else
|
---|
258 | failf(data, "schannel: initial InitializeSecurityContext failed: %s",
|
---|
259 | Curl_sspi_strerror(conn, sspi_status));
|
---|
260 | Curl_safefree(connssl->ctxt);
|
---|
261 | return CURLE_SSL_CONNECT_ERROR;
|
---|
262 | }
|
---|
263 |
|
---|
264 | infof(data, "schannel: sending initial handshake data: "
|
---|
265 | "sending %lu bytes...\n", outbuf.cbBuffer);
|
---|
266 |
|
---|
267 | /* send initial handshake data which is now stored in output buffer */
|
---|
268 | result = Curl_write_plain(conn, conn->sock[sockindex], outbuf.pvBuffer,
|
---|
269 | outbuf.cbBuffer, &written);
|
---|
270 | s_pSecFn->FreeContextBuffer(outbuf.pvBuffer);
|
---|
271 | if((result != CURLE_OK) || (outbuf.cbBuffer != (size_t) written)) {
|
---|
272 | failf(data, "schannel: failed to send initial handshake data: "
|
---|
273 | "sent %zd of %lu bytes", written, outbuf.cbBuffer);
|
---|
274 | return CURLE_SSL_CONNECT_ERROR;
|
---|
275 | }
|
---|
276 |
|
---|
277 | infof(data, "schannel: sent initial handshake data: "
|
---|
278 | "sent %zd bytes\n", written);
|
---|
279 |
|
---|
280 | connssl->recv_unrecoverable_err = CURLE_OK;
|
---|
281 | connssl->recv_sspi_close_notify = false;
|
---|
282 | connssl->recv_connection_closed = false;
|
---|
283 |
|
---|
284 | /* continue to second handshake step */
|
---|
285 | connssl->connecting_state = ssl_connect_2;
|
---|
286 |
|
---|
287 | return CURLE_OK;
|
---|
288 | }
|
---|
289 |
|
---|
290 | static CURLcode
|
---|
291 | schannel_connect_step2(struct connectdata *conn, int sockindex)
|
---|
292 | {
|
---|
293 | int i;
|
---|
294 | ssize_t nread = -1, written = -1;
|
---|
295 | struct SessionHandle *data = conn->data;
|
---|
296 | struct ssl_connect_data *connssl = &conn->ssl[sockindex];
|
---|
297 | unsigned char *reallocated_buffer;
|
---|
298 | size_t reallocated_length;
|
---|
299 | SecBuffer outbuf[3];
|
---|
300 | SecBufferDesc outbuf_desc;
|
---|
301 | SecBuffer inbuf[2];
|
---|
302 | SecBufferDesc inbuf_desc;
|
---|
303 | SECURITY_STATUS sspi_status = SEC_E_OK;
|
---|
304 | TCHAR *host_name;
|
---|
305 | CURLcode result;
|
---|
306 | bool doread;
|
---|
307 |
|
---|
308 | doread = (connssl->connecting_state != ssl_connect_2_writing) ? TRUE : FALSE;
|
---|
309 |
|
---|
310 | infof(data, "schannel: SSL/TLS connection with %s port %hu (step 2/3)\n",
|
---|
311 | conn->host.name, conn->remote_port);
|
---|
312 |
|
---|
313 | if(!connssl->cred || !connssl->ctxt)
|
---|
314 | return CURLE_SSL_CONNECT_ERROR;
|
---|
315 |
|
---|
316 | /* buffer to store previously received and decrypted data */
|
---|
317 | if(connssl->decdata_buffer == NULL) {
|
---|
318 | connssl->decdata_offset = 0;
|
---|
319 | connssl->decdata_length = CURL_SCHANNEL_BUFFER_INIT_SIZE;
|
---|
320 | connssl->decdata_buffer = malloc(connssl->decdata_length);
|
---|
321 | if(connssl->decdata_buffer == NULL) {
|
---|
322 | failf(data, "schannel: unable to allocate memory");
|
---|
323 | return CURLE_OUT_OF_MEMORY;
|
---|
324 | }
|
---|
325 | }
|
---|
326 |
|
---|
327 | /* buffer to store previously received and encrypted data */
|
---|
328 | if(connssl->encdata_buffer == NULL) {
|
---|
329 | connssl->encdata_offset = 0;
|
---|
330 | connssl->encdata_length = CURL_SCHANNEL_BUFFER_INIT_SIZE;
|
---|
331 | connssl->encdata_buffer = malloc(connssl->encdata_length);
|
---|
332 | if(connssl->encdata_buffer == NULL) {
|
---|
333 | failf(data, "schannel: unable to allocate memory");
|
---|
334 | return CURLE_OUT_OF_MEMORY;
|
---|
335 | }
|
---|
336 | }
|
---|
337 |
|
---|
338 | /* if we need a bigger buffer to read a full message, increase buffer now */
|
---|
339 | if(connssl->encdata_length - connssl->encdata_offset <
|
---|
340 | CURL_SCHANNEL_BUFFER_FREE_SIZE) {
|
---|
341 | /* increase internal encrypted data buffer */
|
---|
342 | reallocated_length = connssl->encdata_offset +
|
---|
343 | CURL_SCHANNEL_BUFFER_FREE_SIZE;
|
---|
344 | reallocated_buffer = realloc(connssl->encdata_buffer,
|
---|
345 | reallocated_length);
|
---|
346 |
|
---|
347 | if(reallocated_buffer == NULL) {
|
---|
348 | failf(data, "schannel: unable to re-allocate memory");
|
---|
349 | return CURLE_OUT_OF_MEMORY;
|
---|
350 | }
|
---|
351 | else {
|
---|
352 | connssl->encdata_buffer = reallocated_buffer;
|
---|
353 | connssl->encdata_length = reallocated_length;
|
---|
354 | }
|
---|
355 | }
|
---|
356 |
|
---|
357 | for(;;) {
|
---|
358 | if(doread) {
|
---|
359 | /* read encrypted handshake data from socket */
|
---|
360 | result = Curl_read_plain(conn->sock[sockindex],
|
---|
361 | (char *) (connssl->encdata_buffer +
|
---|
362 | connssl->encdata_offset),
|
---|
363 | connssl->encdata_length -
|
---|
364 | connssl->encdata_offset,
|
---|
365 | &nread);
|
---|
366 | if(result == CURLE_AGAIN) {
|
---|
367 | if(connssl->connecting_state != ssl_connect_2_writing)
|
---|
368 | connssl->connecting_state = ssl_connect_2_reading;
|
---|
369 | infof(data, "schannel: failed to receive handshake, "
|
---|
370 | "need more data\n");
|
---|
371 | return CURLE_OK;
|
---|
372 | }
|
---|
373 | else if((result != CURLE_OK) || (nread == 0)) {
|
---|
374 | failf(data, "schannel: failed to receive handshake, "
|
---|
375 | "SSL/TLS connection failed");
|
---|
376 | return CURLE_SSL_CONNECT_ERROR;
|
---|
377 | }
|
---|
378 |
|
---|
379 | /* increase encrypted data buffer offset */
|
---|
380 | connssl->encdata_offset += nread;
|
---|
381 | }
|
---|
382 |
|
---|
383 | infof(data, "schannel: encrypted data buffer: offset %zu length %zu\n",
|
---|
384 | connssl->encdata_offset, connssl->encdata_length);
|
---|
385 |
|
---|
386 | /* setup input buffers */
|
---|
387 | InitSecBuffer(&inbuf[0], SECBUFFER_TOKEN, malloc(connssl->encdata_offset),
|
---|
388 | curlx_uztoul(connssl->encdata_offset));
|
---|
389 | InitSecBuffer(&inbuf[1], SECBUFFER_EMPTY, NULL, 0);
|
---|
390 | InitSecBufferDesc(&inbuf_desc, inbuf, 2);
|
---|
391 |
|
---|
392 | /* setup output buffers */
|
---|
393 | InitSecBuffer(&outbuf[0], SECBUFFER_TOKEN, NULL, 0);
|
---|
394 | InitSecBuffer(&outbuf[1], SECBUFFER_ALERT, NULL, 0);
|
---|
395 | InitSecBuffer(&outbuf[2], SECBUFFER_EMPTY, NULL, 0);
|
---|
396 | InitSecBufferDesc(&outbuf_desc, outbuf, 3);
|
---|
397 |
|
---|
398 | if(inbuf[0].pvBuffer == NULL) {
|
---|
399 | failf(data, "schannel: unable to allocate memory");
|
---|
400 | return CURLE_OUT_OF_MEMORY;
|
---|
401 | }
|
---|
402 |
|
---|
403 | /* copy received handshake data into input buffer */
|
---|
404 | memcpy(inbuf[0].pvBuffer, connssl->encdata_buffer,
|
---|
405 | connssl->encdata_offset);
|
---|
406 |
|
---|
407 | host_name = Curl_convert_UTF8_to_tchar(conn->host.name);
|
---|
408 | if(!host_name)
|
---|
409 | return CURLE_OUT_OF_MEMORY;
|
---|
410 |
|
---|
411 | /* https://msdn.microsoft.com/en-us/library/windows/desktop/aa375924.aspx
|
---|
412 | */
|
---|
413 | sspi_status = s_pSecFn->InitializeSecurityContext(
|
---|
414 | &connssl->cred->cred_handle, &connssl->ctxt->ctxt_handle,
|
---|
415 | host_name, connssl->req_flags, 0, 0, &inbuf_desc, 0, NULL,
|
---|
416 | &outbuf_desc, &connssl->ret_flags, &connssl->ctxt->time_stamp);
|
---|
417 |
|
---|
418 | Curl_unicodefree(host_name);
|
---|
419 |
|
---|
420 | /* free buffer for received handshake data */
|
---|
421 | Curl_safefree(inbuf[0].pvBuffer);
|
---|
422 |
|
---|
423 | /* check if the handshake was incomplete */
|
---|
424 | if(sspi_status == SEC_E_INCOMPLETE_MESSAGE) {
|
---|
425 | connssl->connecting_state = ssl_connect_2_reading;
|
---|
426 | infof(data, "schannel: received incomplete message, need more data\n");
|
---|
427 | return CURLE_OK;
|
---|
428 | }
|
---|
429 |
|
---|
430 | /* If the server has requested a client certificate, attempt to continue
|
---|
431 | the handshake without one. This will allow connections to servers which
|
---|
432 | request a client certificate but do not require it. */
|
---|
433 | if(sspi_status == SEC_I_INCOMPLETE_CREDENTIALS &&
|
---|
434 | !(connssl->req_flags & ISC_REQ_USE_SUPPLIED_CREDS)) {
|
---|
435 | connssl->req_flags |= ISC_REQ_USE_SUPPLIED_CREDS;
|
---|
436 | connssl->connecting_state = ssl_connect_2_writing;
|
---|
437 | infof(data, "schannel: a client certificate has been requested\n");
|
---|
438 | return CURLE_OK;
|
---|
439 | }
|
---|
440 |
|
---|
441 | /* check if the handshake needs to be continued */
|
---|
442 | if(sspi_status == SEC_I_CONTINUE_NEEDED || sspi_status == SEC_E_OK) {
|
---|
443 | for(i = 0; i < 3; i++) {
|
---|
444 | /* search for handshake tokens that need to be send */
|
---|
445 | if(outbuf[i].BufferType == SECBUFFER_TOKEN && outbuf[i].cbBuffer > 0) {
|
---|
446 | infof(data, "schannel: sending next handshake data: "
|
---|
447 | "sending %lu bytes...\n", outbuf[i].cbBuffer);
|
---|
448 |
|
---|
449 | /* send handshake token to server */
|
---|
450 | result = Curl_write_plain(conn, conn->sock[sockindex],
|
---|
451 | outbuf[i].pvBuffer, outbuf[i].cbBuffer,
|
---|
452 | &written);
|
---|
453 | if((result != CURLE_OK) ||
|
---|
454 | (outbuf[i].cbBuffer != (size_t) written)) {
|
---|
455 | failf(data, "schannel: failed to send next handshake data: "
|
---|
456 | "sent %zd of %lu bytes", written, outbuf[i].cbBuffer);
|
---|
457 | return CURLE_SSL_CONNECT_ERROR;
|
---|
458 | }
|
---|
459 | }
|
---|
460 |
|
---|
461 | /* free obsolete buffer */
|
---|
462 | if(outbuf[i].pvBuffer != NULL) {
|
---|
463 | s_pSecFn->FreeContextBuffer(outbuf[i].pvBuffer);
|
---|
464 | }
|
---|
465 | }
|
---|
466 | }
|
---|
467 | else {
|
---|
468 | if(sspi_status == SEC_E_WRONG_PRINCIPAL)
|
---|
469 | failf(data, "schannel: SNI or certificate check failed: %s",
|
---|
470 | Curl_sspi_strerror(conn, sspi_status));
|
---|
471 | else
|
---|
472 | failf(data, "schannel: next InitializeSecurityContext failed: %s",
|
---|
473 | Curl_sspi_strerror(conn, sspi_status));
|
---|
474 | return CURLE_SSL_CONNECT_ERROR;
|
---|
475 | }
|
---|
476 |
|
---|
477 | /* check if there was additional remaining encrypted data */
|
---|
478 | if(inbuf[1].BufferType == SECBUFFER_EXTRA && inbuf[1].cbBuffer > 0) {
|
---|
479 | infof(data, "schannel: encrypted data length: %lu\n", inbuf[1].cbBuffer);
|
---|
480 | /*
|
---|
481 | There are two cases where we could be getting extra data here:
|
---|
482 | 1) If we're renegotiating a connection and the handshake is already
|
---|
483 | complete (from the server perspective), it can encrypted app data
|
---|
484 | (not handshake data) in an extra buffer at this point.
|
---|
485 | 2) (sspi_status == SEC_I_CONTINUE_NEEDED) We are negotiating a
|
---|
486 | connection and this extra data is part of the handshake.
|
---|
487 | We should process the data immediately; waiting for the socket to
|
---|
488 | be ready may fail since the server is done sending handshake data.
|
---|
489 | */
|
---|
490 | /* check if the remaining data is less than the total amount
|
---|
491 | and therefore begins after the already processed data */
|
---|
492 | if(connssl->encdata_offset > inbuf[1].cbBuffer) {
|
---|
493 | memmove(connssl->encdata_buffer,
|
---|
494 | (connssl->encdata_buffer + connssl->encdata_offset) -
|
---|
495 | inbuf[1].cbBuffer, inbuf[1].cbBuffer);
|
---|
496 | connssl->encdata_offset = inbuf[1].cbBuffer;
|
---|
497 | if(sspi_status == SEC_I_CONTINUE_NEEDED) {
|
---|
498 | doread = FALSE;
|
---|
499 | continue;
|
---|
500 | }
|
---|
501 | }
|
---|
502 | }
|
---|
503 | else {
|
---|
504 | connssl->encdata_offset = 0;
|
---|
505 | }
|
---|
506 | break;
|
---|
507 | }
|
---|
508 |
|
---|
509 | /* check if the handshake needs to be continued */
|
---|
510 | if(sspi_status == SEC_I_CONTINUE_NEEDED) {
|
---|
511 | connssl->connecting_state = ssl_connect_2_reading;
|
---|
512 | return CURLE_OK;
|
---|
513 | }
|
---|
514 |
|
---|
515 | /* check if the handshake is complete */
|
---|
516 | if(sspi_status == SEC_E_OK) {
|
---|
517 | connssl->connecting_state = ssl_connect_3;
|
---|
518 | infof(data, "schannel: SSL/TLS handshake complete\n");
|
---|
519 | }
|
---|
520 |
|
---|
521 | #ifdef _WIN32_WCE
|
---|
522 | /* Windows CE doesn't do any server certificate validation.
|
---|
523 | We have to do it manually. */
|
---|
524 | if(data->set.ssl.verifypeer)
|
---|
525 | return verify_certificate(conn, sockindex);
|
---|
526 | #endif
|
---|
527 |
|
---|
528 | return CURLE_OK;
|
---|
529 | }
|
---|
530 |
|
---|
531 | static CURLcode
|
---|
532 | schannel_connect_step3(struct connectdata *conn, int sockindex)
|
---|
533 | {
|
---|
534 | CURLcode result = CURLE_OK;
|
---|
535 | struct SessionHandle *data = conn->data;
|
---|
536 | struct ssl_connect_data *connssl = &conn->ssl[sockindex];
|
---|
537 | struct curl_schannel_cred *old_cred = NULL;
|
---|
538 | bool incache;
|
---|
539 |
|
---|
540 | DEBUGASSERT(ssl_connect_3 == connssl->connecting_state);
|
---|
541 |
|
---|
542 | infof(data, "schannel: SSL/TLS connection with %s port %hu (step 3/3)\n",
|
---|
543 | conn->host.name, conn->remote_port);
|
---|
544 |
|
---|
545 | if(!connssl->cred)
|
---|
546 | return CURLE_SSL_CONNECT_ERROR;
|
---|
547 |
|
---|
548 | /* check if the required context attributes are met */
|
---|
549 | if(connssl->ret_flags != connssl->req_flags) {
|
---|
550 | if(!(connssl->ret_flags & ISC_RET_SEQUENCE_DETECT))
|
---|
551 | failf(data, "schannel: failed to setup sequence detection");
|
---|
552 | if(!(connssl->ret_flags & ISC_RET_REPLAY_DETECT))
|
---|
553 | failf(data, "schannel: failed to setup replay detection");
|
---|
554 | if(!(connssl->ret_flags & ISC_RET_CONFIDENTIALITY))
|
---|
555 | failf(data, "schannel: failed to setup confidentiality");
|
---|
556 | if(!(connssl->ret_flags & ISC_RET_ALLOCATED_MEMORY))
|
---|
557 | failf(data, "schannel: failed to setup memory allocation");
|
---|
558 | if(!(connssl->ret_flags & ISC_RET_STREAM))
|
---|
559 | failf(data, "schannel: failed to setup stream orientation");
|
---|
560 | return CURLE_SSL_CONNECT_ERROR;
|
---|
561 | }
|
---|
562 |
|
---|
563 | /* increment the reference counter of the credential/session handle */
|
---|
564 | if(connssl->cred && connssl->ctxt) {
|
---|
565 | connssl->cred->refcount++;
|
---|
566 | infof(data, "schannel: incremented credential handle refcount = %d\n",
|
---|
567 | connssl->cred->refcount);
|
---|
568 | }
|
---|
569 |
|
---|
570 | /* save the current session data for possible re-use */
|
---|
571 | incache = !(Curl_ssl_getsessionid(conn, (void **)&old_cred, NULL));
|
---|
572 | if(incache) {
|
---|
573 | if(old_cred != connssl->cred) {
|
---|
574 | infof(data, "schannel: old credential handle is stale, removing\n");
|
---|
575 | Curl_ssl_delsessionid(conn, (void *)old_cred);
|
---|
576 | incache = FALSE;
|
---|
577 | }
|
---|
578 | }
|
---|
579 |
|
---|
580 | if(!incache) {
|
---|
581 | result = Curl_ssl_addsessionid(conn, (void *)connssl->cred,
|
---|
582 | sizeof(struct curl_schannel_cred));
|
---|
583 | if(result) {
|
---|
584 | failf(data, "schannel: failed to store credential handle");
|
---|
585 | return result;
|
---|
586 | }
|
---|
587 | else {
|
---|
588 | connssl->cred->cached = TRUE;
|
---|
589 | infof(data, "schannel: stored credential handle in session cache\n");
|
---|
590 | }
|
---|
591 | }
|
---|
592 |
|
---|
593 | connssl->connecting_state = ssl_connect_done;
|
---|
594 |
|
---|
595 | return CURLE_OK;
|
---|
596 | }
|
---|
597 |
|
---|
598 | static CURLcode
|
---|
599 | schannel_connect_common(struct connectdata *conn, int sockindex,
|
---|
600 | bool nonblocking, bool *done)
|
---|
601 | {
|
---|
602 | CURLcode result;
|
---|
603 | struct SessionHandle *data = conn->data;
|
---|
604 | struct ssl_connect_data *connssl = &conn->ssl[sockindex];
|
---|
605 | curl_socket_t sockfd = conn->sock[sockindex];
|
---|
606 | long timeout_ms;
|
---|
607 | int what;
|
---|
608 |
|
---|
609 | /* check if the connection has already been established */
|
---|
610 | if(ssl_connection_complete == connssl->state) {
|
---|
611 | *done = TRUE;
|
---|
612 | return CURLE_OK;
|
---|
613 | }
|
---|
614 |
|
---|
615 | if(ssl_connect_1 == connssl->connecting_state) {
|
---|
616 | /* check out how much more time we're allowed */
|
---|
617 | timeout_ms = Curl_timeleft(data, NULL, TRUE);
|
---|
618 |
|
---|
619 | if(timeout_ms < 0) {
|
---|
620 | /* no need to continue if time already is up */
|
---|
621 | failf(data, "SSL/TLS connection timeout");
|
---|
622 | return CURLE_OPERATION_TIMEDOUT;
|
---|
623 | }
|
---|
624 |
|
---|
625 | result = schannel_connect_step1(conn, sockindex);
|
---|
626 | if(result)
|
---|
627 | return result;
|
---|
628 | }
|
---|
629 |
|
---|
630 | while(ssl_connect_2 == connssl->connecting_state ||
|
---|
631 | ssl_connect_2_reading == connssl->connecting_state ||
|
---|
632 | ssl_connect_2_writing == connssl->connecting_state) {
|
---|
633 |
|
---|
634 | /* check out how much more time we're allowed */
|
---|
635 | timeout_ms = Curl_timeleft(data, NULL, TRUE);
|
---|
636 |
|
---|
637 | if(timeout_ms < 0) {
|
---|
638 | /* no need to continue if time already is up */
|
---|
639 | failf(data, "SSL/TLS connection timeout");
|
---|
640 | return CURLE_OPERATION_TIMEDOUT;
|
---|
641 | }
|
---|
642 |
|
---|
643 | /* if ssl is expecting something, check if it's available. */
|
---|
644 | if(connssl->connecting_state == ssl_connect_2_reading
|
---|
645 | || connssl->connecting_state == ssl_connect_2_writing) {
|
---|
646 |
|
---|
647 | curl_socket_t writefd = ssl_connect_2_writing ==
|
---|
648 | connssl->connecting_state ? sockfd : CURL_SOCKET_BAD;
|
---|
649 | curl_socket_t readfd = ssl_connect_2_reading ==
|
---|
650 | connssl->connecting_state ? sockfd : CURL_SOCKET_BAD;
|
---|
651 |
|
---|
652 | what = Curl_socket_ready(readfd, writefd, nonblocking ? 0 : timeout_ms);
|
---|
653 | if(what < 0) {
|
---|
654 | /* fatal error */
|
---|
655 | failf(data, "select/poll on SSL/TLS socket, errno: %d", SOCKERRNO);
|
---|
656 | return CURLE_SSL_CONNECT_ERROR;
|
---|
657 | }
|
---|
658 | else if(0 == what) {
|
---|
659 | if(nonblocking) {
|
---|
660 | *done = FALSE;
|
---|
661 | return CURLE_OK;
|
---|
662 | }
|
---|
663 | else {
|
---|
664 | /* timeout */
|
---|
665 | failf(data, "SSL/TLS connection timeout");
|
---|
666 | return CURLE_OPERATION_TIMEDOUT;
|
---|
667 | }
|
---|
668 | }
|
---|
669 | /* socket is readable or writable */
|
---|
670 | }
|
---|
671 |
|
---|
672 | /* Run transaction, and return to the caller if it failed or if
|
---|
673 | * this connection is part of a multi handle and this loop would
|
---|
674 | * execute again. This permits the owner of a multi handle to
|
---|
675 | * abort a connection attempt before step2 has completed while
|
---|
676 | * ensuring that a client using select() or epoll() will always
|
---|
677 | * have a valid fdset to wait on.
|
---|
678 | */
|
---|
679 | result = schannel_connect_step2(conn, sockindex);
|
---|
680 | if(result || (nonblocking &&
|
---|
681 | (ssl_connect_2 == connssl->connecting_state ||
|
---|
682 | ssl_connect_2_reading == connssl->connecting_state ||
|
---|
683 | ssl_connect_2_writing == connssl->connecting_state)))
|
---|
684 | return result;
|
---|
685 |
|
---|
686 | } /* repeat step2 until all transactions are done. */
|
---|
687 |
|
---|
688 | if(ssl_connect_3 == connssl->connecting_state) {
|
---|
689 | result = schannel_connect_step3(conn, sockindex);
|
---|
690 | if(result)
|
---|
691 | return result;
|
---|
692 | }
|
---|
693 |
|
---|
694 | if(ssl_connect_done == connssl->connecting_state) {
|
---|
695 | connssl->state = ssl_connection_complete;
|
---|
696 | conn->recv[sockindex] = schannel_recv;
|
---|
697 | conn->send[sockindex] = schannel_send;
|
---|
698 | *done = TRUE;
|
---|
699 | }
|
---|
700 | else
|
---|
701 | *done = FALSE;
|
---|
702 |
|
---|
703 | /* reset our connection state machine */
|
---|
704 | connssl->connecting_state = ssl_connect_1;
|
---|
705 |
|
---|
706 | return CURLE_OK;
|
---|
707 | }
|
---|
708 |
|
---|
709 | static ssize_t
|
---|
710 | schannel_send(struct connectdata *conn, int sockindex,
|
---|
711 | const void *buf, size_t len, CURLcode *err)
|
---|
712 | {
|
---|
713 | ssize_t written = -1;
|
---|
714 | size_t data_len = 0;
|
---|
715 | unsigned char *data = NULL;
|
---|
716 | struct ssl_connect_data *connssl = &conn->ssl[sockindex];
|
---|
717 | SecBuffer outbuf[4];
|
---|
718 | SecBufferDesc outbuf_desc;
|
---|
719 | SECURITY_STATUS sspi_status = SEC_E_OK;
|
---|
720 | CURLcode result;
|
---|
721 |
|
---|
722 | /* check if the maximum stream sizes were queried */
|
---|
723 | if(connssl->stream_sizes.cbMaximumMessage == 0) {
|
---|
724 | sspi_status = s_pSecFn->QueryContextAttributes(
|
---|
725 | &connssl->ctxt->ctxt_handle,
|
---|
726 | SECPKG_ATTR_STREAM_SIZES,
|
---|
727 | &connssl->stream_sizes);
|
---|
728 | if(sspi_status != SEC_E_OK) {
|
---|
729 | *err = CURLE_SEND_ERROR;
|
---|
730 | return -1;
|
---|
731 | }
|
---|
732 | }
|
---|
733 |
|
---|
734 | /* check if the buffer is longer than the maximum message length */
|
---|
735 | if(len > connssl->stream_sizes.cbMaximumMessage) {
|
---|
736 | *err = CURLE_SEND_ERROR;
|
---|
737 | return -1;
|
---|
738 | }
|
---|
739 |
|
---|
740 | /* calculate the complete message length and allocate a buffer for it */
|
---|
741 | data_len = connssl->stream_sizes.cbHeader + len +
|
---|
742 | connssl->stream_sizes.cbTrailer;
|
---|
743 | data = (unsigned char *) malloc(data_len);
|
---|
744 | if(data == NULL) {
|
---|
745 | *err = CURLE_OUT_OF_MEMORY;
|
---|
746 | return -1;
|
---|
747 | }
|
---|
748 |
|
---|
749 | /* setup output buffers (header, data, trailer, empty) */
|
---|
750 | InitSecBuffer(&outbuf[0], SECBUFFER_STREAM_HEADER,
|
---|
751 | data, connssl->stream_sizes.cbHeader);
|
---|
752 | InitSecBuffer(&outbuf[1], SECBUFFER_DATA,
|
---|
753 | data + connssl->stream_sizes.cbHeader, curlx_uztoul(len));
|
---|
754 | InitSecBuffer(&outbuf[2], SECBUFFER_STREAM_TRAILER,
|
---|
755 | data + connssl->stream_sizes.cbHeader + len,
|
---|
756 | connssl->stream_sizes.cbTrailer);
|
---|
757 | InitSecBuffer(&outbuf[3], SECBUFFER_EMPTY, NULL, 0);
|
---|
758 | InitSecBufferDesc(&outbuf_desc, outbuf, 4);
|
---|
759 |
|
---|
760 | /* copy data into output buffer */
|
---|
761 | memcpy(outbuf[1].pvBuffer, buf, len);
|
---|
762 |
|
---|
763 | /* https://msdn.microsoft.com/en-us/library/windows/desktop/aa375390.aspx */
|
---|
764 | sspi_status = s_pSecFn->EncryptMessage(&connssl->ctxt->ctxt_handle, 0,
|
---|
765 | &outbuf_desc, 0);
|
---|
766 |
|
---|
767 | /* check if the message was encrypted */
|
---|
768 | if(sspi_status == SEC_E_OK) {
|
---|
769 | written = 0;
|
---|
770 |
|
---|
771 | /* send the encrypted message including header, data and trailer */
|
---|
772 | len = outbuf[0].cbBuffer + outbuf[1].cbBuffer + outbuf[2].cbBuffer;
|
---|
773 |
|
---|
774 | /*
|
---|
775 | It's important to send the full message which includes the header,
|
---|
776 | encrypted payload, and trailer. Until the client receives all the
|
---|
777 | data a coherent message has not been delivered and the client
|
---|
778 | can't read any of it.
|
---|
779 |
|
---|
780 | If we wanted to buffer the unwritten encrypted bytes, we would
|
---|
781 | tell the client that all data it has requested to be sent has been
|
---|
782 | sent. The unwritten encrypted bytes would be the first bytes to
|
---|
783 | send on the next invocation.
|
---|
784 | Here's the catch with this - if we tell the client that all the
|
---|
785 | bytes have been sent, will the client call this method again to
|
---|
786 | send the buffered data? Looking at who calls this function, it
|
---|
787 | seems the answer is NO.
|
---|
788 | */
|
---|
789 |
|
---|
790 | /* send entire message or fail */
|
---|
791 | while(len > (size_t)written) {
|
---|
792 | ssize_t this_write;
|
---|
793 | long timeleft;
|
---|
794 | int what;
|
---|
795 |
|
---|
796 | this_write = 0;
|
---|
797 |
|
---|
798 | timeleft = Curl_timeleft(conn->data, NULL, FALSE);
|
---|
799 | if(timeleft < 0) {
|
---|
800 | /* we already got the timeout */
|
---|
801 | failf(conn->data, "schannel: timed out sending data "
|
---|
802 | "(bytes sent: %zd)", written);
|
---|
803 | *err = CURLE_OPERATION_TIMEDOUT;
|
---|
804 | written = -1;
|
---|
805 | break;
|
---|
806 | }
|
---|
807 |
|
---|
808 | what = Curl_socket_ready(CURL_SOCKET_BAD, conn->sock[sockindex],
|
---|
809 | timeleft);
|
---|
810 | if(what < 0) {
|
---|
811 | /* fatal error */
|
---|
812 | failf(conn->data, "select/poll on SSL socket, errno: %d", SOCKERRNO);
|
---|
813 | *err = CURLE_SEND_ERROR;
|
---|
814 | written = -1;
|
---|
815 | break;
|
---|
816 | }
|
---|
817 | else if(0 == what) {
|
---|
818 | failf(conn->data, "schannel: timed out sending data "
|
---|
819 | "(bytes sent: %zd)", written);
|
---|
820 | *err = CURLE_OPERATION_TIMEDOUT;
|
---|
821 | written = -1;
|
---|
822 | break;
|
---|
823 | }
|
---|
824 | /* socket is writable */
|
---|
825 |
|
---|
826 | result = Curl_write_plain(conn, conn->sock[sockindex], data + written,
|
---|
827 | len - written, &this_write);
|
---|
828 | if(result == CURLE_AGAIN)
|
---|
829 | continue;
|
---|
830 | else if(result != CURLE_OK) {
|
---|
831 | *err = result;
|
---|
832 | written = -1;
|
---|
833 | break;
|
---|
834 | }
|
---|
835 |
|
---|
836 | written += this_write;
|
---|
837 | }
|
---|
838 | }
|
---|
839 | else if(sspi_status == SEC_E_INSUFFICIENT_MEMORY) {
|
---|
840 | *err = CURLE_OUT_OF_MEMORY;
|
---|
841 | }
|
---|
842 | else{
|
---|
843 | *err = CURLE_SEND_ERROR;
|
---|
844 | }
|
---|
845 |
|
---|
846 | Curl_safefree(data);
|
---|
847 |
|
---|
848 | if(len == (size_t)written)
|
---|
849 | /* Encrypted message including header, data and trailer entirely sent.
|
---|
850 | The return value is the number of unencrypted bytes that were sent. */
|
---|
851 | written = outbuf[1].cbBuffer;
|
---|
852 |
|
---|
853 | return written;
|
---|
854 | }
|
---|
855 |
|
---|
856 | static ssize_t
|
---|
857 | schannel_recv(struct connectdata *conn, int sockindex,
|
---|
858 | char *buf, size_t len, CURLcode *err)
|
---|
859 | {
|
---|
860 | size_t size = 0;
|
---|
861 | ssize_t nread = -1;
|
---|
862 | struct SessionHandle *data = conn->data;
|
---|
863 | struct ssl_connect_data *connssl = &conn->ssl[sockindex];
|
---|
864 | unsigned char *reallocated_buffer;
|
---|
865 | size_t reallocated_length;
|
---|
866 | bool done = FALSE;
|
---|
867 | SecBuffer inbuf[4];
|
---|
868 | SecBufferDesc inbuf_desc;
|
---|
869 | SECURITY_STATUS sspi_status = SEC_E_OK;
|
---|
870 | /* we want the length of the encrypted buffer to be at least large enough
|
---|
871 | that it can hold all the bytes requested and some TLS record overhead. */
|
---|
872 | size_t min_encdata_length = len + CURL_SCHANNEL_BUFFER_FREE_SIZE;
|
---|
873 |
|
---|
874 | /****************************************************************************
|
---|
875 | * Don't return or set connssl->recv_unrecoverable_err unless in the cleanup.
|
---|
876 | * The pattern for return error is set *err, optional infof, goto cleanup.
|
---|
877 | *
|
---|
878 | * Our priority is to always return as much decrypted data to the caller as
|
---|
879 | * possible, even if an error occurs. The state of the decrypted buffer must
|
---|
880 | * always be valid. Transfer of decrypted data to the caller's buffer is
|
---|
881 | * handled in the cleanup.
|
---|
882 | */
|
---|
883 |
|
---|
884 | infof(data, "schannel: client wants to read %zu bytes\n", len);
|
---|
885 | *err = CURLE_OK;
|
---|
886 |
|
---|
887 | if(len && len <= connssl->decdata_offset) {
|
---|
888 | infof(data, "schannel: enough decrypted data is already available\n");
|
---|
889 | goto cleanup;
|
---|
890 | }
|
---|
891 | else if(connssl->recv_unrecoverable_err) {
|
---|
892 | *err = connssl->recv_unrecoverable_err;
|
---|
893 | infof(data, "schannel: an unrecoverable error occurred in a prior call\n");
|
---|
894 | goto cleanup;
|
---|
895 | }
|
---|
896 | else if(connssl->recv_sspi_close_notify) {
|
---|
897 | /* once a server has indicated shutdown there is no more encrypted data */
|
---|
898 | infof(data, "schannel: server indicated shutdown in a prior call\n");
|
---|
899 | goto cleanup;
|
---|
900 | }
|
---|
901 | else if(!len) {
|
---|
902 | /* It's debatable what to return when !len. Regardless we can't return
|
---|
903 | immediately because there may be data to decrypt (in the case we want to
|
---|
904 | decrypt all encrypted cached data) so handle !len later in cleanup.
|
---|
905 | */
|
---|
906 | ; /* do nothing */
|
---|
907 | }
|
---|
908 | else if(!connssl->recv_connection_closed) {
|
---|
909 | /* increase enc buffer in order to fit the requested amount of data */
|
---|
910 | size = connssl->encdata_length - connssl->encdata_offset;
|
---|
911 | if(size < CURL_SCHANNEL_BUFFER_FREE_SIZE ||
|
---|
912 | connssl->encdata_length < min_encdata_length) {
|
---|
913 | reallocated_length = connssl->encdata_offset +
|
---|
914 | CURL_SCHANNEL_BUFFER_FREE_SIZE;
|
---|
915 | if(reallocated_length < min_encdata_length) {
|
---|
916 | reallocated_length = min_encdata_length;
|
---|
917 | }
|
---|
918 | reallocated_buffer = realloc(connssl->encdata_buffer,
|
---|
919 | reallocated_length);
|
---|
920 | if(reallocated_buffer == NULL) {
|
---|
921 | *err = CURLE_OUT_OF_MEMORY;
|
---|
922 | failf(data, "schannel: unable to re-allocate memory");
|
---|
923 | goto cleanup;
|
---|
924 | }
|
---|
925 |
|
---|
926 | connssl->encdata_buffer = reallocated_buffer;
|
---|
927 | connssl->encdata_length = reallocated_length;
|
---|
928 | size = connssl->encdata_length - connssl->encdata_offset;
|
---|
929 | infof(data, "schannel: encdata_buffer resized %zu\n",
|
---|
930 | connssl->encdata_length);
|
---|
931 | }
|
---|
932 |
|
---|
933 | infof(data, "schannel: encrypted data buffer: offset %zu length %zu\n",
|
---|
934 | connssl->encdata_offset, connssl->encdata_length);
|
---|
935 |
|
---|
936 | /* read encrypted data from socket */
|
---|
937 | *err = Curl_read_plain(conn->sock[sockindex],
|
---|
938 | (char *)(connssl->encdata_buffer +
|
---|
939 | connssl->encdata_offset),
|
---|
940 | size, &nread);
|
---|
941 | if(*err) {
|
---|
942 | nread = -1;
|
---|
943 | if(*err == CURLE_AGAIN)
|
---|
944 | infof(data, "schannel: Curl_read_plain returned CURLE_AGAIN\n");
|
---|
945 | else if(*err == CURLE_RECV_ERROR)
|
---|
946 | infof(data, "schannel: Curl_read_plain returned CURLE_RECV_ERROR\n");
|
---|
947 | else
|
---|
948 | infof(data, "schannel: Curl_read_plain returned error %d\n", *err);
|
---|
949 | }
|
---|
950 | else if(nread == 0) {
|
---|
951 | connssl->recv_connection_closed = true;
|
---|
952 | infof(data, "schannel: server closed the connection\n");
|
---|
953 | }
|
---|
954 | else if(nread > 0) {
|
---|
955 | connssl->encdata_offset += (size_t)nread;
|
---|
956 | infof(data, "schannel: encrypted data got %zd\n", nread);
|
---|
957 | }
|
---|
958 | }
|
---|
959 |
|
---|
960 | infof(data, "schannel: encrypted data buffer: offset %zu length %zu\n",
|
---|
961 | connssl->encdata_offset, connssl->encdata_length);
|
---|
962 |
|
---|
963 | /* decrypt loop */
|
---|
964 | while(connssl->encdata_offset > 0 && sspi_status == SEC_E_OK &&
|
---|
965 | (!len || connssl->decdata_offset < len ||
|
---|
966 | connssl->recv_connection_closed)) {
|
---|
967 | /* prepare data buffer for DecryptMessage call */
|
---|
968 | InitSecBuffer(&inbuf[0], SECBUFFER_DATA, connssl->encdata_buffer,
|
---|
969 | curlx_uztoul(connssl->encdata_offset));
|
---|
970 |
|
---|
971 | /* we need 3 more empty input buffers for possible output */
|
---|
972 | InitSecBuffer(&inbuf[1], SECBUFFER_EMPTY, NULL, 0);
|
---|
973 | InitSecBuffer(&inbuf[2], SECBUFFER_EMPTY, NULL, 0);
|
---|
974 | InitSecBuffer(&inbuf[3], SECBUFFER_EMPTY, NULL, 0);
|
---|
975 | InitSecBufferDesc(&inbuf_desc, inbuf, 4);
|
---|
976 |
|
---|
977 | /* https://msdn.microsoft.com/en-us/library/windows/desktop/aa375348.aspx
|
---|
978 | */
|
---|
979 | sspi_status = s_pSecFn->DecryptMessage(&connssl->ctxt->ctxt_handle,
|
---|
980 | &inbuf_desc, 0, NULL);
|
---|
981 |
|
---|
982 | /* check if everything went fine (server may want to renegotiate
|
---|
983 | or shutdown the connection context) */
|
---|
984 | if(sspi_status == SEC_E_OK || sspi_status == SEC_I_RENEGOTIATE ||
|
---|
985 | sspi_status == SEC_I_CONTEXT_EXPIRED) {
|
---|
986 | /* check for successfully decrypted data, even before actual
|
---|
987 | renegotiation or shutdown of the connection context */
|
---|
988 | if(inbuf[1].BufferType == SECBUFFER_DATA) {
|
---|
989 | infof(data, "schannel: decrypted data length: %lu\n",
|
---|
990 | inbuf[1].cbBuffer);
|
---|
991 |
|
---|
992 | /* increase buffer in order to fit the received amount of data */
|
---|
993 | size = inbuf[1].cbBuffer > CURL_SCHANNEL_BUFFER_FREE_SIZE ?
|
---|
994 | inbuf[1].cbBuffer : CURL_SCHANNEL_BUFFER_FREE_SIZE;
|
---|
995 | if(connssl->decdata_length - connssl->decdata_offset < size ||
|
---|
996 | connssl->decdata_length < len) {
|
---|
997 | /* increase internal decrypted data buffer */
|
---|
998 | reallocated_length = connssl->decdata_offset + size;
|
---|
999 | /* make sure that the requested amount of data fits */
|
---|
1000 | if(reallocated_length < len) {
|
---|
1001 | reallocated_length = len;
|
---|
1002 | }
|
---|
1003 | reallocated_buffer = realloc(connssl->decdata_buffer,
|
---|
1004 | reallocated_length);
|
---|
1005 | if(reallocated_buffer == NULL) {
|
---|
1006 | *err = CURLE_OUT_OF_MEMORY;
|
---|
1007 | failf(data, "schannel: unable to re-allocate memory");
|
---|
1008 | goto cleanup;
|
---|
1009 | }
|
---|
1010 | connssl->decdata_buffer = reallocated_buffer;
|
---|
1011 | connssl->decdata_length = reallocated_length;
|
---|
1012 | }
|
---|
1013 |
|
---|
1014 | /* copy decrypted data to internal buffer */
|
---|
1015 | size = inbuf[1].cbBuffer;
|
---|
1016 | if(size) {
|
---|
1017 | memcpy(connssl->decdata_buffer + connssl->decdata_offset,
|
---|
1018 | inbuf[1].pvBuffer, size);
|
---|
1019 | connssl->decdata_offset += size;
|
---|
1020 | }
|
---|
1021 |
|
---|
1022 | infof(data, "schannel: decrypted data added: %zu\n", size);
|
---|
1023 | infof(data, "schannel: decrypted data cached: offset %zu length %zu\n",
|
---|
1024 | connssl->decdata_offset, connssl->decdata_length);
|
---|
1025 | }
|
---|
1026 |
|
---|
1027 | /* check for remaining encrypted data */
|
---|
1028 | if(inbuf[3].BufferType == SECBUFFER_EXTRA && inbuf[3].cbBuffer > 0) {
|
---|
1029 | infof(data, "schannel: encrypted data length: %lu\n",
|
---|
1030 | inbuf[3].cbBuffer);
|
---|
1031 |
|
---|
1032 | /* check if the remaining data is less than the total amount
|
---|
1033 | * and therefore begins after the already processed data
|
---|
1034 | */
|
---|
1035 | if(connssl->encdata_offset > inbuf[3].cbBuffer) {
|
---|
1036 | /* move remaining encrypted data forward to the beginning of
|
---|
1037 | buffer */
|
---|
1038 | memmove(connssl->encdata_buffer,
|
---|
1039 | (connssl->encdata_buffer + connssl->encdata_offset) -
|
---|
1040 | inbuf[3].cbBuffer, inbuf[3].cbBuffer);
|
---|
1041 | connssl->encdata_offset = inbuf[3].cbBuffer;
|
---|
1042 | }
|
---|
1043 |
|
---|
1044 | infof(data, "schannel: encrypted data cached: offset %zu length %zu\n",
|
---|
1045 | connssl->encdata_offset, connssl->encdata_length);
|
---|
1046 | }
|
---|
1047 | else {
|
---|
1048 | /* reset encrypted buffer offset, because there is no data remaining */
|
---|
1049 | connssl->encdata_offset = 0;
|
---|
1050 | }
|
---|
1051 |
|
---|
1052 | /* check if server wants to renegotiate the connection context */
|
---|
1053 | if(sspi_status == SEC_I_RENEGOTIATE) {
|
---|
1054 | infof(data, "schannel: remote party requests renegotiation\n");
|
---|
1055 | if(*err && *err != CURLE_AGAIN) {
|
---|
1056 | infof(data, "schannel: can't renogotiate, an error is pending\n");
|
---|
1057 | goto cleanup;
|
---|
1058 | }
|
---|
1059 | if(connssl->encdata_offset) {
|
---|
1060 | *err = CURLE_RECV_ERROR;
|
---|
1061 | infof(data, "schannel: can't renogotiate, "
|
---|
1062 | "encrypted data available\n");
|
---|
1063 | goto cleanup;
|
---|
1064 | }
|
---|
1065 | /* begin renegotiation */
|
---|
1066 | infof(data, "schannel: renegotiating SSL/TLS connection\n");
|
---|
1067 | connssl->state = ssl_connection_negotiating;
|
---|
1068 | connssl->connecting_state = ssl_connect_2_writing;
|
---|
1069 | *err = schannel_connect_common(conn, sockindex, FALSE, &done);
|
---|
1070 | if(*err) {
|
---|
1071 | infof(data, "schannel: renegotiation failed\n");
|
---|
1072 | goto cleanup;
|
---|
1073 | }
|
---|
1074 | /* now retry receiving data */
|
---|
1075 | sspi_status = SEC_E_OK;
|
---|
1076 | infof(data, "schannel: SSL/TLS connection renegotiated\n");
|
---|
1077 | continue;
|
---|
1078 | }
|
---|
1079 | /* check if the server closed the connection */
|
---|
1080 | else if(sspi_status == SEC_I_CONTEXT_EXPIRED) {
|
---|
1081 | /* In Windows 2000 SEC_I_CONTEXT_EXPIRED (close_notify) is not
|
---|
1082 | returned so we have to work around that in cleanup. */
|
---|
1083 | connssl->recv_sspi_close_notify = true;
|
---|
1084 | if(!connssl->recv_connection_closed) {
|
---|
1085 | connssl->recv_connection_closed = true;
|
---|
1086 | infof(data, "schannel: server closed the connection\n");
|
---|
1087 | }
|
---|
1088 | goto cleanup;
|
---|
1089 | }
|
---|
1090 | }
|
---|
1091 | else if(sspi_status == SEC_E_INCOMPLETE_MESSAGE) {
|
---|
1092 | if(!*err)
|
---|
1093 | *err = CURLE_AGAIN;
|
---|
1094 | infof(data, "schannel: failed to decrypt data, need more data\n");
|
---|
1095 | goto cleanup;
|
---|
1096 | }
|
---|
1097 | else {
|
---|
1098 | *err = CURLE_RECV_ERROR;
|
---|
1099 | infof(data, "schannel: failed to read data from server: %s\n",
|
---|
1100 | Curl_sspi_strerror(conn, sspi_status));
|
---|
1101 | goto cleanup;
|
---|
1102 | }
|
---|
1103 | }
|
---|
1104 |
|
---|
1105 | infof(data, "schannel: encrypted data buffer: offset %zu length %zu\n",
|
---|
1106 | connssl->encdata_offset, connssl->encdata_length);
|
---|
1107 |
|
---|
1108 | infof(data, "schannel: decrypted data buffer: offset %zu length %zu\n",
|
---|
1109 | connssl->decdata_offset, connssl->decdata_length);
|
---|
1110 |
|
---|
1111 | cleanup:
|
---|
1112 | /* Warning- there is no guarantee the encdata state is valid at this point */
|
---|
1113 | infof(data, "schannel: schannel_recv cleanup\n");
|
---|
1114 |
|
---|
1115 | /* Error if the connection has closed without a close_notify.
|
---|
1116 | Behavior here is a matter of debate. We don't want to be vulnerable to a
|
---|
1117 | truncation attack however there's some browser precedent for ignoring the
|
---|
1118 | close_notify for compatibility reasons.
|
---|
1119 | Additionally, Windows 2000 (v5.0) is a special case since it seems it doesn't
|
---|
1120 | return close_notify. In that case if the connection was closed we assume it
|
---|
1121 | was graceful (close_notify) since there doesn't seem to be a way to tell.
|
---|
1122 | */
|
---|
1123 | if(len && !connssl->decdata_offset && connssl->recv_connection_closed &&
|
---|
1124 | !connssl->recv_sspi_close_notify) {
|
---|
1125 | bool isWin2k = FALSE;
|
---|
1126 |
|
---|
1127 | #if !defined(_WIN32_WINNT) || !defined(_WIN32_WINNT_WIN2K) || \
|
---|
1128 | (_WIN32_WINNT < _WIN32_WINNT_WIN2K)
|
---|
1129 | OSVERSIONINFO osver;
|
---|
1130 |
|
---|
1131 | memset(&osver, 0, sizeof(osver));
|
---|
1132 | osver.dwOSVersionInfoSize = sizeof(osver);
|
---|
1133 |
|
---|
1134 | /* Find out the Windows version */
|
---|
1135 | if(GetVersionEx(&osver)) {
|
---|
1136 | /* Verify the version number is 5.0 */
|
---|
1137 | if(osver.dwMajorVersion == 5 && osver.dwMinorVersion == 0)
|
---|
1138 | isWin2k = TRUE;
|
---|
1139 | }
|
---|
1140 | #else
|
---|
1141 | ULONGLONG cm;
|
---|
1142 | OSVERSIONINFOEX osver;
|
---|
1143 |
|
---|
1144 | memset(&osver, 0, sizeof(osver));
|
---|
1145 | osver.dwOSVersionInfoSize = sizeof(osver);
|
---|
1146 | osver.dwMajorVersion = 5;
|
---|
1147 |
|
---|
1148 | cm = VerSetConditionMask(0, VER_MAJORVERSION, VER_EQUAL);
|
---|
1149 | cm = VerSetConditionMask(cm, VER_MINORVERSION, VER_EQUAL);
|
---|
1150 | cm = VerSetConditionMask(cm, VER_SERVICEPACKMAJOR, VER_GREATER_EQUAL);
|
---|
1151 | cm = VerSetConditionMask(cm, VER_SERVICEPACKMINOR, VER_GREATER_EQUAL);
|
---|
1152 |
|
---|
1153 | if(VerifyVersionInfo(&osver, (VER_MAJORVERSION | VER_MINORVERSION |
|
---|
1154 | VER_SERVICEPACKMAJOR | VER_SERVICEPACKMINOR),
|
---|
1155 | cm))
|
---|
1156 | isWin2k = TRUE;
|
---|
1157 | #endif
|
---|
1158 |
|
---|
1159 | if(isWin2k && sspi_status == SEC_E_OK)
|
---|
1160 | connssl->recv_sspi_close_notify = true;
|
---|
1161 | else {
|
---|
1162 | *err = CURLE_RECV_ERROR;
|
---|
1163 | infof(data, "schannel: server closed abruptly (missing close_notify)\n");
|
---|
1164 | }
|
---|
1165 | }
|
---|
1166 |
|
---|
1167 | /* Any error other than CURLE_AGAIN is an unrecoverable error. */
|
---|
1168 | if(*err && *err != CURLE_AGAIN)
|
---|
1169 | connssl->recv_unrecoverable_err = *err;
|
---|
1170 |
|
---|
1171 | size = len < connssl->decdata_offset ? len : connssl->decdata_offset;
|
---|
1172 | if(size) {
|
---|
1173 | memcpy(buf, connssl->decdata_buffer, size);
|
---|
1174 | memmove(connssl->decdata_buffer, connssl->decdata_buffer + size,
|
---|
1175 | connssl->decdata_offset - size);
|
---|
1176 | connssl->decdata_offset -= size;
|
---|
1177 |
|
---|
1178 | infof(data, "schannel: decrypted data returned %zu\n", size);
|
---|
1179 | infof(data, "schannel: decrypted data buffer: offset %zu length %zu\n",
|
---|
1180 | connssl->decdata_offset, connssl->decdata_length);
|
---|
1181 | *err = CURLE_OK;
|
---|
1182 | return (ssize_t)size;
|
---|
1183 | }
|
---|
1184 |
|
---|
1185 | if(!*err && !connssl->recv_connection_closed)
|
---|
1186 | *err = CURLE_AGAIN;
|
---|
1187 |
|
---|
1188 | /* It's debatable what to return when !len. We could return whatever error we
|
---|
1189 | got from decryption but instead we override here so the return is consistent.
|
---|
1190 | */
|
---|
1191 | if(!len)
|
---|
1192 | *err = CURLE_OK;
|
---|
1193 |
|
---|
1194 | return *err ? -1 : 0;
|
---|
1195 | }
|
---|
1196 |
|
---|
1197 | CURLcode
|
---|
1198 | Curl_schannel_connect_nonblocking(struct connectdata *conn, int sockindex,
|
---|
1199 | bool *done)
|
---|
1200 | {
|
---|
1201 | return schannel_connect_common(conn, sockindex, TRUE, done);
|
---|
1202 | }
|
---|
1203 |
|
---|
1204 | CURLcode
|
---|
1205 | Curl_schannel_connect(struct connectdata *conn, int sockindex)
|
---|
1206 | {
|
---|
1207 | CURLcode result;
|
---|
1208 | bool done = FALSE;
|
---|
1209 |
|
---|
1210 | result = schannel_connect_common(conn, sockindex, FALSE, &done);
|
---|
1211 | if(result)
|
---|
1212 | return result;
|
---|
1213 |
|
---|
1214 | DEBUGASSERT(done);
|
---|
1215 |
|
---|
1216 | return CURLE_OK;
|
---|
1217 | }
|
---|
1218 |
|
---|
1219 | bool Curl_schannel_data_pending(const struct connectdata *conn, int sockindex)
|
---|
1220 | {
|
---|
1221 | const struct ssl_connect_data *connssl = &conn->ssl[sockindex];
|
---|
1222 |
|
---|
1223 | if(connssl->use) /* SSL/TLS is in use */
|
---|
1224 | return (connssl->encdata_offset > 0 ||
|
---|
1225 | connssl->decdata_offset > 0 ) ? TRUE : FALSE;
|
---|
1226 | else
|
---|
1227 | return FALSE;
|
---|
1228 | }
|
---|
1229 |
|
---|
1230 | void Curl_schannel_close(struct connectdata *conn, int sockindex)
|
---|
1231 | {
|
---|
1232 | if(conn->ssl[sockindex].use)
|
---|
1233 | /* if the SSL/TLS channel hasn't been shut down yet, do that now. */
|
---|
1234 | Curl_ssl_shutdown(conn, sockindex);
|
---|
1235 | }
|
---|
1236 |
|
---|
1237 | int Curl_schannel_shutdown(struct connectdata *conn, int sockindex)
|
---|
1238 | {
|
---|
1239 | /* See https://msdn.microsoft.com/en-us/library/windows/desktop/aa380138.aspx
|
---|
1240 | * Shutting Down an Schannel Connection
|
---|
1241 | */
|
---|
1242 | struct SessionHandle *data = conn->data;
|
---|
1243 | struct ssl_connect_data *connssl = &conn->ssl[sockindex];
|
---|
1244 |
|
---|
1245 | infof(data, "schannel: shutting down SSL/TLS connection with %s port %hu\n",
|
---|
1246 | conn->host.name, conn->remote_port);
|
---|
1247 |
|
---|
1248 | if(connssl->cred && connssl->ctxt) {
|
---|
1249 | SecBufferDesc BuffDesc;
|
---|
1250 | SecBuffer Buffer;
|
---|
1251 | SECURITY_STATUS sspi_status;
|
---|
1252 | SecBuffer outbuf;
|
---|
1253 | SecBufferDesc outbuf_desc;
|
---|
1254 | CURLcode result;
|
---|
1255 | TCHAR *host_name;
|
---|
1256 | DWORD dwshut = SCHANNEL_SHUTDOWN;
|
---|
1257 |
|
---|
1258 | InitSecBuffer(&Buffer, SECBUFFER_TOKEN, &dwshut, sizeof(dwshut));
|
---|
1259 | InitSecBufferDesc(&BuffDesc, &Buffer, 1);
|
---|
1260 |
|
---|
1261 | sspi_status = s_pSecFn->ApplyControlToken(&connssl->ctxt->ctxt_handle,
|
---|
1262 | &BuffDesc);
|
---|
1263 |
|
---|
1264 | if(sspi_status != SEC_E_OK)
|
---|
1265 | failf(data, "schannel: ApplyControlToken failure: %s",
|
---|
1266 | Curl_sspi_strerror(conn, sspi_status));
|
---|
1267 |
|
---|
1268 | host_name = Curl_convert_UTF8_to_tchar(conn->host.name);
|
---|
1269 | if(!host_name)
|
---|
1270 | return CURLE_OUT_OF_MEMORY;
|
---|
1271 |
|
---|
1272 | /* setup output buffer */
|
---|
1273 | InitSecBuffer(&outbuf, SECBUFFER_EMPTY, NULL, 0);
|
---|
1274 | InitSecBufferDesc(&outbuf_desc, &outbuf, 1);
|
---|
1275 |
|
---|
1276 | sspi_status = s_pSecFn->InitializeSecurityContext(
|
---|
1277 | &connssl->cred->cred_handle,
|
---|
1278 | &connssl->ctxt->ctxt_handle,
|
---|
1279 | host_name,
|
---|
1280 | connssl->req_flags,
|
---|
1281 | 0,
|
---|
1282 | 0,
|
---|
1283 | NULL,
|
---|
1284 | 0,
|
---|
1285 | &connssl->ctxt->ctxt_handle,
|
---|
1286 | &outbuf_desc,
|
---|
1287 | &connssl->ret_flags,
|
---|
1288 | &connssl->ctxt->time_stamp);
|
---|
1289 |
|
---|
1290 | Curl_unicodefree(host_name);
|
---|
1291 |
|
---|
1292 | if((sspi_status == SEC_E_OK) || (sspi_status == SEC_I_CONTEXT_EXPIRED)) {
|
---|
1293 | /* send close message which is in output buffer */
|
---|
1294 | ssize_t written;
|
---|
1295 | result = Curl_write_plain(conn, conn->sock[sockindex], outbuf.pvBuffer,
|
---|
1296 | outbuf.cbBuffer, &written);
|
---|
1297 |
|
---|
1298 | s_pSecFn->FreeContextBuffer(outbuf.pvBuffer);
|
---|
1299 | if((result != CURLE_OK) || (outbuf.cbBuffer != (size_t) written)) {
|
---|
1300 | infof(data, "schannel: failed to send close msg: %s"
|
---|
1301 | " (bytes written: %zd)\n", curl_easy_strerror(result), written);
|
---|
1302 | }
|
---|
1303 | }
|
---|
1304 | }
|
---|
1305 |
|
---|
1306 | /* free SSPI Schannel API security context handle */
|
---|
1307 | if(connssl->ctxt) {
|
---|
1308 | infof(data, "schannel: clear security context handle\n");
|
---|
1309 | s_pSecFn->DeleteSecurityContext(&connssl->ctxt->ctxt_handle);
|
---|
1310 | Curl_safefree(connssl->ctxt);
|
---|
1311 | }
|
---|
1312 |
|
---|
1313 | /* free SSPI Schannel API credential handle */
|
---|
1314 | if(connssl->cred) {
|
---|
1315 | /* decrement the reference counter of the credential/session handle */
|
---|
1316 | if(connssl->cred->refcount > 0) {
|
---|
1317 | connssl->cred->refcount--;
|
---|
1318 | infof(data, "schannel: decremented credential handle refcount = %d\n",
|
---|
1319 | connssl->cred->refcount);
|
---|
1320 | }
|
---|
1321 |
|
---|
1322 | /* if the handle was not cached and the refcount is zero */
|
---|
1323 | if(!connssl->cred->cached && connssl->cred->refcount == 0) {
|
---|
1324 | infof(data, "schannel: clear credential handle\n");
|
---|
1325 | s_pSecFn->FreeCredentialsHandle(&connssl->cred->cred_handle);
|
---|
1326 | Curl_safefree(connssl->cred);
|
---|
1327 | }
|
---|
1328 | }
|
---|
1329 |
|
---|
1330 | /* free internal buffer for received encrypted data */
|
---|
1331 | if(connssl->encdata_buffer != NULL) {
|
---|
1332 | Curl_safefree(connssl->encdata_buffer);
|
---|
1333 | connssl->encdata_length = 0;
|
---|
1334 | connssl->encdata_offset = 0;
|
---|
1335 | }
|
---|
1336 |
|
---|
1337 | /* free internal buffer for received decrypted data */
|
---|
1338 | if(connssl->decdata_buffer != NULL) {
|
---|
1339 | Curl_safefree(connssl->decdata_buffer);
|
---|
1340 | connssl->decdata_length = 0;
|
---|
1341 | connssl->decdata_offset = 0;
|
---|
1342 | }
|
---|
1343 |
|
---|
1344 | return CURLE_OK;
|
---|
1345 | }
|
---|
1346 |
|
---|
1347 | void Curl_schannel_session_free(void *ptr)
|
---|
1348 | {
|
---|
1349 | struct curl_schannel_cred *cred = ptr;
|
---|
1350 |
|
---|
1351 | if(cred && cred->cached) {
|
---|
1352 | if(cred->refcount == 0) {
|
---|
1353 | s_pSecFn->FreeCredentialsHandle(&cred->cred_handle);
|
---|
1354 | Curl_safefree(cred);
|
---|
1355 | }
|
---|
1356 | else {
|
---|
1357 | cred->cached = FALSE;
|
---|
1358 | }
|
---|
1359 | }
|
---|
1360 | }
|
---|
1361 |
|
---|
1362 | int Curl_schannel_init(void)
|
---|
1363 | {
|
---|
1364 | return (Curl_sspi_global_init() == CURLE_OK ? 1 : 0);
|
---|
1365 | }
|
---|
1366 |
|
---|
1367 | void Curl_schannel_cleanup(void)
|
---|
1368 | {
|
---|
1369 | Curl_sspi_global_cleanup();
|
---|
1370 | }
|
---|
1371 |
|
---|
1372 | size_t Curl_schannel_version(char *buffer, size_t size)
|
---|
1373 | {
|
---|
1374 | size = snprintf(buffer, size, "WinSSL");
|
---|
1375 |
|
---|
1376 | return size;
|
---|
1377 | }
|
---|
1378 |
|
---|
1379 | int Curl_schannel_random(unsigned char *entropy, size_t length)
|
---|
1380 | {
|
---|
1381 | HCRYPTPROV hCryptProv = 0;
|
---|
1382 |
|
---|
1383 | if(!CryptAcquireContext(&hCryptProv, NULL, NULL, PROV_RSA_FULL,
|
---|
1384 | CRYPT_VERIFYCONTEXT | CRYPT_SILENT))
|
---|
1385 | return 1;
|
---|
1386 |
|
---|
1387 | if(!CryptGenRandom(hCryptProv, (DWORD)length, entropy)) {
|
---|
1388 | CryptReleaseContext(hCryptProv, 0UL);
|
---|
1389 | return 1;
|
---|
1390 | }
|
---|
1391 |
|
---|
1392 | CryptReleaseContext(hCryptProv, 0UL);
|
---|
1393 | return 0;
|
---|
1394 | }
|
---|
1395 |
|
---|
1396 | #ifdef _WIN32_WCE
|
---|
1397 | static CURLcode verify_certificate(struct connectdata *conn, int sockindex)
|
---|
1398 | {
|
---|
1399 | SECURITY_STATUS status;
|
---|
1400 | struct SessionHandle *data = conn->data;
|
---|
1401 | struct ssl_connect_data *connssl = &conn->ssl[sockindex];
|
---|
1402 | CURLcode result = CURLE_OK;
|
---|
1403 | CERT_CONTEXT *pCertContextServer = NULL;
|
---|
1404 | const CERT_CHAIN_CONTEXT *pChainContext = NULL;
|
---|
1405 |
|
---|
1406 | status = s_pSecFn->QueryContextAttributes(&connssl->ctxt->ctxt_handle,
|
---|
1407 | SECPKG_ATTR_REMOTE_CERT_CONTEXT,
|
---|
1408 | &pCertContextServer);
|
---|
1409 |
|
---|
1410 | if((status != SEC_E_OK) || (pCertContextServer == NULL)) {
|
---|
1411 | failf(data, "schannel: Failed to read remote certificate context: %s",
|
---|
1412 | Curl_sspi_strerror(conn, status));
|
---|
1413 | result = CURLE_PEER_FAILED_VERIFICATION;
|
---|
1414 | }
|
---|
1415 |
|
---|
1416 | if(result == CURLE_OK) {
|
---|
1417 | CERT_CHAIN_PARA ChainPara;
|
---|
1418 | memset(&ChainPara, 0, sizeof(ChainPara));
|
---|
1419 | ChainPara.cbSize = sizeof(ChainPara);
|
---|
1420 |
|
---|
1421 | if(!CertGetCertificateChain(NULL,
|
---|
1422 | pCertContextServer,
|
---|
1423 | NULL,
|
---|
1424 | pCertContextServer->hCertStore,
|
---|
1425 | &ChainPara,
|
---|
1426 | (data->set.ssl_no_revoke ? 0 :
|
---|
1427 | CERT_CHAIN_REVOCATION_CHECK_CHAIN),
|
---|
1428 | NULL,
|
---|
1429 | &pChainContext)) {
|
---|
1430 | failf(data, "schannel: CertGetCertificateChain failed: %s",
|
---|
1431 | Curl_sspi_strerror(conn, GetLastError()));
|
---|
1432 | pChainContext = NULL;
|
---|
1433 | result = CURLE_PEER_FAILED_VERIFICATION;
|
---|
1434 | }
|
---|
1435 |
|
---|
1436 | if(result == CURLE_OK) {
|
---|
1437 | CERT_SIMPLE_CHAIN *pSimpleChain = pChainContext->rgpChain[0];
|
---|
1438 | DWORD dwTrustErrorMask = ~(DWORD)(CERT_TRUST_IS_NOT_TIME_NESTED);
|
---|
1439 | dwTrustErrorMask &= pSimpleChain->TrustStatus.dwErrorStatus;
|
---|
1440 | if(dwTrustErrorMask) {
|
---|
1441 | if(dwTrustErrorMask & CERT_TRUST_IS_REVOKED)
|
---|
1442 | failf(data, "schannel: CertGetCertificateChain trust error"
|
---|
1443 | " CERT_TRUST_IS_REVOKED");
|
---|
1444 | else if(dwTrustErrorMask & CERT_TRUST_IS_PARTIAL_CHAIN)
|
---|
1445 | failf(data, "schannel: CertGetCertificateChain trust error"
|
---|
1446 | " CERT_TRUST_IS_PARTIAL_CHAIN");
|
---|
1447 | else if(dwTrustErrorMask & CERT_TRUST_IS_UNTRUSTED_ROOT)
|
---|
1448 | failf(data, "schannel: CertGetCertificateChain trust error"
|
---|
1449 | " CERT_TRUST_IS_UNTRUSTED_ROOT");
|
---|
1450 | else if(dwTrustErrorMask & CERT_TRUST_IS_NOT_TIME_VALID)
|
---|
1451 | failf(data, "schannel: CertGetCertificateChain trust error"
|
---|
1452 | " CERT_TRUST_IS_NOT_TIME_VALID");
|
---|
1453 | else
|
---|
1454 | failf(data, "schannel: CertGetCertificateChain error mask: 0x%08x",
|
---|
1455 | dwTrustErrorMask);
|
---|
1456 | result = CURLE_PEER_FAILED_VERIFICATION;
|
---|
1457 | }
|
---|
1458 | }
|
---|
1459 | }
|
---|
1460 |
|
---|
1461 | if(result == CURLE_OK) {
|
---|
1462 | if(data->set.ssl.verifyhost) {
|
---|
1463 | TCHAR cert_hostname_buff[128];
|
---|
1464 | xcharp_u hostname;
|
---|
1465 | xcharp_u cert_hostname;
|
---|
1466 | DWORD len;
|
---|
1467 |
|
---|
1468 | cert_hostname.const_tchar_ptr = cert_hostname_buff;
|
---|
1469 | hostname.tchar_ptr = Curl_convert_UTF8_to_tchar(conn->host.name);
|
---|
1470 |
|
---|
1471 | /* TODO: Fix this for certificates with multiple alternative names.
|
---|
1472 | Right now we're only asking for the first preferred alternative name.
|
---|
1473 | Instead we'd need to do all via CERT_NAME_SEARCH_ALL_NAMES_FLAG
|
---|
1474 | (if WinCE supports that?) and run this section in a loop for each.
|
---|
1475 | https://msdn.microsoft.com/en-us/library/windows/desktop/aa376086.aspx
|
---|
1476 | curl: (51) schannel: CertGetNameString() certificate hostname
|
---|
1477 | (.google.com) did not match connection (google.com)
|
---|
1478 | */
|
---|
1479 | len = CertGetNameString(pCertContextServer,
|
---|
1480 | CERT_NAME_DNS_TYPE,
|
---|
1481 | 0,
|
---|
1482 | NULL,
|
---|
1483 | cert_hostname.tchar_ptr,
|
---|
1484 | 128);
|
---|
1485 | if(len > 0 && *cert_hostname.tchar_ptr == '*') {
|
---|
1486 | /* this is a wildcard cert. try matching the last len - 1 chars */
|
---|
1487 | int hostname_len = strlen(conn->host.name);
|
---|
1488 | cert_hostname.tchar_ptr++;
|
---|
1489 | if(_tcsicmp(cert_hostname.const_tchar_ptr,
|
---|
1490 | hostname.const_tchar_ptr + hostname_len - len + 2) != 0)
|
---|
1491 | result = CURLE_PEER_FAILED_VERIFICATION;
|
---|
1492 | }
|
---|
1493 | else if(len == 0 || _tcsicmp(hostname.const_tchar_ptr,
|
---|
1494 | cert_hostname.const_tchar_ptr) != 0) {
|
---|
1495 | result = CURLE_PEER_FAILED_VERIFICATION;
|
---|
1496 | }
|
---|
1497 | if(result == CURLE_PEER_FAILED_VERIFICATION) {
|
---|
1498 | char *_cert_hostname;
|
---|
1499 | _cert_hostname = Curl_convert_tchar_to_UTF8(cert_hostname.tchar_ptr);
|
---|
1500 | failf(data, "schannel: CertGetNameString() certificate hostname "
|
---|
1501 | "(%s) did not match connection (%s)",
|
---|
1502 | _cert_hostname, conn->host.name);
|
---|
1503 | Curl_unicodefree(_cert_hostname);
|
---|
1504 | }
|
---|
1505 | Curl_unicodefree(hostname.tchar_ptr);
|
---|
1506 | }
|
---|
1507 | }
|
---|
1508 |
|
---|
1509 | if(pChainContext)
|
---|
1510 | CertFreeCertificateChain(pChainContext);
|
---|
1511 |
|
---|
1512 | if(pCertContextServer)
|
---|
1513 | CertFreeCertificateContext(pCertContextServer);
|
---|
1514 |
|
---|
1515 | return result;
|
---|
1516 | }
|
---|
1517 | #endif /* _WIN32_WCE */
|
---|
1518 |
|
---|
1519 | #endif /* USE_SCHANNEL */
|
---|