dbind/dbind.c

   1 #include "config.h"
   2 #include <stdio.h>
   3 #define DBUS_API_SUBJECT_TO_CHANGE
   4 #include <dbind/dbind.h>
   5 #include <dbind/dbind-any.h>
   6 #include <glib.h>
   7 #include <stdarg.h>
   8
   9 /*
  10  * FIXME: compare types - to ensure they match &
  11  *        do dynamic padding of structures etc.
  12  */
  13
  14 struct _DBindContext {
  15     DBusConnection *cnx;
  16 };
  17
  18 DBindContext *
  19 dbind_create_context (DBusBusType type, DBusError *opt_error)
  20 {
  21     DBindContext *ctx = NULL;
  22     DBusConnection *cnx;
  23     DBusError *err, real_err;
  24
  25     if (opt_error)
  26         err = opt_error;
  27     else {
  28         dbus_error_init (&real_err);
  29         err = &real_err;
  30     }
  31
  32     cnx = dbus_bus_get (DBUS_BUS_SESSION, err);
  33     if (!cnx)
  34         goto out;
  35
  36     ctx = g_new0 (DBindContext, 1);
  37     ctx->cnx = cnx;
  38
  39 out:
  40     if (err == &real_err)
  41         dbus_error_free (err);
  42
  43     return ctx;
  44 }
  45
  46 void
  47 dbind_context_free (DBindContext *ctx)
  48 {
  49     if (!ctx)
  50         return;
  51     dbus_connection_unref (ctx->cnx);
  52     g_free (ctx);
  53 }
  54
  55 dbus_bool_t
  56 dbind_context_method_call (DBindContext *ctx,
  57                            const char *bus_name,
  58                            const char *path,
  59                            const char *interface,
  60                            const char *method,
  61                            DBusError *opt_error,
  62                            const char *arg_types,
  63                            ...)
  64 {
  65     dbus_bool_t success;
  66     va_list args;
  67
  68     va_start (args, arg_types);
  69
  70     success = dbind_connection_method_call_va
  71         (ctx->cnx, bus_name, path, interface, method, opt_error, arg_types, args);
  72
  73     va_end (args);
  74
  75     return success;
  76 }
  77
  78 dbus_bool_t
  79 dbind_connection_method_call (DBusConnection *cnx,
  80                               const char *bus_name,
  81                               const char *path,
  82                               const char *interface,
  83                               const char *method,
  84                               DBusError *opt_error,
  85                               const char *arg_types,
  86                               ...)
  87 {
  88     dbus_bool_t success;
  89     va_list args;
  90
  91     va_start (args, arg_types);
  92
  93     success = dbind_connection_method_call_va
  94         (cnx, bus_name, path, interface, method, opt_error, arg_types, args);
  95
  96     va_end (args);
  97
  98     return success;
  99 }
 100
 101 dbus_bool_t
 102 dbind_connection_method_call_va (DBusConnection *cnx,
 103                                  const char *bus_name,
 104                                  const char *path,
 105                                  const char *interface,
 106                                  const char *method,
 107                                  DBusError *opt_error,
 108                                  const char *arg_types,
 109                                  va_list     args)
 110 {
 111     dbus_bool_t success = FALSE;
 112     DBusMessage *msg = NULL, *reply = NULL;
 113     DBusError *err, real_err;
 114     char *p;
 115
 116     if (opt_error)
 117         err = opt_error;
 118     else {
 119         dbus_error_init (&real_err);
 120         err = &real_err;
 121     }
 122
 123     msg = dbus_message_new_method_call (bus_name, path, interface, method);
 124     if (!msg)
 125         goto out;
 126     dbus_message_set_auto_start (msg, TRUE);
 127
 128     /* marshal */
 129     p = (char *)arg_types;
 130     {
 131         DBusMessageIter iter;
 132
 133         dbus_message_iter_init_append (msg, &iter);
 134         /* special case base-types since we need to walk the stack worse-luck */
 135         for (;*p != '\0' && *p != '=';) {
 136             int intarg;
 137             void *ptrarg;
 138             double doublearg;
 139             dbus_int64_t int64arg;
 140             void *arg = NULL;
 141
 142             switch (*p) {
 143             case DBUS_TYPE_BYTE:
 144             case DBUS_TYPE_BOOLEAN:
 145             case DBUS_TYPE_INT16:
 146             case DBUS_TYPE_UINT16:
 147             case DBUS_TYPE_INT32:
 148             case DBUS_TYPE_UINT32:
 149                 intarg = va_arg (args, int);
 150                 arg = &intarg;
 151                 break;
 152             case DBUS_TYPE_INT64:
 153             case DBUS_TYPE_UINT64:
 154                 int64arg = va_arg (args, dbus_int64_t);
 155                 arg = &int64arg;
 156                 break;
 157             case DBUS_TYPE_DOUBLE:
 158                 doublearg = va_arg (args, double);
 159                 arg = &doublearg;
 160                 break;
 161             /* ptr types */
 162             case DBUS_TYPE_STRING:
 163             case DBUS_TYPE_OBJECT_PATH:
 164             case DBUS_TYPE_SIGNATURE:
 165             case DBUS_TYPE_ARRAY:
 166             case DBUS_TYPE_DICT_ENTRY:
 167                 ptrarg = va_arg (args, void *);
 168                 arg = &ptrarg;
 169                 break;
 170             case DBUS_STRUCT_BEGIN_CHAR:
 171                 ptrarg = va_arg (args, void *);
 172                 arg = ptrarg;
 173                 break;
 174
 175             case DBUS_TYPE_VARIANT:
 176                 fprintf (stderr, "No variant support yet - very toolkit specific\n");
 177                 ptrarg = va_arg (args, void *);
 178                 arg = &ptrarg;
 179                 break;
 180             default:
 181                 fprintf (stderr, "Unknown / invalid arg type %c\n", *p);
 182                 break;
 183             }
 184             if (arg != NULL)
 185                 dbind_any_marshal (&iter, &p, &arg);
 186             }
 187     }
 188
 189     reply = dbus_connection_send_with_reply_and_block (cnx, msg, -1, err);
 190     if (!reply)
 191         goto out;
 192
 193     /* demarshal */
 194     if (p[0] == '=' && p[1] == '>')
 195     {
 196         DBusMessageIter iter;
 197         p += 2;
 198         dbus_message_iter_init (reply, &iter);
 199         for (;*p != '\0';) {
 200             void *arg = va_arg (args, void *);
 201             dbind_any_demarshal (&iter, &p, &arg);
 202         }
 203     }
 204
 205     success = TRUE;
 206 out:
 207     if (msg)
 208         dbus_message_unref (msg);
 209
 210     if (reply)
 211         dbus_message_unref (reply);
 212
 213     if (err == &real_err)
 214         dbus_error_free (err);
 215
 216     return success;
 217 }
 218