gdbus/object.c

   1 /*
   2  *
   3  *  D-Bus helper library
   4  *
   5  *  Copyright (C) 2004-2011  Marcel Holtmann <marcel@holtmann.org>
   6  *
   7  *
   8  *  This program is free software; you can redistribute it and/or modify
   9  *  it under the terms of the GNU General Public License as published by
  10  *  the Free Software Foundation; either version 2 of the License, or
  11  *  (at your option) any later version.
  12  *
  13  *  This program is distributed in the hope that it will be useful,
  14  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  *  GNU General Public License for more details.
  17  *
  18  *  You should have received a copy of the GNU General Public License
  19  *  along with this program; if not, write to the Free Software
  20  *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  21  *
  22  */
  23
  24 #ifdef HAVE_CONFIG_H
  25 #include <config.h>
  26 #endif
  27
  28 #include <stdio.h>
  29 #include <string.h>
  30
  31 #include <glib.h>
  32 #include <dbus/dbus.h>
  33
  34 #include "gdbus.h"
  35
  36 #define info(fmt...)
  37 #define error(fmt...)
  38 #define debug(fmt...)
  39
  40 #define DBUS_INTERFACE_OBJECT_MANAGER "org.freedesktop.DBus.ObjectManager"
  41
  42 struct generic_data {
  43         unsigned int refcount;
  44         DBusConnection *conn;
  45         char *path;
  46         GSList *interfaces;
  47         GSList *objects;
  48         GSList *added;
  49         GSList *removed;
  50         guint process_id;
  51         gboolean pending_prop;
  52         char *introspect;
  53         struct generic_data *parent;
  54 };
  55
  56 struct interface_data {
  57         char *name;
  58         const GDBusMethodTable *methods;
  59         const GDBusSignalTable *signals;
  60         const GDBusPropertyTable *properties;
  61         GSList *pending_prop;
  62         void *user_data;
  63         GDBusDestroyFunction destroy;
  64 };
  65
  66 struct security_data {
  67         GDBusPendingReply pending;
  68         DBusMessage *message;
  69         const GDBusMethodTable *method;
  70         void *iface_user_data;
  71 };
  72
  73 struct property_data {
  74         GDBusPendingPropertySet id;
  75         DBusMessage *message;
  76 };
  77
  78 static gboolean process_changes(gpointer user_data);
  79 static void process_properties_from_interface(struct generic_data *data,
  80                                                 struct interface_data *iface);
  81 static void process_property_changes(struct generic_data *data);
  82
  83 static void print_arguments(GString *gstr, const GDBusArgInfo *args,
  84                                                 const char *direction)
  85 {
  86         for (; args && args->name; args++) {
  87                 g_string_append_printf(gstr,
  88                                         "\t\t\t<arg name=\"%s\" type=\"%s\"",
  89                                         args->name, args->signature);
  90
  91                 if (direction)
  92                         g_string_append_printf(gstr,
  93                                         " direction=\"%s\"/>\n", direction);
  94                 else
  95                         g_string_append_printf(gstr, "/>\n");
  96
  97         }
  98 }
  99
 100 #define G_DBUS_ANNOTATE(prefix_, name_, value_)                         \
 101         prefix_ "<annotation name=\"org.freedesktop.DBus." name_ "\" "  \
 102         "value=\"" value_ "\"/>\n"
 103
 104 #define G_DBUS_ANNOTATE_DEPRECATED(prefix_) \
 105         G_DBUS_ANNOTATE(prefix_, "Deprecated", "true")
 106
 107 #define G_DBUS_ANNOTATE_NOREPLY(prefix_) \
 108         G_DBUS_ANNOTATE(prefix_, "Method.NoReply", "true")
 109
 110 static void generate_interface_xml(GString *gstr, struct interface_data *iface)
 111 {
 112         const GDBusMethodTable *method;
 113         const GDBusSignalTable *signal;
 114         const GDBusPropertyTable *property;
 115
 116         for (method = iface->methods; method && method->name; method++) {
 117                 gboolean deprecated = method->flags &
 118                                                 G_DBUS_METHOD_FLAG_DEPRECATED;
 119                 gboolean noreply = method->flags &
 120                                                 G_DBUS_METHOD_FLAG_NOREPLY;
 121
 122                 if (!deprecated && !noreply &&
 123                                 !(method->in_args && method->in_args->name) &&
 124                                 !(method->out_args && method->out_args->name))
 125                         g_string_append_printf(gstr,
 126                                                 "\t\t<method name=\"%s\"/>\n",
 127                                                 method->name);
 128                 else {
 129                         g_string_append_printf(gstr,
 130                                                 "\t\t<method name=\"%s\">\n",
 131                                                 method->name);
 132                         print_arguments(gstr, method->in_args, "in");
 133                         print_arguments(gstr, method->out_args, "out");
 134
 135                         if (deprecated)
 136                                 g_string_append_printf(gstr,
 137                                         G_DBUS_ANNOTATE_DEPRECATED("\t\t\t"));
 138                         if (noreply)
 139                                 g_string_append_printf(gstr,
 140                                         G_DBUS_ANNOTATE_NOREPLY("\t\t\t"));
 141
 142                         g_string_append_printf(gstr, "\t\t</method>\n");
 143                 }
 144         }
 145
 146         for (signal = iface->signals; signal && signal->name; signal++) {
 147                 gboolean deprecated = signal->flags &
 148                                                 G_DBUS_SIGNAL_FLAG_DEPRECATED;
 149
 150                 if (!deprecated && !(signal->args && signal->args->name))
 151                         g_string_append_printf(gstr,
 152                                                 "\t\t<signal name=\"%s\"/>\n",
 153                                                 signal->name);
 154                 else {
 155                         g_string_append_printf(gstr,
 156                                                 "\t\t<signal name=\"%s\">\n",
 157                                                 signal->name);
 158                         print_arguments(gstr, signal->args, NULL);
 159
 160                         if (deprecated)
 161                                 g_string_append_printf(gstr,
 162                                         G_DBUS_ANNOTATE_DEPRECATED("\t\t\t"));
 163
 164                         g_string_append_printf(gstr, "\t\t</signal>\n");
 165                 }
 166         }
 167
 168         for (property = iface->properties; property && property->name;
 169                                                                 property++) {
 170                 gboolean deprecated = property->flags &
 171                                         G_DBUS_PROPERTY_FLAG_DEPRECATED;
 172
 173                 g_string_append_printf(gstr, "\t\t<property name=\"%s\""
 174                                         " type=\"%s\" access=\"%s%s\"",
 175                                         property->name, property->type,
 176                                         property->get ? "read" : "",
 177                                         property->set ? "write" : "");
 178
 179                 if (!deprecated)
 180                         g_string_append_printf(gstr, "/>\n");
 181                 else
 182                         g_string_append_printf(gstr,
 183                                 G_DBUS_ANNOTATE_DEPRECATED(">\n\t\t\t"));
 184         }
 185 }
 186
 187 static void generate_introspection_xml(DBusConnection *conn,
 188                                 struct generic_data *data, const char *path)
 189 {
 190         GSList *list;
 191         GString *gstr;
 192         char **children;
 193         int i;
 194
 195         g_free(data->introspect);
 196
 197         gstr = g_string_new(DBUS_INTROSPECT_1_0_XML_DOCTYPE_DECL_NODE);
 198
 199         g_string_append_printf(gstr, "<node>\n");
 200
 201         for (list = data->interfaces; list; list = list->next) {
 202                 struct interface_data *iface = list->data;
 203
 204                 g_string_append_printf(gstr, "\t<interface name=\"%s\">\n",
 205                                                                 iface->name);
 206
 207                 generate_interface_xml(gstr, iface);
 208
 209                 g_string_append_printf(gstr, "\t</interface>\n");
 210         }
 211
 212         if (!dbus_connection_list_registered(conn, path, &children))
 213                 goto done;
 214
 215         for (i = 0; children[i]; i++)
 216                 g_string_append_printf(gstr, "\t<node name=\"%s\"/>\n",
 217                                                                 children[i]);
 218
 219         dbus_free_string_array(children);
 220
 221 done:
 222         g_string_append_printf(gstr, "</node>\n");
 223
 224         data->introspect = g_string_free(gstr, FALSE);
 225 }
 226
 227 static DBusMessage *introspect(DBusConnection *connection,
 228                                 DBusMessage *message, void *user_data)
 229 {
 230         struct generic_data *data = user_data;
 231         DBusMessage *reply;
 232
 233         if (data->introspect == NULL)
 234                 generate_introspection_xml(connection, data,
 235                                                 dbus_message_get_path(message));
 236
 237         reply = dbus_message_new_method_return(message);
 238         if (reply == NULL)
 239                 return NULL;
 240
 241         dbus_message_append_args(reply, DBUS_TYPE_STRING, &data->introspect,
 242                                         DBUS_TYPE_INVALID);
 243
 244         return reply;
 245 }
 246
 247 static DBusHandlerResult process_message(DBusConnection *connection,
 248                         DBusMessage *message, const GDBusMethodTable *method,
 249                                                         void *iface_user_data)
 250 {
 251         DBusMessage *reply;
 252
 253         reply = method->function(connection, message, iface_user_data);
 254
 255         if (method->flags & G_DBUS_METHOD_FLAG_NOREPLY) {
 256                 if (reply != NULL)
 257                         dbus_message_unref(reply);
 258                 return DBUS_HANDLER_RESULT_HANDLED;
 259         }
 260
 261         if (method->flags & G_DBUS_METHOD_FLAG_ASYNC) {
 262                 if (reply == NULL)
 263                         return DBUS_HANDLER_RESULT_HANDLED;
 264         }
 265
 266         if (reply == NULL)
 267                 return DBUS_HANDLER_RESULT_NEED_MEMORY;
 268
 269         dbus_connection_send(connection, reply, NULL);
 270         dbus_message_unref(reply);
 271
 272         return DBUS_HANDLER_RESULT_HANDLED;
 273 }
 274
 275 static GDBusPendingReply next_pending = 1;
 276 static GSList *pending_security = NULL;
 277
 278 static const GDBusSecurityTable *security_table = NULL;
 279
 280 void g_dbus_pending_success(DBusConnection *connection,
 281                                         GDBusPendingReply pending)
 282 {
 283         GSList *list;
 284
 285         for (list = pending_security; list; list = list->next) {
 286                 struct security_data *secdata = list->data;
 287
 288                 if (secdata->pending != pending)
 289                         continue;
 290
 291                 pending_security = g_slist_remove(pending_security, secdata);
 292
 293                 process_message(connection, secdata->message,
 294                                 secdata->method, secdata->iface_user_data);
 295
 296                 dbus_message_unref(secdata->message);
 297                 g_free(secdata);
 298                 return;
 299         }
 300 }
 301
 302 void g_dbus_pending_error_valist(DBusConnection *connection,
 303                                 GDBusPendingReply pending, const char *name,
 304                                         const char *format, va_list args)
 305 {
 306         GSList *list;
 307
 308         for (list = pending_security; list; list = list->next) {
 309                 struct security_data *secdata = list->data;
 310                 DBusMessage *reply;
 311
 312                 if (secdata->pending != pending)
 313                         continue;
 314
 315                 pending_security = g_slist_remove(pending_security, secdata);
 316
 317                 reply = g_dbus_create_error_valist(secdata->message,
 318                                                         name, format, args);
 319                 if (reply != NULL) {
 320                         dbus_connection_send(connection, reply, NULL);
 321                         dbus_message_unref(reply);
 322                 }
 323
 324                 dbus_message_unref(secdata->message);
 325                 g_free(secdata);
 326                 return;
 327         }
 328 }
 329
 330 void g_dbus_pending_error(DBusConnection *connection,
 331                                 GDBusPendingReply pending,
 332                                 const char *name, const char *format, ...)
 333 {
 334         va_list args;
 335
 336         va_start(args, format);
 337
 338         g_dbus_pending_error_valist(connection, pending, name, format, args);
 339
 340         va_end(args);
 341 }
 342
 343 int polkit_check_authorization(DBusConnection *conn,
 344                                 const char *action, gboolean interaction,
 345                                 void (*function) (dbus_bool_t authorized,
 346                                                         void *user_data),
 347                                                 void *user_data, int timeout);
 348
 349 struct builtin_security_data {
 350         DBusConnection *conn;
 351         GDBusPendingReply pending;
 352 };
 353
 354 static void builtin_security_result(dbus_bool_t authorized, void *user_data)
 355 {
 356         struct builtin_security_data *data = user_data;
 357
 358         if (authorized == TRUE)
 359                 g_dbus_pending_success(data->conn, data->pending);
 360         else
 361                 g_dbus_pending_error(data->conn, data->pending,
 362                                                 DBUS_ERROR_AUTH_FAILED, NULL);
 363
 364         g_free(data);
 365 }
 366
 367 static void builtin_security_function(DBusConnection *conn,
 368                                                 const char *action,
 369                                                 gboolean interaction,
 370                                                 GDBusPendingReply pending)
 371 {
 372         struct builtin_security_data *data;
 373
 374         data = g_new0(struct builtin_security_data, 1);
 375         data->conn = conn;
 376         data->pending = pending;
 377
 378         if (polkit_check_authorization(conn, action, interaction,
 379                                 builtin_security_result, data, 30000) < 0)
 380                 g_dbus_pending_error(conn, pending, NULL, NULL);
 381 }
 382
 383 static gboolean check_privilege(DBusConnection *conn, DBusMessage *msg,
 384                         const GDBusMethodTable *method, void *iface_user_data)
 385 {
 386         const GDBusSecurityTable *security;
 387
 388         for (security = security_table; security && security->privilege;
 389                                                                 security++) {
 390                 struct security_data *secdata;
 391                 gboolean interaction;
 392
 393                 if (security->privilege != method->privilege)
 394                         continue;
 395
 396                 secdata = g_new(struct security_data, 1);
 397                 secdata->pending = next_pending++;
 398                 secdata->message = dbus_message_ref(msg);
 399                 secdata->method = method;
 400                 secdata->iface_user_data = iface_user_data;
 401
 402                 pending_security = g_slist_prepend(pending_security, secdata);
 403
 404                 if (security->flags & G_DBUS_SECURITY_FLAG_ALLOW_INTERACTION)
 405                         interaction = TRUE;
 406                 else
 407                         interaction = FALSE;
 408
 409                 if (!(security->flags & G_DBUS_SECURITY_FLAG_BUILTIN) &&
 410                                                         security->function)
 411                         security->function(conn, security->action,
 412                                                 interaction, secdata->pending);
 413                 else
 414                         builtin_security_function(conn, security->action,
 415                                                 interaction, secdata->pending);
 416
 417                 return TRUE;
 418         }
 419
 420         return FALSE;
 421 }
 422
 423 static GDBusPendingPropertySet next_pending_property = 1;
 424 static GSList *pending_property_set;
 425
 426 static struct property_data *remove_pending_property_data(
 427                                                 GDBusPendingPropertySet id)
 428 {
 429         struct property_data *propdata;
 430         GSList *l;
 431
 432         for (l = pending_property_set; l != NULL; l = l->next) {
 433                 propdata = l->data;
 434                 if (propdata->id != id)
 435                         continue;
 436
 437                 break;
 438         }
 439
 440         if (l == NULL)
 441                 return NULL;
 442
 443         pending_property_set = g_slist_delete_link(pending_property_set, l);
 444
 445         return propdata;
 446 }
 447
 448 void g_dbus_pending_property_success(DBusConnection *connection,
 449                                                 GDBusPendingPropertySet id)
 450 {
 451         struct property_data *propdata;
 452
 453         propdata = remove_pending_property_data(id);
 454         if (propdata == NULL)
 455                 return;
 456
 457         g_dbus_send_reply(connection, propdata->message, DBUS_TYPE_INVALID);
 458         dbus_message_unref(propdata->message);
 459         g_free(propdata);
 460 }
 461
 462 void g_dbus_pending_property_error_valist(DBusConnection *connection,
 463                                         GDBusPendingReply id, const char *name,
 464                                         const char *format, va_list args)
 465 {
 466         struct property_data *propdata;
 467         DBusMessage *reply;
 468
 469         propdata = remove_pending_property_data(id);
 470         if (propdata == NULL)
 471                 return;
 472
 473         reply = g_dbus_create_error_valist(propdata->message, name, format,
 474                                                                         args);
 475         if (reply != NULL) {
 476                 dbus_connection_send(connection, reply, NULL);
 477                 dbus_message_unref(reply);
 478         }
 479
 480         dbus_message_unref(propdata->message);
 481         g_free(propdata);
 482 }
 483
 484 void g_dbus_pending_property_error(DBusConnection *connection,
 485                                         GDBusPendingReply id, const char *name,
 486                                         const char *format, ...)
 487 {
 488         va_list args;
 489
 490         va_start(args, format);
 491
 492         g_dbus_pending_property_error_valist(connection, id, name, format,
 493                                                                         args);
 494
 495         va_end(args);
 496 }
 497
 498 static void reset_parent(gpointer data, gpointer user_data)
 499 {
 500         struct generic_data *child = data;
 501         struct generic_data *parent = user_data;
 502
 503         child->parent = parent;
 504 }
 505
 506 static void append_property(struct interface_data *iface,
 507                         const GDBusPropertyTable *p, DBusMessageIter *dict)
 508 {
 509         DBusMessageIter entry, value;
 510
 511         dbus_message_iter_open_container(dict, DBUS_TYPE_DICT_ENTRY, NULL,
 512                                                                 &entry);
 513         dbus_message_iter_append_basic(&entry, DBUS_TYPE_STRING, &p->name);
 514         dbus_message_iter_open_container(&entry, DBUS_TYPE_VARIANT, p->type,
 515                                                                 &value);
 516
 517         p->get(p, &value, iface->user_data);
 518
 519         dbus_message_iter_close_container(&entry, &value);
 520         dbus_message_iter_close_container(dict, &entry);
 521 }
 522
 523 static void append_properties(struct interface_data *data,
 524                                                         DBusMessageIter *iter)
 525 {
 526         DBusMessageIter dict;
 527         const GDBusPropertyTable *p;
 528
 529         dbus_message_iter_open_container(iter, DBUS_TYPE_ARRAY,
 530                                 DBUS_DICT_ENTRY_BEGIN_CHAR_AS_STRING
 531                                 DBUS_TYPE_STRING_AS_STRING
 532                                 DBUS_TYPE_VARIANT_AS_STRING
 533                                 DBUS_DICT_ENTRY_END_CHAR_AS_STRING, &dict);
 534
 535         for (p = data->properties; p && p->name; p++) {
 536                 if (p->get == NULL)
 537                         continue;
 538
 539                 if (p->exists != NULL && !p->exists(p, data->user_data))
 540                         continue;
 541
 542                 append_property(data, p, &dict);
 543         }
 544
 545         dbus_message_iter_close_container(iter, &dict);
 546 }
 547
 548 static void append_interface(gpointer data, gpointer user_data)
 549 {
 550         struct interface_data *iface = data;
 551         DBusMessageIter *array = user_data;
 552         DBusMessageIter entry;
 553
 554         dbus_message_iter_open_container(array, DBUS_TYPE_DICT_ENTRY, NULL,
 555                                                                 &entry);
 556         dbus_message_iter_append_basic(&entry, DBUS_TYPE_STRING, &iface->name);
 557         append_properties(data, &entry);
 558         dbus_message_iter_close_container(array, &entry);
 559 }
 560
 561 static void emit_interfaces_added(struct generic_data *data)
 562 {
 563         DBusMessage *signal;
 564         DBusMessageIter iter, array;
 565         struct generic_data *parent = data->parent;
 566
 567         if (parent == NULL)
 568                 return;
 569
 570         /* Find root data */
 571         while (parent->parent)
 572                 parent = parent->parent;
 573
 574         signal = dbus_message_new_signal(parent->path,
 575                                         DBUS_INTERFACE_OBJECT_MANAGER,
 576                                         "InterfacesAdded");
 577         if (signal == NULL)
 578                 return;
 579
 580         dbus_message_iter_init_append(signal, &iter);
 581         dbus_message_iter_append_basic(&iter, DBUS_TYPE_OBJECT_PATH,
 582                                                                 &data->path);
 583
 584         dbus_message_iter_open_container(&iter, DBUS_TYPE_ARRAY,
 585                                 DBUS_DICT_ENTRY_BEGIN_CHAR_AS_STRING
 586                                 DBUS_TYPE_STRING_AS_STRING
 587                                 DBUS_TYPE_ARRAY_AS_STRING
 588                                 DBUS_DICT_ENTRY_BEGIN_CHAR_AS_STRING
 589                                 DBUS_TYPE_STRING_AS_STRING
 590                                 DBUS_TYPE_VARIANT_AS_STRING
 591                                 DBUS_DICT_ENTRY_END_CHAR_AS_STRING
 592                                 DBUS_DICT_ENTRY_END_CHAR_AS_STRING, &array);
 593
 594         g_slist_foreach(data->added, append_interface, &array);
 595         g_slist_free(data->added);
 596         data->added = NULL;
 597
 598         dbus_message_iter_close_container(&iter, &array);
 599
 600         g_dbus_send_message(data->conn, signal);
 601 }
 602
 603 static struct interface_data *find_interface(GSList *interfaces,
 604                                                 const char *name)
 605 {
 606         GSList *list;
 607
 608         if (name == NULL)
 609                 return NULL;
 610
 611         for (list = interfaces; list; list = list->next) {
 612                 struct interface_data *iface = list->data;
 613                 if (!strcmp(name, iface->name))
 614                         return iface;
 615         }
 616
 617         return NULL;
 618 }
 619
 620 static gboolean g_dbus_args_have_signature(const GDBusArgInfo *args,
 621                                                         DBusMessage *message)
 622 {
 623         const char *sig = dbus_message_get_signature(message);
 624         const char *p = NULL;
 625
 626         for (; args && args->signature && *sig; args++) {
 627                 p = args->signature;
 628
 629                 for (; *sig && *p; sig++, p++) {
 630                         if (*p != *sig)
 631                                 return FALSE;
 632                 }
 633         }
 634
 635         if (*sig || (p && *p) || (args && args->signature))
 636                 return FALSE;
 637
 638         return TRUE;
 639 }
 640
 641 static gboolean remove_interface(struct generic_data *data, const char *name)
 642 {
 643         struct interface_data *iface;
 644
 645         iface = find_interface(data->interfaces, name);
 646         if (iface == NULL)
 647                 return FALSE;
 648
 649         data->interfaces = g_slist_remove(data->interfaces, iface);
 650
 651         if (iface->destroy) {
 652                 iface->destroy(iface->user_data);
 653                 iface->user_data = NULL;
 654         }
 655
 656         if (data->parent == NULL) {
 657                 g_free(iface->name);
 658                 g_free(iface);
 659                 return TRUE;
 660         }
 661
 662         /*
 663          * Interface being removed was just added, on the same mainloop
 664          * iteration? Don't send any signal
 665          */
 666         if (g_slist_find(data->added, iface)) {
 667                 data->added = g_slist_remove(data->added, iface);
 668                 g_free(iface->name);
 669                 g_free(iface);
 670                 return TRUE;
 671         }
 672
 673         data->removed = g_slist_prepend(data->removed, iface->name);
 674         g_free(iface);
 675
 676         if (data->process_id > 0)
 677                 return TRUE;
 678
 679         data->process_id = g_idle_add(process_changes, data);
 680
 681         return TRUE;
 682 }
 683
 684 static struct generic_data *invalidate_parent_data(DBusConnection *conn,
 685                                                 const char *child_path)
 686 {
 687         struct generic_data *data = NULL, *child = NULL, *parent = NULL;
 688         char *parent_path, *slash;
 689
 690         parent_path = g_strdup(child_path);
 691         slash = strrchr(parent_path, '/');
 692         if (slash == NULL)
 693                 goto done;
 694
 695         if (slash == parent_path && parent_path[1] != '\0')
 696                 parent_path[1] = '\0';
 697         else
 698                 *slash = '\0';
 699
 700         if (!strlen(parent_path))
 701                 goto done;
 702
 703         if (dbus_connection_get_object_path_data(conn, parent_path,
 704                                                         (void *) &data) == FALSE) {
 705                 goto done;
 706         }
 707
 708         parent = invalidate_parent_data(conn, parent_path);
 709
 710         if (data == NULL) {
 711                 data = parent;
 712                 if (data == NULL)
 713                         goto done;
 714         }
 715
 716         g_free(data->introspect);
 717         data->introspect = NULL;
 718
 719         if (!dbus_connection_get_object_path_data(conn, child_path,
 720                                                         (void *) &child))
 721                 goto done;
 722
 723         if (child == NULL || g_slist_find(data->objects, child) != NULL)
 724                 goto done;
 725
 726         data->objects = g_slist_prepend(data->objects, child);
 727         child->parent = data;
 728
 729 done:
 730         g_free(parent_path);
 731         return data;
 732 }
 733
 734 static inline const GDBusPropertyTable *find_property(const GDBusPropertyTable *properties,
 735                                                         const char *name)
 736 {
 737         const GDBusPropertyTable *p;
 738
 739         for (p = properties; p && p->name; p++) {
 740                 if (strcmp(name, p->name) == 0)
 741                         return p;
 742         }
 743
 744         return NULL;
 745 }
 746
 747 static DBusMessage *properties_get(DBusConnection *connection,
 748                                         DBusMessage *message, void *user_data)
 749 {
 750         struct generic_data *data = user_data;
 751         struct interface_data *iface;
 752         const GDBusPropertyTable *property;
 753         const char *interface, *name;
 754         DBusMessageIter iter, value;
 755         DBusMessage *reply;
 756
 757         if (!dbus_message_get_args(message, NULL,
 758                                         DBUS_TYPE_STRING, &interface,
 759                                         DBUS_TYPE_STRING, &name,
 760                                         DBUS_TYPE_INVALID))
 761                 return NULL;
 762
 763         iface = find_interface(data->interfaces, interface);
 764         if (iface == NULL)
 765                 return g_dbus_create_error(message, DBUS_ERROR_INVALID_ARGS,
 766                                 "No such interface '%s'", interface);
 767
 768         property = find_property(iface->properties, name);
 769         if (property == NULL)
 770                 return g_dbus_create_error(message, DBUS_ERROR_INVALID_ARGS,
 771                                 "No such property '%s'", name);
 772
 773         if (property->exists != NULL &&
 774                         !property->exists(property, iface->user_data))
 775                 return g_dbus_create_error(message, DBUS_ERROR_INVALID_ARGS,
 776                                         "No such property '%s'", name);
 777
 778         if (property->get == NULL)
 779                 return g_dbus_create_error(message, DBUS_ERROR_INVALID_ARGS,
 780                                 "Property '%s' is not readable", name);
 781
 782         reply = dbus_message_new_method_return(message);
 783         if (reply == NULL)
 784                 return NULL;
 785
 786         dbus_message_iter_init_append(reply, &iter);
 787         dbus_message_iter_open_container(&iter, DBUS_TYPE_VARIANT,
 788                                                 property->type, &value);
 789
 790         if (!property->get(property, &value, iface->user_data)) {
 791                 dbus_message_unref(reply);
 792                 return NULL;
 793         }
 794
 795         dbus_message_iter_close_container(&iter, &value);
 796
 797         return reply;
 798 }
 799
 800 static DBusMessage *properties_get_all(DBusConnection *connection,
 801                                         DBusMessage *message, void *user_data)
 802 {
 803         struct generic_data *data = user_data;
 804         struct interface_data *iface;
 805         const char *interface;
 806         DBusMessageIter iter;
 807         DBusMessage *reply;
 808
 809         if (!dbus_message_get_args(message, NULL,
 810                                         DBUS_TYPE_STRING, &interface,
 811                                         DBUS_TYPE_INVALID))
 812                 return NULL;
 813
 814         iface = find_interface(data->interfaces, interface);
 815         if (iface == NULL)
 816                 return g_dbus_create_error(message, DBUS_ERROR_INVALID_ARGS,
 817                                         "No such interface '%s'", interface);
 818
 819         reply = dbus_message_new_method_return(message);
 820         if (reply == NULL)
 821                 return NULL;
 822
 823         dbus_message_iter_init_append(reply, &iter);
 824
 825         append_properties(iface, &iter);
 826
 827         return reply;
 828 }
 829
 830 static DBusMessage *properties_set(DBusConnection *connection,
 831                                         DBusMessage *message, void *user_data)
 832 {
 833         struct generic_data *data = user_data;
 834         DBusMessageIter iter, sub;
 835         struct interface_data *iface;
 836         const GDBusPropertyTable *property;
 837         const char *name, *interface;
 838         struct property_data *propdata;
 839
 840         if (!dbus_message_iter_init(message, &iter))
 841                 return g_dbus_create_error(message, DBUS_ERROR_INVALID_ARGS,
 842                                                         "No arguments given");
 843
 844         if (dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_STRING)
 845                 return g_dbus_create_error(message, DBUS_ERROR_INVALID_ARGS,
 846                                         "Invalid argument type: '%c'",
 847                                         dbus_message_iter_get_arg_type(&iter));
 848
 849         dbus_message_iter_get_basic(&iter, &interface);
 850         dbus_message_iter_next(&iter);
 851
 852         if (dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_STRING)
 853                 return g_dbus_create_error(message, DBUS_ERROR_INVALID_ARGS,
 854                                         "Invalid argument type: '%c'",
 855                                         dbus_message_iter_get_arg_type(&iter));
 856
 857         dbus_message_iter_get_basic(&iter, &name);
 858         dbus_message_iter_next(&iter);
 859
 860         if (dbus_message_iter_get_arg_type(&iter) != DBUS_TYPE_VARIANT)
 861                 return g_dbus_create_error(message, DBUS_ERROR_INVALID_ARGS,
 862                                         "Invalid argument type: '%c'",
 863                                         dbus_message_iter_get_arg_type(&iter));
 864
 865         dbus_message_iter_recurse(&iter, &sub);
 866
 867         iface = find_interface(data->interfaces, interface);
 868         if (iface == NULL)
 869                 return g_dbus_create_error(message, DBUS_ERROR_INVALID_ARGS,
 870                                         "No such interface '%s'", interface);
 871
 872         property = find_property(iface->properties, name);
 873         if (property == NULL)
 874                 return g_dbus_create_error(message,
 875                                                 DBUS_ERROR_UNKNOWN_PROPERTY,
 876                                                 "No such property '%s'", name);
 877
 878         if (property->set == NULL)
 879                 return g_dbus_create_error(message,
 880                                         DBUS_ERROR_PROPERTY_READ_ONLY,
 881                                         "Property '%s' is not writable", name);
 882
 883         if (property->exists != NULL &&
 884                         !property->exists(property, iface->user_data))
 885                 return g_dbus_create_error(message,
 886                                                 DBUS_ERROR_UNKNOWN_PROPERTY,
 887                                                 "No such property '%s'", name);
 888
 889         propdata = g_new(struct property_data, 1);
 890         propdata->id = next_pending_property++;
 891         propdata->message = dbus_message_ref(message);
 892         pending_property_set = g_slist_prepend(pending_property_set, propdata);
 893
 894         property->set(property, &sub, propdata->id, iface->user_data);
 895
 896         return NULL;
 897 }
 898
 899 static const GDBusMethodTable properties_methods[] = {
 900         { GDBUS_METHOD("Get",
 901                         GDBUS_ARGS({ "interface", "s" }, { "name", "s" }),
 902                         GDBUS_ARGS({ "value", "v" }),
 903                         properties_get) },
 904         { GDBUS_ASYNC_METHOD("Set",
 905                         GDBUS_ARGS({ "interface", "s" }, { "name", "s" },
 906                                                         { "value", "v" }),
 907                         NULL,
 908                         properties_set) },
 909         { GDBUS_METHOD("GetAll",
 910                         GDBUS_ARGS({ "interface", "s" }),
 911                         GDBUS_ARGS({ "properties", "a{sv}" }),
 912                         properties_get_all) },
 913         { }
 914 };
 915
 916 static const GDBusSignalTable properties_signals[] = {
 917         { GDBUS_SIGNAL("PropertiesChanged",
 918                         GDBUS_ARGS({ "interface", "s" },
 919                                         { "changed_properties", "a{sv}" },
 920                                         { "invalidated_properties", "as"})) },
 921         { }
 922 };
 923
 924 static void append_name(gpointer data, gpointer user_data)
 925 {
 926         char *name = data;
 927         DBusMessageIter *iter = user_data;
 928
 929         dbus_message_iter_append_basic(iter, DBUS_TYPE_STRING, &name);
 930 }
 931
 932 static void emit_interfaces_removed(struct generic_data *data)
 933 {
 934         DBusMessage *signal;
 935         DBusMessageIter iter, array;
 936         struct generic_data *parent = data->parent;
 937
 938         if (parent == NULL)
 939                 return;
 940
 941         /* Find root data */
 942         while (parent->parent)
 943                 parent = parent->parent;
 944
 945         signal = dbus_message_new_signal(parent->path,
 946                                         DBUS_INTERFACE_OBJECT_MANAGER,
 947                                         "InterfacesRemoved");
 948         if (signal == NULL)
 949                 return;
 950
 951         dbus_message_iter_init_append(signal, &iter);
 952         dbus_message_iter_append_basic(&iter, DBUS_TYPE_OBJECT_PATH,
 953                                                                 &data->path);
 954         dbus_message_iter_open_container(&iter, DBUS_TYPE_ARRAY,
 955                                         DBUS_TYPE_STRING_AS_STRING, &array);
 956
 957         g_slist_foreach(data->removed, append_name, &array);
 958         g_slist_free_full(data->removed, g_free);
 959         data->removed = NULL;
 960
 961         dbus_message_iter_close_container(&iter, &array);
 962
 963         g_dbus_send_message(data->conn, signal);
 964 }
 965
 966 static gboolean process_changes(gpointer user_data)
 967 {
 968         struct generic_data *data = user_data;
 969
 970         data->process_id = 0;
 971
 972         if (data->added != NULL)
 973                 emit_interfaces_added(data);
 974
 975         /* Flush pending properties */
 976         if (data->pending_prop == TRUE)
 977                 process_property_changes(data);
 978
 979         if (data->removed != NULL)
 980                 emit_interfaces_removed(data);
 981
 982         return FALSE;
 983 }
 984
 985 static void generic_unregister(DBusConnection *connection, void *user_data)
 986 {
 987         struct generic_data *data = user_data;
 988         struct generic_data *parent = data->parent;
 989
 990         if (parent != NULL)
 991                 parent->objects = g_slist_remove(parent->objects, data);
 992
 993         if (data->process_id > 0) {
 994                 g_source_remove(data->process_id);
 995                 process_changes(data);
 996         }
 997
 998         g_slist_foreach(data->objects, reset_parent, data->parent);
 999         g_slist_free(data->objects);
1000
1001         dbus_connection_unref(data->conn);
1002         g_free(data->introspect);
1003         g_free(data->path);
1004         g_free(data);
1005 }
1006
1007 static DBusHandlerResult generic_message(DBusConnection *connection,
1008                                         DBusMessage *message, void *user_data)
1009 {
1010         struct generic_data *data = user_data;
1011         struct interface_data *iface;
1012         const GDBusMethodTable *method;
1013         const char *interface;
1014
1015         interface = dbus_message_get_interface(message);
1016
1017         iface = find_interface(data->interfaces, interface);
1018         if (iface == NULL)
1019                 return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1020
1021         for (method = iface->methods; method &&
1022                         method->name && method->function; method++) {
1023                 if (dbus_message_is_method_call(message, iface->name,
1024                                                         method->name) == FALSE)
1025                         continue;
1026
1027                 if (g_dbus_args_have_signature(method->in_args,
1028                                                         message) == FALSE)
1029                         continue;
1030
1031                 if (check_privilege(connection, message, method,
1032                                                 iface->user_data) == TRUE)
1033                         return DBUS_HANDLER_RESULT_HANDLED;
1034
1035                 return process_message(connection, message, method,
1036                                                         iface->user_data);
1037         }
1038
1039         return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
1040 }
1041
1042 static DBusObjectPathVTable generic_table = {
1043         .unregister_function    = generic_unregister,
1044         .message_function       = generic_message,
1045 };
1046
1047 static const GDBusMethodTable introspect_methods[] = {
1048         { GDBUS_METHOD("Introspect", NULL,
1049                         GDBUS_ARGS({ "xml", "s" }), introspect) },
1050         { }
1051 };
1052
1053 static void append_interfaces(struct generic_data *data, DBusMessageIter *iter)
1054 {
1055         DBusMessageIter array;
1056
1057         dbus_message_iter_open_container(iter, DBUS_TYPE_ARRAY,
1058                                 DBUS_DICT_ENTRY_BEGIN_CHAR_AS_STRING
1059                                 DBUS_TYPE_STRING_AS_STRING
1060                                 DBUS_TYPE_ARRAY_AS_STRING
1061                                 DBUS_DICT_ENTRY_BEGIN_CHAR_AS_STRING
1062                                 DBUS_TYPE_STRING_AS_STRING
1063                                 DBUS_TYPE_VARIANT_AS_STRING
1064                                 DBUS_DICT_ENTRY_END_CHAR_AS_STRING
1065                                 DBUS_DICT_ENTRY_END_CHAR_AS_STRING, &array);
1066
1067         g_slist_foreach(data->interfaces, append_interface, &array);
1068
1069         dbus_message_iter_close_container(iter, &array);
1070 }
1071
1072 static void append_object(gpointer data, gpointer user_data)
1073 {
1074         struct generic_data *child = data;
1075         DBusMessageIter *array = user_data;
1076         DBusMessageIter entry;
1077
1078         dbus_message_iter_open_container(array, DBUS_TYPE_DICT_ENTRY, NULL,
1079                                                                 &entry);
1080         dbus_message_iter_append_basic(&entry, DBUS_TYPE_OBJECT_PATH,
1081                                                                 &child->path);
1082         append_interfaces(child, &entry);
1083         dbus_message_iter_close_container(array, &entry);
1084
1085         g_slist_foreach(child->objects, append_object, user_data);
1086 }
1087
1088 static DBusMessage *get_objects(DBusConnection *connection,
1089                                 DBusMessage *message, void *user_data)
1090 {
1091         struct generic_data *data = user_data;
1092         DBusMessage *reply;
1093         DBusMessageIter iter;
1094         DBusMessageIter array;
1095
1096         reply = dbus_message_new_method_return(message);
1097         if (reply == NULL)
1098                 return NULL;
1099
1100         dbus_message_iter_init_append(reply, &iter);
1101
1102         dbus_message_iter_open_container(&iter, DBUS_TYPE_ARRAY,
1103                                         DBUS_DICT_ENTRY_BEGIN_CHAR_AS_STRING
1104                                         DBUS_TYPE_OBJECT_PATH_AS_STRING
1105                                         DBUS_TYPE_ARRAY_AS_STRING
1106                                         DBUS_DICT_ENTRY_BEGIN_CHAR_AS_STRING
1107                                         DBUS_TYPE_STRING_AS_STRING
1108                                         DBUS_TYPE_ARRAY_AS_STRING
1109                                         DBUS_DICT_ENTRY_BEGIN_CHAR_AS_STRING
1110                                         DBUS_TYPE_STRING_AS_STRING
1111                                         DBUS_TYPE_VARIANT_AS_STRING
1112                                         DBUS_DICT_ENTRY_END_CHAR_AS_STRING
1113                                         DBUS_DICT_ENTRY_END_CHAR_AS_STRING
1114                                         DBUS_DICT_ENTRY_END_CHAR_AS_STRING,
1115                                         &array);
1116
1117         g_slist_foreach(data->objects, append_object, &array);
1118
1119         dbus_message_iter_close_container(&iter, &array);
1120
1121         return reply;
1122 }
1123
1124 static const GDBusMethodTable manager_methods[] = {
1125         { GDBUS_METHOD("GetManagedObjects", NULL,
1126                 GDBUS_ARGS({ "objects", "a{oa{sa{sv}}}" }), get_objects) },
1127         { }
1128 };
1129
1130 static const GDBusSignalTable manager_signals[] = {
1131         { GDBUS_SIGNAL("InterfacesAdded",
1132                 GDBUS_ARGS({ "object", "o" },
1133                                 { "interfaces", "a{sa{sv}}" })) },
1134         { GDBUS_SIGNAL("InterfacesRemoved",
1135                 GDBUS_ARGS({ "object", "o" }, { "interfaces", "as" })) },
1136         { }
1137 };
1138
1139 static void add_interface(struct generic_data *data,
1140                                 const char *name,
1141                                 const GDBusMethodTable *methods,
1142                                 const GDBusSignalTable *signals,
1143                                 const GDBusPropertyTable *properties,
1144                                 void *user_data,
1145                                 GDBusDestroyFunction destroy)
1146 {
1147         struct interface_data *iface;
1148
1149         iface = g_new0(struct interface_data, 1);
1150         iface->name = g_strdup(name);
1151         iface->methods = methods;
1152         iface->signals = signals;
1153         iface->properties = properties;
1154         iface->user_data = user_data;
1155         iface->destroy = destroy;
1156
1157         data->interfaces = g_slist_append(data->interfaces, iface);
1158         if (data->parent == NULL)
1159                 return;
1160
1161         data->added = g_slist_append(data->added, iface);
1162         if (data->process_id > 0)
1163                 return;
1164
1165         data->process_id = g_idle_add(process_changes, data);
1166 }
1167
1168 static struct generic_data *object_path_ref(DBusConnection *connection,
1169                                                         const char *path)
1170 {
1171         struct generic_data *data;
1172
1173         if (dbus_connection_get_object_path_data(connection, path,
1174                                                 (void *) &data) == TRUE) {
1175                 if (data != NULL) {
1176                         data->refcount++;
1177                         return data;
1178                 }
1179         }
1180
1181         data = g_new0(struct generic_data, 1);
1182         data->conn = dbus_connection_ref(connection);
1183         data->path = g_strdup(path);
1184         data->refcount = 1;
1185
1186         data->introspect = g_strdup(DBUS_INTROSPECT_1_0_XML_DOCTYPE_DECL_NODE "<node></node>");
1187
1188         if (!dbus_connection_register_object_path(connection, path,
1189                                                 &generic_table, data)) {
1190                 g_free(data->introspect);
1191                 g_free(data);
1192                 return NULL;
1193         }
1194
1195         invalidate_parent_data(connection, path);
1196
1197         add_interface(data, DBUS_INTERFACE_INTROSPECTABLE, introspect_methods,
1198                                                 NULL, NULL, data, NULL);
1199
1200         /* Only root path export ObjectManager interface */
1201         if (data->parent == NULL)
1202                 add_interface(data, DBUS_INTERFACE_OBJECT_MANAGER,
1203                                         manager_methods, manager_signals,
1204                                         NULL, data, NULL);
1205
1206         add_interface(data, DBUS_INTERFACE_PROPERTIES, properties_methods,
1207                                         properties_signals, NULL, data, NULL);
1208
1209         return data;
1210 }
1211
1212 static void object_path_unref(DBusConnection *connection, const char *path)
1213 {
1214         struct generic_data *data = NULL;
1215
1216         if (dbus_connection_get_object_path_data(connection, path,
1217                                                 (void *) &data) == FALSE)
1218                 return;
1219
1220         if (data == NULL)
1221                 return;
1222
1223         data->refcount--;
1224
1225         if (data->refcount > 0)
1226                 return;
1227
1228         remove_interface(data, DBUS_INTERFACE_INTROSPECTABLE);
1229         remove_interface(data, DBUS_INTERFACE_PROPERTIES);
1230         remove_interface(data, DBUS_INTERFACE_OBJECT_MANAGER);
1231
1232         invalidate_parent_data(data->conn, data->path);
1233
1234         dbus_connection_unregister_object_path(data->conn, data->path);
1235 }
1236
1237 static gboolean check_signal(DBusConnection *conn, const char *path,
1238                                 const char *interface, const char *name,
1239                                 const GDBusArgInfo **args)
1240 {
1241         struct generic_data *data = NULL;
1242         struct interface_data *iface;
1243         const GDBusSignalTable *signal;
1244
1245         *args = NULL;
1246         if (!dbus_connection_get_object_path_data(conn, path,
1247                                         (void *) &data) || data == NULL) {
1248                 error("dbus_connection_emit_signal: path %s isn't registered",
1249                                 path);
1250                 return FALSE;
1251         }
1252
1253         iface = find_interface(data->interfaces, interface);
1254         if (iface == NULL) {
1255                 error("dbus_connection_emit_signal: %s does not implement %s",
1256                                 path, interface);
1257                 return FALSE;
1258         }
1259
1260         for (signal = iface->signals; signal && signal->name; signal++) {
1261                 if (!strcmp(signal->name, name)) {
1262                         *args = signal->args;
1263                         return TRUE;
1264                 }
1265         }
1266
1267         error("No signal named %s on interface %s", name, interface);
1268         return FALSE;
1269 }
1270
1271 static dbus_bool_t emit_signal_valist(DBusConnection *conn,
1272                                                 const char *path,
1273                                                 const char *interface,
1274                                                 const char *name,
1275                                                 int first,
1276                                                 va_list var_args)
1277 {
1278         DBusMessage *signal;
1279         dbus_bool_t ret;
1280         const GDBusArgInfo *args;
1281
1282         if (!check_signal(conn, path, interface, name, &args))
1283                 return FALSE;
1284
1285         signal = dbus_message_new_signal(path, interface, name);
1286         if (signal == NULL) {
1287                 error("Unable to allocate new %s.%s signal", interface,  name);
1288                 return FALSE;
1289         }
1290
1291         ret = dbus_message_append_args_valist(signal, first, var_args);
1292         if (!ret)
1293                 goto fail;
1294
1295         if (g_dbus_args_have_signature(args, signal) == FALSE) {
1296                 error("%s.%s: got unexpected signature '%s'", interface, name,
1297                                         dbus_message_get_signature(signal));
1298                 ret = FALSE;
1299                 goto fail;
1300         }
1301
1302         ret = dbus_connection_send(conn, signal, NULL);
1303
1304 fail:
1305         dbus_message_unref(signal);
1306
1307         return ret;
1308 }
1309
1310 gboolean g_dbus_register_interface(DBusConnection *connection,
1311                                         const char *path, const char *name,
1312                                         const GDBusMethodTable *methods,
1313                                         const GDBusSignalTable *signals,
1314                                         const GDBusPropertyTable *properties,
1315                                         void *user_data,
1316                                         GDBusDestroyFunction destroy)
1317 {
1318         struct generic_data *data;
1319
1320         data = object_path_ref(connection, path);
1321         if (data == NULL)
1322                 return FALSE;
1323
1324         if (find_interface(data->interfaces, name)) {
1325                 object_path_unref(connection, path);
1326                 return FALSE;
1327         }
1328
1329         add_interface(data, name, methods, signals, properties, user_data,
1330                                                                 destroy);
1331
1332         g_free(data->introspect);
1333         data->introspect = NULL;
1334
1335         return TRUE;
1336 }
1337
1338 gboolean g_dbus_unregister_interface(DBusConnection *connection,
1339                                         const char *path, const char *name)
1340 {
1341         struct generic_data *data = NULL;
1342
1343         if (path == NULL)
1344                 return FALSE;
1345
1346         if (dbus_connection_get_object_path_data(connection, path,
1347                                                 (void *) &data) == FALSE)
1348                 return FALSE;
1349
1350         if (data == NULL)
1351                 return FALSE;
1352
1353         if (remove_interface(data, name) == FALSE)
1354                 return FALSE;
1355
1356         g_free(data->introspect);
1357         data->introspect = NULL;
1358
1359         object_path_unref(connection, data->path);
1360
1361         return TRUE;
1362 }
1363
1364 gboolean g_dbus_register_security(const GDBusSecurityTable *security)
1365 {
1366         if (security_table != NULL)
1367                 return FALSE;
1368
1369         security_table = security;
1370
1371         return TRUE;
1372 }
1373
1374 gboolean g_dbus_unregister_security(const GDBusSecurityTable *security)
1375 {
1376         security_table = NULL;
1377
1378         return TRUE;
1379 }
1380
1381 DBusMessage *g_dbus_create_error_valist(DBusMessage *message, const char *name,
1382                                         const char *format, va_list args)
1383 {
1384         char str[1024];
1385
1386         vsnprintf(str, sizeof(str), format, args);
1387
1388         return dbus_message_new_error(message, name, str);
1389 }
1390
1391 DBusMessage *g_dbus_create_error(DBusMessage *message, const char *name,
1392                                                 const char *format, ...)
1393 {
1394         va_list args;
1395         DBusMessage *reply;
1396
1397         va_start(args, format);
1398
1399         reply = g_dbus_create_error_valist(message, name, format, args);
1400
1401         va_end(args);
1402
1403         return reply;
1404 }
1405
1406 DBusMessage *g_dbus_create_reply_valist(DBusMessage *message,
1407                                                 int type, va_list args)
1408 {
1409         DBusMessage *reply;
1410
1411         reply = dbus_message_new_method_return(message);
1412         if (reply == NULL)
1413                 return NULL;
1414
1415         if (dbus_message_append_args_valist(reply, type, args) == FALSE) {
1416                 dbus_message_unref(reply);
1417                 return NULL;
1418         }
1419
1420         return reply;
1421 }
1422
1423 DBusMessage *g_dbus_create_reply(DBusMessage *message, int type, ...)
1424 {
1425         va_list args;
1426         DBusMessage *reply;
1427
1428         va_start(args, type);
1429
1430         reply = g_dbus_create_reply_valist(message, type, args);
1431
1432         va_end(args);
1433
1434         return reply;
1435 }
1436
1437 gboolean g_dbus_send_message(DBusConnection *connection, DBusMessage *message)
1438 {
1439         dbus_bool_t result;
1440
1441         if (dbus_message_get_type(message) == DBUS_MESSAGE_TYPE_METHOD_CALL)
1442                 dbus_message_set_no_reply(message, TRUE);
1443
1444         result = dbus_connection_send(connection, message, NULL);
1445
1446         dbus_message_unref(message);
1447
1448         return result;
1449 }
1450
1451 gboolean g_dbus_send_reply_valist(DBusConnection *connection,
1452                                 DBusMessage *message, int type, va_list args)
1453 {
1454         DBusMessage *reply;
1455
1456         reply = dbus_message_new_method_return(message);
1457         if (reply == NULL)
1458                 return FALSE;
1459
1460         if (dbus_message_append_args_valist(reply, type, args) == FALSE) {
1461                 dbus_message_unref(reply);
1462                 return FALSE;
1463         }
1464
1465         return g_dbus_send_message(connection, reply);
1466 }
1467
1468 gboolean g_dbus_send_reply(DBusConnection *connection,
1469                                 DBusMessage *message, int type, ...)
1470 {
1471         va_list args;
1472         gboolean result;
1473
1474         va_start(args, type);
1475
1476         result = g_dbus_send_reply_valist(connection, message, type, args);
1477
1478         va_end(args);
1479
1480         return result;
1481 }
1482
1483 gboolean g_dbus_emit_signal(DBusConnection *connection,
1484                                 const char *path, const char *interface,
1485                                 const char *name, int type, ...)
1486 {
1487         va_list args;
1488         gboolean result;
1489
1490         va_start(args, type);
1491
1492         result = emit_signal_valist(connection, path, interface,
1493                                                         name, type, args);
1494
1495         va_end(args);
1496
1497         return result;
1498 }
1499
1500 gboolean g_dbus_emit_signal_valist(DBusConnection *connection,
1501                                 const char *path, const char *interface,
1502                                 const char *name, int type, va_list args)
1503 {
1504         return emit_signal_valist(connection, path, interface,
1505                                                         name, type, args);
1506 }
1507
1508 static void process_properties_from_interface(struct generic_data *data,
1509                                                 struct interface_data *iface)
1510 {
1511         GSList *l;
1512         DBusMessage *signal;
1513         DBusMessageIter iter, dict, array;
1514
1515         if (iface->pending_prop == NULL)
1516                 return;
1517
1518         signal = dbus_message_new_signal(data->path,
1519                         DBUS_INTERFACE_PROPERTIES, "PropertiesChanged");
1520         if (signal == NULL) {
1521                 error("Unable to allocate new " DBUS_INTERFACE_PROPERTIES
1522                                                 ".PropertiesChanged signal");
1523                 return;
1524         }
1525
1526         iface->pending_prop = g_slist_reverse(iface->pending_prop);
1527
1528         dbus_message_iter_init_append(signal, &iter);
1529         dbus_message_iter_append_basic(&iter, DBUS_TYPE_STRING, &iface->name);
1530         dbus_message_iter_open_container(&iter, DBUS_TYPE_ARRAY,
1531                         DBUS_DICT_ENTRY_BEGIN_CHAR_AS_STRING
1532                         DBUS_TYPE_STRING_AS_STRING DBUS_TYPE_VARIANT_AS_STRING
1533                         DBUS_DICT_ENTRY_END_CHAR_AS_STRING, &dict);
1534
1535         for (l = iface->pending_prop; l != NULL; l = l->next) {
1536                 GDBusPropertyTable *p = l->data;
1537
1538                 if (p->get == NULL)
1539                         continue;
1540
1541                 if (p->exists != NULL && !p->exists(p, iface->user_data))
1542                         continue;
1543
1544                 append_property(iface, p, &dict);
1545         }
1546
1547         dbus_message_iter_close_container(&iter, &dict);
1548         dbus_message_iter_open_container(&iter, DBUS_TYPE_ARRAY,
1549                                 DBUS_TYPE_STRING_AS_STRING, &array);
1550         dbus_message_iter_close_container(&iter, &array);
1551
1552         g_dbus_send_message(data->conn, signal);
1553
1554         g_slist_free(iface->pending_prop);
1555         iface->pending_prop = NULL;
1556 }
1557
1558 static void process_property_changes(struct generic_data *data)
1559 {
1560         GSList *l;
1561
1562         for (l = data->interfaces; l != NULL; l = l->next) {
1563                 struct interface_data *iface = l->data;
1564
1565                 process_properties_from_interface(data, iface);
1566         }
1567
1568         data->pending_prop = FALSE;
1569 }
1570
1571 void g_dbus_emit_property_changed(DBusConnection *connection,
1572                                 const char *path, const char *interface,
1573                                 const char *name)
1574 {
1575         const GDBusPropertyTable *property;
1576         struct generic_data *data;
1577         struct interface_data *iface;
1578
1579         if (!dbus_connection_get_object_path_data(connection, path,
1580                                         (void **) &data) || data == NULL)
1581                 return;
1582
1583         iface = find_interface(data->interfaces, interface);
1584         if (iface == NULL)
1585                 return;
1586
1587         property = find_property(iface->properties, name);
1588         if (property == NULL) {
1589                 error("Could not find property %s in %p", name,
1590                                                         iface->properties);
1591                 return;
1592         }
1593
1594         data->pending_prop = TRUE;
1595         iface->pending_prop = g_slist_prepend(iface->pending_prop,
1596                                                 (void *) property);
1597
1598         if (!data->process_id) {
1599                 data->process_id = g_idle_add(process_changes, data);
1600                 return;
1601         }
1602 }