src/libsystemd/sd-bus/test-bus-marshal.c

   1 /* SPDX-License-Identifier: LGPL-2.1+ */
   2 /***
   3   This file is part of systemd.
   4
   5   Copyright 2013 Lennart Poettering
   6 ***/
   7
   8 #include <math.h>
   9 #include <stdlib.h>
  10
  11 #if HAVE_GLIB
  12 #include <gio/gio.h>
  13 #endif
  14
  15 #if HAVE_DBUS
  16 #include <dbus/dbus.h>
  17 #endif
  18
  19 #include "sd-bus.h"
  20
  21 #include "alloc-util.h"
  22 #include "bus-dump.h"
  23 #include "bus-label.h"
  24 #include "bus-message.h"
  25 #include "bus-util.h"
  26 #include "fd-util.h"
  27 #include "hexdecoct.h"
  28 #include "log.h"
  29 #include "util.h"
  30
  31 static void test_bus_path_encode_unique(void) {
  32         _cleanup_free_ char *a = NULL, *b = NULL, *c = NULL, *d = NULL, *e = NULL;
  33
  34         assert_se(bus_path_encode_unique(NULL, "/foo/bar", "some.sender", "a.suffix", &a) >= 0 && streq_ptr(a, "/foo/bar/some_2esender/a_2esuffix"));
  35         assert_se(bus_path_decode_unique(a, "/foo/bar", &b, &c) > 0 && streq_ptr(b, "some.sender") && streq_ptr(c, "a.suffix"));
  36         assert_se(bus_path_decode_unique(a, "/bar/foo", &d, &d) == 0 && !d);
  37         assert_se(bus_path_decode_unique("/foo/bar/onlyOneSuffix", "/foo/bar", &d, &d) == 0 && !d);
  38         assert_se(bus_path_decode_unique("/foo/bar/_/_", "/foo/bar", &d, &e) > 0 && streq_ptr(d, "") && streq_ptr(e, ""));
  39 }
  40
  41 static void test_bus_path_encode(void) {
  42         _cleanup_free_ char *a = NULL, *b = NULL, *c = NULL, *d = NULL, *e = NULL, *f = NULL;
  43
  44         assert_se(sd_bus_path_encode("/foo/bar", "waldo", &a) >= 0 && streq(a, "/foo/bar/waldo"));
  45         assert_se(sd_bus_path_decode(a, "/waldo", &b) == 0 && b == NULL);
  46         assert_se(sd_bus_path_decode(a, "/foo/bar", &b) > 0 && streq(b, "waldo"));
  47
  48         assert_se(sd_bus_path_encode("xxxx", "waldo", &c) < 0);
  49         assert_se(sd_bus_path_encode("/foo/", "waldo", &c) < 0);
  50
  51         assert_se(sd_bus_path_encode("/foo/bar", "", &c) >= 0 && streq(c, "/foo/bar/_"));
  52         assert_se(sd_bus_path_decode(c, "/foo/bar", &d) > 0 && streq(d, ""));
  53
  54         assert_se(sd_bus_path_encode("/foo/bar", "foo.bar", &e) >= 0 && streq(e, "/foo/bar/foo_2ebar"));
  55         assert_se(sd_bus_path_decode(e, "/foo/bar", &f) > 0 && streq(f, "foo.bar"));
  56 }
  57
  58 static void test_bus_path_encode_many(void) {
  59         _cleanup_free_ char *a = NULL, *b = NULL, *c = NULL, *d = NULL, *e = NULL, *f = NULL;
  60
  61         assert_se(sd_bus_path_decode_many("/foo/bar", "/prefix/%", NULL) == 0);
  62         assert_se(sd_bus_path_decode_many("/prefix/bar", "/prefix/%bar", NULL) == 1);
  63         assert_se(sd_bus_path_decode_many("/foo/bar", "/prefix/%/suffix", NULL) == 0);
  64         assert_se(sd_bus_path_decode_many("/prefix/foobar/suffix", "/prefix/%/suffix", &a) == 1 && streq_ptr(a, "foobar"));
  65         assert_se(sd_bus_path_decode_many("/prefix/one_foo_two/mid/three_bar_four/suffix", "/prefix/one_%_two/mid/three_%_four/suffix", &b, &c) == 1 && streq_ptr(b, "foo") && streq_ptr(c, "bar"));
  66         assert_se(sd_bus_path_decode_many("/prefix/one_foo_two/mid/three_bar_four/suffix", "/prefix/one_%_two/mid/three_%_four/suffix", NULL, &d) == 1 && streq_ptr(d, "bar"));
  67
  68         assert_se(sd_bus_path_decode_many("/foo/bar", "/foo/bar/%", NULL) == 0);
  69         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/foo/bar%", NULL) == 0);
  70         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/foo/%/bar", NULL) == 0);
  71         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/foo/%bar", NULL) == 0);
  72         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/foo/bar/suffix") == 1);
  73         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/foo/%%/suffix", NULL, NULL) == 0); /* multiple '%' are treated verbatim */
  74         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/foo/%/suffi", NULL) == 0);
  75         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/foo/%/suffix", &e) == 1 && streq_ptr(e, "bar"));
  76         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/foo/%/%", NULL, NULL) == 1);
  77         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/%/%/%", NULL, NULL, NULL) == 1);
  78         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "%/%/%", NULL, NULL, NULL) == 0);
  79         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/%/%", NULL, NULL) == 0);
  80         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/%/%/", NULL, NULL) == 0);
  81         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/%/", NULL) == 0);
  82         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "/%", NULL) == 0);
  83         assert_se(sd_bus_path_decode_many("/foo/bar/suffix", "%", NULL) == 0);
  84
  85         assert_se(sd_bus_path_encode_many(&f, "/prefix/one_%_two/mid/three_%_four/suffix", "foo", "bar") >= 0 && streq_ptr(f, "/prefix/one_foo_two/mid/three_bar_four/suffix"));
  86 }
  87
  88 static void test_bus_label_escape_one(const char *a, const char *b) {
  89         _cleanup_free_ char *t = NULL, *x = NULL, *y = NULL;
  90
  91         assert_se(t = bus_label_escape(a));
  92         assert_se(streq(t, b));
  93
  94         assert_se(x = bus_label_unescape(t));
  95         assert_se(streq(a, x));
  96
  97         assert_se(y = bus_label_unescape(b));
  98         assert_se(streq(a, y));
  99 }
 100
 101 static void test_bus_label_escape(void) {
 102         test_bus_label_escape_one("foo123bar", "foo123bar");
 103         test_bus_label_escape_one("foo.bar", "foo_2ebar");
 104         test_bus_label_escape_one("foo_2ebar", "foo_5f2ebar");
 105         test_bus_label_escape_one("", "_");
 106         test_bus_label_escape_one("_", "_5f");
 107         test_bus_label_escape_one("1", "_31");
 108         test_bus_label_escape_one(":1", "_3a1");
 109 }
 110
 111 int main(int argc, char *argv[]) {
 112         _cleanup_(sd_bus_message_unrefp) sd_bus_message *m = NULL, *copy = NULL;
 113         int r, boolean;
 114         const char *x, *x2, *y, *z, *a, *b, *c, *d, *a_signature;
 115         uint8_t u, v;
 116         void *buffer = NULL;
 117         size_t sz;
 118         char *h;
 119         const int32_t integer_array[] = { -1, -2, 0, 1, 2 }, *return_array;
 120         char *s;
 121         _cleanup_free_ char *first = NULL, *second = NULL, *third = NULL;
 122         _cleanup_fclose_ FILE *ms = NULL;
 123         size_t first_size = 0, second_size = 0, third_size = 0;
 124         _cleanup_(sd_bus_unrefp) sd_bus *bus = NULL;
 125         double dbl;
 126         uint64_t u64;
 127
 128         r = sd_bus_default_user(&bus);
 129         if (r < 0)
 130                 return EXIT_TEST_SKIP;
 131
 132         r = sd_bus_message_new_method_call(bus, &m, "foobar.waldo", "/", "foobar.waldo", "Piep");
 133         assert_se(r >= 0);
 134
 135         r = sd_bus_message_append(m, "");
 136         assert_se(r >= 0);
 137
 138         r = sd_bus_message_append(m, "s", "a string");
 139         assert_se(r >= 0);
 140
 141         r = sd_bus_message_append(m, "s", NULL);
 142         assert_se(r >= 0);
 143
 144         r = sd_bus_message_append(m, "asg", 2, "string #1", "string #2", "sba(tt)ss");
 145         assert_se(r >= 0);
 146
 147         r = sd_bus_message_append(m, "sass", "foobar", 5, "foo", "bar", "waldo", "piep", "pap", "after");
 148         assert_se(r >= 0);
 149
 150         r = sd_bus_message_append(m, "a{yv}", 2, 3, "s", "foo", 5, "s", "waldo");
 151         assert_se(r >= 0);
 152
 153         r = sd_bus_message_append(m, "y(ty)y(yt)y", 8, 777ULL, 7, 9, 77, 7777ULL, 10);
 154         assert_se(r >= 0);
 155
 156         r = sd_bus_message_append(m, "()");
 157         assert_se(r >= 0);
 158
 159         r = sd_bus_message_append(m, "ba(ss)", 255, 3, "aaa", "1", "bbb", "2", "ccc", "3");
 160         assert_se(r >= 0);
 161
 162         r = sd_bus_message_open_container(m, 'a', "s");
 163         assert_se(r >= 0);
 164
 165         r = sd_bus_message_append_basic(m, 's', "foobar");
 166         assert_se(r >= 0);
 167
 168         r = sd_bus_message_append_basic(m, 's', "waldo");
 169         assert_se(r >= 0);
 170
 171         r = sd_bus_message_close_container(m);
 172         assert_se(r >= 0);
 173
 174         r = sd_bus_message_append_string_space(m, 5, &s);
 175         assert_se(r >= 0);
 176         strcpy(s, "hallo");
 177
 178         r = sd_bus_message_append_array(m, 'i', integer_array, sizeof(integer_array));
 179         assert_se(r >= 0);
 180
 181         r = sd_bus_message_append_array(m, 'u', NULL, 0);
 182         assert_se(r >= 0);
 183
 184         r = sd_bus_message_append(m, "a(stdo)", 1, "foo", 815ULL, 47.0, "/");
 185         assert_se(r >= 0);
 186
 187         r = sd_bus_message_seal(m, 4711, 0);
 188         assert_se(r >= 0);
 189
 190         bus_message_dump(m, stdout, BUS_MESSAGE_DUMP_WITH_HEADER);
 191
 192         ms = open_memstream(&first, &first_size);
 193         bus_message_dump(m, ms, 0);
 194         fflush(ms);
 195         assert_se(!ferror(ms));
 196
 197         r = bus_message_get_blob(m, &buffer, &sz);
 198         assert_se(r >= 0);
 199
 200         h = hexmem(buffer, sz);
 201         assert_se(h);
 202
 203         log_info("message size = %zu, contents =\n%s", sz, h);
 204         free(h);
 205
 206 #if HAVE_GLIB
 207 #ifndef __SANITIZE_ADDRESS__
 208         {
 209                 GDBusMessage *g;
 210                 char *p;
 211
 212 #if !defined(GLIB_VERSION_2_36)
 213                 g_type_init();
 214 #endif
 215
 216                 g = g_dbus_message_new_from_blob(buffer, sz, 0, NULL);
 217                 p = g_dbus_message_print(g, 0);
 218                 log_info("%s", p);
 219                 g_free(p);
 220                 g_object_unref(g);
 221         }
 222 #endif
 223 #endif
 224
 225 #if HAVE_DBUS
 226         {
 227                 DBusMessage *w;
 228                 DBusError error;
 229
 230                 dbus_error_init(&error);
 231
 232                 w = dbus_message_demarshal(buffer, sz, &error);
 233                 if (!w)
 234                         log_error("%s", error.message);
 235                 else
 236                         dbus_message_unref(w);
 237
 238                 dbus_error_free(&error);
 239         }
 240 #endif
 241
 242         m = sd_bus_message_unref(m);
 243
 244         r = bus_message_from_malloc(bus, buffer, sz, NULL, 0, NULL, &m);
 245         assert_se(r >= 0);
 246
 247         bus_message_dump(m, stdout, BUS_MESSAGE_DUMP_WITH_HEADER);
 248
 249         fclose(ms);
 250         ms = open_memstream(&second, &second_size);
 251         bus_message_dump(m, ms, 0);
 252         fflush(ms);
 253         assert_se(!ferror(ms));
 254         assert_se(first_size == second_size);
 255         assert_se(memcmp(first, second, first_size) == 0);
 256
 257         assert_se(sd_bus_message_rewind(m, true) >= 0);
 258
 259         r = sd_bus_message_read(m, "ssasg", &x, &x2, 2, &y, &z, &a_signature);
 260         assert_se(r > 0);
 261         assert_se(streq(x, "a string"));
 262         assert_se(streq(x2, ""));
 263         assert_se(streq(y, "string #1"));
 264         assert_se(streq(z, "string #2"));
 265         assert_se(streq(a_signature, "sba(tt)ss"));
 266
 267         r = sd_bus_message_read(m, "sass", &x, 5, &y, &z, &a, &b, &c, &d);
 268         assert_se(r > 0);
 269         assert_se(streq(x, "foobar"));
 270         assert_se(streq(y, "foo"));
 271         assert_se(streq(z, "bar"));
 272         assert_se(streq(a, "waldo"));
 273         assert_se(streq(b, "piep"));
 274         assert_se(streq(c, "pap"));
 275         assert_se(streq(d, "after"));
 276
 277         r = sd_bus_message_read(m, "a{yv}", 2, &u, "s", &x, &v, "s", &y);
 278         assert_se(r > 0);
 279         assert_se(u == 3);
 280         assert_se(streq(x, "foo"));
 281         assert_se(v == 5);
 282         assert_se(streq(y, "waldo"));
 283
 284         r = sd_bus_message_read(m, "y(ty)", &v, &u64, &u);
 285         assert_se(r > 0);
 286         assert_se(v == 8);
 287         assert_se(u64 == 777);
 288         assert_se(u == 7);
 289
 290         r = sd_bus_message_read(m, "y(yt)", &v, &u, &u64);
 291         assert_se(r > 0);
 292         assert_se(v == 9);
 293         assert_se(u == 77);
 294         assert_se(u64 == 7777);
 295
 296         r = sd_bus_message_read(m, "y", &v);
 297         assert_se(r > 0);
 298         assert_se(v == 10);
 299
 300         r = sd_bus_message_read(m, "()");
 301         assert_se(r > 0);
 302
 303         r = sd_bus_message_read(m, "ba(ss)", &boolean, 3, &x, &y, &a, &b, &c, &d);
 304         assert_se(r > 0);
 305         assert_se(boolean);
 306         assert_se(streq(x, "aaa"));
 307         assert_se(streq(y, "1"));
 308         assert_se(streq(a, "bbb"));
 309         assert_se(streq(b, "2"));
 310         assert_se(streq(c, "ccc"));
 311         assert_se(streq(d, "3"));
 312
 313         assert_se(sd_bus_message_verify_type(m, 'a', "s") > 0);
 314
 315         r = sd_bus_message_read(m, "as", 2, &x, &y);
 316         assert_se(r > 0);
 317         assert_se(streq(x, "foobar"));
 318         assert_se(streq(y, "waldo"));
 319
 320         r = sd_bus_message_read_basic(m, 's', &s);
 321         assert_se(r > 0);
 322         assert_se(streq(s, "hallo"));
 323
 324         r = sd_bus_message_read_array(m, 'i', (const void**) &return_array, &sz);
 325         assert_se(r > 0);
 326         assert_se(sz == sizeof(integer_array));
 327         assert_se(memcmp(integer_array, return_array, sz) == 0);
 328
 329         r = sd_bus_message_read_array(m, 'u', (const void**) &return_array, &sz);
 330         assert_se(r > 0);
 331         assert_se(sz == 0);
 332
 333         r = sd_bus_message_read(m, "a(stdo)", 1, &x, &u64, &dbl, &y);
 334         assert_se(r > 0);
 335         assert_se(streq(x, "foo"));
 336         assert_se(u64 == 815ULL);
 337         assert_se(fabs(dbl - 47.0) < 0.1);
 338         assert_se(streq(y, "/"));
 339
 340         r = sd_bus_message_peek_type(m, NULL, NULL);
 341         assert_se(r == 0);
 342
 343         r = sd_bus_message_new_method_call(bus, &copy, "foobar.waldo", "/", "foobar.waldo", "Piep");
 344         assert_se(r >= 0);
 345
 346         r = sd_bus_message_rewind(m, true);
 347         assert_se(r >= 0);
 348
 349         r = sd_bus_message_copy(copy, m, true);
 350         assert_se(r >= 0);
 351
 352         r = sd_bus_message_seal(copy, 4712, 0);
 353         assert_se(r >= 0);
 354
 355         fclose(ms);
 356         ms = open_memstream(&third, &third_size);
 357         bus_message_dump(copy, ms, 0);
 358         fflush(ms);
 359         assert_se(!ferror(ms));
 360
 361         printf("<%.*s>\n", (int) first_size, first);
 362         printf("<%.*s>\n", (int) third_size, third);
 363
 364         assert_se(first_size == third_size);
 365         assert_se(memcmp(first, third, third_size) == 0);
 366
 367         r = sd_bus_message_rewind(m, true);
 368         assert_se(r >= 0);
 369
 370         assert_se(sd_bus_message_verify_type(m, 's', NULL) > 0);
 371
 372         r = sd_bus_message_skip(m, "ssasg");
 373         assert_se(r > 0);
 374
 375         assert_se(sd_bus_message_verify_type(m, 's', NULL) > 0);
 376
 377         r = sd_bus_message_skip(m, "sass");
 378         assert_se(r >= 0);
 379
 380         assert_se(sd_bus_message_verify_type(m, 'a', "{yv}") > 0);
 381
 382         r = sd_bus_message_skip(m, "a{yv}y(ty)y(yt)y()");
 383         assert_se(r >= 0);
 384
 385         assert_se(sd_bus_message_verify_type(m, 'b', NULL) > 0);
 386
 387         r = sd_bus_message_read(m, "b", &boolean);
 388         assert_se(r > 0);
 389         assert_se(boolean);
 390
 391         r = sd_bus_message_enter_container(m, 0, NULL);
 392         assert_se(r > 0);
 393
 394         r = sd_bus_message_read(m, "(ss)", &x, &y);
 395         assert_se(r > 0);
 396
 397         r = sd_bus_message_read(m, "(ss)", &a, &b);
 398         assert_se(r > 0);
 399
 400         r = sd_bus_message_read(m, "(ss)", &c, &d);
 401         assert_se(r > 0);
 402
 403         r = sd_bus_message_read(m, "(ss)", &x, &y);
 404         assert_se(r == 0);
 405
 406         r = sd_bus_message_exit_container(m);
 407         assert_se(r >= 0);
 408
 409         assert_se(streq(x, "aaa"));
 410         assert_se(streq(y, "1"));
 411         assert_se(streq(a, "bbb"));
 412         assert_se(streq(b, "2"));
 413         assert_se(streq(c, "ccc"));
 414         assert_se(streq(d, "3"));
 415
 416         test_bus_label_escape();
 417         test_bus_path_encode();
 418         test_bus_path_encode_unique();
 419         test_bus_path_encode_many();
 420
 421         return 0;
 422 }