registryd/registry.c

   1 /*
   2  * AT-SPI - Assistive Technology Service Provider Interface
   3  * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
   4  *
   5  * Copyright 2008, 2010 Codethink Ltd.
   6  * Copyright 2001, 2002 Sun Microsystems Inc.,
   7  * Copyright 2001, 2002 Ximian, Inc.
   8  *
   9  * This library is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU Library General Public
  11  * License as published by the Free Software Foundation; either
  12  * version 2 of the License, or (at your option) any later version.
  13  *
  14  * This library is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  * Library General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Library General Public
  20  * License along with this library; if not, write to the
  21  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  22  * Boston, MA 02111-1307, USA.
  23  */
  24
  25 #include <config.h>
  26 #include <string.h>
  27 #include <dbus/dbus-glib-lowlevel.h>
  28
  29 #include "paths.h"
  30 #include "registry.h"
  31 #include "introspection.h"
  32
  33 static gboolean
  34 children_added_listener (DBusConnection * bus,
  35                          gint             index,
  36                          const gchar    * name,
  37                          const gchar    * path);
  38
  39 static gboolean
  40 children_removed_listener (DBusConnection * bus,
  41                            gint             index,
  42                            const gchar    * name,
  43                            const gchar    * path);
  44
  45 /*---------------------------------------------------------------------------*/
  46
  47 typedef struct _SpiReference
  48 {
  49   gchar *name;
  50   gchar *path;
  51 } SpiReference;
  52
  53 static SpiReference *
  54 spi_reference_new (const gchar *name, const gchar *path)
  55 {
  56   SpiReference *ref;
  57
  58   ref = g_new0 (SpiReference, 1);
  59   ref->name = g_strdup (name);
  60   ref->path = g_strdup (path);
  61
  62   return ref;
  63 }
  64
  65 static void
  66 spi_reference_free (SpiReference *ref)
  67 {
  68   g_free (ref->name);
  69   g_free (ref->path);
  70   g_free (ref);
  71 }
  72
  73 /*---------------------------------------------------------------------------*/
  74
  75 G_DEFINE_TYPE(SpiRegistry, spi_registry, G_TYPE_OBJECT)
  76
  77 static void
  78 spi_registry_class_init (SpiRegistryClass *klass)
  79 {
  80   GObjectClass * object_class = (GObjectClass *) klass;
  81
  82   spi_registry_parent_class = g_type_class_ref (G_TYPE_OBJECT);
  83 }
  84
  85 static void
  86 spi_registry_init (SpiRegistry *registry)
  87 {
  88   registry->apps = g_ptr_array_new_with_free_func ((GDestroyNotify) spi_reference_free);
  89 }
  90
  91 /*---------------------------------------------------------------------------*/
  92
  93 static dbus_bool_t
  94 return_v_string (DBusMessageIter * iter, const gchar * str)
  95 {
  96   DBusMessageIter variant;
  97
  98   dbus_message_iter_open_container (iter, DBUS_TYPE_VARIANT, "s",
  99                                     &variant);
 100     dbus_message_iter_append_basic (&variant, DBUS_TYPE_STRING, &str);
 101   dbus_message_iter_close_container (iter, &variant);
 102 }
 103
 104 static void
 105 append_reference (DBusMessageIter * iter, const char * name, const char * path)
 106 {
 107   DBusMessageIter iter_struct;
 108
 109   dbus_message_iter_open_container (iter, DBUS_TYPE_STRUCT, NULL,
 110                                     &iter_struct);
 111   dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_STRING, &name);
 112   dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_OBJECT_PATH, &path);
 113   dbus_message_iter_close_container (iter, &iter_struct);
 114 }
 115
 116 /*---------------------------------------------------------------------------*/
 117
 118 static gboolean
 119 compare_reference (SpiReference *one, SpiReference *two)
 120 {
 121   if (g_strcmp0 (one->name, two->name) == 0 &&
 122       g_strcmp0 (one->path, two->path) == 0)
 123     return TRUE;
 124   else
 125     return FALSE;
 126 }
 127
 128 static gboolean
 129 find_index_of_reference (GPtrArray *arr, const gchar *name, const gchar * path, guint *index)
 130 {
 131   SpiReference *ref;
 132   gboolean found = FALSE;
 133   guint i = 0;
 134
 135   ref = spi_reference_new (name, path);
 136
 137   for (i = 0; i < arr->len && found == FALSE; i++)
 138     {
 139       if (compare_reference (ref, g_ptr_array_index (arr, i)));
 140         {
 141           found = TRUE;
 142         }
 143     }
 144
 145   spi_reference_free (ref);
 146
 147   *index = i;
 148   return found;
 149 }
 150
 151 static void
 152 add_application (SpiRegistry *reg, DBusConnection *bus, const gchar *name, const gchar *path)
 153 {
 154   g_ptr_array_add (reg->apps, spi_reference_new (name, path));
 155   children_added_listener (bus, reg->apps->len - 1, name, path);
 156 }
 157
 158 static void
 159 remove_application (SpiRegistry *reg, DBusConnection *bus, guint index)
 160 {
 161   const gchar *name = "";
 162   g_ptr_array_remove_index (reg->apps, index);
 163   /*TODO spi_remove_device_listeners (registry->de_controller, old);*/
 164   children_removed_listener (bus, index, name, SPI_DBUS_PATH_NULL);
 165 }
 166
 167 static void
 168 handle_disconnection (DBusConnection *bus, DBusMessage *message, void *user_data)
 169 {
 170   char *name, *old, *new;
 171   SpiRegistry *reg = SPI_REGISTRY (user_data);
 172
 173   if (dbus_message_get_args (message, NULL,
 174                              DBUS_TYPE_STRING, &name,
 175                              DBUS_TYPE_STRING, &old,
 176                              DBUS_TYPE_STRING, &new,
 177                              DBUS_TYPE_INVALID))
 178     {
 179       if (*old != '\0' && *new == '\0')
 180         {
 181           /* Remove all children with the application name the same as the disconnected application. */
 182           guint i;
 183           for (i = 0; i < reg->apps->len; i++)
 184             {
 185               SpiReference *ref  = g_ptr_array_index (reg->apps, i);
 186               while (!g_strcmp0 (old, ref->name))
 187                 {
 188                   g_ptr_array_remove_index (reg->apps, i);
 189                   children_removed_listener (bus, i, old, SPI_DBUS_PATH_NULL);
 190                 }
 191             }
 192         }
 193     }
 194 }
 195
 196 static DBusHandlerResult
 197 signal_filter (DBusConnection *bus, DBusMessage *message, void *user_data)
 198 {
 199   SpiRegistry *registry = SPI_REGISTRY (user_data);
 200   guint res = DBUS_HANDLER_RESULT_HANDLED;
 201   const char *iface = dbus_message_get_interface (message);
 202   const char *member = dbus_message_get_member (message);
 203
 204   if (!g_strcmp0(iface, DBUS_INTERFACE_DBUS) && !g_strcmp0(member, "NameOwnerChanged"))
 205       handle_disconnection (bus, message, user_data);
 206   else
 207       res = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 208
 209   return res;
 210 }
 211
 212 /* org.at_spi.Socket interface */
 213 /*---------------------------------------------------------------------------*/
 214
 215 static DBusMessage*
 216 impl_Embed (DBusConnection *bus, DBusMessage *message, void *user_data)
 217 {
 218   SpiRegistry *reg = SPI_REGISTRY (user_data);
 219   DBusMessageIter iter, iter_struct;
 220   gchar *app_name, *obj_path;
 221
 222   DBusMessage *reply = NULL;
 223   DBusMessageIter reply_iter;
 224
 225   dbus_message_iter_init (message, &iter);
 226   dbus_message_iter_recurse (&iter, &iter_struct);
 227   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_STRING))
 228         goto error;
 229   dbus_message_iter_get_basic (&iter_struct, &app_name);
 230   if (!dbus_message_iter_next (&iter_struct))
 231         goto error;
 232   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_OBJECT_PATH))
 233         goto error;
 234   dbus_message_iter_get_basic (&iter_struct, &obj_path);
 235
 236   add_application(reg, bus, app_name, obj_path);
 237
 238   reply = dbus_message_new_method_return (message);
 239   dbus_message_iter_init_append (reply, &reply_iter);
 240   append_reference (&reply_iter,
 241                     dbus_bus_get_unique_name (bus),
 242                     SPI_DBUS_PATH_ROOT);
 243
 244   return reply;
 245 error:
 246   return dbus_message_new_error (message, DBUS_ERROR_FAILED, "Invalid arguments");
 247 }
 248
 249 static DBusMessage*
 250 impl_Unembed (DBusConnection *bus, DBusMessage *message, void *user_data)
 251 {
 252   SpiRegistry *reg = SPI_REGISTRY (user_data);
 253   DBusMessageIter iter, iter_struct;
 254   gchar *app_name, *obj_path;
 255   guint index;
 256
 257   dbus_message_iter_init (message, &iter);
 258   dbus_message_iter_recurse (&iter, &iter_struct);
 259   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_STRING))
 260         goto error;
 261   dbus_message_iter_get_basic (&iter_struct, &app_name);
 262   if (!dbus_message_iter_next (&iter_struct))
 263         goto error;
 264   if (!(dbus_message_iter_get_arg_type (&iter_struct) == DBUS_TYPE_OBJECT_PATH))
 265         goto error;
 266   dbus_message_iter_get_basic (&iter_struct, &obj_path);
 267
 268   if (find_index_of_reference (reg->apps, app_name, obj_path, &index))
 269       remove_application(reg, bus, index);
 270
 271   return NULL;
 272 error:
 273   return dbus_message_new_error (message, DBUS_ERROR_FAILED, "Invalid arguments");
 274 }
 275
 276 /* org.at_spi.Component interface */
 277 /*---------------------------------------------------------------------------*/
 278
 279 static DBusMessage *
 280 impl_Contains (DBusConnection * bus, DBusMessage * message, void *user_data)
 281 {
 282   dbus_bool_t retval = FALSE;
 283   DBusMessage *reply;
 284
 285   reply = dbus_message_new_method_return (message);
 286   dbus_message_append_args (reply, DBUS_TYPE_BOOLEAN, &retval,
 287                             DBUS_TYPE_INVALID);
 288   return reply;
 289 }
 290
 291 static DBusMessage *
 292 impl_GetAccessibleAtPoint (DBusConnection * bus, DBusMessage * message,
 293                            void *user_data)
 294 {
 295   DBusMessage *reply = NULL;
 296   DBusMessageIter iter;
 297
 298   reply = dbus_message_new_method_return (message);
 299   dbus_message_iter_init_append (reply, &iter);
 300   append_reference (&iter,
 301                     dbus_bus_get_unique_name (bus),
 302                     SPI_DBUS_PATH_NULL);
 303
 304   return reply;
 305 }
 306
 307 static DBusMessage *
 308 impl_GetExtents (DBusConnection * bus, DBusMessage * message, void *user_data)
 309 {
 310   dbus_uint32_t coord_type;
 311   dbus_int32_t x = 0, y = 0, width = 1024, height = 768;
 312   DBusMessage *reply;
 313   DBusMessageIter iter, iter_struct;
 314
 315   reply = dbus_message_new_method_return (message);
 316   dbus_message_iter_init_append (reply, &iter);
 317   dbus_message_iter_open_container (&iter, DBUS_TYPE_STRUCT, NULL,
 318                                     &iter_struct);
 319     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &x);
 320     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &y);
 321     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &width);
 322     dbus_message_iter_append_basic (&iter_struct, DBUS_TYPE_INT32, &height);
 323   dbus_message_iter_close_container (&iter, &iter_struct);
 324   return reply;
 325 }
 326
 327 static DBusMessage *
 328 impl_GetPosition (DBusConnection * bus, DBusMessage * message,
 329                   void *user_data)
 330 {
 331   DBusMessage *reply;
 332   dbus_int32_t x = 0, y = 0;
 333
 334   reply = dbus_message_new_method_return (message);
 335   dbus_message_append_args (reply, DBUS_TYPE_INT32, &x, DBUS_TYPE_INT32,
 336                             &y, DBUS_TYPE_INVALID);
 337   return reply;
 338 }
 339
 340 static DBusMessage *
 341 impl_GetSize (DBusConnection * bus, DBusMessage * message, void *user_data)
 342 {
 343   /* TODO - Get the screen size */
 344   DBusMessage *reply;
 345   dbus_int32_t width = 1024, height = 768;
 346
 347   reply = dbus_message_new_method_return (message);
 348   dbus_message_append_args (reply, DBUS_TYPE_INT32, &width,
 349                             DBUS_TYPE_INT32, &height, DBUS_TYPE_INVALID);
 350   return reply;
 351 }
 352
 353 #define LAYER_WIDGET 3;
 354
 355 static DBusMessage *
 356 impl_GetLayer (DBusConnection * bus, DBusMessage * message, void *user_data)
 357 {
 358   DBusMessage *reply;
 359   dbus_uint32_t rv = LAYER_WIDGET;
 360
 361   reply = dbus_message_new_method_return (message);
 362   dbus_message_append_args (reply, DBUS_TYPE_UINT32, &rv,
 363                             DBUS_TYPE_INVALID);
 364   return reply;
 365 }
 366
 367 static DBusMessage *
 368 impl_GetMDIZOrder (DBusConnection * bus, DBusMessage * message,
 369                    void *user_data)
 370 {
 371   DBusMessage *reply;
 372   dbus_int16_t rv = 0;
 373
 374   reply = dbus_message_new_method_return (message);
 375   dbus_message_append_args (reply, DBUS_TYPE_INT16, &rv,
 376                             DBUS_TYPE_INVALID);
 377   return reply;
 378 }
 379
 380 static DBusMessage *
 381 impl_GrabFocus (DBusConnection * bus, DBusMessage * message, void *user_data)
 382 {
 383   DBusMessage *reply;
 384   dbus_bool_t retval = FALSE;
 385
 386   reply = dbus_message_new_method_return (message);
 387   dbus_message_append_args (reply, DBUS_TYPE_BOOLEAN, &retval,
 388                             DBUS_TYPE_INVALID);
 389   return reply;
 390 }
 391
 392 static DBusMessage *
 393 impl_GetAlpha (DBusConnection * bus, DBusMessage * message, void *user_data)
 394 {
 395   double rv = 1.0;
 396   DBusMessage *reply;
 397
 398   reply = dbus_message_new_method_return (message);
 399   dbus_message_append_args (reply, DBUS_TYPE_DOUBLE, &rv,
 400                             DBUS_TYPE_INVALID);
 401   return reply;
 402 }
 403
 404 /* org.at_spi.Accessible interface */
 405 /*---------------------------------------------------------------------------*/
 406
 407 static dbus_bool_t
 408 impl_get_Name (DBusMessageIter * iter, void *user_data)
 409 {
 410   const gchar *name = "main";
 411   return return_v_string (iter, name);
 412 }
 413
 414 static dbus_bool_t
 415 impl_get_Description (DBusMessageIter * iter, void *user_data)
 416 {
 417   const gchar *description = "";
 418   return return_v_string (iter, description);
 419 }
 420
 421 static dbus_bool_t
 422 impl_get_Parent (DBusMessageIter * iter, void *user_data)
 423 {
 424   const gchar *name = "";
 425   DBusMessageIter iter_variant;
 426
 427   dbus_message_iter_open_container (iter, DBUS_TYPE_VARIANT, "(so)",
 428                                     &iter_variant);
 429   append_reference (&iter_variant,
 430                     name,
 431                     SPI_DBUS_PATH_NULL);
 432   dbus_message_iter_close_container (iter, &iter_variant);
 433   return TRUE;
 434 }
 435
 436 static dbus_bool_t
 437 impl_get_ChildCount (DBusMessageIter * iter, void *user_data)
 438 {
 439   SpiRegistry *reg = SPI_REGISTRY (user_data);
 440   dbus_int32_t rv = reg->apps->len;
 441
 442   dbus_message_iter_append_basic (iter, DBUS_TYPE_INT32, &rv);
 443 }
 444
 445 static DBusMessage *
 446 impl_GetChildAtIndex (DBusConnection * bus,
 447                       DBusMessage * message, void *user_data)
 448 {
 449   SpiRegistry *reg = SPI_REGISTRY (user_data);
 450   DBusMessage *reply;
 451   DBusMessageIter iter;
 452   DBusError error;
 453   SpiReference *ref;
 454   dbus_int32_t i;
 455
 456   dbus_error_init (&error);
 457   if (!dbus_message_get_args
 458        (message, &error, DBUS_TYPE_INT32, &i, DBUS_TYPE_INVALID))
 459     {
 460       return dbus_message_new_error (message, DBUS_ERROR_FAILED, "Invalid arguments");
 461     }
 462
 463   reply = dbus_message_new_method_return (message);
 464   dbus_message_iter_init_append (reply, &iter);
 465
 466   ref = g_ptr_array_index (reg->apps, i);
 467   append_reference (&iter, ref->name, ref->path);
 468
 469   return reply;
 470 }
 471
 472 static DBusMessage *
 473 impl_GetChildren (DBusConnection * bus,
 474                   DBusMessage * message, void *user_data)
 475 {
 476   DBusMessage *reply = NULL;
 477   DBusMessageIter iter, iter_array;
 478   SpiRegistry *reg = SPI_REGISTRY (user_data);
 479   int i;
 480
 481   reply = dbus_message_new_method_return (message);
 482
 483   dbus_message_iter_init_append (reply, &iter);
 484   dbus_message_iter_open_container(&iter, DBUS_TYPE_ARRAY, "(so)", &iter_array);
 485   for (i=0; i < reg->apps->len; i++)
 486     {
 487       SpiReference *current = g_ptr_array_index (reg->apps, i);
 488       append_reference (&iter_array, current->name, current->path);
 489     }
 490   dbus_message_iter_close_container(&iter, &iter_array);
 491   return reply;
 492 }
 493
 494 static DBusMessage *
 495 impl_GetIndexInParent (DBusConnection * bus,
 496                        DBusMessage * message, void *user_data)
 497 {
 498   DBusMessage *reply;
 499   dbus_uint32_t rv = 0;
 500
 501   reply = dbus_message_new_method_return (message);
 502   dbus_message_append_args (reply, DBUS_TYPE_UINT32, &rv, DBUS_TYPE_INVALID);
 503   return reply;
 504 }
 505
 506 static DBusMessage *
 507 impl_GetRelationSet (DBusConnection * bus,
 508                      DBusMessage * message, void *user_data)
 509 {
 510   DBusMessage *reply;
 511   DBusMessageIter iter, iter_array;
 512
 513   reply = dbus_message_new_method_return (message);
 514   dbus_message_iter_init_append (reply, &iter);
 515   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "(ua(so))", &iter_array);
 516   dbus_message_iter_close_container (&iter, &iter_array);
 517
 518   return reply;
 519 }
 520
 521 static DBusMessage *
 522 impl_GetRole (DBusConnection * bus, DBusMessage * message, void * user_data)
 523 {
 524   DBusMessage *reply;
 525   dbus_uint32_t rv = 0;
 526
 527   reply = dbus_message_new_method_return (message);
 528   dbus_message_append_args (reply, DBUS_TYPE_UINT32, &rv, DBUS_TYPE_INVALID);
 529   return reply;
 530 }
 531
 532 static DBusMessage *
 533 impl_GetRoleName (DBusConnection * bus,
 534                   DBusMessage * message, void *user_data)
 535 {
 536   DBusMessage *reply;
 537   const char *role_name = "unknown";
 538
 539   reply = dbus_message_new_method_return (message);
 540   dbus_message_append_args (reply, DBUS_TYPE_STRING, &role_name,
 541                             DBUS_TYPE_INVALID);
 542   return reply;
 543 }
 544
 545 static DBusMessage *
 546 impl_GetLocalizedRoleName (DBusConnection * bus,
 547                            DBusMessage * message, void *user_data)
 548 {
 549   /* TODO - Localize this */
 550   DBusMessage *reply;
 551   const char *role_name = "unknown";
 552
 553   reply = dbus_message_new_method_return (message);
 554   dbus_message_append_args (reply, DBUS_TYPE_STRING, &role_name,
 555                             DBUS_TYPE_INVALID);
 556   return reply;
 557 }
 558
 559 static DBusMessage *
 560 impl_GetState (DBusConnection * bus, DBusMessage * message, void *user_data)
 561 {
 562   DBusMessage *reply = NULL;
 563   DBusMessageIter iter, iter_array;
 564
 565   dbus_uint32_t states[2] = {0, 0};
 566   guint count;
 567
 568   reply = dbus_message_new_method_return (message);
 569   dbus_message_iter_init_append (reply, &iter);
 570
 571   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "u", &iter_array);
 572   for (count = 0; count < 2; count++)
 573     {
 574       dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_UINT32,
 575                                       &states[count]);
 576     }
 577   dbus_message_iter_close_container (&iter, &iter_array);
 578   return reply;
 579 }
 580
 581 static DBusMessage *
 582 impl_GetAttributes (DBusConnection * bus,
 583                     DBusMessage * message, void *user_data)
 584 {
 585   DBusMessage *reply = NULL;
 586   DBusMessageIter iter, array;
 587
 588   reply = dbus_message_new_method_return (message);
 589   dbus_message_iter_init_append (reply, &iter);
 590   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "{ss}", &array);
 591   dbus_message_iter_close_container (&iter, &array);
 592
 593   return reply;
 594 }
 595
 596 static DBusMessage *
 597 impl_GetApplication (DBusConnection * bus,
 598                      DBusMessage * message, void *user_data)
 599 {
 600   DBusMessage *reply = NULL;
 601   DBusMessageIter iter;
 602
 603   reply = dbus_message_new_method_return (message);
 604   dbus_message_iter_init_append (reply, &iter);
 605   append_reference (&iter,
 606                     dbus_bus_get_unique_name (bus),
 607                     SPI_DBUS_PATH_NULL);
 608
 609   return reply;
 610 }
 611
 612 static DBusMessage *
 613 impl_GetInterfaces (DBusConnection * bus,
 614                     DBusMessage * message, void *user_data)
 615 {
 616   DBusMessage *reply;
 617   DBusMessageIter iter, iter_array;
 618
 619   const char *acc = SPI_DBUS_INTERFACE_ACCESSIBLE;
 620   const char *com = SPI_DBUS_INTERFACE_COMPONENT;
 621
 622   reply = dbus_message_new_method_return (message);
 623
 624   dbus_message_iter_init_append (reply, &iter);
 625   dbus_message_iter_open_container (&iter, DBUS_TYPE_ARRAY, "s",
 626                                     &iter_array);
 627     dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_STRING, &acc);
 628     dbus_message_iter_append_basic (&iter_array, DBUS_TYPE_STRING, &com);
 629   dbus_message_iter_close_container (&iter, &iter_array);
 630
 631   return reply;
 632 }
 633
 634 /*---------------------------------------------------------------------------*/
 635
 636 static void
 637 emit_Available (DBusConnection * bus)
 638 {
 639   DBusMessage *sig;
 640   DBusMessageIter iter;
 641
 642   sig = dbus_message_new_signal(SPI_DBUS_PATH_ROOT, SPI_DBUS_INTERFACE_SOCKET, "Available");
 643
 644   dbus_message_iter_init_append(sig, &iter);
 645   append_reference (&iter, SPI_DBUS_NAME_REGISTRY, SPI_DBUS_PATH_ROOT);
 646
 647   dbus_connection_send(bus, sig, NULL);
 648   dbus_message_unref(sig);
 649 }
 650
 651 /*---------------------------------------------------------------------------*/
 652
 653 static const char *introspection_header =
 654 "<?xml version=\"1.0\"?>\n";
 655
 656 static const char *introspection_node_element =
 657 "<node name=\"%s\">\n";
 658
 659 static const char *introspection_footer =
 660 "</node>";
 661
 662 static DBusMessage *
 663 impl_Introspect (DBusConnection * bus,
 664                  DBusMessage * message, void *user_data)
 665 {
 666   GString *output;
 667   gchar *final;
 668   gint i;
 669
 670   const gchar *pathstr = SPI_DBUS_PATH_ROOT;
 671
 672   DBusMessage *reply;
 673
 674   output = g_string_new(introspection_header);
 675
 676   g_string_append_printf(output, introspection_node_element, pathstr);
 677
 678   g_string_append (output, spi_org_freedesktop_atspi_Accessible);
 679   g_string_append (output, spi_org_freedesktop_atspi_Component);
 680
 681   g_string_append(output, introspection_footer);
 682   final = g_string_free(output, FALSE);
 683
 684   reply = dbus_message_new_method_return (message);
 685   dbus_message_append_args(reply, DBUS_TYPE_STRING, &final, DBUS_TYPE_INVALID);
 686
 687   g_free(final);
 688   return reply;
 689 }
 690
 691 /*---------------------------------------------------------------------------*/
 692
 693 /*
 694  * Emits an AT-SPI event.
 695  * AT-SPI events names are split into three parts:
 696  * class:major:minor
 697  * This is mapped onto D-Bus events as:
 698  * D-Bus Interface:Signal Name:Detail argument
 699  *
 700  * Marshals a basic type into the 'any_data' attribute of
 701  * the AT-SPI event.
 702  */
 703 static void
 704 emit_event (DBusConnection *bus,
 705             const char *klass,
 706             const char *major,
 707             const char *minor,
 708             dbus_int32_t detail1,
 709             dbus_int32_t detail2,
 710             const char *name,
 711             const char *path)
 712 {
 713   DBusMessage *sig;
 714   DBusMessageIter iter, iter_variant;
 715
 716   sig = dbus_message_new_signal(SPI_DBUS_PATH_ROOT, klass, major);
 717
 718   dbus_message_iter_init_append(sig, &iter);
 719
 720   dbus_message_iter_append_basic(&iter, DBUS_TYPE_STRING, &minor);
 721   dbus_message_iter_append_basic(&iter, DBUS_TYPE_INT32, &detail1);
 722   dbus_message_iter_append_basic(&iter, DBUS_TYPE_INT32, &detail2);
 723
 724   dbus_message_iter_open_container (&iter, DBUS_TYPE_VARIANT, "(so)",
 725                                     &iter_variant);
 726     append_reference (&iter_variant, name, path);
 727   dbus_message_iter_close_container (&iter, &iter_variant);
 728
 729   append_reference (&iter,
 730                     dbus_bus_get_unique_name (bus),
 731                     SPI_DBUS_PATH_ROOT);
 732
 733   dbus_connection_send(bus, sig, NULL);
 734   dbus_message_unref(sig);
 735 }
 736
 737 /*---------------------------------------------------------------------------*/
 738
 739 /*
 740  * Children changed signal converter and forwarder.
 741  *
 742  * Klass (Interface) org.freedesktop.atspi.Event.Object
 743  * Major is the signal name.
 744  * Minor is 'add' or 'remove'
 745  * detail1 is the index.
 746  * detail2 is 0.
 747  * any_data is the child reference.
 748  */
 749
 750 static gboolean
 751 children_added_listener (DBusConnection * bus,
 752                          gint             index,
 753                          const gchar    * name,
 754                          const gchar    * path)
 755 {
 756   emit_event (bus, SPI_DBUS_INTERFACE_EVENT_OBJECT, "ChildrenChanged", "add", index, 0,
 757               name, path);
 758 }
 759
 760 static gboolean
 761 children_removed_listener (DBusConnection * bus,
 762                            gint             index,
 763                            const gchar    * name,
 764                            const gchar    * path)
 765 {
 766   emit_event (bus, SPI_DBUS_INTERFACE_EVENT_OBJECT, "ChildrenChanged", "remove", index, 0,
 767               name, SPI_DBUS_PATH_NULL);
 768 }
 769
 770 /*---------------------------------------------------------------------------*/
 771
 772 static DBusHandlerResult
 773 handle_method (DBusConnection *bus, DBusMessage *message, void *user_data)
 774 {
 775   DBusHandlerResult result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 776
 777   const gchar *iface   = dbus_message_get_interface (message);
 778   const gchar *member  = dbus_message_get_member (message);
 779   const gint   type    = dbus_message_get_type (message);
 780
 781   DBusMessage *reply = NULL;
 782
 783   /* Check for basic reasons not to handle */
 784   if (type   != DBUS_MESSAGE_TYPE_METHOD_CALL ||
 785       member == NULL ||
 786       iface  == NULL)
 787       return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 788
 789   if (!strcmp (iface, "org.freedesktop.DBus.Properties"))
 790     {
 791       if (!strcmp (member, "Get"))
 792         {
 793           const gchar *prop_iface;
 794           const gchar *prop_member;
 795           DBusError error;
 796
 797           dbus_error_init (&error);
 798           if (dbus_message_get_args (message,
 799                                      &error,
 800                                      DBUS_TYPE_STRING,
 801                                      &prop_iface,
 802                                      DBUS_TYPE_STRING,
 803                                      &prop_member,
 804                                      DBUS_TYPE_INVALID))
 805             {
 806               DBusMessageIter iter;
 807
 808               reply = dbus_message_new_method_return (message);
 809               dbus_message_iter_init_append (reply, &iter);
 810
 811
 812               if (!strcmp (prop_iface, SPI_DBUS_INTERFACE_ACCESSIBLE))
 813                 {
 814                   if      (!strcmp (prop_member, "Name"))
 815                     impl_get_Name (&iter, user_data);
 816                   else if (!strcmp (prop_member, "Description"))
 817                     impl_get_Description (&iter, user_data);
 818                   else if (!strcmp (prop_member, "Parent"))
 819                     impl_get_Parent (&iter, user_data);
 820                   else if (!strcmp (prop_member, "ChildCount"))
 821                     impl_get_ChildCount (&iter, user_data);
 822                   else
 823                     {
 824                       dbus_message_unref (reply);
 825                       reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, "Property unavailable");
 826                     }
 827                 }
 828             }
 829           else
 830             {
 831               reply = dbus_message_new_error (message, DBUS_ERROR_FAILED, error.message);
 832             }
 833           result = DBUS_HANDLER_RESULT_HANDLED;
 834         }
 835       else if (!strcmp (member, "GetAll"))
 836         {
 837           result = DBUS_HANDLER_RESULT_HANDLED;
 838         }
 839     }
 840
 841   if (!strcmp (iface, SPI_DBUS_INTERFACE_ACCESSIBLE))
 842     {
 843       result = DBUS_HANDLER_RESULT_HANDLED;
 844       if      (!strcmp (member, "GetChildAtIndex"))
 845           reply = impl_GetChildAtIndex (bus, message, user_data);
 846       else if (!strcmp (member, "GetChildren"))
 847           reply = impl_GetChildren (bus, message, user_data);
 848       else if (!strcmp (member, "GetIndexInParent"))
 849           reply = impl_GetIndexInParent (bus, message, user_data);
 850       else if (!strcmp (member, "GetRelationSet"))
 851           reply = impl_GetRelationSet (bus, message, user_data);
 852       else if (!strcmp (member, "GetRole"))
 853           reply = impl_GetRole (bus, message, user_data);
 854       else if (!strcmp (member, "GetRoleName"))
 855           reply = impl_GetRoleName (bus, message, user_data);
 856       else if (!strcmp (member, "GetLocalizedRoleName"))
 857           reply = impl_GetLocalizedRoleName (bus, message, user_data);
 858       else if (!strcmp (member, "GetState"))
 859           reply = impl_GetState (bus, message, user_data);
 860       else if (!strcmp (member, "GetAttributes"))
 861           reply = impl_GetAttributes (bus, message, user_data);
 862       else if (!strcmp (member, "GetApplication"))
 863           reply = impl_GetApplication (bus, message, user_data);
 864       else if (!strcmp (member, "GetInterfaces"))
 865           reply = impl_GetInterfaces (bus, message, user_data);
 866       else
 867          result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 868     }
 869
 870   if (!strcmp (iface, SPI_DBUS_INTERFACE_COMPONENT))
 871     {
 872       result = DBUS_HANDLER_RESULT_HANDLED;
 873       if      (!strcmp (member, "Contains"))
 874           reply = impl_Contains (bus, message, user_data);
 875       else if (!strcmp (member, "GetAccessibleAtPoint"))
 876           reply = impl_GetAccessibleAtPoint (bus, message, user_data);
 877       else if (!strcmp (member, "GetExtents"))
 878           reply = impl_GetExtents (bus, message, user_data);
 879       else if (!strcmp (member, "GetPosition"))
 880           reply = impl_GetPosition (bus, message, user_data);
 881       else if (!strcmp (member, "GetSize"))
 882           reply = impl_GetSize (bus, message, user_data);
 883       else if (!strcmp (member, "GetLayer"))
 884           reply = impl_GetLayer (bus, message, user_data);
 885       else if (!strcmp (member, "GetMDIZOrder"))
 886           reply = impl_GetMDIZOrder (bus, message, user_data);
 887       else if (!strcmp (member, "GrabFocus"))
 888           reply = impl_GrabFocus (bus, message, user_data);
 889       else if (!strcmp (member, "GetAlpha"))
 890           reply = impl_GetAlpha (bus, message, user_data);
 891       else
 892          result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 893     }
 894
 895   if (!strcmp (iface, SPI_DBUS_INTERFACE_SOCKET))
 896     {
 897       result = DBUS_HANDLER_RESULT_HANDLED;
 898       if      (!strcmp (member, "Embed"))
 899           reply = impl_Embed (bus, message, user_data);
 900       else if (!strcmp (member, "Unembed"))
 901           reply = impl_Unembed (bus, message, user_data);
 902       else
 903           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 904     }
 905
 906   if (!strcmp (iface, "org.freedesktop.DBus.Introspectable"))
 907     {
 908       result = DBUS_HANDLER_RESULT_HANDLED;
 909       if      (!strcmp (member, "Introspect"))
 910           reply = impl_Introspect (bus, message, user_data);
 911       else
 912           result = DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
 913     }
 914
 915   if (result == DBUS_HANDLER_RESULT_HANDLED)
 916     {
 917       if (!reply)
 918         {
 919           reply = dbus_message_new_method_return (message);
 920         }
 921
 922       dbus_connection_send (bus, reply, NULL);
 923       dbus_message_unref (reply);
 924     }
 925 #if 0
 926   else
 927     {
 928       g_print ("Registry | Unhandled message : %s|%s\n", iface, member);
 929     }
 930 #endif
 931
 932   return result;
 933 }
 934
 935 /*---------------------------------------------------------------------------*/
 936
 937 static DBusObjectPathVTable registry_vtable =
 938 {
 939   NULL,
 940   &handle_method,
 941   NULL, NULL, NULL, NULL
 942 };
 943
 944 static gchar *app_sig_match_name_owner =
 945        "type='signal', interface='org.freedesktop.DBus', member='NameOwnerChanged'";
 946
 947 SpiRegistry *
 948 spi_registry_new (DBusConnection *bus)
 949 {
 950   SpiRegistry *reg = g_object_new (SPI_REGISTRY_TYPE, NULL);
 951
 952   reg->bus = bus;
 953
 954   dbus_bus_add_match (bus, app_sig_match_name_owner, NULL);
 955   dbus_connection_add_filter (bus, signal_filter, reg, NULL);
 956
 957   dbus_connection_register_object_path (bus, SPI_DBUS_PATH_ROOT, &registry_vtable, reg);
 958
 959   emit_Available (bus);
 960
 961   return reg;
 962 }
 963
 964 /*END------------------------------------------------------------------------*/