gio/gdbuserror.c

   1 /* GDBus - GLib D-Bus Library
   2  *
   3  * Copyright (C) 2008-2010 Red Hat, Inc.
   4  *
   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.
   9  *
  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.
  14  *
  15  * You should have received a copy of the GNU Lesser General
  16  * Public License along with this library; if not, see <http://www.gnu.org/licenses/>.
  17  *
  18  * Author: David Zeuthen <davidz@redhat.com>
  19  */
  20
  21 #include "config.h"
  22
  23 #include <stdlib.h>
  24 #include <string.h>
  25
  26 #include "gdbuserror.h"
  27 #include "gioenums.h"
  28 #include "gioenumtypes.h"
  29 #include "gioerror.h"
  30 #include "gdbusprivate.h"
  31
  32 #include "glibintl.h"
  33
  34 /**
  35  * SECTION:gdbuserror
  36  * @title: GDBusError
  37  * @short_description: Mapping D-Bus errors to and from GError
  38  * @include: gio/gio.h
  39  *
  40  * All facilities that return errors from remote methods (such as
  41  * g_dbus_connection_call_sync()) use #GError to represent both D-Bus
  42  * errors (e.g. errors returned from the other peer) and locally
  43  * in-process generated errors.
  44  *
  45  * To check if a returned #GError is an error from a remote peer, use
  46  * g_dbus_error_is_remote_error(). To get the actual D-Bus error name,
  47  * use g_dbus_error_get_remote_error(). Before presenting an error,
  48  * always use g_dbus_error_strip_remote_error().
  49  *
  50  * In addition, facilities used to return errors to a remote peer also
  51  * use #GError. See g_dbus_method_invocation_return_error() for
  52  * discussion about how the D-Bus error name is set.
  53  *
  54  * Applications can associate a #GError error domain with a set of D-Bus errors in order to
  55  * automatically map from D-Bus errors to #GError and back. This
  56  * is typically done in the function returning the #GQuark for the
  57  * error domain:
  58  * <example id="error-registration"><title>Error Registration</title><programlisting>
  59  * /<!-- -->* foo-bar-error.h: *<!-- -->/
  60  *
  61  * #define FOO_BAR_ERROR (foo_bar_error_quark ())
  62  * GQuark foo_bar_error_quark (void);
  63  *
  64  * typedef enum
  65  * {
  66  *   FOO_BAR_ERROR_FAILED,
  67  *   FOO_BAR_ERROR_ANOTHER_ERROR,
  68  *   FOO_BAR_ERROR_SOME_THIRD_ERROR,
  69  *   FOO_BAR_N_ERRORS /<!-- -->*< skip >*<!-- -->/
  70  * } FooBarError;
  71  *
  72  * /<!-- -->* foo-bar-error.c: *<!-- -->/
  73  *
  74  * static const GDBusErrorEntry foo_bar_error_entries[] =
  75  * {
  76  *   {FOO_BAR_ERROR_FAILED,           "org.project.Foo.Bar.Error.Failed"},
  77  *   {FOO_BAR_ERROR_ANOTHER_ERROR,    "org.project.Foo.Bar.Error.AnotherError"},
  78  *   {FOO_BAR_ERROR_SOME_THIRD_ERROR, "org.project.Foo.Bar.Error.SomeThirdError"},
  79  * };
  80  *
  81  * /<!-- -->* Ensure that every error code has an associated D-Bus error name *<!-- -->/
  82  * G_STATIC_ASSERT (G_N_ELEMENTS (foo_bar_error_entries) == FOO_BAR_N_ERRORS);
  83  *
  84  * GQuark
  85  * foo_bar_error_quark (void)
  86  * {
  87  *   static volatile gsize quark_volatile = 0;
  88  *   g_dbus_error_register_error_domain ("foo-bar-error-quark",
  89  *                                       &quark_volatile,
  90  *                                       foo_bar_error_entries,
  91  *                                       G_N_ELEMENTS (foo_bar_error_entries));
  92  *   return (GQuark) quark_volatile;
  93  * }
  94  * </programlisting></example>
  95  * With this setup, a D-Bus peer can transparently pass e.g. %FOO_BAR_ERROR_ANOTHER_ERROR and
  96  * other peers will see the D-Bus error name <literal>org.project.Foo.Bar.Error.AnotherError</literal>.
  97  *
  98  * If the other peer is using GDBus, and has registered the association with
  99  * g_dbus_error_register_error_domain() in advance (e.g. by invoking the %FOO_BAR_ERROR quark
 100  * generation itself in the previous example) the peer will see also %FOO_BAR_ERROR_ANOTHER_ERROR instead
 101  * of %G_IO_ERROR_DBUS_ERROR. Note that GDBus clients can still recover
 102  * <literal>org.project.Foo.Bar.Error.AnotherError</literal> using g_dbus_error_get_remote_error().
 103  *
 104  * Note that errors in the %G_DBUS_ERROR error domain is intended only
 105  * for returning errors from a remote message bus process. Errors
 106  * generated locally in-process by e.g. #GDBusConnection is from the
 107  * %G_IO_ERROR domain.
 108  */
 109
 110 static const GDBusErrorEntry g_dbus_error_entries[] =
 111 {
 112   {G_DBUS_ERROR_FAILED,                           "org.freedesktop.DBus.Error.Failed"},
 113   {G_DBUS_ERROR_NO_MEMORY,                        "org.freedesktop.DBus.Error.NoMemory"},
 114   {G_DBUS_ERROR_SERVICE_UNKNOWN,                  "org.freedesktop.DBus.Error.ServiceUnknown"},
 115   {G_DBUS_ERROR_NAME_HAS_NO_OWNER,                "org.freedesktop.DBus.Error.NameHasNoOwner"},
 116   {G_DBUS_ERROR_NO_REPLY,                         "org.freedesktop.DBus.Error.NoReply"},
 117   {G_DBUS_ERROR_IO_ERROR,                         "org.freedesktop.DBus.Error.IOError"},
 118   {G_DBUS_ERROR_BAD_ADDRESS,                      "org.freedesktop.DBus.Error.BadAddress"},
 119   {G_DBUS_ERROR_NOT_SUPPORTED,                    "org.freedesktop.DBus.Error.NotSupported"},
 120   {G_DBUS_ERROR_LIMITS_EXCEEDED,                  "org.freedesktop.DBus.Error.LimitsExceeded"},
 121   {G_DBUS_ERROR_ACCESS_DENIED,                    "org.freedesktop.DBus.Error.AccessDenied"},
 122   {G_DBUS_ERROR_AUTH_FAILED,                      "org.freedesktop.DBus.Error.AuthFailed"},
 123   {G_DBUS_ERROR_NO_SERVER,                        "org.freedesktop.DBus.Error.NoServer"},
 124   {G_DBUS_ERROR_TIMEOUT,                          "org.freedesktop.DBus.Error.Timeout"},
 125   {G_DBUS_ERROR_NO_NETWORK,                       "org.freedesktop.DBus.Error.NoNetwork"},
 126   {G_DBUS_ERROR_ADDRESS_IN_USE,                   "org.freedesktop.DBus.Error.AddressInUse"},
 127   {G_DBUS_ERROR_DISCONNECTED,                     "org.freedesktop.DBus.Error.Disconnected"},
 128   {G_DBUS_ERROR_INVALID_ARGS,                     "org.freedesktop.DBus.Error.InvalidArgs"},
 129   {G_DBUS_ERROR_FILE_NOT_FOUND,                   "org.freedesktop.DBus.Error.FileNotFound"},
 130   {G_DBUS_ERROR_FILE_EXISTS,                      "org.freedesktop.DBus.Error.FileExists"},
 131   {G_DBUS_ERROR_UNKNOWN_METHOD,                   "org.freedesktop.DBus.Error.UnknownMethod"},
 132   {G_DBUS_ERROR_TIMED_OUT,                        "org.freedesktop.DBus.Error.TimedOut"},
 133   {G_DBUS_ERROR_MATCH_RULE_NOT_FOUND,             "org.freedesktop.DBus.Error.MatchRuleNotFound"},
 134   {G_DBUS_ERROR_MATCH_RULE_INVALID,               "org.freedesktop.DBus.Error.MatchRuleInvalid"},
 135   {G_DBUS_ERROR_SPAWN_EXEC_FAILED,                "org.freedesktop.DBus.Error.Spawn.ExecFailed"},
 136   {G_DBUS_ERROR_SPAWN_FORK_FAILED,                "org.freedesktop.DBus.Error.Spawn.ForkFailed"},
 137   {G_DBUS_ERROR_SPAWN_CHILD_EXITED,               "org.freedesktop.DBus.Error.Spawn.ChildExited"},
 138   {G_DBUS_ERROR_SPAWN_CHILD_SIGNALED,             "org.freedesktop.DBus.Error.Spawn.ChildSignaled"},
 139   {G_DBUS_ERROR_SPAWN_FAILED,                     "org.freedesktop.DBus.Error.Spawn.Failed"},
 140   {G_DBUS_ERROR_SPAWN_SETUP_FAILED,               "org.freedesktop.DBus.Error.Spawn.FailedToSetup"},
 141   {G_DBUS_ERROR_SPAWN_CONFIG_INVALID,             "org.freedesktop.DBus.Error.Spawn.ConfigInvalid"},
 142   {G_DBUS_ERROR_SPAWN_SERVICE_INVALID,            "org.freedesktop.DBus.Error.Spawn.ServiceNotValid"},
 143   {G_DBUS_ERROR_SPAWN_SERVICE_NOT_FOUND,          "org.freedesktop.DBus.Error.Spawn.ServiceNotFound"},
 144   {G_DBUS_ERROR_SPAWN_PERMISSIONS_INVALID,        "org.freedesktop.DBus.Error.Spawn.PermissionsInvalid"},
 145   {G_DBUS_ERROR_SPAWN_FILE_INVALID,               "org.freedesktop.DBus.Error.Spawn.FileInvalid"},
 146   {G_DBUS_ERROR_SPAWN_NO_MEMORY,                  "org.freedesktop.DBus.Error.Spawn.NoMemory"},
 147   {G_DBUS_ERROR_UNIX_PROCESS_ID_UNKNOWN,          "org.freedesktop.DBus.Error.UnixProcessIdUnknown"},
 148   {G_DBUS_ERROR_INVALID_SIGNATURE,                "org.freedesktop.DBus.Error.InvalidSignature"},
 149   {G_DBUS_ERROR_INVALID_FILE_CONTENT,             "org.freedesktop.DBus.Error.InvalidFileContent"},
 150   {G_DBUS_ERROR_SELINUX_SECURITY_CONTEXT_UNKNOWN, "org.freedesktop.DBus.Error.SELinuxSecurityContextUnknown"},
 151   {G_DBUS_ERROR_ADT_AUDIT_DATA_UNKNOWN,           "org.freedesktop.DBus.Error.AdtAuditDataUnknown"},
 152   {G_DBUS_ERROR_OBJECT_PATH_IN_USE,               "org.freedesktop.DBus.Error.ObjectPathInUse"},
 153 };
 154
 155 GQuark
 156 g_dbus_error_quark (void)
 157 {
 158   G_STATIC_ASSERT (G_N_ELEMENTS (g_dbus_error_entries) - 1 == G_DBUS_ERROR_OBJECT_PATH_IN_USE);
 159   static volatile gsize quark_volatile = 0;
 160   g_dbus_error_register_error_domain ("g-dbus-error-quark",
 161                                       &quark_volatile,
 162                                       g_dbus_error_entries,
 163                                       G_N_ELEMENTS (g_dbus_error_entries));
 164   return (GQuark) quark_volatile;
 165 }
 166
 167 /**
 168  * g_dbus_error_register_error_domain:
 169  * @error_domain_quark_name: The error domain name.
 170  * @quark_volatile: A pointer where to store the #GQuark.
 171  * @entries: A pointer to @num_entries #GDBusErrorEntry struct items.
 172  * @num_entries: Number of items to register.
 173  *
 174  * Helper function for associating a #GError error domain with D-Bus error names.
 175  *
 176  * Since: 2.26
 177  */
 178 void
 179 g_dbus_error_register_error_domain (const gchar           *error_domain_quark_name,
 180                                     volatile gsize        *quark_volatile,
 181                                     const GDBusErrorEntry *entries,
 182                                     guint                  num_entries)
 183 {
 184   g_return_if_fail (error_domain_quark_name != NULL);
 185   g_return_if_fail (quark_volatile != NULL);
 186   g_return_if_fail (entries != NULL);
 187   g_return_if_fail (num_entries > 0);
 188
 189   if (g_once_init_enter (quark_volatile))
 190     {
 191       guint n;
 192       GQuark quark;
 193
 194       quark = g_quark_from_static_string (error_domain_quark_name);
 195
 196       for (n = 0; n < num_entries; n++)
 197         {
 198           g_warn_if_fail (g_dbus_error_register_error (quark,
 199                                                        entries[n].error_code,
 200                                                        entries[n].dbus_error_name));
 201         }
 202       g_once_init_leave (quark_volatile, quark);
 203     }
 204 }
 205
 206 static gboolean
 207 _g_dbus_error_decode_gerror (const gchar *dbus_name,
 208                              GQuark      *out_error_domain,
 209                              gint        *out_error_code)
 210 {
 211   gboolean ret;
 212   guint n;
 213   GString *s;
 214   gchar *domain_quark_string;
 215
 216   ret = FALSE;
 217   s = NULL;
 218
 219   if (g_str_has_prefix (dbus_name, "org.gtk.GDBus.UnmappedGError.Quark._"))
 220     {
 221       s = g_string_new (NULL);
 222
 223       for (n = sizeof "org.gtk.GDBus.UnmappedGError.Quark._" - 1;
 224            dbus_name[n] != '.' && dbus_name[n] != '\0';
 225            n++)
 226         {
 227           if (g_ascii_isalnum (dbus_name[n]))
 228             {
 229               g_string_append_c (s, dbus_name[n]);
 230             }
 231           else if (dbus_name[n] == '_')
 232             {
 233               guint nibble_top;
 234               guint nibble_bottom;
 235
 236               n++;
 237
 238               nibble_top = dbus_name[n];
 239               if (nibble_top >= '0' && nibble_top <= '9')
 240                 nibble_top -= '0';
 241               else if (nibble_top >= 'a' && nibble_top <= 'f')
 242                 nibble_top -= ('a' - 10);
 243               else
 244                 goto not_mapped;
 245
 246               n++;
 247
 248               nibble_bottom = dbus_name[n];
 249               if (nibble_bottom >= '0' && nibble_bottom <= '9')
 250                 nibble_bottom -= '0';
 251               else if (nibble_bottom >= 'a' && nibble_bottom <= 'f')
 252                 nibble_bottom -= ('a' - 10);
 253               else
 254                 goto not_mapped;
 255
 256               g_string_append_c (s, (nibble_top<<4) | nibble_bottom);
 257             }
 258           else
 259             {
 260               goto not_mapped;
 261             }
 262         }
 263
 264       if (!g_str_has_prefix (dbus_name + n, ".Code"))
 265         goto not_mapped;
 266
 267       domain_quark_string = g_string_free (s, FALSE);
 268       s = NULL;
 269
 270       if (out_error_domain != NULL)
 271         *out_error_domain = g_quark_from_string (domain_quark_string);
 272       g_free (domain_quark_string);
 273
 274       if (out_error_code != NULL)
 275         *out_error_code = atoi (dbus_name + n + sizeof ".Code" - 1);
 276
 277       ret = TRUE;
 278     }
 279
 280  not_mapped:
 281
 282   if (s != NULL)
 283     g_string_free (s, TRUE);
 284
 285   return ret;
 286 }
 287
 288 /* ---------------------------------------------------------------------------------------------------- */
 289
 290 typedef struct
 291 {
 292   GQuark error_domain;
 293   gint   error_code;
 294 } QuarkCodePair;
 295
 296 static guint
 297 quark_code_pair_hash_func (const QuarkCodePair *pair)
 298 {
 299   gint val;
 300   val = pair->error_domain + pair->error_code;
 301   return g_int_hash (&val);
 302 }
 303
 304 static gboolean
 305 quark_code_pair_equal_func (const QuarkCodePair *a,
 306                             const QuarkCodePair *b)
 307 {
 308   return (a->error_domain == b->error_domain) && (a->error_code == b->error_code);
 309 }
 310
 311 typedef struct
 312 {
 313   QuarkCodePair pair;
 314   gchar *dbus_error_name;
 315 } RegisteredError;
 316
 317 static void
 318 registered_error_free (RegisteredError *re)
 319 {
 320   g_free (re->dbus_error_name);
 321   g_free (re);
 322 }
 323
 324 G_LOCK_DEFINE_STATIC (error_lock);
 325
 326 /* maps from QuarkCodePair* -> RegisteredError* */
 327 static GHashTable *quark_code_pair_to_re = NULL;
 328
 329 /* maps from gchar* -> RegisteredError* */
 330 static GHashTable *dbus_error_name_to_re = NULL;
 331
 332 /**
 333  * g_dbus_error_register_error:
 334  * @error_domain: A #GQuark for a error domain.
 335  * @error_code: An error code.
 336  * @dbus_error_name: A D-Bus error name.
 337  *
 338  * Creates an association to map between @dbus_error_name and
 339  * #GError<!-- -->s specified by @error_domain and @error_code.
 340  *
 341  * This is typically done in the routine that returns the #GQuark for
 342  * an error domain.
 343  *
 344  * Returns: %TRUE if the association was created, %FALSE if it already
 345  * exists.
 346  *
 347  * Since: 2.26
 348  */
 349 gboolean
 350 g_dbus_error_register_error (GQuark       error_domain,
 351                              gint         error_code,
 352                              const gchar *dbus_error_name)
 353 {
 354   gboolean ret;
 355   QuarkCodePair pair;
 356   RegisteredError *re;
 357
 358   g_return_val_if_fail (dbus_error_name != NULL, FALSE);
 359
 360   ret = FALSE;
 361
 362   G_LOCK (error_lock);
 363
 364   if (quark_code_pair_to_re == NULL)
 365     {
 366       g_assert (dbus_error_name_to_re == NULL); /* check invariant */
 367       quark_code_pair_to_re = g_hash_table_new ((GHashFunc) quark_code_pair_hash_func,
 368                                                 (GEqualFunc) quark_code_pair_equal_func);
 369       dbus_error_name_to_re = g_hash_table_new_full (g_str_hash,
 370                                                      g_str_equal,
 371                                                      NULL,
 372                                                      (GDestroyNotify) registered_error_free);
 373     }
 374
 375   if (g_hash_table_lookup (dbus_error_name_to_re, dbus_error_name) != NULL)
 376     goto out;
 377
 378   pair.error_domain = error_domain;
 379   pair.error_code = error_code;
 380
 381   if (g_hash_table_lookup (quark_code_pair_to_re, &pair) != NULL)
 382     goto out;
 383
 384   re = g_new0 (RegisteredError, 1);
 385   re->pair = pair;
 386   re->dbus_error_name = g_strdup (dbus_error_name);
 387
 388   g_hash_table_insert (quark_code_pair_to_re, &(re->pair), re);
 389   g_hash_table_insert (dbus_error_name_to_re, re->dbus_error_name, re);
 390
 391   ret = TRUE;
 392
 393  out:
 394   G_UNLOCK (error_lock);
 395   return ret;
 396 }
 397
 398 /**
 399  * g_dbus_error_unregister_error:
 400  * @error_domain: A #GQuark for a error domain.
 401  * @error_code: An error code.
 402  * @dbus_error_name: A D-Bus error name.
 403  *
 404  * Destroys an association previously set up with g_dbus_error_register_error().
 405  *
 406  * Returns: %TRUE if the association was destroyed, %FALSE if it wasn't found.
 407  *
 408  * Since: 2.26
 409  */
 410 gboolean
 411 g_dbus_error_unregister_error (GQuark       error_domain,
 412                                gint         error_code,
 413                                const gchar *dbus_error_name)
 414 {
 415   gboolean ret;
 416   RegisteredError *re;
 417   guint hash_size;
 418
 419   g_return_val_if_fail (dbus_error_name != NULL, FALSE);
 420
 421   ret = FALSE;
 422
 423   G_LOCK (error_lock);
 424
 425   if (dbus_error_name_to_re == NULL)
 426     {
 427       g_assert (quark_code_pair_to_re == NULL); /* check invariant */
 428       goto out;
 429     }
 430
 431   re = g_hash_table_lookup (dbus_error_name_to_re, dbus_error_name);
 432   if (re == NULL)
 433     {
 434       QuarkCodePair pair;
 435       pair.error_domain = error_domain;
 436       pair.error_code = error_code;
 437       g_warn_if_fail (g_hash_table_lookup (quark_code_pair_to_re, &pair) == NULL); /* check invariant */
 438       goto out;
 439     }
 440
 441   ret = TRUE;
 442
 443   g_warn_if_fail (g_hash_table_lookup (quark_code_pair_to_re, &(re->pair)) == re); /* check invariant */
 444
 445   g_warn_if_fail (g_hash_table_remove (quark_code_pair_to_re, &(re->pair)));
 446   g_warn_if_fail (g_hash_table_remove (dbus_error_name_to_re, re->dbus_error_name));
 447
 448   /* destroy hashes if empty */
 449   hash_size = g_hash_table_size (dbus_error_name_to_re);
 450   if (hash_size == 0)
 451     {
 452       g_warn_if_fail (g_hash_table_size (quark_code_pair_to_re) == 0); /* check invariant */
 453
 454       g_hash_table_unref (dbus_error_name_to_re);
 455       dbus_error_name_to_re = NULL;
 456       g_hash_table_unref (quark_code_pair_to_re);
 457       quark_code_pair_to_re = NULL;
 458     }
 459   else
 460     {
 461       g_warn_if_fail (g_hash_table_size (quark_code_pair_to_re) == hash_size); /* check invariant */
 462     }
 463
 464  out:
 465   G_UNLOCK (error_lock);
 466   return ret;
 467 }
 468
 469 /* ---------------------------------------------------------------------------------------------------- */
 470
 471 /**
 472  * g_dbus_error_is_remote_error:
 473  * @error: A #GError.
 474  *
 475  * Checks if @error represents an error received via D-Bus from a remote peer. If so,
 476  * use g_dbus_error_get_remote_error() to get the name of the error.
 477  *
 478  * Returns: %TRUE if @error represents an error from a remote peer,
 479  * %FALSE otherwise.
 480  *
 481  * Since: 2.26
 482  */
 483 gboolean
 484 g_dbus_error_is_remote_error (const GError *error)
 485 {
 486   g_return_val_if_fail (error != NULL, FALSE);
 487   return g_str_has_prefix (error->message, "GDBus.Error:");
 488 }
 489
 490
 491 /**
 492  * g_dbus_error_get_remote_error:
 493  * @error: A #GError.
 494  *
 495  * Gets the D-Bus error name used for @error, if any.
 496  *
 497  * This function is guaranteed to return a D-Bus error name for all
 498  * #GError<!-- -->s returned from functions handling remote method
 499  * calls (e.g. g_dbus_connection_call_finish()) unless
 500  * g_dbus_error_strip_remote_error() has been used on @error.
 501  *
 502  * Returns: An allocated string or %NULL if the D-Bus error name could not be found. Free with g_free().
 503  *
 504  * Since: 2.26
 505  */
 506 gchar *
 507 g_dbus_error_get_remote_error (const GError *error)
 508 {
 509   RegisteredError *re;
 510   gchar *ret;
 511
 512   g_return_val_if_fail (error != NULL, NULL);
 513
 514   /* Ensure that e.g. G_DBUS_ERROR is registered using g_dbus_error_register_error() */
 515   _g_dbus_initialize ();
 516
 517   ret = NULL;
 518
 519   G_LOCK (error_lock);
 520
 521   re = NULL;
 522   if (quark_code_pair_to_re != NULL)
 523     {
 524       QuarkCodePair pair;
 525       pair.error_domain = error->domain;
 526       pair.error_code = error->code;
 527       g_assert (dbus_error_name_to_re != NULL); /* check invariant */
 528       re = g_hash_table_lookup (quark_code_pair_to_re, &pair);
 529     }
 530
 531   if (re != NULL)
 532     {
 533       ret = g_strdup (re->dbus_error_name);
 534     }
 535   else
 536     {
 537       if (g_str_has_prefix (error->message, "GDBus.Error:"))
 538         {
 539           const gchar *begin;
 540           const gchar *end;
 541           begin = error->message + sizeof ("GDBus.Error:") -1;
 542           end = strstr (begin, ":");
 543           if (end != NULL && end[1] == ' ')
 544             {
 545               ret = g_strndup (begin, end - begin);
 546             }
 547         }
 548     }
 549
 550   G_UNLOCK (error_lock);
 551
 552   return ret;
 553 }
 554
 555 /* ---------------------------------------------------------------------------------------------------- */
 556
 557 /**
 558  * g_dbus_error_new_for_dbus_error:
 559  * @dbus_error_name: D-Bus error name.
 560  * @dbus_error_message: D-Bus error message.
 561  *
 562  * Creates a #GError based on the contents of @dbus_error_name and
 563  * @dbus_error_message.
 564  *
 565  * Errors registered with g_dbus_error_register_error() will be looked
 566  * up using @dbus_error_name and if a match is found, the error domain
 567  * and code is used. Applications can use g_dbus_error_get_remote_error()
 568  * to recover @dbus_error_name.
 569  *
 570  * If a match against a registered error is not found and the D-Bus
 571  * error name is in a form as returned by g_dbus_error_encode_gerror()
 572  * the error domain and code encoded in the name is used to
 573  * create the #GError. Also, @dbus_error_name is added to the error message
 574  * such that it can be recovered with g_dbus_error_get_remote_error().
 575  *
 576  * Otherwise, a #GError with the error code %G_IO_ERROR_DBUS_ERROR
 577  * in the #G_IO_ERROR error domain is returned. Also, @dbus_error_name is
 578  * added to the error message such that it can be recovered with
 579  * g_dbus_error_get_remote_error().
 580  *
 581  * In all three cases, @dbus_error_name can always be recovered from the
 582  * returned #GError using the g_dbus_error_get_remote_error() function
 583  * (unless g_dbus_error_strip_remote_error() hasn't been used on the returned error).
 584  *
 585  * This function is typically only used in object mappings to prepare
 586  * #GError instances for applications. Regular applications should not use
 587  * it.
 588  *
 589  * Returns: An allocated #GError. Free with g_error_free().
 590  *
 591  * Since: 2.26
 592  */
 593 GError *
 594 g_dbus_error_new_for_dbus_error (const gchar *dbus_error_name,
 595                                  const gchar *dbus_error_message)
 596 {
 597   GError *error;
 598   RegisteredError *re;
 599
 600   g_return_val_if_fail (dbus_error_name != NULL, NULL);
 601   g_return_val_if_fail (dbus_error_message != NULL, NULL);
 602
 603   /* Ensure that e.g. G_DBUS_ERROR is registered using g_dbus_error_register_error() */
 604   _g_dbus_initialize ();
 605
 606   G_LOCK (error_lock);
 607
 608   re = NULL;
 609   if (dbus_error_name_to_re != NULL)
 610     {
 611       g_assert (quark_code_pair_to_re != NULL); /* check invariant */
 612       re = g_hash_table_lookup (dbus_error_name_to_re, dbus_error_name);
 613     }
 614
 615   if (re != NULL)
 616     {
 617       error = g_error_new (re->pair.error_domain,
 618                            re->pair.error_code,
 619                            "GDBus.Error:%s: %s",
 620                            dbus_error_name,
 621                            dbus_error_message);
 622     }
 623   else
 624     {
 625       GQuark error_domain = 0;
 626       gint error_code = 0;
 627
 628       if (_g_dbus_error_decode_gerror (dbus_error_name,
 629                                        &error_domain,
 630                                        &error_code))
 631         {
 632           error = g_error_new (error_domain,
 633                                error_code,
 634                                "GDBus.Error:%s: %s",
 635                                dbus_error_name,
 636                                dbus_error_message);
 637         }
 638       else
 639         {
 640           error = g_error_new (G_IO_ERROR,
 641                                G_IO_ERROR_DBUS_ERROR,
 642                                "GDBus.Error:%s: %s",
 643                                dbus_error_name,
 644                                dbus_error_message);
 645         }
 646     }
 647
 648   G_UNLOCK (error_lock);
 649   return error;
 650 }
 651
 652 /**
 653  * g_dbus_error_set_dbus_error:
 654  * @error: A pointer to a #GError or %NULL.
 655  * @dbus_error_name: D-Bus error name.
 656  * @dbus_error_message: D-Bus error message.
 657  * @format: (allow-none): printf()-style format to prepend to @dbus_error_message or %NULL.
 658  * @...: Arguments for @format.
 659  *
 660  * Does nothing if @error is %NULL. Otherwise sets *@error to
 661  * a new #GError created with g_dbus_error_new_for_dbus_error()
 662  * with @dbus_error_message prepend with @format (unless %NULL).
 663  *
 664  * Since: 2.26
 665  */
 666 void
 667 g_dbus_error_set_dbus_error (GError      **error,
 668                              const gchar  *dbus_error_name,
 669                              const gchar  *dbus_error_message,
 670                              const gchar  *format,
 671                              ...)
 672 {
 673   g_return_if_fail (error == NULL || *error == NULL);
 674   g_return_if_fail (dbus_error_name != NULL);
 675   g_return_if_fail (dbus_error_message != NULL);
 676
 677   if (error == NULL)
 678     return;
 679
 680   if (format == NULL)
 681     {
 682       *error = g_dbus_error_new_for_dbus_error (dbus_error_name, dbus_error_message);
 683     }
 684   else
 685     {
 686       va_list var_args;
 687       va_start (var_args, format);
 688       g_dbus_error_set_dbus_error_valist (error,
 689                                           dbus_error_name,
 690                                           dbus_error_message,
 691                                           format,
 692                                           var_args);
 693       va_end (var_args);
 694     }
 695 }
 696
 697 /**
 698  * g_dbus_error_set_dbus_error_valist:
 699  * @error: A pointer to a #GError or %NULL.
 700  * @dbus_error_name: D-Bus error name.
 701  * @dbus_error_message: D-Bus error message.
 702  * @format: (allow-none): printf()-style format to prepend to @dbus_error_message or %NULL.
 703  * @var_args: Arguments for @format.
 704  *
 705  * Like g_dbus_error_set_dbus_error() but intended for language bindings.
 706  *
 707  * Since: 2.26
 708  */
 709 void
 710 g_dbus_error_set_dbus_error_valist (GError      **error,
 711                                     const gchar  *dbus_error_name,
 712                                     const gchar  *dbus_error_message,
 713                                     const gchar  *format,
 714                                     va_list       var_args)
 715 {
 716   g_return_if_fail (error == NULL || *error == NULL);
 717   g_return_if_fail (dbus_error_name != NULL);
 718   g_return_if_fail (dbus_error_message != NULL);
 719
 720   if (error == NULL)
 721     return;
 722
 723   if (format != NULL)
 724     {
 725       gchar *message;
 726       gchar *s;
 727       message = g_strdup_vprintf (format, var_args);
 728       s = g_strdup_printf ("%s: %s", message, dbus_error_message);
 729       *error = g_dbus_error_new_for_dbus_error (dbus_error_name, s);
 730       g_free (s);
 731       g_free (message);
 732     }
 733   else
 734     {
 735       *error = g_dbus_error_new_for_dbus_error (dbus_error_name, dbus_error_message);
 736     }
 737 }
 738
 739 /**
 740  * g_dbus_error_strip_remote_error:
 741  * @error: A #GError.
 742  *
 743  * Looks for extra information in the error message used to recover
 744  * the D-Bus error name and strips it if found. If stripped, the
 745  * message field in @error will correspond exactly to what was
 746  * received on the wire.
 747  *
 748  * This is typically used when presenting errors to the end user.
 749  *
 750  * Returns: %TRUE if information was stripped, %FALSE otherwise.
 751  *
 752  * Since: 2.26
 753  */
 754 gboolean
 755 g_dbus_error_strip_remote_error (GError *error)
 756 {
 757   gboolean ret;
 758
 759   g_return_val_if_fail (error != NULL, FALSE);
 760
 761   ret = FALSE;
 762
 763   if (g_str_has_prefix (error->message, "GDBus.Error:"))
 764     {
 765       const gchar *begin;
 766       const gchar *end;
 767       gchar *new_message;
 768
 769       begin = error->message + sizeof ("GDBus.Error:") -1;
 770       end = strstr (begin, ":");
 771       if (end != NULL && end[1] == ' ')
 772         {
 773           new_message = g_strdup (end + 2);
 774           g_free (error->message);
 775           error->message = new_message;
 776           ret = TRUE;
 777         }
 778     }
 779
 780   return ret;
 781 }
 782
 783 /**
 784  * g_dbus_error_encode_gerror:
 785  * @error: A #GError.
 786  *
 787  * Creates a D-Bus error name to use for @error. If @error matches
 788  * a registered error (cf. g_dbus_error_register_error()), the corresponding
 789  * D-Bus error name will be returned.
 790  *
 791  * Otherwise the a name of the form
 792  * <literal>org.gtk.GDBus.UnmappedGError.Quark._ESCAPED_QUARK_NAME.Code_ERROR_CODE</literal>
 793  * will be used. This allows other GDBus applications to map the error
 794  * on the wire back to a #GError using g_dbus_error_new_for_dbus_error().
 795  *
 796  * This function is typically only used in object mappings to put a
 797  * #GError on the wire. Regular applications should not use it.
 798  *
 799  * Returns: A D-Bus error name (never %NULL). Free with g_free().
 800  *
 801  * Since: 2.26
 802  */
 803 gchar *
 804 g_dbus_error_encode_gerror (const GError *error)
 805 {
 806   RegisteredError *re;
 807   gchar *error_name;
 808
 809   g_return_val_if_fail (error != NULL, NULL);
 810
 811   /* Ensure that e.g. G_DBUS_ERROR is registered using g_dbus_error_register_error() */
 812   _g_dbus_initialize ();
 813
 814   error_name = NULL;
 815
 816   G_LOCK (error_lock);
 817   re = NULL;
 818   if (quark_code_pair_to_re != NULL)
 819     {
 820       QuarkCodePair pair;
 821       pair.error_domain = error->domain;
 822       pair.error_code = error->code;
 823       g_assert (dbus_error_name_to_re != NULL); /* check invariant */
 824       re = g_hash_table_lookup (quark_code_pair_to_re, &pair);
 825     }
 826   if (re != NULL)
 827     {
 828       error_name = g_strdup (re->dbus_error_name);
 829       G_UNLOCK (error_lock);
 830     }
 831   else
 832     {
 833       const gchar *domain_as_string;
 834       GString *s;
 835       guint n;
 836
 837       G_UNLOCK (error_lock);
 838
 839       /* We can't make a lot of assumptions about what domain_as_string
 840        * looks like and D-Bus is extremely picky about error names so
 841        * hex-encode it for transport across the wire.
 842        */
 843       domain_as_string = g_quark_to_string (error->domain);
 844
 845       /* 0 is not a domain; neither are non-quark integers */
 846       g_return_val_if_fail (domain_as_string != NULL, NULL);
 847
 848       s = g_string_new ("org.gtk.GDBus.UnmappedGError.Quark._");
 849       for (n = 0; domain_as_string[n] != 0; n++)
 850         {
 851           gint c = domain_as_string[n];
 852           if (g_ascii_isalnum (c))
 853             {
 854               g_string_append_c (s, c);
 855             }
 856           else
 857             {
 858               guint nibble_top;
 859               guint nibble_bottom;
 860               g_string_append_c (s, '_');
 861               nibble_top = ((int) domain_as_string[n]) >> 4;
 862               nibble_bottom = ((int) domain_as_string[n]) & 0x0f;
 863               if (nibble_top < 10)
 864                 nibble_top += '0';
 865               else
 866                 nibble_top += 'a' - 10;
 867               if (nibble_bottom < 10)
 868                 nibble_bottom += '0';
 869               else
 870                 nibble_bottom += 'a' - 10;
 871               g_string_append_c (s, nibble_top);
 872               g_string_append_c (s, nibble_bottom);
 873             }
 874         }
 875       g_string_append_printf (s, ".Code%d", error->code);
 876       error_name = g_string_free (s, FALSE);
 877     }
 878
 879   return error_name;
 880 }