src/bus-driverd/bus-driverd.c

   1 /***
   2   This file is part of systemd.
   3
   4   Copyright 2013 Daniel Mack
   5
   6   systemd is free software; you can redistribute it and/or modify it
   7   under the terms of the GNU Lesser General Public License as published by
   8   the Free Software Foundation; either version 2.1 of the License, or
   9   (at your option) any later version.
  10
  11   systemd is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   Lesser General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public License
  17   along with systemd; If not, see <http://www.gnu.org/licenses/>.
  18 ***/
  19
  20 #include <stdlib.h>
  21 #include <stdbool.h>
  22 #include <unistd.h>
  23 #include <getopt.h>
  24 #include <locale.h>
  25 #include <string.h>
  26 #include <poll.h>
  27 #include <netdb.h>
  28 #include <sys/socket.h>
  29 #include <sys/un.h>
  30 #include <sys/timex.h>
  31 #include <sys/utsname.h>
  32 #include <unistd.h>
  33
  34 #include "kdbus.h"
  35 #include "sd-bus.h"
  36 #include "bus-internal.h"
  37 #include "sd-daemon.h"
  38 #include "sd-event.h"
  39 #include "event-util.h"
  40 #include "bus-util.h"
  41 #include "bus-error.h"
  42 #include "bus-message.h"
  43 #include "bus-kernel.h"
  44 #include "socket-util.h"
  45 #include "util.h"
  46 #include "build.h"
  47 #include "strv.h"
  48 #include "sd-id128.h"
  49 #include "async.h"
  50 #include "hashmap.h"
  51 #include "def.h"
  52 #include "unit-name.h"
  53 #include "bus-control.h"
  54 #include "cgroup-util.h"
  55
  56 #define CLIENTS_MAX 1024
  57 #define MATCHES_MAX 1024
  58
  59 typedef struct Match Match;
  60 typedef struct Client Client;
  61 typedef struct Context Context;
  62
  63 struct Match {
  64         Client *client;
  65         char *match;
  66         uint64_t cookie;
  67         LIST_FIELDS(Match, matches);
  68 };
  69
  70 struct Client {
  71         Context *context;
  72         uint64_t id;
  73         uint64_t next_cookie;
  74         Hashmap *matches;
  75         unsigned n_matches;
  76         char *watch;
  77 };
  78
  79 struct Context {
  80         sd_bus *bus;
  81         sd_event *event;
  82         Hashmap *clients;
  83 };
  84
  85 static void match_free(Match *m) {
  86
  87         if (!m)
  88                 return;
  89
  90         if (m->client) {
  91                 Match *first;
  92
  93                 first = hashmap_get(m->client->matches, m->match);
  94                 LIST_REMOVE(matches, first, m);
  95                 if (first)
  96                         assert_se(hashmap_replace(m->client->matches, m->match, first) >= 0);
  97                 else
  98                         hashmap_remove(m->client->matches, m->match);
  99
 100                 m->client->n_matches--;
 101         }
 102
 103         free(m->match);
 104         free(m);
 105 }
 106
 107 static int match_new(Client *c, struct bus_match_component *components, unsigned n_components, Match **_m) {
 108         Match *m, *first;
 109         int r;
 110
 111         assert(c);
 112         assert(_m);
 113
 114         r = hashmap_ensure_allocated(&c->matches, string_hash_func, string_compare_func);
 115         if (r < 0)
 116                 return r;
 117
 118         m = new0(Match, 1);
 119         if (!m)
 120                 return -ENOMEM;
 121
 122         m->match = bus_match_to_string(components, n_components);
 123         if (!m->match) {
 124                 r = -ENOMEM;
 125                 goto fail;
 126         }
 127
 128         m->cookie = ++c->next_cookie;
 129
 130         first = hashmap_get(c->matches, m->match);
 131         LIST_PREPEND(matches, first, m);
 132         r = hashmap_replace(c->matches, m->match, first);
 133         if (r < 0) {
 134                 LIST_REMOVE(matches, first, m);
 135                 goto fail;
 136         }
 137
 138         m->client = c;
 139         c->n_matches++;
 140
 141         *_m = m;
 142         m = NULL;
 143
 144         return 0;
 145
 146 fail:
 147         match_free(m);
 148         return r;
 149 }
 150
 151 static int on_name_owner_changed(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error);
 152
 153 static void client_free(Client *c) {
 154         Match *m;
 155
 156         if (!c)
 157                 return;
 158
 159         if (c->context) {
 160                 if (c->watch)
 161                         sd_bus_remove_match(c->context->bus, c->watch, on_name_owner_changed, c);
 162
 163                 assert_se(hashmap_remove(c->context->clients, &c->id) == c);
 164         }
 165
 166         while ((m = hashmap_first(c->matches)))
 167                 match_free(m);
 168
 169         hashmap_free(c->matches);
 170         free(c->watch);
 171
 172         free(c);
 173 }
 174
 175 static int on_name_owner_changed(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 176         Client *c = userdata;
 177
 178         assert(bus);
 179         assert(m);
 180
 181         client_free(c);
 182         return 0;
 183 }
 184
 185 static int client_acquire(Context *context, uint64_t id, Client **_c) {
 186         char *watch = NULL;
 187         Client *c;
 188         int r;
 189
 190         assert(context);
 191         assert(_c);
 192
 193         c = hashmap_get(context->clients, &id);
 194         if (c) {
 195                 *_c = c;
 196                 return 0;
 197         }
 198
 199         if (hashmap_size(context->clients) >= CLIENTS_MAX)
 200                 return -ENOBUFS;
 201
 202         r = hashmap_ensure_allocated(&context->clients, uint64_hash_func, uint64_compare_func);
 203         if (r < 0)
 204                 return r;
 205
 206         c = new0(Client, 1);
 207         if (!c)
 208                 return -ENOMEM;
 209
 210         c->id = id;
 211
 212         r = hashmap_put(context->clients, &c->id, c);
 213         if (r < 0)
 214                 goto fail;
 215
 216         c->context = context;
 217
 218         if (asprintf(&watch,
 219                      "type='signal',"
 220                      "sender='org.freedesktop.DBus',"
 221                      "path='/org/freedesktop/DBus',"
 222                      "interface='org.freedesktop.DBus',"
 223                      "member='NameOwnerChanged',"
 224                      "arg0=':1.%llu'", (unsigned long long) id) < 0) {
 225                 r = -ENOMEM;
 226                 goto fail;
 227         }
 228
 229         r = sd_bus_add_match(context->bus, watch, on_name_owner_changed, c);
 230         if (r < 0) {
 231                 free(watch);
 232                 goto fail;
 233         }
 234
 235         c->watch = watch;
 236
 237         *_c = c;
 238         return 0;
 239
 240 fail:
 241         client_free(c);
 242         return r;
 243 }
 244
 245 static int driver_add_match(sd_bus *bus, sd_bus_message *message, void *userdata, sd_bus_error *error) {
 246
 247         struct bus_match_component *components = NULL;
 248         Context *context = userdata;
 249         unsigned n_components = 0;
 250         Match *m = NULL;
 251         Client *c = NULL;
 252         char *arg0;
 253         uint64_t id;
 254         int r;
 255
 256         assert(bus);
 257         assert(message);
 258         assert(context);
 259
 260         r = sd_bus_message_read(message, "s", &arg0);
 261         if (r < 0)
 262                 return r;
 263
 264         r = bus_kernel_parse_unique_name(message->sender, &id);
 265         if (r < 0)
 266                 return r;
 267
 268         r = client_acquire(context, id, &c);
 269         if (r == -ENOBUFS)
 270                 return sd_bus_error_setf(error, SD_BUS_ERROR_LIMITS_EXCEEDED, "Reached limit of %u clients", CLIENTS_MAX);
 271         if (r < 0)
 272                 return r;
 273
 274         if (c->n_matches >= MATCHES_MAX) {
 275                 r = sd_bus_error_setf(error, SD_BUS_ERROR_LIMITS_EXCEEDED, "Reached limit of %u matches per client", MATCHES_MAX);
 276                 goto fail;
 277         }
 278
 279         r = bus_match_parse(arg0, &components, &n_components);
 280         if (r < 0) {
 281                 r = sd_bus_error_setf(error, SD_BUS_ERROR_MATCH_RULE_INVALID, "Match rule \"%s\" is not valid", arg0);
 282                 goto fail;
 283         }
 284
 285         r = match_new(c, components, n_components, &m);
 286         if (r < 0)
 287                 goto fail;
 288
 289         r = bus_add_match_internal_kernel(bus, id, components, n_components, m->cookie);
 290         if (r < 0)
 291                 goto fail;
 292
 293         bus_match_parse_free(components, n_components);
 294
 295         return sd_bus_reply_method_return(message, NULL);
 296
 297 fail:
 298         bus_match_parse_free(components, n_components);
 299
 300         match_free(m);
 301
 302         if (c->n_matches <= 0)
 303                 client_free(c);
 304
 305         return r;
 306 }
 307
 308 static int driver_remove_match(sd_bus *bus, sd_bus_message *message, void *userdata, sd_bus_error *error) {
 309
 310         struct bus_match_component *components = NULL;
 311         _cleanup_free_ char *normalized = NULL;
 312         Context *context = userdata;
 313         unsigned n_components = 0;
 314         Client *c = NULL;
 315         Match *m = NULL;
 316         char *arg0;
 317         uint64_t id;
 318         int r;
 319
 320         assert(bus);
 321         assert(message);
 322         assert(context);
 323
 324         r = sd_bus_message_read(message, "s", &arg0);
 325         if (r < 0)
 326                 return r;
 327
 328         r = bus_kernel_parse_unique_name(message->sender, &id);
 329         if (r < 0)
 330                 return r;
 331
 332         c = hashmap_get(context->clients, &id);
 333         if (!c)
 334                 return sd_bus_error_setf(error, SD_BUS_ERROR_MATCH_RULE_NOT_FOUND, "You have not registered any matches.");
 335
 336         r = bus_match_parse(arg0, &components, &n_components);
 337         if (r < 0) {
 338                 r = sd_bus_error_setf(error, SD_BUS_ERROR_MATCH_RULE_INVALID, "Match rule \"%s\" is not valid", arg0);
 339                 goto finish;
 340         }
 341
 342         normalized = bus_match_to_string(components, n_components);
 343         if (!normalized) {
 344                 r = -ENOMEM;
 345                 goto finish;
 346         }
 347
 348         m = hashmap_get(c->matches, normalized);
 349         if (!m) {
 350                 r = sd_bus_error_setf(error, SD_BUS_ERROR_MATCH_RULE_NOT_FOUND, "Match rule \"%s\" not found.", normalized);
 351                 goto finish;
 352         }
 353
 354         bus_remove_match_internal_kernel(bus, id, m->cookie);
 355         match_free(m);
 356
 357         r = sd_bus_reply_method_return(message, NULL);
 358
 359 finish:
 360         bus_match_parse_free(components, n_components);
 361
 362         if (c->n_matches <= 0)
 363                 client_free(c);
 364
 365         return r;
 366 }
 367
 368 static int get_creds(sd_bus *bus, sd_bus_message *m, uint64_t mask, sd_bus_creds **_creds, sd_bus_error *error) {
 369         _cleanup_bus_creds_unref_ sd_bus_creds *c = NULL;
 370         const char *name;
 371         int r;
 372
 373         assert(bus);
 374         assert(m);
 375         assert(_creds);
 376
 377         r = sd_bus_message_read(m, "s", &name);
 378         if (r < 0)
 379                 return r;
 380
 381         assert_return(service_name_is_valid(name), -EINVAL);
 382
 383         r = sd_bus_get_owner(bus, name, mask, &c);
 384         if (r == -ENOENT || r == -ENXIO)
 385                 return sd_bus_error_setf(error, SD_BUS_ERROR_NAME_HAS_NO_OWNER, "Name %s is currently not owned by anyone.", name);
 386         if (r < 0)
 387                 return r;
 388
 389         if ((c->mask & mask) != mask)
 390                 return -ENOTSUP;
 391
 392         *_creds = c;
 393         c = NULL;
 394
 395         return 0;
 396 }
 397
 398 static int driver_get_security_context(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 399         _cleanup_bus_message_unref_ sd_bus_message *reply = NULL;
 400         _cleanup_bus_creds_unref_ sd_bus_creds *creds = NULL;
 401         int r;
 402
 403         r = get_creds(bus, m, SD_BUS_CREDS_SELINUX_CONTEXT, &creds, error);
 404         if (r < 0)
 405                 return r;
 406
 407         r = sd_bus_message_new_method_return(m, &reply);
 408         if (r < 0)
 409                 return r;
 410
 411         r = sd_bus_message_append_array(reply, 'y', creds->label, strlen(creds->label));
 412         if (r < 0)
 413                 return r;
 414
 415         return sd_bus_send(bus, reply, NULL);
 416 }
 417
 418 static int driver_get_pid(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 419         _cleanup_bus_creds_unref_ sd_bus_creds *creds = NULL;
 420         int r;
 421
 422         r = get_creds(bus, m, SD_BUS_CREDS_PID, &creds, error);
 423         if (r < 0)
 424                 return r;
 425
 426         return sd_bus_reply_method_return(m, "u", (uint32_t) creds->pid);
 427 }
 428
 429 static int driver_get_user(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 430         _cleanup_bus_creds_unref_ sd_bus_creds *creds = NULL;
 431         int r;
 432
 433         r = get_creds(bus, m, SD_BUS_CREDS_UID, &creds, error);
 434         if (r < 0)
 435                 return r;
 436
 437         return sd_bus_reply_method_return(m, "u", (uint32_t) creds->uid);
 438 }
 439
 440 static int driver_get_name_owner(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 441         _cleanup_bus_creds_unref_ sd_bus_creds *creds = NULL;
 442         int r;
 443
 444         r = get_creds(bus, m, SD_BUS_CREDS_UNIQUE_NAME, &creds, error);
 445         if (r < 0)
 446                 return r;
 447
 448         return sd_bus_reply_method_return(m, "s", creds->unique_name);
 449 }
 450
 451 static int driver_get_id(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 452         sd_id128_t server_id;
 453         char buf[SD_ID128_STRING_MAX];
 454         int r;
 455
 456         r = sd_bus_get_server_id(bus, &server_id);
 457         if (r < 0)
 458                 return r;
 459
 460         return sd_bus_reply_method_return(m, "s", sd_id128_to_string(server_id, buf));
 461 }
 462
 463 static int driver_hello(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 464         return sd_bus_reply_method_return(m, "s", m->sender);
 465 }
 466
 467 static int return_strv(sd_bus *bus, sd_bus_message *m, char **l) {
 468         _cleanup_bus_message_unref_ sd_bus_message *reply = NULL;
 469         int r;
 470
 471         r = sd_bus_message_new_method_return(m, &reply);
 472         if (r < 0)
 473                 return r;
 474
 475         r = sd_bus_message_append_strv(reply, l);
 476         if (r < 0)
 477                 return r;
 478
 479         return sd_bus_send(bus, reply, NULL);
 480 }
 481
 482 static int driver_list_names(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 483         _cleanup_strv_free_ char **names = NULL;
 484         int r;
 485
 486         r = sd_bus_list_names(bus, &names, NULL);
 487         if (r < 0)
 488                 return r;
 489
 490         /* Let's sort the names list to make it stable */
 491         strv_sort(names);
 492
 493         return return_strv(bus, m, names);
 494 }
 495
 496 static int driver_list_activatable_names(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 497         _cleanup_strv_free_ char **names = NULL;
 498         int r;
 499
 500         r = sd_bus_list_names(bus, NULL, &names);
 501         if (r < 0)
 502                 return r;
 503
 504         /* Let's sort the names list to make it stable */
 505         strv_sort(names);
 506
 507         return return_strv(bus, m, names);
 508 }
 509
 510 static int driver_list_queued_owners(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 511         struct kdbus_cmd_name_list cmd = {};
 512         struct kdbus_name_list *name_list;
 513         struct kdbus_cmd_name *name;
 514         _cleanup_strv_free_ char **owners = NULL;
 515         char *arg0;
 516         int r;
 517
 518         r = sd_bus_message_read(m, "s", &arg0);
 519         if (r < 0)
 520                 return r;
 521
 522         assert_return(service_name_is_valid(arg0), -EINVAL);
 523
 524         cmd.flags = KDBUS_NAME_LIST_QUEUED;
 525
 526         r = ioctl(bus->input_fd, KDBUS_CMD_NAME_LIST, &cmd);
 527         if (r < 0)
 528                 return -errno;
 529
 530         name_list = (struct kdbus_name_list *) ((uint8_t *) bus->kdbus_buffer + cmd.offset);
 531
 532         KDBUS_ITEM_FOREACH(name, name_list, names) {
 533                 char *n;
 534
 535                 if (name->size <= sizeof(*name))
 536                         continue;
 537
 538                 if (!streq(name->name, arg0))
 539                         continue;
 540
 541                 if (asprintf(&n, ":1.%llu", (unsigned long long) name->owner_id) < 0)
 542                         return -ENOMEM;
 543
 544                 r = strv_push(&owners, n);
 545                 if (r < 0) {
 546                         free(n);
 547                         return -ENOMEM;
 548                 }
 549         }
 550
 551         r = ioctl(bus->input_fd, KDBUS_CMD_FREE, &cmd.offset);
 552         if (r < 0)
 553                 return -errno;
 554
 555         return return_strv(bus, m, owners);
 556 }
 557
 558 static int driver_name_has_owner(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 559         const char *name;
 560         int r;
 561
 562         r = sd_bus_message_read(m, "s", &name);
 563         if (r < 0)
 564                 return r;
 565
 566         assert_return(service_name_is_valid(name), -EINVAL);
 567
 568         r = sd_bus_get_owner(bus, name, 0, NULL);
 569         if (r < 0 && r != -ENOENT && r != -ENXIO)
 570                 return r;
 571
 572         return sd_bus_reply_method_return(m, "b", r >= 0);
 573 }
 574
 575 static int driver_request_name(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 576         struct kdbus_cmd_name *n;
 577         uint32_t flags;
 578         size_t size, l;
 579         uint64_t id;
 580         const char *name;
 581         int r;
 582
 583         r = sd_bus_message_read(m, "su", &name, &flags);
 584         if (r < 0)
 585                 return r;
 586
 587         assert_return(service_name_is_valid(name), -EINVAL);
 588         assert_return((flags & ~(BUS_NAME_ALLOW_REPLACEMENT|BUS_NAME_REPLACE_EXISTING|BUS_NAME_DO_NOT_QUEUE)) == 0, -EINVAL);
 589
 590         l = strlen(name);
 591         size = offsetof(struct kdbus_cmd_name, name) + l + 1;
 592         n = alloca0(size);
 593         n->size = size;
 594         memcpy(n->name, name, l+1);
 595         kdbus_translate_request_name_flags(flags, (uint64_t *) &n->flags);
 596
 597         /* This function is open-coded because we request the name 'on behalf'
 598          * of the requesting connection */
 599         r = bus_kernel_parse_unique_name(m->sender, &id);
 600         if (r < 0)
 601                 return r;
 602
 603         n->owner_id = id;
 604
 605         r = ioctl(bus->input_fd, KDBUS_CMD_NAME_ACQUIRE, n);
 606         if (r < 0) {
 607                 if (errno == EEXIST)
 608                         return sd_bus_reply_method_return(m, "u", BUS_NAME_EXISTS);
 609                 if (errno == EALREADY)
 610                         return sd_bus_reply_method_return(m, "u", BUS_NAME_ALREADY_OWNER);
 611
 612                 return -errno;
 613         }
 614
 615         if (n->flags & KDBUS_NAME_IN_QUEUE)
 616                 return sd_bus_reply_method_return(m, "u", BUS_NAME_IN_QUEUE);
 617
 618         return sd_bus_reply_method_return(m, "u", BUS_NAME_PRIMARY_OWNER);
 619 }
 620
 621 static int driver_release_name(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 622         struct kdbus_cmd_name *n;
 623         const char *name;
 624         size_t l, size;
 625         uint64_t id;
 626         int r;
 627
 628         r = sd_bus_message_read(m, "s", &name);
 629         if (r < 0)
 630                 return r;
 631
 632         assert_return(service_name_is_valid(name), -EINVAL);
 633
 634         l = strlen(name);
 635         size = offsetof(struct kdbus_cmd_name, name) + l + 1;
 636         n = alloca0(size);
 637         n->size = size;
 638         memcpy(n->name, name, l+1);
 639
 640         /* This function is open-coded because we request the name 'on behalf'
 641          * of the requesting connection */
 642         r = bus_kernel_parse_unique_name(m->sender, &id);
 643         if (r < 0)
 644                 return r;
 645
 646         n->owner_id = id;
 647
 648         r = ioctl(bus->input_fd, KDBUS_CMD_NAME_RELEASE, n);
 649         if (r < 0) {
 650                 if (errno == ESRCH)
 651                         return sd_bus_reply_method_return(m, "u", BUS_NAME_NON_EXISTENT);
 652                 if (errno == EADDRINUSE)
 653                         return sd_bus_reply_method_return(m, "u", BUS_NAME_NOT_OWNER);
 654                 return -errno;
 655         }
 656
 657         return sd_bus_reply_method_return(m, "u", BUS_NAME_RELEASED);
 658 }
 659
 660 static int driver_start_service_by_name(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 661         _cleanup_bus_message_unref_ sd_bus_message *reply = NULL;
 662         _cleanup_strv_free_ char **t = NULL;
 663         _cleanup_free_ char *path = NULL;
 664         uint32_t flags;
 665         char *name, *u;
 666         int r;
 667
 668         r = sd_bus_message_read(m, "su", &name, &flags);
 669         if (r < 0)
 670                 return r;
 671
 672         assert_return(service_name_is_valid(name), -EINVAL);
 673         assert_return(flags == 0, -ENOTSUP);
 674
 675         r = sd_bus_get_owner(bus, name, 0, NULL);
 676         if (r >= 0)
 677                 return sd_bus_reply_method_return(m, "u", BUS_START_REPLY_ALREADY_RUNNING);
 678         if (r != -ENOENT)
 679                 return r;
 680
 681         u = strappenda(name, ".busname");
 682
 683         path = unit_dbus_path_from_name(u);
 684         if (!path)
 685                 return -ENOMEM;
 686
 687         r = sd_bus_get_property_strv(
 688                         bus,
 689                         "org.freedesktop.systemd1",
 690                         path,
 691                         "org.freedesktop.systemd1.Unit",
 692                         "Triggers",
 693                         error,
 694                         &t);
 695         if (r < 0)
 696                 return r;
 697
 698         if (!t || !t[0] || t[1])
 699                 return sd_bus_error_setf(error, SD_BUS_ERROR_SERVICE_UNKNOWN, "Bus name %s not found.", name);
 700
 701         r = sd_bus_call_method(
 702                         bus,
 703                         "org.freedesktop.systemd1",
 704                         "/org/freedesktop/systemd1",
 705                         "org.freedesktop.systemd1.Manager",
 706                         "StartUnit",
 707                         error,
 708                         &reply,
 709                         "ss",
 710                         t[0],
 711                         "replace");
 712         if (r < 0)
 713                 return r;
 714
 715         return sd_bus_reply_method_return(m, "u", BUS_START_REPLY_SUCCESS);
 716 }
 717
 718 static int driver_update_environment(sd_bus*bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 719         _cleanup_bus_message_unref_ sd_bus_message *msg = NULL;
 720         _cleanup_strv_free_ char **args = NULL;
 721         int r;
 722
 723         r = sd_bus_message_enter_container(m, SD_BUS_TYPE_ARRAY, "{ss}");
 724         if (r < 0)
 725                 return r;
 726
 727        while ((r = sd_bus_message_enter_container(m, SD_BUS_TYPE_DICT_ENTRY, "ss")) > 0) {
 728                 _cleanup_free_ char *s = NULL;
 729                 const char *key;
 730                 const char *value;
 731
 732                 r = sd_bus_message_read(m, "ss", &key, &value);
 733                 if (r < 0)
 734                         return r;
 735
 736                 s = strjoin(key, "=", value, NULL);
 737                 if (!s)
 738                         return ENOMEM;
 739
 740                 r  = strv_extend(&args, s);
 741                 if (r < 0)
 742                         return r;
 743
 744                 r = sd_bus_message_exit_container(m);
 745                 if (r < 0)
 746                         return r;
 747         }
 748
 749         r = sd_bus_message_exit_container(m);
 750         if (r < 0)
 751                 return r;
 752
 753         if (!args)
 754                 return -EINVAL;
 755
 756         r = sd_bus_message_new_method_call(
 757                         bus,
 758                         "org.freedesktop.systemd1",
 759                         "/org/freedesktop/systemd1",
 760                         "org.freedesktop.systemd1.Manager",
 761                         "SetEnvironment",
 762                         &msg);
 763         if (r < 0)
 764                 return r;
 765
 766         r = sd_bus_message_append_strv(msg, args);
 767         if (r < 0)
 768                 return r;
 769
 770         return sd_bus_call(bus, msg, 0, NULL, NULL);
 771 }
 772
 773 static int driver_unsupported(sd_bus *bus, sd_bus_message *m, void *userdata, sd_bus_error *error) {
 774         return sd_bus_error_setf(error, SD_BUS_ERROR_NOT_SUPPORTED, "%s() is not supported", sd_bus_message_get_member(m));
 775 }
 776
 777 static const sd_bus_vtable driver_vtable[] = {
 778         SD_BUS_VTABLE_START(0),
 779         SD_BUS_METHOD("AddMatch", "s", NULL, driver_add_match, SD_BUS_VTABLE_UNPRIVILEGED),
 780         SD_BUS_METHOD("GetConnectionSELinuxSecurityContext", "s", "ay", driver_get_security_context, SD_BUS_VTABLE_UNPRIVILEGED),
 781         SD_BUS_METHOD("GetConnectionUnixProcessID", "s", "u", driver_get_pid, SD_BUS_VTABLE_UNPRIVILEGED),
 782         SD_BUS_METHOD("GetConnectionUnixUser", "s", "u", driver_get_user, SD_BUS_VTABLE_UNPRIVILEGED),
 783         SD_BUS_METHOD("GetId", NULL, "s", driver_get_id, SD_BUS_VTABLE_UNPRIVILEGED),
 784         SD_BUS_METHOD("GetNameOwner", "s", "s", driver_get_name_owner, SD_BUS_VTABLE_UNPRIVILEGED),
 785         SD_BUS_METHOD("Hello", NULL, "s", driver_hello, SD_BUS_VTABLE_UNPRIVILEGED),
 786         SD_BUS_METHOD("ListActivatableNames", NULL, "as", driver_list_activatable_names, SD_BUS_VTABLE_UNPRIVILEGED),
 787         SD_BUS_METHOD("ListNames", NULL, "as", driver_list_names, SD_BUS_VTABLE_UNPRIVILEGED),
 788         SD_BUS_METHOD("ListQueuedOwners", "s", "as", driver_list_queued_owners, SD_BUS_VTABLE_UNPRIVILEGED),
 789         SD_BUS_METHOD("NameHasOwner", "s", "b", driver_name_has_owner, SD_BUS_VTABLE_UNPRIVILEGED),
 790         SD_BUS_METHOD("ReleaseName", "s", "u", driver_release_name, SD_BUS_VTABLE_UNPRIVILEGED),
 791         SD_BUS_METHOD("ReloadConfig", NULL, NULL, driver_unsupported, SD_BUS_VTABLE_DEPRECATED),
 792         SD_BUS_METHOD("RemoveMatch", "s", NULL, driver_remove_match, SD_BUS_VTABLE_UNPRIVILEGED),
 793         SD_BUS_METHOD("RequestName", "su", "u", driver_request_name, SD_BUS_VTABLE_UNPRIVILEGED),
 794         SD_BUS_METHOD("StartServiceByName", "su", "u", driver_start_service_by_name, SD_BUS_VTABLE_UNPRIVILEGED),
 795         SD_BUS_METHOD("UpdateActivationEnvironment", "a{ss}", NULL, driver_update_environment, 0),
 796         SD_BUS_SIGNAL("NameAcquired", "s", SD_BUS_VTABLE_DEPRECATED),
 797         SD_BUS_SIGNAL("NameLost", "s", SD_BUS_VTABLE_DEPRECATED),
 798         SD_BUS_SIGNAL("NameOwnerChanged", "sss", 0),
 799         SD_BUS_VTABLE_END
 800 };
 801
 802 static int connect_bus(Context *c) {
 803         int r;
 804
 805         assert(c);
 806
 807         r = cg_pid_get_owner_uid(0, NULL);
 808         if (r < 0)
 809                 r = sd_bus_default_system(&c->bus);
 810         else
 811                 r = sd_bus_default_user(&c->bus);
 812         if (r < 0) {
 813                 log_error("Failed to create bus: %s", strerror(-r));
 814                 return r;
 815         }
 816
 817         if (!c->bus->is_kernel) {
 818                 log_error("Not running on kdbus");
 819                 return -EPERM;
 820         }
 821
 822         r = sd_bus_add_object_vtable(c->bus, "/org/freedesktop/DBus", "org.freedesktop.DBus", driver_vtable, c);
 823         if (r < 0) {
 824                 log_error("Failed to add manager object vtable: %s", strerror(-r));
 825                 return r;
 826         }
 827
 828         r = sd_bus_request_name(c->bus, "org.freedesktop.DBus", 0);
 829         if (r < 0) {
 830                 log_error("Unable to request name: %s", strerror(-r));
 831                 return r;
 832         }
 833
 834         r = sd_bus_attach_event(c->bus, c->event, 0);
 835         if (r < 0) {
 836                 log_error("Error while adding bus to event loop: %s", strerror(-r));
 837                 return r;
 838         }
 839
 840         return 0;
 841 }
 842
 843 static bool check_idle(void *userdata) {
 844         Context *c = userdata;
 845         assert(c);
 846
 847         return hashmap_isempty(c->clients);
 848 }
 849
 850 int main(int argc, char *argv[]) {
 851         Context context = {};
 852         Client *c;
 853         int r;
 854
 855         log_set_target(LOG_TARGET_AUTO);
 856         log_parse_environment();
 857         log_open();
 858
 859         if (argc != 1) {
 860                 log_error("This program takes no arguments.");
 861                 r = -EINVAL;
 862                 goto finish;
 863         }
 864
 865         r = sd_event_default(&context.event);
 866         if (r < 0) {
 867                 log_error("Failed to allocate event loop: %s", strerror(-r));
 868                 goto finish;
 869         }
 870
 871         sd_event_set_watchdog(context.event, true);
 872
 873         r = connect_bus(&context);
 874         if (r < 0)
 875                 goto finish;
 876
 877         r = bus_event_loop_with_idle(context.event, context.bus, "org.freedesktop.DBus", DEFAULT_EXIT_USEC, check_idle, &context);
 878         if (r < 0) {
 879                 log_error("Failed to run event loop: %s", strerror(-r));
 880                 goto finish;
 881         }
 882
 883 finish:
 884         while ((c = hashmap_first(context.clients)))
 885                 client_free(c);
 886
 887         sd_bus_unref(context.bus);
 888         sd_event_unref(context.event);
 889
 890         return r < 0 ? EXIT_FAILURE : EXIT_SUCCESS;
 891 }