5 * Copyright (C) 2004-2010 Marcel Holtmann <marcel@holtmann.org>
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.
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.
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
32 #include <dbus/dbus.h>
41 unsigned int refcount;
46 struct interface_data {
48 const GDBusMethodTable *methods;
49 const GDBusSignalTable *signals;
50 const GDBusPropertyTable *properties;
52 GDBusDestroyFunction destroy;
55 struct security_data {
56 GDBusPendingReply pending;
58 const GDBusMethodTable *method;
59 void *iface_user_data;
62 static void print_arguments(GString *gstr, const char *sig,
63 const char *direction)
67 for (i = 0; sig[i]; i++) {
69 int struct_level, dict_level;
74 struct_level = dict_level = 0;
75 memset(type, 0, sizeof(type));
77 /* Gather enough data to have a single complete type */
78 for (len = 0; len < (sizeof(type) - 1) && sig[i]; len++, i++) {
85 if (struct_level <= 0 && dict_level <= 0)
93 if (struct_level <= 0 && dict_level <= 0)
99 if (struct_level <= 0 && dict_level <= 0)
112 g_string_append_printf(gstr,
113 "\t\t\t<arg type=\"%s\" direction=\"%s\"/>\n",
116 g_string_append_printf(gstr,
117 "\t\t\t<arg type=\"%s\"/>\n",
122 static void generate_interface_xml(GString *gstr, struct interface_data *iface)
124 const GDBusMethodTable *method;
125 const GDBusSignalTable *signal;
127 for (method = iface->methods; method && method->name; method++) {
128 if (!strlen(method->signature) && !strlen(method->reply))
129 g_string_append_printf(gstr, "\t\t<method name=\"%s\"/>\n",
132 g_string_append_printf(gstr, "\t\t<method name=\"%s\">\n",
134 print_arguments(gstr, method->signature, "in");
135 print_arguments(gstr, method->reply, "out");
136 g_string_append_printf(gstr, "\t\t</method>\n");
140 for (signal = iface->signals; signal && signal->name; signal++) {
141 if (!strlen(signal->signature))
142 g_string_append_printf(gstr, "\t\t<signal name=\"%s\"/>\n",
145 g_string_append_printf(gstr, "\t\t<signal name=\"%s\">\n",
147 print_arguments(gstr, signal->signature, NULL);
148 g_string_append_printf(gstr, "\t\t</signal>\n");
153 static void generate_introspection_xml(DBusConnection *conn,
154 struct generic_data *data, const char *path)
161 g_free(data->introspect);
163 gstr = g_string_new(DBUS_INTROSPECT_1_0_XML_DOCTYPE_DECL_NODE);
165 g_string_append_printf(gstr, "<node name=\"%s\">\n", path);
167 for (list = data->interfaces; list; list = list->next) {
168 struct interface_data *iface = list->data;
170 g_string_append_printf(gstr, "\t<interface name=\"%s\">\n",
173 generate_interface_xml(gstr, iface);
175 g_string_append_printf(gstr, "\t</interface>\n");
178 if (!dbus_connection_list_registered(conn, path, &children))
181 for (i = 0; children[i]; i++)
182 g_string_append_printf(gstr, "\t<node name=\"%s\"/>\n",
185 dbus_free_string_array(children);
188 g_string_append_printf(gstr, "</node>\n");
190 data->introspect = g_string_free(gstr, FALSE);
193 static DBusMessage *introspect(DBusConnection *connection,
194 DBusMessage *message, void *user_data)
196 struct generic_data *data = user_data;
199 if (!dbus_message_has_signature(message, DBUS_TYPE_INVALID_AS_STRING)) {
200 error("Unexpected signature to introspect call");
204 if (!data->introspect)
205 generate_introspection_xml(connection, data,
206 dbus_message_get_path(message));
208 reply = dbus_message_new_method_return(message);
212 dbus_message_append_args(reply, DBUS_TYPE_STRING, &data->introspect,
218 static DBusHandlerResult process_message(DBusConnection *connection,
219 DBusMessage *message, const GDBusMethodTable *method,
220 void *iface_user_data)
224 reply = method->function(connection, message, iface_user_data);
226 if (method->flags & G_DBUS_METHOD_FLAG_NOREPLY) {
228 dbus_message_unref(reply);
229 return DBUS_HANDLER_RESULT_HANDLED;
232 if (method->flags & G_DBUS_METHOD_FLAG_ASYNC) {
234 return DBUS_HANDLER_RESULT_HANDLED;
238 return DBUS_HANDLER_RESULT_NEED_MEMORY;
240 dbus_connection_send(connection, reply, NULL);
241 dbus_message_unref(reply);
243 return DBUS_HANDLER_RESULT_HANDLED;
246 static GDBusPendingReply next_pending = 1;
247 static GSList *pending_security = NULL;
249 static const GDBusSecurityTable *security_table = NULL;
251 void g_dbus_pending_success(DBusConnection *connection,
252 GDBusPendingReply pending)
256 for (list = pending_security; list; list = list->next) {
257 struct security_data *secdata = list->data;
258 DBusHandlerResult result;
260 if (secdata->pending != pending)
263 pending_security = g_slist_remove(pending_security, secdata);
265 result = process_message(connection, secdata->message,
266 secdata->method, secdata->iface_user_data);
268 dbus_message_unref(secdata->message);
274 void g_dbus_pending_error_valist(DBusConnection *connection,
275 GDBusPendingReply pending, const char *name,
276 const char *format, va_list args)
280 for (list = pending_security; list; list = list->next) {
281 struct security_data *secdata = list->data;
284 if (secdata->pending != pending)
287 pending_security = g_slist_remove(pending_security, secdata);
289 reply = g_dbus_create_error_valist(secdata->message,
292 dbus_connection_send(connection, reply, NULL);
293 dbus_message_unref(reply);
296 dbus_message_unref(secdata->message);
302 void g_dbus_pending_error(DBusConnection *connection,
303 GDBusPendingReply pending,
304 const char *name, const char *format, ...)
308 va_start(args, format);
310 g_dbus_pending_error_valist(connection, pending, name, format, args);
315 static gboolean check_privilege(DBusConnection *conn, DBusMessage *msg,
316 const GDBusMethodTable *method, void *iface_user_data)
318 const GDBusSecurityTable *security;
320 for (security = security_table; security && security->privilege;
322 struct security_data *secdata;
323 gboolean interaction;
325 if (security->privilege != method->privilege)
328 secdata = g_new(struct security_data, 1);
329 secdata->pending = next_pending++;
330 secdata->message = dbus_message_ref(msg);
331 secdata->method = method;
332 secdata->iface_user_data = iface_user_data;
334 pending_security = g_slist_prepend(pending_security, secdata);
336 if (security->flags & G_DBUS_SECURITY_FLAG_ALLOW_INTERACTION)
341 if (security->function)
342 security->function(conn, security->action,
343 interaction, secdata->pending);
351 static void generic_unregister(DBusConnection *connection, void *user_data)
353 struct generic_data *data = user_data;
355 g_free(data->introspect);
359 static struct interface_data *find_interface(GSList *interfaces,
367 for (list = interfaces; list; list = list->next) {
368 struct interface_data *iface = list->data;
369 if (!strcmp(name, iface->name))
376 static DBusHandlerResult generic_message(DBusConnection *connection,
377 DBusMessage *message, void *user_data)
379 struct generic_data *data = user_data;
380 struct interface_data *iface;
381 const GDBusMethodTable *method;
382 const char *interface;
384 interface = dbus_message_get_interface(message);
386 iface = find_interface(data->interfaces, interface);
388 return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
390 for (method = iface->methods; method &&
391 method->name && method->function; method++) {
392 if (dbus_message_is_method_call(message, iface->name,
393 method->name) == FALSE)
396 if (dbus_message_has_signature(message,
397 method->signature) == FALSE)
400 if (check_privilege(connection, message, method,
401 iface->user_data) == TRUE)
402 return DBUS_HANDLER_RESULT_HANDLED;
404 return process_message(connection, message, method,
408 return DBUS_HANDLER_RESULT_NOT_YET_HANDLED;
411 static DBusObjectPathVTable generic_table = {
412 .unregister_function = generic_unregister,
413 .message_function = generic_message,
416 static void invalidate_parent_data(DBusConnection *conn, const char *child_path)
418 struct generic_data *data = NULL;
419 char *parent_path, *slash;
421 parent_path = g_strdup(child_path);
422 slash = strrchr(parent_path, '/');
426 if (slash == parent_path && parent_path[1] != '\0')
427 parent_path[1] = '\0';
431 if (!strlen(parent_path))
434 if (!dbus_connection_get_object_path_data(conn, parent_path,
436 invalidate_parent_data(conn, parent_path);
443 g_free(data->introspect);
444 data->introspect = NULL;
450 static GDBusMethodTable introspect_methods[] = {
451 { "Introspect", "", "s", introspect },
455 static void add_interface(struct generic_data *data, const char *name,
456 const GDBusMethodTable *methods,
457 const GDBusSignalTable *signals,
458 const GDBusPropertyTable *properties,
460 GDBusDestroyFunction destroy)
462 struct interface_data *iface;
464 iface = g_new0(struct interface_data, 1);
465 iface->name = g_strdup(name);
466 iface->methods = methods;
467 iface->signals = signals;
468 iface->properties = properties;
469 iface->user_data = user_data;
470 iface->destroy = destroy;
472 data->interfaces = g_slist_append(data->interfaces, iface);
475 static struct generic_data *object_path_ref(DBusConnection *connection,
478 struct generic_data *data;
480 if (dbus_connection_get_object_path_data(connection, path,
481 (void *) &data) == TRUE) {
488 data = g_new0(struct generic_data, 1);
491 data->introspect = g_strdup(DBUS_INTROSPECT_1_0_XML_DOCTYPE_DECL_NODE "<node></node>");
493 if (!dbus_connection_register_object_path(connection, path,
494 &generic_table, data)) {
495 g_free(data->introspect);
500 invalidate_parent_data(connection, path);
502 add_interface(data, DBUS_INTERFACE_INTROSPECTABLE,
503 introspect_methods, NULL, NULL, data, NULL);
508 static gboolean remove_interface(struct generic_data *data, const char *name)
510 struct interface_data *iface;
512 iface = find_interface(data->interfaces, name);
516 data->interfaces = g_slist_remove(data->interfaces, iface);
519 iface->destroy(iface->user_data);
527 static void object_path_unref(DBusConnection *connection, const char *path)
529 struct generic_data *data = NULL;
531 if (dbus_connection_get_object_path_data(connection, path,
532 (void *) &data) == FALSE)
540 if (data->refcount > 0)
543 remove_interface(data, DBUS_INTERFACE_INTROSPECTABLE);
545 invalidate_parent_data(connection, path);
547 dbus_connection_unregister_object_path(connection, path);
550 static gboolean check_signal(DBusConnection *conn, const char *path,
551 const char *interface, const char *name,
554 struct generic_data *data = NULL;
555 struct interface_data *iface;
556 const GDBusSignalTable *signal;
559 if (!dbus_connection_get_object_path_data(conn, path,
560 (void *) &data) || !data) {
561 error("dbus_connection_emit_signal: path %s isn't registered",
566 iface = find_interface(data->interfaces, interface);
568 error("dbus_connection_emit_signal: %s does not implement %s",
573 for (signal = iface->signals; signal && signal->name; signal++) {
574 if (!strcmp(signal->name, name)) {
575 *args = signal->signature;
581 error("No signal named %s on interface %s", name, interface);
588 static dbus_bool_t emit_signal_valist(DBusConnection *conn,
590 const char *interface,
597 const char *signature, *args;
599 if (!check_signal(conn, path, interface, name, &args))
602 signal = dbus_message_new_signal(path, interface, name);
604 error("Unable to allocate new %s.%s signal", interface, name);
608 ret = dbus_message_append_args_valist(signal, first, var_args);
612 signature = dbus_message_get_signature(signal);
613 if (strcmp(args, signature) != 0) {
614 error("%s.%s: expected signature'%s' but got '%s'",
615 interface, name, args, signature);
620 ret = dbus_connection_send(conn, signal, NULL);
623 dbus_message_unref(signal);
628 gboolean g_dbus_register_interface(DBusConnection *connection,
629 const char *path, const char *name,
630 const GDBusMethodTable *methods,
631 const GDBusSignalTable *signals,
632 const GDBusPropertyTable *properties,
634 GDBusDestroyFunction destroy)
636 struct generic_data *data;
638 data = object_path_ref(connection, path);
642 if (find_interface(data->interfaces, name)) {
643 object_path_unref(connection, path);
647 add_interface(data, name, methods, signals,
648 properties, user_data, destroy);
650 g_free(data->introspect);
651 data->introspect = NULL;
656 gboolean g_dbus_unregister_interface(DBusConnection *connection,
657 const char *path, const char *name)
659 struct generic_data *data = NULL;
664 if (dbus_connection_get_object_path_data(connection, path,
665 (void *) &data) == FALSE)
671 if (remove_interface(data, name) == FALSE)
674 g_free(data->introspect);
675 data->introspect = NULL;
677 object_path_unref(connection, path);
682 gboolean g_dbus_register_security(const GDBusSecurityTable *security)
684 if (security_table != NULL)
687 security_table = security;
692 gboolean g_dbus_unregister_security(const GDBusSecurityTable *security)
694 security_table = NULL;
699 DBusMessage *g_dbus_create_error_valist(DBusMessage *message, const char *name,
700 const char *format, va_list args)
704 vsnprintf(str, sizeof(str), format, args);
706 return dbus_message_new_error(message, name, str);
709 DBusMessage *g_dbus_create_error(DBusMessage *message, const char *name,
710 const char *format, ...)
715 va_start(args, format);
717 reply = g_dbus_create_error_valist(message, name, format, args);
724 DBusMessage *g_dbus_create_reply_valist(DBusMessage *message,
725 int type, va_list args)
729 reply = dbus_message_new_method_return(message);
733 if (dbus_message_append_args_valist(reply, type, args) == FALSE) {
734 dbus_message_unref(reply);
741 DBusMessage *g_dbus_create_reply(DBusMessage *message, int type, ...)
746 va_start(args, type);
748 reply = g_dbus_create_reply_valist(message, type, args);
755 gboolean g_dbus_send_message(DBusConnection *connection, DBusMessage *message)
759 if (dbus_message_get_type(message) == DBUS_MESSAGE_TYPE_METHOD_CALL)
760 dbus_message_set_no_reply(message, TRUE);
762 result = dbus_connection_send(connection, message, NULL);
764 dbus_message_unref(message);
769 gboolean g_dbus_send_reply_valist(DBusConnection *connection,
770 DBusMessage *message, int type, va_list args)
774 reply = dbus_message_new_method_return(message);
778 if (dbus_message_append_args_valist(reply, type, args) == FALSE) {
779 dbus_message_unref(reply);
783 return g_dbus_send_message(connection, reply);
786 gboolean g_dbus_send_reply(DBusConnection *connection,
787 DBusMessage *message, int type, ...)
792 va_start(args, type);
794 result = g_dbus_send_reply_valist(connection, message, type, args);
801 gboolean g_dbus_emit_signal(DBusConnection *connection,
802 const char *path, const char *interface,
803 const char *name, int type, ...)
808 va_start(args, type);
810 result = emit_signal_valist(connection, path, interface,
818 gboolean g_dbus_emit_signal_valist(DBusConnection *connection,
819 const char *path, const char *interface,
820 const char *name, int type, va_list args)
822 return emit_signal_valist(connection, path, interface,