1 /* GIO - GLib Input, Output and Streaming Library
3 * Copyright © 2009 Red Hat, Inc
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2 of the License, or (at your option) any later version.
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
15 * You should have received a copy of the GNU Lesser General
16 * Public License along with this library; if not, write to the
17 * Free Software Foundation, Inc., 59 Temple Place, Suite 330,
18 * Boston, MA 02111-1307, USA.
25 #include <gnutls/gnutls.h>
26 #include <gnutls/x509.h>
28 #include "gtlsconnection-gnutls.h"
29 #include "gtlsbackend-gnutls.h"
30 #include "gtlscertificate-gnutls.h"
31 #include "gtlsinputstream-gnutls.h"
32 #include "gtlsoutputstream-gnutls.h"
33 #include "gtlsserverconnection-gnutls.h"
34 #include <glib/gi18n-lib.h>
36 static void g_tls_connection_gnutls_get_property (GObject *object,
40 static void g_tls_connection_gnutls_set_property (GObject *object,
44 static void g_tls_connection_gnutls_finalize (GObject *object);
46 static gboolean g_tls_connection_gnutls_handshake (GTlsConnection *connection,
47 GCancellable *cancellable,
49 static void g_tls_connection_gnutls_handshake_async (GTlsConnection *conn,
51 GCancellable *cancellable,
52 GAsyncReadyCallback callback,
54 static gboolean g_tls_connection_gnutls_handshake_finish (GTlsConnection *conn,
58 static GInputStream *g_tls_connection_gnutls_get_input_stream (GIOStream *stream);
59 static GOutputStream *g_tls_connection_gnutls_get_output_stream (GIOStream *stream);
61 static gboolean g_tls_connection_gnutls_close (GIOStream *stream,
62 GCancellable *cancellable,
64 static void g_tls_connection_gnutls_close_async (GIOStream *stream,
66 GCancellable *cancellable,
67 GAsyncReadyCallback callback,
69 static gboolean g_tls_connection_gnutls_close_finish (GIOStream *stream,
73 static ssize_t g_tls_connection_gnutls_push_func (gnutls_transport_ptr_t transport_data,
76 static ssize_t g_tls_connection_gnutls_pull_func (gnutls_transport_ptr_t transport_data,
80 static void g_tls_connection_gnutls_initable_iface_init (GInitableIface *iface);
81 static gboolean g_tls_connection_gnutls_initable_init (GInitable *initable,
82 GCancellable *cancellable,
85 static void g_tls_connection_gnutls_init_priorities (void);
87 G_DEFINE_ABSTRACT_TYPE_WITH_CODE (GTlsConnectionGnutls, g_tls_connection_gnutls, G_TYPE_TLS_CONNECTION,
88 G_IMPLEMENT_INTERFACE (G_TYPE_INITABLE,
89 g_tls_connection_gnutls_initable_iface_init);
90 g_tls_connection_gnutls_init_priorities ();
98 PROP_REQUIRE_CLOSE_NOTIFY,
102 struct _GTlsConnectionGnutlsPrivate
104 GIOStream *base_io_stream;
105 GPollableInputStream *base_istream;
106 GPollableOutputStream *base_ostream;
109 gnutls_certificate_credentials creds;
110 gnutls_session session;
111 gboolean require_close_notify;
112 GTlsRehandshakeMode rehandshake_mode;
113 gboolean need_handshake, handshaking, ever_handshaked;
116 GInputStream *tls_istream;
117 GOutputStream *tls_ostream;
120 GCancellable *cancellable;
121 gboolean blocking, eof;
122 GIOCondition internal_direction;
126 g_tls_connection_gnutls_class_init (GTlsConnectionGnutlsClass *klass)
128 GObjectClass *gobject_class = G_OBJECT_CLASS (klass);
129 GTlsConnectionClass *connection_class = G_TLS_CONNECTION_CLASS (klass);
130 GIOStreamClass *iostream_class = G_IO_STREAM_CLASS (klass);
132 g_type_class_add_private (klass, sizeof (GTlsConnectionGnutlsPrivate));
134 gobject_class->get_property = g_tls_connection_gnutls_get_property;
135 gobject_class->set_property = g_tls_connection_gnutls_set_property;
136 gobject_class->finalize = g_tls_connection_gnutls_finalize;
138 connection_class->handshake = g_tls_connection_gnutls_handshake;
139 connection_class->handshake_async = g_tls_connection_gnutls_handshake_async;
140 connection_class->handshake_finish = g_tls_connection_gnutls_handshake_finish;
142 iostream_class->get_input_stream = g_tls_connection_gnutls_get_input_stream;
143 iostream_class->get_output_stream = g_tls_connection_gnutls_get_output_stream;
144 iostream_class->close_fn = g_tls_connection_gnutls_close;
145 iostream_class->close_async = g_tls_connection_gnutls_close_async;
146 iostream_class->close_finish = g_tls_connection_gnutls_close_finish;
148 g_object_class_override_property (gobject_class, PROP_BASE_IO_STREAM, "base-io-stream");
149 g_object_class_override_property (gobject_class, PROP_REQUIRE_CLOSE_NOTIFY, "require-close-notify");
150 g_object_class_override_property (gobject_class, PROP_REHANDSHAKE_MODE, "rehandshake-mode");
154 g_tls_connection_gnutls_initable_iface_init (GInitableIface *iface)
156 iface->init = g_tls_connection_gnutls_initable_init;
160 g_tls_connection_gnutls_init (GTlsConnectionGnutls *gnutls)
162 gnutls->priv = G_TYPE_INSTANCE_GET_PRIVATE (gnutls, G_TYPE_TLS_CONNECTION_GNUTLS, GTlsConnectionGnutlsPrivate);
164 gnutls_certificate_allocate_credentials (&gnutls->priv->creds);
165 gnutls_certificate_set_verify_flags (gnutls->priv->creds,
166 GNUTLS_VERIFY_ALLOW_X509_V1_CA_CRT);
168 gnutls->priv->need_handshake = TRUE;
171 static gnutls_priority_t priorities[2][2];
174 g_tls_connection_gnutls_init_priorities (void)
176 /* First field is "ssl3 only", second is "allow unsafe rehandshaking" */
178 gnutls_priority_init (&priorities[FALSE][FALSE],
181 gnutls_priority_init (&priorities[TRUE][FALSE],
182 "NORMAL:!VERS-TLS1.2:!VERS-TLS1.1:!VERS-TLS1.0",
184 gnutls_priority_init (&priorities[FALSE][TRUE],
185 "NORMAL:%UNSAFE_RENEGOTIATION",
187 gnutls_priority_init (&priorities[TRUE][TRUE],
188 "NORMAL:!VERS-TLS1.2:!VERS-TLS1.1:!VERS-TLS1.0:%UNSAFE_RENEGOTIATION",
193 g_tls_connection_gnutls_set_handshake_priority (GTlsConnectionGnutls *gnutls)
195 gboolean use_ssl3, unsafe_rehandshake;
197 if (G_IS_TLS_CLIENT_CONNECTION (gnutls))
198 use_ssl3 = g_tls_client_connection_get_use_ssl3 (G_TLS_CLIENT_CONNECTION (gnutls));
199 unsafe_rehandshake = (gnutls->priv->rehandshake_mode == G_TLS_REHANDSHAKE_UNSAFELY);
200 gnutls_priority_set (gnutls->priv->session,
201 priorities[use_ssl3][unsafe_rehandshake]);
205 g_tls_connection_gnutls_initable_init (GInitable *initable,
206 GCancellable *cancellable,
209 GTlsConnectionGnutls *gnutls = G_TLS_CONNECTION_GNUTLS (initable);
210 gnutls_x509_crt_t *cas;
214 g_return_val_if_fail (gnutls->priv->base_istream != NULL &&
215 gnutls->priv->base_ostream != NULL, FALSE);
217 /* Make sure gnutls->priv->session has been initialized (it may have
218 * already been initialized by a construct-time property setter).
220 g_tls_connection_gnutls_get_session (gnutls);
222 g_tls_backend_gnutls_get_system_ca_list_gnutls (&cas, &num_cas);
223 gnutls_certificate_set_x509_trust (gnutls->priv->creds, cas, num_cas);
225 status = gnutls_credentials_set (gnutls->priv->session,
226 GNUTLS_CRD_CERTIFICATE,
227 gnutls->priv->creds);
230 g_set_error (error, G_TLS_ERROR, G_TLS_ERROR_MISC,
231 _("Could not create TLS connection: %s"),
232 gnutls_strerror (status));
236 gnutls_transport_set_push_function (gnutls->priv->session,
237 g_tls_connection_gnutls_push_func);
238 gnutls_transport_set_pull_function (gnutls->priv->session,
239 g_tls_connection_gnutls_pull_func);
240 gnutls_transport_set_ptr (gnutls->priv->session, gnutls);
242 gnutls->priv->tls_istream = g_tls_input_stream_gnutls_new (gnutls);
243 gnutls->priv->tls_ostream = g_tls_output_stream_gnutls_new (gnutls);
249 g_tls_connection_gnutls_finalize (GObject *object)
251 GTlsConnectionGnutls *connection = G_TLS_CONNECTION_GNUTLS (object);
253 if (connection->priv->base_io_stream)
254 g_object_unref (connection->priv->base_io_stream);
256 if (connection->priv->session)
257 gnutls_deinit (connection->priv->session);
259 if (connection->priv->tls_istream)
260 g_object_unref (connection->priv->tls_istream);
261 if (connection->priv->tls_ostream)
262 g_object_unref (connection->priv->tls_ostream);
264 if (connection->priv->creds)
265 gnutls_certificate_free_credentials (connection->priv->creds);
267 if (connection->priv->error)
268 g_error_free (connection->priv->error);
270 G_OBJECT_CLASS (g_tls_connection_gnutls_parent_class)->finalize (object);
274 g_tls_connection_gnutls_get_property (GObject *object,
279 GTlsConnectionGnutls *gnutls = G_TLS_CONNECTION_GNUTLS (object);
283 case PROP_BASE_IO_STREAM:
284 g_value_set_object (value, gnutls->priv->base_io_stream);
287 case PROP_REQUIRE_CLOSE_NOTIFY:
288 g_value_set_boolean (value, gnutls->priv->require_close_notify);
291 case PROP_REHANDSHAKE_MODE:
292 g_value_set_enum (value, gnutls->priv->rehandshake_mode);
296 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
301 g_tls_connection_gnutls_set_property (GObject *object,
306 GTlsConnectionGnutls *gnutls = G_TLS_CONNECTION_GNUTLS (object);
307 GInputStream *istream;
308 GOutputStream *ostream;
312 case PROP_BASE_IO_STREAM:
313 if (gnutls->priv->base_io_stream)
315 g_object_unref (gnutls->priv->base_io_stream);
316 gnutls->priv->base_istream = NULL;
317 gnutls->priv->base_ostream = NULL;
319 gnutls->priv->base_io_stream = g_value_dup_object (value);
320 if (!gnutls->priv->base_io_stream)
323 istream = g_io_stream_get_input_stream (gnutls->priv->base_io_stream);
324 ostream = g_io_stream_get_output_stream (gnutls->priv->base_io_stream);
326 if (G_IS_POLLABLE_INPUT_STREAM (istream) &&
327 g_pollable_input_stream_can_poll (G_POLLABLE_INPUT_STREAM (istream)))
328 gnutls->priv->base_istream = G_POLLABLE_INPUT_STREAM (istream);
329 if (G_IS_POLLABLE_OUTPUT_STREAM (ostream) &&
330 g_pollable_output_stream_can_poll (G_POLLABLE_OUTPUT_STREAM (ostream)))
331 gnutls->priv->base_ostream = G_POLLABLE_OUTPUT_STREAM (ostream);
334 case PROP_REQUIRE_CLOSE_NOTIFY:
335 gnutls->priv->require_close_notify = g_value_get_boolean (value);
338 case PROP_REHANDSHAKE_MODE:
339 gnutls->priv->rehandshake_mode = g_value_get_enum (value);
343 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
347 gnutls_certificate_credentials
348 g_tls_connection_gnutls_get_credentials (GTlsConnectionGnutls *gnutls)
350 return gnutls->priv->creds;
354 g_tls_connection_gnutls_get_session (GTlsConnectionGnutls *gnutls)
356 /* Ideally we would initialize gnutls->priv->session from
357 * g_tls_connection_gnutls_init(), but we can't tell if it's a
358 * client or server connection at that point... And
359 * g_tls_connection_gnutls_initiable_init() is too late, because
360 * construct-time property setters may need to modify it.
362 if (!gnutls->priv->session)
364 gboolean client = G_IS_TLS_CLIENT_CONNECTION (gnutls);
365 gnutls_init (&gnutls->priv->session, client ? GNUTLS_CLIENT : GNUTLS_SERVER);
368 return gnutls->priv->session;
372 g_tls_connection_gnutls_get_certificate (GTlsConnectionGnutls *gnutls,
375 GTlsCertificate *cert;
377 cert = g_tls_connection_get_certificate (G_TLS_CONNECTION (gnutls));
381 cert = g_tls_connection_emit_need_certificate (G_TLS_CONNECTION (gnutls));
383 st->type = GNUTLS_CRT_X509;
386 GTlsCertificateGnutls *gnutlscert = G_TLS_CERTIFICATE_GNUTLS (cert);
389 st->cert.x509 = gnutls_malloc (sizeof (gnutls_x509_crt_t));
390 st->cert.x509[0] = g_tls_certificate_gnutls_copy_cert (gnutlscert);
391 st->key.x509 = g_tls_certificate_gnutls_copy_key (gnutlscert);
392 st->deinit_all = TRUE;
394 g_object_unref (cert);
401 g_tls_connection_gnutls_validate_peer (GTlsConnectionGnutls *gnutls)
405 status = gnutls_certificate_verify_peers (gnutls->priv->session);
406 return g_tls_certificate_gnutls_convert_flags (status);
410 begin_gnutls_io (GTlsConnectionGnutls *gnutls,
412 GCancellable *cancellable)
414 gnutls->priv->blocking = blocking;
415 gnutls->priv->cancellable = cancellable;
416 gnutls->priv->internal_direction = 0;
417 g_clear_error (&gnutls->priv->error);
421 end_gnutls_io (GTlsConnectionGnutls *gnutls,
423 const char *generic_error,
426 gnutls->priv->cancellable = NULL;
430 g_clear_error (&gnutls->priv->error);
434 if (gnutls->priv->handshaking && !gnutls->priv->ever_handshaked)
436 if (g_error_matches (gnutls->priv->error, G_IO_ERROR, G_IO_ERROR_FAILED) ||
437 status == GNUTLS_E_UNEXPECTED_PACKET_LENGTH ||
438 status == GNUTLS_E_FATAL_ALERT_RECEIVED ||
439 status == GNUTLS_E_UNSUPPORTED_VERSION_PACKET)
441 g_clear_error (&gnutls->priv->error);
442 g_set_error_literal (error, G_TLS_ERROR, G_TLS_ERROR_NOT_TLS,
443 _("Peer failed to perform TLS handshake"));
444 return GNUTLS_E_PULL_ERROR;
448 if (gnutls->priv->error)
450 if (g_error_matches (gnutls->priv->error, G_IO_ERROR, G_IO_ERROR_WOULD_BLOCK))
451 status = GNUTLS_E_AGAIN;
452 g_propagate_error (error, gnutls->priv->error);
453 gnutls->priv->error = NULL;
456 else if (status == GNUTLS_E_REHANDSHAKE)
458 if (gnutls->priv->rehandshake_mode == G_TLS_REHANDSHAKE_NEVER)
460 g_set_error_literal (error, G_TLS_ERROR, G_TLS_ERROR_MISC,
461 _("Peer requested illegal TLS rehandshake"));
462 return GNUTLS_E_PULL_ERROR;
465 gnutls->priv->need_handshake = TRUE;
468 else if (status == GNUTLS_E_UNEXPECTED_PACKET_LENGTH)
470 if (gnutls->priv->eof)
472 if (gnutls->priv->require_close_notify)
474 g_set_error_literal (error, G_TLS_ERROR, G_TLS_ERROR_EOF,
475 _("TLS connection closed unexpectedly"));
483 g_set_error (error, G_TLS_ERROR, G_TLS_ERROR_MISC,
484 generic_error, gnutls_strerror (status));
488 #define BEGIN_GNUTLS_IO(gnutls, blocking, cancellable) \
489 begin_gnutls_io (gnutls, blocking, cancellable); \
492 #define END_GNUTLS_IO(gnutls, ret, errmsg, error) \
493 } while ((ret == GNUTLS_E_AGAIN || \
494 ret == GNUTLS_E_WARNING_ALERT_RECEIVED) && \
495 !gnutls->priv->error); \
496 ret = end_gnutls_io (gnutls, ret, errmsg, error)
499 g_tls_connection_gnutls_check (GTlsConnectionGnutls *gnutls,
500 GIOCondition condition)
502 if (gnutls->priv->handshaking || gnutls->priv->closing)
503 condition = gnutls->priv->internal_direction;
505 if (condition & G_IO_IN)
506 return g_pollable_input_stream_is_readable (gnutls->priv->base_istream);
508 return g_pollable_output_stream_is_writable (gnutls->priv->base_ostream);
514 GTlsConnectionGnutls *gnutls;
517 GSource *child_source;
518 GIOCondition base_direction;
519 GIOCondition current_direction;
520 } GTlsConnectionGnutlsSource;
523 gnutls_source_prepare (GSource *source,
531 gnutls_source_check (GSource *source)
537 gnutls_source_sync_child_source (GTlsConnectionGnutlsSource *gnutls_source,
538 GIOCondition direction)
540 GTlsConnectionGnutls *gnutls = gnutls_source->gnutls;
541 GSource *source = (GSource *)gnutls_source;
543 if (direction == gnutls_source->current_direction)
546 if (gnutls_source->child_source)
548 g_source_remove_child_source (source, gnutls_source->child_source);
549 g_source_unref (gnutls_source->child_source);
552 if (direction & G_IO_IN)
553 gnutls_source->child_source = g_pollable_input_stream_create_source (gnutls->priv->base_istream, NULL);
555 gnutls_source->child_source = g_pollable_output_stream_create_source (gnutls->priv->base_ostream, NULL);
557 g_source_set_dummy_callback (gnutls_source->child_source);
558 g_source_add_child_source (source, gnutls_source->child_source);
559 gnutls_source->current_direction = direction;
563 gnutls_source_dispatch (GSource *source,
564 GSourceFunc callback,
567 GPollableSourceFunc func = (GPollableSourceFunc)callback;
568 GTlsConnectionGnutlsSource *gnutls_source = (GTlsConnectionGnutlsSource *)source;
569 GTlsConnectionGnutls *gnutls = gnutls_source->gnutls;
572 ret = (*func) (gnutls_source->stream, user_data);
575 GIOCondition direction = gnutls->priv->internal_direction ? gnutls->priv->internal_direction : gnutls_source->base_direction;
577 gnutls_source_sync_child_source (gnutls_source, direction);
584 gnutls_source_finalize (GSource *source)
586 GTlsConnectionGnutlsSource *gnutls_source = (GTlsConnectionGnutlsSource *)source;
588 g_object_unref (gnutls_source->gnutls);
590 if (gnutls_source->child_source)
591 g_source_unref (gnutls_source->child_source);
594 static GSourceFuncs gnutls_source_funcs =
596 gnutls_source_prepare,
598 gnutls_source_dispatch,
599 gnutls_source_finalize
603 g_tls_connection_gnutls_create_source (GTlsConnectionGnutls *gnutls,
604 GIOCondition condition,
605 GCancellable *cancellable)
607 GSource *source, *cancellable_source;
608 GTlsConnectionGnutlsSource *gnutls_source;
610 source = g_source_new (&gnutls_source_funcs, sizeof (GTlsConnectionGnutlsSource));
611 g_source_set_name (source, "GTlsConnectionGnutlsSource");
612 gnutls_source = (GTlsConnectionGnutlsSource *)source;
613 gnutls_source->gnutls = g_object_ref (gnutls);
614 gnutls_source->base_direction = condition & (G_IO_IN | G_IO_OUT);
615 if (gnutls_source->base_direction == G_IO_IN)
616 gnutls_source->stream = G_OBJECT (gnutls->priv->tls_istream);
617 else if (gnutls_source->base_direction == G_IO_OUT)
618 gnutls_source->stream = G_OBJECT (gnutls->priv->tls_ostream);
621 gnutls_source->base_direction = gnutls->priv->internal_direction;
622 gnutls_source->stream = NULL;
624 gnutls_source_sync_child_source (gnutls_source, gnutls_source->base_direction);
628 cancellable_source = g_cancellable_source_new (cancellable);
629 g_source_set_dummy_callback (cancellable_source);
630 g_source_add_child_source (source, cancellable_source);
631 g_source_unref (cancellable_source);
638 set_gnutls_error (GTlsConnectionGnutls *gnutls, GIOCondition direction)
640 if (g_error_matches (gnutls->priv->error, G_IO_ERROR, G_IO_ERROR_CANCELLED))
641 gnutls_transport_set_errno (gnutls->priv->session, EINTR);
642 else if (g_error_matches (gnutls->priv->error, G_IO_ERROR, G_IO_ERROR_WOULD_BLOCK))
644 gnutls_transport_set_errno (gnutls->priv->session, EAGAIN);
645 gnutls->priv->internal_direction = direction;
648 gnutls_transport_set_errno (gnutls->priv->session, EIO);
652 g_tls_connection_gnutls_pull_func (gnutls_transport_ptr_t transport_data,
656 GTlsConnectionGnutls *gnutls = transport_data;
659 /* If gnutls->priv->error is non-%NULL when we're called, it means
660 * that an error previously occurred, but gnutls decided not to
661 * propagate it. So it's correct for us to just clear it. (Usually
662 * this means it ignored an EAGAIN after a short read, and now
663 * we'll return EAGAIN again, which it will obey this time.)
665 g_clear_error (&gnutls->priv->error);
667 if (gnutls->priv->blocking)
669 ret = g_input_stream_read (G_INPUT_STREAM (gnutls->priv->base_istream),
671 gnutls->priv->cancellable,
672 &gnutls->priv->error);
676 ret = g_pollable_input_stream_read_nonblocking (gnutls->priv->base_istream,
678 gnutls->priv->cancellable,
679 &gnutls->priv->error);
683 set_gnutls_error (gnutls, G_IO_IN);
685 gnutls->priv->eof = TRUE;
691 g_tls_connection_gnutls_push_func (gnutls_transport_ptr_t transport_data,
695 GTlsConnectionGnutls *gnutls = transport_data;
698 /* See comment in pull_func. */
699 g_clear_error (&gnutls->priv->error);
701 if (gnutls->priv->blocking)
703 ret = g_output_stream_write (G_OUTPUT_STREAM (gnutls->priv->base_ostream),
705 gnutls->priv->cancellable,
706 &gnutls->priv->error);
710 ret = g_pollable_output_stream_write_nonblocking (gnutls->priv->base_ostream,
712 gnutls->priv->cancellable,
713 &gnutls->priv->error);
716 set_gnutls_error (gnutls, G_IO_OUT);
722 handshake_internal (GTlsConnectionGnutls *gnutls,
724 GCancellable *cancellable,
729 if (G_IS_TLS_SERVER_CONNECTION_GNUTLS (gnutls) &&
730 gnutls->priv->ever_handshaked && !gnutls->priv->need_handshake)
732 BEGIN_GNUTLS_IO (gnutls, blocking, cancellable);
733 ret = gnutls_rehandshake (gnutls->priv->session);
734 END_GNUTLS_IO (gnutls, ret, _("Error performing TLS handshake: %s"), error);
740 g_tls_connection_gnutls_set_handshake_priority (gnutls);
742 gnutls->priv->handshaking = TRUE;
743 G_TLS_CONNECTION_GNUTLS_GET_CLASS (gnutls)->begin_handshake (gnutls);
745 BEGIN_GNUTLS_IO (gnutls, blocking, cancellable);
746 ret = gnutls_handshake (gnutls->priv->session);
747 END_GNUTLS_IO (gnutls, ret, _("Error performing TLS handshake: %s"), error);
749 if (ret == GNUTLS_E_AGAIN)
752 gnutls->priv->handshaking = FALSE;
753 gnutls->priv->need_handshake = FALSE;
754 gnutls->priv->ever_handshaked = TRUE;
757 gnutls_certificate_type_get (gnutls->priv->session) == GNUTLS_CRT_X509)
759 GTlsCertificate *chain, *cert;
760 const gnutls_datum_t *certs;
761 unsigned int num_certs;
764 certs = gnutls_certificate_get_peers (gnutls->priv->session, &num_certs);
768 for (i = num_certs - 1; i >= 0; i--)
770 cert = g_tls_certificate_gnutls_new (&certs[i], chain);
775 g_tls_connection_set_peer_certificate (G_TLS_CONNECTION (gnutls), chain);
778 g_tls_connection_set_peer_certificate (G_TLS_CONNECTION (gnutls), NULL);
780 return G_TLS_CONNECTION_GNUTLS_GET_CLASS (gnutls)->finish_handshake (gnutls, ret == 0, error);
784 handshake_in_progress_or_failed (GTlsConnectionGnutls *gnutls,
786 GCancellable *cancellable,
789 if (!(gnutls->priv->need_handshake || gnutls->priv->handshaking))
792 return !handshake_internal (gnutls, blocking, cancellable, error);
796 g_tls_connection_gnutls_handshake (GTlsConnection *conn,
797 GCancellable *cancellable,
800 GTlsConnectionGnutls *gnutls = G_TLS_CONNECTION_GNUTLS (conn);
802 return handshake_internal (gnutls, TRUE, cancellable, error);
806 g_tls_connection_gnutls_handshake_ready (GObject *pollable_stream,
809 GTlsConnectionGnutls *gnutls;
810 GSimpleAsyncResult *simple = user_data;
812 GError *error = NULL;
814 gnutls = G_TLS_CONNECTION_GNUTLS (g_async_result_get_source_object (G_ASYNC_RESULT (simple)));
815 g_object_unref (gnutls);
817 success = handshake_internal (gnutls, FALSE, NULL, &error);
818 if (!success && g_error_matches (error, G_IO_ERROR, G_IO_ERROR_WOULD_BLOCK))
820 g_error_free (error);
826 g_simple_async_result_set_from_error (simple, error);
827 g_error_free (error);
830 g_simple_async_result_set_op_res_gboolean (simple, success);
831 g_simple_async_result_complete (simple);
832 g_object_unref (simple);
838 g_tls_connection_gnutls_handshake_async (GTlsConnection *conn,
840 GCancellable *cancellable,
841 GAsyncReadyCallback callback,
844 GTlsConnectionGnutls *gnutls = G_TLS_CONNECTION_GNUTLS (conn);
845 GSimpleAsyncResult *simple;
847 GError *error = NULL;
850 simple = g_simple_async_result_new (G_OBJECT (conn), callback, user_data,
851 g_tls_connection_gnutls_handshake_async);
852 success = handshake_internal (gnutls, FALSE, cancellable, &error);
855 g_simple_async_result_set_op_res_gboolean (simple, TRUE);
856 g_simple_async_result_complete_in_idle (simple);
857 g_object_unref (simple);
859 else if (!g_error_matches (error, G_IO_ERROR, G_IO_ERROR_WOULD_BLOCK))
861 g_simple_async_result_set_from_error (simple, error);
862 g_error_free (error);
863 g_simple_async_result_complete_in_idle (simple);
864 g_object_unref (simple);
867 source = g_tls_connection_gnutls_create_source (gnutls, 0, cancellable);
868 g_source_set_callback (source,
869 (GSourceFunc) g_tls_connection_gnutls_handshake_ready,
871 g_source_set_priority (source, io_priority);
872 g_source_attach (source, g_main_context_get_thread_default ());
873 g_source_unref (source);
877 g_tls_connection_gnutls_handshake_finish (GTlsConnection *conn,
878 GAsyncResult *result,
881 GSimpleAsyncResult *simple;
883 g_return_val_if_fail (g_simple_async_result_is_valid (result, G_OBJECT (conn), g_tls_connection_gnutls_handshake_async), FALSE);
885 simple = G_SIMPLE_ASYNC_RESULT (result);
887 if (g_simple_async_result_propagate_error (simple, error))
890 return g_simple_async_result_get_op_res_gboolean (simple);
894 g_tls_connection_gnutls_read (GTlsConnectionGnutls *gnutls,
898 GCancellable *cancellable,
904 if (handshake_in_progress_or_failed (gnutls, blocking, cancellable, error))
907 BEGIN_GNUTLS_IO (gnutls, blocking, cancellable);
908 ret = gnutls_record_recv (gnutls->priv->session, buffer, count);
909 END_GNUTLS_IO (gnutls, ret, _("Error reading data from TLS socket: %s"), error);
913 else if (ret == GNUTLS_E_REHANDSHAKE)
920 g_tls_connection_gnutls_write (GTlsConnectionGnutls *gnutls,
924 GCancellable *cancellable,
930 if (handshake_in_progress_or_failed (gnutls, blocking, cancellable, error))
933 BEGIN_GNUTLS_IO (gnutls, blocking, cancellable);
934 ret = gnutls_record_send (gnutls->priv->session, buffer, count);
935 END_GNUTLS_IO (gnutls, ret, _("Error writing data to TLS socket: %s"), error);
939 else if (ret == GNUTLS_E_REHANDSHAKE)
945 static GInputStream *
946 g_tls_connection_gnutls_get_input_stream (GIOStream *stream)
948 GTlsConnectionGnutls *gnutls = G_TLS_CONNECTION_GNUTLS (stream);
950 return gnutls->priv->tls_istream;
953 static GOutputStream *
954 g_tls_connection_gnutls_get_output_stream (GIOStream *stream)
956 GTlsConnectionGnutls *gnutls = G_TLS_CONNECTION_GNUTLS (stream);
958 return gnutls->priv->tls_ostream;
962 close_internal (GTlsConnectionGnutls *gnutls,
964 GCancellable *cancellable,
969 if (!gnutls->priv->require_close_notify)
972 /* If we haven't finished the initial handshake yet, there's no
973 * reason to finish it just so we can close.
975 if (gnutls->priv->handshaking && !gnutls->priv->ever_handshaked)
978 if (handshake_in_progress_or_failed (gnutls, blocking, cancellable, error))
981 gnutls->priv->closing = TRUE;
982 BEGIN_GNUTLS_IO (gnutls, blocking, cancellable);
983 ret = gnutls_bye (gnutls->priv->session, GNUTLS_SHUT_WR);
984 END_GNUTLS_IO (gnutls, ret, _("Error performing TLS close: %s"), error);
985 if (ret == 0 || !error || !g_error_matches (*error, G_IO_ERROR, G_IO_ERROR_WOULD_BLOCK))
986 gnutls->priv->closing = FALSE;
992 g_tls_connection_gnutls_close (GIOStream *stream,
993 GCancellable *cancellable,
996 GTlsConnectionGnutls *gnutls = G_TLS_CONNECTION_GNUTLS (stream);
998 if (!close_internal (gnutls, TRUE, cancellable, error))
1000 return g_io_stream_close (gnutls->priv->base_io_stream,
1001 cancellable, error);
1005 GSimpleAsyncResult *simple;
1006 GCancellable *cancellable;
1011 close_base_stream_cb (GObject *base_stream,
1012 GAsyncResult *result,
1016 GError *error = NULL;
1017 AsyncCloseData *acd = user_data;
1019 success = g_io_stream_close_finish (G_IO_STREAM (base_stream),
1022 g_simple_async_result_set_op_res_gboolean (acd->simple, TRUE);
1025 g_simple_async_result_set_from_error (acd->simple, error);
1026 g_error_free (error);
1029 g_simple_async_result_complete (acd->simple);
1030 g_object_unref (acd->simple);
1031 if (acd->cancellable)
1032 g_object_unref (acd->cancellable);
1033 g_slice_free (AsyncCloseData, acd);
1037 g_tls_connection_gnutls_close_ready (GObject *pollable_stream,
1040 GTlsConnectionGnutls *gnutls;
1041 AsyncCloseData *acd = user_data;
1043 GError *error = NULL;
1045 gnutls = G_TLS_CONNECTION_GNUTLS (g_async_result_get_source_object (G_ASYNC_RESULT (acd->simple)));
1046 g_object_unref (gnutls);
1048 success = close_internal (gnutls, FALSE, NULL, &error);
1049 if (!success && g_error_matches (error, G_IO_ERROR, G_IO_ERROR_WOULD_BLOCK))
1051 g_error_free (error);
1057 g_simple_async_result_set_from_error (acd->simple, error);
1058 g_simple_async_result_complete (acd->simple);
1059 g_error_free (error);
1060 g_object_unref (acd->simple);
1061 if (acd->cancellable)
1062 g_object_unref (acd->cancellable);
1063 g_slice_free (AsyncCloseData, acd);
1067 g_io_stream_close_async (gnutls->priv->base_io_stream,
1068 acd->io_priority, acd->cancellable,
1069 close_base_stream_cb, acd);
1076 g_tls_connection_gnutls_close_async (GIOStream *stream,
1078 GCancellable *cancellable,
1079 GAsyncReadyCallback callback,
1082 GTlsConnectionGnutls *gnutls = G_TLS_CONNECTION_GNUTLS (stream);
1083 GSimpleAsyncResult *simple;
1085 GError *error = NULL;
1086 AsyncCloseData *acd;
1089 simple = g_simple_async_result_new (G_OBJECT (stream), callback, user_data,
1090 g_tls_connection_gnutls_close_async);
1092 success = close_internal (gnutls, FALSE, cancellable, &error);
1093 if (error && !g_error_matches (error, G_IO_ERROR, G_IO_ERROR_WOULD_BLOCK))
1095 g_simple_async_result_set_from_error (simple, error);
1096 g_error_free (error);
1097 g_simple_async_result_complete_in_idle (simple);
1098 g_object_unref (simple);
1102 g_error_free (error);
1104 acd = g_slice_new (AsyncCloseData);
1105 acd->simple = simple;
1106 acd->cancellable = g_object_ref (cancellable);
1107 acd->io_priority = io_priority;
1111 g_io_stream_close_async (gnutls->priv->base_io_stream,
1112 io_priority, cancellable,
1113 close_base_stream_cb, acd);
1117 source = g_tls_connection_gnutls_create_source (gnutls, 0, acd->cancellable);
1118 g_source_set_callback (source,
1119 (GSourceFunc) g_tls_connection_gnutls_close_ready,
1121 g_source_set_priority (source, acd->io_priority);
1122 g_source_attach (source, g_main_context_get_thread_default ());
1123 g_source_unref (source);
1127 g_tls_connection_gnutls_close_finish (GIOStream *stream,
1128 GAsyncResult *result,
1131 GSimpleAsyncResult *simple;
1133 g_return_val_if_fail (g_simple_async_result_is_valid (result, G_OBJECT (stream), g_tls_connection_gnutls_close_async), FALSE);
1135 simple = G_SIMPLE_ASYNC_RESULT (result);
1137 if (g_simple_async_result_propagate_error (simple, error))
1140 return g_simple_async_result_get_op_res_gboolean (simple);