/* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*- */
/*
* Copyright © 2012 – 2017 Red Hat, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2 of the License, or (at your option) any later version.
*
* This library 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
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General
* Public License along with this library; if not, see <http://www.gnu.org/licenses/>.
*/
#include "config.h"
#include "goaidentityutils.h"
#include <string.h>
#include <glib/gi18n.h>
#include <glib/gstdio.h>
#include <gio/gio.h>
void
goa_identity_utils_split_identifier (const char *identifier,
char **user,
char **domain)
{
char **components;
if (user != NULL)
*user = NULL;
if (domain != NULL)
*domain = NULL;
components = g_strsplit (identifier, "@", -1);
if (components[0] != NULL)
{
if (user != NULL)
*user = g_strdup (components[0]);
if (components[1] != NULL && domain != NULL)
*domain = g_strdup (components[1]);
}
g_strfreev (components);
}
char *
goa_identity_utils_escape_object_path (const char *data,
gsize length)
{
const char *p;
char *object_path;
GString *string;
g_return_val_if_fail (data != NULL, NULL);
string = g_string_sized_new ((length + 1) * 6);
for (p = data; *p != '\0'; p++)
{
guchar character;
character = (guchar) * p;
if (((character >= ((guchar) 'a')) &&
(character <= ((guchar) 'z'))) ||
((character >= ((guchar) 'A')) &&
(character <= ((guchar) 'Z'))) ||
((character >= ((guchar) '0')) && (character <= ((guchar) '9'))))
{
g_string_append_c (string, (char) character);
continue;
}
g_string_append_printf (string, "_%x_", character);
}
object_path = string->str;
g_string_free (string, FALSE);
return object_path;
}
static char *
dashed_string_to_studly_caps (const char *dashed_string)
{
char *studly_string;
size_t studly_string_length;
size_t i;
i = 0;
studly_string = g_strdup (dashed_string);
studly_string_length = strlen (studly_string);
studly_string[i] = g_ascii_toupper (studly_string[i]);
i++;
while (i < studly_string_length)
{
if (studly_string[i] == '-' || studly_string[i] == '_')
{
g_memmove (studly_string + i,
studly_string + i + 1,
studly_string_length - i - 1);
studly_string_length--;
if (g_ascii_isalpha (studly_string[i]))
studly_string[i] = g_ascii_toupper (studly_string[i]);
}
i++;
}
studly_string[studly_string_length] = '\0';
return studly_string;
}
static char *
dashed_string_to_dbus_error_string (const char *dashed_string,
const char *old_prefix,
const char *new_prefix,
const char *suffix)
{
char *studly_suffix;
char *dbus_error_string;
size_t dbus_error_string_length;
size_t i;
i = 0;
if (g_str_has_prefix (dashed_string, old_prefix) &&
(dashed_string[strlen (old_prefix)] == '-' ||
dashed_string[strlen (old_prefix)] == '_'))
dashed_string += strlen (old_prefix) + 1;
studly_suffix = dashed_string_to_studly_caps (suffix);
dbus_error_string =
g_strdup_printf ("%s.%s.%s", new_prefix, dashed_string, studly_suffix);
g_free (studly_suffix);
i += strlen (new_prefix) + 1;
dbus_error_string_length = strlen (dbus_error_string);
dbus_error_string[i] = g_ascii_toupper (dbus_error_string[i]);
i++;
while (i < dbus_error_string_length)
{
if (dbus_error_string[i] == '_' || dbus_error_string[i] == '-')
{
dbus_error_string[i] = '.';
if (g_ascii_isalpha (dbus_error_string[i + 1]))
dbus_error_string[i + 1] = g_ascii_toupper (dbus_error_string[i + 1]);
}
i++;
}
return dbus_error_string;
}
void
goa_identity_utils_register_error_domain (GQuark error_domain,
GType error_enum)
{
const char *error_domain_string;
char *type_name = NULL;
GType type;
GTypeClass *type_class = NULL;
const GEnumClass *enum_class;
guint i;
error_domain_string = g_quark_to_string (error_domain);
type_name = dashed_string_to_studly_caps (error_domain_string);
type = g_type_from_name (type_name);
type_class = g_type_class_ref (type);
if (type_class == NULL)
{
g_warning ("GoaIdentityUtils: Could not identity type %s", type_name);
goto out;
}
enum_class = G_ENUM_CLASS (type_class);
for (i = 0; i < enum_class->n_values; i++)
{
char *dbus_error_string;
dbus_error_string = dashed_string_to_dbus_error_string (error_domain_string,
"goa",
"org.gnome",
enum_class->values[i].
value_nick);
g_debug ("GoaIdentityUtils: Registering dbus error %s", dbus_error_string);
g_dbus_error_register_error (error_domain,
enum_class->values[i].value, dbus_error_string);
g_free (dbus_error_string);
}
out:
g_clear_pointer (&type_class, g_type_class_unref);
g_free (type_name);
}