src/login/logind.c

   1 /* SPDX-License-Identifier: LGPL-2.1+ */
   2
   3 #include <errno.h>
   4 #include <fcntl.h>
   5 #include <string.h>
   6 #include <unistd.h>
   7
   8 #if 0 /// elogind needs the systems udev header
   9 #include "libudev.h"
  10 #else
  11 #include <libudev.h>
  12 #endif // 0
  13 #include "sd-daemon.h"
  14
  15 #include "alloc-util.h"
  16 #include "bus-error.h"
  17 #include "bus-util.h"
  18 //#include "cgroup-util.h"
  19 #include "def.h"
  20 #include "dirent-util.h"
  21 #include "fd-util.h"
  22 #include "format-util.h"
  23 #include "fs-util.h"
  24 #include "logind.h"
  25 #include "parse-util.h"
  26 //#include "process-util.h"
  27 #include "selinux-util.h"
  28 #include "signal-util.h"
  29 #include "strv.h"
  30 #include "udev-util.h"
  31 /// Additional includes needed by elogind
  32 #include "cgroup.h"       // From src/core/
  33 #include "elogind.h"
  34 #include "label.h"
  35 #include "musl_missing.h"
  36 #include "process-util.h"
  37 #include "cgroup-util.h"
  38
  39 static Manager* manager_unref(Manager *m);
  40 DEFINE_TRIVIAL_CLEANUP_FUNC(Manager*, manager_unref);
  41
  42 static int manager_new(Manager **ret) {
  43         _cleanup_(manager_unrefp) Manager *m = NULL;
  44         int r;
  45
  46         assert(ret);
  47
  48         m = new0(Manager, 1);
  49         if (!m)
  50                 return -ENOMEM;
  51
  52         m->console_active_fd = -1;
  53 #if 0 /// UNNEEDED by elogind
  54         m->reserve_vt_fd = -1;
  55 #endif // 0
  56
  57         m->idle_action_not_before_usec = now(CLOCK_MONOTONIC);
  58
  59         m->devices = hashmap_new(&string_hash_ops);
  60         m->seats = hashmap_new(&string_hash_ops);
  61         m->sessions = hashmap_new(&string_hash_ops);
  62         m->users = hashmap_new(NULL);
  63         m->inhibitors = hashmap_new(&string_hash_ops);
  64         m->buttons = hashmap_new(&string_hash_ops);
  65
  66         m->user_units = hashmap_new(&string_hash_ops);
  67         m->session_units = hashmap_new(&string_hash_ops);
  68
  69         if (!m->devices || !m->seats || !m->sessions || !m->users || !m->inhibitors || !m->buttons || !m->user_units || !m->session_units)
  70                 return -ENOMEM;
  71
  72 #if 1 /// elogind needs some more data
  73         r = elogind_manager_new(m);
  74         if (r < 0)
  75                 return r;
  76 #endif // 1
  77         m->udev = udev_new();
  78         if (!m->udev)
  79                 return -errno;
  80
  81         r = sd_event_default(&m->event);
  82         if (r < 0)
  83                 return r;
  84
  85         r = sd_event_add_signal(m->event, NULL, SIGINT, NULL, NULL);
  86         if (r < 0)
  87                 return r;
  88
  89         r = sd_event_add_signal(m->event, NULL, SIGTERM, NULL, NULL);
  90         if (r < 0)
  91                 return r;
  92
  93         (void) sd_event_set_watchdog(m->event, true);
  94
  95         manager_reset_config(m);
  96
  97         *ret = TAKE_PTR(m);
  98         return 0;
  99 }
 100
 101 static Manager* manager_unref(Manager *m) {
 102         Session *session;
 103         User *u;
 104         Device *d;
 105         Seat *s;
 106         Inhibitor *i;
 107         Button *b;
 108
 109         if (!m)
 110                 return NULL;
 111
 112         while ((session = hashmap_first(m->sessions)))
 113                 session_free(session);
 114
 115         while ((u = hashmap_first(m->users)))
 116                 user_free(u);
 117
 118         while ((d = hashmap_first(m->devices)))
 119                 device_free(d);
 120
 121         while ((s = hashmap_first(m->seats)))
 122                 seat_free(s);
 123
 124         while ((i = hashmap_first(m->inhibitors)))
 125                 inhibitor_free(i);
 126
 127         while ((b = hashmap_first(m->buttons)))
 128                 button_free(b);
 129
 130         hashmap_free(m->devices);
 131         hashmap_free(m->seats);
 132         hashmap_free(m->sessions);
 133         hashmap_free(m->users);
 134         hashmap_free(m->inhibitors);
 135         hashmap_free(m->buttons);
 136
 137         hashmap_free(m->user_units);
 138         hashmap_free(m->session_units);
 139
 140         sd_event_source_unref(m->idle_action_event_source);
 141         sd_event_source_unref(m->inhibit_timeout_source);
 142         sd_event_source_unref(m->scheduled_shutdown_timeout_source);
 143         sd_event_source_unref(m->nologin_timeout_source);
 144         sd_event_source_unref(m->wall_message_timeout_source);
 145
 146         sd_event_source_unref(m->console_active_event_source);
 147         sd_event_source_unref(m->udev_seat_event_source);
 148         sd_event_source_unref(m->udev_device_event_source);
 149         sd_event_source_unref(m->udev_vcsa_event_source);
 150         sd_event_source_unref(m->udev_button_event_source);
 151         sd_event_source_unref(m->lid_switch_ignore_event_source);
 152
 153         safe_close(m->console_active_fd);
 154
 155         udev_monitor_unref(m->udev_seat_monitor);
 156         udev_monitor_unref(m->udev_device_monitor);
 157         udev_monitor_unref(m->udev_vcsa_monitor);
 158         udev_monitor_unref(m->udev_button_monitor);
 159
 160         udev_unref(m->udev);
 161
 162         if (m->unlink_nologin)
 163                 (void) unlink_or_warn("/run/nologin");
 164
 165         bus_verify_polkit_async_registry_free(m->polkit_registry);
 166
 167         sd_bus_unref(m->bus);
 168         sd_event_unref(m->event);
 169
 170 #if 0 /// elogind does not support autospawning of vts
 171         safe_close(m->reserve_vt_fd);
 172 #endif // 0
 173 #if 1 /// elogind has to free its own data
 174         elogind_manager_free(m);
 175 #endif // 1
 176
 177         strv_free(m->kill_only_users);
 178         strv_free(m->kill_exclude_users);
 179
 180         free(m->scheduled_shutdown_type);
 181         free(m->scheduled_shutdown_tty);
 182         free(m->wall_message);
 183 #if 0 /// UNNEEDED by elogind
 184         free(m->action_job);
 185 #endif // 0
 186
 187         return mfree(m);
 188 }
 189
 190 static int manager_enumerate_devices(Manager *m) {
 191         struct udev_list_entry *item = NULL, *first = NULL;
 192         _cleanup_(udev_enumerate_unrefp) struct udev_enumerate *e = NULL;
 193         int r;
 194
 195         assert(m);
 196
 197         /* Loads devices from udev and creates seats for them as
 198          * necessary */
 199
 200         e = udev_enumerate_new(m->udev);
 201         if (!e)
 202                 return -ENOMEM;
 203
 204         r = udev_enumerate_add_match_tag(e, "master-of-seat");
 205         if (r < 0)
 206                 return r;
 207
 208         r = udev_enumerate_add_match_is_initialized(e);
 209         if (r < 0)
 210                 return r;
 211
 212         r = udev_enumerate_scan_devices(e);
 213         if (r < 0)
 214                 return r;
 215
 216         first = udev_enumerate_get_list_entry(e);
 217         udev_list_entry_foreach(item, first) {
 218                 _cleanup_(udev_device_unrefp) struct udev_device *d = NULL;
 219                 int k;
 220
 221                 d = udev_device_new_from_syspath(m->udev, udev_list_entry_get_name(item));
 222                 if (!d)
 223                         return -ENOMEM;
 224
 225                 k = manager_process_seat_device(m, d);
 226                 if (k < 0)
 227                         r = k;
 228         }
 229
 230         return r;
 231 }
 232
 233 static int manager_enumerate_buttons(Manager *m) {
 234         _cleanup_(udev_enumerate_unrefp) struct udev_enumerate *e = NULL;
 235         struct udev_list_entry *item = NULL, *first = NULL;
 236         int r;
 237
 238         assert(m);
 239
 240         /* Loads buttons from udev */
 241
 242         if (manager_all_buttons_ignored(m))
 243                 return 0;
 244
 245         e = udev_enumerate_new(m->udev);
 246         if (!e)
 247                 return -ENOMEM;
 248
 249         r = udev_enumerate_add_match_subsystem(e, "input");
 250         if (r < 0)
 251                 return r;
 252
 253         r = udev_enumerate_add_match_tag(e, "power-switch");
 254         if (r < 0)
 255                 return r;
 256
 257         r = udev_enumerate_add_match_is_initialized(e);
 258         if (r < 0)
 259                 return r;
 260
 261         r = udev_enumerate_scan_devices(e);
 262         if (r < 0)
 263                 return r;
 264
 265         first = udev_enumerate_get_list_entry(e);
 266         udev_list_entry_foreach(item, first) {
 267                 _cleanup_(udev_device_unrefp) struct udev_device *d = NULL;
 268                 int k;
 269
 270                 d = udev_device_new_from_syspath(m->udev, udev_list_entry_get_name(item));
 271                 if (!d)
 272                         return -ENOMEM;
 273
 274                 k = manager_process_button_device(m, d);
 275                 if (k < 0)
 276                         r = k;
 277         }
 278
 279         return r;
 280 }
 281
 282 static int manager_enumerate_seats(Manager *m) {
 283         _cleanup_closedir_ DIR *d = NULL;
 284         struct dirent *de;
 285         int r = 0;
 286
 287         assert(m);
 288
 289         /* This loads data about seats stored on disk, but does not
 290          * actually create any seats. Removes data of seats that no
 291          * longer exist. */
 292
 293         d = opendir("/run/systemd/seats");
 294         if (!d) {
 295                 if (errno == ENOENT)
 296                         return 0;
 297
 298                 return log_error_errno(errno, "Failed to open /run/systemd/seats: %m");
 299         }
 300
 301         FOREACH_DIRENT(de, d, return -errno) {
 302                 Seat *s;
 303                 int k;
 304
 305                 if (!dirent_is_file(de))
 306                         continue;
 307
 308                 s = hashmap_get(m->seats, de->d_name);
 309                 if (!s) {
 310                         if (unlinkat(dirfd(d), de->d_name, 0) < 0)
 311                                 log_warning("Failed to remove /run/systemd/seats/%s: %m",
 312                                             de->d_name);
 313                         continue;
 314                 }
 315
 316                 k = seat_load(s);
 317                 if (k < 0)
 318                         r = k;
 319         }
 320
 321         return r;
 322 }
 323
 324 static int manager_enumerate_linger_users(Manager *m) {
 325         _cleanup_closedir_ DIR *d = NULL;
 326         struct dirent *de;
 327         int r = 0;
 328
 329         assert(m);
 330
 331         d = opendir("/var/lib/elogind/linger");
 332         if (!d) {
 333                 if (errno == ENOENT)
 334                         return 0;
 335
 336                 return log_error_errno(errno, "Failed to open /var/lib/elogind/linger/: %m");
 337         }
 338
 339         FOREACH_DIRENT(de, d, return -errno) {
 340                 int k;
 341
 342                 if (!dirent_is_file(de))
 343                         continue;
 344
 345                 k = manager_add_user_by_name(m, de->d_name, NULL);
 346                 if (k < 0) {
 347                         log_notice_errno(k, "Couldn't add lingering user %s: %m", de->d_name);
 348                         r = k;
 349                 }
 350         }
 351
 352         return r;
 353 }
 354
 355 static int manager_enumerate_users(Manager *m) {
 356         _cleanup_closedir_ DIR *d = NULL;
 357         struct dirent *de;
 358         int r, k;
 359
 360         assert(m);
 361
 362         /* Add lingering users */
 363         r = manager_enumerate_linger_users(m);
 364
 365         /* Read in user data stored on disk */
 366         d = opendir("/run/systemd/users");
 367         if (!d) {
 368                 if (errno == ENOENT)
 369                         return 0;
 370
 371                 return log_error_errno(errno, "Failed to open /run/systemd/users: %m");
 372         }
 373
 374         FOREACH_DIRENT(de, d, return -errno) {
 375                 User *u;
 376
 377                 if (!dirent_is_file(de))
 378                         continue;
 379
 380                 k = manager_add_user_by_name(m, de->d_name, &u);
 381                 if (k < 0) {
 382                         log_error_errno(k, "Failed to add user by file name %s: %m", de->d_name);
 383
 384                         r = k;
 385                         continue;
 386                 }
 387
 388                 user_add_to_gc_queue(u);
 389
 390                 k = user_load(u);
 391                 if (k < 0)
 392                         r = k;
 393         }
 394
 395         return r;
 396 }
 397
 398 static int parse_fdname(const char *fdname, char **session_id, dev_t *dev) {
 399         _cleanup_strv_free_ char **parts = NULL;
 400         _cleanup_free_ char *id = NULL;
 401         unsigned int major, minor;
 402         int r;
 403
 404         parts = strv_split(fdname, "-");
 405         if (!parts)
 406                 return -ENOMEM;
 407         if (strv_length(parts) != 5)
 408                 return -EINVAL;
 409
 410         if (!streq(parts[0], "session"))
 411                 return -EINVAL;
 412
 413         id = strdup(parts[1]);
 414         if (!id)
 415                 return -ENOMEM;
 416
 417         if (!streq(parts[2], "device"))
 418                 return -EINVAL;
 419
 420         r = safe_atou(parts[3], &major);
 421         if (r < 0)
 422                 return r;
 423         r = safe_atou(parts[4], &minor);
 424         if (r < 0)
 425                 return r;
 426
 427         *dev = makedev(major, minor);
 428         *session_id = TAKE_PTR(id);
 429
 430         return 0;
 431 }
 432
 433 static int manager_attach_fds(Manager *m) {
 434         _cleanup_strv_free_ char **fdnames = NULL;
 435         int n, i, fd;
 436
 437         /* Upon restart, PID1 will send us back all fds of session devices
 438          * that we previously opened. Each file descriptor is associated
 439          * with a given session. The session ids are passed through FDNAMES. */
 440
 441         n = sd_listen_fds_with_names(true, &fdnames);
 442         if (n <= 0)
 443                 return n;
 444
 445         for (i = 0; i < n; i++) {
 446                 _cleanup_free_ char *id = NULL;
 447                 dev_t dev;
 448                 struct stat st;
 449                 SessionDevice *sd;
 450                 Session *s;
 451                 int r;
 452
 453                 fd = SD_LISTEN_FDS_START + i;
 454
 455                 r = parse_fdname(fdnames[i], &id, &dev);
 456                 if (r < 0) {
 457                         log_debug_errno(r, "Failed to parse fd name %s: %m", fdnames[i]);
 458                         close_nointr(fd);
 459                         continue;
 460                 }
 461
 462                 s = hashmap_get(m->sessions, id);
 463                 if (!s) {
 464                         /* If the session doesn't exist anymore, the associated session
 465                          * device attached to this fd doesn't either. Let's simply close
 466                          * this fd. */
 467                         log_debug("Failed to attach fd for unknown session: %s", id);
 468                         close_nointr(fd);
 469                         continue;
 470                 }
 471
 472                 if (fstat(fd, &st) < 0) {
 473                         /* The device is allowed to go away at a random point, in which
 474                          * case fstat failing is expected. */
 475                         log_debug_errno(errno, "Failed to stat device fd for session %s: %m", id);
 476                         close_nointr(fd);
 477                         continue;
 478                 }
 479
 480                 if (!S_ISCHR(st.st_mode) || st.st_rdev != dev) {
 481                         log_debug("Device fd doesn't point to the expected character device node");
 482                         close_nointr(fd);
 483                         continue;
 484                 }
 485
 486                 sd = hashmap_get(s->devices, &dev);
 487                 if (!sd) {
 488                         /* Weird, we got an fd for a session device which wasn't
 489                          * recorded in the session state file... */
 490                         log_warning("Got fd for missing session device [%u:%u] in session %s",
 491                                     major(dev), minor(dev), s->id);
 492                         close_nointr(fd);
 493                         continue;
 494                 }
 495
 496                 log_debug("Attaching fd to session device [%u:%u] for session %s",
 497                           major(dev), minor(dev), s->id);
 498
 499                 session_device_attach_fd(sd, fd, s->was_active);
 500         }
 501
 502         return 0;
 503 }
 504
 505 static int manager_enumerate_sessions(Manager *m) {
 506         _cleanup_closedir_ DIR *d = NULL;
 507         struct dirent *de;
 508         int r = 0, k;
 509
 510         assert(m);
 511
 512         /* Read in session data stored on disk */
 513         d = opendir("/run/systemd/sessions");
 514         if (!d) {
 515                 if (errno == ENOENT)
 516                         return 0;
 517
 518                 return log_error_errno(errno, "Failed to open /run/systemd/sessions: %m");
 519         }
 520
 521         FOREACH_DIRENT(de, d, return -errno) {
 522                 struct Session *s;
 523
 524                 if (!dirent_is_file(de))
 525                         continue;
 526
 527                 if (!session_id_valid(de->d_name)) {
 528                         log_warning("Invalid session file name '%s', ignoring.", de->d_name);
 529                         r = -EINVAL;
 530                         continue;
 531                 }
 532
 533                 k = manager_add_session(m, de->d_name, &s);
 534                 if (k < 0) {
 535                         log_error_errno(k, "Failed to add session by file name %s: %m", de->d_name);
 536                         r = k;
 537                         continue;
 538                 }
 539
 540                 session_add_to_gc_queue(s);
 541
 542                 k = session_load(s);
 543                 if (k < 0)
 544                         r = k;
 545         }
 546
 547         /* We might be restarted and PID1 could have sent us back the
 548          * session device fds we previously saved. */
 549         k = manager_attach_fds(m);
 550         if (k < 0)
 551                 log_warning_errno(k, "Failed to reattach session device fds: %m");
 552
 553         return r;
 554 }
 555
 556 static int manager_enumerate_inhibitors(Manager *m) {
 557         _cleanup_closedir_ DIR *d = NULL;
 558         struct dirent *de;
 559         int r = 0;
 560
 561         assert(m);
 562
 563         d = opendir("/run/systemd/inhibit");
 564         if (!d) {
 565                 if (errno == ENOENT)
 566                         return 0;
 567
 568                 return log_error_errno(errno, "Failed to open /run/systemd/inhibit: %m");
 569         }
 570
 571         FOREACH_DIRENT(de, d, return -errno) {
 572                 int k;
 573                 Inhibitor *i;
 574
 575                 if (!dirent_is_file(de))
 576                         continue;
 577
 578                 k = manager_add_inhibitor(m, de->d_name, &i);
 579                 if (k < 0) {
 580                         log_notice_errno(k, "Couldn't add inhibitor %s: %m", de->d_name);
 581                         r = k;
 582                         continue;
 583                 }
 584
 585                 k = inhibitor_load(i);
 586                 if (k < 0)
 587                         r = k;
 588         }
 589
 590         return r;
 591 }
 592
 593 static int manager_dispatch_seat_udev(sd_event_source *s, int fd, uint32_t revents, void *userdata) {
 594         _cleanup_(udev_device_unrefp) struct udev_device *d = NULL;
 595         Manager *m = userdata;
 596
 597         assert(m);
 598
 599         d = udev_monitor_receive_device(m->udev_seat_monitor);
 600         if (!d)
 601                 return -ENOMEM;
 602
 603         manager_process_seat_device(m, d);
 604         return 0;
 605 }
 606
 607 static int manager_dispatch_device_udev(sd_event_source *s, int fd, uint32_t revents, void *userdata) {
 608         _cleanup_(udev_device_unrefp) struct udev_device *d = NULL;
 609         Manager *m = userdata;
 610
 611         assert(m);
 612
 613         d = udev_monitor_receive_device(m->udev_device_monitor);
 614         if (!d)
 615                 return -ENOMEM;
 616
 617         manager_process_seat_device(m, d);
 618         return 0;
 619 }
 620
 621 #if 0 /// UNNEEDED by elogind
 622 static int manager_dispatch_vcsa_udev(sd_event_source *s, int fd, uint32_t revents, void *userdata) {
 623         _cleanup_(udev_device_unrefp) struct udev_device *d = NULL;
 624         Manager *m = userdata;
 625         const char *name;
 626
 627         assert(m);
 628
 629         d = udev_monitor_receive_device(m->udev_vcsa_monitor);
 630         if (!d)
 631                 return -ENOMEM;
 632
 633         name = udev_device_get_sysname(d);
 634
 635         /* Whenever a VCSA device is removed try to reallocate our
 636          * VTs, to make sure our auto VTs never go away. */
 637
 638         if (name && startswith(name, "vcsa") && streq_ptr(udev_device_get_action(d), "remove"))
 639                 seat_preallocate_vts(m->seat0);
 640
 641         return 0;
 642 }
 643 #endif // 0
 644
 645 static int manager_dispatch_button_udev(sd_event_source *s, int fd, uint32_t revents, void *userdata) {
 646         _cleanup_(udev_device_unrefp) struct udev_device *d = NULL;
 647         Manager *m = userdata;
 648
 649         assert(m);
 650
 651         d = udev_monitor_receive_device(m->udev_button_monitor);
 652         if (!d)
 653                 return -ENOMEM;
 654
 655         manager_process_button_device(m, d);
 656         return 0;
 657 }
 658
 659 static int manager_dispatch_console(sd_event_source *s, int fd, uint32_t revents, void *userdata) {
 660         Manager *m = userdata;
 661
 662         assert(m);
 663         assert(m->seat0);
 664         assert(m->console_active_fd == fd);
 665
 666         seat_read_active_vt(m->seat0);
 667         return 0;
 668 }
 669
 670 #if 0 /// UNNEEDED by elogind
 671 static int manager_reserve_vt(Manager *m) {
 672         _cleanup_free_ char *p = NULL;
 673
 674         assert(m);
 675
 676         if (m->reserve_vt <= 0)
 677                 return 0;
 678
 679         if (asprintf(&p, "/dev/tty%u", m->reserve_vt) < 0)
 680                 return log_oom();
 681
 682         m->reserve_vt_fd = open(p, O_RDWR|O_NOCTTY|O_CLOEXEC|O_NONBLOCK);
 683         if (m->reserve_vt_fd < 0) {
 684
 685                 /* Don't complain on VT-less systems */
 686                 if (errno != ENOENT)
 687                         log_warning_errno(errno, "Failed to pin reserved VT: %m");
 688                 return -errno;
 689         }
 690
 691         return 0;
 692 }
 693 #endif // 0
 694
 695 static int manager_connect_bus(Manager *m) {
 696         int r;
 697
 698         assert(m);
 699         assert(!m->bus);
 700
 701         r = sd_bus_default_system(&m->bus);
 702         if (r < 0)
 703                 return log_error_errno(r, "Failed to connect to system bus: %m");
 704
 705         r = sd_bus_add_object_vtable(m->bus, NULL, "/org/freedesktop/login1", "org.freedesktop.login1.Manager", manager_vtable, m);
 706         if (r < 0)
 707                 return log_error_errno(r, "Failed to add manager object vtable: %m");
 708
 709         r = sd_bus_add_fallback_vtable(m->bus, NULL, "/org/freedesktop/login1/seat", "org.freedesktop.login1.Seat", seat_vtable, seat_object_find, m);
 710         if (r < 0)
 711                 return log_error_errno(r, "Failed to add seat object vtable: %m");
 712
 713         r = sd_bus_add_node_enumerator(m->bus, NULL, "/org/freedesktop/login1/seat", seat_node_enumerator, m);
 714         if (r < 0)
 715                 return log_error_errno(r, "Failed to add seat enumerator: %m");
 716
 717         r = sd_bus_add_fallback_vtable(m->bus, NULL, "/org/freedesktop/login1/session", "org.freedesktop.login1.Session", session_vtable, session_object_find, m);
 718         if (r < 0)
 719                 return log_error_errno(r, "Failed to add session object vtable: %m");
 720
 721         r = sd_bus_add_node_enumerator(m->bus, NULL, "/org/freedesktop/login1/session", session_node_enumerator, m);
 722         if (r < 0)
 723                 return log_error_errno(r, "Failed to add session enumerator: %m");
 724
 725         r = sd_bus_add_fallback_vtable(m->bus, NULL, "/org/freedesktop/login1/user", "org.freedesktop.login1.User", user_vtable, user_object_find, m);
 726         if (r < 0)
 727                 return log_error_errno(r, "Failed to add user object vtable: %m");
 728
 729         r = sd_bus_add_node_enumerator(m->bus, NULL, "/org/freedesktop/login1/user", user_node_enumerator, m);
 730         if (r < 0)
 731                 return log_error_errno(r, "Failed to add user enumerator: %m");
 732
 733 #if 0 /// elogind does not support systemd as PID 1
 734         r = sd_bus_match_signal_async(
 735                         m->bus,
 736                         NULL,
 737                         "org.freedesktop.systemd1",
 738                         "/org/freedesktop/systemd1",
 739                         "org.freedesktop.systemd1.Manager",
 740                         "JobRemoved",
 741                         match_job_removed, NULL, m);
 742         if (r < 0)
 743                 return log_error_errno(r, "Failed to request match for JobRemoved: %m");
 744
 745         r = sd_bus_match_signal_async(
 746                         m->bus,
 747                         NULL,
 748                         "org.freedesktop.systemd1",
 749                         "/org/freedesktop/systemd1",
 750                         "org.freedesktop.systemd1.Manager",
 751                         "UnitRemoved",
 752                         match_unit_removed, NULL, m);
 753         if (r < 0)
 754                 return log_error_errno(r, "Failed to request match for UnitRemoved: %m");
 755
 756         r = sd_bus_match_signal_async(
 757                         m->bus,
 758                         NULL,
 759                         "org.freedesktop.systemd1",
 760                         NULL,
 761                         "org.freedesktop.DBus.Properties",
 762                         "PropertiesChanged",
 763                         match_properties_changed, NULL, m);
 764         if (r < 0)
 765                 return log_error_errno(r, "Failed to request match for PropertiesChanged: %m");
 766
 767         r = sd_bus_match_signal_async(
 768                         m->bus,
 769                         NULL,
 770                         "org.freedesktop.systemd1",
 771                         "/org/freedesktop/systemd1",
 772                         "org.freedesktop.systemd1.Manager",
 773                         "Reloading",
 774                         match_reloading, NULL, m);
 775         if (r < 0)
 776                 return log_error_errno(r, "Failed to request match for Reloading: %m");
 777
 778         r = sd_bus_call_method_async(
 779                         m->bus,
 780                         NULL,
 781                         "org.freedesktop.systemd1",
 782                         "/org/freedesktop/systemd1",
 783                         "org.freedesktop.systemd1.Manager",
 784                         "Subscribe",
 785                         NULL, NULL,
 786                         NULL);
 787 #endif // 0
 788         if (r < 0)
 789                 return log_error_errno(r, "Failed to enable subscription: %m");
 790
 791         r = sd_bus_request_name_async(m->bus, NULL, "org.freedesktop.login1", 0, NULL, NULL);
 792         if (r < 0)
 793                 return log_error_errno(r, "Failed to request name: %m");
 794
 795         r = sd_bus_attach_event(m->bus, m->event, SD_EVENT_PRIORITY_NORMAL);
 796         if (r < 0)
 797                 return log_error_errno(r, "Failed to attach bus to event loop: %m");
 798
 799 #if 0 /// elogind has to setup its release agent
 800         return 0;
 801 #else
 802         r = elogind_setup_cgroups_agent(m);
 803
 804         return r;
 805 #endif // 0
 806 }
 807
 808 static int manager_vt_switch(sd_event_source *src, const struct signalfd_siginfo *si, void *data) {
 809         Manager *m = data;
 810         Session *active, *iter;
 811
 812         /*
 813          * We got a VT-switch signal and we have to acknowledge it immediately.
 814          * Preferably, we'd just use m->seat0->active->vtfd, but unfortunately,
 815          * old user-space might run multiple sessions on a single VT, *sigh*.
 816          * Therefore, we have to iterate all sessions and find one with a vtfd
 817          * on the requested VT.
 818          * As only VTs with active controllers have VT_PROCESS set, our current
 819          * notion of the active VT might be wrong (for instance if the switch
 820          * happens while we setup VT_PROCESS). Therefore, read the current VT
 821          * first and then use s->active->vtnr as reference. Note that this is
 822          * not racy, as no further VT-switch can happen as long as we're in
 823          * synchronous VT_PROCESS mode.
 824          */
 825
 826         assert(m->seat0);
 827         seat_read_active_vt(m->seat0);
 828
 829         active = m->seat0->active;
 830         if (!active || active->vtnr < 1) {
 831                 log_warning("Received VT_PROCESS signal without a registered session on that VT.");
 832                 return 0;
 833         }
 834
 835         if (active->vtfd >= 0) {
 836                 session_leave_vt(active);
 837         } else {
 838                 LIST_FOREACH(sessions_by_seat, iter, m->seat0->sessions) {
 839                         if (iter->vtnr == active->vtnr && iter->vtfd >= 0) {
 840                                 session_leave_vt(iter);
 841                                 break;
 842                         }
 843                 }
 844         }
 845
 846         return 0;
 847 }
 848
 849 static int manager_connect_console(Manager *m) {
 850         int r;
 851
 852         assert(m);
 853         assert(m->console_active_fd < 0);
 854
 855         /* On certain architectures (S390 and Xen, and containers),
 856            /dev/tty0 does not exist, so don't fail if we can't open
 857            it. */
 858         if (access("/dev/tty0", F_OK) < 0)
 859                 return 0;
 860
 861         m->console_active_fd = open("/sys/class/tty/tty0/active", O_RDONLY|O_NOCTTY|O_CLOEXEC);
 862         if (m->console_active_fd < 0) {
 863
 864                 /* On some systems the device node /dev/tty0 may exist
 865                  * even though /sys/class/tty/tty0 does not. */
 866                 if (errno == ENOENT)
 867                         return 0;
 868
 869                 return log_error_errno(errno, "Failed to open /sys/class/tty/tty0/active: %m");
 870         }
 871
 872         r = sd_event_add_io(m->event, &m->console_active_event_source, m->console_active_fd, 0, manager_dispatch_console, m);
 873         if (r < 0) {
 874                 log_error("Failed to watch foreground console");
 875                 return r;
 876         }
 877
 878         /*
 879          * SIGRTMIN is used as global VT-release signal, SIGRTMIN + 1 is used
 880          * as VT-acquire signal. We ignore any acquire-events (yes, we still
 881          * have to provide a valid signal-number for it!) and acknowledge all
 882          * release events immediately.
 883          */
 884
 885         if (SIGRTMIN + 1 > SIGRTMAX) {
 886                 log_error("Not enough real-time signals available: %u-%u", SIGRTMIN, SIGRTMAX);
 887                 return -EINVAL;
 888         }
 889
 890         assert_se(ignore_signals(SIGRTMIN + 1, -1) >= 0);
 891         assert_se(sigprocmask_many(SIG_BLOCK, NULL, SIGRTMIN, -1) >= 0);
 892
 893         r = sd_event_add_signal(m->event, NULL, SIGRTMIN, manager_vt_switch, m);
 894         if (r < 0)
 895                 return r;
 896
 897         return 0;
 898 }
 899
 900 static int manager_connect_udev(Manager *m) {
 901         int r;
 902
 903         assert(m);
 904         assert(!m->udev_seat_monitor);
 905         assert(!m->udev_device_monitor);
 906         assert(!m->udev_vcsa_monitor);
 907         assert(!m->udev_button_monitor);
 908
 909         m->udev_seat_monitor = udev_monitor_new_from_netlink(m->udev, "udev");
 910         if (!m->udev_seat_monitor)
 911                 return -ENOMEM;
 912
 913         r = udev_monitor_filter_add_match_tag(m->udev_seat_monitor, "master-of-seat");
 914         if (r < 0)
 915                 return r;
 916
 917         r = udev_monitor_enable_receiving(m->udev_seat_monitor);
 918         if (r < 0)
 919                 return r;
 920
 921         r = sd_event_add_io(m->event, &m->udev_seat_event_source, udev_monitor_get_fd(m->udev_seat_monitor), EPOLLIN, manager_dispatch_seat_udev, m);
 922         if (r < 0)
 923                 return r;
 924
 925         m->udev_device_monitor = udev_monitor_new_from_netlink(m->udev, "udev");
 926         if (!m->udev_device_monitor)
 927                 return -ENOMEM;
 928
 929         r = udev_monitor_filter_add_match_subsystem_devtype(m->udev_device_monitor, "input", NULL);
 930         if (r < 0)
 931                 return r;
 932
 933         r = udev_monitor_filter_add_match_subsystem_devtype(m->udev_device_monitor, "graphics", NULL);
 934         if (r < 0)
 935                 return r;
 936
 937         r = udev_monitor_filter_add_match_subsystem_devtype(m->udev_device_monitor, "drm", NULL);
 938         if (r < 0)
 939                 return r;
 940
 941         r = udev_monitor_enable_receiving(m->udev_device_monitor);
 942         if (r < 0)
 943                 return r;
 944
 945         r = sd_event_add_io(m->event, &m->udev_device_event_source, udev_monitor_get_fd(m->udev_device_monitor), EPOLLIN, manager_dispatch_device_udev, m);
 946         if (r < 0)
 947                 return r;
 948
 949         /* Don't watch keys if nobody cares */
 950         if (!manager_all_buttons_ignored(m)) {
 951                 m->udev_button_monitor = udev_monitor_new_from_netlink(m->udev, "udev");
 952                 if (!m->udev_button_monitor)
 953                         return -ENOMEM;
 954
 955                 r = udev_monitor_filter_add_match_tag(m->udev_button_monitor, "power-switch");
 956                 if (r < 0)
 957                         return r;
 958
 959                 r = udev_monitor_filter_add_match_subsystem_devtype(m->udev_button_monitor, "input", NULL);
 960                 if (r < 0)
 961                         return r;
 962
 963                 r = udev_monitor_enable_receiving(m->udev_button_monitor);
 964                 if (r < 0)
 965                         return r;
 966
 967                 r = sd_event_add_io(m->event, &m->udev_button_event_source, udev_monitor_get_fd(m->udev_button_monitor), EPOLLIN, manager_dispatch_button_udev, m);
 968                 if (r < 0)
 969                         return r;
 970         }
 971
 972         /* Don't bother watching VCSA devices, if nobody cares */
 973 #if 0 /// elogind does not support autospawning of vts
 974         if (m->n_autovts > 0 && m->console_active_fd >= 0) {
 975
 976                 m->udev_vcsa_monitor = udev_monitor_new_from_netlink(m->udev, "udev");
 977                 if (!m->udev_vcsa_monitor)
 978                         return -ENOMEM;
 979
 980                 r = udev_monitor_filter_add_match_subsystem_devtype(m->udev_vcsa_monitor, "vc", NULL);
 981                 if (r < 0)
 982                         return r;
 983
 984                 r = udev_monitor_enable_receiving(m->udev_vcsa_monitor);
 985                 if (r < 0)
 986                         return r;
 987
 988                 r = sd_event_add_io(m->event, &m->udev_vcsa_event_source, udev_monitor_get_fd(m->udev_vcsa_monitor), EPOLLIN, manager_dispatch_vcsa_udev, m);
 989                 if (r < 0)
 990                         return r;
 991         }
 992 #endif // 0
 993
 994         return 0;
 995 }
 996
 997 static void manager_gc(Manager *m, bool drop_not_started) {
 998         Seat *seat;
 999         Session *session;
1000         User *user;
1001
1002         assert(m);
1003
1004         while ((seat = m->seat_gc_queue)) {
1005                 LIST_REMOVE(gc_queue, m->seat_gc_queue, seat);
1006                 seat->in_gc_queue = false;
1007
1008                 if (seat_may_gc(seat, drop_not_started)) {
1009                         seat_stop(seat, false);
1010                         seat_free(seat);
1011                 }
1012         }
1013
1014         while ((session = m->session_gc_queue)) {
1015                 LIST_REMOVE(gc_queue, m->session_gc_queue, session);
1016                 session->in_gc_queue = false;
1017
1018                 /* First, if we are not closing yet, initiate stopping */
1019                 if (session_may_gc(session, drop_not_started) &&
1020                     session_get_state(session) != SESSION_CLOSING)
1021                         session_stop(session, false);
1022
1023                 /* Normally, this should make the session referenced
1024                  * again, if it doesn't then let's get rid of it
1025                  * immediately */
1026                 if (session_may_gc(session, drop_not_started)) {
1027                         session_finalize(session);
1028                         session_free(session);
1029                 }
1030         }
1031
1032         while ((user = m->user_gc_queue)) {
1033                 LIST_REMOVE(gc_queue, m->user_gc_queue, user);
1034                 user->in_gc_queue = false;
1035
1036                 /* First step: queue stop jobs */
1037                 if (user_may_gc(user, drop_not_started))
1038                         user_stop(user, false);
1039
1040                 /* Second step: finalize user */
1041                 if (user_may_gc(user, drop_not_started)) {
1042                         user_finalize(user);
1043                         user_free(user);
1044                 }
1045         }
1046 }
1047
1048 static int manager_dispatch_idle_action(sd_event_source *s, uint64_t t, void *userdata) {
1049         Manager *m = userdata;
1050         struct dual_timestamp since;
1051         usec_t n, elapse;
1052         int r;
1053
1054         assert(m);
1055
1056         if (m->idle_action == HANDLE_IGNORE ||
1057             m->idle_action_usec <= 0)
1058                 return 0;
1059
1060         n = now(CLOCK_MONOTONIC);
1061
1062         r = manager_get_idle_hint(m, &since);
1063         if (r <= 0)
1064                 /* Not idle. Let's check if after a timeout it might be idle then. */
1065                 elapse = n + m->idle_action_usec;
1066         else {
1067                 /* Idle! Let's see if it's time to do something, or if
1068                  * we shall sleep for longer. */
1069
1070                 if (n >= since.monotonic + m->idle_action_usec &&
1071                     (m->idle_action_not_before_usec <= 0 || n >= m->idle_action_not_before_usec + m->idle_action_usec)) {
1072                         log_info("System idle. Taking action.");
1073
1074                         manager_handle_action(m, 0, m->idle_action, false, false);
1075                         m->idle_action_not_before_usec = n;
1076                 }
1077
1078                 elapse = MAX(since.monotonic, m->idle_action_not_before_usec) + m->idle_action_usec;
1079         }
1080
1081         if (!m->idle_action_event_source) {
1082
1083                 r = sd_event_add_time(
1084                                 m->event,
1085                                 &m->idle_action_event_source,
1086                                 CLOCK_MONOTONIC,
1087                                 elapse, USEC_PER_SEC*30,
1088                                 manager_dispatch_idle_action, m);
1089                 if (r < 0)
1090                         return log_error_errno(r, "Failed to add idle event source: %m");
1091
1092                 r = sd_event_source_set_priority(m->idle_action_event_source, SD_EVENT_PRIORITY_IDLE+10);
1093                 if (r < 0)
1094                         return log_error_errno(r, "Failed to set idle event source priority: %m");
1095         } else {
1096                 r = sd_event_source_set_time(m->idle_action_event_source, elapse);
1097                 if (r < 0)
1098                         return log_error_errno(r, "Failed to set idle event timer: %m");
1099
1100                 r = sd_event_source_set_enabled(m->idle_action_event_source, SD_EVENT_ONESHOT);
1101                 if (r < 0)
1102                         return log_error_errno(r, "Failed to enable idle event timer: %m");
1103         }
1104
1105         return 0;
1106 }
1107
1108 static int manager_dispatch_reload_signal(sd_event_source *s, const struct signalfd_siginfo *si, void *userdata) {
1109         Manager *m = userdata;
1110         int r;
1111
1112         manager_reset_config(m);
1113         r = manager_parse_config_file(m);
1114         if (r < 0)
1115                 log_warning_errno(r, "Failed to parse config file, using defaults: %m");
1116         else
1117                 log_info("Config file reloaded.");
1118
1119 #if 1 /// elogind needs an Add-On for sleep configuration
1120         elogind_manager_reset_config(m);
1121 #endif // 1
1122         return 0;
1123 }
1124
1125 static int manager_startup(Manager *m) {
1126         int r;
1127         Seat *seat;
1128         Session *session;
1129         User *user;
1130         Button *button;
1131         Inhibitor *inhibitor;
1132         Iterator i;
1133
1134         assert(m);
1135
1136         r = sd_event_add_signal(m->event, NULL, SIGHUP, manager_dispatch_reload_signal, m);
1137         if (r < 0)
1138                 return log_error_errno(r, "Failed to register SIGHUP handler: %m");
1139
1140 #if 1 /// elogind needs some extra preparations before connecting...
1141         elogind_manager_startup(m);
1142 #endif // 1
1143         /* Connect to console */
1144         r = manager_connect_console(m);
1145         if (r < 0)
1146                 return r;
1147
1148         /* Connect to udev */
1149         r = manager_connect_udev(m);
1150         if (r < 0)
1151                 return log_error_errno(r, "Failed to create udev watchers: %m");
1152
1153         /* Connect to the bus */
1154         r = manager_connect_bus(m);
1155         if (r < 0)
1156                 return r;
1157
1158         /* Instantiate magic seat 0 */
1159         r = manager_add_seat(m, "seat0", &m->seat0);
1160         if (r < 0)
1161                 return log_error_errno(r, "Failed to add seat0: %m");
1162
1163         r = manager_set_lid_switch_ignore(m, 0 + m->holdoff_timeout_usec);
1164         if (r < 0)
1165                 log_warning_errno(r, "Failed to set up lid switch ignore event source: %m");
1166
1167         /* Deserialize state */
1168         r = manager_enumerate_devices(m);
1169         if (r < 0)
1170                 log_warning_errno(r, "Device enumeration failed: %m");
1171
1172         r = manager_enumerate_seats(m);
1173         if (r < 0)
1174                 log_warning_errno(r, "Seat enumeration failed: %m");
1175
1176         r = manager_enumerate_users(m);
1177         if (r < 0)
1178                 log_warning_errno(r, "User enumeration failed: %m");
1179
1180         r = manager_enumerate_sessions(m);
1181         if (r < 0)
1182                 log_warning_errno(r, "Session enumeration failed: %m");
1183
1184         r = manager_enumerate_inhibitors(m);
1185         if (r < 0)
1186                 log_warning_errno(r, "Inhibitor enumeration failed: %m");
1187
1188         r = manager_enumerate_buttons(m);
1189         if (r < 0)
1190                 log_warning_errno(r, "Button enumeration failed: %m");
1191
1192         /* Remove stale objects before we start them */
1193         manager_gc(m, false);
1194
1195         /* Reserve the special reserved VT */
1196 #if 0 /// elogind does not support autospawning of vts
1197         manager_reserve_vt(m);
1198 #endif // 0
1199
1200         /* And start everything */
1201         HASHMAP_FOREACH(seat, m->seats, i)
1202                 seat_start(seat);
1203
1204         HASHMAP_FOREACH(user, m->users, i)
1205                 user_start(user);
1206
1207         HASHMAP_FOREACH(session, m->sessions, i)
1208                 session_start(session, NULL);
1209
1210         HASHMAP_FOREACH(inhibitor, m->inhibitors, i)
1211                 inhibitor_start(inhibitor);
1212
1213         HASHMAP_FOREACH(button, m->buttons, i)
1214                 button_check_switches(button);
1215
1216         manager_dispatch_idle_action(NULL, 0, m);
1217
1218         return 0;
1219 }
1220
1221 static int manager_run(Manager *m) {
1222         int r;
1223
1224         assert(m);
1225
1226         for (;;) {
1227                 r = sd_event_get_state(m->event);
1228                 if (r < 0)
1229                         return r;
1230                 if (r == SD_EVENT_FINISHED)
1231                         return 0;
1232
1233                 manager_gc(m, true);
1234
1235                 r = manager_dispatch_delayed(m, false);
1236                 if (r < 0)
1237                         return r;
1238                 if (r > 0)
1239                         continue;
1240
1241                 r = sd_event_run(m->event, (uint64_t) -1);
1242                 if (r < 0)
1243                         return r;
1244         }
1245 }
1246
1247 int main(int argc, char *argv[]) {
1248         _cleanup_(manager_unrefp) Manager *m = NULL;
1249         int r;
1250
1251 #if 1 /// perform extra checks for elogind startup
1252         r = elogind_startup(argc, argv);
1253         if (r)
1254                 return r < 0 ? EXIT_FAILURE : EXIT_SUCCESS;
1255 #endif // 1
1256         elogind_set_program_name(argv[0]);
1257         log_set_target(LOG_TARGET_AUTO);
1258         log_set_facility(LOG_AUTH);
1259         log_parse_environment();
1260 #if ENABLE_DEBUG_ELOGIND
1261         log_set_max_level(LOG_DEBUG);
1262         log_set_target(LOG_TARGET_SYSLOG_OR_KMSG);
1263 #endif // ENABLE_DEBUG_ELOGIND
1264         log_open();
1265
1266         umask(0022);
1267
1268 #if 0 /// elogind has some extra functionality at startup, argc can be != 1
1269         if (argc != 1) {
1270                 log_error("This program takes no arguments.");
1271                 r = -EINVAL;
1272                 goto finish;
1273         }
1274 #endif // 0
1275
1276         r = mac_selinux_init();
1277         if (r < 0) {
1278                 log_error_errno(r, "Could not initialize labelling: %m");
1279                 goto finish;
1280         }
1281
1282 #if 0 /// elogind can not rely on systemd to help, so we need a bit more effort than this
1283         mkdir_label("/run/systemd/seats", 0755);
1284         mkdir_label("/run/systemd/users", 0755);
1285         mkdir_label("/run/systemd/sessions", 0755);
1286         /* Always create the directories people can create inotify watches in. Note that some applications might check
1287          * for the existence of /run/systemd/seats/ to determine whether logind is available, so please always make
1288          * sure these directories are created early on and unconditionally. */
1289         (void) mkdir_label("/run/systemd/seats", 0755);
1290         (void) mkdir_label("/run/systemd/users", 0755);
1291         (void) mkdir_label("/run/systemd/sessions", 0755);
1292 #else
1293         r = mkdir_label("/run/systemd", 0755);
1294         if ( (r < 0) && (-EEXIST != r) )
1295                 return log_error_errno(r, "Failed to create /run/systemd : %m");
1296         r = mkdir_label("/run/systemd/seats", 0755);
1297         if ( r < 0 && (-EEXIST != r) )
1298                 return log_error_errno(r, "Failed to create /run/systemd/seats : %m");
1299         r = mkdir_label("/run/systemd/users", 0755);
1300         if ( r < 0 && (-EEXIST != r) )
1301                 return log_error_errno(r, "Failed to create /run/systemd/users : %m");
1302         r = mkdir_label("/run/systemd/sessions", 0755);
1303         if ( r < 0 && (-EEXIST != r) )
1304                 return log_error_errno(r, "Failed to create /run/systemd/sessions : %m");
1305         r = mkdir_label("/run/systemd/machines", 0755);
1306         if ( r < 0 && (-EEXIST != r) )
1307                 return log_error_errno(r, "Failed to create /run/systemd/machines : %m");
1308 #endif // 0
1309
1310         assert_se(sigprocmask_many(SIG_BLOCK, NULL, SIGHUP, SIGTERM, SIGINT, -1) >= 0);
1311
1312         r = manager_new(&m);
1313         if (r < 0) {
1314                 log_error_errno(r, "Failed to allocate manager object: %m");
1315                 goto finish;
1316         }
1317
1318         (void) manager_parse_config_file(m);
1319
1320 #if 1 /// elogind needs an Add-On for sleep configuration
1321         elogind_manager_reset_config(m);
1322 #endif // 1
1323         r = manager_startup(m);
1324         if (r < 0) {
1325                 log_error_errno(r, "Failed to fully start up daemon: %m");
1326                 goto finish;
1327         }
1328
1329         log_debug("elogind running as pid "PID_FMT, getpid_cached());
1330
1331         (void) sd_notify(false,
1332                          "READY=1\n"
1333                          "STATUS=Processing requests...");
1334
1335         r = manager_run(m);
1336
1337         log_debug("elogind stopped as pid "PID_FMT, getpid_cached());
1338
1339         (void) sd_notify(false,
1340                          "STOPPING=1\n"
1341                          "STATUS=Shutting down...");
1342
1343 finish:
1344         return r < 0 ? EXIT_FAILURE : EXIT_SUCCESS;
1345 }