src/libsystemd/sd-bus/test-bus-marshal.c - systemd-stable - Rivoreo Source Code Repositories

 /*-*- Mode: C; c-basic-offset: 8; indent-tabs-mode: nil -*-*/

 /***
   This file is part of systemd.

   Copyright 2013 Lennart Poettering

   systemd is free software; you can redistribute it and/or modify it
   under the terms of the GNU Lesser General Public License as published by
   the Free Software Foundation; either version 2.1 of the License, or
   (at your option) any later version.

   systemd is distributed in the hope that it will be useful, but
   WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
   Lesser General Public License for more details.

   You should have received a copy of the GNU Lesser General Public License
   along with systemd; If not, see <http://www.gnu.org/licenses/>.
 ***/

 #include <assert.h>
 #include <stdlib.h>
 #include <byteswap.h>

 #ifdef HAVE_GLIB
 #include <gio/gio.h>
 #endif

 #ifdef HAVE_DBUS
 #include <dbus/dbus.h>
 #endif

 #include "log.h"
 #include "util.h"

 #include "sd-bus.h"
 #include "bus-message.h"
 #include "bus-util.h"
 #include "bus-dump.h"
 #include "bus-label.h"

 static void test_bus_path_encode(void) {
         _cleanup_free_ char *a = NULL, *b = NULL, *c = NULL, *d = NULL, *e = NULL, *f = NULL;

         assert_se(sd_bus_path_encode("/foo/bar", "waldo", &a) >= 0 && streq(a, "/foo/bar/waldo"));
         assert_se(sd_bus_path_decode(a, "/waldo", &b) == 0 && b == NULL);
         assert_se(sd_bus_path_decode(a, "/foo/bar", &b) > 0 && streq(b, "waldo"));

         assert_se(sd_bus_path_encode("xxxx", "waldo", &c) < 0);
         assert_se(sd_bus_path_encode("/foo/", "waldo", &c) < 0);

         assert_se(sd_bus_path_encode("/foo/bar", "", &c) >= 0 && streq(c, "/foo/bar/_"));
         assert_se(sd_bus_path_decode(c, "/foo/bar", &d) > 0 && streq(d, ""));

         assert_se(sd_bus_path_encode("/foo/bar", "foo.bar", &e) >= 0 && streq(e, "/foo/bar/foo_2ebar"));
         assert_se(sd_bus_path_decode(e, "/foo/bar", &f) > 0 && streq(f, "foo.bar"));
 }

 static void test_bus_label_escape_one(const char *a, const char *b) {
         _cleanup_free_ char *t = NULL, *x = NULL, *y = NULL;

         assert_se(t = bus_label_escape(a));
         assert_se(streq(t, b));

         assert_se(x = bus_label_unescape(t));
         assert_se(streq(a, x));

         assert_se(y = bus_label_unescape(b));
         assert_se(streq(a, y));
 }

 static void test_bus_label_escape(void) {
         test_bus_label_escape_one("foo123bar", "foo123bar");
         test_bus_label_escape_one("foo.bar", "foo_2ebar");
         test_bus_label_escape_one("foo_2ebar", "foo_5f2ebar");
         test_bus_label_escape_one("", "_");
         test_bus_label_escape_one("_", "_5f");
         test_bus_label_escape_one("1", "_31");
         test_bus_label_escape_one(":1", "_3a1");
 }

 int main(int argc, char *argv[]) {
         _cleanup_bus_message_unref_ sd_bus_message *m = NULL, *copy = NULL;
         int r, boolean;
         const char *x, *x2, *y, *z, *a, *b, *c, *d, *a_signature;
         uint8_t u, v;
         void *buffer = NULL;
         size_t sz;
         char *h;
         const int32_t integer_array[] = { -1, -2, 0, 1, 2 }, *return_array;
         char *s;
         _cleanup_free_ char *first = NULL, *second = NULL, *third = NULL;
         _cleanup_fclose_ FILE *ms = NULL;
         size_t first_size = 0, second_size = 0, third_size = 0;
         _cleanup_bus_unref_ sd_bus *bus = NULL;

         r = sd_bus_default_system(&bus);
         if (r < 0)
                 return EXIT_TEST_SKIP;

         r = sd_bus_message_new_method_call(bus, &m, "foobar.waldo", "/", "foobar.waldo", "Piep");
         assert_se(r >= 0);

         r = sd_bus_message_append(m, "");
         assert_se(r >= 0);

         r = sd_bus_message_append(m, "s", "a string");
         assert_se(r >= 0);

         r = sd_bus_message_append(m, "s", NULL);
         assert_se(r >= 0);

         r = sd_bus_message_append(m, "asg", 2, "string #1", "string #2", "sba(tt)ss");
         assert_se(r >= 0);

         r = sd_bus_message_append(m, "sass", "foobar", 5, "foo", "bar", "waldo", "piep", "pap", "after");
         assert_se(r >= 0);

         r = sd_bus_message_append(m, "a{yv}", 2, 3, "s", "foo", 5, "s", "waldo");
         assert_se(r >= 0);

         r = sd_bus_message_append(m, "ba(ss)", 255, 3, "aaa", "1", "bbb", "2", "ccc", "3");
         assert_se(r >= 0);

         r = sd_bus_message_open_container(m, 'a', "s");
         assert_se(r >= 0);

         r = sd_bus_message_append_basic(m, 's', "foobar");
         assert_se(r >= 0);

         r = sd_bus_message_append_basic(m, 's', "waldo");
         assert_se(r >= 0);

         r = sd_bus_message_close_container(m);
         assert_se(r >= 0);

         r = sd_bus_message_append_string_space(m, 5, &s);
         assert_se(r >= 0);
         strcpy(s, "hallo");

         r = sd_bus_message_append_array(m, 'i', integer_array, sizeof(integer_array));
         assert_se(r >= 0);

         r = sd_bus_message_append_array(m, 'u', NULL, 0);
         assert_se(r >= 0);

         r = bus_message_seal(m, 4711, 0);
         assert_se(r >= 0);

         bus_message_dump(m, stdout, true);

         ms = open_memstream(&first, &first_size);
         bus_message_dump(m, ms, false);
         fflush(ms);
         assert_se(!ferror(ms));

         r = bus_message_get_blob(m, &buffer, &sz);
         assert_se(r >= 0);

         h = hexmem(buffer, sz);
         assert_se(h);

         log_info("message size = %zu, contents =\n%s", sz, h);
         free(h);

 #ifdef HAVE_GLIB
         {
                 GDBusMessage *g;
                 char *p;

 #if !defined(GLIB_VERSION_2_36)
                 g_type_init();
 #endif

                 g = g_dbus_message_new_from_blob(buffer, sz, 0, NULL);
                 p = g_dbus_message_print(g, 0);
                 log_info("%s", p);
                 g_free(p);
                 g_object_unref(g);
         }
 #endif

 #ifdef HAVE_DBUS
         {
                 DBusMessage *w;
                 DBusError error;

                 dbus_error_init(&error);

                 w = dbus_message_demarshal(buffer, sz, &error);
                 if (!w)
                         log_error("%s", error.message);
                 else
                         dbus_message_unref(w);
         }
 #endif

         m = sd_bus_message_unref(m);

         r = bus_message_from_malloc(bus, buffer, sz, NULL, 0, NULL, NULL, &m);
         assert_se(r >= 0);

         bus_message_dump(m, stdout, true);

         fclose(ms);
         ms = open_memstream(&second, &second_size);
         bus_message_dump(m, ms, false);
         fflush(ms);
         assert_se(!ferror(ms));
         assert_se(first_size == second_size);
         assert_se(memcmp(first, second, first_size) == 0);

         assert_se(sd_bus_message_rewind(m, true) >= 0);

         r = sd_bus_message_read(m, "ssasg", &x, &x2, 2, &y, &z, &a_signature);
         assert_se(r > 0);
         assert_se(streq(x, "a string"));
         assert_se(streq(x2, ""));
         assert_se(streq(y, "string #1"));
         assert_se(streq(z, "string #2"));
         assert_se(streq(a_signature, "sba(tt)ss"));

         r = sd_bus_message_read(m, "sass", &x, 5, &y, &z, &a, &b, &c, &d);
         assert_se(r > 0);
         assert_se(streq(x, "foobar"));
         assert_se(streq(y, "foo"));
         assert_se(streq(z, "bar"));
         assert_se(streq(a, "waldo"));
         assert_se(streq(b, "piep"));
         assert_se(streq(c, "pap"));
         assert_se(streq(d, "after"));

         r = sd_bus_message_read(m, "a{yv}", 2, &u, "s", &x, &v, "s", &y);
         assert_se(r > 0);
         assert_se(u == 3);
         assert_se(streq(x, "foo"));
         assert_se(v == 5);
         assert_se(streq(y, "waldo"));

         r = sd_bus_message_read(m, "ba(ss)", &boolean, 3, &x, &y, &a, &b, &c, &d);
         assert_se(r > 0);
         assert_se(boolean);
         assert_se(streq(x, "aaa"));
         assert_se(streq(y, "1"));
         assert_se(streq(a, "bbb"));
         assert_se(streq(b, "2"));
         assert_se(streq(c, "ccc"));
         assert_se(streq(d, "3"));

         assert_se(sd_bus_message_verify_type(m, 'a', "s") > 0);

         r = sd_bus_message_read(m, "as", 2, &x, &y);
         assert_se(r > 0);
         assert_se(streq(x, "foobar"));
         assert_se(streq(y, "waldo"));

         r = sd_bus_message_read_basic(m, 's', &s);
         assert_se(r > 0);
         assert_se(streq(s, "hallo"));

         r = sd_bus_message_read_array(m, 'i', (const void**) &return_array, &sz);
         assert_se(r > 0);
         assert_se(sz == sizeof(integer_array));
         assert_se(memcmp(integer_array, return_array, sz) == 0);

         r = sd_bus_message_read_array(m, 'u', (const void**) &return_array, &sz);
         assert_se(r > 0);
         assert_se(sz == 0);

         r = sd_bus_message_peek_type(m, NULL, NULL);
         assert_se(r == 0);

         r = sd_bus_message_new_method_call(bus, &copy, "foobar.waldo", "/", "foobar.waldo", "Piep");
         assert_se(r >= 0);

         r = sd_bus_message_rewind(m, true);
         assert_se(r >= 0);

         r = sd_bus_message_copy(copy, m, true);
         assert_se(r >= 0);

         r = bus_message_seal(copy, 4712, 0);
         assert_se(r >= 0);

         fclose(ms);
         ms = open_memstream(&third, &third_size);
         bus_message_dump(copy, ms, false);
         fflush(ms);
         assert_se(!ferror(ms));

         printf("<%.*s>\n", (int) first_size, first);
         printf("<%.*s>\n", (int) third_size, third);

         assert_se(first_size == third_size);
         assert_se(memcmp(first, third, third_size) == 0);

         r = sd_bus_message_rewind(m, true);
         assert_se(r >= 0);

         assert_se(sd_bus_message_verify_type(m, 's', NULL) > 0);

         r = sd_bus_message_skip(m, "ssasg");
         assert_se(r > 0);

         assert_se(sd_bus_message_verify_type(m, 's', NULL) > 0);

         r = sd_bus_message_skip(m, "sass");
         assert_se(r >= 0);

         assert_se(sd_bus_message_verify_type(m, 'a', "{yv}") > 0);

         r = sd_bus_message_skip(m, "a{yv}");
         assert_se(r >= 0);

         assert_se(sd_bus_message_verify_type(m, 'b', NULL) > 0);

         r = sd_bus_message_read(m, "b", &boolean);
         assert_se(r > 0);
         assert_se(boolean);

         r = sd_bus_message_enter_container(m, 0, NULL);
         assert_se(r > 0);

         r = sd_bus_message_read(m, "(ss)", &x, &y);
         assert_se(r > 0);

         r = sd_bus_message_read(m, "(ss)", &a, &b);
         assert_se(r > 0);

         r = sd_bus_message_read(m, "(ss)", &c, &d);
         assert_se(r > 0);

         r = sd_bus_message_read(m, "(ss)", &x, &y);
         assert_se(r == 0);

         r = sd_bus_message_exit_container(m);
         assert_se(r >= 0);

         assert_se(streq(x, "aaa"));
         assert_se(streq(y, "1"));
         assert_se(streq(a, "bbb"));
         assert_se(streq(b, "2"));
         assert_se(streq(c, "ccc"));
         assert_se(streq(d, "3"));

         test_bus_label_escape();
         test_bus_path_encode();

         return 0;
 }
	/-- Mode: C; c-basic-offset: 8; indent-tabs-mode: nil --/

	/***
	This file is part of systemd.

	Copyright 2013 Lennart Poettering

	systemd is free software; you can redistribute it and/or modify it
	under the terms of the GNU Lesser General Public License as published by
	the Free Software Foundation; either version 2.1 of the License, or
	(at your option) any later version.

	systemd is distributed in the hope that it will be useful, but
	WITHOUT ANY WARRANTY; without even the implied warranty of
	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	Lesser General Public License for more details.

	You should have received a copy of the GNU Lesser General Public License
	along with systemd; If not, see <http://www.gnu.org/licenses/>.
	***/

	#include <assert.h>
	#include <stdlib.h>
	#include <byteswap.h>

	#ifdef HAVE_GLIB
	#include <gio/gio.h>
	#endif

	#ifdef HAVE_DBUS
	#include <dbus/dbus.h>
	#endif

	#include "log.h"
	#include "util.h"

	#include "sd-bus.h"
	#include "bus-message.h"
	#include "bus-util.h"
	#include "bus-dump.h"
	#include "bus-label.h"

	static void test_bus_path_encode(void) {
	_cleanup_free_ char a = NULL, b = NULL, c = NULL, d = NULL, e = NULL, f = NULL;

	assert_se(sd_bus_path_encode("/foo/bar", "waldo", &a) >= 0 && streq(a, "/foo/bar/waldo"));
	assert_se(sd_bus_path_decode(a, "/waldo", &b) == 0 && b == NULL);
	assert_se(sd_bus_path_decode(a, "/foo/bar", &b) > 0 && streq(b, "waldo"));

	assert_se(sd_bus_path_encode("xxxx", "waldo", &c) < 0);
	assert_se(sd_bus_path_encode("/foo/", "waldo", &c) < 0);

	assert_se(sd_bus_path_encode("/foo/bar", "", &c) >= 0 && streq(c, "/foo/bar/_"));
	assert_se(sd_bus_path_decode(c, "/foo/bar", &d) > 0 && streq(d, ""));

	assert_se(sd_bus_path_encode("/foo/bar", "foo.bar", &e) >= 0 && streq(e, "/foo/bar/foo_2ebar"));
	assert_se(sd_bus_path_decode(e, "/foo/bar", &f) > 0 && streq(f, "foo.bar"));
	}

	static void test_bus_label_escape_one(const char a, const char b) {
	_cleanup_free_ char t = NULL, x = NULL, *y = NULL;

	assert_se(t = bus_label_escape(a));
	assert_se(streq(t, b));

	assert_se(x = bus_label_unescape(t));
	assert_se(streq(a, x));

	assert_se(y = bus_label_unescape(b));
	assert_se(streq(a, y));
	}

	static void test_bus_label_escape(void) {
	test_bus_label_escape_one("foo123bar", "foo123bar");
	test_bus_label_escape_one("foo.bar", "foo_2ebar");
	test_bus_label_escape_one("foo_2ebar", "foo_5f2ebar");
	test_bus_label_escape_one("", "_");
	test_bus_label_escape_one("_", "_5f");
	test_bus_label_escape_one("1", "_31");
	test_bus_label_escape_one(":1", "_3a1");
	}

	int main(int argc, char *argv[]) {
	_cleanup_bus_message_unref_ sd_bus_message m = NULL, copy = NULL;
	int r, boolean;
	const char x, x2, y, z, a, b, c, d, *a_signature;
	uint8_t u, v;
	void *buffer = NULL;
	size_t sz;
	char *h;
	const int32_t integer_array[] = { -1, -2, 0, 1, 2 }, *return_array;
	char *s;
	_cleanup_free_ char first = NULL, second = NULL, *third = NULL;
	_cleanup_fclose_ FILE *ms = NULL;
	size_t first_size = 0, second_size = 0, third_size = 0;
	_cleanup_bus_unref_ sd_bus *bus = NULL;

	r = sd_bus_default_system(&bus);
	if (r < 0)
	return EXIT_TEST_SKIP;

	r = sd_bus_message_new_method_call(bus, &m, "foobar.waldo", "/", "foobar.waldo", "Piep");
	assert_se(r >= 0);

	r = sd_bus_message_append(m, "");
	assert_se(r >= 0);

	r = sd_bus_message_append(m, "s", "a string");
	assert_se(r >= 0);

	r = sd_bus_message_append(m, "s", NULL);
	assert_se(r >= 0);

	r = sd_bus_message_append(m, "asg", 2, "string #1", "string #2", "sba(tt)ss");
	assert_se(r >= 0);

	r = sd_bus_message_append(m, "sass", "foobar", 5, "foo", "bar", "waldo", "piep", "pap", "after");
	assert_se(r >= 0);

	r = sd_bus_message_append(m, "a{yv}", 2, 3, "s", "foo", 5, "s", "waldo");
	assert_se(r >= 0);

	r = sd_bus_message_append(m, "ba(ss)", 255, 3, "aaa", "1", "bbb", "2", "ccc", "3");
	assert_se(r >= 0);

	r = sd_bus_message_open_container(m, 'a', "s");
	assert_se(r >= 0);

	r = sd_bus_message_append_basic(m, 's', "foobar");
	assert_se(r >= 0);

	r = sd_bus_message_append_basic(m, 's', "waldo");
	assert_se(r >= 0);

	r = sd_bus_message_close_container(m);
	assert_se(r >= 0);

	r = sd_bus_message_append_string_space(m, 5, &s);
	assert_se(r >= 0);
	strcpy(s, "hallo");

	r = sd_bus_message_append_array(m, 'i', integer_array, sizeof(integer_array));
	assert_se(r >= 0);

	r = sd_bus_message_append_array(m, 'u', NULL, 0);
	assert_se(r >= 0);

	r = bus_message_seal(m, 4711, 0);
	assert_se(r >= 0);

	bus_message_dump(m, stdout, true);

	ms = open_memstream(&first, &first_size);
	bus_message_dump(m, ms, false);
	fflush(ms);
	assert_se(!ferror(ms));

	r = bus_message_get_blob(m, &buffer, &sz);
	assert_se(r >= 0);

	h = hexmem(buffer, sz);
	assert_se(h);

	log_info("message size = %zu, contents =\n%s", sz, h);
	free(h);

	#ifdef HAVE_GLIB
	{
	GDBusMessage *g;
	char *p;

	#if !defined(GLIB_VERSION_2_36)
	g_type_init();
	#endif

	g = g_dbus_message_new_from_blob(buffer, sz, 0, NULL);
	p = g_dbus_message_print(g, 0);
	log_info("%s", p);
	g_free(p);
	g_object_unref(g);
	}
	#endif

	#ifdef HAVE_DBUS
	{
	DBusMessage *w;
	DBusError error;

	dbus_error_init(&error);

	w = dbus_message_demarshal(buffer, sz, &error);
	if (!w)
	log_error("%s", error.message);
	else
	dbus_message_unref(w);
	}
	#endif

	m = sd_bus_message_unref(m);

	r = bus_message_from_malloc(bus, buffer, sz, NULL, 0, NULL, NULL, &m);
	assert_se(r >= 0);

	bus_message_dump(m, stdout, true);

	fclose(ms);
	ms = open_memstream(&second, &second_size);
	bus_message_dump(m, ms, false);
	fflush(ms);
	assert_se(!ferror(ms));
	assert_se(first_size == second_size);
	assert_se(memcmp(first, second, first_size) == 0);

	assert_se(sd_bus_message_rewind(m, true) >= 0);

	r = sd_bus_message_read(m, "ssasg", &x, &x2, 2, &y, &z, &a_signature);
	assert_se(r > 0);
	assert_se(streq(x, "a string"));
	assert_se(streq(x2, ""));
	assert_se(streq(y, "string #1"));
	assert_se(streq(z, "string #2"));
	assert_se(streq(a_signature, "sba(tt)ss"));

	r = sd_bus_message_read(m, "sass", &x, 5, &y, &z, &a, &b, &c, &d);
	assert_se(r > 0);
	assert_se(streq(x, "foobar"));
	assert_se(streq(y, "foo"));
	assert_se(streq(z, "bar"));
	assert_se(streq(a, "waldo"));
	assert_se(streq(b, "piep"));
	assert_se(streq(c, "pap"));
	assert_se(streq(d, "after"));

	r = sd_bus_message_read(m, "a{yv}", 2, &u, "s", &x, &v, "s", &y);
	assert_se(r > 0);
	assert_se(u == 3);
	assert_se(streq(x, "foo"));
	assert_se(v == 5);
	assert_se(streq(y, "waldo"));

	r = sd_bus_message_read(m, "ba(ss)", &boolean, 3, &x, &y, &a, &b, &c, &d);
	assert_se(r > 0);
	assert_se(boolean);
	assert_se(streq(x, "aaa"));
	assert_se(streq(y, "1"));
	assert_se(streq(a, "bbb"));
	assert_se(streq(b, "2"));
	assert_se(streq(c, "ccc"));
	assert_se(streq(d, "3"));

	assert_se(sd_bus_message_verify_type(m, 'a', "s") > 0);

	r = sd_bus_message_read(m, "as", 2, &x, &y);
	assert_se(r > 0);
	assert_se(streq(x, "foobar"));
	assert_se(streq(y, "waldo"));

	r = sd_bus_message_read_basic(m, 's', &s);
	assert_se(r > 0);
	assert_se(streq(s, "hallo"));

	r = sd_bus_message_read_array(m, 'i', (const void**) &return_array, &sz);
	assert_se(r > 0);
	assert_se(sz == sizeof(integer_array));
	assert_se(memcmp(integer_array, return_array, sz) == 0);

	r = sd_bus_message_read_array(m, 'u', (const void**) &return_array, &sz);
	assert_se(r > 0);
	assert_se(sz == 0);

	r = sd_bus_message_peek_type(m, NULL, NULL);
	assert_se(r == 0);

	r = sd_bus_message_new_method_call(bus, &copy, "foobar.waldo", "/", "foobar.waldo", "Piep");
	assert_se(r >= 0);

	r = sd_bus_message_rewind(m, true);
	assert_se(r >= 0);

	r = sd_bus_message_copy(copy, m, true);
	assert_se(r >= 0);

	r = bus_message_seal(copy, 4712, 0);
	assert_se(r >= 0);

	fclose(ms);
	ms = open_memstream(&third, &third_size);
	bus_message_dump(copy, ms, false);
	fflush(ms);
	assert_se(!ferror(ms));

	printf("<%.*s>\n", (int) first_size, first);
	printf("<%.*s>\n", (int) third_size, third);

	assert_se(first_size == third_size);
	assert_se(memcmp(first, third, third_size) == 0);

	r = sd_bus_message_rewind(m, true);
	assert_se(r >= 0);

	assert_se(sd_bus_message_verify_type(m, 's', NULL) > 0);

	r = sd_bus_message_skip(m, "ssasg");
	assert_se(r > 0);

	assert_se(sd_bus_message_verify_type(m, 's', NULL) > 0);

	r = sd_bus_message_skip(m, "sass");
	assert_se(r >= 0);

	assert_se(sd_bus_message_verify_type(m, 'a', "{yv}") > 0);

	r = sd_bus_message_skip(m, "a{yv}");
	assert_se(r >= 0);

	assert_se(sd_bus_message_verify_type(m, 'b', NULL) > 0);

	r = sd_bus_message_read(m, "b", &boolean);
	assert_se(r > 0);
	assert_se(boolean);

	r = sd_bus_message_enter_container(m, 0, NULL);
	assert_se(r > 0);

	r = sd_bus_message_read(m, "(ss)", &x, &y);
	assert_se(r > 0);

	r = sd_bus_message_read(m, "(ss)", &a, &b);
	assert_se(r > 0);

	r = sd_bus_message_read(m, "(ss)", &c, &d);
	assert_se(r > 0);

	r = sd_bus_message_read(m, "(ss)", &x, &y);
	assert_se(r == 0);

	r = sd_bus_message_exit_container(m);
	assert_se(r >= 0);

	assert_se(streq(x, "aaa"));
	assert_se(streq(y, "1"));
	assert_se(streq(a, "bbb"));
	assert_se(streq(b, "2"));
	assert_se(streq(c, "ccc"));
	assert_se(streq(d, "3"));

	test_bus_label_escape();
	test_bus_path_encode();

	return 0;
	}