dbind/dbind.c

   1 /*
   2  * Copyright 2008-2011 Novell, Inc.
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Library General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Library General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Library General Public
  15  * License along with this library; if not, write to the
  16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  * Boston, MA 02111-1307, USA.
  18  */
  19
  20 #include <stdio.h>
  21 #include <stdarg.h>
  22 #include <sys/time.h>
  23 #include <string.h>
  24 #include <glib.h>
  25
  26 #include "config.h"
  27 #include "dbind/dbind.h"
  28 #include "atspi/atspi-gmain.h"
  29
  30 static int dbind_timeout = -1;
  31
  32 /*
  33  * FIXME: compare types - to ensure they match &
  34  *        do dynamic padding of structures etc.
  35  */
  36
  37 /*---------------------------------------------------------------------------*/
  38
  39 typedef struct _SpiReentrantCallClosure
  40 {
  41   DBusMessage *reply;
  42 } SpiReentrantCallClosure;
  43
  44 static void
  45 set_reply (DBusPendingCall * pending, void *user_data)
  46 {
  47   SpiReentrantCallClosure* closure = (SpiReentrantCallClosure *) user_data;
  48
  49   closure->reply = dbus_pending_call_steal_reply (pending);
  50   dbus_pending_call_unref (pending);
  51 }
  52
  53 static gint
  54 time_elapsed (struct timeval *origin)
  55 {
  56   struct timeval tv;
  57
  58   gettimeofday (&tv, NULL);
  59   return (tv.tv_sec - origin->tv_sec) * 1000 + (tv.tv_usec - origin->tv_usec) / 1000;
  60 }
  61
  62 DBusMessage *
  63 dbind_send_and_allow_reentry (DBusConnection * bus, DBusMessage * message, DBusError *error)
  64 {
  65   DBusPendingCall *pending;
  66   SpiReentrantCallClosure *closure;
  67   const char *unique_name = dbus_bus_get_unique_name (bus);
  68   const char *destination = dbus_message_get_destination (message);
  69   struct timeval tv;
  70   DBusMessage *ret;
  71
  72   if (unique_name && destination &&
  73       strcmp (destination, unique_name) != 0)
  74     return dbus_connection_send_with_reply_and_block (bus, message, dbind_timeout, error);
  75
  76   closure = g_new0 (SpiReentrantCallClosure, 1);
  77   closure->reply = NULL;
  78   atspi_dbus_connection_setup_with_g_main(bus, NULL);
  79   if (!dbus_connection_send_with_reply (bus, message, &pending, dbind_timeout))
  80       return NULL;
  81   if (!pending)
  82     return NULL;
  83   dbus_pending_call_set_notify (pending, set_reply, (void *) closure, g_free);
  84
  85   closure->reply = NULL;
  86   gettimeofday (&tv, NULL);
  87   dbus_pending_call_ref (pending);
  88   while (!closure->reply)
  89     {
  90       if (!dbus_connection_read_write_dispatch (bus, dbind_timeout))
  91         {
  92           dbus_pending_call_unref (pending);
  93           return NULL;
  94         }
  95       if (time_elapsed (&tv) > dbind_timeout)
  96         {
  97           dbus_pending_call_unref (pending);
  98           dbus_set_error_const (error, "org.freedesktop.DBus.Error.NoReply",
  99                                 "timeout from dbind");
 100           return NULL;
 101         }
 102     }
 103
 104   ret = closure->reply;
 105   dbus_pending_call_unref (pending);
 106   return ret;
 107 }
 108
 109 dbus_bool_t
 110 dbind_method_call_reentrant_va (DBusConnection *cnx,
 111                                 const char     *bus_name,
 112                                 const char     *path,
 113                                 const char     *interface,
 114                                 const char     *method,
 115                                 DBusError      *opt_error,
 116                                 const char     *arg_types,
 117                                 va_list         args)
 118 {
 119     dbus_bool_t success = FALSE;
 120     DBusMessage *msg = NULL, *reply = NULL;
 121     DBusMessageIter iter;
 122     DBusError *err, real_err;
 123     const char *p;
 124   va_list args_demarshal;
 125
 126   va_copy (args_demarshal, args);
 127     if (opt_error)
 128         err = opt_error;
 129     else {
 130         dbus_error_init (&real_err);
 131         err = &real_err;
 132     }
 133
 134     msg = dbus_message_new_method_call (bus_name, path, interface, method);
 135     if (!msg)
 136         goto out;
 137
 138     p = arg_types;
 139     dbus_message_iter_init_append (msg, &iter);
 140     dbind_any_marshal_va (&iter, &p, args);
 141
 142     reply = dbind_send_and_allow_reentry (cnx, msg, err);
 143     if (!reply)
 144         goto out;
 145
 146     if (dbus_message_get_type (reply) == DBUS_MESSAGE_TYPE_ERROR)
 147     {
 148       const char *name = dbus_message_get_error_name (reply);
 149       goto out;
 150     }
 151     /* demarshal */
 152     if (p[0] == '=' && p[1] == '>')
 153     {
 154         DBusMessageIter iter;
 155         dbus_message_iter_init (reply, &iter);
 156         p = arg_types;
 157         dbind_any_demarshal_va (&iter, &p, args_demarshal);
 158     }
 159
 160     success = TRUE;
 161 out:
 162     if (msg)
 163         dbus_message_unref (msg);
 164
 165     if (reply)
 166         dbus_message_unref (reply);
 167
 168     if (err == &real_err)
 169         dbus_error_free (err);
 170
 171     va_end (args_demarshal);
 172     return success;
 173 }
 174
 175 /**
 176  * dbind_method_call_reentrant:
 177  *
 178  * @cnx:       A D-Bus Connection used to make the method call.
 179  * @bus_name:  The D-Bus bus name of the program where the method call should
 180  *             be made.
 181  * @path:      The D-Bus object path that should handle the method.
 182  * @interface: The D-Bus interface used to scope the method name.
 183  * @method:    Method to be invoked.
 184  * @opt_error: D-Bus error.
 185  * @arg_types: Variable length arguments interleaving D-Bus argument types
 186  *             and pointers to argument data.
 187  *
 188  * Makes a D-Bus method call using the supplied location data, method name and
 189  * argument data.This function is re-entrant. It continuously reads from the D-Bus
 190  * bus and dispatches messages until a reply has been recieved.
 191  **/
 192 dbus_bool_t
 193 dbind_method_call_reentrant (DBusConnection *cnx,
 194                              const char     *bus_name,
 195                              const char     *path,
 196                              const char     *interface,
 197                              const char     *method,
 198                              DBusError      *opt_error,
 199                              const char     *arg_types,
 200                              ...)
 201 {
 202     dbus_bool_t success = FALSE;
 203     va_list args;
 204
 205     va_start (args, arg_types);
 206     success = dbind_method_call_reentrant_va (cnx,
 207                                               bus_name,
 208                                               path,
 209                                               interface,
 210                                               method,
 211                                               opt_error,
 212                                               arg_types,
 213                                               args);
 214     va_end (args);
 215
 216     return success;
 217 }
 218
 219 /*---------------------------------------------------------------------------*/
 220
 221 dbus_bool_t
 222 dbind_emit_signal_va (DBusConnection *cnx,
 223                       const char     *path,
 224                       const char     *interface,
 225                       const char     *signal,
 226                       DBusError      *opt_error,
 227                       const char     *arg_types,
 228                       va_list         args)
 229 {
 230     dbus_bool_t success = FALSE;
 231     DBusMessage *msg = NULL;
 232     DBusMessageIter iter;
 233     DBusError *err, real_err;
 234     const char *p;
 235
 236     if (opt_error)
 237         err = opt_error;
 238     else {
 239         dbus_error_init (&real_err);
 240         err = &real_err;
 241     }
 242
 243     msg = dbus_message_new_signal (path, interface, signal);
 244     if (!msg)
 245         goto out;
 246
 247     p = arg_types;
 248     dbus_message_iter_init_append (msg, &iter);
 249     dbind_any_marshal_va (&iter, &p, args);
 250
 251     if (!dbus_connection_send (cnx, msg, NULL))
 252        goto out;
 253
 254     success = TRUE;
 255 out:
 256
 257     if (msg)
 258         dbus_message_unref (msg);
 259
 260     if (err == &real_err)
 261         dbus_error_free (err);
 262
 263     return success;
 264 }
 265
 266 /**
 267  * dbind_emit_signal:
 268  *
 269  * @cnx:       A D-Bus Connection used to make the method call.
 270  * @path:      The D-Bus object path that this signal is emitted from.
 271  * @interface: The D-Bus interface used to scope the method name.
 272  * @signal:    Name of signal to emit.
 273  * @opt_error: D-Bus error.
 274  * @arg_types: Variable length arguments interleaving D-Bus argument types
 275  *             and pointers to argument data.
 276  *
 277  * Emits a D-Bus signal  using the supplied signal name and argument data.
 278  **/
 279 dbus_bool_t
 280 dbind_emit_signal (DBusConnection *cnx,
 281                    const char     *path,
 282                    const char     *interface,
 283                    const char     *signal,
 284                    DBusError      *opt_error,
 285                    const char     *arg_types,
 286                    ...)
 287 {
 288     dbus_bool_t success = FALSE;
 289     va_list args;
 290
 291     va_start (args, arg_types);
 292     success = dbind_emit_signal_va (cnx, path, interface, signal, opt_error, arg_types, args);
 293     va_end (args);
 294
 295     return success;
 296 }
 297 void
 298 dbind_set_timeout (int timeout)
 299 {
 300   dbind_timeout = timeout;
 301 }
 302
 303
 304 /*END------------------------------------------------------------------------*/