[gnome-control-center/wip/user-identities: 7/7] wip: users: add start of kerberos implemention of identity interface
- From: Ray Strode <halfline src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [gnome-control-center/wip/user-identities: 7/7] wip: users: add start of kerberos implemention of identity interface
- Date: Wed, 29 Feb 2012 08:18:01 +0000 (UTC)
commit 080f45bd70c1552b6f34064e98c3ebba73538289
Author: Ray Strode <rstrode redhat com>
Date: Wed Feb 22 12:14:20 2012 -0500
wip: users: add start of kerberos implemention of identity interface
panels/user-accounts/Makefile.am | 4 +
.../user-accounts/um-kerberos-identity-manager.c | 1004 ++++++++++++++++++++
.../user-accounts/um-kerberos-identity-manager.h | 58 ++
panels/user-accounts/um-kerberos-identity.c | 643 +++++++++++++
panels/user-accounts/um-kerberos-identity.h | 69 ++
5 files changed, 1778 insertions(+), 0 deletions(-)
---
diff --git a/panels/user-accounts/Makefile.am b/panels/user-accounts/Makefile.am
index cad8b60..f28285e 100644
--- a/panels/user-accounts/Makefile.am
+++ b/panels/user-accounts/Makefile.am
@@ -31,6 +31,10 @@ libuser_accounts_la_SOURCES = \
um-identity-manager.c \
um-identity.h \
um-identity.c \
+ um-kerberos-identity-manager.h \
+ um-kerberos-identity-manager.c \
+ um-kerberos-identity.h \
+ um-kerberos-identity.c \
um-user.h \
um-user.c \
um-user-manager.h \
diff --git a/panels/user-accounts/um-kerberos-identity-manager.c b/panels/user-accounts/um-kerberos-identity-manager.c
new file mode 100644
index 0000000..edbec9d
--- /dev/null
+++ b/panels/user-accounts/um-kerberos-identity-manager.c
@@ -0,0 +1,1004 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 8 -*-
+ *
+ * Copyright (C) 2012 Red Hat, Inc.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of the
+ * License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+ * 02111-1307, USA.
+ *
+ * Authors: Ray Strode
+ */
+
+#include "config.h"
+
+#include "um-kerberos-identity-manager.h"
+#include "um-identity-manager-private.h"
+#include "um-kerberos-identity.h"
+
+#include <string.h>
+
+#include <glib/gi18n.h>
+#include <gio/gio.h>
+
+#include <krb5.h>
+
+struct _UmKerberosIdentityManagerPrivate
+{
+ GHashTable *identities;
+ GHashTable *expired_identities;
+ GAsyncQueue *pending_operations;
+ GCancellable *scheduler_cancellable;
+
+ krb5_context kerberos_context;
+ GFileMonitor *credentials_cache_monitor;
+ gulong credentials_cache_changed_signal_id;
+
+ GMutex list_update_lock;
+ GCond list_available_for_updates;
+ gboolean is_updating_list;
+};
+
+typedef enum
+{
+ OPERATION_TYPE_REFRESH,
+ OPERATION_TYPE_LIST,
+ OPERATION_TYPE_SIGN_OUT
+} OperationType;
+
+typedef struct
+{
+ GCancellable *cancellable;
+ UmKerberosIdentityManager *manager;
+ OperationType type;
+ GSimpleAsyncResult *result;
+ GIOSchedulerJob *job;
+ UmIdentity *identity;
+} Operation;
+
+typedef struct
+{
+ UmKerberosIdentityManager *manager;
+ Operation *operation;
+ UmIdentity *identity;
+} IdentitySignalWork;
+
+static void identity_manager_interface_init (UmIdentityManagerInterface *interface);
+static void initable_interface_init (GInitableIface *interface);
+static void schedule_next_operation (UmKerberosIdentityManager *self);
+
+static void on_identity_expired (UmIdentity *identity, gpointer user_data);
+
+G_DEFINE_TYPE_WITH_CODE (UmKerberosIdentityManager,
+ um_kerberos_identity_manager,
+ G_TYPE_OBJECT,
+ G_IMPLEMENT_INTERFACE (UM_TYPE_IDENTITY_MANAGER,
+ identity_manager_interface_init)
+ G_IMPLEMENT_INTERFACE (G_TYPE_INITABLE,
+ initable_interface_init));
+
+static Operation *
+operation_new (UmKerberosIdentityManager *self,
+ GCancellable *cancellable,
+ OperationType type,
+ GSimpleAsyncResult *result)
+{
+ Operation *operation;
+
+ operation = g_slice_new (Operation);
+
+ operation->manager = self;
+ operation->type = type;
+
+ if (cancellable == NULL) {
+ cancellable = g_cancellable_new ();
+ } else {
+ g_object_ref (cancellable);
+ }
+ operation->cancellable = cancellable;
+
+ if (result != NULL) {
+ g_object_ref (result);
+ }
+ operation->result = result;
+
+ operation->identity = NULL;
+
+ return operation;
+}
+
+static void
+operation_free (Operation *operation)
+{
+ g_object_unref (operation->cancellable);
+
+ if (operation->identity != NULL) {
+ g_object_unref (operation->identity);
+ }
+
+ if (operation->result != NULL) {
+ g_object_unref (operation->result);
+ }
+
+ g_slice_free (Operation, operation);
+}
+
+static void
+schedule_refresh (UmKerberosIdentityManager *self)
+{
+ Operation *operation;
+
+ operation = operation_new (self, NULL, OPERATION_TYPE_REFRESH, NULL);
+ g_async_queue_push (self->priv->pending_operations, operation);
+
+ schedule_next_operation (self);
+}
+
+static IdentitySignalWork *
+identity_signal_work_new (UmKerberosIdentityManager *self,
+ Operation *operation,
+ UmIdentity *identity)
+{
+ IdentitySignalWork *work;
+
+ work = g_slice_new (IdentitySignalWork);
+ work->manager = self;
+ work->operation = operation;
+ work->identity = g_object_ref (identity);
+
+ return work;
+}
+
+static void
+identity_signal_work_free (IdentitySignalWork *work)
+{
+ g_object_unref (work->identity);
+ g_slice_free (IdentitySignalWork, work);
+}
+
+static void
+stop_watching_for_identity_expiration (UmKerberosIdentityManager *self,
+ UmIdentity *identity)
+{
+ g_signal_handlers_disconnect_by_func (G_OBJECT (identity),
+ G_CALLBACK (on_identity_expired),
+ self);
+}
+
+static void
+on_identity_expired (UmIdentity *identity,
+ gpointer user_data)
+{
+ UmKerberosIdentityManager *self = UM_KERBEROS_IDENTITY_MANAGER (user_data);
+ const char *identifier;
+
+ stop_watching_for_identity_expiration (self, identity);
+
+ identifier = um_identity_get_identifier (identity);
+ g_hash_table_replace (self->priv->expired_identities,
+ (gpointer) identifier,
+ identity);
+ _um_identity_manager_emit_identity_expired (UM_IDENTITY_MANAGER (self), identity);
+}
+
+static void
+on_identity_unexpired (UmIdentity *identity,
+ gpointer user_data)
+{
+ UmKerberosIdentityManager *self = UM_KERBEROS_IDENTITY_MANAGER (user_data);
+
+ /* If an identity is now unexpired, that means some sort of weird
+ * clock skew happened and we should just do a full refresh, since it's
+ * probably affected more than one identity
+ */
+ schedule_refresh (self);
+}
+
+static void
+watch_for_identity_expiration (UmKerberosIdentityManager *self,
+ UmIdentity *identity)
+{
+ g_signal_handlers_disconnect_by_func (G_OBJECT (identity),
+ G_CALLBACK (on_identity_expired),
+ self);
+ g_signal_connect (G_OBJECT (identity),
+ "expired",
+ G_CALLBACK (on_identity_expired),
+ self);
+
+ g_signal_handlers_disconnect_by_func (G_OBJECT (identity),
+ G_CALLBACK (on_identity_unexpired),
+ self);
+ g_signal_connect (G_OBJECT (identity),
+ "unexpired",
+ G_CALLBACK (on_identity_unexpired),
+ self);
+}
+
+static void
+do_identity_signal_removed_work (IdentitySignalWork *work)
+{
+ UmKerberosIdentityManager *self = work->manager;
+ UmIdentity *identity = work->identity;
+
+ stop_watching_for_identity_expiration (self, identity);
+ _um_identity_manager_emit_identity_removed (UM_IDENTITY_MANAGER (self), identity);
+}
+
+static void
+do_identity_signal_added_work (IdentitySignalWork *work)
+{
+ UmKerberosIdentityManager *self = work->manager;
+ UmIdentity *identity = work->identity;
+
+ watch_for_identity_expiration (self, identity);
+ _um_identity_manager_emit_identity_added (UM_IDENTITY_MANAGER (self), identity);
+}
+
+static void
+do_identity_signal_renewed_work (IdentitySignalWork *work)
+{
+ UmKerberosIdentityManager *self = work->manager;
+ UmIdentity *identity = work->identity;
+
+ watch_for_identity_expiration (self, identity);
+ _um_identity_manager_emit_identity_renewed (UM_IDENTITY_MANAGER (self), identity);
+}
+
+static void
+drop_stale_identities (UmKerberosIdentityManager *self,
+ Operation *operation,
+ GHashTable *known_identities)
+{
+ GList *stale_identity_ids;
+ GList *node;
+
+ stale_identity_ids = g_hash_table_get_keys (self->priv->identities);
+
+ node = stale_identity_ids;
+ while (node != NULL) {
+ UmIdentity *identity;
+ const char *identifier = node->data;
+
+ identity = g_hash_table_lookup (known_identities, identifier);
+ if (identity == NULL) {
+ IdentitySignalWork *work;
+
+ identity = g_hash_table_lookup (self->priv->identities,
+ identifier);
+ work = identity_signal_work_new (self, operation, identity);
+ g_hash_table_remove (self->priv->expired_identities,
+ identifier);
+ g_hash_table_remove (self->priv->identities,
+ identifier);
+
+ g_io_scheduler_job_send_to_mainloop (operation->job,
+ (GSourceFunc)
+ do_identity_signal_removed_work,
+ work,
+ (GDestroyNotify)
+ identity_signal_work_free);
+ }
+ node = node->next;
+ }
+ g_list_free (stale_identity_ids);
+}
+
+static void
+update_identity (UmKerberosIdentityManager *self,
+ Operation *operation,
+ UmIdentity *identity,
+ UmIdentity *new_identity)
+{
+
+ gboolean is_expired;
+
+ is_expired = g_hash_table_lookup (self->priv->expired_identities,
+ um_identity_get_identifier (identity)) != NULL;
+
+ um_kerberos_identity_update (UM_KERBEROS_IDENTITY (identity),
+ UM_KERBEROS_IDENTITY (new_identity));
+
+ if (is_expired) {
+ IdentitySignalWork *work;
+
+ g_hash_table_remove (self->priv->expired_identities,
+ um_identity_get_identifier (identity));
+
+ /* if it was expired before, send out a renewel signal */
+ work = identity_signal_work_new (self, operation, identity);
+ g_io_scheduler_job_send_to_mainloop (operation->job,
+ (GSourceFunc)
+ do_identity_signal_renewed_work,
+ work,
+ (GDestroyNotify)
+ identity_signal_work_free);
+ }
+}
+
+static void
+add_identity (UmKerberosIdentityManager *self,
+ Operation *operation,
+ UmIdentity *identity,
+ const char *identifier)
+{
+ IdentitySignalWork *work;
+
+ g_hash_table_replace (self->priv->identities,
+ (gpointer) identifier,
+ g_object_ref (identity));
+
+ if (!um_identity_is_signed_in (identity)) {
+ g_hash_table_replace (self->priv->expired_identities,
+ (gpointer) identifier,
+ identity);
+ }
+
+ work = identity_signal_work_new (self, operation, identity);
+ g_io_scheduler_job_send_to_mainloop (operation->job,
+ (GSourceFunc)
+ do_identity_signal_added_work,
+ work,
+ (GDestroyNotify)
+ identity_signal_work_free);
+}
+
+static void
+refresh_identity (UmKerberosIdentityManager *self,
+ Operation *operation,
+ GHashTable *refreshed_identities,
+ UmIdentity *identity)
+{
+ const char *identifier;
+ UmIdentity *old_identity;
+
+ identifier = um_identity_get_identifier (identity);
+ old_identity = g_hash_table_lookup (self->priv->identities, identifier);
+
+ if (old_identity != NULL) {
+ update_identity (self, operation, old_identity, identity);
+
+ /* Reuse the old identity, so any object data set up on it doesn't
+ * disappear spurriously
+ */
+ identifier = um_identity_get_identifier (old_identity);
+ identity = old_identity;
+ } else {
+ add_identity (self, operation, identity, identifier);
+ }
+
+ /* Track refreshed identities so we can emit removals when we're done fully
+ * enumerating the collection of credential caches
+ */
+ g_hash_table_replace (refreshed_identities,
+ (gpointer) identifier,
+ g_object_ref (identity));
+}
+
+static void
+refresh_identities (UmKerberosIdentityManager *self,
+ Operation *operation)
+{
+ krb5_error_code error_code;
+ krb5_ccache cache;
+ krb5_cccol_cursor cursor;
+ const char *error_message;
+ GHashTable *refreshed_identities;
+
+ refreshed_identities = g_hash_table_new_full (g_str_hash,
+ g_str_equal,
+ NULL,
+ g_object_unref);
+ error_code = krb5_cccol_cursor_new (self->priv->kerberos_context, &cursor);
+
+ if (error_code != 0) {
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+ g_warning ("UmKerberosIdentityManager: Error looking up available credential caches: %s", error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+ goto done;
+ }
+
+ error_code = krb5_cccol_cursor_next (self->priv->kerberos_context,
+ cursor,
+ &cache);
+
+ while (error_code == 0 && cache != NULL) {
+ UmIdentity *identity;
+
+ identity = um_kerberos_identity_new (self->priv->kerberos_context,
+ cache);
+
+ if (identity != NULL) {
+ refresh_identity (self, operation, refreshed_identities, identity);
+ g_object_unref (identity);
+ }
+
+ krb5_cc_close (self->priv->kerberos_context, cache);
+ error_code = krb5_cccol_cursor_next (self->priv->kerberos_context,
+ cursor,
+ &cache);
+ }
+
+ if (error_code != 0) {
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+ g_warning ("UmKerberosIdentityManager: Error iterating over available credential caches: %s", error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+ }
+
+ krb5_cccol_cursor_free (self->priv->kerberos_context, &cursor);
+done:
+ drop_stale_identities (self, operation, refreshed_identities);
+ g_hash_table_unref (refreshed_identities);
+}
+
+static int
+identity_sort_func (UmIdentity *a,
+ UmIdentity *b)
+{
+ return g_strcmp0 (um_identity_get_identifier (a),
+ um_identity_get_identifier (b));
+}
+
+static void
+free_identity_list (GList *list)
+{
+ g_list_foreach (list, (GFunc) g_object_unref, NULL);
+ g_list_free (list);
+}
+
+static void
+list_identities (UmKerberosIdentityManager *self,
+ Operation *operation)
+{
+ GList *identities;
+
+ identities = g_hash_table_get_values (self->priv->identities);
+
+ identities = g_list_sort (identities,
+ (GCompareFunc)
+ identity_sort_func);
+
+ g_list_foreach (identities, (GFunc) g_object_ref, NULL);
+ g_simple_async_result_set_op_res_gpointer (operation->result,
+ identities,
+ (GDestroyNotify)
+ free_identity_list);
+}
+
+static void
+sign_out_identity (UmKerberosIdentityManager *self,
+ Operation *operation)
+{
+ GError *error;
+ gboolean was_signed_out;
+
+ error = NULL;
+ was_signed_out = um_kerberos_identity_erase (UM_KERBEROS_IDENTITY (operation->identity),
+ &error);
+
+ if (!was_signed_out) {
+ g_warning ("UmKerberosIdentityManager: could not sign out identity: %s",
+ error->message);
+ g_error_free (error);
+ }
+}
+
+static void
+set_cancelled_error (GError **error)
+{
+ g_set_error (error,
+ G_IO_ERROR,
+ G_IO_ERROR_CANCELLED,
+ "%s",
+ _("Operation was cancelled"));
+}
+
+static void
+block_others_from_identity_list (UmKerberosIdentityManager *self)
+{
+ g_mutex_lock (&self->priv->list_update_lock);
+ while (self->priv->is_updating_list) {
+ g_cond_wait (&self->priv->list_available_for_updates, &self->priv->list_update_lock);
+ }
+ self->priv->is_updating_list = TRUE;
+ g_mutex_unlock (&self->priv->list_update_lock);
+}
+
+static void
+stop_blocking_others_from_identity_list (UmKerberosIdentityManager *self)
+{
+ g_mutex_lock (&self->priv->list_update_lock);
+ self->priv->is_updating_list = FALSE;
+ g_cond_signal (&self->priv->list_available_for_updates);
+ g_mutex_unlock (&self->priv->list_update_lock);
+}
+
+static gboolean
+on_operation_scheduled (GIOSchedulerJob *job,
+ GCancellable *cancellable,
+ gpointer user_data)
+{
+ UmKerberosIdentityManager *self = UM_KERBEROS_IDENTITY_MANAGER (user_data);
+ Operation *operation;
+
+ /* We only allow one operation at a time.
+ */
+ block_others_from_identity_list (self);
+ operation = g_async_queue_try_pop (self->priv->pending_operations);
+
+ if (operation == NULL) {
+ stop_blocking_others_from_identity_list (self);
+ return FALSE;
+ }
+
+ if (g_cancellable_is_cancelled (operation->cancellable) &&
+ operation->result != NULL) {
+ GError *error;
+
+ stop_blocking_others_from_identity_list (self);
+
+ error = NULL;
+ set_cancelled_error (&error);
+ g_simple_async_result_take_error (operation->result,
+ error);
+ g_simple_async_result_complete_in_idle (operation->result);
+ g_object_unref (operation->result);
+ operation->result = NULL;
+ return FALSE;
+ }
+
+ operation->job = job;
+
+ switch (operation->type) {
+ case OPERATION_TYPE_REFRESH:
+ refresh_identities (operation->manager, operation);
+ stop_blocking_others_from_identity_list (self);
+ break;
+ case OPERATION_TYPE_LIST:
+ list_identities (operation->manager, operation);
+
+ /* We want to block refreshes (and their associated "added"
+ * and "removed" signals) until the caller has had
+ * a chance to look at the batch of
+ * results we already processed
+ */
+ g_assert (operation->result != NULL);
+
+ g_object_weak_ref (G_OBJECT (operation->result),
+ (GWeakNotify)
+ stop_blocking_others_from_identity_list,
+ self);
+ break;
+ case OPERATION_TYPE_SIGN_OUT:
+ sign_out_identity (operation->manager, operation);
+ stop_blocking_others_from_identity_list (self);
+ break;
+ }
+
+ operation->job = NULL;
+
+ if (operation->result != NULL) {
+ g_simple_async_result_complete_in_idle (operation->result);
+ g_object_unref (operation->result);
+ operation->result = NULL;
+ }
+
+ operation_free (operation);
+
+ schedule_next_operation (self);
+
+ return FALSE;
+}
+
+static void
+schedule_next_operation (UmKerberosIdentityManager *self)
+{
+ g_io_scheduler_push_job (on_operation_scheduled,
+ self,
+ NULL,
+ G_PRIORITY_DEFAULT,
+ self->priv->scheduler_cancellable);
+}
+
+static void
+um_kerberos_identity_manager_list_identities (UmIdentityManager *manager,
+ GCancellable *cancellable,
+ GAsyncReadyCallback callback,
+ gpointer user_data)
+{
+ UmKerberosIdentityManager *self = UM_KERBEROS_IDENTITY_MANAGER (manager);
+ GSimpleAsyncResult *result;
+ Operation *operation;
+
+ result = g_simple_async_result_new (G_OBJECT (self),
+ callback,
+ user_data,
+ um_kerberos_identity_manager_list_identities);
+
+ operation = operation_new (self,
+ cancellable,
+ OPERATION_TYPE_LIST,
+ result);
+ g_object_unref (result);
+
+ g_async_queue_push (self->priv->pending_operations, operation);
+
+ schedule_next_operation (self);
+}
+
+static GList *
+um_kerberos_identity_manager_list_identities_finish (UmIdentityManager *manager,
+ GAsyncResult *result,
+ GError **error)
+{
+ GList *identities;
+
+ if (g_simple_async_result_propagate_error (G_SIMPLE_ASYNC_RESULT (result),
+ error)) {
+ return NULL;
+ }
+
+ identities = g_simple_async_result_get_op_res_gpointer (G_SIMPLE_ASYNC_RESULT (result));
+
+ return identities;
+
+}
+
+static void
+um_kerberos_identity_manager_sign_identity_out (UmIdentityManager *manager,
+ UmIdentity *identity,
+ GCancellable *cancellable,
+ GAsyncReadyCallback callback,
+ gpointer user_data)
+{
+ UmKerberosIdentityManager *self = UM_KERBEROS_IDENTITY_MANAGER (manager);
+ GSimpleAsyncResult *result;
+ Operation *operation;
+
+ result = g_simple_async_result_new (G_OBJECT (self),
+ callback,
+ user_data,
+ um_kerberos_identity_manager_sign_identity_out);
+ operation = operation_new (self,
+ cancellable,
+ OPERATION_TYPE_SIGN_OUT,
+ result);
+ g_object_unref (result);
+
+ operation->identity = g_object_ref (identity);
+
+ g_async_queue_push (self->priv->pending_operations, operation);
+
+ schedule_next_operation (self);
+}
+
+static void
+um_kerberos_identity_manager_sign_identity_out_finish (UmIdentityManager *self,
+ GAsyncResult *result,
+ GError **error)
+{
+ if (g_simple_async_result_propagate_error (G_SIMPLE_ASYNC_RESULT (result),
+ error)) {
+ return;
+ }
+
+ return;
+}
+
+static char *
+um_kerberos_identity_manager_name_identity (UmIdentityManager *self,
+ UmIdentity *identity)
+{
+ char *name;
+
+ um_kerberos_identity_block_updates (UM_KERBEROS_IDENTITY (identity));
+
+ /* FIXME: prettify and make unique */
+ name = g_strdup (um_identity_get_identifier (identity));
+
+ um_kerberos_identity_stop_blocking_updates (UM_KERBEROS_IDENTITY (identity));
+
+ return name;
+}
+
+static void
+identity_manager_interface_init (UmIdentityManagerInterface *interface)
+{
+ interface->list_identities = um_kerberos_identity_manager_list_identities;
+ interface->list_identities_finish = um_kerberos_identity_manager_list_identities_finish;
+ interface->sign_identity_out = um_kerberos_identity_manager_sign_identity_out;
+ interface->sign_identity_out_finish = um_kerberos_identity_manager_sign_identity_out_finish;
+ interface->name_identity = um_kerberos_identity_manager_name_identity;
+}
+
+static void
+on_credentials_cache_changed (GFileMonitor *monitor,
+ GFile *file,
+ GFile *other_file,
+ GFileMonitorEvent *event_type,
+ gpointer user_data)
+{
+ UmKerberosIdentityManager *self = UM_KERBEROS_IDENTITY_MANAGER (user_data);
+
+ schedule_refresh (self);
+}
+
+static gboolean
+monitor_credentials_cache (UmKerberosIdentityManager *self,
+ GError **error)
+{
+ krb5_ccache default_cache;
+ const char *cache_type;
+ const char *cache_path;
+ GFile *file;
+ GFileMonitor *monitor;
+ krb5_error_code error_code;
+ GError *monitoring_error;
+
+ error_code = krb5_cc_default (self->priv->kerberos_context,
+ &default_cache);
+
+ if (error_code != 0) {
+ const char *error_message;
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+
+ g_set_error_literal (error,
+ UM_IDENTITY_MANAGER_ERROR,
+ UM_IDENTITY_MANAGER_ERROR_MONITORING,
+ error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+
+ return FALSE;
+ }
+
+ cache_type = krb5_cc_get_type (self->priv->kerberos_context,
+ default_cache);
+ g_assert (cache_type != NULL);
+
+ if (strcmp (cache_type, "FILE") != 0 &&
+ strcmp (cache_type, "DIR") != 0) {
+ g_set_error (error,
+ UM_IDENTITY_MANAGER_ERROR,
+ UM_IDENTITY_MANAGER_ERROR_MONITORING,
+ "Only 'FILE' and 'DIR' credential cache types are really supported, not '%s'",
+ cache_type);
+ return FALSE;
+ }
+
+ /* If we're using a FILE type credential cache, then the
+ * default cache file is the only cache we care about,
+ * and its path is what we want to monitor.
+ *
+ * If we're using a DIR type credential cache, then the default
+ * cache file is one of many possible cache files, all in the
+ * same directory. We want to monitor that directory.
+ */
+ cache_path = krb5_cc_get_name (self->priv->kerberos_context,
+ default_cache);
+
+ /* The cache name might have a : in front of it.
+ * FIXME: figure out if that behavior is by design, or some
+ * odd bug.
+ */
+ if (cache_path[0] == ':') {
+ cache_path++;
+ }
+
+ file = g_file_new_for_path (cache_path);
+
+ monitoring_error = NULL;
+ if (strcmp (cache_type, "FILE") == 0) {
+ monitor = g_file_monitor_file (file,
+ G_FILE_MONITOR_NONE,
+ NULL,
+ &monitoring_error);
+ } else if (strcmp (cache_type, "DIR") == 0) {
+ GFile *directory;
+
+ directory = g_file_get_parent (file);
+ monitor = g_file_monitor_directory (directory,
+ G_FILE_MONITOR_NONE,
+ NULL,
+ &monitoring_error);
+ g_object_unref (directory);
+
+ } else {
+ g_assert_not_reached ();
+ }
+ g_object_unref (file);
+
+ if (monitor == NULL) {
+ g_propagate_error (error, monitoring_error);
+ return FALSE;
+ }
+
+ self->priv->credentials_cache_changed_signal_id = g_signal_connect (G_OBJECT (monitor),
+ "changed",
+ G_CALLBACK (on_credentials_cache_changed),
+ self);
+ self->priv->credentials_cache_monitor = monitor;
+
+ return TRUE;
+}
+
+static void
+stop_watching_credentials_cache (UmKerberosIdentityManager *self)
+{
+ if (!g_file_monitor_is_cancelled (self->priv->credentials_cache_monitor)) {
+ g_file_monitor_cancel (self->priv->credentials_cache_monitor);
+ }
+ g_object_unref (self->priv->credentials_cache_monitor);
+ self->priv->credentials_cache_monitor = NULL;
+}
+
+static gboolean
+um_kerberos_identity_manager_initable_init (GInitable *initable,
+ GCancellable *cancellable,
+ GError **error)
+{
+ UmKerberosIdentityManager *self = UM_KERBEROS_IDENTITY_MANAGER (initable);
+ krb5_error_code error_code;
+ GError *monitoring_error;
+
+ if (g_cancellable_is_cancelled (cancellable)) {
+ set_cancelled_error (error);
+ return FALSE;
+ }
+
+ error_code = krb5_init_context (&self->priv->kerberos_context);
+
+ if (error_code != 0) {
+ const char *error_message;
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+
+ g_set_error_literal (error,
+ UM_IDENTITY_MANAGER_ERROR,
+ UM_IDENTITY_MANAGER_ERROR_INITIALIZING,
+ error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+
+ return FALSE;
+ }
+
+ monitoring_error = NULL;
+ if (!monitor_credentials_cache (self, &monitoring_error)) {
+ g_warning ("UmKerberosIdentityManager: Could not monitor credentials: %s",
+ monitoring_error->message);
+ g_error_free (monitoring_error);
+ }
+
+ schedule_refresh (self);
+
+ return TRUE;
+}
+
+static void
+initable_interface_init (GInitableIface *interface)
+{
+ interface->init = um_kerberos_identity_manager_initable_init;
+}
+
+static void
+um_kerberos_identity_manager_init (UmKerberosIdentityManager *self)
+{
+ self->priv = G_TYPE_INSTANCE_GET_PRIVATE (self,
+ UM_TYPE_KERBEROS_IDENTITY_MANAGER,
+ UmKerberosIdentityManagerPrivate);
+ self->priv->identities = g_hash_table_new_full (g_str_hash,
+ g_str_equal,
+ NULL,
+ g_object_unref);
+ self->priv->expired_identities = g_hash_table_new_full (g_str_hash,
+ g_str_equal,
+ NULL,
+ NULL);
+ self->priv->pending_operations = g_async_queue_new ();
+
+ self->priv->scheduler_cancellable = g_cancellable_new ();
+
+ g_mutex_init (&self->priv->list_update_lock);
+ g_cond_init (&self->priv->list_available_for_updates);
+}
+
+static void
+cancel_pending_operations (UmKerberosIdentityManager *self)
+{
+ Operation *operation;
+
+ operation = g_async_queue_try_pop (self->priv->pending_operations);
+ while (operation != NULL) {
+ if (!g_cancellable_is_cancelled (operation->cancellable)) {
+ g_cancellable_cancel (operation->cancellable);
+ }
+ operation_free (operation);
+ operation = g_async_queue_try_pop (self->priv->pending_operations);
+ }
+}
+
+static void
+um_kerberos_identity_manager_dispose (GObject *object)
+{
+ UmKerberosIdentityManager *self = UM_KERBEROS_IDENTITY_MANAGER (object);
+
+ if (self->priv->expired_identities != NULL) {
+ g_hash_table_unref (self->priv->expired_identities);
+ self->priv->expired_identities = NULL;
+ }
+
+ if (self->priv->identities != NULL) {
+ g_hash_table_unref (self->priv->identities);
+ self->priv->identities = NULL;
+ }
+
+ if (self->priv->credentials_cache_monitor != NULL) {
+ stop_watching_credentials_cache (self);
+ }
+
+ if (self->priv->pending_operations != NULL) {
+ cancel_pending_operations (self);
+ g_async_queue_unref (self->priv->pending_operations);
+ self->priv->pending_operations = NULL;
+ }
+
+ if (self->priv->scheduler_cancellable != NULL) {
+ if (!g_cancellable_is_cancelled (self->priv->scheduler_cancellable)) {
+ g_cancellable_cancel (self->priv->scheduler_cancellable);
+ }
+
+ g_object_unref (self->priv->scheduler_cancellable);
+ self->priv->scheduler_cancellable = NULL;
+ }
+
+ G_OBJECT_CLASS (um_kerberos_identity_manager_parent_class)->dispose (object);
+}
+
+static void
+um_kerberos_identity_manager_finalize (GObject *object)
+{
+ UmKerberosIdentityManager *self = UM_KERBEROS_IDENTITY_MANAGER (object);
+
+ g_cond_clear (&self->priv->list_available_for_updates);
+ krb5_free_context (self->priv->kerberos_context);
+
+ G_OBJECT_CLASS (um_kerberos_identity_manager_parent_class)->finalize (object);
+}
+
+static void
+um_kerberos_identity_manager_class_init (UmKerberosIdentityManagerClass *klass)
+{
+ GObjectClass *object_class = G_OBJECT_CLASS (klass);
+
+ object_class->dispose = um_kerberos_identity_manager_dispose;
+ object_class->finalize = um_kerberos_identity_manager_finalize;
+
+ g_type_class_add_private (klass, sizeof (UmKerberosIdentityManagerPrivate));
+}
+
+UmIdentityManager*
+um_kerberos_identity_manager_new (void)
+{
+ GObject *object;
+ GError *error;
+ object = g_object_new (UM_TYPE_KERBEROS_IDENTITY_MANAGER, NULL);
+
+ error = NULL;
+ if (!g_initable_init (G_INITABLE (object), NULL, &error)) {
+ g_warning ("Could not create kerberos identity manager: %s",
+ error->message);
+ g_error_free (error);
+ g_object_unref (object);
+ return NULL;
+ }
+
+ return UM_IDENTITY_MANAGER (object);
+}
diff --git a/panels/user-accounts/um-kerberos-identity-manager.h b/panels/user-accounts/um-kerberos-identity-manager.h
new file mode 100644
index 0000000..121d191
--- /dev/null
+++ b/panels/user-accounts/um-kerberos-identity-manager.h
@@ -0,0 +1,58 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 8 -*-
+ *
+ * Copyright (C) 2012 Red Hat, Inc.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of the
+ * License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+ * 02111-1307, USA.
+ *
+ * Authors: Ray Strode
+ */
+
+#ifndef __UM_KERBEROS_IDENTITY_MANAGER_H__
+#define __UM_KERBEROS_IDENTITY_MANAGER_H__
+
+#include <glib.h>
+#include <glib-object.h>
+#include <gio/gio.h>
+
+#include "um-identity-manager.h"
+
+G_BEGIN_DECLS
+
+#define UM_TYPE_KERBEROS_IDENTITY_MANAGER (um_kerberos_identity_manager_get_type ())
+#define UM_KERBEROS_IDENTITY_MANAGER(obj) (G_TYPE_CHECK_INSTANCE_CAST (obj, UM_TYPE_KERBEROS_IDENTITY_MANAGER, UmKerberosIdentityManager))
+#define UM_KERBEROS_IDENTITY_MANAGER_CLASS(cls) (G_TYPE_CHECK_CLASS_CAST (cls, UM_TYPE_KERBEROS_IDENTITY_MANAGER, UmKerberosIdentityManagerClass))
+#define UM_IS_KERBEROS_IDENTITY_MANAGER(obj) (G_TYPE_CHECK_INSTANCE_TYPE (obj, UM_TYPE_KERBEROS_IDENTITY_MANAGER))
+#define UM_IS_KERBEROS_IDENTITY_MANAGER_CLASS(obj) (G_TYPE_CHECK_CLASS_TYPE (obj, UM_TYPE_KERBEROS_IDENTITY_MANAGER))
+#define UM_KERBEROS_IDENTITY_MANAGER_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS ((obj), UM_TYPE_KERBEROS_IDENTITY_MANAGER, UmKerberosIdentityManagerClass))
+
+typedef struct _UmKerberosIdentityManager UmKerberosIdentityManager;
+typedef struct _UmKerberosIdentityManagerClass UmKerberosIdentityManagerClass;
+typedef struct _UmKerberosIdentityManagerPrivate UmKerberosIdentityManagerPrivate; struct _UmKerberosIdentityManager
+{
+ GObject parent_instance;
+ UmKerberosIdentityManagerPrivate *priv;
+};
+
+struct _UmKerberosIdentityManagerClass
+{
+ GObjectClass parent_class;
+};
+
+GType um_kerberos_identity_manager_get_type (void);
+UmIdentityManager* um_kerberos_identity_manager_new (void);
+G_END_DECLS
+
+#endif /* __UM_KERBEROS_IDENTITY_MANAGER_H__ */
diff --git a/panels/user-accounts/um-kerberos-identity.c b/panels/user-accounts/um-kerberos-identity.c
new file mode 100644
index 0000000..b211934
--- /dev/null
+++ b/panels/user-accounts/um-kerberos-identity.c
@@ -0,0 +1,643 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 8 -*-
+ *
+ * Copyright (C) 2012 Red Hat, Inc.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2, or (at your option)
+ * any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+ * 02111-1307, USA.
+ *
+ * Author: Ray Strode
+ */
+
+#include "config.h"
+
+#include "um-identity.h"
+#include "um-kerberos-identity.h"
+#include "um-alarm.h"
+
+#include <string.h>
+#include <glib/gi18n.h>
+#include <gio/gio.h>
+
+struct _UmKerberosIdentityPrivate
+{
+ krb5_context kerberos_context;
+ krb5_ccache credentials_cache;
+
+ char *principal_name;
+ UmAlarm *expiration_alarm;
+ GCancellable *expiration_alarm_cancellable;
+ krb5_timestamp expiration_time;
+
+ GRecMutex updates_lock;
+};
+
+typedef enum
+{
+ VERIFICATION_LEVEL_UNVERIFIED,
+ VERIFICATION_LEVEL_ERROR,
+ VERIFICATION_LEVEL_EXISTS,
+ VERIFICATION_LEVEL_SIGNED_IN
+} VerificationLevel;
+
+enum {
+ EXPIRED,
+ UNEXPIRED,
+ NUMBER_OF_SIGNALS,
+};
+
+static guint signals[NUMBER_OF_SIGNALS] = { 0 };
+
+static void identity_interface_init (UmIdentityInterface *interface);
+static void initable_interface_init (GInitableIface *interface);
+static void set_expiration_alarm (UmKerberosIdentity *self);
+
+G_DEFINE_TYPE_WITH_CODE (UmKerberosIdentity,
+ um_kerberos_identity,
+ G_TYPE_OBJECT,
+ G_IMPLEMENT_INTERFACE (UM_TYPE_IDENTITY,
+ identity_interface_init)
+ G_IMPLEMENT_INTERFACE (G_TYPE_INITABLE,
+ initable_interface_init));
+
+static void
+um_kerberos_identity_dispose (GObject *object)
+{
+ UmKerberosIdentity *self = UM_KERBEROS_IDENTITY (object);
+
+ if (self->priv->expiration_alarm_cancellable != NULL) {
+ if (!g_cancellable_is_cancelled (self->priv->expiration_alarm_cancellable)) {
+ g_cancellable_cancel (self->priv->expiration_alarm_cancellable);
+ }
+ g_object_unref (self->priv->expiration_alarm_cancellable);
+ self->priv->expiration_alarm_cancellable = NULL;
+ }
+
+ if (self->priv->expiration_alarm != NULL) {
+ g_object_unref (self->priv->expiration_alarm);
+ self->priv->expiration_alarm = NULL;
+ }
+
+}
+
+static void
+um_kerberos_identity_finalize (GObject *object)
+{
+ UmKerberosIdentity *self = UM_KERBEROS_IDENTITY (object);
+
+ g_free (self->priv->principal_name);
+ self->priv->principal_name = NULL;
+
+ if (self->priv->credentials_cache != NULL) {
+ krb5_cc_close (self->priv->kerberos_context, self->priv->credentials_cache);
+ }
+ G_OBJECT_CLASS (um_kerberos_identity_parent_class)->finalize (object);
+}
+
+static void
+um_kerberos_identity_class_init (UmKerberosIdentityClass *klass)
+{
+ GObjectClass *object_class;
+
+ object_class = G_OBJECT_CLASS (klass);
+
+ object_class->dispose = um_kerberos_identity_dispose;
+ object_class->finalize = um_kerberos_identity_finalize;
+
+ g_type_class_add_private (klass, sizeof (UmKerberosIdentityPrivate));
+
+ signals[EXPIRED] = g_signal_new ("expired",
+ G_TYPE_FROM_CLASS (klass),
+ G_SIGNAL_RUN_LAST,
+ 0,
+ NULL, NULL, NULL,
+ G_TYPE_NONE, 0);
+ signals[UNEXPIRED] = g_signal_new ("unexpired",
+ G_TYPE_FROM_CLASS (klass),
+ G_SIGNAL_RUN_LAST,
+ 0,
+ NULL, NULL, NULL,
+ G_TYPE_NONE, 0);
+}
+
+static void
+um_kerberos_identity_init (UmKerberosIdentity *self)
+{
+ self->priv = G_TYPE_INSTANCE_GET_PRIVATE (self,
+ UM_TYPE_KERBEROS_IDENTITY,
+ UmKerberosIdentityPrivate);
+
+ g_rec_mutex_init (&self->priv->updates_lock);
+
+ self->priv->expiration_alarm = um_alarm_new ();
+}
+
+static char *
+get_principal_name (UmKerberosIdentity *self)
+{
+ krb5_principal principal;
+ krb5_error_code error_code;
+ char *unparsed_name;
+ char *principal_name;
+
+ error_code = krb5_cc_get_principal (self->priv->kerberos_context,
+ self->priv->credentials_cache,
+ &principal);
+
+ if (error_code != 0) {
+ const char *error_message;
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+ g_warning ("UmKerberosIdentity: Error looking up principal identity in credential cache: %s", error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+ return NULL;
+ }
+
+ error_code = krb5_unparse_name (self->priv->kerberos_context,
+ principal,
+ &unparsed_name);
+
+ if (error_code != 0) {
+ const char *error_message;
+
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+ g_warning ("UmKerberosIdentity: Error parsing principal identity name: %s", error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+ return NULL;
+ }
+
+ principal_name = g_strdup (unparsed_name);
+ krb5_free_unparsed_name (self->priv->kerberos_context, unparsed_name);
+
+ return principal_name;
+}
+
+static const char *
+um_kerberos_identity_get_identifier (UmIdentity *identity)
+{
+ UmKerberosIdentity *self = UM_KERBEROS_IDENTITY (identity);
+
+ if (self->priv->principal_name == NULL) {
+ self->priv->principal_name = get_principal_name (self);
+ }
+
+ return self->priv->principal_name;
+}
+
+static gboolean
+credentials_show_existence (UmKerberosIdentity *self,
+ krb5_principal principal,
+ krb5_creds *credentials)
+{
+ /* Checks if default principal associated with the cache has a valid
+ * ticket granting ticket in the passed in credentials
+ */
+
+ if (krb5_is_config_principal (self->priv->kerberos_context,
+ credentials->server)) {
+ return FALSE;
+ }
+
+ /* looking for the krbtgt / REALM pair, so it should be exactly 2 items */
+ if (credentials->server->length != 2) {
+ return FALSE;
+ }
+
+ if (credentials->server->realm.length != principal->realm.length ||
+ memcmp (credentials->server->realm.data,
+ principal->realm.data,
+ principal->realm.length) != 0) {
+ /* credentials are from some other realm */
+ return FALSE;
+ }
+
+ if (strncmp (credentials->server->data[0].data,
+ KRB5_TGS_NAME,
+ credentials->server->data[0].length) != 0) {
+ /* credentials aren't for ticket granting */
+ return FALSE;
+ }
+
+ if (credentials->server->data[1].length != principal->realm.length ||
+ memcmp (credentials->server->data[1].data,
+ principal->realm.data,
+ principal->realm.length) != 0) {
+ /* credentials are for some other realm */
+ return FALSE;
+ }
+
+ return TRUE;
+}
+
+static krb5_timestamp
+get_current_time (UmKerberosIdentity *self)
+{
+ krb5_timestamp current_time;
+ krb5_error_code error_code;
+
+ error_code = krb5_timeofday (self->priv->kerberos_context,
+ ¤t_time);
+
+ if (error_code != 0) {
+ const char *error_message;
+
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+ g_warning ("UmKerberosIdentity: Error getting current time: %s", error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+ return 0;
+ }
+
+ return current_time;
+}
+
+static gboolean
+credentials_are_expired (UmKerberosIdentity *self,
+ krb5_creds *credentials)
+{
+ krb5_timestamp current_time;
+
+ current_time = get_current_time (self);
+
+ self->priv->expiration_time = MAX (credentials->times.endtime,
+ self->priv->expiration_time);
+
+ if (credentials->times.endtime <= current_time) {
+ return TRUE;
+ }
+
+ return FALSE;
+}
+
+static VerificationLevel
+verify_identity (UmKerberosIdentity *self,
+ GError **error)
+{
+ krb5_principal principal;
+ const char *error_message;
+ krb5_cc_cursor cursor;
+ krb5_creds credentials;
+ krb5_error_code error_code;
+ VerificationLevel verification_level;
+
+ if (self->priv->credentials_cache == NULL) {
+ return VERIFICATION_LEVEL_UNVERIFIED;
+ }
+
+ error_code = krb5_cc_get_principal (self->priv->kerberos_context,
+ self->priv->credentials_cache,
+ &principal);
+
+ if (error_code != 0) {
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+
+ if (error_code == KRB5_CC_END) {
+ return VERIFICATION_LEVEL_UNVERIFIED;
+ }
+
+ g_set_error (error,
+ UM_IDENTITY_ERROR,
+ UM_IDENTITY_ERROR_VERIFYING,
+ _("Could not find identity in credential cache: %s"),
+ error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+
+ return VERIFICATION_LEVEL_ERROR;
+ }
+
+ error_code = krb5_cc_start_seq_get (self->priv->kerberos_context,
+ self->priv->credentials_cache,
+ &cursor);
+ if (error_code != 0) {
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+ g_set_error (error,
+ UM_IDENTITY_ERROR,
+ UM_IDENTITY_ERROR_VERIFYING,
+ _("Could not find identity credentials in cache: %s"),
+ error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+
+ verification_level = VERIFICATION_LEVEL_ERROR;
+ goto out;
+ }
+
+ verification_level = VERIFICATION_LEVEL_UNVERIFIED;
+
+ error_code = krb5_cc_next_cred (self->priv->kerberos_context,
+ self->priv->credentials_cache,
+ &cursor,
+ &credentials);
+
+ while (error_code == 0) {
+ if (credentials_show_existence (self, principal, &credentials)) {
+ if (!credentials_are_expired (self, &credentials)) {
+ verification_level = VERIFICATION_LEVEL_SIGNED_IN;
+ } else {
+ verification_level = VERIFICATION_LEVEL_EXISTS;
+ }
+ }
+
+ error_code = krb5_cc_next_cred (self->priv->kerberos_context,
+ self->priv->credentials_cache,
+ &cursor,
+ &credentials);
+ }
+
+ if (error_code != KRB5_CC_END) {
+ verification_level = VERIFICATION_LEVEL_ERROR;
+
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+ g_set_error (error,
+ UM_IDENTITY_ERROR,
+ UM_IDENTITY_ERROR_VERIFYING,
+ _("Could not sift through identity credentials in cache: %s"),
+ error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+ }
+
+ error_code = krb5_cc_end_seq_get (self->priv->kerberos_context,
+ self->priv->credentials_cache,
+ &cursor);
+
+ if (error_code != 0) {
+ verification_level = VERIFICATION_LEVEL_ERROR;
+
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+ g_set_error (error,
+ UM_IDENTITY_ERROR,
+ UM_IDENTITY_ERROR_VERIFYING,
+ _("Could not finish up sifting through identity credentials in cache: %s"),
+ error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+ }
+out:
+ krb5_free_principal (self->priv->kerberos_context, principal);
+ return verification_level;
+}
+
+static gboolean
+um_kerberos_identity_is_signed_in (UmIdentity *identity)
+{
+ UmKerberosIdentity *self = UM_KERBEROS_IDENTITY (identity);
+ VerificationLevel verification_level;
+
+ um_kerberos_identity_block_updates (self);
+ verification_level = verify_identity (self, NULL);
+ um_kerberos_identity_stop_blocking_updates (self);
+
+ return verification_level == VERIFICATION_LEVEL_SIGNED_IN;
+}
+
+static void
+identity_interface_init (UmIdentityInterface *interface)
+{
+ interface->get_identifier = um_kerberos_identity_get_identifier;
+ interface->is_signed_in = um_kerberos_identity_is_signed_in;
+}
+
+static void
+set_cancelled_error (GError **error)
+{
+ g_set_error (error,
+ G_IO_ERROR,
+ G_IO_ERROR_CANCELLED,
+ "%s",
+ _("Operation was cancelled"));
+}
+
+static void
+on_expiration_alarm_fired (UmAlarm *alarm,
+ gpointer user_data)
+{
+ UmKerberosIdentity *self = UM_KERBEROS_IDENTITY (user_data);
+ VerificationLevel verification_level;
+
+ um_kerberos_identity_block_updates (self);
+ verification_level = verify_identity (self, NULL);
+
+ if (verification_level != VERIFICATION_LEVEL_SIGNED_IN) {
+ g_signal_emit (G_OBJECT (self), signals[EXPIRED], 0);
+ um_kerberos_identity_stop_blocking_updates (self);
+ } else {
+ um_kerberos_identity_stop_blocking_updates (self);
+ set_expiration_alarm (self);
+ }
+
+}
+
+static void
+on_expiration_alarm_rearmed (UmAlarm *alarm,
+ gpointer user_data)
+{
+ UmKerberosIdentity *self = UM_KERBEROS_IDENTITY (user_data);
+ VerificationLevel verification_level;
+
+ um_kerberos_identity_block_updates (self);
+ verification_level = verify_identity (self, NULL);
+
+ if (verification_level == VERIFICATION_LEVEL_SIGNED_IN) {
+ g_signal_emit (G_OBJECT (self), signals[UNEXPIRED], 0);
+ um_kerberos_identity_stop_blocking_updates (self);
+ set_expiration_alarm (self);
+ } else {
+ um_kerberos_identity_stop_blocking_updates (self);
+ }
+}
+
+static void
+set_expiration_alarm (UmKerberosIdentity *self)
+{
+ GDateTime *expiration_time;
+
+ expiration_time = g_date_time_new_from_unix_local (self->priv->expiration_time);
+ g_signal_handlers_disconnect_by_func (G_OBJECT (self->priv->expiration_alarm),
+ G_CALLBACK (on_expiration_alarm_fired),
+ self);
+ g_signal_connect (G_OBJECT (self->priv->expiration_alarm),
+ "fired",
+ G_CALLBACK (on_expiration_alarm_fired),
+ self);
+ g_signal_handlers_disconnect_by_func (G_OBJECT (self->priv->expiration_alarm),
+ G_CALLBACK (on_expiration_alarm_rearmed),
+ self);
+ g_signal_connect (G_OBJECT (self->priv->expiration_alarm),
+ "rearmed",
+ G_CALLBACK (on_expiration_alarm_rearmed),
+ self);
+
+ if (self->priv->expiration_alarm_cancellable != NULL) {
+ g_object_unref (self->priv->expiration_alarm_cancellable);
+ self->priv->expiration_alarm_cancellable = NULL;
+ }
+
+ self->priv->expiration_alarm_cancellable = g_cancellable_new ();
+ um_alarm_set (self->priv->expiration_alarm,
+ expiration_time,
+ self->priv->expiration_alarm_cancellable);
+ g_date_time_unref (expiration_time);
+}
+
+static gboolean
+um_kerberos_identity_initable_init (GInitable *initable,
+ GCancellable *cancellable,
+ GError **error)
+{
+ UmKerberosIdentity *self = UM_KERBEROS_IDENTITY (initable);
+ GError *verification_error;
+ VerificationLevel verification_level;
+
+ if (g_cancellable_is_cancelled (cancellable)) {
+ set_cancelled_error (error);
+ return FALSE;
+ }
+
+ verification_error = NULL;
+ verification_level = verify_identity (self, &verification_error);
+
+ switch (verification_level) {
+ case VERIFICATION_LEVEL_EXISTS:
+ set_expiration_alarm (self);
+ return TRUE;
+
+ case VERIFICATION_LEVEL_SIGNED_IN:
+ set_expiration_alarm (self);
+ return TRUE;
+
+ case VERIFICATION_LEVEL_ERROR:
+ g_propagate_error (error, verification_error);
+ return FALSE;
+
+ case VERIFICATION_LEVEL_UNVERIFIED:
+ default:
+ g_set_error (error,
+ UM_IDENTITY_ERROR,
+ UM_IDENTITY_ERROR_VERIFYING,
+ _("No associated identification found"));
+
+ return FALSE;
+ }
+}
+
+static void
+initable_interface_init (GInitableIface *interface)
+{
+ interface->init = um_kerberos_identity_initable_init;
+}
+
+void
+um_kerberos_identity_update (UmKerberosIdentity *self,
+ UmKerberosIdentity *new_identity)
+{
+ char *new_principal_name;
+ VerificationLevel verification_level;
+
+ g_rec_mutex_lock (&self->priv->updates_lock);
+
+ if (self->priv->credentials_cache != NULL) {
+ krb5_cc_close (self->priv->kerberos_context, self->priv->credentials_cache);
+ }
+ krb5_cc_dup (new_identity->priv->kerberos_context,
+ new_identity->priv->credentials_cache,
+ &self->priv->credentials_cache);
+
+ if (!g_cancellable_is_cancelled (self->priv->expiration_alarm_cancellable)) {
+ g_cancellable_cancel (self->priv->expiration_alarm_cancellable);
+ }
+
+ new_principal_name = get_principal_name (self);
+
+ if (g_strcmp0 (self->priv->principal_name, new_principal_name) != 0) {
+ g_free (self->priv->principal_name);
+ self->priv->principal_name = new_principal_name;
+ } else {
+ g_free (new_principal_name);
+ }
+
+ verification_level = verify_identity (self, NULL);
+
+ if (verification_level == VERIFICATION_LEVEL_SIGNED_IN ||
+ verification_level == VERIFICATION_LEVEL_EXISTS) {
+ set_expiration_alarm (self);
+ }
+
+ g_rec_mutex_unlock (&self->priv->updates_lock);
+}
+
+gboolean
+um_kerberos_identity_erase (UmKerberosIdentity *self,
+ GError **error)
+{
+ krb5_error_code error_code = 0;
+
+ g_rec_mutex_lock (&self->priv->updates_lock);
+
+ if (self->priv->credentials_cache != NULL) {
+ error_code = krb5_cc_destroy (self->priv->kerberos_context,
+ self->priv->credentials_cache);
+ self->priv->credentials_cache = NULL;
+ }
+
+ g_rec_mutex_unlock (&self->priv->updates_lock);
+
+ if (error_code != 0) {
+ const char *error_message;
+ error_message = krb5_get_error_message (self->priv->kerberos_context, error_code);
+
+ g_set_error (error,
+ UM_IDENTITY_ERROR,
+ UM_IDENTITY_ERROR_ERASING,
+ _("Could not erase identity: %s"),
+ error_message);
+ krb5_free_error_message (self->priv->kerberos_context, error_message);
+ return FALSE;
+ }
+
+ return TRUE;
+}
+
+void
+um_kerberos_identity_block_updates (UmKerberosIdentity *self)
+{
+ g_rec_mutex_lock (&self->priv->updates_lock);
+}
+
+void
+um_kerberos_identity_stop_blocking_updates (UmKerberosIdentity *self)
+{
+ g_rec_mutex_unlock (&self->priv->updates_lock);
+}
+
+UmIdentity *
+um_kerberos_identity_new (krb5_context context,
+ krb5_ccache cache)
+{
+ UmKerberosIdentity *self;
+ GError *error;
+
+ self = UM_KERBEROS_IDENTITY (g_object_new (UM_TYPE_KERBEROS_IDENTITY, NULL));
+
+ krb5_cc_dup (context,
+ cache,
+ &self->priv->credentials_cache);
+ self->priv->kerberos_context = context;
+
+ error = NULL;
+ if (!g_initable_init (G_INITABLE (self), NULL, &error)) {
+ g_debug ("Could not create kerberos identity: %s",
+ error->message);
+ g_error_free (error);
+ g_object_unref (self);
+ return NULL;
+ }
+
+ return UM_IDENTITY (self);
+}
diff --git a/panels/user-accounts/um-kerberos-identity.h b/panels/user-accounts/um-kerberos-identity.h
new file mode 100644
index 0000000..bc3639c
--- /dev/null
+++ b/panels/user-accounts/um-kerberos-identity.h
@@ -0,0 +1,69 @@
+/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 8 -*-
+ *
+ * Copyright (C) 2012 Red Hat, Inc.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of the
+ * License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+ * 02111-1307, USA.
+ *
+ * Authors: Ray Strode
+ */
+
+#ifndef __UM_KERBEROS_IDENTITY_H__
+#define __UM_KERBEROS_IDENTITY_H__
+
+#include <glib.h>
+#include <glib-object.h>
+
+#include <krb5.h>
+
+G_BEGIN_DECLS
+
+#define UM_TYPE_KERBEROS_IDENTITY (um_kerberos_identity_get_type ())
+#define UM_KERBEROS_IDENTITY(obj) (G_TYPE_CHECK_INSTANCE_CAST ((obj), UM_TYPE_KERBEROS_IDENTITY, UmKerberosIdentity))
+#define UM_KERBEROS_IDENTITY_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST ((klass), UM_TYPE_KERBEROS_IDENTITY, UmKerberosIdentityClass))
+#define UM_IS_KERBEROS_IDENTITY(obj) (G_TYPE_CHECK_INSTANCE_TYPE ((obj), UM_TYPE_KERBEROS_IDENTITY))
+#define UM_IS_KERBEROS_IDENTITY_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE ((klass), UM_TYPE_KERBEROS_IDENTITY))
+#define UM_KERBEROS_IDENTITY_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS((obj), UM_TYPE_KERBEROS_IDENTITY, UmKerberosIdentityClass))
+
+typedef struct _UmKerberosIdentity UmKerberosIdentity;
+typedef struct _UmKerberosIdentityClass UmKerberosIdentityClass;
+typedef struct _UmKerberosIdentityPrivate UmKerberosIdentityPrivate;
+
+struct _UmKerberosIdentity
+{
+ GObject parent;
+
+ UmKerberosIdentityPrivate *priv;
+};
+
+struct _UmKerberosIdentityClass
+{
+ GObjectClass parent_class;
+};
+
+GType um_kerberos_identity_get_type (void);
+
+UmIdentity *um_kerberos_identity_new (krb5_context kerberos_context,
+ krb5_ccache cache);
+void um_kerberos_identity_update (UmKerberosIdentity *identity,
+ UmKerberosIdentity *new_identity);
+gboolean um_kerberos_identity_erase (UmKerberosIdentity *self,
+ GError **error);
+
+void um_kerberos_identity_block_updates (UmKerberosIdentity *identity);
+void um_kerberos_identity_stop_blocking_updates (UmKerberosIdentity *identity);
+G_END_DECLS
+
+#endif /* __UM_KERBEROS_IDENTITY_H__ */
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]
