1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/ossrv/ofdbus/dbus-glib/dbus/dbus-glib-tool.c Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,511 @@
1.4 +/* -*- mode: C; c-file-style: "gnu" -*- */
1.5 +/* dbus-glib-tool.c Tool used by apps using glib bindings
1.6 + *
1.7 + * Copyright (C) 2003, 2004 Red Hat, Inc.
1.8 + * Portion Copyright © 2008 Nokia Corporation and/or its subsidiary(-ies). All rights reserved.
1.9 + * Licensed under the Academic Free License version 2.1
1.10 + *
1.11 + * This program is free software; you can redistribute it and/or modify
1.12 + * it under the terms of the GNU General Public License as published by
1.13 + * the Free Software Foundation; either version 2 of the License, or
1.14 + * (at your option) any later version.
1.15 + *
1.16 + * This program is distributed in the hope that it will be useful,
1.17 + * but WITHOUT ANY WARRANTY; without even the implied warranty of
1.18 + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
1.19 + * GNU General Public License for more details.
1.20 + *
1.21 + * You should have received a copy of the GNU General Public License
1.22 + * along with this program; if not, write to the Free Software
1.23 + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
1.24 + *
1.25 + */
1.26 +
1.27 + #ifdef __SYMBIAN32__
1.28 + #define VERSION "1.0.2"
1.29 + #endif
1.30 +
1.31 +#ifndef __SYMBIAN32__
1.32 +#include <config.h>
1.33 +#else
1.34 +#include "config.h"
1.35 +#endif //__SYMBIAN32__
1.36 +#include "dbus-gidl.h"
1.37 +#include "dbus-gparser.h"
1.38 +#include "dbus-gutils.h"
1.39 +#include "dbus-glib-tool.h"
1.40 +#include "dbus-binding-tool-glib.h"
1.41 +#include <locale.h>
1.42 +#ifndef __SYMBIAN32__
1.43 +#include <libintl.h>
1.44 +#define _(x) dgettext (GETTEXT_PACKAGE, x)
1.45 +#define N_(x) x
1.46 +#else
1.47 +#define _(x) x
1.48 +#define N_(x) x
1.49 +#endif
1.50 +#include <stdio.h>
1.51 +#include <stdlib.h>
1.52 +#include <errno.h>
1.53 +#include <sys/stat.h>
1.54 +#include <string.h>
1.55 +#include <time.h>
1.56 +
1.57 +#ifdef DBUS_BUILD_TESTS
1.58 +static void run_all_tests (const char *test_data_dir);
1.59 +#endif
1.60 +
1.61 +typedef enum {
1.62 + DBUS_BINDING_OUTPUT_NONE,
1.63 + DBUS_BINDING_OUTPUT_PRETTY,
1.64 + DBUS_BINDING_OUTPUT_GLIB_SERVER,
1.65 + DBUS_BINDING_OUTPUT_GLIB_CLIENT
1.66 +} DBusBindingOutputMode;
1.67 +
1.68 +static void
1.69 +indent (int depth)
1.70 +{
1.71 + depth *= 2; /* 2-space indent */
1.72 +
1.73 + while (depth > 0)
1.74 + {
1.75 + putc (' ', stdout);
1.76 + --depth;
1.77 + }
1.78 +}
1.79 +
1.80 +static void pretty_print (BaseInfo *base,
1.81 + int depth);
1.82 +
1.83 +static void
1.84 +pretty_print_list (GSList *list,
1.85 + int depth)
1.86 +{
1.87 + GSList *tmp;
1.88 +
1.89 + tmp = list;
1.90 + while (tmp != NULL)
1.91 + {
1.92 + pretty_print (tmp->data, depth);
1.93 + tmp = tmp->next;
1.94 + }
1.95 +}
1.96 +
1.97 +static void
1.98 +pretty_print (BaseInfo *base,
1.99 + int depth)
1.100 +{
1.101 + InfoType t;
1.102 + const char *name;
1.103 +
1.104 + t = base_info_get_type (base);
1.105 + name = base_info_get_name (base);
1.106 +
1.107 + indent (depth);
1.108 +
1.109 + switch (t)
1.110 + {
1.111 + case INFO_TYPE_NODE:
1.112 + {
1.113 + NodeInfo *n = (NodeInfo*) base;
1.114 +
1.115 + if (name == NULL)
1.116 + printf (_("<anonymous node> {\n"));
1.117 + else
1.118 + printf (_("node \"%s\" {\n"), name);
1.119 +
1.120 + pretty_print_list (node_info_get_interfaces (n), depth + 1);
1.121 + pretty_print_list (node_info_get_nodes (n), depth + 1);
1.122 +
1.123 + indent (depth);
1.124 + printf ("}\n");
1.125 + }
1.126 + break;
1.127 + case INFO_TYPE_INTERFACE:
1.128 + {
1.129 + InterfaceInfo *i = (InterfaceInfo*) base;
1.130 + GSList *annotations, *elt;
1.131 +
1.132 + g_assert (name != NULL);
1.133 +
1.134 + printf (_("interface \"%s\" {\n"), name);
1.135 +
1.136 + annotations = interface_info_get_annotations (i);
1.137 + for (elt = annotations; elt; elt = elt->next)
1.138 + {
1.139 + const char *name = elt->data;
1.140 + const char *value = interface_info_get_annotation (i, name);
1.141 +
1.142 + printf (_(" (binding \"%s\": \"%s\") "),
1.143 + name, value);
1.144 + }
1.145 + g_slist_free (annotations);
1.146 +
1.147 + pretty_print_list (interface_info_get_methods (i), depth + 1);
1.148 + pretty_print_list (interface_info_get_signals (i), depth + 1);
1.149 + pretty_print_list (interface_info_get_properties (i), depth + 1);
1.150 +
1.151 + indent (depth);
1.152 + printf ("}\n");
1.153 + }
1.154 + break;
1.155 + case INFO_TYPE_METHOD:
1.156 + {
1.157 + MethodInfo *m = (MethodInfo*) base;
1.158 + GSList *annotations, *elt;
1.159 +
1.160 + g_assert (name != NULL);
1.161 +
1.162 + annotations = method_info_get_annotations (m);
1.163 + printf (_("method \"%s\""), name);
1.164 + for (elt = annotations; elt; elt = elt->next)
1.165 + {
1.166 + const char *name = elt->data;
1.167 + const char *value = method_info_get_annotation (m, name);
1.168 +
1.169 + printf (_(" (annotation \"%s\": \"%s\") "),
1.170 + name, value);
1.171 + }
1.172 + g_slist_free (annotations);
1.173 +
1.174 + pretty_print_list (method_info_get_args (m), depth + 1);
1.175 +
1.176 + indent (depth);
1.177 + printf (")\n");
1.178 + }
1.179 + break;
1.180 + case INFO_TYPE_SIGNAL:
1.181 + {
1.182 + SignalInfo *s = (SignalInfo*) base;
1.183 +
1.184 + g_assert (name != NULL);
1.185 +
1.186 + printf (_("signal \"%s\" (\n"), name);
1.187 +
1.188 + pretty_print_list (signal_info_get_args (s), depth + 1);
1.189 +
1.190 + indent (depth);
1.191 + printf (")\n");
1.192 + }
1.193 + break;
1.194 + case INFO_TYPE_PROPERTY:
1.195 + {
1.196 + PropertyInfo *a = (PropertyInfo*) base;
1.197 + const char *pt = property_info_get_type (a);
1.198 + PropertyAccessFlags acc = property_info_get_access (a);
1.199 +
1.200 + printf ("%s%s %s",
1.201 + acc & PROPERTY_READ ? "read" : "",
1.202 + acc & PROPERTY_WRITE ? "write" : "",
1.203 + pt);
1.204 + if (name)
1.205 + printf (" %s\n", name);
1.206 + else
1.207 + printf ("\n");
1.208 + }
1.209 + break;
1.210 + case INFO_TYPE_ARG:
1.211 + {
1.212 + ArgInfo *a = (ArgInfo*) base;
1.213 + const char *at = arg_info_get_type (a);
1.214 + ArgDirection d = arg_info_get_direction (a);
1.215 +
1.216 + printf ("%s %s",
1.217 + d == ARG_IN ? "in" : "out",
1.218 + at);
1.219 + if (name)
1.220 + printf (" %s\n", name);
1.221 + else
1.222 + printf ("\n");
1.223 + }
1.224 + break;
1.225 + }
1.226 +}
1.227 +
1.228 +GQuark
1.229 +dbus_binding_tool_error_quark (void)
1.230 +{
1.231 + static GQuark quark = 0;
1.232 + if (!quark)
1.233 + quark = g_quark_from_static_string ("dbus_binding_tool_error");
1.234 +
1.235 + return quark;
1.236 +}
1.237 +
1.238 +static void lose (const char *fmt, ...) G_GNUC_NORETURN G_GNUC_PRINTF (1, 2);
1.239 +static void lose_gerror (const char *prefix, GError *error) G_GNUC_NORETURN;
1.240 +
1.241 +static void
1.242 +lose (const char *str, ...)
1.243 +{
1.244 + va_list args;
1.245 +
1.246 + va_start (args, str);
1.247 +
1.248 + vfprintf (stderr, str, args);
1.249 + fputc ('\n', stderr);
1.250 +
1.251 + va_end (args);
1.252 +
1.253 + exit (1);
1.254 +}
1.255 +
1.256 +static void
1.257 +lose_gerror (const char *prefix, GError *error)
1.258 +{
1.259 + lose ("%s: %s", prefix, error->message);
1.260 +}
1.261 +
1.262 +static void
1.263 +usage (int ecode)
1.264 +{
1.265 + fprintf (stderr, "dbus-binding-tool [--version] [--help]\n");
1.266 + fprintf (stderr, "dbus-binding-tool --mode=[pretty|glib-server|glib-client] [--prefix=SYMBOL_PREFIX] [--ignore-unsupported] [--force] [--output=FILE] [\n");
1.267 + fprintf (stderr, "dbus-binding-tool --mode=glib-server --prefix=SYMBOL_PREFIX [--ignore-unsupported] [--force] [--output=FILE] [\n");
1.268 + exit (ecode);
1.269 +}
1.270 +
1.271 +static void
1.272 +version (void)
1.273 +{
1.274 + printf ("D-BUS Binding Tool %s\n"
1.275 + "Copyright (C) 2003-2005 Red Hat, Inc.\n"
1.276 + "This is free software; see the source for copying conditions.\n"
1.277 + "There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n",
1.278 + VERSION
1.279 + );
1.280 + exit (0);
1.281 +}
1.282 +
1.283 +int
1.284 +main (int argc, char **argv)
1.285 +{
1.286 + const char *output_file;
1.287 + const char *prefix;
1.288 + char *output_file_tmp;
1.289 + int i;
1.290 + GSList *files;
1.291 + DBusBindingOutputMode outputmode;
1.292 + gboolean end_of_args;
1.293 + GSList *tmp;
1.294 + GIOChannel *channel;
1.295 + GError *error;
1.296 + time_t newest_src;
1.297 + struct stat srcbuf;
1.298 + struct stat targetbuf;
1.299 + gboolean force;
1.300 + gboolean ignore_unsupported;
1.301 + gboolean has_prefix = FALSE;
1.302 +
1.303 + #ifndef TODO
1.304 + setlocale (LC_ALL, "");
1.305 + bindtextdomain (GETTEXT_PACKAGE, DBUS_LOCALEDIR);
1.306 + bind_textdomain_codeset (GETTEXT_PACKAGE, "UTF-8");
1.307 + textdomain (GETTEXT_PACKAGE);
1.308 + #endif
1.309 + g_type_init ();
1.310 +
1.311 + outputmode = DBUS_BINDING_OUTPUT_NONE;
1.312 + end_of_args = FALSE;
1.313 + files = NULL;
1.314 + output_file = NULL;
1.315 + prefix = "";
1.316 + ignore_unsupported = FALSE;
1.317 + force = FALSE;
1.318 + i = 1;
1.319 + while (i < argc)
1.320 + {
1.321 + const char *arg = argv[i];
1.322 +
1.323 + if (!end_of_args)
1.324 + {
1.325 + if (strcmp (arg, "--help") == 0 ||
1.326 + strcmp (arg, "-h") == 0 ||
1.327 + strcmp (arg, "-?") == 0)
1.328 + usage (0);
1.329 + else if (strcmp (arg, "--version") == 0)
1.330 + version ();
1.331 + else if (strcmp (arg, "--force") == 0)
1.332 + force = TRUE;
1.333 +#ifdef DBUS_BUILD_TESTS
1.334 + else if (strcmp (arg, "--self-test") == 0)
1.335 + run_all_tests (NULL);
1.336 +#endif /* DBUS_BUILD_TESTS */
1.337 + else if (strncmp (arg, "--mode=", 7) == 0)
1.338 + {
1.339 + const char *mode = arg + 7;
1.340 + if (!strcmp (mode, "pretty"))
1.341 + outputmode = DBUS_BINDING_OUTPUT_PRETTY;
1.342 + else if (!strcmp (mode, "glib-server"))
1.343 + outputmode = DBUS_BINDING_OUTPUT_GLIB_SERVER;
1.344 + else if (!strcmp (mode, "glib-client"))
1.345 + outputmode = DBUS_BINDING_OUTPUT_GLIB_CLIENT;
1.346 + else
1.347 + usage (1);
1.348 + }
1.349 + else if (strcmp (arg, "--ignore-unsupported") == 0)
1.350 + ignore_unsupported = TRUE;
1.351 + else if (strncmp (arg, "--output=", 9) == 0)
1.352 + {
1.353 + output_file = arg + 9;
1.354 + }
1.355 + else if (strncmp (arg, "--prefix=", 9) == 0)
1.356 + {
1.357 + has_prefix = TRUE;
1.358 + prefix = arg + 9;
1.359 + }
1.360 + else if (arg[0] == '-' &&
1.361 + arg[1] == '-' &&
1.362 + arg[2] == '\0')
1.363 + end_of_args = TRUE;
1.364 + else if (arg[0] == '-')
1.365 + {
1.366 + usage (1);
1.367 + }
1.368 + else
1.369 + {
1.370 + files = g_slist_prepend (files, (char*) arg);
1.371 + }
1.372 + }
1.373 + else
1.374 + files = g_slist_prepend (files, (char*) arg);
1.375 +
1.376 + ++i;
1.377 + }
1.378 +
1.379 + if (outputmode == DBUS_BINDING_OUTPUT_GLIB_SERVER && !has_prefix)
1.380 + usage (1);
1.381 +
1.382 + error = NULL;
1.383 +
1.384 + files = g_slist_reverse (files);
1.385 +
1.386 + if (output_file && !force)
1.387 + {
1.388 + newest_src = 0;
1.389 + for (tmp = files; tmp != NULL; tmp = tmp->next)
1.390 + {
1.391 + const char *filename;
1.392 +
1.393 + filename = tmp->data;
1.394 + if (stat (filename, &srcbuf) < 0)
1.395 + lose ("Couldn't stat %s: %s", filename, g_strerror (errno));
1.396 +
1.397 + if (srcbuf.st_mtime > newest_src)
1.398 + newest_src = srcbuf.st_mtime;
1.399 + }
1.400 +
1.401 + if (stat (output_file, &targetbuf) > 0
1.402 + && targetbuf.st_mtime >= newest_src)
1.403 + exit (0);
1.404 + }
1.405 +
1.406 + if (output_file)
1.407 + {
1.408 + output_file_tmp = g_strconcat (output_file, ".tmp", NULL);
1.409 +
1.410 + if (!(channel = g_io_channel_new_file (output_file_tmp, "w", &error)))
1.411 + lose_gerror (_("Couldn't open temporary file"), error);
1.412 + }
1.413 + else
1.414 + {
1.415 + channel = g_io_channel_unix_new (fileno (stdout));
1.416 + output_file_tmp = NULL; /* silence gcc */
1.417 + }
1.418 + if (!g_io_channel_set_encoding (channel, NULL, &error))
1.419 + lose_gerror (_("Couldn't set channel encoding to NULL"), error);
1.420 +
1.421 +
1.422 + for (tmp = files; tmp != NULL; tmp = tmp->next)
1.423 + {
1.424 + NodeInfo *node;
1.425 + GError *error;
1.426 + const char *filename;
1.427 +
1.428 + filename = tmp->data;
1.429 +
1.430 + error = NULL;
1.431 + node = description_load_from_file (filename,
1.432 + &error);
1.433 + if (node == NULL)
1.434 + {
1.435 + lose_gerror (_("Unable to load \"%s\""), error);
1.436 + }
1.437 + else
1.438 + {
1.439 + switch (outputmode)
1.440 + {
1.441 + case DBUS_BINDING_OUTPUT_PRETTY:
1.442 + pretty_print ((BaseInfo*) node, 0);
1.443 + break;
1.444 + case DBUS_BINDING_OUTPUT_GLIB_SERVER:
1.445 + if (!dbus_binding_tool_output_glib_server ((BaseInfo *) node, channel, prefix, &error))
1.446 + lose_gerror (_("Compilation failed"), error);
1.447 + break;
1.448 + case DBUS_BINDING_OUTPUT_GLIB_CLIENT:
1.449 + if (!dbus_binding_tool_output_glib_client ((BaseInfo *) node, channel, ignore_unsupported, &error))
1.450 + lose_gerror (_("Compilation failed"), error);
1.451 + break;
1.452 + case DBUS_BINDING_OUTPUT_NONE:
1.453 + break;
1.454 + }
1.455 + }
1.456 +
1.457 + if (node)
1.458 + node_info_unref (node);
1.459 + }
1.460 +
1.461 + if (g_io_channel_shutdown (channel, TRUE, &error) != G_IO_STATUS_NORMAL)
1.462 + lose_gerror (_("Failed to shutdown IO channel"), error);
1.463 + g_io_channel_unref (channel);
1.464 +
1.465 + if (output_file)
1.466 + {
1.467 + if (rename (output_file_tmp, output_file) < 0)
1.468 + lose ("Failed to rename %s to %s: %s", output_file_tmp, output_file,
1.469 + g_strerror (errno));
1.470 + g_free (output_file_tmp);
1.471 + }
1.472 +
1.473 + return 0;
1.474 +}
1.475 +
1.476 +
1.477 +#ifdef DBUS_BUILD_TESTS
1.478 +static void
1.479 +test_die (const char *failure)
1.480 +{
1.481 + lose ("Unit test failed: %s", failure);
1.482 +}
1.483 +
1.484 +/**
1.485 + * @ingroup DBusGTool
1.486 + * Unit test for GLib utility tool
1.487 + * Returns: #TRUE on success.
1.488 + */
1.489 +static gboolean
1.490 +_dbus_gtool_test (const char *test_data_dir)
1.491 +{
1.492 +
1.493 + return TRUE;
1.494 +}
1.495 +
1.496 +static void
1.497 +run_all_tests (const char *test_data_dir)
1.498 +{
1.499 + if (test_data_dir == NULL)
1.500 + test_data_dir = g_getenv ("DBUS_TEST_DATA");
1.501 +
1.502 + if (test_data_dir != NULL)
1.503 + printf ("Test data in %s\n", test_data_dir);
1.504 + else
1.505 + printf ("No test data!\n");
1.506 +
1.507 + printf ("%s: running binding tests\n", "dbus-binding-tool");
1.508 + if (!_dbus_gtool_test (test_data_dir))
1.509 + test_die ("gtool");
1.510 +
1.511 + printf ("%s: completed successfully\n", "dbus-binding-tool");
1.512 +}
1.513 +
1.514 +#endif /* DBUS_BUILD_TESTS */